]> diplodocus.org Git - nmh/blobdiff - test/inc/test-pop
projects / nmh / blobdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | inline | side by side
Replace getcpy() with mh_xstrdup().
[nmh] / test / inc / test-pop
diff --git a/test/inc/test-pop b/test/inc/test-pop
index 2bb0bb4d40a3493c8d7e8ae054b7199320472b55..0ae80293d1ca307eaa8be86fa641ab61f0f22f10 100755 (executable)
--- a/test/inc/test-pop
+++ b/test/inc/test-pop
@@ -24,7 +24,8 @@ setup_test
 
 TESTUSER=testuser
 TESTPASS=testuserpass
 
 TESTUSER=testuser
 TESTPASS=testuserpass
-testport=65413
+arith_eval 64001 + $$ % 1000
+testport=$arith_val
 
 HOME="${MH_TEST_DIR}"; export HOME
 netrc="${HOME}/.netrc"
 
 HOME="${MH_TEST_DIR}"; export HOME
 netrc="${HOME}/.netrc"
@@ -37,7 +38,7 @@ actual=$MH_TEST_DIR/$$.actual
 actual_err=$MH_TEST_DIR/$$.actual_err
 testmessage=$MH_TEST_DIR/testmessage
 
 actual_err=$MH_TEST_DIR/$$.actual_err
 testmessage=$MH_TEST_DIR/testmessage
 
-cat > $testmessage <<EOM
+cat > "$testmessage" <<EOM
 Received: From somewhere
 From: No Such User <nosuch@example.com>
 To: Some Other User <someother@example.com>
 Received: From somewhere
 From: No Such User <nosuch@example.com>
 To: Some Other User <someother@example.com>
@@ -49,29 +50,69 @@ Hey man, how's it going?
 Hope you're doing better.
 EOM
 
 Hope you're doing better.
 EOM
 
-pid=`"${MH_OBJ_DIR}/test/fakepop" "$testmessage" "$testport" \
-                       "$TESTUSER" "$TESTPASS"`
+cat > "${testmessage}.2" <<EOM
+Received: From somewhere
+From: A Real User <real@example.com>
+To: Some Other User <someother@example.com>
+Subject: Anything new?
+Date: Monday, 18 Dec 2006 14:13:14 -0500
+
+What's been happening at your place?
+EOM
+
+cat > "${testmessage}.3" <<EOM
+Received: From somewhere
+From: Nathan Explosion <nathan@dethklok.com>
+To: Some Other User <someother@example.com>
+Subject: Brutal
+Date: Tuesday, 19 Dec 2006 4:15:16 -0500
+
+Dude, nmh is totally brutal.
+EOM
+
+pid=`"${MH_OBJ_DIR}/test/fakepop" "$testport" \
+                       "$TESTUSER" "$TESTPASS" "$testmessage"`
 
 run_test "inc -user ${TESTUSER} -host 127.0.0.1 -port $testport -width 80" \
        "Incorporating new mail into inbox...
 
 
 run_test "inc -user ${TESTUSER} -host 127.0.0.1 -port $testport -width 80" \
        "Incorporating new mail into inbox...
 
-  11+ 12/17 No Such User       Hello<<Hey man, how's it going? . Hope you're do"
-check $testmessage `mhpath +inbox 11` 'keep first'
+  11+ 12/17 No Such User       Hello<<Hey man, how's it going? . Hope you're do\
+i"
+check "$testmessage" `mhpath +inbox 11` 'keep first'
+
+# Check multiple messages at once
+
+pid=`"${MH_OBJ_DIR}/test/fakepop" "$testport" \
+                       "$TESTUSER" "$TESTPASS" "$testmessage" \
+                       "${testmessage}.2" "${testmessage}.3"`
+
+run_test "inc -user ${TESTUSER} -host 127.0.0.1 -port $testport -width 80" \
+       "Incorporating new mail into inbox...
+
+  11+ 12/17 No Such User       Hello<<Hey man, how's it going? . Hope you're doi
+  12  12/18 A Real User        Anything new?<<What's been happening at your plac
+  13  12/19 Nathan Explosion   Brutal<<Dude, nmh is totally brutal. >>"
+
+check "$testmessage" `mhpath +inbox 11` 'keep first'
+check "${testmessage}.2" `mhpath +inbox 12`
+check "${testmessage}.3" `mhpath +inbox 13`
 
 # check -pack
 
 # check -pack
