Shiro Kawai
shiro****@lava*****
2002年 9月 26日 (木) 16:51:30 JST
英語MLの方にも送ったのですが、主として日本語を使う場合に
問題となるバグのパッチですので、日本語MLにも送っておきます。
重複して受け取られた方は御容赦下さい。
ext/charconv/jconv.cの中に、特定のエンコーディングを
出力した時に固まってしまうバグがありました。具体的には、
出力エンコーディングに "iso-2022-jp" を指定した場合に
起こります ("iso2022jp" や "iso2022-jp" なら大丈夫です)。
正確には、バグの発現する条件は (1) 出力エンコーディングが
statefulであり、(2) Gauche組込みの変換ルーチンでなく
iconvを使い、(3) 変換文字列の最後がASCIIでない、場合に
起きます。ステート管理をちゃんとやっていなかったため、
変換終了時にデフォルトステートに戻すエスケープシーケンス
を出すルーチンが繰り返し呼ばれるようになっていました。
--shiro
*** jconv.c 17 Jun 2002 05:41:04 -0000 1.9
--- jconv.c 26 Sep 2002 05:22:59 -0000
***************
*** 1294,1299 ****
--- 1294,1305 ----
/* case (5) */
#ifdef HAVE_ICONV_H
+ /* NB: although iconv manages states, we need to keep track of whether
+ * we're sure in default status (JIS_ASCII) or not (we use JIS_UNKNOWN for it).
+ * It's because jconv_iconv_reset will be called twice if there is any
+ * reset sequence; the first call should emit the sequence, but the second
+ * call shoudn't.
+ */
static size_t jconv_iconv(ScmConvInfo *info, const char **iptr, size_t *iroom,
char **optr, size_t *oroom)
{
***************
*** 1302,1307 ****
--- 1308,1314 ----
fprintf(stderr, "jconv_iconv %s->%s\n", info->fromCode, info->toCode);
#endif
r = iconv(info->handle, (char **)iptr, iroom, optr, oroom);
+ info->ostate = JIS_UNKNOWN;
if (r == (size_t)-1) {
if (errno == EINVAL) return INPUT_NOT_ENOUGH;
if (errno == E2BIG) return OUTPUT_NOT_ENOUGH;
***************
*** 1315,1325 ****
static size_t jconv_iconv_reset(ScmConvInfo *info, char *optr, size_t oroom)
{
size_t oroom_prev = oroom;
! size_t r = iconv(info->handle, NULL, 0, &optr, &oroom);
if (r == (size_t)-1) {
if (errno == E2BIG) return OUTPUT_NOT_ENOUGH;
Scm_Panic("jconv_iconv_reset: unknown error number %d\n", errno);
}
return oroom_prev - oroom;
}
#endif /*HAVE_ICONV_H*/
--- 1322,1335 ----
static size_t jconv_iconv_reset(ScmConvInfo *info, char *optr, size_t oroom)
{
size_t oroom_prev = oroom;
! size_t r;
! if (info->ostate == JIS_ASCII) return 0;
! r = iconv(info->handle, NULL, 0, &optr, &oroom);
if (r == (size_t)-1) {
if (errno == E2BIG) return OUTPUT_NOT_ENOUGH;
Scm_Panic("jconv_iconv_reset: unknown error number %d\n", errno);
}
+ info->ostate = JIS_ASCII;
return oroom_prev - oroom;
}
#endif /*HAVE_ICONV_H*/