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