-pid=`"${MH_OBJ_DIR}/test/fakepop" "$testmessage" "$testport" \
-                       "$TESTUSER" "$TESTPASS"`
+pid=`"${MH_OBJ_DIR}/test/fakepop" "$testport" \
+                       "$TESTUSER" "$TESTPASS" "$testmessage"`
 
 touch "$MH_TEST_DIR/inc.mbox"
 run_test "inc -user ${TESTUSER} -host 127.0.0.1 -port $testport -width 80 \
           -pack $MH_TEST_DIR/inc.mbox" \
        "Incorporating new mail into (null)...
 
 
 touch "$MH_TEST_DIR/inc.mbox"
 run_test "inc -user ${TESTUSER} -host 127.0.0.1 -port $testport -width 80 \
           -pack $MH_TEST_DIR/inc.mbox" \
        "Incorporating new mail into (null)...
 
-   1  12/17 No Such User       Hello<<Hey man, how's it going? . Hope you're do"
-run_test "inc -file $MH_TEST_DIR/inc.mbox -truncate" \
+   1  12/17 No Such User       Hello<<Hey man, how's it going? . Hope you're do\
+i"
+run_test "inc -file $MH_TEST_DIR/inc.mbox -truncate -width 80" \
        "Incorporating new mail into inbox...
 
        "Incorporating new mail into inbox...
 
-  11+ 12/17 No Such User       Hello<<Hey man, how's it going? . Hope you're do"
+  11+ 12/17 No Such User       Hello<<Hey man, how's it going? . Hope you're do\
+i"
 
 check $testmessage `mhpath +inbox 11` 'keep first'
 rm -f "$MH_TEST_DIR/inc.mbox" "$MH_TEST_DIR/.inc.map" "$netrc"
 
 check $testmessage `mhpath +inbox 11` 'keep first'
 rm -f "$MH_TEST_DIR/inc.mbox" "$MH_TEST_DIR/.inc.map" "$netrc"
@@ -87,19 +128,19 @@ echo "default login ${TESTUSER} password ${TESTPASS}" > "$netrc"
 chmod 600 "$netrc"
 echo "credentials: file:${netrc}" >>$MH
 
 chmod 600 "$netrc"
 echo "credentials: file:${netrc}" >>$MH
 
-pid=`"${MH_OBJ_DIR}/test/fakepop" "$testmessage" "$testport" \
-                       "$TESTUSER" "$TESTPASS"`
+pid=`"${MH_OBJ_DIR}/test/fakepop" "$testport" \
+                       "$TESTUSER" "$TESTPASS" "$testmessage"`
 
 touch "$MH_TEST_DIR/inc.mbox"
 run_test "inc -user ${TESTUSER} -host 127.0.0.1 -port $testport -width 65 \
           -pack $MH_TEST_DIR/inc.mbox" \
        "Incorporating new mail into (null)...
 
 
 touch "$MH_TEST_DIR/inc.mbox"
 run_test "inc -user ${TESTUSER} -host 127.0.0.1 -port $testport -width 65 \
           -pack $MH_TEST_DIR/inc.mbox" \
        "Incorporating new mail into (null)...
 
-   1  12/17 No Such User       Hello<<Hey man, how's it going? ." </dev/null
+   1  12/17 No Such User       Hello<<Hey man, how's it going? . " </dev/null
 run_test "inc -file $MH_TEST_DIR/inc.mbox -truncate -width 65" \
        "Incorporating new mail into inbox...
 
 run_test "inc -file $MH_TEST_DIR/inc.mbox -truncate -width 65" \
        "Incorporating new mail into inbox...
 
-  11+ 12/17 No Such User       Hello<<Hey man, how's it going? ." </dev/null
+  11+ 12/17 No Such User       Hello<<Hey man, how's it going? . " </dev/null
 
 check $testmessage `mhpath +inbox 11`
 rm -f "$MH_TEST_DIR/inc.mbox" "$MH_TEST_DIR/.inc.map" "$netrc"
 
 check $testmessage `mhpath +inbox 11`
 rm -f "$MH_TEST_DIR/inc.mbox" "$MH_TEST_DIR/.inc.map" "$netrc"
Fork of https://git.savannah.nongnu.org/cgit/nmh.git