euc_kr.h
Upload User: yingmei828
Upload Date: 2007-01-01
Package Size: 1646k
Code Size: 1k
Development Platform:

Unix_Linux

  1. /*
  2.  * EUC-KR
  3.  */
  4. /* Specification: RFC 1557 */
  5. static int
  6. euc_kr_mbtowc (conv_t conv, wchar_t *pwc, const unsigned char *s, int n)
  7. {
  8.   unsigned char c = *s;
  9.   /* Code set 0 (ASCII or KS C 5636-1993) */
  10.   if (c < 0x80)
  11.     return ascii_mbtowc(conv,pwc,s,n);
  12.   /* Code set 1 (KS C 5601-1992) */
  13.   if (c >= 0xa1 && c < 0xff) {
  14.     if (n < 2)
  15.       return RET_TOOFEW(0);
  16.     {
  17.       unsigned char c2 = s[1];
  18.       if (c2 >= 0xa1 && c2 < 0xff) {
  19.         unsigned char buf[2];
  20.         buf[0] = c-0x80; buf[1] = c2-0x80;
  21.         return ksc5601_mbtowc(conv,pwc,buf,2);
  22.       } else
  23.         return RET_ILSEQ;
  24.     }
  25.   }
  26.   return RET_ILSEQ;
  27. }
  28. static int
  29. euc_kr_wctomb (conv_t conv, unsigned char *r, wchar_t wc, int n)
  30. {
  31.   unsigned char buf[2];
  32.   int ret;
  33.   /* Code set 0 (ASCII or KS C 5636-1993) */
  34.   ret = ascii_wctomb(conv,r,wc,n);
  35.   if (ret != RET_ILSEQ)
  36.     return ret;
  37.   /* Code set 1 (KS C 5601-1992) */
  38.   ret = ksc5601_wctomb(conv,buf,wc,2);
  39.   if (ret != RET_ILSEQ) {
  40.     if (ret != 2) abort();
  41.     if (n < 2)
  42.       return RET_TOOSMALL;
  43.     r[0] = buf[0]+0x80;
  44.     r[1] = buf[1]+0x80;
  45.     return 2;
  46.   }
  47.   return RET_ILSEQ;
  48. }