m_ctype.h
上传用户:jmzj888
上传日期:2007-01-02
资源大小:220k
文件大小:4k
源码类别:

MySQL数据库

开发平台:

Visual C++

  1. /* Copyright (C) 1996  TCX DataKonsult AB & Monty Program KB & Detron HB
  2.    For a more info consult the file COPYRIGHT distributed with this file */
  3. /*
  4.   A better inplementation of the UNIX ctype(3) library.
  5.   Notes:   global.h should be included before ctype.h
  6. */
  7. #ifndef _m_ctype_h
  8. #define _m_ctype_h
  9. #ifdef WIN32
  10. #include <ctype.h>
  11. #endif
  12. #define _CTYPE_H /* Don't include std ctype.h when this is included */
  13. #ifndef CTYPE_LIBRARY
  14. #define EXT extern
  15. #define D(x)
  16. #else
  17. #define EXT
  18. #define D(x) = x
  19. #endif
  20. #define _U 01 /* Upper case */
  21. #define _L 02 /* Lower case */
  22. #define _N 04 /* Numeral (digit) */
  23. #define _S 010 /* Spacing character */
  24. #define _P 020 /* Punctuation */
  25. #define _C 040 /* Control character */
  26. #define _B 0100 /* Blank */
  27. #define _X 0200 /* heXadecimal digit */
  28. extern uchar NEAR ctype_usa7[];
  29. extern uchar NEAR to_upper_usa7[],NEAR to_lower_usa7[],NEAR sort_order_usa7[];
  30. extern uchar NEAR ctype_swe7[];
  31. extern uchar NEAR to_upper_swe7[],NEAR to_lower_swe7[],NEAR sort_order_swe7[];
  32. extern uchar NEAR ctype_hp8[];
  33. extern uchar NEAR to_upper_hp8[],NEAR to_lower_hp8[],NEAR sort_order_hp8[];
  34. extern uchar NEAR ctype_dec8[];
  35. extern uchar NEAR to_upper_dec8[],NEAR to_lower_dec8[],NEAR sort_order_dec8[];
  36. extern uchar NEAR ctype_ISO_8859_1[];
  37. extern uchar NEAR to_upper_ISO_8859_1[],NEAR to_lower_ISO_8859_1[],
  38.      NEAR sort_order_ISO_8859_1[];
  39. #if defined(USE_USA7BITCHARS) + 
  40.     defined(USE_SWE7BITCHARS) + 
  41.     defined(USE_DEC8BITCHARS) + 
  42.     defined(USE_HP8BITCHARS) + 
  43.     defined(USE_ISO_8859_1) + 
  44.     defined(MSDOS) != 1
  45. error "More than one USE_xxxnBITCHARS defined"
  46. #endif
  47. #ifdef USE_USA7BITCHARS
  48. /* to_*_usa7 is also used directly by other programs (dlisp) */
  49. EXT uchar *my_ctype D(ctype_usa7);
  50. EXT uchar *my_to_lower D(to_lower_usa7);
  51. EXT uchar *my_to_upper D(to_upper_usa7);
  52. EXT uchar *my_sort_order D(sort_order_usa7);
  53. #else
  54. #ifdef USE_SWE7BITCHARS
  55. EXT uchar *my_ctype D(ctype_swe7);
  56. EXT uchar *my_to_upper D(to_upper_swe7);
  57. EXT uchar *my_to_lower D(to_lower_swe7);
  58. EXT uchar *my_sort_order D(sort_order_swe7);
  59. #else
  60. #ifdef USE_HP8BITCHARS
  61. /* use HPUX internal tables */
  62. EXT uchar *my_ctype D(ctype_hp8);
  63. EXT uchar *my_to_upper D(to_upper_hp8);
  64. EXT uchar *my_to_lower D(to_lower_hp8);
  65. EXT uchar *my_sort_order D(sort_order_hp8);
  66. #else
  67. #ifdef USE_DEC8BITCHARS
  68. /* use DEC multinational chars */
  69. EXT uchar *my_ctype D(ctype_dec8);
  70. EXT uchar *my_to_upper D(to_upper_dec8);
  71. EXT uchar *my_to_lower D(to_lower_dec8);
  72. EXT uchar *my_sort_order D(sort_order_dec8);
  73. #else
  74. #ifdef USE_ISO_8859_1
  75. EXT uchar *my_ctype D(ctype_ISO_8859_1);
  76. EXT uchar *my_to_upper D(to_upper_ISO_8859_1);
  77. EXT uchar *my_to_lower D(to_lower_ISO_8859_1);
  78. EXT uchar *my_sort_order D(sort_order_ISO_8859_1);
  79. #else
  80. #ifdef MSDOS
  81. #define my_ctype ctype
  82. #define my_to_upper to_upper
  83. #define my_to_lower to_lower
  84. #define my_sort_order sort_order
  85. extern uchar NEAR ctype[],NEAR to_lower[],NEAR to_upper[],NEAR sort_order[];
  86. #endif /* MSDOS */
  87. #endif
  88. #endif
  89. #endif
  90. #endif
  91. #endif
  92. #ifndef WIN32
  93. #define _toupper(c) (char) my_to_upper[(uchar) (c)]
  94. #define _tolower(c) (char) my_to_lower[(uchar) (c)]
  95. #define toupper(c) (char) my_to_upper[(uchar) (c)]
  96. #define tolower(c) (char) my_to_lower[(uchar) (c)]
  97. #define isalpha(c) ((my_ctype+1)[(uchar) (c)] & (_U | _L))
  98. #define isupper(c) ((my_ctype+1)[(uchar) (c)] & _U)
  99. #define islower(c) ((my_ctype+1)[(uchar) (c)] & _L)
  100. #define isdigit(c) ((my_ctype+1)[(uchar) (c)] & _N)
  101. #define isxdigit(c) ((my_ctype+1)[(uchar) (c)] & _X)
  102. #define isalnum(c) ((my_ctype+1)[(uchar) (c)] & (_U | _L | _N))
  103. #define isspace(c) ((my_ctype+1)[(uchar) (c)] & _S)
  104. #define ispunct(c) ((my_ctype+1)[(uchar) (c)] & _P)
  105. #define isprint(c) ((my_ctype+1)[(uchar) (c)] & (_P | _U | _L | _N | _B))
  106. #define isgraph(c) ((my_ctype+1)[(uchar) (c)] & (_P | _U | _L | _N))
  107. #define iscntrl(c) ((my_ctype+1)[(uchar) (c)] & _C)
  108. #define isascii(c) (!((c) & ~0177))
  109. #define toascii(c) ((c) & 0177)
  110. #endif
  111. #ifdef ctype
  112. #undef ctype
  113. #endif /* ctype */
  114. /* These is allways used */
  115. /* Some macros that should be cleaned up a little */
  116. #define isvar(c) (isalnum(c) || (c) == '_')
  117. #define isvar_start(c) (isalpha(c) || (c) == '_')
  118. #define tocntrl(c) ((c) & 31)
  119. #define toprint(c) ((c) | 64)
  120. #endif /* _m_ctype_h */