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