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 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 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 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 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 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 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 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 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 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(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, 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 */ 316
