annotate src/regex.h @ 5223:acc4a6c9f5f9

Remove the definition of Q_data from glyphs.c, fixing C++ build. 2010-06-01 Aidan Kehoe <kehoea@parhasard.net> * glyphs.c (syms_of_glyphs): Remove the definition of Q_data from this file, now it's in general-slots.h. Problem picked up by a C++ build.
author Aidan Kehoe <kehoea@parhasard.net>
date Tue, 01 Jun 2010 20:31:11 +0100
parents f283b08ff0c9
children 308d34e9f07d
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
1 /* Definitions for data structures and routines for the regular
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
2 expression library, version 0.12.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
3
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
4 Copyright (C) 1985, 89, 90, 91, 92, 93, 95 Free Software Foundation, Inc.
5041
efaa6cd845e5 add regexp-debugging
Ben Wing <ben@xemacs.org>
parents: 2639
diff changeset
5 Copyright (C) 2002, 2010 Ben Wing.
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
6
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
7 This program is free software; you can redistribute it and/or modify
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
8 it under the terms of the GNU General Public License as published by
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
9 the Free Software Foundation; either version 2, or (at your option)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
10 any later version.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
11
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
12 This program is distributed in the hope that it will be useful,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
15 GNU General Public License for more details.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
16
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
17 You should have received a copy of the GNU General Public License
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
18 along with this program; see the file COPYING. If not, write to
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
19 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
20 Boston, MA 02111-1307, USA. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
21
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
22 /* Synched up with: FSF 19.29. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
23
440
8de8e3f6228a Import from CVS: tag r21-2-28
cvs
parents: 428
diff changeset
24 #ifndef INCLUDED_regex_h_
8de8e3f6228a Import from CVS: tag r21-2-28
cvs
parents: 428
diff changeset
25 #define INCLUDED_regex_h_
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
26
446
1ccc32a20af4 Import from CVS: tag r21-2-38
cvs
parents: 442
diff changeset
27 #ifdef emacs
1ccc32a20af4 Import from CVS: tag r21-2-38
cvs
parents: 442
diff changeset
28 #define RE_TRANSLATE_TYPE Lisp_Object
2333
ba4677f54a05 [xemacs-hg @ 2004-10-14 17:26:18 by james]
james
parents: 1468
diff changeset
29 #define RE_LISP_SHORT_CONTEXT_ARGS_DECL , Lisp_Object UNUSED (lispobj), struct buffer *UNUSED (lispbuf)
826
6728e641994e [xemacs-hg @ 2002-05-05 11:30:15 by ben]
ben
parents: 665
diff changeset
30 #define RE_LISP_SHORT_CONTEXT_ARGS , lispobj, lispbuf
6728e641994e [xemacs-hg @ 2002-05-05 11:30:15 by ben]
ben
parents: 665
diff changeset
31 #define RE_LISP_CONTEXT_ARGS_DECL , Lisp_Object lispobj, struct buffer *lispbuf, struct syntax_cache *scache
2333
ba4677f54a05 [xemacs-hg @ 2004-10-14 17:26:18 by james]
james
parents: 1468
diff changeset
32 #define RE_LISP_CONTEXT_ARGS_MULE_DECL , Lisp_Object lispobj, struct buffer *USED_IF_MULE (lispbuf), struct syntax_cache *scache
826
6728e641994e [xemacs-hg @ 2002-05-05 11:30:15 by ben]
ben
parents: 665
diff changeset
33 #define RE_LISP_CONTEXT_ARGS , lispobj, lispbuf, scache
446
1ccc32a20af4 Import from CVS: tag r21-2-38
cvs
parents: 442
diff changeset
34 #else
1ccc32a20af4 Import from CVS: tag r21-2-38
cvs
parents: 442
diff changeset
35 #define RE_TRANSLATE_TYPE char *
826
6728e641994e [xemacs-hg @ 2002-05-05 11:30:15 by ben]
ben
parents: 665
diff changeset
36 #define RE_LISP_SHORT_CONTEXT_ARGS_DECL
6728e641994e [xemacs-hg @ 2002-05-05 11:30:15 by ben]
ben
parents: 665
diff changeset
37 #define RE_LISP_SHORT_CONTEXT_ARGS
6728e641994e [xemacs-hg @ 2002-05-05 11:30:15 by ben]
ben
parents: 665
diff changeset
38 #define RE_LISP_CONTEXT_ARGS_DECL
2333
ba4677f54a05 [xemacs-hg @ 2004-10-14 17:26:18 by james]
james
parents: 1468
diff changeset
39 #define RE_LISP_CONTEXT_ARGS_MULE_DECL
826
6728e641994e [xemacs-hg @ 2002-05-05 11:30:15 by ben]
ben
parents: 665
diff changeset
40 #define RE_LISP_CONTEXT_ARGS
665
fdefd0186b75 [xemacs-hg @ 2001-09-20 06:28:42 by ben]
ben
parents: 647
diff changeset
41 #define Elemcount ssize_t
fdefd0186b75 [xemacs-hg @ 2001-09-20 06:28:42 by ben]
ben
parents: 647
diff changeset
42 #define Bytecount ssize_t
446
1ccc32a20af4 Import from CVS: tag r21-2-38
cvs
parents: 442
diff changeset
43 #endif /* emacs */
1ccc32a20af4 Import from CVS: tag r21-2-38
cvs
parents: 442
diff changeset
44
5183
f283b08ff0c9 Avoid build failure, Apple's g++-4.0.1, Mac OS 10.4.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5041
diff changeset
45 #ifndef emacs
f283b08ff0c9 Avoid build failure, Apple's g++-4.0.1, Mac OS 10.4.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5041
diff changeset
46 # ifdef __cplusplus
f283b08ff0c9 Avoid build failure, Apple's g++-4.0.1, Mac OS 10.4.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5041
diff changeset
47 # define BEGIN_C_DECLS extern "C" {
f283b08ff0c9 Avoid build failure, Apple's g++-4.0.1, Mac OS 10.4.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5041
diff changeset
48 # define END_C_DECLS }
f283b08ff0c9 Avoid build failure, Apple's g++-4.0.1, Mac OS 10.4.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5041
diff changeset
49 # else
f283b08ff0c9 Avoid build failure, Apple's g++-4.0.1, Mac OS 10.4.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5041
diff changeset
50 # define BEGIN_C_DECLS
f283b08ff0c9 Avoid build failure, Apple's g++-4.0.1, Mac OS 10.4.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5041
diff changeset
51 # define END_C_DECLS
f283b08ff0c9 Avoid build failure, Apple's g++-4.0.1, Mac OS 10.4.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5041
diff changeset
52 # endif
f283b08ff0c9 Avoid build failure, Apple's g++-4.0.1, Mac OS 10.4.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5041
diff changeset
53 #endif /* emacs */
f283b08ff0c9 Avoid build failure, Apple's g++-4.0.1, Mac OS 10.4.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5041
diff changeset
54
f283b08ff0c9 Avoid build failure, Apple's g++-4.0.1, Mac OS 10.4.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5041
diff changeset
55 BEGIN_C_DECLS
f283b08ff0c9 Avoid build failure, Apple's g++-4.0.1, Mac OS 10.4.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5041
diff changeset
56
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
57 /* POSIX says that <sys/types.h> must be included (by the caller) before
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
58 <regex.h>. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
59
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
60
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
61 /* The following bits are used to determine the regexp syntax we
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
62 recognize. The not-set meaning typically corresponds to the syntax
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
63 used by Emacs (the exception is RE_INTERVAL, made for historical
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
64 reasons). The bits are given in alphabetical order, and the
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
65 definitions shifted by one from the previous bit; thus, when we add or
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
66 remove a bit, only one other definition need change. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
67 typedef unsigned reg_syntax_t;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
68
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
69 /* If this bit is not set, then \ inside a bracket expression is literal.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
70 If set, then such a \ quotes the following character. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
71 #define RE_BACKSLASH_ESCAPE_IN_LISTS (1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
72
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
73 /* If this bit is not set, then + and ? are operators, and \+ and \? are
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
74 literals.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
75 If set, then \+ and \? are operators and + and ? are literals. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
76 #define RE_BK_PLUS_QM (RE_BACKSLASH_ESCAPE_IN_LISTS << 1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
77
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
78 /* If this bit is set, then character classes are supported. They are:
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
79 [:alpha:], [:upper:], [:lower:], [:digit:], [:alnum:], [:xdigit:],
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
80 [:space:], [:print:], [:punct:], [:graph:], and [:cntrl:].
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
81 If not set, then character classes are not supported. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
82 #define RE_CHAR_CLASSES (RE_BK_PLUS_QM << 1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
83
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
84 /* If this bit is set, then ^ and $ are always anchors (outside bracket
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
85 expressions, of course).
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
86 If this bit is not set, then it depends:
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
87 ^ is an anchor if it is at the beginning of a regular
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
88 expression or after an open-group or an alternation operator;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
89 $ is an anchor if it is at the end of a regular expression, or
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
90 before a close-group or an alternation operator.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
91
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
92 This bit could be (re)combined with RE_CONTEXT_INDEP_OPS, because
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
93 POSIX draft 11.2 says that * etc. in leading positions is undefined.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
94 We already implemented a previous draft which made those constructs
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
95 invalid, though, so we haven't changed the code back. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
96 #define RE_CONTEXT_INDEP_ANCHORS (RE_CHAR_CLASSES << 1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
97
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
98 /* If this bit is set, then special characters are always special
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
99 regardless of where they are in the pattern.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
100 If this bit is not set, then special characters are special only in
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
101 some contexts; otherwise they are ordinary. Specifically,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
102 * + ? and intervals are only special when not after the beginning,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
103 open-group, or alternation operator. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
104 #define RE_CONTEXT_INDEP_OPS (RE_CONTEXT_INDEP_ANCHORS << 1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
105
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
106 /* If this bit is set, then *, +, ?, and { cannot be first in an re or
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
107 immediately after an alternation or begin-group operator. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
108 #define RE_CONTEXT_INVALID_OPS (RE_CONTEXT_INDEP_OPS << 1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
109
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
110 /* If this bit is set, then . matches newline.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
111 If not set, then it doesn't. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
112 #define RE_DOT_NEWLINE (RE_CONTEXT_INVALID_OPS << 1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
113
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
114 /* If this bit is set, then . doesn't match NUL.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
115 If not set, then it does. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
116 #define RE_DOT_NOT_NULL (RE_DOT_NEWLINE << 1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
117
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
118 /* If this bit is set, nonmatching lists [^...] do not match newline.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
119 If not set, they do. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
120 #define RE_HAT_LISTS_NOT_NEWLINE (RE_DOT_NOT_NULL << 1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
121
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
122 /* If this bit is set, either \{...\} or {...} defines an
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
123 interval, depending on RE_NO_BK_BRACES.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
124 If not set, \{, \}, {, and } are literals. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
125 #define RE_INTERVALS (RE_HAT_LISTS_NOT_NEWLINE << 1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
126
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
127 /* If this bit is set, +, ? and | aren't recognized as operators.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
128 If not set, they are. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
129 #define RE_LIMITED_OPS (RE_INTERVALS << 1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
130
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
131 /* If this bit is set, newline is an alternation operator.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
132 If not set, newline is literal. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
133 #define RE_NEWLINE_ALT (RE_LIMITED_OPS << 1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
134
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
135 /* If this bit is set, then `{...}' defines an interval, and \{ and \}
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
136 are literals.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
137 If not set, then `\{...\}' defines an interval. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
138 #define RE_NO_BK_BRACES (RE_NEWLINE_ALT << 1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
139
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
140 /* If this bit is set, (...) defines a group, and \( and \) are literals.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
141 If not set, \(...\) defines a group, and ( and ) are literals. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
142 #define RE_NO_BK_PARENS (RE_NO_BK_BRACES << 1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
143
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
144 /* If this bit is set, then \<digit> matches <digit>.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
145 If not set, then \<digit> is a back-reference. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
146 #define RE_NO_BK_REFS (RE_NO_BK_PARENS << 1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
147
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
148 /* If this bit is set, then | is an alternation operator, and \| is literal.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
149 If not set, then \| is an alternation operator, and | is literal. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
150 #define RE_NO_BK_VBAR (RE_NO_BK_REFS << 1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
151
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
152 /* If this bit is set, then an ending range point collating higher
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
153 than the starting range point, as in [z-a], is invalid.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
154 If not set, then when ending range point collates higher than the
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
155 starting range point, the range is ignored. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
156 #define RE_NO_EMPTY_RANGES (RE_NO_BK_VBAR << 1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
157
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
158 /* If this bit is not set, allow minimal matching:
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
159 - a*? and a+? and a?? perform shortest-possible matching (compare with a*
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
160 and a+ and a?, respectively, which perform longest-possible matching)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
161 - other juxtaposing of * + and ? is rejected.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
162 If this bit is set, consecutive * + and ?'s are collapsed in a logical
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
163 manner:
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
164 - a*? and a+? are the same as a*
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
165 - a?? is the same as a?
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
166 */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
167 #define RE_NO_MINIMAL_MATCHING (RE_NO_EMPTY_RANGES << 1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
168
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
169 /* If this bit is set, succeed as soon as we match the whole pattern,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
170 without further backtracking. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
171 #define RE_NO_POSIX_BACKTRACKING (RE_NO_MINIMAL_MATCHING << 1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
172
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
173 /* If this bit is not set, (?:re) behaves like (re) (or \(?:re\) behaves like
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
174 \(re\)) except that the matched string is not registered. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
175 #define RE_NO_SHY_GROUPS (RE_NO_POSIX_BACKTRACKING << 1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
176
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
177 /* If this bit is set, then an unmatched ) is ordinary.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
178 If not set, then an unmatched ) is invalid. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
179 #define RE_UNMATCHED_RIGHT_PAREN_ORD (RE_NO_SHY_GROUPS << 1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
180
502
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben]
ben
parents: 446
diff changeset
181 /* If this bit is set, then \22 will read as a back reference,
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben]
ben
parents: 446
diff changeset
182 provided at least 22 non-shy groups have been seen so far. In all
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben]
ben
parents: 446
diff changeset
183 other cases (bit not set, not 22 non-shy groups seen so far), it
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben]
ben
parents: 446
diff changeset
184 reads as a back reference \2 followed by a digit 2. */
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben]
ben
parents: 446
diff changeset
185 #define RE_NO_MULTI_DIGIT_BK_REFS (RE_UNMATCHED_RIGHT_PAREN_ORD << 1)
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben]
ben
parents: 446
diff changeset
186
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
187 /* This global variable defines the particular regexp syntax to use (for
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
188 some interfaces). When a regexp is compiled, the syntax used is
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
189 stored in the pattern buffer, so changing this does not affect
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
190 already-compiled regexps. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
191 extern reg_syntax_t re_syntax_options;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
192
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
193 /* Define combinations of the above bits for the standard possibilities.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
194 (The [[[ comments delimit what gets put into the Texinfo file, so
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
195 don't delete them!) */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
196 /* [[[begin syntaxes]]] */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
197 #define RE_SYNTAX_EMACS RE_INTERVALS
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
198
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
199 #define RE_SYNTAX_AWK \
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
200 (RE_BACKSLASH_ESCAPE_IN_LISTS | RE_DOT_NOT_NULL \
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
201 | RE_NO_BK_PARENS | RE_NO_BK_REFS \
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
202 | RE_NO_BK_VBAR | RE_NO_EMPTY_RANGES \
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
203 | RE_UNMATCHED_RIGHT_PAREN_ORD | RE_NO_SHY_GROUPS \
502
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben]
ben
parents: 446
diff changeset
204 | RE_NO_MINIMAL_MATCHING | RE_NO_MULTI_DIGIT_BK_REFS)
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
205
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
206 #define RE_SYNTAX_POSIX_AWK \
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
207 (RE_SYNTAX_POSIX_EXTENDED | RE_BACKSLASH_ESCAPE_IN_LISTS)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
208
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
209 #define RE_SYNTAX_GREP \
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
210 (RE_BK_PLUS_QM | RE_CHAR_CLASSES \
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
211 | RE_HAT_LISTS_NOT_NEWLINE | RE_INTERVALS \
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
212 | RE_NEWLINE_ALT | RE_NO_SHY_GROUPS \
502
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben]
ben
parents: 446
diff changeset
213 | RE_NO_MINIMAL_MATCHING | RE_NO_MULTI_DIGIT_BK_REFS)
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
214
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
215 #define RE_SYNTAX_EGREP \
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
216 (RE_CHAR_CLASSES | RE_CONTEXT_INDEP_ANCHORS \
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
217 | RE_CONTEXT_INDEP_OPS | RE_HAT_LISTS_NOT_NEWLINE \
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
218 | RE_NEWLINE_ALT | RE_NO_BK_PARENS \
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
219 | RE_NO_BK_VBAR | RE_NO_SHY_GROUPS \
502
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben]
ben
parents: 446
diff changeset
220 | RE_NO_MINIMAL_MATCHING | RE_NO_MULTI_DIGIT_BK_REFS)
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
221
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
222 #define RE_SYNTAX_POSIX_EGREP \
502
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben]
ben
parents: 446
diff changeset
223 (RE_SYNTAX_EGREP | RE_INTERVALS | RE_NO_BK_BRACES | \
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben]
ben
parents: 446
diff changeset
224 RE_NO_MULTI_DIGIT_BK_REFS)
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
225
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
226 /* P1003.2/D11.2, section 4.20.7.1, lines 5078ff. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
227 #define RE_SYNTAX_ED RE_SYNTAX_POSIX_BASIC
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
228
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
229 #define RE_SYNTAX_SED RE_SYNTAX_POSIX_BASIC
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
230
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
231 /* Syntax bits common to both basic and extended POSIX regex syntax. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
232 #define _RE_SYNTAX_POSIX_COMMON \
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
233 (RE_CHAR_CLASSES | RE_DOT_NEWLINE | RE_DOT_NOT_NULL \
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
234 | RE_INTERVALS | RE_NO_EMPTY_RANGES | RE_NO_SHY_GROUPS \
502
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben]
ben
parents: 446
diff changeset
235 | RE_NO_MINIMAL_MATCHING | RE_NO_MULTI_DIGIT_BK_REFS)
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
236
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
237 #define RE_SYNTAX_POSIX_BASIC \
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
238 (_RE_SYNTAX_POSIX_COMMON | RE_BK_PLUS_QM)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
239
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
240 /* Differs from ..._POSIX_BASIC only in that RE_BK_PLUS_QM becomes
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
241 RE_LIMITED_OPS, i.e., \? \+ \| are not recognized. Actually, this
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
242 isn't minimal, since other operators, such as \`, aren't disabled. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
243 #define RE_SYNTAX_POSIX_MINIMAL_BASIC \
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
244 (_RE_SYNTAX_POSIX_COMMON | RE_LIMITED_OPS)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
245
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
246 #define RE_SYNTAX_POSIX_EXTENDED \
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
247 (_RE_SYNTAX_POSIX_COMMON | RE_CONTEXT_INDEP_ANCHORS \
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
248 | RE_CONTEXT_INDEP_OPS | RE_NO_BK_BRACES \
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
249 | RE_NO_BK_PARENS | RE_NO_BK_VBAR \
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
250 | RE_UNMATCHED_RIGHT_PAREN_ORD)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
251
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
252 /* Differs from ..._POSIX_EXTENDED in that RE_CONTEXT_INVALID_OPS
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
253 replaces RE_CONTEXT_INDEP_OPS and RE_NO_BK_REFS is added. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
254 #define RE_SYNTAX_POSIX_MINIMAL_EXTENDED \
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
255 (_RE_SYNTAX_POSIX_COMMON | RE_CONTEXT_INDEP_ANCHORS \
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
256 | RE_CONTEXT_INVALID_OPS | RE_NO_BK_BRACES \
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
257 | RE_NO_BK_PARENS | RE_NO_BK_REFS \
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
258 | RE_NO_BK_VBAR | RE_UNMATCHED_RIGHT_PAREN_ORD)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
259 /* [[[end syntaxes]]] */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
260
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
261 /* Maximum number of duplicates an interval can allow. Some systems
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
262 (erroneously) define this in other header files, but we want our
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
263 value, so remove any previous define. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
264 #ifdef RE_DUP_MAX
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
265 #undef RE_DUP_MAX
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
266 #endif
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
267 #define RE_DUP_MAX ((1 << 15) - 1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
268
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
269
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
270 /* POSIX `cflags' bits (i.e., information for `regcomp'). */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
271
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
272 /* If this bit is set, then use extended regular expression syntax.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
273 If not set, then use basic regular expression syntax. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
274 #define REG_EXTENDED 1
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
275
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
276 /* If this bit is set, then ignore case when matching.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
277 If not set, then case is significant. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
278 #define REG_ICASE (REG_EXTENDED << 1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
279
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
280 /* If this bit is set, then anchors do not match at newline
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
281 characters in the string.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
282 If not set, then anchors do match at newlines. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
283 #define REG_NEWLINE (REG_ICASE << 1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
284
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
285 /* If this bit is set, then report only success or fail in regexec.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
286 If not set, then returns differ between not matching and errors. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
287 #define REG_NOSUB (REG_NEWLINE << 1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
288
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
289
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
290 /* POSIX `eflags' bits (i.e., information for regexec). */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
291
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
292 /* If this bit is set, then the beginning-of-line operator doesn't match
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
293 the beginning of the string (presumably because it's not the
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
294 beginning of a line).
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
295 If not set, then the beginning-of-line operator does match the
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
296 beginning of the string. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
297 #define REG_NOTBOL 1
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
298
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
299 /* Like REG_NOTBOL, except for the end-of-line. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
300 #define REG_NOTEOL (1 << 1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
301
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
302
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
303 /* If any error codes are removed, changed, or added, update the
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
304 `re_error_msg' table in regex.c. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
305 typedef enum
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
306 {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
307 REG_NOERROR = 0, /* Success. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
308 REG_NOMATCH, /* Didn't find a match (for regexec). */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
309
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
310 /* POSIX regcomp return error codes. (In the order listed in the
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
311 standard.) */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
312 REG_BADPAT, /* Invalid pattern. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
313 REG_ECOLLATE, /* Not implemented. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
314 REG_ECTYPE, /* Invalid character class name. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
315 REG_EESCAPE, /* Trailing backslash. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
316 REG_ESUBREG, /* Invalid back reference. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
317 REG_EBRACK, /* Unmatched left bracket. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
318 REG_EPAREN, /* Parenthesis imbalance. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
319 REG_EBRACE, /* Unmatched \{. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
320 REG_BADBR, /* Invalid contents of \{\}. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
321 REG_ERANGE, /* Invalid range end. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
322 REG_ESPACE, /* Ran out of memory. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
323 REG_BADRPT, /* No preceding re for repetition op. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
324
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
325 /* Error codes we've added. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
326 REG_EEND, /* Premature end. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
327 REG_ESIZE, /* Compiled pattern bigger than 2^16 bytes. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
328 REG_ERPAREN /* Unmatched ) or \); not returned from regcomp. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
329 #ifdef emacs
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
330 ,REG_ESYNTAX /* Invalid syntax designator. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
331 #endif
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
332 #ifdef MULE
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
333 ,REG_ERANGESPAN /* Ranges may not span charsets. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
334 ,REG_ECATEGORY /* Invalid category designator */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
335 #endif
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
336 } reg_errcode_t;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
337
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
338 /* This data structure represents a compiled pattern. Before calling
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
339 the pattern compiler, the fields `buffer', `allocated', `fastmap',
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
340 `translate', and `no_sub' can be set. After the pattern has been
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
341 compiled, the `re_nsub' field is available. All other fields are
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
342 private to the regex routines. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
343
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
344 struct re_pattern_buffer
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
345 {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
346 /* [[[begin pattern_buffer]]] */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
347 /* Space that holds the compiled pattern. It is declared as
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
348 `unsigned char *' because its elements are
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
349 sometimes used as array indexes. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
350 unsigned char *buffer;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
351
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
352 /* Number of bytes to which `buffer' points. */
647
b39c14581166 [xemacs-hg @ 2001-08-13 04:45:47 by ben]
ben
parents: 502
diff changeset
353 long allocated;
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
354
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
355 /* Number of bytes actually used in `buffer'. */
647
b39c14581166 [xemacs-hg @ 2001-08-13 04:45:47 by ben]
ben
parents: 502
diff changeset
356 long used;
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
357
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
358 /* Syntax setting with which the pattern was compiled. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
359 reg_syntax_t syntax;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
360
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
361 /* Pointer to a fastmap, if any, otherwise zero. re_search uses
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
362 the fastmap, if there is one, to skip over impossible
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
363 starting points for matches. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
364 char *fastmap;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
365
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
366 /* Either a translate table to apply to all characters before
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
367 comparing them, or zero for no translation. The translation
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
368 is applied to a pattern when it is compiled and to a string
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
369 when it is matched. */
446
1ccc32a20af4 Import from CVS: tag r21-2-38
cvs
parents: 442
diff changeset
370 RE_TRANSLATE_TYPE translate;
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
371
2639
cd00e5eeb22a [xemacs-hg @ 2005-03-09 04:59:25 by stephent]
stephent
parents: 2333
diff changeset
372 /* Number of subpatterns (returnable groups) found by the compiler.
cd00e5eeb22a [xemacs-hg @ 2005-03-09 04:59:25 by stephent]
stephent
parents: 2333
diff changeset
373 (This does not count shy groups.) */
647
b39c14581166 [xemacs-hg @ 2001-08-13 04:45:47 by ben]
ben
parents: 502
diff changeset
374 int re_nsub;
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
375
502
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben]
ben
parents: 446
diff changeset
376 /* Total number of groups found by the compiler. (Including
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben]
ben
parents: 446
diff changeset
377 shy ones.) */
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben]
ben
parents: 446
diff changeset
378 int re_ngroups;
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben]
ben
parents: 446
diff changeset
379
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
380 /* Zero if this pattern cannot match the empty string, one else.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
381 Well, in truth it's used only in `re_search_2', to see
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
382 whether or not we should use the fastmap, so we don't set
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
383 this absolutely perfectly; see `re_compile_fastmap' (the
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
384 `duplicate' case). */
647
b39c14581166 [xemacs-hg @ 2001-08-13 04:45:47 by ben]
ben
parents: 502
diff changeset
385 unsigned int can_be_null : 1;
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
386
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
387 /* If REGS_UNALLOCATED, allocate space in the `regs' structure
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
388 for `max (RE_NREGS, re_nsub + 1)' groups.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
389 If REGS_REALLOCATE, reallocate space if necessary.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
390 If REGS_FIXED, use what's there. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
391 #define REGS_UNALLOCATED 0
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
392 #define REGS_REALLOCATE 1
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
393 #define REGS_FIXED 2
647
b39c14581166 [xemacs-hg @ 2001-08-13 04:45:47 by ben]
ben
parents: 502
diff changeset
394 unsigned int regs_allocated : 2;
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
395
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
396 /* Set to zero when `regex_compile' compiles a pattern; set to one
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
397 by `re_compile_fastmap' if it updates the fastmap. */
647
b39c14581166 [xemacs-hg @ 2001-08-13 04:45:47 by ben]
ben
parents: 502
diff changeset
398 unsigned int fastmap_accurate : 1;
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
399
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
400 /* If set, `re_match_2' does not return information about
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
401 subexpressions. */
647
b39c14581166 [xemacs-hg @ 2001-08-13 04:45:47 by ben]
ben
parents: 502
diff changeset
402 unsigned int no_sub : 1;
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
403
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
404 /* If set, a beginning-of-line anchor doesn't match at the
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
405 beginning of the string. */
647
b39c14581166 [xemacs-hg @ 2001-08-13 04:45:47 by ben]
ben
parents: 502
diff changeset
406 unsigned int not_bol : 1;
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
407
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
408 /* Similarly for an end-of-line anchor. */
647
b39c14581166 [xemacs-hg @ 2001-08-13 04:45:47 by ben]
ben
parents: 502
diff changeset
409 unsigned int not_eol : 1;
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
410
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
411 /* If true, an anchor at a newline matches. */
647
b39c14581166 [xemacs-hg @ 2001-08-13 04:45:47 by ben]
ben
parents: 502
diff changeset
412 unsigned int newline_anchor : 1;
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
413
647
b39c14581166 [xemacs-hg @ 2001-08-13 04:45:47 by ben]
ben
parents: 502
diff changeset
414 unsigned int warned_about_incompatible_back_references : 1;
502
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben]
ben
parents: 446
diff changeset
415
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben]
ben
parents: 446
diff changeset
416 /* Mapping between back references and groups (may not be
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben]
ben
parents: 446
diff changeset
417 equivalent with shy groups). */
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben]
ben
parents: 446
diff changeset
418 int *external_to_internal_register;
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben]
ben
parents: 446
diff changeset
419
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben]
ben
parents: 446
diff changeset
420 int external_to_internal_register_size;
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben]
ben
parents: 446
diff changeset
421
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
422 /* [[[end pattern_buffer]]] */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
423 };
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
424
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
425 typedef struct re_pattern_buffer regex_t;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
426
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
427 /* Type for byte offsets within the string. POSIX mandates this. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
428 typedef int regoff_t;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
429
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
430
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
431 /* This is the structure we store register match data in. See
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
432 regex.texinfo for a full description of what registers match. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
433 struct re_registers
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
434 {
1468
0f42689481f0 [xemacs-hg @ 2003-05-09 14:52:37 by stephent]
stephent
parents: 826
diff changeset
435 int num_regs; /* number of registers allocated */
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
436 regoff_t *start;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
437 regoff_t *end;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
438 };
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
439
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
440
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
441 /* If `regs_allocated' is REGS_UNALLOCATED in the pattern buffer,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
442 `re_match_2' returns information about at least this many registers
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
443 the first time a `regs' structure is passed. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
444 #ifndef RE_NREGS
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
445 #define RE_NREGS 30
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
446 #endif
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
447
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
448
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
449 /* POSIX specification for registers. Aside from the different names than
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
450 `re_registers', POSIX uses an array of structures, instead of a
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
451 structure of arrays. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
452 typedef struct
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
453 {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
454 regoff_t rm_so; /* Byte offset from string's start to substring's start. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
455 regoff_t rm_eo; /* Byte offset from string's start to substring's end. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
456 } regmatch_t;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
457
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
458 /* Declarations for routines. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
459
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
460 /* Sets the current default syntax to SYNTAX, and return the old syntax.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
461 You can also simply assign to the `re_syntax_options' variable. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
462 reg_syntax_t re_set_syntax (reg_syntax_t syntax);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
463
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
464 /* Compile the regular expression PATTERN, with length LENGTH
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
465 and syntax given by the global `re_syntax_options', into the buffer
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
466 BUFFER. Return NULL if successful, and an error string if not. */
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
467 const char *re_compile_pattern (const char *pattern, int length,
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
468 struct re_pattern_buffer *buffer);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
469
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
470
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
471 /* Compile a fastmap for the compiled pattern in BUFFER; used to
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
472 accelerate searches. Return 0 if successful and -2 if was an
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
473 internal error. */
826
6728e641994e [xemacs-hg @ 2002-05-05 11:30:15 by ben]
ben
parents: 665
diff changeset
474 int re_compile_fastmap (struct re_pattern_buffer *buffer
6728e641994e [xemacs-hg @ 2002-05-05 11:30:15 by ben]
ben
parents: 665
diff changeset
475 RE_LISP_SHORT_CONTEXT_ARGS_DECL);
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
476
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
477
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
478 /* Search in the string STRING (with length LENGTH) for the pattern
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
479 compiled into BUFFER. Start searching at position START, for RANGE
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
480 characters. Return the starting position of the match, -1 for no
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
481 match, or -2 for an internal error. Also return register
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
482 information in REGS (if REGS and BUFFER->no_sub are nonzero). */
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
483 int re_search (struct re_pattern_buffer *buffer, const char *string,
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
484 int length, int start, int range,
826
6728e641994e [xemacs-hg @ 2002-05-05 11:30:15 by ben]
ben
parents: 665
diff changeset
485 struct re_registers *regs RE_LISP_CONTEXT_ARGS_DECL);
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
486
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
487
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
488 /* Like `re_search', but search in the concatenation of STRING1 and
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
489 STRING2. Also, stop searching at index START + STOP. */
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
490 int re_search_2 (struct re_pattern_buffer *buffer, const char *string1,
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
491 int length1, const char *string2, int length2, int start,
826
6728e641994e [xemacs-hg @ 2002-05-05 11:30:15 by ben]
ben
parents: 665
diff changeset
492 int range, struct re_registers *regs, int stop
6728e641994e [xemacs-hg @ 2002-05-05 11:30:15 by ben]
ben
parents: 665
diff changeset
493 RE_LISP_CONTEXT_ARGS_DECL);
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
494
826
6728e641994e [xemacs-hg @ 2002-05-05 11:30:15 by ben]
ben
parents: 665
diff changeset
495 #ifndef emacs /* never used by XEmacs */
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
496
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
497 /* Like `re_search', but return how many characters in STRING the regexp
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
498 in BUFFER matched, starting at position START. */
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
499 int re_match (struct re_pattern_buffer *buffer, const char *string,
826
6728e641994e [xemacs-hg @ 2002-05-05 11:30:15 by ben]
ben
parents: 665
diff changeset
500 int length, int start, struct re_registers *regs
6728e641994e [xemacs-hg @ 2002-05-05 11:30:15 by ben]
ben
parents: 665
diff changeset
501 RE_LISP_CONTEXT_ARGS_DECL);
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
502
826
6728e641994e [xemacs-hg @ 2002-05-05 11:30:15 by ben]
ben
parents: 665
diff changeset
503 #endif /* not emacs */
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
504
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
505 /* Relates to `re_match' as `re_search_2' relates to `re_search'. */
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
506 int re_match_2 (struct re_pattern_buffer *buffer, const char *string1,
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
507 int length1, const char *string2, int length2,
826
6728e641994e [xemacs-hg @ 2002-05-05 11:30:15 by ben]
ben
parents: 665
diff changeset
508 int start, struct re_registers *regs, int stop
6728e641994e [xemacs-hg @ 2002-05-05 11:30:15 by ben]
ben
parents: 665
diff changeset
509 RE_LISP_CONTEXT_ARGS_DECL);
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
510
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
511 /* Set REGS to hold NUM_REGS registers, storing them in STARTS and
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
512 ENDS. Subsequent matches using BUFFER and REGS will use this memory
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
513 for recording register information. STARTS and ENDS must be
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
514 allocated with malloc, and must each be at least `NUM_REGS * sizeof
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
515 (regoff_t)' bytes long.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
516
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
517 If NUM_REGS == 0, then subsequent matches should allocate their own
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
518 register data.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
519
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
520 Unless this function is called, the first search or match using
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
521 PATTERN_BUFFER will allocate its own register data, without
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
522 freeing the old data. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
523 void re_set_registers (struct re_pattern_buffer *buffer,
647
b39c14581166 [xemacs-hg @ 2001-08-13 04:45:47 by ben]
ben
parents: 502
diff changeset
524 struct re_registers *regs, int num_regs,
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
525 regoff_t *starts, regoff_t *ends);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
526
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
527 #ifdef _REGEX_RE_COMP
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
528 /* 4.2 bsd compatibility. */
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
529 char *re_comp (const char *);
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
530 int re_exec (const char *);
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
531 #endif
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
532
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
533 /* POSIX compatibility. */
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
534 int regcomp (regex_t *preg, const char *pattern, int cflags);
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
535 int regexec (const regex_t *preg, const char *string, size_t nmatch,
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
536 regmatch_t pmatch[], int eflags);
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
537 size_t regerror (int errcode, const regex_t *preg, char *errbuf,
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
538 size_t errbuf_size);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
539 void regfree (regex_t *preg);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
540
5041
efaa6cd845e5 add regexp-debugging
Ben Wing <ben@xemacs.org>
parents: 2639
diff changeset
541 enum regex_debug
efaa6cd845e5 add regexp-debugging
Ben Wing <ben@xemacs.org>
parents: 2639
diff changeset
542 {
efaa6cd845e5 add regexp-debugging
Ben Wing <ben@xemacs.org>
parents: 2639
diff changeset
543 RE_DEBUG_COMPILATION = 1 << 0,
efaa6cd845e5 add regexp-debugging
Ben Wing <ben@xemacs.org>
parents: 2639
diff changeset
544 RE_DEBUG_FAILURE_POINT = 1 << 1,
efaa6cd845e5 add regexp-debugging
Ben Wing <ben@xemacs.org>
parents: 2639
diff changeset
545 RE_DEBUG_MATCHING = 1 << 2,
efaa6cd845e5 add regexp-debugging
Ben Wing <ben@xemacs.org>
parents: 2639
diff changeset
546 };
efaa6cd845e5 add regexp-debugging
Ben Wing <ben@xemacs.org>
parents: 2639
diff changeset
547
efaa6cd845e5 add regexp-debugging
Ben Wing <ben@xemacs.org>
parents: 2639
diff changeset
548 extern int debug_regexps;
efaa6cd845e5 add regexp-debugging
Ben Wing <ben@xemacs.org>
parents: 2639
diff changeset
549
5183
f283b08ff0c9 Avoid build failure, Apple's g++-4.0.1, Mac OS 10.4.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5041
diff changeset
550 END_C_DECLS
f283b08ff0c9 Avoid build failure, Apple's g++-4.0.1, Mac OS 10.4.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5041
diff changeset
551
440
8de8e3f6228a Import from CVS: tag r21-2-28
cvs
parents: 428
diff changeset
552 #endif /* INCLUDED_regex_h_ */