|
|
@@ -290,7 +290,7 @@ if ($have_ntpq) {
|
|
|
}
|
|
|
|
|
|
# match sys.peer or pps.peer
|
|
|
- if (/^(\*|o)([-0-9.\s]+)\s+([-0-9A-Za-z.]+)\s+([-0-9.]+)\s+([lumb-]+)\s+([-0-9hm.]+)\s+([-0-9.mh]+)\s+([-0-9.]+)\s+([-0-9.]+)\s+([-0-9.]+)\s+([-0-9.]+)/) {
|
|
|
+ if (/^(\*|o)([-0-9.\s]+)\s+([-0-9A-Za-z_().]+)\s+([-0-9.]+)\s+([lumb-]+)\s+([-0-9hm.]+)\s+([-0-9.mh]+)\s+([-0-9.]+)\s+([-0-9.]+)\s+([-0-9.]+)\s+([-0-9.]+)/) {
|
|
|
$syspeer = $2;
|
|
|
$stratum = $4;
|
|
|
$jitter = $11;
|
|
|
@@ -315,7 +315,7 @@ if ($have_ntpq) {
|
|
|
unless (defined $syspeer) {
|
|
|
if ($#candidates >=0) {
|
|
|
foreach my $c (@candidates) {
|
|
|
- $c =~ /^(#)([-0-9.\s]+)\s+([-0-9A-Za-z.]+)\s+([-0-9.]+)\s+([lumb-]+)\s+([-0-9m.]+)\s+([-0-9.]+)\s+([-0-9.]+)\s+([-0-9.]+)\s+([-0-9.]+)\s+([-0-9.]+)/;
|
|
|
+ $c =~ /^(#)([-0-9.\s]+)\s+([-0-9A-Za-z_().]+)\s+([-0-9.]+)\s+([lumb-]+)\s+([-0-9m.]+)\s+([-0-9.]+)\s+([-0-9.]+)\s+([-0-9.]+)\s+([-0-9.]+)\s+([-0-9.]+)/;
|
|
|
$syspeer = $2;
|
|
|
$stratum = $4;
|
|
|
$jitter = $11;
|