From c23631522d02392faa2c6ff16e8351d808146fa5 Mon Sep 17 00:00:00 2001 From: akr Date: Sun, 19 Jul 1998 14:13:10 +0000 Subject: [PATCH] * (TESTPAT): add quoted-encoded-word description and test. --- ChangeLog | 4 ++ TESTPAT | 159 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++---- 2 files changed, 154 insertions(+), 9 deletions(-) diff --git a/ChangeLog b/ChangeLog index a6e8ccc..78d2da7 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,7 @@ +1998-07-19 Tanaka Akira + + * (TESTPAT): add quoted-encoded-word description and test. + 1998-07-18 Tanaka Akira * (TESTPAT): add test result by FLIM-FLAM. diff --git a/TESTPAT b/TESTPAT index 5df90d1..5205d2d 100644 --- a/TESTPAT +++ b/TESTPAT @@ -11,6 +11,7 @@ ;separate-sticked-comment ; violate policy preserving absence of space ;separate-sticked-special ; violate policy preserving absence of space ;zero-characters-encoded-word-hack ; violate common sense (very tricky) +;quoted-encoded-word ; violate character sequence semantics ;;; test driver for FLIM-FLAM (and FLIM) @@ -45,6 +46,8 @@ (let ((result (buffer-substring (point-min) (point)))) (if (member result dsts) t result)))) +;;;start-test;;; + ;;; from RFC2047 (decode @@ -531,15 +534,6 @@ "Subject: =?ISO-2022-JP?B??=") (decode -"Subject: =?ISO-2022-JP?B?DQoNCg==?=" -"Subject: ") - -(decode -"Subject: =?US-ASCII?Q?a=0D=0A_b?=" -"Subject: a b") -; FLIM-FLAM - -(decode "Subject: =?ISO-2022-JP?B?GyRCJCIbKEI=?= a =?ISO-2022-JP?B?GyRCJCQbKEI=?=" "Subject: $B$"(B a $B$$(B") @@ -649,4 +643,151 @@ "Subject: =?ISO-8859-7?Q?=C3?= =?ISO-2022-JP?B?GyRCNFg/dBsoQg==?=" "Subject: .FNC$B4X?t(B")*B +(decode +"Subject: =?Shift_JIS?B?gqA=?=" +"Subject: $B$"(B" +'quoted-encoded-word) + +(decode +"Subject: =?EUC-JP?B?pKI=?=" +"Subject: $B$"(B" +'quoted-encoded-word) + +;;; quoted-encoded-word $BI=8=(B +; +; RFC2047 $B$N%G%3!<%@$O@x:_E*$K(B($B%G%3!<%I7k2L$G$J$/(B) encoded-word $B$=$N$b$N$r(B +; $B=PNO$7$J$1$l$P$J$i$J$$$3$H$,$"$k!#(B +; +; 1. $BCN$i$J$$(B charset $B$b$7$/$O(B encoding $B$,;XDj$5$l$F$$$?$H$-!#(B +; =?unknown-charset?known-encoding?some-encoded-text?= +; =?known-charset?unknown-encoding?some-encoded-text?= +; =?unknown-charset?unknown-encoding?some-encoded-text?= +; +; 2. $B%G%3!<%I$G$-$F$bFbMF$,7uF]$9$.$k$H$-!#(B +; Non ASCII $B3HD%(B RFC822 $B$NCf$K(B =?US-ASCII?Q?=0D=0A=0D=0A?= $B$N%G%3!<%I(B +; $B7k2L$rKd$a9~$`$N$O4m81$9$.$k!#(B +; +; $B$^$?!"%G%3!<%@$O(B encoded-word $B$N$h$&$K$_$($k%G%3!<%I7k2L$r=PNO$7$J$1(B +; $B$l$P$J$i$J$$$3$H$b$"$k!#(B +; +; =?US-ASCII?Q?=3D=3FUS-ASCII=3FQ=3Ftext=3F=3D?= +; +; $B%G%3!<%@$,C1$J$kJ8;zNs$r=PNO$9$k>l9g!"C1=c$K$d$k$H(B encoded-word $B$=$N$b$N$H(B +; encoded-word $B$r6hJL$G$-$J$$!#(B +; $B$3$3$G$OJ8;zNsCf$G$=$l$i$r3Nl9g(B(0, 2, 4, ...): charset $B$N@hF,$N(B '*' $B$N?t$rH>J,$K$7$?J8;zNs(B +; $B4q?t$N>l9g(B(1, 3, 5, ...): charset $B$N@hF,$N(B '*' $B$N?t$rH>J,(B($B>.?tE@0J2<(B +; $B@Z$l$=$NJ8;zNs$=$N$b$N$rI=8=$9$k$,!"$=$l$i$rO"7k$7$?J8;zNs(B +; =?*US-ASCII?Q?abcd?= $B$O(B abcd $B$H$$$&J8;zNs$rI=8=$9$k$3$H$K$J$j!"(B +; $B$=$l$>$l$NFbMF$NO"7k$H$O$J$i$J$$!#(B +; +; $B$3$l$O$H$/$K(B Non ASCII $B3HD%(B RFC822 $B$NCf$K(B quoted-encoded-word $BI=8=$r(B +; $BKd$a9~$`$H$-$K5$$rIU$1$J$1$l$P$J$i$J$$!#(B($BKd$a9~$s$@7k2L$O@5$7$$(B +; quoted-encoded-word $BI=8=$H$O$J$i$J$$$+$bCN$l$J$$!#(B) +; + +(decode +"Subject: =?Unknown-Charset?B?gqA=?=" +"Subject: =?*Unknown-Charset?B?gqA=?=" +'quoted-encoded-word) +; FLIM-FLAM + +(decode +"Subject: =?Unknown-Charset?B?gqA=?= =?Unknown-Charset?B?gqA=?=" +"Subject: =?*Unknown-Charset?B?gqA=?==?*Unknown-Charset?B?gqA=?=" +'quoted-encoded-word) +; FLIM-FLAM + +(decode +"Subject: =?Unknown-Charset?B?gqA=?= =?Unknown-Charset?B?gqA=?=" +"Subject: =?*Unknown-Charset?B?gqA=?==?*Unknown-Charset?B?gqA=?=" +'quoted-encoded-word) +; FLIM-FLAM + +(decode +"Subject: =?Unknown-Charset?B?gqA=?= + =?Unknown-Charset?B?gqA=?=" +"Subject: =?*Unknown-Charset?B?gqA=?==?*Unknown-Charset?B?gqA=?=" +'quoted-encoded-word) +; FLIM-FLAM + +(decode +"Subject: =?Unknown-Charset?B?gqA=?= + =?Unknown-Charset?B?gqA=?=" +"Subject: =?*Unknown-Charset?B?gqA=?==?*Unknown-Charset?B?gqA=?=" +'quoted-encoded-word) +; FLIM-FLAM + +(decode +"Subject: a=?Unknown-Charset?B?gqA=?=" +"Subject: a=?Unknown-Charset?B?gqA=?=" +'quoted-encoded-word) +; FLIM-FLAM + +(decode +"Subject: =?Unknown-Charset?B?gqA=?=b" +"Subject: =?Unknown-Charset?B?gqA=?=b" +'quoted-encoded-word) +; FLIM-FLAM + +(decode +"Subject: a=?Unknown-Charset?B?gqA=?=b" +"Subject: a=?Unknown-Charset?B?gqA=?=b" +'quoted-encoded-word) +; FLIM-FLAM + +(decode +"Subject: a =?Unknown-Charset?B?gqA=?= b" +"Subject: a =?*Unknown-Charset?B?gqA=?= b" +'quoted-encoded-word) +; FLIM-FLAM + +(decode +"Subject: =?ISO-2022-JP?B?DQoNCg==?=" +"Subject: =?*US-ASCII?Q?=0D=0A=0D=0A?=" +'quoted-encoded-word) +; FLIM-FLAM + +(decode +"Subject: =?US-ASCII?Q?a=0D=0A_b?=" +"Subject: a=?*US-ASCII?Q?=0D=0A?= b" +'quoted-encoded-word) +; FLIM-FLAM + +;;;end-test;;; + ;---------------------------------------------------------------------------- -- 1.7.10.4