update TESTPAT.
[elisp/flim.git] / TESTPAT
1 ;;; -*- mode: emacs-lisp; coding: iso-2022-7bit-ss2 -*-
2 ;----------------------------------------------------------------------------
3 ;-------- This sequece of HYPHEN-MINUS is 76 bytes long. --------------------
4 ;----------------------------------------------------------------------------
5
6 ;;; options:
7 ;;encode-sticked-comment-as-atom    ; violate the policy preserving structures
8 ;;ignore-75bytes-limit              ; violate RFC2047
9 ;;ignore-76bytes-limit              ; violate RFC2047
10 ;;permit-sticked-comment            ; violate RFC2047
11 ;;permit-sticked-special            ; violate RFC2047
12 ;;separate-sticked-comment          ; violate the policy preserving absence of space
13 ;;separate-sticked-special          ; violate the policy preserving absence of space
14 ;;zero-characters-encoded-word-hack ; violate common sense (very tricky)
15 ;;embedded-encoded-word             ; violate character sequence semantics
16 ;;separate-sticked-tokens-for-fold  ; violate the policy preserving absence of space
17 ;;encode-long-ascii-string-for-fold ; violate the policy preserving US-ASCII string
18 ;;divide-atom-for-fold              ; violate tne policy preserving absence of space
19
20 ;;; test driver
21
22 (defvar target 'doodle)
23 (cond
24  ((eq target 'flim) ; FLIM or FLAM
25   (require 'mime)
26   (require 'ew-line)
27
28   (if (< max-specpdl-size 1000)
29     (setq max-specpdl-size 1000))
30
31   (defun decode-test (src dsts &rest opts)
32     (setq src (ew-crlf-to-lf src))
33     (setq eword-lexical-analyze-cache nil)
34     (setq eword-decode-sticked-encoded-word
35       (or (memq 'permit-sticked-comment opts)
36           (memq 'permit-sticked-special opts)))
37     (setq eword-decode-quoted-encoded-word nil)
38     (with-temp-buffer
39       (insert src "\n" mail-header-separator)
40       (eword-decode-header 'us-ascii mail-header-separator)
41       (goto-char (point-min))
42       (std11-narrow-to-header mail-header-separator)
43       (std11-field-end)
44       (let ((result (ew-lf-to-crlf
45                      (std11-unfold-string
46                       (buffer-substring-no-properties (point-min) (point))))))
47         (if (member result dsts) t result))))
48
49   (defun encode-test (src dsts &rest opts)
50     (setq eword-lexical-analyze-cache nil)
51     (setq eword-decode-sticked-encoded-word nil)
52     (setq eword-decode-quoted-encoded-word nil)
53     (with-temp-buffer
54       (insert src "\n" mail-header-separator)
55       (goto-char (point-min))
56       (eword-encode-header 'us-ascii)
57       (goto-char (point-min))
58       (std11-narrow-to-header mail-header-separator)
59       (std11-field-end)
60       (let ((result (ew-lf-to-crlf (buffer-substring-no-properties (point-min) (point)))))
61         (if (member result dsts) t result)))))
62
63  ((eq target 'doodle) ; DOODLE
64   (require 'ew-dec)
65   (require 'ew-line)
66
67   (defun decode-test (src dsts &rest opts)
68     (setq ew-decode-field-cache-buf nil)
69     (let ((ew-decode-sticked-encoded-word nil)
70           (ew-decode-quoted-encoded-word nil)
71           (ew-ignore-75bytes-limit (memq 'ignore-75bytes-limit opts))
72           (ew-ignore-76bytes-limit (memq 'ignore-76bytes-limit opts))
73           (ew-permit-sticked-comment (memq 'permit-sticked-comment opts))
74           (ew-permit-sticked-special (memq 'permit-sticked-special opts))
75           (ew-permit-null-encoded-text nil))
76       (string-match "\\`[^:]*:" src)
77       (let* ((field-name (substring src
78                                     (match-beginning 0)
79                                     (1- (match-end 0))))
80              (field-body (substring src (match-end 0)))
81              (result (ew-crlf-unfold
82                       (concat field-name ":"
83                               (ew-decode-field field-name field-body)))))
84         (if (member result dsts) t result))))
85
86   (defun encode-test (src dsts &rest opts)
87     nil)
88   )
89 )
90
91 ;;;
92
93 (setq decode-succ-count 0)
94 (setq decode-all-count 0)
95 (defun decode (src dsts &rest opts)
96   (if (stringp dsts) (setq dsts (list dsts)))
97   (setq decode-all-count (1+ decode-all-count))
98   (let ((res (condition-case nil
99                (apply 'decode-test src dsts opts)
100                (error nil))))
101     (if (eq res t)
102       (progn
103         (setq decode-succ-count (1+ decode-succ-count))
104         (insert "\n'dsucc"))
105       (insert (format "\n%S\n'dfail" res)))
106     res))
107
108 (setq encode-succ-count 0)
109 (setq encode-all-count 0)
110 (defun encode (src dsts &rest opts)
111   (if (stringp dsts) (setq dsts (list dsts)))
112   (setq encode-all-count (1+ encode-all-count))
113   (let ((res (condition-case nil
114                (apply 'encode-test src dsts opts)
115                (error nil))))
116     (if (eq res t)
117       (progn
118         (setq encode-succ-count (1+ encode-succ-count))
119         (insert "\n'esucc"))
120       (insert (format "\n%S\n'efail" res)))
121     res))
122
123 (defun report ()
124   (let ((report (format "Decode: %d/%d  Encode: %d/%d  Total: %d/%d"
125                   decode-succ-count decode-all-count
126                   encode-succ-count encode-all-count
127                   (+ decode-succ-count encode-succ-count)
128                   (+ decode-all-count encode-all-count))))
129     (if noninteractive
130       (princ (concat report "\n"))
131       (insert "\n\"" report "\""))))
132
133 ;;;start-test
134
135 ;;; Section 1: Decoding examples from RFC2047
136
137 (decode
138 "From: =?US-ASCII?Q?Keith_Moore?= <moore@cs.utk.edu>"
139 "From: Keith Moore <moore@cs.utk.edu>")
140
141 (decode
142 "To: =?ISO-8859-1?Q?Keld_J=F8rn_Simonsen?= <keld@dkuug.dk>"
143 "To: Keld J\e.A\eNxrn Simonsen <keld@dkuug.dk>")\e*B
144
145 (decode
146 "CC: =?ISO-8859-1?Q?Andr=E9?= Pirard <PIRARD@vm1.ulg.ac.be>"
147 "CC: Andr\e.A\eNi Pirard <PIRARD@vm1.ulg.ac.be>")\e*B
148
149 (decode
150 "Subject: =?ISO-8859-1?B?SWYgeW91IGNhbiByZWFkIHRoaXMgeW8=?=\r
151  =?ISO-8859-2?B?dSB1bmRlcnN0YW5kIHRoZSBleGFtcGxlLg==?="
152 "Subject: If you can read this you understand the example.")
153
154 (decode
155 "From: =?ISO-8859-1?Q?Olle_J=E4rnefors?= <ojarnef@admin.kth.se>"
156 "From: Olle J\e.A\eNdrnefors <ojarnef@admin.kth.se>")\e*B
157
158 (decode
159 "From: =?ISO-8859-1?Q?Patrik_F=E4ltstr=F6m?= <paf@nada.kth.se>"
160 "From: Patrik F\e.A\eNdltstr\eNvm <paf@nada.kth.se>")\e*B
161
162 (decode
163 "From: Nathaniel Borenstein <nsb@thumper.bellcore.com>\r
164 \t(=?iso-8859-8?b?7eXs+SDv4SDp7Oj08A==?=)"
165 "From: Nathaniel Borenstein <nsb@thumper.bellcore.com>\t(\e.H\eNm\eNe\eNl\eNy \eNo\eNa \eNi\eNl\eNh\eNt\eNp)")\e*B
166
167 (decode
168 "From: foo@bar.baz (=?ISO-8859-1?Q?a?=)"
169 "From: foo@bar.baz (a)")
170
171 (decode
172 "From: foo@bar.baz (=?ISO-8859-1?Q?a?= b)"
173 "From: foo@bar.baz (a b)")
174
175 (decode
176 "From: foo@bar.baz (=?ISO-8859-1?Q?a?= =?ISO-8859-1?Q?b?=)"
177 "From: foo@bar.baz (ab)")
178
179 (decode
180 "From: foo@bar.baz (=?ISO-8859-1?Q?a?=  =?ISO-8859-1?Q?b?=)"
181 "From: foo@bar.baz (ab)")
182
183 (decode
184 "From: foo@bar.baz (=?ISO-8859-1?Q?a?=\r
185 \t=?ISO-8859-1?Q?b?=)"
186 "From: foo@bar.baz (ab)")
187
188 (decode
189 "From: foo@bar.baz (=?ISO-8859-1?Q?a_b?=)"
190 "From: foo@bar.baz (a b)")
191
192 (decode
193 "From: foo@bar.baz (=?ISO-8859-1?Q?a?= =?ISO-8859-2?Q?_b?=)"
194 "From: foo@bar.baz (a b)")
195
196 (decode
197 "Subject: (=?ISO-8859-1?Q?a?=)"
198 "Subject: (=?ISO-8859-1?Q?a?=)")
199
200 (decode
201 "Subject: (=?ISO-8859-1?Q?a?= b)"
202 "Subject: (=?ISO-8859-1?Q?a?= b)")
203
204 (decode
205 "Subject: (=?ISO-8859-1?Q?a?= =?ISO-8859-1?Q?b?=)"
206 "Subject: (=?ISO-8859-1?Q?a?= =?ISO-8859-1?Q?b?=)")
207
208 (decode
209 "Subject: (=?ISO-8859-1?Q?a?=  =?ISO-8859-1?Q?b?=)"
210 "Subject: (=?ISO-8859-1?Q?a?=  =?ISO-8859-1?Q?b?=)")
211
212 (decode
213 "Subject: (=?ISO-8859-1?Q?a?=\r
214 \t=?ISO-8859-1?Q?b?=)"
215 "Subject: (=?ISO-8859-1?Q?a?=\t=?ISO-8859-1?Q?b?=)")
216
217 (decode
218 "Subject: (=?ISO-8859-1?Q?a_b?=)"
219 "Subject: (=?ISO-8859-1?Q?a_b?=)")
220
221 (decode
222 "Subject: (=?ISO-8859-1?Q?a?= =?ISO-8859-2?Q?_b?=)"
223 "Subject: (=?ISO-8859-1?Q?a?= =?ISO-8859-2?Q?_b?=)")
224
225 ;;; Section 2: Decoding proper inputs.
226
227 (decode
228 "From: =?ISO-2022-JP?B?GyRCJCIbKEI=?= <akr@jaist.ac.jp>"
229 "From: \e$B$"\e(B <akr@jaist.ac.jp>")
230
231 (decode
232 "From: =?ISO-2022-JP?b?GyRCJCIbKEI=?= <akr@jaist.ac.jp>"
233 "From: \e$B$"\e(B <akr@jaist.ac.jp>")
234
235 (decode
236 "From: =?iso-2022-jp?B?GyRCJCIbKEI=?= <akr@jaist.ac.jp>"
237 "From: \e$B$"\e(B <akr@jaist.ac.jp>")
238
239 (decode
240 "From: =?iSo-2022-jP?B?GyRCJCIbKEI=?= <akr@jaist.ac.jp>"
241 "From: \e$B$"\e(B <akr@jaist.ac.jp>")
242
243 (decode
244 "From: =?ISO-2022-JP?Q?=1B=24B=24=22=1B=28B?= <akr@jaist.ac.jp>"
245 "From: \e$B$"\e(B <akr@jaist.ac.jp>")
246
247 (decode
248 "From: =?ISO-2022-JP?q?=1B=24B=24=22=1B=28B?= <akr@jaist.ac.jp>"
249 "From: \e$B$"\e(B <akr@jaist.ac.jp>")
250
251 (decode
252 "From: =?iso-2022-jp?Q?=1B=24B=24=22=1B=28B?= <akr@jaist.ac.jp>"
253 "From: \e$B$"\e(B <akr@jaist.ac.jp>")
254
255 (decode
256 "From: =?iSo-2022-jP?Q?=1B=24B=24=22=1B=28B?= <akr@jaist.ac.jp>"
257 "From: \e$B$"\e(B <akr@jaist.ac.jp>")
258
259 (decode
260 "From: =?ISO-2022-JP?B?GyRCJCIbKEI=?= =?ISO-2022-JP?B?GyRCJCQbKEI=?=\r
261  <akr@jaist.ac.jp>"
262 "From: \e$B$"$$\e(B <akr@jaist.ac.jp>")
263
264 (decode
265 "From: =?ISO-2022-JP?B?GyRCJCIbKEI=?=\r
266  =?ISO-2022-JP?B?GyRCJCQbKEI=?=\r
267  <akr@jaist.ac.jp>"
268 "From: \e$B$"$$\e(B <akr@jaist.ac.jp>")
269
270 (decode
271 "From: =?ISO-2022-JP?B?GyRCJCIbKEI=?=\r
272 \t=?ISO-2022-JP?B?GyRCJCQbKEI=?=\r
273  <akr@jaist.ac.jp>"
274 "From: \e$B$"$$\e(B <akr@jaist.ac.jp>")
275
276 (decode
277 "From: =?ISO-2022-JP?B?GyRCJCIbKEI=?= \"ja \\\"a\\\"\" <akr@jaist.ac.jp>"
278 "From: \e$B$"\e(B \"ja \\\"a\\\"\" <akr@jaist.ac.jp>")
279
280 (decode
281 "From: =?US-ASCII?Q?=2C?= <akr@jaist.ac.jp>"
282 "From: \",\" <akr@jaist.ac.jp>")
283
284 (decode
285 "From: =?ISO-2022-JP?B?GyRCJCIbKEI=?= =?US-ASCII?Q?=2E?= <akr@jaist.ac.jp>"
286 "From: \"\e$B$"\e(B.\" <akr@jaist.ac.jp>")
287
288 (decode
289 "From: =?US-ASCII?Q?=2E?= =?ISO-2022-JP?B?GyRCJCIbKEI=?= <akr@jaist.ac.jp>"
290 "From: \".\e$B$"\e(B\" <akr@jaist.ac.jp>")
291
292 (decode
293 "From: akr@jaist.ac.jp (=?ISO-2022-JP?B?GyRCJCIbKEI=?=\r
294  =?ISO-2022-JP?B?GyhC?=(=?ISO-2022-JP?B?GyRCJCQbKEI=?=\r
295  =?ISO-2022-JP?B?GyhC?=)=?ISO-2022-JP?B?GyRCJCYbKEI=?=)"
296 "From: akr@jaist.ac.jp (\e$B$"\e(B(\e$B$$\e(B)\e$B$&\e(B)")
297
298 (decode
299 "From: a=?ISO-2022-JP?B?GyRCJCIbKEI=?= <akr@jaist.ac.jp>"
300 "From: a=?ISO-2022-JP?B?GyRCJCIbKEI=?= <akr@jaist.ac.jp>")
301
302 (decode
303 "From: =?ISO-2022-JP?B?GyRCJCIbKEI=?=b <akr@jaist.ac.jp>"
304 "From: =?ISO-2022-JP?B?GyRCJCIbKEI=?=b <akr@jaist.ac.jp>")
305
306 (decode
307 "From: a=?ISO-2022-JP?B?GyRCJCIbKEI=?=b <akr@jaist.ac.jp>"
308 "From: a=?ISO-2022-JP?B?GyRCJCIbKEI=?=b <akr@jaist.ac.jp>")
309
310 (decode
311 "From: \"=?ISO-2022-JP?B?GyRCJCIbKEI=?=\" <akr@jaist.ac.jp>"
312 "From: \"=?ISO-2022-JP?B?GyRCJCIbKEI=?=\" <akr@jaist.ac.jp>")
313
314 (decode
315 "From: \"\\\"\\\\\" =?ISO-2022-JP?B?GyRCJCIbKEI=?= \"\\\"\\\\\" <akr@jaist.ac.jp>"
316 "From: \"\\\"\\\\\" \e$B$"\e(B \"\\\"\\\\\" <akr@jaist.ac.jp>")
317
318 (decode
319 "From: < =?ISO-2022-JP?B?GyRCJCIbKEI=?= @jaist.ac.jp>"
320 "From: < =?ISO-2022-JP?B?GyRCJCIbKEI=?= @jaist.ac.jp>")
321
322 (decode
323 "From: =?ISO-2022-JP?Q?=1B$BAA=1B(B?= ) <akr@jaist.ac.jp>"
324 "From: =?ISO-2022-JP?Q?=1B$BAA=1B(B?= ) <akr@jaist.ac.jp>")
325
326 (decode
327 "From: (=?US-ASCII?Q?(?=)foo@bar.baz(=?US-ASCII?Q?))baz@bar.foo(?=)"
328 "From: (=?US-ASCII?Q?(?=)foo@bar.baz(=?US-ASCII?Q?))baz@bar.foo(?=)")
329
330 (decode
331 "From: =?US-ASCII?Q?=22?= <akr@jaist.ac.jp>"
332 "From: \"\\\"\" <akr@jaist.ac.jp>")
333
334 (decode
335 "From: =?ISO-2022-JP?B?GyRCJCIbKEIoGyRCJCIbKEIp?= <akr@jaist.ac.jp>"
336 "From: \"\e$B$"\e(B(\e$B$"\e(B)\" <akr@jaist.ac.jp>")
337
338 (decode
339 "From: =?US-ASCII?Q?=28?= <akr@jaist.ac.jp>, =?US-ASCII?Q?=29?= <akr@jaist.ac.jp>"
340 "From: \"(\" <akr@jaist.ac.jp>, \")\" <akr@jaist.ac.jp>"
341 'ignore-76bytes-limit)
342
343 (decode
344 "From: =?ISO-2022-JP?B?YSJiGyRCJCIbKEJjXA==?= <akr@jaist.ac.jp>"
345 "From: \"a\\\"b\e$B$"\e(Bc\\\\\" <akr@jaist.ac.jp>")
346
347 (decode
348 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=?="
349 "Subject: \e$B$"\e(B")
350
351 (decode
352 "Subject: a=?ISO-2022-JP?B?GyRCJCIbKEI=?="
353 "Subject: a=?ISO-2022-JP?B?GyRCJCIbKEI=?=")
354
355 (decode
356 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=?=b"
357 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=?=b")
358
359 (decode
360 "Subject: a=?ISO-2022-JP?B?GyRCJCIbKEI=?=b"
361 "Subject: a=?ISO-2022-JP?B?GyRCJCIbKEI=?=b")
362
363 (decode
364 "Subject: (a)=?ISO-2022-JP?B?GyRCJCIbKEI=?="
365 "Subject: (a)=?ISO-2022-JP?B?GyRCJCIbKEI=?=")
366
367 (decode
368 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=?=(b)"
369 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=?=(b)")
370
371 (decode
372 "Subject: (a)=?ISO-2022-JP?B?GyRCJCIbKEI=?=(b)"
373 "Subject: (a)=?ISO-2022-JP?B?GyRCJCIbKEI=?=(b)")
374
375 (decode
376 "Subject: \"a\"=?ISO-2022-JP?B?GyRCJCIbKEI=?="
377 "Subject: \"a\"=?ISO-2022-JP?B?GyRCJCIbKEI=?=")
378
379 (decode
380 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=?=\"b\""
381 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=?=\"b\"")
382
383 (decode
384 "Subject: \"a\"=?ISO-2022-JP?B?GyRCJCIbKEI=?=\"b\""
385 "Subject: \"a\"=?ISO-2022-JP?B?GyRCJCIbKEI=?=\"b\"")
386
387 (decode
388 "Subject: \"=?ISO-2022-JP?B?GyRCJCIbKEI=?=\""
389 "Subject: \"=?ISO-2022-JP?B?GyRCJCIbKEI=?=\"")
390
391 (decode
392 "Subject: \" =?ISO-2022-JP?B?GyRCJCIbKEI=?= \""
393 "Subject: \" \e$B$"\e(B \"")
394
395 (decode
396 "Subject: (Re: =?ISO-2022-JP?B?GyRCJCIbKEI=?=)"
397 "Subject: (Re: =?ISO-2022-JP?B?GyRCJCIbKEI=?=)")
398
399 (decode
400 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=?=:"
401 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=?=:")
402
403 (decode
404 "Subject: =?ISO-2022-JP?B??="
405 "Subject: =?ISO-2022-JP?B??=")
406
407 (decode
408 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=?= a\r
409  =?ISO-2022-JP?B?GyRCJCQbKEI=?="
410 "Subject: \e$B$"\e(B a \e$B$$\e(B")
411
412 (decode
413 "Subject: =?ISO-2022-JP?B?GyRCMCQbKEIgICAgICAgICAgICAgICAgICAgICAgICAgICAg?=\r
414  =?US-ASCII?Q?____________________________________________________________?=\r
415  =?ISO-2022-JP?B?ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIBskQlJfGyhC?="
416 "Subject: \e$B0$\e(B                                                                                                                          \e$BR_\e(B")
417
418 (decode
419 "From: =?ISO-8859-1?Q?abcdefghijklmnopqrst=A1=28=29=22=5C?= <akr@jaist.ac.jp>"
420 "From: \"abcdefghijklmnopqrst\e.A\eN!()\\\"\\\\\" <akr@jaist.ac.jp>")\e*B
421
422 (decode
423 "Subject: ?= =?"
424 "Subject: ?= =?")
425
426 (decode
427 "Subject: \" =?ISO-2022-JP?B?GyRCJCIbKEI=?= \""
428 "Subject: \" \e$B$"\e(B \"")
429
430 (decode
431 "From: \"\\\\\" =?ISO-2022-JP?B?GyRCJCIbKEI=?= \"\" <akr@jaist.ac.jp>"
432 "From: \"\\\\\" \e$B$"\e(B \"\" <akr@jaist.ac.jp>")
433
434 (decode
435 "Subject: =?ISO-2022-JP?Q?=1B$B$\"=1B(B_=1B$B$\"=1B(B?="
436 "Subject: \e$B$"\e(B \e$B$"\e(B")
437
438 (decode
439 "Subject: =?ISO-2022-JP?Q?=1B$B$\"=1B(B =1B$B$\"=1B(B?="
440 "Subject: =?ISO-2022-JP?Q?=1B$B$\"=1B(B =1B$B$\"=1B(B?=")
441
442 (decode
443 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=?= a =?ISO-8859-8?Q?=E0?="
444 "Subject: \e$B$"\e(B a \e.H\eN`")\e*B
445
446 (decode
447 "Subject: =?ISO-8859-8?Q?=E0?= =?ISO-2022-JP?B?GyRCTm0bKEI=?="
448 "Subject: \e.H\eN`\e$BNm\e(B")\e*B
449
450 (decode
451 "Subject: =?ISO-8859-8?Q?=E0_?= =?ISO-2022-JP?B?GyRCTm0bKEI=?="
452 "Subject: \e.H\eN` \e$BNm\e(B")\e*B
453
454 (decode
455 "Subject: =?ISO-2022-JP-2?B?Gy5GG05DGyRCNFg/dBsoQg==?="
456 "Subject: \e.F\eNC\e$B4X?t\e(B")\e*B
457
458 (decode
459 "Subject: =?ISO-8859-7?Q?=C3?= =?ISO-2022-JP?B?GyRCNFg/dBsoQg==?="
460 "Subject: \e.F\eNC\e$B4X?t\e(B")\e*B
461
462 (decode
463 "Subject: =?Shift_JIS?B?gqA=?="
464 "Subject: \e$B$"\e(B")
465
466 (decode
467 "Subject: =?EUC-JP?B?pKI=?="
468 "Subject: \e$B$"\e(B")
469
470 (decode
471 "Subject: = =?ISO-2022-JP?B?GyRCJCIbKEI=?="
472 "Subject: = \e$B$"\e(B")
473
474 (decode
475 "Subject: =? =?ISO-2022-JP?B?GyRCJCIbKEI=?="
476 "Subject: =? \e$B$"\e(B")
477
478 (decode
479 "Subject: =?ISO-2022-JP =?ISO-2022-JP?B?GyRCJCIbKEI=?="
480 "Subject: =?ISO-2022-JP \e$B$"\e(B")
481
482 (decode
483 "Subject: =?ISO-2022-JP? =?ISO-2022-JP?B?GyRCJCIbKEI=?="
484 "Subject: =?ISO-2022-JP? \e$B$"\e(B")
485
486 (decode
487 "Subject: =?ISO-2022-JP?B =?ISO-2022-JP?B?GyRCJCIbKEI=?="
488 "Subject: =?ISO-2022-JP?B \e$B$"\e(B")
489
490 (decode
491 "Subject: =?ISO-2022-JP?B? =?ISO-2022-JP?B?GyRCJCIbKEI=?="
492 "Subject: =?ISO-2022-JP?B? \e$B$"\e(B")
493
494 (decode
495 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI =?ISO-2022-JP?B?GyRCJCIbKEI=?="
496 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI \e$B$"\e(B")
497
498 (decode
499 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI= =?ISO-2022-JP?B?GyRCJCIbKEI=?="
500 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI= \e$B$"\e(B")
501
502 (decode
503 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=? =?ISO-2022-JP?B?GyRCJCIbKEI=?="
504 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=? \e$B$"\e(B")
505
506 (decode
507 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=?= =?ISO-2022-JP?B?GyRCJCIbKEI=?="
508 "Subject: \e$B$"$"\e(B")
509
510 (decode
511 "Subject: ==?ISO-2022-JP?B?GyRCJCIbKEI=?="
512 "Subject: ==?ISO-2022-JP?B?GyRCJCIbKEI=?=")
513
514 (decode
515 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=?=="
516 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=?==")
517
518 (decode
519 "From: akr@jaist.ac.jp (\\=?ISO-2022-JP?B?GyRCJCIbKEI=?=)"
520 "From: akr@jaist.ac.jp (\\=?ISO-2022-JP?B?GyRCJCIbKEI=?=)")
521
522 (decode
523 "=?ISO-2022-JP?B?GyRCJCIbKEI=?=: test"
524 "=?ISO-2022-JP?B?GyRCJCIbKEI=?=: test")
525
526 (decode
527 "=?ISO-2022-JP?B?GyRCJCIbKEI=?=: test"
528 "=?ISO-2022-JP?B?GyRCJCIbKEI=?=: test"
529 'permit-sticked-special)
530
531 ;;; Section 3: Decoding melancholic inputs.
532
533 (decode
534 "From:=?ISO-2022-JP?B?GyRCJCIbKEI=?= <akr@jaist.ac.jp>"
535 "From:\e$B$"\e(B <akr@jaist.ac.jp>")
536
537 (decode
538 "From: akr@jaist.ac.jp\r
539  (=?ISO-2022-JP?B?GyRCJCIbKEI=?=\\a=?ISO-2022-JP?B?GyRCJCQbKEI=?=)"
540 "From: akr@jaist.ac.jp (\e$B$"\e(B\\a\e$B$$\e(B)")
541
542 (decode
543 "From: (a)=?ISO-2022-JP?B?GyRCJCIbKEI=?= <akr@jaist.ac.jp>"
544 "From: (a)=?ISO-2022-JP?B?GyRCJCIbKEI=?= <akr@jaist.ac.jp>")
545
546 (decode
547 "From: =?ISO-2022-JP?B?GyRCJCIbKEI=?=(b) <akr@jaist.ac.jp>"
548 "From: =?ISO-2022-JP?B?GyRCJCIbKEI=?=(b) <akr@jaist.ac.jp>")
549
550 (decode
551 "From: (a)=?ISO-2022-JP?B?GyRCJCIbKEI=?=(b) <akr@jaist.ac.jp>"
552 "From: (a)=?ISO-2022-JP?B?GyRCJCIbKEI=?=(b) <akr@jaist.ac.jp>")
553
554 (decode
555 "From: (a)=?ISO-2022-JP?B?GyRCJCIbKEI=?= <akr@jaist.ac.jp>"
556 "From: (a)\e$B$"\e(B <akr@jaist.ac.jp>"
557 'permit-sticked-comment)
558
559 (decode
560 "From: =?ISO-2022-JP?B?GyRCJCIbKEI=?=(b) <akr@jaist.ac.jp>"
561 "From: \e$B$"\e(B(b) <akr@jaist.ac.jp>"
562 'permit-sticked-comment)
563
564 (decode
565 "From: (a)=?ISO-2022-JP?B?GyRCJCIbKEI=?=(b) <akr@jaist.ac.jp>"
566 "From: (a)\e$B$"\e(B(b) <akr@jaist.ac.jp>"
567 'permit-sticked-comment)
568
569 (decode
570 "From: \"a\"=?ISO-2022-JP?B?GyRCJCIbKEI=?= <akr@jaist.ac.jp>"
571 "From: \"a\"=?ISO-2022-JP?B?GyRCJCIbKEI=?= <akr@jaist.ac.jp>")
572
573 (decode
574 "From: =?ISO-2022-JP?B?GyRCJCIbKEI=?=\"b\" <akr@jaist.ac.jp>"
575 "From: =?ISO-2022-JP?B?GyRCJCIbKEI=?=\"b\" <akr@jaist.ac.jp>")
576
577 (decode
578 "From: \"a\"=?ISO-2022-JP?B?GyRCJCIbKEI=?=\"b\" <akr@jaist.ac.jp>"
579 "From: \"a\"=?ISO-2022-JP?B?GyRCJCIbKEI=?=\"b\" <akr@jaist.ac.jp>")
580
581 (decode
582 "From: =?ISO-2022-JP?B?GyRCJCIbKEI=?=(=?ISO-2022-JP?B?GyRCJCIbKEI=?=)\r
583  <akr@jaist.ac.jp>"
584 "From: \e$B$"\e(B(\e$B$"\e(B) <akr@jaist.ac.jp>"
585 'permit-sticked-comment)
586
587 (decode
588 "To: =?ISO-2022-JP?B?GyRCJCIbKEI=?=<akr@jaist.ac.jp>"
589 "To: =?ISO-2022-JP?B?GyRCJCIbKEI=?=<akr@jaist.ac.jp>")
590
591 (decode
592 "To: =?ISO-2022-JP?B?GyRCJCIbKEI=?=<akr@jaist.ac.jp>"
593 "To: \e$B$"\e(B<akr@jaist.ac.jp>"
594 'permit-sticked-special)
595
596 (decode
597 "To: <akr@jaist.ac.jp>,=?ISO-2022-JP?B?GyRCJCIbKEI=?=<akr@jaist.ac.jp>"
598 "To: <akr@jaist.ac.jp>,=?ISO-2022-JP?B?GyRCJCIbKEI=?=<akr@jaist.ac.jp>")
599
600 (decode
601 "To: <akr@jaist.ac.jp>,=?ISO-2022-JP?B?GyRCJCIbKEI=?=<akr@jaist.ac.jp>"
602 "To: <akr@jaist.ac.jp>,\e$B$"\e(B<akr@jaist.ac.jp>"
603 'permit-sticked-special)
604
605 (decode
606 "To: akr@jaist.ac.jp,=?ISO-2022-JP?B?GyRCJCIbKEI=?=<akr@jaist.ac.jp>"
607 "To: akr@jaist.ac.jp,=?ISO-2022-JP?B?GyRCJCIbKEI=?=<akr@jaist.ac.jp>")
608
609 (decode
610 "To: akr@jaist.ac.jp,=?ISO-2022-JP?B?GyRCJCIbKEI=?=<akr@jaist.ac.jp>"
611 "To: akr@jaist.ac.jp,\e$B$"\e(B<akr@jaist.ac.jp>"
612 'permit-sticked-special)
613
614 (decode
615 "To: =?ISO-2022-JP?B?GyRCJCIbKEI=?=:akr@jaist.ac.jp;"
616 "To: =?ISO-2022-JP?B?GyRCJCIbKEI=?=:akr@jaist.ac.jp;")
617
618 (decode
619 "To: =?ISO-2022-JP?B?GyRCJCIbKEI=?=:akr@jaist.ac.jp;"
620 "To: \e$B$"\e(B:akr@jaist.ac.jp;"
621 'permit-sticked-special)
622
623 (decode
624 "To: =?ISO-2022-JP?B?GyRCJCIbKEI=?=:=?ISO-2022-JP?B?GyRCJCQbKEI=?=<akr@jaist.ac.jp>;"
625 "To: =?ISO-2022-JP?B?GyRCJCIbKEI=?=:=?ISO-2022-JP?B?GyRCJCQbKEI=?=<akr@jaist.ac.jp>;")
626
627 (decode
628 "To: =?ISO-2022-JP?B?GyRCJCIbKEI=?=:=?ISO-2022-JP?B?GyRCJCQbKEI=?=<akr@jaist.ac.jp>;"
629 "To: \e$B$"\e(B:\e$B$$\e(B<akr@jaist.ac.jp>;"
630 'ignore-76bytes-limit 'permit-sticked-special)
631
632 (decode
633 "To: =?ISO-2022-JP?B?GyRCJCIbKEI=?=:=?ISO-2022-JP?B?GyRCJCQbKEI=?=<foo@bar>,=?ISO-2022-JP?B?GyRCJCYbKEI=?=<foo@bar>;,=?ISO-2022-JP?B?GyRCJCgbKEI=?=<foo@bar>"
634 "To: =?ISO-2022-JP?B?GyRCJCIbKEI=?=:=?ISO-2022-JP?B?GyRCJCQbKEI=?=<foo@bar>,=?ISO-2022-JP?B?GyRCJCYbKEI=?=<foo@bar>;,=?ISO-2022-JP?B?GyRCJCgbKEI=?=<foo@bar>")
635
636 (decode
637 "To: =?ISO-2022-JP?B?GyRCJCIbKEI=?=:=?ISO-2022-JP?B?GyRCJCQbKEI=?=<foo@bar>,=?ISO-2022-JP?B?GyRCJCYbKEI=?=<foo@bar>;,=?ISO-2022-JP?B?GyRCJCgbKEI=?=<foo@bar>"
638 "To: \e$B$"\e(B:\e$B$$\e(B<foo@bar>,\e$B$&\e(B<foo@bar>;,\e$B$(\e(B<foo@bar>"
639 'ignore-76bytes-limit 'permit-sticked-special)
640
641 (decode
642 "Subject:=?ISO-2022-JP?B?GyRCJCIbKEI=?="
643 "Subject:\e$B$"\e(B")
644
645 ;;; Section 4: Decoding invalid inputs.
646
647 (decode
648 "From: =?ISO-2022-JP?B?GyRCJCIbKEI=?==?ISO-2022-JP?B?GyRCJCQbKEI=?=\r
649  <akr@jaist.ac.jp>"
650 "From: =?ISO-2022-JP?B?GyRCJCIbKEI=?==?ISO-2022-JP?B?GyRCJCQbKEI=?= <akr@jaist.ac.jp>")
651
652 (decode
653 "From: akr@jaist.ac.jp\r
654  (=?ISO-2022-JP?B?GyRCJCIbKEI=?=a=?ISO-2022-JP?B?GyRCJCQbKEI=?=)"
655 "From: akr@jaist.ac.jp (=?ISO-2022-JP?B?GyRCJCIbKEI=?=a=?ISO-2022-JP?B?GyRCJCQbKEI=?=)")
656
657 (decode
658 "From: akr@jaist.ac.jp\r
659  (=?ISO-2022-JP?B?GyRCJCIbKEI=?=(=?ISO-2022-JP?B?GyRCJCQbKEI=?=)=?ISO-2022-JP?B?GyRCJCYbKEI=?=)"
660 "From: akr@jaist.ac.jp (=?ISO-2022-JP?B?GyRCJCIbKEI=?=(=?ISO-2022-JP?B?GyRCJCQbKEI=?=)=?ISO-2022-JP?B?GyRCJCYbKEI=?=)")
661
662 (decode
663 "From: akr@jaist.ac.jp\r
664  (=?ISO-2022-JP?B?GyRCJCIbKEI=?=(=?ISO-2022-JP?B?GyRCJCQbKEI=?=)=?ISO-2022-JP?B?GyRCJCYbKEI=?=)"
665 "From: akr@jaist.ac.jp (\e$B$"\e(B(\e$B$$\e(B)\e$B$&\e(B)"
666 'ignore-76bytes-limit)
667
668 (decode
669 "Subject: =?=?ISO-2022-JP?B?GyRCJCIbKEI=?="
670 "Subject: =?=?ISO-2022-JP?B?GyRCJCIbKEI=?=")
671
672 (decode
673 "Subject: =?ISO-2022-JP=?ISO-2022-JP?B?GyRCJCIbKEI=?="
674 "Subject: =?ISO-2022-JP=?ISO-2022-JP?B?GyRCJCIbKEI=?=")
675
676 (decode
677 "Subject: =?ISO-2022-JP?=?ISO-2022-JP?B?GyRCJCIbKEI=?="
678 "Subject: =?ISO-2022-JP?=?ISO-2022-JP?B?GyRCJCIbKEI=?=")
679
680 (decode
681 "Subject: =?ISO-2022-JP?B=?ISO-2022-JP?B?GyRCJCIbKEI=?="
682 "Subject: =?ISO-2022-JP?B=?ISO-2022-JP?B?GyRCJCIbKEI=?=")
683
684 (decode
685 "Subject: =?ISO-2022-JP?B?=?ISO-2022-JP?B?GyRCJCIbKEI=?="
686 "Subject: =?ISO-2022-JP?B?=?ISO-2022-JP?B?GyRCJCIbKEI=?=")
687
688 (decode
689 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=?ISO-2022-JP?B?GyRCJCIbKEI=?="
690 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=?ISO-2022-JP?B?GyRCJCIbKEI=?=")
691
692 (decode
693 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI==?ISO-2022-JP?B?GyRCJCIbKEI=?="
694 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI==?ISO-2022-JP?B?GyRCJCIbKEI=?=")
695
696 (decode
697 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=?=?ISO-2022-JP?B?GyRCJCIbKEI=?="
698 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=?=?ISO-2022-JP?B?GyRCJCIbKEI=?=")
699
700 (decode
701 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=?==?ISO-2022-JP?B?GyRCJCIbKEI=?="
702 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=?==?ISO-2022-JP?B?GyRCJCIbKEI=?=")
703
704 (decode
705 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI?="
706 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI?=")
707
708 (decode
709 "Subject: =?ISO-2022-JP?B?GyRCNFg-dBsoQg==?="
710 "Subject: =?ISO-2022-JP?B?GyRCNFg-dBsoQg==?=")
711
712 (decode
713 "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=?= =?= =?ISO-2022-JP?B?GyRCJCIbKEI=?="
714 "Subject: \e$B$"\e(B=?=\e$B$"\e(B")
715
716 ;;; Section 5: Encoding proper inputs.
717
718 (encode
719 "From: \e$B$"\e(B <akr@jaist.ac.jp>"
720 "From: =?ISO-2022-JP?B?GyRCJCIbKEI=?= <akr@jaist.ac.jp>")
721
722 (encode
723 "From: \e$B$"$$\e(B <akr@jaist.ac.jp>"
724 "From: =?ISO-2022-JP?B?GyRCJCIkJBsoQg==?= <akr@jaist.ac.jp>")
725
726 (encode
727 "From: \e$B$"\e(B \e$B$$\e(B <akr@jaist.ac.jp>"
728 "From: =?ISO-2022-JP?B?GyRCJCIbKEIgGyRCJCQbKEI=?= <akr@jaist.ac.jp>")
729
730 (encode
731 "From: \e.A\eN! \eN! <akr@jaist.ac.jp>"\e*B
732 "From: =?ISO-8859-1?Q?=A1_=A1?= <akr@jaist.ac.jp>")
733
734 (encode
735 "From: \"\e$B$"\e(B(\e$B$"\e(B)\" <akr@jaist.ac.jp>"
736 "From: =?ISO-2022-JP?B?GyRCJCIbKEIoGyRCJCIbKEIp?= <akr@jaist.ac.jp>")
737
738 (encode
739 "From: \e$B$"\e(B\"a\" <akr@jaist.ac.jp>"
740 "From: =?ISO-2022-JP?B?GyRCJCIbKEJh?= <akr@jaist.ac.jp>")
741
742 (encode
743 "From: \"a\"\e$B$"\e(B <akr@jaist.ac.jp>"
744 "From: =?ISO-2022-JP?B?YRskQiQiGyhC?= <akr@jaist.ac.jp>")
745
746 (encode
747 "From: \"a\\\"b\e$B$"\e(Bc\\\\\" <akr@jaist.ac.jp>"
748 "From: =?ISO-2022-JP?B?YSJiGyRCJCIbKEJjXA==?= <akr@jaist.ac.jp>")
749
750 (encode
751 "Subject: \e$B0$\e(B                                                                                                                          \e$BR_\e(B"
752 "Subject: =?ISO-2022-JP?B?GyRCMCQbKEIgICAgICAgICAgICAgICAgICAgICAgICAgICAg?=\r
753  =?US-ASCII?Q?____________________________________________________________?=\r
754  =?ISO-2022-JP?B?ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIBskQlJfGyhC?=")
755
756 (encode
757 "Subject: \e$B0$\e(B                                                                                                                          \e$BR_\e(B"
758 "Subject: =?ISO-2022-JP?B?GyQpQrCkICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICDS3w=="
759 'ignore-76bytes-limit 'ignore-75bytes-limit)
760
761 (encode
762 "From: \e.A\eN! <akr@jaist.ac.jp>"\e*B
763 "From: =?ISO-8859-1?Q?=A1?= <akr@jaist.ac.jp>")
764
765 (encode
766 "From: \"abcdefghijklmnopqrst\e.A\eN!()\\\"\\\\\" <akr@jaist.ac.jp>"\e*B
767 "From: =?ISO-8859-1?Q?abcdefghijklmnopqrst=A1=28=29=22=5C?= <akr@jaist.ac.jp>")
768
769 (encode
770 "From: akr@jaist.ac.jp (abcdefghijklmnopqrst\e.A\eN!\\(\\)\"\\\\)"\e*B
771 "From: akr@jaist.ac.jp (=?ISO-8859-1?Q?abcdefghijklmnopqrst=A1=28=29\"=5C?=)")
772
773 (encode
774 "Subject: \e$B$"\e(B a \e.H\eN`"\e*B
775 '("Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=?= a =?ISO-8859-8?Q?=E0?="
776   "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=?= a =?ISO-8859-8?B?4A==?="))
777
778 (encode
779 "Subject: \e.H\eN`\e$BNm\e(B"\e*B
780 '("Subject: =?ISO-8859-8?Q?=E0?= =?ISO-2022-JP?B?GyRCTm0bKEI=?="
781   "Subject: =?ISO-8859-8?B?4A==?= =?ISO-2022-JP?B?GyRCTm0bKEI=?="))
782
783 (encode
784 "Subject: \e.H\eN` \e$BNm\e(B"\e*B
785 '("Subject: =?ISO-8859-8?Q?=E0_?= =?ISO-2022-JP?B?GyRCTm0bKEI=?="
786   "Subject: =?ISO-8859-8?Q?=E0?= =?ISO-2022-JP?B?IBskQk5tGyhC?="
787   "Subject: =?ISO-8859-8?B?4CA=?= =?ISO-2022-JP?B?GyRCTm0bKEI=?="
788   "Subject: =?ISO-8859-8?B?4A==?= =?ISO-2022-JP?B?IBskQk5tGyhC?="))
789
790 (encode
791 "Subject: \e.F\eNC\e$B4X?t\e(B"\e*B
792 '("Subject: =?ISO-8859-7?Q?=C3?= =?ISO-2022-JP?B?GyRCNFg/dBsoQg==?="
793   "Subject: =?ISO-2022-JP-2?B?Gy5GG05DGyRCNFg/dBsoQg==?="))
794
795 (encode
796 "From: aaaaaaaaaaaaaaaaaaaaa(\e$B$"$$\e(B)aaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
797 "From: aaaaaaaaaaaaaaaaaaaaa(=?ISO-2022-JP?B?GyRCJCIbKEI=?=\r
798  =?ISO-2022-JP?B?GyRCJCQbKEI=?=)aaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>")
799
800 (encode
801 "From: aaaaaaaaaaaaaaaaaaaaa (\e$B$"$$\e(B)aaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
802 '("From: aaaaaaaaaaaaaaaaaaaaa
803  (=?ISO-2022-JP?B?GyRCJCIkJBsoQg==?=)aaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
804   "From: aaaaaaaaaaaaaaaaaaaaa (=?ISO-2022-JP?B?GyRCJCIbKEI=?=
805  =?ISO-2022-JP?B?GyRCJCQbKEI=?=)aaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"))
806
807 (encode
808 "From: aaaaaaaaaaaaaaaaaaaaa( \e$B$"$$\e(B)aaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
809 '("From: aaaaaaaaaaaaaaaaaaaaa(
810  =?ISO-2022-JP?B?GyRCJCIkJBsoQg==?=)aaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
811   "From: aaaaaaaaaaaaaaaaaaaaa( =?ISO-2022-JP?B?GyRCJCIbKEI=?=
812  =?ISO-2022-JP?B?GyRCJCQbKEI=?=)aaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"))
813
814 (encode
815 "From: aaaaaaaaaaaaaaaaaaaaa(\e$B$"$$\e(B )aaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
816 '("From: aaaaaaaaaaaaaaaaaaaaa(=?ISO-2022-JP?B?GyRCJCIkJBsoQg==?=
817  )aaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
818   "From: aaaaaaaaaaaaaaaaaaaaa(=?ISO-2022-JP?B?GyRCJCIbKEI=?=
819  =?ISO-2022-JP?B?GyRCJCQbKEI=?= )aaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"))
820
821 (encode
822 "From: aaaaaaaaaaaaaaaaaaaaa(\e$B$"$$\e(B) aaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
823 "From: aaaaaaaaaaaaaaaaaaaaa(=?ISO-2022-JP?B?GyRCJCIkJBsoQg==?=)\r
824  aaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>")
825
826 (encode
827 "From: aaaaaaaaaaaaaaaaaaaaa(\e$B$"\e(B \e$B$$\e(B)aaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
828 "From: aaaaaaaaaaaaaaaaaaaaa(=?ISO-2022-JP?B?GyRCJCIbKEIgCg==?=\r
829  =?ISO-2022-JP?B?GyRCJCQbKEI=?=)aaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>")
830
831 (encode
832 "From: (\e$B$"\e(B)aaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
833 "From: (=?ISO-2022-JP?B?GyRCJCIbKEI=?=)aaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>")
834
835 (encode
836 "From: (\e$B$"\e(B)aaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
837 "From: (=?ISO-2022-JP?B?GyRCJCIbKEI=?=)aaaaaaaaaaaaaaaaaaaaa\r
838  <akr@jaist.ac.jp>")
839
840 (encode
841 "From: (\e$B$"\e(B)aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
842 "From: (=?ISO-2022-JP?B?GyRCJCIbKEI=?=)aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\r
843  <akr@jaist.ac.jp>")
844
845 (encode
846 "From: (\e$B$"\e(B)aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
847 "From:\r
848  (=?ISO-2022-JP?B?GyRCJCIbKEI=?=)aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\r
849  <akr@jaist.ac.jp>")
850
851 (encode
852 "From: (\e$B$"\e(B)aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
853 "From:\r
854  (=?ISO-2022-JP?B?GyRCJCIbKEI=?=)aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\r
855  <akr@jaist.ac.jp>")
856
857 (encode
858 "From: (\e$B$"\e(B)aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
859 "From: (=?ISO-2022-JP?B?GyRCJCIbKEI=?=\r
860  =?ISO-2022-JP?B?GyhC?=)aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\r
861  <akr@jaist.ac.jp>"
862 'zero-characters-encoded-word-hack)
863
864 (encode
865 "From: (\e$B$"\e(B)aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
866 "From: (=?ISO-2022-JP?B?GyRCJCIbKEI=?=\r
867  =?ISO-2022-JP?B?GyhC?=)aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\r
868  <akr@jaist.ac.jp>"
869 'zero-characters-encoded-word-hack)
870
871 (encode
872 "From: (\e$B$"\e(B)aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
873 "From: (=?ISO-2022-JP?B?GyRCJCIbKEI=?=)\r
874  aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
875 'separate-sticked-tokens-for-fold)
876
877 (encode
878 "From: (\e$B$"\e(B)aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
879 "From: (=?ISO-2022-JP?B?GyRCJCIbKEI=?=)=?US-ASCII?Q?aaaaaaaaaaaaaaaaaaaaaaa?=\r
880  =?US-ASCII?Q?aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa?= <akr@jaist.ac.jp>"
881 'encode-long-ascii-string-for-fold 'permit-sticked-special)
882
883 (encode
884 "From: (\e$B$"\e(B)aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
885 "From: (=?ISO-2022-JP?B?GyRCJCIbKEI=?=)aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\r
886  aaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
887 'divide-atom-for-fold)
888
889 (encode
890 "From: (\e$B$"\e(B)aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
891 '("From: (=?ISO-2022-JP?B?GyRCJCIbKEI=?=)aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
892   "From: (=?ISO-2022-JP?B?GyRCJCIbKEI=?=)aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
893  <akr@jaist.ac.jp>")
894 'ignore-76bytes-limit)
895
896 (encode
897 "From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa(\e$B$"\e(B)aa <akr@jaist.ac.jp>"
898 "From: =?US-ASCII?Q?aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa?=\r
899  =?US-ASCII?Q?a?=(=?ISO-2022-JP?B?GyRCJCIbKEI=?=)aa <akr@jaist.ac.jp>"
900 'encode-long-ascii-string-for-fold)
901
902 (encode
903 "From: \e$B$"\e(B aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa(\e$B$"\e(B)aa <akr@jaist.ac.jp>"
904 "From: =?ISO-2022-JP?B?GyRCJCIbKEIgYWFhYWFhYWFhYWFhYWFhYWFhYWFhYWFhYWFhYQ==?=\r
905  =?US-ASCII?Q?aaaaaaaaaaaaaaa?=(=?ISO-2022-JP?B?GyRCJCIbKEI=?=)aa"
906 'encode-long-ascii-string-for-fold)
907
908 (encode
909 "From: (\e$B$"\e(B) <akr@jaist.ac.jp>"
910 "From: (=?ISO-2022-JP?B?GyRCJCIbKEI=?=) <akr@jaist.ac.jp>")
911
912 (encode
913 "From: ((((((((((((((((((((((((((((((((((((((((\e$B$"\e(B)))))))))))))))))))))))))))))))))))))))) <akr@jaist.ac.jp>"
914 "From: ((((((((((((((((((((((((((((((((((((((((=?ISO-2022-JP?B?GyRCJCIbKEI=?=\r
915  =?ISO-2022-JP?B?GyhC?=))))))))))))))))))))))))))))))))))))))))\r
916  <akr@jaist.ac.jp>"
917 'zero-characters-encoded-word-hack)
918
919 (encode
920 "From: (((((((((((((((((((((((((((((((((((((((((\e$B$"\e(B))))))))))))))))))))))))))))))))))))))))) <akr@jaist.ac.jp>"
921 "From: (((((((((((((((((((((((((((((((((((((((((=?ISO-2022-JP?B?GyhC?=\r
922  =?ISO-2022-JP?B?GyRCJCIbKEI=?=)))))))))))))))))))))))))))))))))))))))))\r
923  <akr@jaist.ac.jp>"
924 'zero-characters-encoded-word-hack)
925
926 (encode
927 "From: ((((((((((((((((((((((((((((((((((((((((((((((\e$B$"\e(B)))))))))))))))))))))))))))))))))))))))))))))) <akr@jaist.ac.jp>"
928 "From: ((((((((((((((((((((((((((((((((((((((((((((((=?ISO-2022-JP?B?GyhC?=\r
929  =?ISO-2022-JP?B?GyRCJCIbKEI=?=))))))))))))))))))))))))))))))))))))))))))))))\r
930  <akr@jaist.ac.jp>"
931 'zero-characters-encoded-word-hack)
932
933 (encode
934 "From: (((((((((((((((((((((((((((((((((((((((((((((((\e$B$"\e(B))))))))))))))))))))))))))))))))))))))))))))))) <akr@jaist.ac.jp>"
935 "From: (((((((((((((((((((((((((((((((((((((((((((((((=?ISO-2022-JP?B?GyhC?=\r
936  =?ISO-2022-JP?B?GyRCJCIbKEI=?=\r
937  =?ISO-2022-JP?B?GyhC?=)))))))))))))))))))))))))))))))))))))))))))))))\r
938  <akr@jaist.ac.jp>"
939 'zero-characters-encoded-word-hack)
940
941 (encode
942 "From: ((((((((((((((((((((((((((((((((((((((((((((((((\e$B$"\e(B)))))))))))))))))))))))))))))))))))))))))))))))) <akr@jaist.ac.jp>"
943 "From:\r
944  ((((((((((((((((((((((((((((((((((((((((((((((((=?ISO-2022-JP?B?GyhC?=\r
945  =?ISO-2022-JP?B?GyRCJCIbKEI=?=\r
946  =?ISO-2022-JP?B?GyhC?=))))))))))))))))))))))))))))))))))))))))))))))))\r
947  <akr@jaist.ac.jp>"
948 'zero-characters-encoded-word-hack)
949
950 (encode
951 "From: ((((((((((((((((((((((((((((((((((((((((((((((((((((((\e$B$"\e(B)))))))))))))))))))))))))))))))))))))))))))))))))))))) <akr@jaist.ac.jp>"
952 "From:\r
953  ((((((((((((((((((((((((((((((((((((((((((((((((((((((=?ISO-2022-JP?B?GyhC?=\r
954  =?ISO-2022-JP?B?GyRCJCIbKEI=?=\r
955  =?ISO-2022-JP?B?GyhC?=))))))))))))))))))))))))))))))))))))))))))))))))))))))\r
956  <akr@jaist.ac.jp>"
957 'zero-characters-encoded-word-hack)
958
959 (encode
960 "From: (((((((((((((((((((((((((((((((((((((((((((\e$B$"\e(B))))))))))))))))))))))))))))))))))))))))))) <akr@jaist.ac.jp>"
961 "From:\r
962  ((((((((((((((((((((((((((((((((((((((((((((((((((((((=?ISO-2022-JP?B?GyhC?=\r
963  =?ISO-2022-JP?B?GyRCJCIbKEI=?=\r
964  =?ISO-2022-JP?B?GyhC?=))))))))))))))))))))))))))))))))))))))))))))))))))))))\r
965  <akr@jaist.ac.jp>"
966 'zero-characters-encoded-word-hack)
967
968 (encode
969 "From: (((((((((((((((((((((((((((((((((((((((((((((((((((((((\e$B$"\e(B))))))))))))))))))))))))))))))))))))))))))))))))))))))) <akr@jaist.ac.jp>"
970 "From:\r
971  ((((((((((((((((((((((((((((((((((((((((((((((((((((((=?ISO-2022-JP?B?GyhC?=\r
972  =?ISO-2022-JP?B?GyhC?=(=?ISO-2022-JP?B?GyRCJCIbKEI=?=)=?ISO-2022-JP?B?GyhC?=\r
973  =?ISO-2022-JP?B?GyhC?=))))))))))))))))))))))))))))))))))))))))))))))))))))))\r
974  <akr@jaist.ac.jp>"
975 'zero-characters-encoded-word-hack)
976
977 (encode
978 "From: ((((((((((((((((((((((((((((((((((((((((((((((((((((((((\e$B$"\e(B)))))))))))))))))))))))))))))))))))))))))))))))))))))))) <akr@jaist.ac.jp>"
979 "From:\r
980  ((((((((((((((((((((((((((((((((((((((((((((((((((((((=?ISO-2022-JP?B?GyhC?=\r
981  =?ISO-2022-JP?B?GyhC?=((=?ISO-2022-JP?B?GyRCJCIbKEI=?=\r
982  =?ISO-2022-JP?B?GyhC?=))))))))))))))))))))))))))))))))=?ISO-2022-JP?B?GyhC?=\r
983  =?ISO-2022-JP?B?GyhC?=))))))))))))))))))))))))\r
984  <akr@jaist.ac.jp>"
985 'zero-characters-encoded-word-hack)
986
987 (encode
988 "From: ()(\e$B$"\e(B)() <akr@jaist.ac.jp>"
989 "From: ()(=?ISO-2022-JP?B?GyRCJCIbKEI=?=)() <akr@jaist.ac.jp>")
990
991 (encode
992 "From: (\e$B$"\e(B)()()()()()()()()()()()()()()()()()()() <akr@jaist.ac.jp>"
993 "From: (=?ISO-2022-JP?B?GyRCJCIbKEI=?=)()()()()()()()()()()()()()()()()()()()\r
994   <akr@jaist.ac.jp>")
995
996 (encode
997 "From: (\e$B$"\e(B)()()()()()()()()()()()()()()()()()()()()()() <akr@jaist.ac.jp>"
998 "From:\r
999  (=?ISO-2022-JP?B?GyRCJCIbKEI=?=)()()()()()()()()()()()()()()()()()()()()()()\r
1000   <akr@jaist.ac.jp>")
1001
1002 (encode
1003 "From: (\e$B$"\e(B)()()()()()()()()()()()()()()()()()()()()()()() <akr@jaist.ac.jp>"
1004 "From: (=?ISO-2022-JP?B?GyRCJCIbKEI=?=\r
1005  =?ISO-2022-JP?B?GyhC?=)()()()()()()()()()()()()()()()()()()()()()()()\r
1006   <akr@jaist.ac.jp>"
1007 'zero-characters-encoded-word-hack)
1008
1009 (encode
1010 "From: (\e$B$"\e(B)()()()()()()()()()()()()()()()()()()()()()()()()()()() <akr@jaist.ac.jp>"
1011 "From: (=?ISO-2022-JP?B?GyRCJCIbKEI=?=\r
1012  =?ISO-2022-JP?B?GyhC?=)()()()()()()()()()()()()()()()(=?ISO-2022-JP?B?GyhC?=\r
1013  =?ISO-2022-JP?B?GyhC?=)()()()()()()()()()()() <akr@jaist.ac.jp>"
1014 'zero-characters-encoded-word-hack)
1015
1016 (encode
1017 "To: l@d (\e$B$"\e(B aaa)(\e$B$"\e(B)"
1018 "To: l@d (=?ISO-2022-JP?B?GyRCJCIbKEI=?= aaa)(=?ISO-2022-JP?B?GyRCJCIbKEI=?=)")
1019
1020 (encode
1021 "To: l@d (\e$B$"\e(B aaaa)(\e$B$"\e(B)"
1022 "To: l@d (=?ISO-2022-JP?B?GyRCJCIbKEI=?=\r
1023  aaaa)(=?ISO-2022-JP?B?GyRCJCIbKEI=?=)")
1024
1025 (encode
1026 "To: l@d (\e$B$"\e(B aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa)(\e$B$"\e(B)"
1027 "To: l@d (=?ISO-2022-JP?B?GyRCJCIbKEI=?=\r
1028  aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa)(=?ISO-2022-JP?B?GyRCJCIbKEI=?=)")
1029
1030 (encode
1031 "To: l@d (\e$B$"\e(B aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa)(\e$B$"\e(B)"
1032 "To: l@d (=?ISO-2022-JP?B?GyRCJCIbKEIgYWFhYWFhYWFhYWFhYWFhYWFhYWFhYWFhYWE=?=\r
1033  =?US-ASCII?Q?aaaaaaaaaaaaaaaaaa?=)(=?ISO-2022-JP?B?GyRCJCIbKEI=?=)"
1034 'encode-long-ascii-string-for-fold)
1035
1036 (encode
1037 "To: l@d (\e$B$"\e(B aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()\e$B$"\e(B)"
1038 "To: l@d (=?ISO-2022-JP?B?GyRCJCIbKEIgYWFhYWFhYWFhYWFhYWFhYWFhYWFhYWFhYWE=?=\r
1039  =?US-ASCII?Q?aaaaaaaaaaaaaaaaaa?=()=?ISO-2022-JP?B?GyRCJCIbKEI=?=)"
1040 'encode-long-ascii-string-for-fold)
1041
1042 (encode
1043 "To: l@d (\e$B$"\e(B aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa \e$B$"\e(B)(\e$B$"\e(B)"
1044 "To: l@d (=?ISO-2022-JP?B?GyRCJCIbKEI=?= aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\r
1045  =?ISO-2022-JP?B?GyRCJCIbKEI=?=)(=?ISO-2022-JP?B?GyRCJCIbKEI=?=)")
1046
1047 (encode
1048 "To: l@d (\e$B$"\e(B aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa \e$B$"\e(B)(\e$B$"\e(B)"
1049 "To: l@d (=?ISO-2022-JP?B?GyRCJCIbKEI=?=\r
1050  aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\r
1051  =?ISO-2022-JP?B?GyRCJCIbKEI=?=)(=?ISO-2022-JP?B?GyRCJCIbKEI=?=)")
1052
1053 (encode
1054 "Subject: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa ?\e$(C$!\e(B?"
1055 "Subject: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa =?EUC-KR?B?P6ShPw==?=")
1056
1057 (encode
1058 "Subject: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa ?\e$(C$!\e(B?"
1059 "Subject: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa =?EUC-KR?B?P6Sh?=\r
1060  =?US-ASCII?Q?=3F?=")
1061
1062 (encode
1063 "Subject: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa ?\e$(C$!\e(B?"
1064 "Subject: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa =?EUC-KR?B?P6Sh?=\r
1065  =?US-ASCII?Q?=3F?=")
1066
1067 (encode
1068 "Subject: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa ?\e$(C$!\e(B?"
1069 "Subject: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\r
1070  =?EUC-KR?B?P6ShPw==?=")
1071
1072 ;----------------------------------------------------------------------------
1073
1074 ;;; Section 6: Encoding melancholic inputs.
1075
1076 (encode
1077 "From: akr@jaist.ac.jp (\e$B$"\e(B(\e$B$$\e(B)\e$B$&\e(B)"
1078 "From: akr@jaist.ac.jp\r
1079  (=?ISO-2022-JP?B?GyRCJCIbKEI=?=(=?ISO-2022-JP?B?GyRCJCQbKEI=?=)=?ISO-2022-JP?B?GyRCJCYbKEI=?=)"
1080 'ignore-76bytes-limit)
1081
1082 (encode
1083 "From: akr@jaist.ac.jp (\e$B$"\e(B(\e$B$$\e(B)\e$B$&\e(B)"
1084 "From: akr@jaist.ac.jp (=?ISO-2022-JP?B?GyRCJCIbKEI=?=\r
1085  =?ISO-2022-JP?B?GyhC?=(=?ISO-2022-JP?B?GyRCJCQbKEI=?=\r
1086  =?ISO-2022-JP?B?GyhC?=)=?ISO-2022-JP?B?GyRCJCYbKEI=?=)"
1087 'zero-characters-encoded-word-hack)
1088
1089 (encode
1090 "From: \e$B$"\e(B(\e$B$"\e(B) <akr@jaist.ac.jp>"
1091 "From: =?ISO-2022-JP?B?GyRCJCIbKEIoGyRCJCIbKEIp?= <akr@jaist.ac.jp>"
1092 'encode-sticked-comment-as-atom)
1093
1094 (encode
1095 "From: \e$B$"\e(B(\e$B$"\e(B) <akr@jaist.ac.jp>"
1096 "From: =?ISO-2022-JP?B?GyRCJCIbKEI=?=(=?ISO-2022-JP?B?GyRCJCIbKEI=?=)\r
1097  <akr@jaist.ac.jp>"
1098 'permit-sticked-comment)
1099
1100 (encode
1101 "From: \e$B$"\e(B(\e$B$"\e(B) <akr@jaist.ac.jp>"
1102 "From: =?ISO-2022-JP?B?GyRCJCIbKEI=?= (=?ISO-2022-JP?B?GyRCJCIbKEI=?=)\r
1103  <akr@jaist.ac.jp>"
1104 'separate-sticked-comment)
1105
1106 (encode
1107 "To: \e$B$"\e(B<akr@jaist.ac.jp>"
1108 "To: =?ISO-2022-JP?B?GyRCJCIbKEI=?=<akr@jaist.ac.jp>"
1109 'permit-sticked-special)
1110
1111 (encode
1112 "To: \e$B$"\e(B<akr@jaist.ac.jp>"
1113 "To: =?ISO-2022-JP?B?GyRCJCIbKEI=?= <akr@jaist.ac.jp>"
1114 'separate-sticked-special)
1115
1116 (encode
1117 "To: <akr@jaist.ac.jp>,\e$B$"\e(B<akr@jaist.ac.jp>"
1118 "To: <akr@jaist.ac.jp>,=?ISO-2022-JP?B?GyRCJCIbKEI=?=<akr@jaist.ac.jp>"
1119 'permit-sticked-special)
1120
1121 (encode
1122 "To: <akr@jaist.ac.jp>,\e$B$"\e(B<akr@jaist.ac.jp>"
1123 "To: <akr@jaist.ac.jp>, =?ISO-2022-JP?B?GyRCJCIbKEI=?= <akr@jaist.ac.jp>"
1124 'separate-sticked-special)
1125
1126 (encode
1127 "To: akr@jaist.ac.jp,\e$B$"\e(B<akr@jaist.ac.jp>"
1128 "To: akr@jaist.ac.jp,=?ISO-2022-JP?B?GyRCJCIbKEI=?=<akr@jaist.ac.jp>"
1129 'permit-sticked-special)
1130
1131 (encode
1132 "To: akr@jaist.ac.jp,\e$B$"\e(B<akr@jaist.ac.jp>"
1133 "To: akr@jaist.ac.jp, =?ISO-2022-JP?B?GyRCJCIbKEI=?= <akr@jaist.ac.jp>"
1134 'separate-sticked-special)
1135
1136 (encode
1137 "To: \e$B$"\e(B:akr@jaist.ac.jp;"
1138 "To: =?ISO-2022-JP?B?GyRCJCIbKEI=?=:akr@jaist.ac.jp;"
1139 'permit-sticked-special)
1140
1141 (encode
1142 "To: \e$B$"\e(B:akr@jaist.ac.jp;"
1143 "To: =?ISO-2022-JP?B?GyRCJCIbKEI=?= :akr@jaist.ac.jp;"
1144 'separate-sticked-special)
1145
1146 (encode
1147 "To: \e$B$"\e(B:\e$B$$\e(B<akr@jaist.ac.jp>;"
1148 "To: =?ISO-2022-JP?B?GyRCJCIbKEI=?=:=?ISO-2022-JP?B?GyRCJCQbKEI=?=<akr@jaist.ac.jp>;"
1149 'ignore-76bytes-limit 'permit-sticked-special)
1150
1151 (encode
1152 "To: \e$B$"\e(B:\e$B$$\e(B<akr@jaist.ac.jp>;"
1153 "To: =?ISO-2022-JP?B?GyRCJCIbKEI=?=:=?ISO-2022-JP?B?GyRCJCQbKEI=?=\r
1154  =?ISO-2022-JP?B?GyhC?=<akr@jaist.ac.jp>;"
1155 'zero-characters-encoded-word-hack 'permit-sticked-special)
1156
1157 (encode
1158 "To: \e$B$"\e(B:\e$B$$\e(B<akr@jaist.ac.jp>;"
1159 "To: =?ISO-2022-JP?B?GyRCJCIbKEI=?= : =?ISO-2022-JP?B?GyRCJCQbKEI=?=\r
1160  <akr@jaist.ac.jp>;"
1161 'separate-sticked-special)
1162
1163 (encode
1164 "To: \e$B$"\e(B:\e$B$$\e(B<foo@bar>,\e$B$&\e(B<foo@bar>;,\e$B$(\e(B<foo@bar>"
1165 "To: =?ISO-2022-JP?B?GyRCJCIbKEI=?=:=?ISO-2022-JP?B?GyRCJCQbKEI=?=<foo@bar>,=?ISO-2022-JP?B?GyRCJCYbKEI=?=<foo@bar>;,=?ISO-2022-JP?B?GyRCJCgbKEI=?=<foo@bar>"
1166 'ignore-76bytes-limit 'permit-sticked-special)
1167
1168 (encode
1169 "To: \e$B$"\e(B:\e$B$$\e(B<foo@bar>,\e$B$&\e(B<foo@bar>;,\e$B$(\e(B<foo@bar>"
1170 "To: =?ISO-2022-JP?B?GyRCJCIbKEI=?=:=?ISO-2022-JP?B?GyRCJCQbKEI=?=\r
1171  =?ISO-2022-JP?B?GyhC?=<foo@bar>,=?ISO-2022-JP?B?GyRCJCYbKEI=?=\r
1172  =?ISO-2022-JP?B?GyhC?=<foo@bar>;,=?ISO-2022-JP?B?GyRCJCgbKEI=?=<foo@bar>"
1173 'zero-characters-encoded-word-hack 'permit-sticked-special)
1174
1175 (encode
1176 "To: \e$B$"\e(B:\e$B$$\e(B<foo@bar>,\e$B$&\e(B<foo@bar>;,\e$B$(\e(B<foo@bar>"
1177 "To: =?ISO-2022-JP?B?GyRCJCIbKEI=?= : =?ISO-2022-JP?B?GyRCJCQbKEI=?=\r
1178  <foo@bar>, =?ISO-2022-JP?B?GyRCJCYbKEI=?= <foo@bar>;,\r
1179  =?ISO-2022-JP?B?GyRCJCgbKEI=?= <foo@bar>"
1180 'separate-sticked-special)
1181
1182 (encode
1183 "From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()?\e$(C$!\e(B?()aaaaa <akr@jaist.ac.jp>"
1184 "From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()=?EUC-KR?B?P6ShPw==?=()aaaaa\r
1185  <akr@jaist.ac.jp>"
1186 'permit-sticked-comment)
1187
1188 (encode
1189 "From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()?\e$(C$!\e(B?()aaaaa <akr@jaist.ac.jp>"
1190 '("From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()=?EUC-KR?B?P6Sh?=\r
1191  =?US-ASCII?Q?=3F?=()aaaaa <akr@jaist.ac.jp>"
1192   "From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()=?US-ASCII?Q?=3F?=\r
1193  =?EUC-KR?B?pKE/?=()aaaaa <akr@jaist.ac.jp>")
1194 'permit-sticked-comment)
1195
1196 (encode
1197 "From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()?\e$(C$!\e(B?()aaaaa <akr@jaist.ac.jp>"
1198 "From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()=?EUC-KR?B?P6Sh?=
1199  =?US-ASCII?Q?=3F?=()aaaaa <akr@jaist.ac.jp>"
1200 'permit-sticked-comment)
1201
1202 (encode
1203 "From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()?\e$(C$!\e(B?()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
1204 '("From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()=?EUC-KR?B?P6Sh?=\r
1205  =?US-ASCII?Q?=3F?=()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
1206   "From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()=?US-ASCII?Q?=3F?=\r
1207  =?EUC-KR?B?pKE/?=()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>")
1208 'permit-sticked-comment)
1209
1210 (encode
1211 "From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()?\e$(C$!\e(B?()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
1212 "From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()=?US-ASCII?Q?=3F?=\r
1213  =?EUC-KR?B?pKE/?=()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
1214 'permit-sticked-comment)
1215
1216 (encode
1217 "From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()?\e$(C$!\e(B?()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
1218 "From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()=?US-ASCII?Q?=3F?=\r
1219  =?EUC-KR?B?pKE/?=()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
1220 'permit-sticked-comment)
1221
1222 (encode
1223 "From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()?\e$(C$!\e(B?()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
1224 "From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()=?EUC-KR?B?P6Sh?=\r
1225  =?US-ASCII?Q?=3F?=()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
1226 'permit-sticked-comment)
1227
1228 (encode
1229 "From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()?\e$(C$!\e(B?()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
1230 "From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()=?EUC-KR?B?P6Sh?=\r
1231  =?US-ASCII?Q?=3F?=()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\r
1232  <akr@jaist.ac.jp>"
1233 'permit-sticked-comment)
1234
1235 (encode
1236 "From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()?\e$(C$!\e(B?()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
1237 "From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()=?EUC-KR?B?P6Sh?=\r
1238  =?US-ASCII?Q?=3F?=()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\r
1239  <akr@jaist.ac.jp>"
1240 'permit-sticked-comment)
1241
1242 (encode
1243 "From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()?\e$(C$!\e(B?()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
1244 "From:\r
1245  aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()=?EUC-KR?B?P6Sh?=\r
1246  =?US-ASCII?Q?=3F?=()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\r
1247  <akr@jaist.ac.jp>"
1248 'permit-sticked-comment)
1249
1250 (encode
1251 "From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()?\e$(C$!\e(B?()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
1252 "From:\r
1253  aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()=?US-ASCII?Q?=3F?=\r
1254  =?EUC-KR?B?pKE/?=()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\r
1255  <akr@jaist.ac.jp>"
1256 'permit-sticked-comment)
1257
1258 (encode
1259 "From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()?\e$(C$!\e(B?()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa <akr@jaist.ac.jp>"
1260 '("From:\r
1261  aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()=?EUC-KR?B?P6Sh?=\r
1262  =?US-ASCII?Q?=3F?=()=?US-ASCII?Q?aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa?=\r
1263  =?US-ASCII?Q?aaaaaaaaaaaaaaaa?= <akr@jaist.ac.jp>"
1264   "From: =?US-ASCII?Q?aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa?=
1265  =?US-ASCII?Q?aa?=()=?US-ASCII?Q?=3F?=\r 
1266  =?EUC-KR?B?pKE/?=()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\r
1267  <akr@jaist.ac.jp>")
1268 'permit-sticked-comment)
1269
1270 (encode
1271 "From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()?\e$(C$!\e(B?()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa<akr@jaist.ac.jp>"
1272 "From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()=?US-ASCII?Q?=3F?=\r
1273  =?EUC-KR?B?pKE/?=()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa<akr@jaist.ac.jp>"
1274 'permit-sticked-comment)
1275
1276 (encode
1277 "From:aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()?\e$(C$!\e(B?()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa<akr@jaist.ac.jp>"
1278 "From:aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()=?US-ASCII?Q?=3F?=\r
1279  =?EUC-KR?B?pKE/?=()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa<akr@jaist.ac.jp>"
1280 'permit-sticked-comment)
1281
1282 (encode
1283 "From: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()?\e$(C$!\e(B?()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa<akr@jaist.ac.jp>"
1284 "From:\r
1285  aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()=?US-ASCII?Q?=3F?=\r
1286  =?EUC-KR?B?pKE/?=()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa<akr@jaist.ac.jp>"
1287 'permit-sticked-comment)
1288
1289 ;----------------------------------------------------------------------------
1290
1291 ;;; Section 7: Using embedded-encoded-words.
1292 ;;
1293 ;; embedded-encoded-word \e$BI=8=\e(B
1294 ;; 
1295 ;; RFC2047 \e$B$N%G%3!<%@$O@x:_E*$K\e(B(\e$B%G%3!<%I7k2L$G$J$/\e(B) encoded-word \e$B$=$N$b$N$r\e(B
1296 ;; \e$B=PNO$7$J$1$l$P$J$i$J$$$3$H$,$"$k!#\e(B
1297 ;;
1298 ;; 1. \e$BCN$i$J$$\e(B charset \e$B$b$7$/$O\e(B encoding \e$B$,;XDj$5$l$F$$$?$H$-!#\e(B
1299 ;;  =?unknown-charset?known-encoding?some-encoded-text?=
1300 ;;  =?known-charset?unknown-encoding?some-encoded-text?=
1301 ;;  =?unknown-charset?unknown-encoding?some-encoded-text?=
1302 ;;
1303 ;; 2. \e$B%G%3!<%I$G$-$F$bFbMF$,7uF]$9$.$k$H$-!#\e(B
1304 ;;  Non ASCII \e$B3HD%\e(B RFC822 \e$B$NCf$K\e(B =?US-ASCII?Q?=0D=0A=0D=0A?= \e$B$N%G%3!<%I\e(B
1305 ;; \e$B7k2L$rKd$a9~$`$N$O4m81$9$.$k!#\e(B
1306 ;;
1307 ;; \e$B$^$?!"%G%3!<%@$O\e(B encoded-word \e$B$N$h$&$K$_$($k%G%3!<%I7k2L$r=PNO$7$J$1\e(B
1308 ;; \e$B$l$P$J$i$J$$$3$H$b$"$k!#\e(B
1309 ;;
1310 ;;  =?US-ASCII?Q?=3D=3FUS-ASCII=3FQ=3Ftext=3F=3D?=
1311 ;;
1312 ;; \e$B%G%3!<%@$,C1$J$kJ8;zNs$r=PNO$9$k>l9g!"C1=c$K$O\e(B encoded-word \e$B$=$N$b$N$H\e(B
1313 ;; encoded-word \e$B$N$h$&$K$_$($kJ8;zNs$r6hJL$G$-$J$$!#\e(B
1314 ;; \e$B$3$3$G$OJ8;zNsCf$G$=$l$i$r3N<B$K6hJL$7$FI=8=$9$kJ}K!$r<($9!#\e(B
1315 ;;
1316 ;; rule 1: \e$BJ8;zNsCf$G\e(B =?charset?encoding?text?= \e$B$H$$$&%Q%?!<%s$K\e(B
1317 ;;  \e$B%^%C%A$7$J$$ItJ,$O$=$NItJ,$N$^$^$NFbMF$rI=$9!#\e(B
1318 ;; 
1319 ;; rule 2: \e$BJ8;zNsCf$G\e(B =?charset?encoding?text?= \e$B$H$$$&%Q%?!<%s$K\e(B
1320 ;;  \e$B%^%C%A$9$kItJ,$O\e(B charset \e$B$N@hF,$K\e(B + \e$B$,$$$/$DIU$$$F$$$k$+$GFbMF$N\e(B
1321 ;;  \e$B2r<a$rJQ$($k!#\e(B
1322 ;;
1323 ;;  3\e$B$rK!$H$7$F\e(B0\e$B$HEy$7$$>l9g\e(B(0, 3, 6, ...): charset \e$B$N@hF,$N\e(B + \e$B$N?t$r\e(B
1324 ;;    1/3 \e$B$K$7$?J8;zNs\e(B
1325 ;;  3\e$B$rK!$H$7$F\e(B1\e$B$HEy$7$$>l9g\e(B(1, 4, 7, ...): charset \e$B$N@hF,$N\e(B + \e$B$N?t$r\e(B
1326 ;;    1/3 (\e$B>.?tE@0J2<@Z<N$F\e(B)\e$B$K$7$F!"$=$l$r\e(B encoded-word \e$B$H;W$C$F%G\e(B
1327 ;;    \e$B%3!<%I$7$?J8;zNs!#\e(B
1328 ;;  3\e$B$rK!$H$7$F\e(B2\e$B$HEy$7$$>l9g\e(B(2, 5, 8, ...): charset \e$B$N@hF,$N\e(B + \e$B$N?t$r\e(B
1329 ;;    1/3 (\e$B>.?tE@0J2<@Z<N$F\e(B)\e$B$K$7$F!":G8e$N\e(B = \e$B$r<h$j=|$$$?J8;zNs\e(B
1330 ;;
1331 ;;  =?c?e?t?=?c?e?t?=... \e$B$H$$$&$h$&$K!"%Q%?!<%s$N@hF,$N\e(B = \e$B$H\e(B \e$BKvHx$N\e(B = 
1332 ;;  \e$B$,=E$J$k>l9g!"4q?tHVL\$N$b$N$KBP$7$F>e5-$N%k!<%k$rE,MQ$9$k!#\e(B
1333 ;;
1334 ;; NOTE: + \e$B$r\e(B embedded-encoded-word \e$BI=8=$N\e(B quote \e$BJ8;z$H8F$V!#\e(B
1335 ;;
1336 ;; NOTE: \e$B8=;~E@\e(B(1998/07/19)\e$B$G\e(B IANA \e$B$K$O\e(B + \e$B$r4^$`\e(B charset \e$B$O\e(B
1337 ;;  \e$BEPO?$5$l$F$$$J$$$N$G!"$=$l$i$N\e(B charset \e$B$r;H$C$?\e(B
1338 ;;  encoded-word \e$B$rI=8=$9$k$K$O\e(B + \e$B$r\e(B 1\e$B$D$D$1$k$3$H$K$J$k!#\e(B
1339 ;;
1340 ;;  =?US-ASCII?Q?abcdef?= \e$B$H$$$&\e(Bencoded-word : =?+US-ASCII?Q?abcdef?=
1341 ;;
1342 ;;  =?US-ASCII?Q?abcdef?= \e$B$H$$$&J8;zNs\e(B        : =?US-ASCII?Q?abcdef?=
1343 ;;  =?+US-ASCII?Q?abcdef?= \e$B$H$$$&J8;zNs\e(B       : =?+++US-ASCII?Q?abcdef?=
1344 ;;  =?++US-ASCII?Q?abcdef?= \e$B$H$$$&J8;zNs\e(B     : =?++++++US-ASCII?Q?abcdef?=
1345 ;;  =?+++US-ASCII?Q?abcdef?= \e$B$H$$$&J8;zNs\e(B    : =?+++++++++US-ASCII?Q?abcdef?=
1346 ;;  =?US-ASCII+?Q?abcdef?= \e$B$H$$$&J8;zNs\e(B      : =?US-ASCII+?Q?abcdef?=
1347 ;;  =?U+S-ASCII?Q?abcdef?= \e$B$H$$$&J8;zNs\e(B      : =?U+S-ASCII?Q?abcdef?=
1348 ;;
1349 ;;  =?US-ASCII?Q?abcdef? \e$B$H$$$&J8;zNs\e(B         : =?++US-ASCII?Q?abcdef?=
1350 ;;  =?+US-ASCII?Q?abcdef? \e$B$H$$$&J8;zNs\e(B        : =?+++++US-ASCII?Q?abcdef?=
1351 ;;  =?++US-ASCII?Q?abcdef? \e$B$H$$$&J8;zNs\e(B     : =?++++++++US-ASCII?Q?abcdef?=
1352 ;;  =?+++US-ASCII?Q?abcdef? \e$B$H$$$&J8;zNs\e(B    : =?+++++++++++US-ASCII?Q?abcdef?=
1353 ;;
1354 ;; NOTE: encoded-word \e$B$K8+$($kJ8;zNs$G\e(B + \e$B$,\e(B 3\e$BG\A}$5$l$k$N$O\e(B charset \e$B$N\e(B
1355 ;;  \e$B@hF,$@$1$G$"$j!"\e(Bencoding \e$B$d\e(B encoded-text \e$B$O$?$H$(\e(B + \e$B$,F~$C$F$$$F$b\e(B
1356 ;;  \e$BJQ2=$7$J$$!#$^$?!"\e(Bcharset \e$BCf$G$b\e(B \e$B@hF,0J30$N\e(B + \e$B$OJQ2=$7$J$$!#\e(B
1357 ;;
1358 ;; NOTE: charset \e$B$H\e(B encoding \e$B$K$O\e(B = \e$B$O4^$^$l$J$$$N$G\e(B 1\e$BJ8;z0J>e=E$J$k$3\e(B
1359 ;;  \e$B$H$O$J$$!#\e(B
1360 ;;
1361 ;; rule 3: \e$BJ8;zNsA4BN$NFbMF$O!"\e(Brule 1 \e$B$H\e(B rule 2 \e$B$G2r<a$7$?3FItJ,$N\e(B
1362 ;;   \e$BJ8;zNs$rC1=c$KO"7k$7$?J8;zNs$H$9$k!#\e(B
1363 ;;
1364 ;; NOTE: RFC2047 \e$B$G$O\e(B encoded-word \e$B$,6uGr$G6h@Z$i$l$J$1$l$P$J$i$J$$$H$+!"\e(B
1365 ;;  encoded-word \e$B$O\e(B 75bytes \e$B0J2<$G$J$1$l$P$J$i$J$$$H$+!"\e(B
1366 ;;  encoded-word \e$B$,4^$^$l$k9T$O\e(B 76bytes \e$B0J2<$G$J$1$l$P$J$i$J$$$H$+!"\e(B
1367 ;;  encoded-word \e$B$,\e(B quoted-string \e$BFb$K$OB8:_$G$-$J$$$H$+!"\e(B
1368 ;;  encoded-text \e$B$,\e(B 1byte \e$B0J>e$J$1$l$P$J$i$J$$$J$I$H$$$&\e(B
1369 ;;  \e$B5,Ls$,$"$k$,!"\e(Bembedded-encoded-word \e$BI=8=$G$O$=$l$i$O:NMQ$7$J$$!#\e(B
1370 ;;  \e$BC1=c$K\e(B encoded-word \e$BFbIt$NJ8K!$@$1$r\e(B(\e$B=$@5$7$F\e(B)\e$BMxMQ$9$k!#\e(B
1371 ;;  (\e$BK\<AE*$K$O0[$J$kJ8K!$r:NMQ$9$k$3$H$b2DG=$G$"$k$,!"\e(BRFC2047 \e$B$K7I0U$r\e(B
1372 ;;  \e$BI=$7$F\e(B encoded-word \e$B$NJ8K!$r:NMQ$9$k!#\e(B)
1373 ;;
1374 ;; NOTE: embedded-encoded-word \e$BI=8=$7$?J8;zNs$NO"7k$O0BA4$G$O$J$$!#\e(B
1375 ;;  =?+US-ASCII?Q?ab \e$B$H\e(B cd?= \e$B$H$$$&\e(B embedded-encoded-word \e$BI=8=$7$?J8;zNs$O\e(B
1376 ;;  \e$B$=$l$>$l$=$NJ8;zNs$=$N$b$N$rI=8=$9$k$,!"$=$l$i$rO"7k$7$?J8;zNs\e(B
1377 ;;  =?+US-ASCII?Q?abcd?= \e$B$O\e(B abcd \e$B$H$$$&J8;zNs$rI=8=$9$k$3$H$K$J$j!"\e(B
1378 ;;  \e$B$=$l$>$l$NFbMF$NO"7k$H$O$J$i$J$$!#\e(B
1379 ;;  \e$B$3$N>l9g!"\e(B=?+++US-ASCII?Q?abcd?= \e$B$H$7$J$1$l$P$J$i$J$$!#\e(B
1380 ;;
1381 ;;  \e$B$3$l$O$H$/$K\e(B Non ASCII \e$B3HD%\e(B RFC822 \e$B$NCf$K\e(B embedded-encoded-word \e$BI=8=$r\e(B
1382 ;;  \e$BKd$a9~$`$H$-$K5$$rIU$1$J$1$l$P$J$i$J$$!#\e(B(\e$BKd$a9~$s$@7k2L$O@5$7$$\e(B
1383 ;;  embedded-encoded-word \e$BI=8=$H$O$J$i$J$$$+$bCN$l$J$$!#\e(B)
1384
1385 (decode
1386 "Subject: =?Unknown-Charset?B?gqA=?="
1387 "Subject: =?+Unknown-Charset?B?gqA=?="
1388 'embedded-encoded-word)
1389
1390 (decode
1391 "Subject: =?US-ASCII?G?H4sIACqUszUAA8tIzcnJBwCGphA2BQAAAA==?="
1392 "Subject: =?+US-ASCII?G?H4sIACqUszUAA8tIzcnJBwCGphA2BQAAAA==?="
1393 'embedded-encoded-word)
1394
1395 (decode
1396 "Subject: =?US-ASCII?Unknown-Encoding?H4sIAGOUszUAAwtyczYyMDEHAEpvqpIHAAAA?="
1397 "Subject: =?+US-ASCII?Unknown-Encoding?H4sIAGOUszUAAwtyczYyMDEHAEpvqpIHAAAA?="
1398 'embedded-encoded-word)
1399
1400 (decode
1401 "Subject: =?ISO-2022-JP?G?H4sIAGiTszUAA5NWcVIBAhMtaQ0nAGLSaeEMAAAA?=\r
1402  =?ISO-2022-JP?G?H4sIAH6TszUAA5NWcVIxV3FTyVbxldZwAgAuIikKDgAAAA==?="
1403 "Subject: =?+ISO-2022-JP?G?H4sIAGiTszUAA5NWcVIBAhMtaQ0nAGLSaeEMAAAA?==?+ISO-2022-JP?G?H4sIAH6TszUAA5NWcVIxV3FTyVbxldZwAgAuIikKDgAAAA==?="
1404 'embedded-encoded-word)
1405
1406 (decode
1407 "Subject: =?Unknown-Charset?B?gqA=?= =?Unknown-Charset?B?gqA=?="
1408 "Subject: =?+Unknown-Charset?B?gqA=?==?+Unknown-Charset?B?gqA=?="
1409 'embedded-encoded-word)
1410
1411 (decode
1412 "Subject: =?Unknown-Charset?B?gqA=?=  =?Unknown-Charset?B?gqA=?="
1413 "Subject: =?+Unknown-Charset?B?gqA=?==?+Unknown-Charset?B?gqA=?="
1414 'embedded-encoded-word)
1415
1416 (decode
1417 "Subject: =?Unknown-Charset?B?gqA=?=\r
1418  =?Unknown-Charset?B?gqA=?="
1419 "Subject: =?+Unknown-Charset?B?gqA=?==?+Unknown-Charset?B?gqA=?="
1420 'embedded-encoded-word)
1421
1422 (decode
1423 "Subject: =?Unknown-Charset?B?gqA=?=\r
1424 \t=?Unknown-Charset?B?gqA=?="
1425 "Subject: =?+Unknown-Charset?B?gqA=?==?+Unknown-Charset?B?gqA=?="
1426 'embedded-encoded-word)
1427
1428 (decode
1429 "Subject: a=?Unknown-Charset?B?gqA=?="
1430 "Subject: a=?Unknown-Charset?B?gqA=?="
1431 'embedded-encoded-word)
1432
1433 (decode
1434 "Subject: =?Unknown-Charset?B?gqA=?=b"
1435 "Subject: =?Unknown-Charset?B?gqA=?=b"
1436 'embedded-encoded-word)
1437
1438 (decode
1439 "Subject: a=?Unknown-Charset?B?gqA=?=b"
1440 "Subject: a=?Unknown-Charset?B?gqA=?=b"
1441 'embedded-encoded-word)
1442
1443 (decode
1444 "Subject: a =?Unknown-Charset?B?gqA=?= b"
1445 "Subject: a =?+Unknown-Charset?B?gqA=?= b"
1446 'embedded-encoded-word)
1447
1448 (decode
1449 "Subject: =?ISO-2022-JP?B?DQoNCg==?="
1450 "Subject: =?+US-ASCII?Q?=0D=0A=0D=0A?="
1451 'embedded-encoded-word)
1452
1453 (decode
1454 "Subject: =?US-ASCII?Q?a=0D=0A_b?="
1455 "Subject: a b"
1456 'embedded-encoded-word)
1457
1458 (decode
1459 "Subject: =?US-ASCII?Q?a=0D=0Ab?="
1460 "Subject: a=?+US-ASCII?Q?=0D=0A?=b"
1461 'embedded-encoded-word)
1462
1463 (decode
1464 "From: =?+C?Q?abcdef?= <akr@jaist.ac.jp>"
1465 "From: =?++++C?Q?abcdef?= <akr@jaist.ac.jp>"
1466 'embedded-encoded-word)
1467
1468 (decode
1469 "From: \"=?+C?Q?abcdef?=\" <akr@jaist.ac.jp>"
1470 "From: \"=?+++C?Q?abcdef?=\" <akr@jaist.ac.jp>"
1471 'embedded-encoded-word)
1472
1473 (decode
1474 "From: =?C?Q?abc?= =?US-ASCII?Q?=2E?= <akr@jaist.ac.jp>"
1475 "From: \"=?+C?Q?abc?=.\" <akr@jaist.ac.jp>"
1476 'embedded-encoded-word)
1477
1478 ;;; Section 8: CR and LF.
1479
1480 (decode
1481 "From: akr@jaist.ac.jp (\r\\\n)"
1482 "From: akr@jaist.ac.jp (\r\\\n)")
1483
1484 (decode
1485 "From: akr@jaist.ac.jp (\r=?US-ASCII?Q?=0A?= =?US-ASCII?Q?a?=)"
1486 "From: akr@jaist.ac.jp (\r=?US-ASCII?Q?=0A?= a)")
1487
1488 (decode
1489 "From: akr@jaist.ac.jp (\r=?US-ASCII?Q?=0A_?=)"
1490 "From: akr@jaist.ac.jp (\r=?US-ASCII?Q?=0A_?=)")
1491
1492 (decode
1493 "From: akr@jaist.ac.jp (\r=?US-ASCII?Q?=0A=09?=)"
1494 "From: akr@jaist.ac.jp (\r=?US-ASCII?Q?=0A=09?=)")
1495
1496 (decode
1497 "From: akr@jaist.ac.jp (\r=?US-ASCII?Q?=0A?= )"
1498 "From: akr@jaist.ac.jp (\r=?US-ASCII?Q?=0A?= )")
1499
1500 (decode
1501 "From: akr@jaist.ac.jp (\r=?US-ASCII?Q?=0A?=\t)"
1502 "From: akr@jaist.ac.jp (\r=?US-ASCII?Q?=0A?=\t)")
1503
1504 (decode
1505 "From: akr@jaist.ac.jp (\\\r\\\n)"
1506 "From: akr@jaist.ac.jp (\\\r\\\n)")
1507
1508 (decode
1509 "From: akr@jaist.ac.jp (\\\r=?US-ASCII?Q?=0A?= =?US-ASCII?Q?a?=)"
1510 "From: akr@jaist.ac.jp (=?+US-ASCII?Q?=0D=0A?=a)"
1511 'embedded-encoded-word)
1512
1513 (decode
1514 "From: akr@jaist.ac.jp (\\\r=?US-ASCII?Q?=0Aa?=)"
1515 "From: akr@jaist.ac.jp (=?+US-ASCII?Q?=0D=0A?=a)"
1516 'embedded-encoded-word)
1517
1518 (decode
1519 "From: akr@jaist.ac.jp (\\\r=?US-ASCII?Q?=0A_?=)"
1520 "From: akr@jaist.ac.jp (\\ )")
1521
1522 (decode
1523 "From: akr@jaist.ac.jp (\\\r=?US-ASCII?Q?=0A=09?=)"
1524 "From: akr@jaist.ac.jp (\\\t)")
1525
1526 (decode
1527 "From: akr@jaist.ac.jp (\\\r=?US-ASCII?Q?=0A?= )"
1528 "From: akr@jaist.ac.jp (\\ )")
1529
1530 (decode
1531 "From: akr@jaist.ac.jp (\\\r=?US-ASCII?Q?=0A?=\t)"
1532 "From: akr@jaist.ac.jp (\\\t)")
1533
1534 (decode
1535 "From: akr@jaist.ac.jp (\\\r=?US-ASCII?Q?=0A?=\r
1536  =?US-ASCII?Q?=0D=0A?= =?US-ASCII?Q?a?=)"
1537 "From: akr@jaist.ac.jp (=?+US-ASCII?Q?=0D=0A=0D=0A?=a)"
1538 'embedded-encoded-word)
1539
1540 (decode
1541 "From: akr@jaist.ac.jp (\\\r=?US-ASCII?Q?=0A?=\r
1542  =?US-ASCII?Q?=0D?=\\\n =?US-ASCII?Q?a?=)"
1543 "From: akr@jaist.ac.jp (=?+US-ASCII?Q?=0D=0A?=\r\\
1544  a)"
1545 'embedded-encoded-word)
1546
1547 ;;;end-test
1548
1549 (report)
1550
1551 ;----------------------------------------------------------------------------