2 ######################################################
4 # Test long header line handling (998 chars)
6 ######################################################
10 expected=$MH_TEST_DIR/$$.expected
11 actual=$MH_TEST_DIR/$$.actual
15 awk -v len="$len" 'BEGIN {
16 prefix = "Subject: " len " "
20 print prefix substr(s, length(prefix) + 1)
25 awk '{printf($0 "\r\n")}'
29 # Ensure lines won't get folded
30 echo "mhl: -width 2000" >> "$MMH/profile"
31 trap 'printf "/^mhl:/d\nw\nq\n" | ed - "$MMH/profile"' 0 1 2 15
36 # Write message with long header line
38 msgnum=$(basename $msgfile)
43 Date: Sun, 15 Jul 2018 12:26:59 +0200
49 cat > $expected <<-EOF
50 Date: Sun, 15 Jul 2018 12:26:59 +0200
59 COLUMNS=2000 show $msgnum > $actual 2>&1
60 diff -u $expected $actual
65 # Write message with long header line
67 msgnum=$(basename $msgfile)
72 Date: Sun, 15 Jul 2018 12:26:59 +0200
78 cat > $expected <<-EOF
79 Date: Sun, 15 Jul 2018 12:26:59 +0200
88 COLUMNS=2000 show $msgnum > $actual 2>&1
89 diff -u $expected $actual
94 # Write message with long header line
96 msgnum=$(basename $msgfile)
100 `genlongsubject $len`
101 Date: Sun, 15 Jul 2018 12:26:59 +0200
107 cat > $expected <<-EOF
108 Date: Sun, 15 Jul 2018 12:26:59 +0200
109 From: foo@example.edu
111 Subject: 999 xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
117 COLUMNS=2000 show $msgnum > $actual 2>&1
118 diff -u $expected $actual
127 # Write message with long header line
129 msgnum=$(basename $msgfile)
130 cat > $msgfile <<-EOF
131 From: foo@example.edu
133 `genlongsubject $len | addcr`
134 Date: Sun, 15 Jul 2018 12:26:59 +0200
140 cat > $expected <<-EOF
141 Date: Sun, 15 Jul 2018 12:26:59 +0200
142 From: foo@example.edu
144 `genlongsubject $len`
150 COLUMNS=2000 show $msgnum > $actual 2>&1
151 diff -u $expected $actual
156 # Write message with long header line
158 msgnum=$(basename $msgfile)
159 cat > $msgfile <<-EOF
160 From: foo@example.edu
162 `genlongsubject $len | addcr`
163 Date: Sun, 15 Jul 2018 12:26:59 +0200
169 cat > $expected <<-EOF
170 Date: Sun, 15 Jul 2018 12:26:59 +0200
171 From: foo@example.edu
173 Subject: 999 xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
179 COLUMNS=2000 show $msgnum > $actual 2>&1
180 diff -u $expected $actual