blob: 7aa121fa2a4dd43d57a84739d1f06a198df35b4e (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
|
#!/bin/sh
cd ${0%/*}
. ./lib.sh
plan 33
check_addr() {
printf "From: %s\n" "$1" | check_test "parse $1" = "$2" "maddr -"
}
check_addr 'foo@example.org' 'foo@example.org'
check_addr '<foo@example.org>' 'foo@example.org'
check_addr 'bar <foo@example.org>' 'bar <foo@example.org>'
check_addr 'bar quux <foo@example.org>' 'bar quux <foo@example.org>'
check_addr 'bar quux <foo@example.org>' 'bar quux <foo@example.org>'
check_addr '<foo@example.org> (bar)' 'bar <foo@example.org>'
check_addr '"Real Name" <foo@example.org>' 'Real Name <foo@example.org>'
check_addr '"Dr. Real Name" <foo@example.org>' '"Dr. Real Name" <foo@example.org>'
check_addr '"Real Name" (show this) <foo@example.org>' '"Real Name (show this)" <foo@example.org>'
check_addr '"Real Name" <foo@example.org> (ignore this)' '"Real Name (ignore this)" <foo@example.org>'
check_addr '(nested (comments mail@here ) heh) "yep (yap)" <foo@example.org>' '"yep (yap)" <foo@example.org>'
check_addr 'ignore-this: <foo@example.org>' 'foo@example.org'
check_addr 'ignore-this : <foo@example.org>' 'foo@example.org'
check_addr '"foo"@example.org' 'foo@example.org'
check_addr '"Barqux" "foo"@example.org' 'Barqux <foo@example.org>'
check_addr 'Space Man <"space man"@example.org>' 'Space Man <"space man"@example.org>'
check_addr 'Space Man <"space man"@example.org>' 'Space Man <"space man"@example.org>'
check_addr '<spaceman@example.org >' 'spaceman@example.org'
check_addr '< spaceman@example.org >' 'spaceman@example.org'
check_addr '<spaceman@(wtf)example.org >' 'spaceman@example.org'
check_addr 'space\man@example.org' 'spaceman@example.org'
check_addr 'what is <"this<evil(h\"eh)sh>it"@example.org>' 'what is <"this<evil(h\"eh)sh>it"@example.org>'
check_addr 'foo@example.org <foo@example.org>' 'foo@example.org'
check_addr 'foo@[::1] (ipv6)' 'ipv6 <foo@[::1]>'
# invalid addresses
check_addr '<Foo Bar <foobar@qux.com>' 'foobar@qux.com'
check_addr '"abc@def"@ghi' ''
check_addr '"foo@" <bar.com foo@bar.com>' '"foo@" <bar.comfoo@bar.com>'
check_addr 'test."test"@example.org' 'test.test@example.org'
check_addr '<test."test"@example.org>' 'test.test@example.org'
check_addr 'test"test"@example.org' 'testtest@example.org'
check_addr '<test"test"@example.org>' 'testtest@example.org'
check_addr 'foo<bar@example.org>' 'foo <bar@example.org>'
check_addr 'xxxxxxxxx a"test"@example.org' "xxxxxxxxx <atest@example.org>"
|
