1
2 /* : : generated by proto : : */
3 /***********************************************************************
4 * *
5 * This software is part of the ast package *
6 * Copyright (c) 1985-2010 AT&T Intellectual Property *
7 * and is licensed under the *
8 * Common Public License, Version 1.0 *
9 * by AT&T Intellectual Property *
10 * *
11 * A copy of the License is available at *
12 * http://www.opensource.org/licenses/cpl1.0.txt *
13 * (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9) *
14 * *
15 * Information and Software Systems Research *
16 * AT&T Research *
17 * Florham Park NJ *
18 * *
19 * Glenn Fowler <gsf@research.att.com> *
20 * David Korn <dgk@research.att.com> *
21 * Phong Vo <kpv@research.att.com> *
22 * *
23 ***********************************************************************/
24
25 /*
26 * regexp interface and partial implementation
27 * what a novel approach
28 * don't do it again
29 *
30 * OBSOLETE: use <regex.h>
31 */
32
33 #ifndef _REGEXP_H
34 #if !defined(__PROTO__)
35 #include <prototyped.h>
36 #endif
37 #if !defined(__LINKAGE__)
38 #define __LINKAGE__ /* 2004-08-11 transition */
39 #endif
40
41 #define _REGEXP_H
42
43 #define NBRA 9
44
45 typedef struct
46 {
47 char* re_braslist[NBRA];
48 char* re_braelist[NBRA];
49 char* re_loc1;
50 char* re_loc2;
51 char* re_locs;
52 int re_circf;
53 int re_nbra;
54 int re_nodelim;
55 int re_sed;
56 } regexp_t;
57
58 #define braslist _re_info.re_braslist
59 #define braelist _re_info.re_braelist
60 #define circf _re_info.re_circf
61 #define loc1 _re_info.re_loc1
62 #define loc2 _re_info.re_loc2
63 #define locs _re_info.re_locs
64 #define nbra _re_info.re_nbra
65 #define nodelim _re_info.re_nodelim
66 #define sed _re_info.re_sed
67
68 #define advance(a,b) _re_exec(&_re_info,a,b,1)
69 #define compile(a,b,c,d) _re_read(&_re_info,a,b,c,d)
70 #define step(a,b) _re_exec(&_re_info,a,b,0)
71
72 #if _BLD_ast && defined(__EXPORT__)
73 #undef __MANGLE__
74 #define __MANGLE__ __LINKAGE__ __EXPORT__
75 #endif
76
77 extern __MANGLE__ int _re_comp __PROTO__((regexp_t*, const char*, char*, unsigned int));
78 extern __MANGLE__ int _re_exec __PROTO__((regexp_t*, const char*, const char*, int));
79 extern __MANGLE__ char* _re_putc __PROTO__((int));
80 extern __MANGLE__ char* _re_read __PROTO__((regexp_t*, const char*, char*, const char*, int));
81
82 #undef __MANGLE__
83 #define __MANGLE__ __LINKAGE__
84
85 #ifndef _REGEXP_DECLARE
86
87 regexp_t _re_info;
88
89 char*
__OTORP__(register regexp_t * re;const char * instring;char * ep;const char * endbuf;int seof;)90 _re_read __PARAM__((register regexp_t* re, const char* instring, char* ep, const char* endbuf, int seof), (re, instring, ep, endbuf, seof)) __OTORP__(register regexp_t* re; const char* instring; char* ep; const char* endbuf; int seof;){
91 register int c;
92
93 static const char* prev;
94
95 #ifdef INIT
96 INIT;
97 #endif
98
99 re->re_nodelim = 0;
100 if ((c = GETC()) == seof || c == '\n' || c == -1 || c == 0)
101 {
102 if (c != seof)
103 {
104 UNGETC(c);
105 re->re_nodelim = 1;
106 }
107 if (!re->re_sed && !prev)
108 { ERROR(41); }
109 RETURN((char*)endbuf);
110 }
111 UNGETC(c);
112 prev = 0;
113 for (;;)
114 {
115 if ((c = GETC()) == seof || c == '\n' || c == -1 || c == 0)
116 {
117 if (re->re_sed)
118 { ERROR(36); }
119 UNGETC(c);
120 re->re_nodelim = 1;
121 break;
122 }
123 if (c == '\\')
124 {
125 _re_putc(c);
126 if ((c = GETC()) == seof || c == '\n' || c == -1 || c == 0)
127 { ERROR(36); }
128 }
129 _re_putc(c);
130 }
131 if (c = _re_comp(re, _re_putc(0), ep, (char*)endbuf - ep))
132 { ERROR(c); }
133 prev = endbuf;
134 RETURN((char*)prev);
135 }
136
137 #endif
138
139 #endif
140