| #!/usr/bin/perl -T |
| |
| use lib '.'; use lib 't'; |
| use SATest; sa_t_init("if_can"); |
| use Test::More tests => 9; |
| |
| # --------------------------------------------------------------------------- |
| |
| tstlocalrules (q{ |
| header TEST_ORIG_IP_H1 X-Spam-Relays-External =~ /\bip=198\.51\.100\.1\b/ |
| score TEST_ORIG_IP_H1 0.1 |
| header TEST_ORIG_IP_H2 X-Spam-Relays-External =~ /\bip=198\.51\.100\.2\b/ |
| score TEST_ORIG_IP_H2 0.1 |
| }); |
| |
| %patterns = ( q{ TEST_ORIG_IP_H1 }, 'test_orig_ip_h1' ); |
| %anti_patterns = ( q{ TEST_ORIG_IP_H2 }, 'test_orig_ip_h2' ); |
| |
| ok(sarun("-L -t < data/nice/orig_ip_hdr.eml", \&patterns_run_cb)); |
| ok_all_patterns(); |
| |
| # --------------------------------------------------------------------------- |
| |
| tstlocalrules (q{ |
| clear_originating_ip_headers |
| originating_ip_headers X-Yahoo-Post-IP X-Apparently-From |
| originating_ip_headers X-Originating-IP X-SenderIP |
| originating_ip_headers X-Testing-Ip |
| header TEST_ORIG_IP_H1 X-Spam-Relays-External =~ /\bip=198\.51\.100\.1\b/ |
| score TEST_ORIG_IP_H1 0.1 |
| header TEST_ORIG_IP_H2 X-Spam-Relays-External =~ /\bip=198\.51\.100\.2\b/ |
| score TEST_ORIG_IP_H2 0.1 |
| }); |
| |
| %patterns = ( q{ TEST_ORIG_IP_H1 }, 'test_orig_ip_h1', |
| q{ TEST_ORIG_IP_H2 }, 'test_orig_ip_h2' ); |
| %anti_patterns = (); |
| |
| ok(sarun("-L -t < data/nice/orig_ip_hdr.eml", \&patterns_run_cb)); |
| ok_all_patterns(); |
| |
| # --------------------------------------------------------------------------- |
| |
| tstlocalrules (q{ |
| clear_originating_ip_headers |
| header TEST_ORIG_IP_H1 X-Spam-Relays-External =~ /\bip=198\.51\.100\.1\b/ |
| score TEST_ORIG_IP_H1 0.1 |
| header TEST_ORIG_IP_H2 X-Spam-Relays-External =~ /\bip=198\.51\.100\.2\b/ |
| score TEST_ORIG_IP_H2 0.1 |
| }); |
| |
| %patterns = (); |
| %anti_patterns = ( q{ TEST_ORIG_IP_H1 }, 'test_orig_ip_h1', |
| q{ TEST_ORIG_IP_H2 }, 'test_orig_ip_h2' ); |
| |
| ok(sarun("-L -t < data/nice/orig_ip_hdr.eml", \&patterns_run_cb)); |
| ok_all_patterns(); |
| |