?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
* transcode.c (econv_init): accept Encoding object as source_encoding
[ruby-svn.git] / regsyntax.c
blob96348b0bd71a2f86e0bdbdeb68b0da96767e060a
1 /**********************************************************************
2 regsyntax.c - Oniguruma (regular expression library)
3 **********************************************************************/
4 /*-
5 * Copyright (c) 2002-2006 K.Kosako <sndgk393 AT ybb DOT ne DOT jp>
6 * All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 *
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27 * SUCH DAMAGE.
28 */
29
30 #include "regint.h"
31
32 const OnigSyntaxType OnigSyntaxASIS = {
33 0
34 , ONIG_SYN_OP2_INEFFECTIVE_ESCAPE
35 , 0
36 , ONIG_OPTION_NONE
37 ,
38 {
39 (OnigCodePoint )'\\' /* esc */
40 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anychar '.' */
41 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anytime '*' */
42 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* zero or one time '?' */
43 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* one or more time '+' */
44 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anychar anytime */
45 }
46 };
47
48 const OnigSyntaxType OnigSyntaxPosixBasic = {
49 ( SYN_POSIX_COMMON_OP | ONIG_SYN_OP_ESC_LPAREN_SUBEXP |
50 ONIG_SYN_OP_ESC_BRACE_INTERVAL )
51 , 0
52 , 0
53 , ( ONIG_OPTION_SINGLELINE | ONIG_OPTION_MULTILINE )
54 ,
55 {
56 (OnigCodePoint )'\\' /* esc */
57 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anychar '.' */
58 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anytime '*' */
59 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* zero or one time '?' */
60 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* one or more time '+' */
61 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anychar anytime */
62 }
63 };
64
65 const OnigSyntaxType OnigSyntaxPosixExtended = {
66 ( SYN_POSIX_COMMON_OP | ONIG_SYN_OP_LPAREN_SUBEXP |
67 ONIG_SYN_OP_BRACE_INTERVAL |
68 ONIG_SYN_OP_PLUS_ONE_INF | ONIG_SYN_OP_QMARK_ZERO_ONE | ONIG_SYN_OP_VBAR_ALT )
69 , 0
70 , ( ONIG_SYN_CONTEXT_INDEP_ANCHORS |
71 ONIG_SYN_CONTEXT_INDEP_REPEAT_OPS | ONIG_SYN_CONTEXT_INVALID_REPEAT_OPS |
72 ONIG_SYN_ALLOW_UNMATCHED_CLOSE_SUBEXP |
73 ONIG_SYN_ALLOW_DOUBLE_RANGE_OP_IN_CC )
74 , ( ONIG_OPTION_SINGLELINE | ONIG_OPTION_MULTILINE )
75 ,
76 {
77 (OnigCodePoint )'\\' /* esc */
78 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anychar '.' */
79 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anytime '*' */
80 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* zero or one time '?' */
81 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* one or more time '+' */
82 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anychar anytime */
83 }
84 };
85
86 const OnigSyntaxType OnigSyntaxEmacs = {
87 ( ONIG_SYN_OP_DOT_ANYCHAR | ONIG_SYN_OP_BRACKET_CC |
88 ONIG_SYN_OP_ESC_BRACE_INTERVAL |
89 ONIG_SYN_OP_ESC_LPAREN_SUBEXP | ONIG_SYN_OP_ESC_VBAR_ALT |
90 ONIG_SYN_OP_ASTERISK_ZERO_INF | ONIG_SYN_OP_PLUS_ONE_INF |
91 ONIG_SYN_OP_QMARK_ZERO_ONE | ONIG_SYN_OP_DECIMAL_BACKREF |
92 ONIG_SYN_OP_LINE_ANCHOR | ONIG_SYN_OP_ESC_CONTROL_CHARS )
93 , ONIG_SYN_OP2_ESC_GNU_BUF_ANCHOR
94 , ONIG_SYN_ALLOW_EMPTY_RANGE_IN_CC
95 , ONIG_OPTION_NONE
96 ,
97 {
98 (OnigCodePoint )'\\' /* esc */
99 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anychar '.' */
100 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anytime '*' */
101 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* zero or one time '?' */
102 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* one or more time '+' */
103 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anychar anytime */
104 }
105 };
106
107 const OnigSyntaxType OnigSyntaxGrep = {
108 ( ONIG_SYN_OP_DOT_ANYCHAR | ONIG_SYN_OP_BRACKET_CC | ONIG_SYN_OP_POSIX_BRACKET |
109 ONIG_SYN_OP_ESC_BRACE_INTERVAL | ONIG_SYN_OP_ESC_LPAREN_SUBEXP |
110 ONIG_SYN_OP_ESC_VBAR_ALT |
111 ONIG_SYN_OP_ASTERISK_ZERO_INF | ONIG_SYN_OP_ESC_PLUS_ONE_INF |
112 ONIG_SYN_OP_ESC_QMARK_ZERO_ONE | ONIG_SYN_OP_LINE_ANCHOR |
113 ONIG_SYN_OP_ESC_W_WORD | ONIG_SYN_OP_ESC_B_WORD_BOUND |
114 ONIG_SYN_OP_ESC_LTGT_WORD_BEGIN_END | ONIG_SYN_OP_DECIMAL_BACKREF )
115 , 0
116 , ( ONIG_SYN_ALLOW_EMPTY_RANGE_IN_CC | ONIG_SYN_NOT_NEWLINE_IN_NEGATIVE_CC )
117 , ONIG_OPTION_NONE
118 ,
119 {
120 (OnigCodePoint )'\\' /* esc */
121 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anychar '.' */
122 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anytime '*' */
123 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* zero or one time '?' */
124 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* one or more time '+' */
125 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anychar anytime */
126 }
127 };
128
129 const OnigSyntaxType OnigSyntaxGnuRegex = {
130 SYN_GNU_REGEX_OP
131 , 0
132 , SYN_GNU_REGEX_BV
133 , ONIG_OPTION_NONE
134 ,
135 {
136 (OnigCodePoint )'\\' /* esc */
137 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anychar '.' */
138 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anytime '*' */
139 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* zero or one time '?' */
140 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* one or more time '+' */
141 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anychar anytime */
142 }
143 };
144
145 const OnigSyntaxType OnigSyntaxJava = {
146 (( SYN_GNU_REGEX_OP | ONIG_SYN_OP_QMARK_NON_GREEDY |
147 ONIG_SYN_OP_ESC_CONTROL_CHARS | ONIG_SYN_OP_ESC_C_CONTROL |
148 ONIG_SYN_OP_ESC_OCTAL3 | ONIG_SYN_OP_ESC_X_HEX2 )
149 & ~ONIG_SYN_OP_ESC_LTGT_WORD_BEGIN_END )
150 , ( ONIG_SYN_OP2_ESC_CAPITAL_Q_QUOTE | ONIG_SYN_OP2_QMARK_GROUP_EFFECT |
151 ONIG_SYN_OP2_OPTION_PERL | ONIG_SYN_OP2_PLUS_POSSESSIVE_REPEAT |
152 ONIG_SYN_OP2_PLUS_POSSESSIVE_INTERVAL | ONIG_SYN_OP2_CCLASS_SET_OP |
153 ONIG_SYN_OP2_ESC_V_VTAB | ONIG_SYN_OP2_ESC_U_HEX4 |
154 ONIG_SYN_OP2_ESC_P_BRACE_CHAR_PROPERTY )
155 , ( SYN_GNU_REGEX_BV | ONIG_SYN_DIFFERENT_LEN_ALT_LOOK_BEHIND )
156 , ONIG_OPTION_SINGLELINE
157 ,
158 {
159 (OnigCodePoint )'\\' /* esc */
160 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anychar '.' */
161 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anytime '*' */
162 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* zero or one time '?' */
163 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* one or more time '+' */
164 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anychar anytime */
165 }
166 };
167
168 const OnigSyntaxType OnigSyntaxPerl = {
169 (( SYN_GNU_REGEX_OP | ONIG_SYN_OP_QMARK_NON_GREEDY |
170 ONIG_SYN_OP_ESC_OCTAL3 | ONIG_SYN_OP_ESC_X_HEX2 |
171 ONIG_SYN_OP_ESC_X_BRACE_HEX8 | ONIG_SYN_OP_ESC_CONTROL_CHARS |
172 ONIG_SYN_OP_ESC_C_CONTROL )
173 & ~ONIG_SYN_OP_ESC_LTGT_WORD_BEGIN_END )
174 , ( ONIG_SYN_OP2_ESC_CAPITAL_Q_QUOTE |
175 ONIG_SYN_OP2_QMARK_GROUP_EFFECT | ONIG_SYN_OP2_OPTION_PERL |
176 ONIG_SYN_OP2_ESC_P_BRACE_CHAR_PROPERTY |
177 ONIG_SYN_OP2_ESC_P_BRACE_CIRCUMFLEX_NOT )
178 , SYN_GNU_REGEX_BV
179 , ONIG_OPTION_SINGLELINE
180 ,
181 {
182 (OnigCodePoint )'\\' /* esc */
183 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anychar '.' */
184 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anytime '*' */
185 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* zero or one time '?' */
186 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* one or more time '+' */
187 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anychar anytime */
188 }
189 };
190
191 /* Perl + named group */
192 const OnigSyntaxType OnigSyntaxPerl_NG = {
193 (( SYN_GNU_REGEX_OP | ONIG_SYN_OP_QMARK_NON_GREEDY |
194 ONIG_SYN_OP_ESC_OCTAL3 | ONIG_SYN_OP_ESC_X_HEX2 |
195 ONIG_SYN_OP_ESC_X_BRACE_HEX8 | ONIG_SYN_OP_ESC_CONTROL_CHARS |
196 ONIG_SYN_OP_ESC_C_CONTROL )
197 & ~ONIG_SYN_OP_ESC_LTGT_WORD_BEGIN_END )
198 , ( ONIG_SYN_OP2_ESC_CAPITAL_Q_QUOTE |
199 ONIG_SYN_OP2_QMARK_GROUP_EFFECT | ONIG_SYN_OP2_OPTION_PERL |
200 ONIG_SYN_OP2_ESC_P_BRACE_CHAR_PROPERTY |
201 ONIG_SYN_OP2_ESC_P_BRACE_CIRCUMFLEX_NOT |
202 ONIG_SYN_OP2_QMARK_LT_NAMED_GROUP |
203 ONIG_SYN_OP2_ESC_K_NAMED_BACKREF |
204 ONIG_SYN_OP2_ESC_G_SUBEXP_CALL )
205 , ( SYN_GNU_REGEX_BV |
206 ONIG_SYN_CAPTURE_ONLY_NAMED_GROUP |
207 ONIG_SYN_ALLOW_MULTIPLEX_DEFINITION_NAME )
208 , ONIG_OPTION_SINGLELINE
209 ,
210 {
211 (OnigCodePoint )'\\' /* esc */
212 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anychar '.' */
213 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anytime '*' */
214 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* zero or one time '?' */
215 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* one or more time '+' */
216 , (OnigCodePoint )ONIG_INEFFECTIVE_META_CHAR /* anychar anytime */
217 }
218 };
219
220
221
222 extern int
223 onig_set_default_syntax(const OnigSyntaxType* syntax)
224 {
225 if (IS_NULL(syntax))
226 syntax = ONIG_SYNTAX_RUBY;
227
228 OnigDefaultSyntax = syntax;
229 return 0;
230 }
231
232 extern void
233 onig_copy_syntax(OnigSyntaxType* to, const OnigSyntaxType* from)
234 {
235 *to = *from;
236 }
237
238 extern void
239 onig_set_syntax_op(OnigSyntaxType* syntax, unsigned int op)
240 {
241 syntax->op = op;
242 }
243
244 extern void
245 onig_set_syntax_op2(OnigSyntaxType* syntax, unsigned int op2)
246 {
247 syntax->op2 = op2;
248 }
249
250 extern void
251 onig_set_syntax_behavior(OnigSyntaxType* syntax, unsigned int behavior)
252 {
253 syntax->behavior = behavior;
254 }
255
256 extern void
257 onig_set_syntax_options(OnigSyntaxType* syntax, OnigOptionType options)
258 {
259 syntax->options = options;
260 }
261
262 extern unsigned int
263 onig_get_syntax_op(OnigSyntaxType* syntax)
264 {
265 return syntax->op;
266 }
267
268 extern unsigned int
269 onig_get_syntax_op2(OnigSyntaxType* syntax)
270 {
271 return syntax->op2;
272 }
273
274 extern unsigned int
275 onig_get_syntax_behavior(OnigSyntaxType* syntax)
276 {
277 return syntax->behavior;
278 }
279
280 extern OnigOptionType
281 onig_get_syntax_options(OnigSyntaxType* syntax)
282 {
283 return syntax->options;
284 }
285
286 #ifdef USE_VARIABLE_META_CHARS
287 extern int onig_set_meta_char(OnigSyntaxType* enc,
288 unsigned int what, OnigCodePoint code)
289 {
290 switch (what) {
291 case ONIG_META_CHAR_ESCAPE:
292 enc->meta_char_table.esc = code;
293 break;
294 case ONIG_META_CHAR_ANYCHAR:
295 enc->meta_char_table.anychar = code;
296 break;
297 case ONIG_META_CHAR_ANYTIME:
298 enc->meta_char_table.anytime = code;
299 break;
300 case ONIG_META_CHAR_ZERO_OR_ONE_TIME:
301 enc->meta_char_table.zero_or_one_time = code;
302 break;
303 case ONIG_META_CHAR_ONE_OR_MORE_TIME:
304 enc->meta_char_table.one_or_more_time = code;
305 break;
306 case ONIG_META_CHAR_ANYCHAR_ANYTIME:
307 enc->meta_char_table.anychar_anytime = code;
308 break;
309 default:
310 return ONIGERR_INVALID_ARGUMENT;
311 break;
312 }
313 return 0;
314 }
315 #endif /* USE_VARIABLE_META_CHARS */
ruby svn mirror