2 ######################################################
6 ######################################################
9 # -normalize, -nonormalize
13 if test -z "${MH_OBJ_DIR}"; then
14 srcdir=`dirname $0`/../..
15 MH_OBJ_DIR=`cd $srcdir && pwd`; export MH_OBJ_DIR
18 . "$MH_OBJ_DIR/test/common.sh"
22 expected=$MH_TEST_DIR/$$.expected
23 expected_err=$MH_TEST_DIR/$$.expected_err
24 actual=$MH_TEST_DIR/$$.actual
25 actual_err=$MH_TEST_DIR/$$.actual_err
30 Usage: ali [switches] aliases ...
40 ali -help >$actual 2>&1
41 check $expected $actual
46 * ) echo "$0: ali -v generated unexpected output" 1>&2
47 failed=`expr ${failed:-0} + 1`;;
50 # check unknown option
51 run_test 'ali -nonexistent' 'ali: -nonexistent unknown'
53 # check with no arguments and no AliasFile profile component
56 # check with nonexistent alias file
57 run_test 'ali -alias nonexistent' \
58 "ali: aliasing error in nonexistent - unable to read 'nonexistent'"
60 cat >"${MH_TEST_DIR}/Mail/aliases" <<EOF
62 rush: geddy, alex, neil
63 geddy: geddy@example.com
64 alex: alex@example.com
65 neil: neil@example.com
69 run_test "ali -alias ${MH_TEST_DIR}/Mail/aliases" \
71 rush: geddy@example.com, alex@example.com, neil@example.com
72 geddy: geddy@example.com
73 alex: alex@example.com
74 neil: neil@example.com'
76 # check for a specific alias
77 run_test "ali -alias ${MH_TEST_DIR}/Mail/aliases rush" \
78 'geddy@example.com, alex@example.com, neil@example.com'
80 # check for a specific alias that doesn't exist
81 run_test "ali -alias ${MH_TEST_DIR}/Mail/aliases nonexistent" \
85 run_test "ali -alias ${MH_TEST_DIR}/Mail/aliases -list" \
87 rush: geddy@example.com
90 geddy: geddy@example.com
91 alex: alex@example.com
92 neil: neil@example.com'
94 # check -nolist, which is the default
95 run_test "ali -alias ${MH_TEST_DIR}/Mail/aliases -list -nolist" \
97 rush: geddy@example.com, alex@example.com, neil@example.com
98 geddy: geddy@example.com
99 alex: alex@example.com
100 neil: neil@example.com'
103 run_test "ali -alias ${MH_TEST_DIR}/Mail/aliases -user geddy@example.com" \
108 "ali -alias ${MH_TEST_DIR}/Mail/aliases -user -nouser geddy@example.com" \
111 # check expansion of first address of blind list [Bug #15604]
112 cat >"${MH_TEST_DIR}/Mail/aliases" <<EOF
113 rush: Rush: geddy, alex, neil
114 geddy: geddy@example.com
115 alex: alex@example.com
116 neil: neil@example.com
119 run_test "ali -alias ${MH_TEST_DIR}/Mail/aliases rush" \
120 'Rush: geddy@example.com, alex@example.com, neil@example.com'
122 # check that aliases followed by ; are not expanded [Bug #15604]
123 cat >"${MH_TEST_DIR}/Mail/aliases" <<EOF
124 rush: Rush: geddy, alex, neil;
125 geddy: geddy@example.com
126 alex: alex@example.com
127 neil: neil@example.com
130 run_test "ali -alias ${MH_TEST_DIR}/Mail/aliases rush" \
131 'Rush: geddy@example.com, alex@example.com, neil;'