=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libnet-ident-perl-1.25/t/apache/perl/testident-22- inet_ntoa($localip), ":$localport\n"); libnet-ident-perl-1.25/t/apache/perl/testident:23:my $user = lookupFromInAddr($localaddr, $remoteaddr, 5) || "LOOKUP FAILED!\n"; libnet-ident-perl-1.25/t/apache/perl/testident-24-$r->print("function lookupFromInAddr says you are: $user\n"); ############################################## libnet-ident-perl-1.25/t/apache.t-90- print "# Starting apache...\n"; libnet-ident-perl-1.25/t/apache.t:91: system( $apache_bin, "-f", "$apache_root/conf/httpd.conf" ) libnet-ident-perl-1.25/t/apache.t-92- and die "Apache returned non-zero exit status: $?\n"; ############################################## libnet-ident-perl-1.25/README.md-12- libnet-ident-perl-1.25/README.md:13: $username = Net::Ident::lookupFromInAddr($localsockaddr, libnet-ident-perl-1.25/README.md-14- $remotesockaddr, $timeout); ############################################## libnet-ident-perl-1.25/README.md-16- $obj = Net::Ident->new(SOCKET, $timeout); libnet-ident-perl-1.25/README.md:17: $obj = Net::Ident->newFromInAddr($localsockaddr, $remotesockaddr, libnet-ident-perl-1.25/README.md-18- $timeout); ############################################## libnet-ident-perl-1.25/README.md-31- libnet-ident-perl-1.25/README.md:32: $username = lookupFromInAddr($localsockaddr, $remotesockaddr, $timeout); libnet-ident-perl-1.25/README.md-33- ############################################## libnet-ident-perl-1.25/README.md-66- libnet-ident-perl-1.25/README.md:67:- `Net::Ident::lookup (SOCKET` \[`, $timeout`\]`)` libnet-ident-perl-1.25/README.md-68- ############################################## libnet-ident-perl-1.25/README.md-84- libnet-ident-perl-1.25/README.md:85:- `Net::Ident::lookupFromInAddr ($localaddr, $remoteaddr` \[`, $timeout`\]`)` libnet-ident-perl-1.25/README.md-86- ############################################## libnet-ident-perl-1.25/README.md-101- libnet-ident-perl-1.25/README.md:102:- `ident_lookup SOCKET` \[`$timeout`\] libnet-ident-perl-1.25/README.md-103- ############################################## libnet-ident-perl-1.25/README.md-124- libnet-ident-perl-1.25/README.md:125:- `ident_lookup Apache::Connection` \[`$timeout`\] libnet-ident-perl-1.25/README.md-126- ############################################## libnet-ident-perl-1.25/README.md-166- internal message from the **Net::Ident** module, which includes the libnet-ident-perl-1.25/README.md:167: system errno `$!` whenever possible. A likely candidate is libnet-ident-perl-1.25/README.md-168- **"Connection refused"** when the remote site isn't running an ident ############################################## libnet-ident-perl-1.25/README.md-207- my($port,$iaddr) = sockaddr_in($paddr); libnet-ident-perl-1.25/README.md:208: my $name = gethostbyaddr($iaddr,AF_INET) || inet_ntoa($iaddr); libnet-ident-perl-1.25/README.md-209- logmsg "connection from $name [" . inet_ntoa($iaddr) . ############################################## libnet-ident-perl-1.25/README.md-225- libnet-ident-perl-1.25/README.md:226:- `new Net::Ident SOCKET, $timeout` libnet-ident-perl-1.25/README.md-227- ############################################## libnet-ident-perl-1.25/README.md-245- libnet-ident-perl-1.25/README.md:246:- `newFromInAddr $localaddr, $remoteaddr, $timeout` libnet-ident-perl-1.25/README.md-247- ############################################## libnet-ident-perl-1.25/README.md-250- libnet-ident-perl-1.25/README.md:251:- `query $obj` libnet-ident-perl-1.25/README.md-252- ############################################## libnet-ident-perl-1.25/README.md-257- libnet-ident-perl-1.25/README.md:258:- `ready $obj` \[`$blocking`\] libnet-ident-perl-1.25/README.md-259- ############################################## libnet-ident-perl-1.25/README.md-266- libnet-ident-perl-1.25/README.md:267: If you didn't call `query $obj` yet, this method calls it for you, libnet-ident-perl-1.25/README.md-268- which means it _can_ block, regardless of the value of _$blocking_, ############################################## libnet-ident-perl-1.25/README.md-276- timeout (because the networking part of the lookup is over anyway). libnet-ident-perl-1.25/README.md:277: This means that even `ready $obj` can return true way after the libnet-ident-perl-1.25/README.md-278- timeout has expired, provided it returned true at least once before ############################################## libnet-ident-perl-1.25/README.md-280- libnet-ident-perl-1.25/README.md:281:- `username $obj` libnet-ident-perl-1.25/README.md-282- ############################################## libnet-ident-perl-1.25/README.md-284- blocks until the query is complete, if necessary (it effectively calls libnet-ident-perl-1.25/README.md:285: `ready $obj 1` for you if you didn't do it yourself). Returns the libnet-ident-perl-1.25/README.md-286- parsed username on success, or undef on error. In an array context, ############################################## libnet-ident-perl-1.25/README.md-289- libnet-ident-perl-1.25/README.md:290:- `getfh $obj` libnet-ident-perl-1.25/README.md-291- ############################################## libnet-ident-perl-1.25/README.md-295- libnet-ident-perl-1.25/README.md:296:- `geterror $obj` libnet-ident-perl-1.25/README.md-297- ############################################## libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm-142- # continue with the NewFromInAddr constructor libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm:143: $class->newFromInAddr( $localaddr, $remoteaddr, $timeout ); libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm-144-} ############################################## libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm-504-# do the entire rfc931 lookup from two in_addr structs libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm:505:sub lookupFromInAddr ($$;$) { libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm-506- my ( $localaddr, $remoteaddr, $timeout ) = @_; ############################################## libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm-512- libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm:513: Net::Ident->newFromInAddr( $localaddr, $remoteaddr, $timeout )->username; libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm-514-} ############################################## libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm-583- if $DEBUG > 1; libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm:584: lookupFromInAddr( $self->local_addr, $self->remote_addr, $timeout ); libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm-585- }; ############################################## libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm-603- libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm:604: $username = Net::Ident::lookupFromInAddr($localsockaddr, libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm-605- $remotesockaddr, $timeout); ############################################## libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm-607- $obj = Net::Ident->new(SOCKET, $timeout); libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm:608: $obj = Net::Ident->newFromInAddr($localsockaddr, $remotesockaddr, libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm-609- $timeout); ############################################## libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm-622- libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm:623: $username = lookupFromInAddr($localsockaddr, $remotesockaddr, $timeout); libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm-624- ############################################## libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm-677- libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm:678:=item C<Net::Ident::lookupFromInAddr ($localaddr, $remoteaddr> [C<, $timeout>]C<)> libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm-679- ############################################## libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm-826- my($port,$iaddr) = sockaddr_in($paddr); libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm:827: my $name = gethostbyaddr($iaddr,AF_INET) || inet_ntoa($iaddr); libnet-ident-perl-1.25/.pc/compat-export.patch/Ident.pm-828- logmsg "connection from $name [" . inet_ntoa($iaddr) . ############################################## libnet-ident-perl-1.25/Ident.pm-142- # continue with the NewFromInAddr constructor libnet-ident-perl-1.25/Ident.pm:143: $class->newFromInAddr( $localaddr, $remoteaddr, $timeout ); libnet-ident-perl-1.25/Ident.pm-144-} ############################################## libnet-ident-perl-1.25/Ident.pm-504-# do the entire rfc931 lookup from two in_addr structs libnet-ident-perl-1.25/Ident.pm:505:sub lookupFromInAddr ($$;$) { libnet-ident-perl-1.25/Ident.pm-506- my ( $localaddr, $remoteaddr, $timeout ) = @_; ############################################## libnet-ident-perl-1.25/Ident.pm-512- libnet-ident-perl-1.25/Ident.pm:513: Net::Ident->newFromInAddr( $localaddr, $remoteaddr, $timeout )->username; libnet-ident-perl-1.25/Ident.pm-514-} ############################################## libnet-ident-perl-1.25/Ident.pm-583- if $DEBUG > 1; libnet-ident-perl-1.25/Ident.pm:584: lookupFromInAddr( $self->local_addr, $self->remote_addr, $timeout ); libnet-ident-perl-1.25/Ident.pm-585- }; ############################################## libnet-ident-perl-1.25/Ident.pm-603- libnet-ident-perl-1.25/Ident.pm:604: $username = Net::Ident::lookupFromInAddr($localsockaddr, libnet-ident-perl-1.25/Ident.pm-605- $remotesockaddr, $timeout); ############################################## libnet-ident-perl-1.25/Ident.pm-607- $obj = Net::Ident->new(SOCKET, $timeout); libnet-ident-perl-1.25/Ident.pm:608: $obj = Net::Ident->newFromInAddr($localsockaddr, $remotesockaddr, libnet-ident-perl-1.25/Ident.pm-609- $timeout); ############################################## libnet-ident-perl-1.25/Ident.pm-622- libnet-ident-perl-1.25/Ident.pm:623: $username = lookupFromInAddr($localsockaddr, $remotesockaddr, $timeout); libnet-ident-perl-1.25/Ident.pm-624- ############################################## libnet-ident-perl-1.25/Ident.pm-677- libnet-ident-perl-1.25/Ident.pm:678:=item C<Net::Ident::lookupFromInAddr ($localaddr, $remoteaddr> [C<, $timeout>]C<)> libnet-ident-perl-1.25/Ident.pm-679- ############################################## libnet-ident-perl-1.25/Ident.pm-826- my($port,$iaddr) = sockaddr_in($paddr); libnet-ident-perl-1.25/Ident.pm:827: my $name = gethostbyaddr($iaddr,AF_INET) || inet_ntoa($iaddr); libnet-ident-perl-1.25/Ident.pm-828- logmsg "connection from $name [" . inet_ntoa($iaddr) .