On Mon, Sep 26, 2005 at 02:05:59PM +0200, Peter Koch wrote: > On Mon, Sep 05, 2005 at 04:09:56PM +0200, Roy Arends wrote: > > > Finally, we (Jakob and I) are ready to release fpdns version 0.9.3. As > > great job, thanks. > > > 2) We've split the identifying string in three: vendor, product and > > version. > > That's good. Maybe the use of separator characters other than \s would > make postprocessing even easier (e.g. '|').
Attached is the patch I applied to the Debian package, to do this. Cheers, Anand -- `When any government, or any church for that matter, undertakes to say to its subjects, "This you may not read, this you must not see, this you are forbidden to know," the end result is tyranny and oppression no matter how holy the motives' -- Robert A Heinlein, "If this goes on --"
--- net-dns-fingerprint-0.9.3.orig/apps/fpdns
+++ net-dns-fingerprint-0.9.3/apps/fpdns
@@ -52,12 +52,13 @@
$opt{F} = 10;
$opt{T} = undef;
$opt{Q} = undef;
+ $opt{S} = " ";
my %children;
my $concurrent = 0;
- getopts('Q:DF:p:t:r:cfsdTv', \%opt);
+ getopts('Q:DF:p:t:r:cfsS:dTv', \%opt);
if ($opt{v}) {
print STDERR "$progname version $version\n";
@@ -77,6 +78,7 @@
forcetcp => $opt{T},
qversion => $opt{v},
qchaos => $opt{f},
+ separator=> $opt{S},
);
if ($ARGV[0] eq "-") {
@@ -179,6 +181,7 @@
-Q srcaddr (source IP address) [0.0.0.0]
-r retry (set number of attempts) [1]
-s (short form) [off]
+ -S (separator) [" "]
-t time (set query timeout) [5]
-T (use TCP) [off]
-v (show version)
@@ -199,7 +202,7 @@
B<fpdns> S<[ B<-c> ]> S<[ B<-d> ]> S<[ B<-f> ]> S<[ B<-F> I<nchild> ]>
S<[ B<-p> I<port> ]> S<[ B<-Q> I<srcaddr> ]> S<[ B<-r> I<retry> ]>
- S<[ B<-s> ]> S<[ B<-t> I<timeout> ]> S<[ B<-v> ]> [I<server(s)>]
+ S<[ B<-s> ]> S<[ B<-S> I<separator> ]> S<[ B<-t> I<timeout> ]> S<[ B<-v>
]> [I<server(s)>]
=head1 DESCRIPTION
@@ -254,6 +257,10 @@
Short display form. Useful for surveys.
+=item B<-S>
+
+Separator. Defaults to " ".
+
=item B<-t> I<timeout>
Set the query timeout in seconds. Defaults to 5.
--- net-dns-fingerprint-0.9.3.orig/Fingerprint.pm
+++ net-dns-fingerprint-0.9.3/Fingerprint.pm
@@ -46,6 +46,7 @@
debug => 0,
qversion => 0,
qchaos => 0,
+ separator => " ",
);
my $versionlength = 40;
@@ -470,7 +471,7 @@
push @s, "($r{state};$r{id})" if($self->{debug});
- return join(" ", @s);
+ return join($self->{separator}, @s);
}
sub query_version
signature.asc
Description: Digital signature
_______________________________________________ fpdns mailing list [EMAIL PROTECTED] https://www.rfc.se/mailman/listinfo/fpdns
