source/include/kanji.h

   1 /*
   2    Unix SMB/Netbios implementation.
   3    Version 1.9.
   4    Kanji Extensions
   5    Copyright (C) Andrew Tridgell 1992-1997
   6
   7    This program is free software; you can redistribute it and/or modify
   8    it under the terms of the GNU General Public License as published by
   9    the Free Software Foundation; either version 2 of the License, or
  10    (at your option) any later version.
  11
  12    This program is distributed in the hope that it will be useful,
  13    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15    GNU General Public License for more details.
  16
  17    You should have received a copy of the GNU General Public License
  18    along with this program; if not, write to the Free Software
  19    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  20
  21    Adding for Japanese language by <fujita@ainix.isac.co.jp> 1994.9.5
  22      and extend coding system to EUC/SJIS/JIS/HEX at 1994.10.11
  23      and add all jis codes sequence at 1995.8.16
  24      Notes: Hexadecimal code by <ohki@gssm.otuka.tsukuba.ac.jp>
  25      and add upper/lower case conversion 1997.8.21
  26 */
  27 #ifndef _KANJI_H_
  28 #define _KANJI_H_
  29
  30 #ifdef KANJI
  31
  32 /* FOR SHIFT JIS CODE */
  33 #define is_shift_jis(c) \
  34     ((0x81 <= ((unsigned char) (c)) && ((unsigned char) (c)) <= 0x9f) \
  35      || (0xe0 <= ((unsigned char) (c)) && ((unsigned char) (c)) <= 0xef))
  36 #define is_shift_jis2(c) \
  37     (0x40 <= ((unsigned char) (c)) && ((unsigned char) (c)) <= 0xfc \
  38     && ((unsigned char) (c)) != 0x7f)
  39 #define is_kana(c) ((0xa0 <= ((unsigned char) (c)) && ((unsigned char) (c)) <= 0xdf))
  40
  41 /* case conversion */
  42 #define is_sj_upper2(c) \
  43   ((0x60 <= (unsigned char) (c)) && ((unsigned char) (c) <= 0x79))
  44 #define is_sj_lower2(c) \
  45   ((0x81 <= (unsigned char) (c)) && ((unsigned char) (c) <= 0x9A))
  46 #define sjis_alph 0x82
  47 #define is_sj_alph(c) (sjis_alph == (unsigned char) (c))
  48 #define is_sj_upper(c1, c2) (is_sj_alph (c1) && is_sj_upper2 (c2))
  49 #define is_sj_lower(c1, c2) (is_sj_alph (c1) && is_sj_lower2 (c2))
  50 #define sj_toupper2(c) \
  51     (is_sj_lower2 (c) ? ((int) ((unsigned char) (c) - 0x81 + 0x60)) : \
  52      ((int) (unsigned char) (c)))
  53 #define sj_tolower2(c) \
  54     (is_sj_upper2 (c) ? ((int) ((unsigned char) (c) - 0x60 + 0x81)) : \
  55      ((int) (unsigned char) (c)))
  56
  57 #ifdef _KANJI_C_
  58 /* FOR EUC CODE */
  59 #define euc_kana (0x8e)
  60 #define is_euc_kana(c) (((unsigned char) (c)) == euc_kana)
  61 #define is_euc(c)  (0xa0 < ((unsigned char) (c)) && ((unsigned char) (c)) < 0xff)
  62
  63 /* FOR JIS CODE */
  64 /* default jis third shift code, use for output */
  65 #ifndef JIS_KSO
  66 #define JIS_KSO 'B'
  67 #endif
  68 #ifndef JIS_KSI
  69 #define JIS_KSI 'J'
  70 #endif
  71 /* in: \E$B or \E$@ */
  72 /* out: \E(J or \E(B or \E(H */
  73 #define jis_esc (0x1b)
  74 #define jis_so (0x0e)
  75 #define jis_so1 ('$')
  76 #define jis_so2 ('B')
  77 #define jis_si (0x0f)
  78 #define jis_si1 ('(')
  79 #define jis_si2 ('J')
  80 #define is_esc(c) (((unsigned char) (c)) == jis_esc)
  81 #define is_so1(c) (((unsigned char) (c)) == jis_so1)
  82 #define is_so2(c) (((unsigned char) (c)) == jis_so2 || ((unsigned char) (c)) == '@')
  83 #define is_si1(c) (((unsigned char) (c)) == jis_si1)
  84 #define is_si2(c) (((unsigned char) (c)) == jis_si2 || ((unsigned char) (c)) == 'B' \
  85     || ((unsigned char) (c)) == 'H')
  86 #define is_so(c) (((unsigned char) (c)) == jis_so)
  87 #define is_si(c) (((unsigned char) (c)) == jis_si)
  88 #define junet_kana1 ('(')
  89 #define junet_kana2 ('I')
  90 #define is_juk1(c) (((unsigned char) (c)) == junet_kana1)
  91 #define is_juk2(c) (((unsigned char) (c)) == junet_kana2)
  92
  93 #define _KJ_ROMAN (0)
  94 #define _KJ_KANJI (1)
  95 #define _KJ_KANA (2)
  96
  97 /* FOR HEX */
  98 #define HEXTAG ':'
  99 #define hex2bin(x)                                                    \
 100     ( ((int) '0' <= ((int) (x)) && ((int) (x)) <= (int)'9')?          \
 101         (((int) (x))-(int)'0'):                                       \
 102       ((int) 'a'<= ((int) (x)) && ((int) (x))<= (int) 'f')?           \
 103         (((int) (x)) - (int)'a'+10):                                  \
 104       (((int) (x)) - (int)'A'+10) )
 105 #define bin2hex(x)                                                    \
 106     ( (((int) (x)) >= 10)? (((int) (x))-10 + (int) 'a'): (((int) (x)) + (int) '0') )
 107
 108 #else /* not _KANJI_C_ */
 109
 110 extern char* (*_dos_to_unix) (const char *str, BOOL overwrite);
 111 extern char* (*_unix_to_dos) (const char *str, BOOL overwrite);
 112
 113 #define unix_to_dos (*_unix_to_dos)
 114 #define dos_to_unix (*_dos_to_unix)
 115
 116 extern char *sj_strtok (char *s1, const char *s2);
 117 extern char *sj_strchr (const char *s, int c);
 118 extern char *sj_strrchr (const char *s, int c);
 119 extern char *sj_strstr (const char *s1, const char *s2);
 120
 121 #define strchr sj_strchr
 122 #define strrchr sj_strrchr
 123 #define strstr sj_strstr
 124 #define strtok sj_strtok
 125
 126 #endif /* _KANJI_C_ */
 127
 128 #define UNKNOWN_CODE (-1)
 129 #define SJIS_CODE (0)
 130 #define EUC_CODE (1)
 131 #define JIS7_CODE (2)
 132 #define JIS8_CODE (3)
 133 #define JUNET_CODE (4)
 134 #define HEX_CODE (5)
 135 #define CAP_CODE (6)
 136 #define DOSV_CODE SJIS_CODE
 137
 138 int interpret_coding_system (char *str, int def);
 139
 140 #else
 141
 142 #define unix_to_dos(x,y) unix2dos_format(x,y)
 143 #define dos_to_unix(x,y) dos2unix_format(x,y)
 144
 145 #endif /* not KANJI */
 146
 147 #endif /* _KANJI_H_ */