/* re.c: This file contains the regular expression interface routines for
* Copyright (c) 1993 Andrew Moore, Talke Studio.
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
static char *rcsid
= "@(#)$Id: re.c,v 1.2 1993/12/14 16:19:56 alm Exp $";
char errmsg
[MAXPATHLEN
+ 40] = "";
/* get_compiled_pattern: return pointer to compiled pattern from command
static pattern_t
*exp
= NULL
;
if ((delimiter
= *ibufp
) == ' ') {
sprintf(errmsg
, "invalid pattern delimiter");
} else if (delimiter
== '\n' || *++ibufp
== '\n' || *ibufp
== delimiter
) {
if (!exp
) sprintf(errmsg
, "no previous pattern");
} else if ((exps
= extract_pattern(delimiter
)) == NULL
)
/* buffer alloc'd && not reserved */
else if ((exp
= (pattern_t
*) malloc(sizeof(pattern_t
))) == NULL
) {
fprintf(stderr
, "%s\n", strerror(errno
));
sprintf(errmsg
, "out of memory");
if (n
= regcomp(exp
, exps
, 0)) {
regerror(n
, exp
, errmsg
, sizeof errmsg
);
/* extract_pattern: copy a pattern string from the command buffer; return
extract_pattern(delimiter
)
static char *lhbuf
= NULL
; /* buffer */
static int lhbufsz
= 0; /* buffer size */
for (nd
= ibufp
; *nd
!= delimiter
&& *nd
!= '\n'; nd
++)
if ((nd
= parse_char_class(++nd
)) == NULL
) {
sprintf(errmsg
, "unbalanced brackets ([])");
sprintf(errmsg
, "trailing backslash (\\)");
REALLOC(lhbuf
, lhbufsz
, len
+ 1, NULL
);
memcpy(lhbuf
, ibufp
, len
);
return (isbinary
) ? NUL_TO_NEWLINE(lhbuf
, len
) : lhbuf
;
/* parse_char_class: expand a POSIX character class */
for (; *s
!= ']' && *s
!= '\n'; s
++)
if (*s
== '[' && ((d
= *(s
+1)) == '.' || d
== ':' || d
== '='))
for (s
++, c
= *++s
; *s
!= ']' || c
!= d
; s
++)
return (*s
== ']') ? s
: NULL
;