mirror of https://github.com/leahneukirchen/mblaze
You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
52 lines
2.3 KiB
Bash
52 lines
2.3 KiB
Bash
#!/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>"
|