FLTK 1.3.2
jisx0201.h
00001 /* $XFree86: xc/lib/X11/lcUniConv/jisx0201.h,v 1.3 2000/11/29 17:40:33 dawes Exp $ */
00002 
00003 /*
00004  * JISX0201.1976-0
00005  */
00006 #ifdef NEED_TOWC
00007 
00008 static int
00009 jisx0201_mbtowc (conv_t conv, ucs4_t *pwc, const unsigned char *s, int n)
00010 {
00011   unsigned char c = *s;
00012   if (c < 0x80) {
00013     if (c == 0x5c)
00014       *pwc = (ucs4_t) 0x00a5;
00015     else if (c == 0x7e)
00016       *pwc = (ucs4_t) 0x203e;
00017     else
00018       *pwc = (ucs4_t) c;
00019     return 1;
00020   } else {
00021     if (c >= 0xa1 && c < 0xe0) {
00022       *pwc = (ucs4_t) c + 0xfec0;
00023       return 1;
00024     }
00025   }
00026   return RET_ILSEQ;
00027 }
00028 #endif /* NEED_TOWC */
00029 
00030 #ifdef NEED_TOMB
00031 
00032 static int
00033 jisx0201_wctomb (conv_t conv, unsigned char *r, ucs4_t wc, int n)
00034 {
00035   if (wc < 0x0080 && !(wc == 0x005c || wc == 0x007e)) {
00036     *r = wc;
00037     return 1;
00038   }
00039   if (wc == 0x00a5) {
00040     *r = 0x5c;
00041     return 1;
00042   }
00043   if (wc == 0x203e) {
00044     *r = 0x7e;
00045     return 1;
00046   }
00047   if (wc >= 0xff61 && wc < 0xffa0) {
00048     *r = wc - 0xfec0;
00049     return 1;
00050   }
00051   return RET_ILSEQ;
00052 }
00053 #endif /* NEED_TOMB */