require "vnd.stalwart.testsuite"; # Just test whether valid scripts will compile without problems test "Trivial" { # Commands must be case-insensitive keep; Keep; KEEP; discard; DisCaRD; # Tags must be case-insensitive if size :UNDER 34 { } if header :Is "from" "tukker@example.com" { } # Numbers must be case-insensitive if anyof( size :UNDER 34m, size :oVeR 50M ) { } } test "Redirect" { redirect "stephan@example.org"; redirect " stephan@example.org"; redirect "stephan @example.org"; redirect "stephan@ example.org"; redirect "stephan@example.org "; redirect " stephan @ example.org "; redirect "Stephan Bosch"; redirect " Stephan Bosch"; redirect "Stephan Bosch "; redirect "Stephan Bosch< stephan@example.org>"; redirect "Stephan Bosch"; redirect "Stephan Bosch"; redirect "Stephan Bosch"; redirect "Stephan Bosch "; redirect " Stephan Bosch < stephan @ example.org > "; # Test address syntax redirect "\"Stephan Bosch\"@example.org"; redirect "Stephan.Bosch@eXamPle.oRg"; redirect "Stephan.Bosch@example.org"; redirect "Stephan Bosch "; }