~clint-fewbar/ubuntu/hardy/spamassassin/remove-open-whois

« back to all changes in this revision

Viewing changes to t/trust_path.t

  • Committer: Bazaar Package Importer
  • Author(s): Scott Kitterman
  • Date: 2008-01-12 21:11:43 UTC
  • mfrom: (1.1.11 upstream)
  • Revision ID: james.westby@ubuntu.com-20080112211143-x6bpcnj60h9hsb6v
Tags: 3.2.4-0ubuntu1
* New upstream release
* Bump standards version to 3.7.3 without further change

Show diffs side-by-side

added added

removed removed

Lines of Context:
18
18
 
19
19
use lib '.'; use lib 't';
20
20
use SATest; sa_t_init("trust_path");
21
 
use Test; BEGIN { plan tests => 69 };
 
21
use Test; BEGIN { plan tests => 81 };
22
22
use IO::File;
23
23
 
24
24
use strict;
425
425
 
426
426
# ---------------------------------------------------------------------------
427
427
 
 
428
# bug 5680: 'X-Originating-IP'
 
429
q{
 
430
 
 
431
  trusted_networks 1/8
 
432
  Received: from sender.net (1.1.1.1) by receiver.net
 
433
              with SMTP; 10 Nov 2005 00:00:00 -0000
 
434
  X-Originating-IP: 2.2.2.2
 
435
 
 
436
} => q{
 
437
 
 
438
Trusted: [ ip=1.1.1.1 rdns=sender.net helo=sender.net by=receiver.net ident= envfrom= intl=1 id= auth= msa=0 ]
 
439
Untrusted: [ ip=2.2.2.2 rdns= helo= by= ident= envfrom= intl=0 id= auth= msa=0 ]
 
440
 
 
441
},
 
442
 
 
443
# ---------------------------------------------------------------------------
 
444
 
 
445
# bug 5680: 'X-Originating-IP', trusted
 
446
q{
 
447
 
 
448
  trusted_networks 1/8 2/8
 
449
  internal_networks 1/8
 
450
  Received: from sender.net (1.1.1.1) by receiver.net
 
451
              with SMTP; 10 Nov 2005 00:00:00 -0000
 
452
  X-Originating-IP: 2.2.2.2
 
453
 
 
454
} => q{
 
455
 
 
456
Trusted: [ ip=1.1.1.1 rdns=sender.net helo=sender.net by=receiver.net ident= envfrom= intl=1 id= auth= msa=0 ] [ ip=2.2.2.2 rdns= helo= by= ident= envfrom= intl=0 id= auth= msa=0 ]
 
457
Untrusted: 
 
458
 
 
459
},
 
460
 
 
461
# ---------------------------------------------------------------------------
 
462
 
 
463
# bug 5680: 'X-Originating-IP', msa
 
464
q{
 
465
 
 
466
  trusted_networks 1/8
 
467
  msa_networks 1/8
 
468
  Received: from sender.net (1.1.1.1) by receiver.net
 
469
              with SMTP; 10 Nov 2005 00:00:00 -0000
 
470
  X-Originating-IP: 2.2.2.2
 
471
 
 
472
} => q{
 
473
 
 
474
Trusted: [ ip=1.1.1.1 rdns=sender.net helo=sender.net by=receiver.net ident= envfrom= intl=1 id= auth= msa=1 ] [ ip=2.2.2.2 rdns= helo= by= ident= envfrom= intl=1 id= auth= msa=0 ]
 
475
Untrusted: 
 
476
 
 
477
},
 
478
 
 
479
# ---------------------------------------------------------------------------
 
480
 
 
481
# bug 5680: 'X-Originating-IP', internal
 
482
q{
 
483
 
 
484
  trusted_networks 1/8 2/8
 
485
  internal_networks 1/8 2/8
 
486
  Received: from sender.net (1.1.1.1) by receiver.net
 
487
              with SMTP; 10 Nov 2005 00:00:00 -0000
 
488
  X-Originating-IP: 2.2.2.2
 
489
 
 
490
} => q{
 
491
 
 
492
Trusted: [ ip=1.1.1.1 rdns=sender.net helo=sender.net by=receiver.net ident= envfrom= intl=1 id= auth= msa=0 ] [ ip=2.2.2.2 rdns= helo= by= ident= envfrom= intl=1 id= auth= msa=0 ]
 
493
Untrusted: 
 
494
 
 
495
},
 
496
 
 
497
# ---------------------------------------------------------------------------
 
498
 
428
499
# test to make sure netset is detecting overlap correctly when using short CIDR notations
429
500
q{
430
501
 
497
568
  }
498
569
 
499
570
  my $msg = $hdrs."\n\n[no body]\n";
500
 
  $msg =~ s/^\s+Received: /Received: /gm;
 
571
  $msg =~ s/^\s+(Received|X-\S+): /$1: /gm;
501
572
  my $status = $sa->check_message_text ($msg);
502
573
  my $result = $status->rewrite_mail();
503
574