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
45typedef 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
77extern __MANGLE__ int	_re_comp __PROTO__((regexp_t*, const char*, char*, unsigned int));
78extern __MANGLE__ int	_re_exec __PROTO__((regexp_t*, const char*, const char*, int));
79extern __MANGLE__ char*	_re_putc __PROTO__((int));
80extern __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
87regexp_t	_re_info;
88
89char*
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