regcustom.h
上传用户:rrhhcc
上传日期:2015-12-11
资源大小:54129k
文件大小:4k
源码类别:

通讯编程

开发平台:

Visual C++

  1. /*
  2.  * Copyright (c) 1998, 1999 Henry Spencer.  All rights reserved.
  3.  * 
  4.  * Development of this software was funded, in part, by Cray Research Inc.,
  5.  * UUNET Communications Services Inc., Sun Microsystems Inc., and Scriptics
  6.  * Corporation, none of whom are responsible for the results.  The author
  7.  * thanks all of them. 
  8.  * 
  9.  * Redistribution and use in source and binary forms -- with or without
  10.  * modification -- are permitted for any purpose, provided that
  11.  * redistributions in source form retain this entire copyright notice and
  12.  * indicate the origin and nature of any modifications.
  13.  * 
  14.  * I'd appreciate being given credit for this package in the documentation
  15.  * of software which uses it, but that is not a requirement.
  16.  * 
  17.  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
  18.  * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
  19.  * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL
  20.  * HENRY SPENCER BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
  21.  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
  22.  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
  23.  * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
  24.  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
  25.  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
  26.  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  27.  */
  28. /* headers if any */
  29. #include "tclInt.h"
  30. /* overrides for regguts.h definitions, if any */
  31. #define FUNCPTR(name, args) (*name) _ANSI_ARGS_(args)
  32. #define MALLOC(n) ckalloc(n)
  33. #define FREE(p) ckfree(VS(p))
  34. #define REALLOC(p,n) ckrealloc(VS(p),n)
  35. /*
  36.  * Do not insert extras between the "begin" and "end" lines -- this
  37.  * chunk is automatically extracted to be fitted into regex.h.
  38.  */
  39. /* --- begin --- */
  40. /* ensure certain things don't sneak in from system headers */
  41. #ifdef __REG_WIDE_T
  42. #undef __REG_WIDE_T
  43. #endif
  44. #ifdef __REG_WIDE_COMPILE
  45. #undef __REG_WIDE_COMPILE
  46. #endif
  47. #ifdef __REG_WIDE_EXEC
  48. #undef __REG_WIDE_EXEC
  49. #endif
  50. #ifdef __REG_REGOFF_T
  51. #undef __REG_REGOFF_T
  52. #endif
  53. #ifdef __REG_VOID_T
  54. #undef __REG_VOID_T
  55. #endif
  56. #ifdef __REG_CONST
  57. #undef __REG_CONST
  58. #endif
  59. #ifdef __REG_NOFRONT
  60. #undef __REG_NOFRONT
  61. #endif
  62. #ifdef __REG_NOCHAR
  63. #undef __REG_NOCHAR
  64. #endif
  65. /* interface types */
  66. #define __REG_WIDE_T Tcl_UniChar
  67. #define __REG_REGOFF_T long /* not really right, but good enough... */
  68. #define __REG_VOID_T VOID
  69. #define __REG_CONST CONST
  70. /* names and declarations */
  71. #define __REG_WIDE_COMPILE TclReComp
  72. #define __REG_WIDE_EXEC TclReExec
  73. #define __REG_NOFRONT /* don't want regcomp() and regexec() */
  74. #define __REG_NOCHAR /* or the char versions */
  75. #define regfree TclReFree
  76. #define regerror TclReError
  77. /* --- end --- */
  78. /* internal character type and related */
  79. typedef Tcl_UniChar chr; /* the type itself */
  80. typedef int pchr; /* what it promotes to */
  81. typedef unsigned uchr; /* unsigned type that will hold a chr */
  82. typedef int celt; /* type to hold chr, MCCE number, or NOCELT */
  83. #define NOCELT (-1) /* celt value which is not valid chr or MCCE */
  84. #define CHR(c) (UCHAR(c)) /* turn char literal into chr literal */
  85. #define DIGITVAL(c) ((c)-'0') /* turn chr digit into its value */
  86. #if TCL_UTF_MAX > 3
  87. #define CHRBITS 32 /* bits in a chr; must not use sizeof */
  88. #define CHR_MIN 0x00000000 /* smallest and largest chr; the value */
  89. #define CHR_MAX 0xffffffff /*  CHR_MAX-CHR_MIN+1 should fit in uchr */
  90. #else
  91. #define CHRBITS 16 /* bits in a chr; must not use sizeof */
  92. #define CHR_MIN 0x0000 /* smallest and largest chr; the value */
  93. #define CHR_MAX 0xffff /*  CHR_MAX-CHR_MIN+1 should fit in uchr */
  94. #endif
  95. /* functions operating on chr */
  96. #define iscalnum(x) Tcl_UniCharIsAlnum(x)
  97. #define iscalpha(x) Tcl_UniCharIsAlpha(x)
  98. #define iscdigit(x) Tcl_UniCharIsDigit(x)
  99. #define iscspace(x) Tcl_UniCharIsSpace(x)
  100. /* name the external functions */
  101. #define compile TclReComp
  102. #define exec TclReExec
  103. /* enable/disable debugging code (by whether REG_DEBUG is defined or not) */
  104. #if 0 /* no debug unless requested by makefile */
  105. #define REG_DEBUG /* */
  106. #endif
  107. /* and pick up the standard header */
  108. #include "regex.h"