⚝
One Hat Cyber Team
⚝
Your IP:
216.73.216.93
Server IP:
65.108.141.171
Server:
Linux server.heloix.com 5.4.0-214-generic #234-Ubuntu SMP Fri Mar 14 23:50:27 UTC 2025 x86_64
Server Software:
Apache
PHP Version:
7.4.33
Buat File
|
Buat Folder
Eksekusi
Dir :
~
/
usr
/
share
/
webmin
/
postfix
/
Edit File: mailq_search.cgi
#!/usr/bin/perl # mailq_search.cgi # Display some messages from the mail queue require './postfix-lib.pl'; require './boxes-lib.pl'; &ReadParse(); $access{'mailq'} || &error($text{'mailq_ecannot'}); &ui_print_header(undef, $text{'searchq_title'}, ""); # Get all of the queued messages that this user can see @qfiles = &list_queue(); # Do the search $neg = ($in{'field'} =~ s/^!//); @qfiles = grep { my $r = &compare_field($_); $neg ? !$r : $r } @qfiles; print "<p><b>",&text($in{'field'} =~ /^\!/ ? 'search_results3' : 'search_results2', scalar(@qfiles), "<tt>$in{'match'}</tt>"),"</b><p>\n"; if (@qfiles) { # Show matching messages &mailq_table(\@qfiles); } else { print "<b>$text{'searchq_none'}</b> <p>\n"; } &ui_print_footer("mailq.cgi", $text{'mailq_return'}, "", $text{'index_return'}); sub compare_field { if ($in{'field'} eq 'size') { return $_[0]->{$in{'field'}} > $in{'match'}; } else { return $_[0]->{$in{'field'}} =~ /\Q$in{'match'}\E/i; } }
Simpan