mirror of
https://github.com/tildeclub/ex-vi.git
synced 2026-06-23 20:29:24 +00:00
files from last release. ex-050325
This commit is contained in:
77
libuxre/regcomp.c
Normal file
77
libuxre/regcomp.c
Normal file
@@ -0,0 +1,77 @@
|
||||
/*
|
||||
* Changes by Gunnar Ritter, Freiburg i. Br., Germany, November 2002.
|
||||
*
|
||||
* Sccsid @(#)regcomp.c 1.6 (gritter) 9/22/03
|
||||
*/
|
||||
/* UNIX(R) Regular Expresssion Library
|
||||
*
|
||||
* Note: Code is released under the GNU LGPL
|
||||
*
|
||||
* Copyright (C) 2001 Caldera International, Inc.
|
||||
*
|
||||
* This library is free software; you can redistribute it and/or
|
||||
* modify it under the terms of the GNU Lesser General Public
|
||||
* License as published by the Free Software Foundation; either
|
||||
* version 2 of the License, or (at your option) any later version.
|
||||
*
|
||||
* This library is distributed in the hope that it will be useful,
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||
* Lesser General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU Lesser General Public
|
||||
* License along with this library; if not, write to:
|
||||
* Free Software Foundation, Inc.
|
||||
* 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
*/
|
||||
|
||||
/* #include "synonyms.h" */
|
||||
#include "re.h"
|
||||
|
||||
/* #pragma weak regcomp = _regcomp */
|
||||
|
||||
int
|
||||
regcomp(regex_t *ep, const char *pat, int flags)
|
||||
{
|
||||
Tree *tp;
|
||||
Lex lex;
|
||||
|
||||
if ((tp=libuxre_regparse(&lex, (const unsigned char *)pat, flags)) == 0)
|
||||
goto out;
|
||||
ep->re_nsub = lex.nleft;
|
||||
ep->re_flags = lex.flags & ~(REG_NOTBOL | REG_NOTEOL | REG_NONEMPTY);
|
||||
ep->re_col = lex.col;
|
||||
ep->re_mb_cur_max = lex.mb_cur_max;
|
||||
/*
|
||||
* Build the engine(s). The factors determining which are built:
|
||||
* 1. If the pattern built insists on an NFA, then only build NFA.
|
||||
* 2. If flags include REG_NOSUB or REG_ONESUB and not (1),
|
||||
* then only build DFA.
|
||||
* 3. Otherwise, build both.
|
||||
* Since libuxre_regdfacomp() modifies the tree and libuxre_regnfacomp()
|
||||
* doesn't, libuxre_regnfacomp() must be called first, if both are to
|
||||
* be called.
|
||||
*/
|
||||
if (ep->re_nsub != 0 && (flags & (REG_NOSUB | REG_ONESUB)) == 0
|
||||
|| lex.flags & REG_NFA)
|
||||
{
|
||||
ep->re_flags |= REG_NFA;
|
||||
if ((lex.err = libuxre_regnfacomp(ep, tp, &lex)) != 0)
|
||||
goto out;
|
||||
}
|
||||
if ((lex.flags & REG_NFA) == 0)
|
||||
{
|
||||
ep->re_flags |= REG_DFA;
|
||||
if ((lex.err = libuxre_regdfacomp(ep, tp, &lex)) != 0)
|
||||
{
|
||||
if (ep->re_flags & REG_NFA)
|
||||
libuxre_regdelnfa(ep->re_nfa);
|
||||
}
|
||||
}
|
||||
out:;
|
||||
if (lex.err != 0 && lex.col != 0)
|
||||
(void)libuxre_lc_collate(lex.col);
|
||||
if (tp != 0)
|
||||
libuxre_regdeltree(tp, lex.err);
|
||||
return lex.err;
|
||||
}
|
||||
Reference in New Issue
Block a user