=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== qpsmtpd-0.94/bin/install_deps.pl-166- qpsmtpd-0.94/bin/install_deps.pl:167: if ( `/usr/sbin/pkg_info | /usr/bin/grep $name` ) { qpsmtpd-0.94/bin/install_deps.pl-168- return print "$app is installed.\n"; qpsmtpd-0.94/bin/install_deps.pl-169- } qpsmtpd-0.94/bin/install_deps.pl:170: elsif( `/usr/sbin/pkg info | /usr/bin/grep $name` ) { qpsmtpd-0.94/bin/install_deps.pl-171- return print "$app is installed.\n"; ############################################## qpsmtpd-0.94/bin/install_deps.pl-274- qpsmtpd-0.94/bin/install_deps.pl:275: if ( `/usr/sbin/pkg_info | /usr/bin/grep $portname` ) { qpsmtpd-0.94/bin/install_deps.pl-276- return print "$module is installed.\n"; qpsmtpd-0.94/bin/install_deps.pl-277- } qpsmtpd-0.94/bin/install_deps.pl:278: elsif( `/usr/sbin/pkg info | /usr/bin/grep $portname` ) { qpsmtpd-0.94/bin/install_deps.pl-279- return print "$module is installed.\n"; ############################################## qpsmtpd-0.94/lib/Qpsmtpd/TcpServer.pm-61- $remote_ip = inet_ntoa($iaddr); qpsmtpd-0.94/lib/Qpsmtpd/TcpServer.pm:62: $remote_host = gethostbyaddr($iaddr, AF_INET) || "[$remote_ip]"; qpsmtpd-0.94/lib/Qpsmtpd/TcpServer.pm-63- $remote_info = $remote_host; ############################################## qpsmtpd-0.94/log/log2sql-128- if ($host && $host ne 'Unknown') { qpsmtpd-0.94/log/log2sql:129: exec_query("UPDATE message SET hostname=? WHERE id=?", [$host, $id]); qpsmtpd-0.94/log/log2sql-130- } ############################################## qpsmtpd-0.94/log/log2sql-212- elsif ($type eq 'queue') { qpsmtpd-0.94/log/log2sql:213: exec_query('UPDATE message SET result=? WHERE id=?', [3, $msg_id]); qpsmtpd-0.94/log/log2sql-214- } qpsmtpd-0.94/log/log2sql-215- elsif ($type eq 'reject') { qpsmtpd-0.94/log/log2sql:216: exec_query('UPDATE message SET result=? WHERE id=?', [-3, $msg_id]); qpsmtpd-0.94/log/log2sql-217- } ############################################## qpsmtpd-0.94/log/log2sql-291- $exists = qpsmtpd-0.94/log/log2sql:292: exec_query('SELECT * FROM log WHERE name=? AND size=?', [$file, $size]); qpsmtpd-0.94/log/log2sql-293- return if @$exists; # log file hasn't changed, ignore it ############################################## qpsmtpd-0.94/plugins/async/resolvable_fromhost-177- qpsmtpd-0.94/plugins/async/resolvable_fromhost:178: foreach my $addr (@$a_records) { qpsmtpd-0.94/plugins/async/resolvable_fromhost-179- if (is_valid($addr)) { ############################################## qpsmtpd-0.94/plugins/dspam-410- qpsmtpd-0.94/plugins/dspam:411: my ($line1) = split /[\r|\n]/, `$filtercmd < $message`; qpsmtpd-0.94/plugins/dspam-412- $self->log(LOGDEBUG, $line1); ############################################## qpsmtpd-0.94/plugins/ident/geoip-224- return $self->get_country_code_gc($ip) if $self->{_geoip_city}; qpsmtpd-0.94/plugins/ident/geoip:225: return $self->{_geoip}->country_code_by_addr($ip); qpsmtpd-0.94/plugins/ident/geoip-226-} ############################################## qpsmtpd-0.94/plugins/ident/geoip-230- my $ip = shift || $self->qp->connection->remote_ip; qpsmtpd-0.94/plugins/ident/geoip:231: $self->{_geoip_record} = $self->{_geoip_city}->record_by_addr($ip) qpsmtpd-0.94/plugins/ident/geoip-232- or return; ############################################## qpsmtpd-0.94/plugins/ident/geoip-239- my $remote_ip = $self->qp->connection->remote_ip; qpsmtpd-0.94/plugins/ident/geoip:240: my $name = $self->{_geoip}->country_name_by_addr($remote_ip) or return; qpsmtpd-0.94/plugins/ident/geoip-241- $self->qp->connection->notes('geoip_country_name', $name); ############################################## qpsmtpd-0.94/plugins/ident/geoip-316- my $ip = $self->{_args}{distance} or return; qpsmtpd-0.94/plugins/ident/geoip:317: my $record = $self->{_geoip_city}->record_by_addr($ip) or do { qpsmtpd-0.94/plugins/ident/geoip-318- $self->log(LOGERROR, "no record for my Geo::IP location"); ############################################## qpsmtpd-0.94/plugins/karma_tool-113- } qpsmtpd-0.94/plugins/karma_tool:114: my $hostname = `dig +short -x $ip` || ''; qpsmtpd-0.94/plugins/karma_tool-115- chomp $hostname; ############################################## qpsmtpd-0.94/plugins/karma_tool-161- qpsmtpd-0.94/plugins/karma_tool:162: #$hostname = `dig +short -x $ip`; chomp $hostname; qpsmtpd-0.94/plugins/karma_tool-163- } ############################################## qpsmtpd-0.94/plugins/loadcheck-146- qpsmtpd-0.94/plugins/loadcheck:147: my $res = `$self->{_args}{uptime}`; qpsmtpd-0.94/plugins/loadcheck-148- if ($res =~ /aver\S+: (\d+\.\d+)/) { ############################################## qpsmtpd-0.94/plugins/queue/maildir-142- if ($self->{_subdirs}) { qpsmtpd-0.94/plugins/queue/maildir:143: foreach my $addr ($transaction->recipients) { qpsmtpd-0.94/plugins/queue/maildir-144- ($rc, @msg) = $self->deliver_user($transaction, $addr); ############################################## qpsmtpd-0.94/plugins/quit_fortune-12- qpsmtpd-0.94/plugins/quit_fortune:13: my @fortune = `$fortune -s`; qpsmtpd-0.94/plugins/quit_fortune-14- @fortune = map { chop; s/^/ \/ /; $_ } @fortune; ############################################## qpsmtpd-0.94/plugins/resolvable_fromhost-135- return qpsmtpd-0.94/plugins/resolvable_fromhost:136: Qpsmtpd::DSN->addr_bad_from_system($self->get_reject_type(), qpsmtpd-0.94/plugins/resolvable_fromhost-137- "FQDN required in the envelope sender"); ############################################## qpsmtpd-0.94/plugins/tls_cert-55- qpsmtpd-0.94/plugins/tls_cert:56:system('openssl', 'genrsa', '-out', $CA_key, 2048) == 0 qpsmtpd-0.94/plugins/tls_cert-57- or die "Cannot create CA key: $?"; ############################################## qpsmtpd-0.94/plugins/tls_cert-71- qpsmtpd-0.94/plugins/tls_cert:72:system('openssl', 'genrsa', '-out', $SERVER_key, 1024) == 0 qpsmtpd-0.94/plugins/tls_cert-73- or die "Cannot create server key: $?"; ############################################## qpsmtpd-0.94/plugins/tls_cert-92- qpsmtpd-0.94/plugins/tls_cert:93:system('openssl', 'x509', '-extfile', $SIGNfilename, '-days', (365*2), qpsmtpd-0.94/plugins/tls_cert-94- '-CAserial', $CA_serial, '-CA', $CA_crt, ############################################## qpsmtpd-0.94/plugins/virus/aveclient-150- qpsmtpd-0.94/plugins/virus/aveclient:151: my @output = `$cmd`; qpsmtpd-0.94/plugins/virus/aveclient-152- chomp(@output); ############################################## qpsmtpd-0.94/plugins/virus/clamav-200- $self->log(LOGDEBUG, "Running: $cmd"); qpsmtpd-0.94/plugins/virus/clamav:201: my $output = `$cmd`; qpsmtpd-0.94/plugins/virus/clamav-202- ############################################## qpsmtpd-0.94/plugins/virus/hbedv-88- $self->log(LOGDEBUG, "Running: $cmd"); qpsmtpd-0.94/plugins/virus/hbedv:89: my @output = `$cmd`; qpsmtpd-0.94/plugins/virus/hbedv-90- ############################################## qpsmtpd-0.94/plugins/virus/kavscanner-101- $self->log(LOGNOTICE, "Running: $cmd"); qpsmtpd-0.94/plugins/virus/kavscanner:102: my @output = `$cmd`; qpsmtpd-0.94/plugins/virus/kavscanner-103- chomp(@output); ############################################## qpsmtpd-0.94/qpsmtpd-forkserver-132-# establish SERVER socket(s), bind and listen. qpsmtpd-0.94/qpsmtpd-forkserver:133:for my $listen_addr (@LISTENADDR) { qpsmtpd-0.94/qpsmtpd-forkserver-134- my @Socket_opts = ( ############################################## qpsmtpd-0.94/qpsmtpd-forkserver-203- qpsmtpd-0.94/qpsmtpd-forkserver:204:foreach my $listen_addr (@LISTENADDR) { qpsmtpd-0.94/qpsmtpd-forkserver-205- ::log(LOGINFO, ############################################## qpsmtpd-0.94/qpsmtpd-prefork-199- qpsmtpd-0.94/qpsmtpd-prefork:200: for my $addr (@d_addr) { qpsmtpd-0.94/qpsmtpd-prefork-201- my @Socket_opts = ( ############################################## qpsmtpd-0.94/run.tcpserver-12-LANG=C qpsmtpd-0.94/run.tcpserver:13:QMAILDUID=`id -u $QPUSER` qpsmtpd-0.94/run.tcpserver:14:NOFILESGID=`id -g $QPUSER` qpsmtpd-0.94/run.tcpserver-15- ############################################## qpsmtpd-0.94/xt/01-syntax.t-23- my $r; qpsmtpd-0.94/xt/01-syntax.t:24: eval { $r = `$this_perl -Ilib -MQpsmtpd::Constants -c $f 2>&1`; }; qpsmtpd-0.94/xt/01-syntax.t-25- my $exit_code = sprintf("%d", $CHILD_ERROR >> 8); ############################################## qpsmtpd-0.94/debian/qpsmtpd.config-128- db_get exim4/dc_relay_domains qpsmtpd-0.94/debian/qpsmtpd.config:129: RCPTHOSTS=`echo "$EXIM_RELAYDOMAINS $EXIM_OTHERHOSTNAMES" | sed 's/ $//'` qpsmtpd-0.94/debian/qpsmtpd.config-130- elif [ "x$QUEUE_PLUGIN" = "xpostfix" ] ; then ############################################## qpsmtpd-0.94/debian/qpsmtpd.postinst-44- qpsmtpd-0.94/debian/qpsmtpd.postinst:45: TMP=`mktemp /etc/qpsmtpd/.tmp.debconf-settings.$$.XXXXXX` qpsmtpd-0.94/debian/qpsmtpd.postinst-46- ( echo "# auto-generated by $0 at `date`" ; cat <<"EOT" ############################################## qpsmtpd-0.94/debian/qpsmtpd.postinst-62- qpsmtpd-0.94/debian/qpsmtpd.postinst:63: TMP=`mktemp /etc/qpsmtpd/.tmp.debconf-queue-select.$$.XXXXXX` qpsmtpd-0.94/debian/qpsmtpd.postinst-64- ( echo "# auto-generated by $0 at `date`" ; cat <<"EOT" ############################################## qpsmtpd-0.94/debian/qpsmtpd.postinst-90- qpsmtpd-0.94/debian/qpsmtpd.postinst:91: TMP=`mktemp /etc/qpsmtpd/.tmp.debconf-rcpthosts.$$.XXXXXX` qpsmtpd-0.94/debian/qpsmtpd.postinst-92- ( echo "# auto-generated by $0 at `date`" ; cat <<"EOT" ############################################## qpsmtpd-0.94/debian/qpsmtpd.postinst-145- if [ ! -d "$QUEUE_MAILDIR_DESTINATION" ] ; then qpsmtpd-0.94/debian/qpsmtpd.postinst:146: [ -d "`dirname "$QUEUE_MAILDIR_DESTINATION"`" ] || \ qpsmtpd-0.94/debian/qpsmtpd.postinst:147: mkdir -m 0755 -p "`dirname "$QUEUE_MAILDIR_DESTINATION"`" qpsmtpd-0.94/debian/qpsmtpd.postinst-148- [ -d "$QUEUE_MAILDIR_DESTINATION" ] || \