ruby-internal 0.8.3 → 0.8.4

Sign up to get free protection for your applications and to get access to all the features.
Files changed (32) hide show
  1. data/ext/internal/yarv-headers/addr2line.h +21 -0
  2. data/ext/internal/yarv-headers/atomic.h +56 -0
  3. data/ext/internal/yarv-headers/constant.h +34 -0
  4. data/ext/internal/yarv-headers/debug.h +41 -0
  5. data/ext/internal/yarv-headers/dln.h +50 -0
  6. data/ext/internal/yarv-headers/encdb.h +167 -0
  7. data/ext/internal/yarv-headers/eval_intern.h +234 -0
  8. data/ext/internal/yarv-headers/gc.h +98 -0
  9. data/ext/internal/yarv-headers/id.h +175 -0
  10. data/ext/internal/yarv-headers/internal.h +232 -0
  11. data/ext/internal/yarv-headers/iseq.h +125 -0
  12. data/ext/internal/yarv-headers/method.h +105 -0
  13. data/ext/internal/yarv-headers/node.h +503 -0
  14. data/ext/internal/yarv-headers/parse.h +186 -0
  15. data/ext/internal/yarv-headers/regenc.h +219 -0
  16. data/ext/internal/yarv-headers/regint.h +850 -0
  17. data/ext/internal/yarv-headers/regparse.h +362 -0
  18. data/ext/internal/yarv-headers/revision.h +1 -0
  19. data/ext/internal/yarv-headers/thread_pthread.h +51 -0
  20. data/ext/internal/yarv-headers/thread_win32.h +40 -0
  21. data/ext/internal/yarv-headers/timev.h +21 -0
  22. data/ext/internal/yarv-headers/transcode_data.h +117 -0
  23. data/ext/internal/yarv-headers/transdb.h +189 -0
  24. data/ext/internal/yarv-headers/version.h +52 -0
  25. data/ext/internal/yarv-headers/vm_core.h +756 -0
  26. data/ext/internal/yarv-headers/vm_exec.h +184 -0
  27. data/ext/internal/yarv-headers/vm_insnhelper.h +220 -0
  28. data/ext/internal/yarv-headers/vm_opts.h +51 -0
  29. data/test/test_module.rb +3 -1
  30. data/test/test_node.rb +1 -1
  31. metadata +30 -3
  32. data/lib/internal/object/as_code.rb +0 -10
@@ -0,0 +1,186 @@
1
+ /* A Bison parser, made by GNU Bison 2.5. */
2
+
3
+ /* Bison interface for Yacc-like parsers in C
4
+
5
+ Copyright (C) 1984, 1989-1990, 2000-2011 Free Software Foundation, Inc.
6
+
7
+ This program is free software: you can redistribute it and/or modify
8
+ it under the terms of the GNU General Public License as published by
9
+ the Free Software Foundation, either version 3 of the License, or
10
+ (at your option) any later version.
11
+
12
+ This program is distributed in the hope that it will be useful,
13
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
14
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15
+ GNU General Public License for more details.
16
+
17
+ You should have received a copy of the GNU General Public License
18
+ along with this program. If not, see <http://www.gnu.org/licenses/>. */
19
+
20
+ /* As a special exception, you may create a larger work that contains
21
+ part or all of the Bison parser skeleton and distribute that work
22
+ under terms of your choice, so long as that work isn't itself a
23
+ parser generator using the skeleton or a modified version thereof
24
+ as a parser skeleton. Alternatively, if you modify or redistribute
25
+ the parser skeleton itself, you may (at your option) remove this
26
+ special exception, which will cause the skeleton and the resulting
27
+ Bison output files to be licensed under the GNU General Public
28
+ License without this special exception.
29
+
30
+ This special exception was added by the Free Software Foundation in
31
+ version 2.2 of Bison. */
32
+
33
+
34
+ /* Tokens. */
35
+ #ifndef YYTOKENTYPE
36
+ # define YYTOKENTYPE
37
+ /* Put the tokens into the symbol table, so that GDB and other debuggers
38
+ know about them. */
39
+ enum yytokentype {
40
+ keyword_class = 258,
41
+ keyword_module = 259,
42
+ keyword_def = 260,
43
+ keyword_undef = 261,
44
+ keyword_begin = 262,
45
+ keyword_rescue = 263,
46
+ keyword_ensure = 264,
47
+ keyword_end = 265,
48
+ keyword_if = 266,
49
+ keyword_unless = 267,
50
+ keyword_then = 268,
51
+ keyword_elsif = 269,
52
+ keyword_else = 270,
53
+ keyword_case = 271,
54
+ keyword_when = 272,
55
+ keyword_while = 273,
56
+ keyword_until = 274,
57
+ keyword_for = 275,
58
+ keyword_break = 276,
59
+ keyword_next = 277,
60
+ keyword_redo = 278,
61
+ keyword_retry = 279,
62
+ keyword_in = 280,
63
+ keyword_do = 281,
64
+ keyword_do_cond = 282,
65
+ keyword_do_block = 283,
66
+ keyword_do_LAMBDA = 284,
67
+ keyword_return = 285,
68
+ keyword_yield = 286,
69
+ keyword_super = 287,
70
+ keyword_self = 288,
71
+ keyword_nil = 289,
72
+ keyword_true = 290,
73
+ keyword_false = 291,
74
+ keyword_and = 292,
75
+ keyword_or = 293,
76
+ keyword_not = 294,
77
+ modifier_if = 295,
78
+ modifier_unless = 296,
79
+ modifier_while = 297,
80
+ modifier_until = 298,
81
+ modifier_rescue = 299,
82
+ keyword_alias = 300,
83
+ keyword_defined = 301,
84
+ keyword_BEGIN = 302,
85
+ keyword_END = 303,
86
+ keyword__LINE__ = 304,
87
+ keyword__FILE__ = 305,
88
+ keyword__ENCODING__ = 306,
89
+ tIDENTIFIER = 307,
90
+ tFID = 308,
91
+ tGVAR = 309,
92
+ tIVAR = 310,
93
+ tCONSTANT = 311,
94
+ tCVAR = 312,
95
+ tLABEL = 313,
96
+ tINTEGER = 314,
97
+ tFLOAT = 315,
98
+ tSTRING_CONTENT = 316,
99
+ tCHAR = 317,
100
+ tNTH_REF = 318,
101
+ tBACK_REF = 319,
102
+ tREGEXP_END = 320,
103
+ tUPLUS = 321,
104
+ tUMINUS = 322,
105
+ tPOW = 323,
106
+ tCMP = 324,
107
+ tEQ = 325,
108
+ tEQQ = 326,
109
+ tNEQ = 327,
110
+ tGEQ = 328,
111
+ tLEQ = 329,
112
+ tANDOP = 330,
113
+ tOROP = 331,
114
+ tMATCH = 332,
115
+ tNMATCH = 333,
116
+ tDOT2 = 334,
117
+ tDOT3 = 335,
118
+ tAREF = 336,
119
+ tASET = 337,
120
+ tLSHFT = 338,
121
+ tRSHFT = 339,
122
+ tCOLON2 = 340,
123
+ tCOLON3 = 341,
124
+ tOP_ASGN = 342,
125
+ tASSOC = 343,
126
+ tLPAREN = 344,
127
+ tLPAREN_ARG = 345,
128
+ tRPAREN = 346,
129
+ tLBRACK = 347,
130
+ tLBRACE = 348,
131
+ tLBRACE_ARG = 349,
132
+ tSTAR = 350,
133
+ tAMPER = 351,
134
+ tLAMBDA = 352,
135
+ tSYMBEG = 353,
136
+ tSTRING_BEG = 354,
137
+ tXSTRING_BEG = 355,
138
+ tREGEXP_BEG = 356,
139
+ tWORDS_BEG = 357,
140
+ tQWORDS_BEG = 358,
141
+ tSTRING_DBEG = 359,
142
+ tSTRING_DVAR = 360,
143
+ tSTRING_END = 361,
144
+ tLAMBEG = 362,
145
+ tLOWEST = 363,
146
+ tUMINUS_NUM = 364,
147
+ idNULL = 365,
148
+ idRespond_to = 366,
149
+ idIFUNC = 367,
150
+ idCFUNC = 368,
151
+ id_core_set_method_alias = 369,
152
+ id_core_set_variable_alias = 370,
153
+ id_core_undef_method = 371,
154
+ id_core_define_method = 372,
155
+ id_core_define_singleton_method = 373,
156
+ id_core_set_postexe = 374,
157
+ tLAST_TOKEN = 375
158
+ };
159
+ #endif
160
+
161
+
162
+
163
+ #if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED
164
+ typedef union YYSTYPE
165
+ {
166
+
167
+ /* Line 2068 of yacc.c */
168
+
169
+ VALUE val;
170
+ NODE *node;
171
+ ID id;
172
+ int num;
173
+ const struct vtable *vars;
174
+
175
+
176
+
177
+ /* Line 2068 of yacc.c */
178
+ } YYSTYPE;
179
+ # define YYSTYPE_IS_TRIVIAL 1
180
+ # define yystype YYSTYPE /* obsolescent; will be withdrawn */
181
+ # define YYSTYPE_IS_DECLARED 1
182
+ #endif
183
+
184
+
185
+
186
+
@@ -0,0 +1,219 @@
1
+ #ifndef ONIGURUMA_REGENC_H
2
+ #define ONIGURUMA_REGENC_H
3
+ /**********************************************************************
4
+ regenc.h - Oniguruma (regular expression library)
5
+ **********************************************************************/
6
+ /*-
7
+ * Copyright (c) 2002-2008 K.Kosako <sndgk393 AT ybb DOT ne DOT jp>
8
+ * All rights reserved.
9
+ *
10
+ * Redistribution and use in source and binary forms, with or without
11
+ * modification, are permitted provided that the following conditions
12
+ * are met:
13
+ * 1. Redistributions of source code must retain the above copyright
14
+ * notice, this list of conditions and the following disclaimer.
15
+ * 2. Redistributions in binary form must reproduce the above copyright
16
+ * notice, this list of conditions and the following disclaimer in the
17
+ * documentation and/or other materials provided with the distribution.
18
+ *
19
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
20
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22
+ * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
23
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29
+ * SUCH DAMAGE.
30
+ */
31
+ #ifndef REGINT_H
32
+ #ifndef RUBY_EXTERN
33
+ #include "ruby/config.h"
34
+ #include "ruby/defines.h"
35
+ #endif
36
+ #ifdef ONIG_ESCAPE_UCHAR_COLLISION
37
+ #undef ONIG_ESCAPE_UCHAR_COLLISION
38
+ #endif
39
+ #endif
40
+ #include "ruby/oniguruma.h"
41
+
42
+ #if defined __GNUC__ && __GNUC__ >= 4
43
+ #pragma GCC visibility push(default)
44
+ #endif
45
+
46
+ typedef struct {
47
+ OnigCodePoint from;
48
+ OnigCodePoint to;
49
+ } OnigPairCaseFoldCodes;
50
+
51
+
52
+ #ifndef NULL
53
+ #define NULL ((void* )0)
54
+ #endif
55
+
56
+ #ifndef TRUE
57
+ #define TRUE 1
58
+ #endif
59
+
60
+ #ifndef FALSE
61
+ #define FALSE 0
62
+ #endif
63
+
64
+ #ifndef ARG_UNUSED
65
+ #if defined(__GNUC__)
66
+ # define ARG_UNUSED __attribute__ ((unused))
67
+ #else
68
+ # define ARG_UNUSED
69
+ #endif
70
+ #endif
71
+
72
+ #define ONIG_IS_NULL(p) (((void*)(p)) == (void*)0)
73
+ #define ONIG_IS_NOT_NULL(p) (((void*)(p)) != (void*)0)
74
+ #define ONIG_CHECK_NULL_RETURN(p) if (ONIG_IS_NULL(p)) return NULL
75
+ #define ONIG_CHECK_NULL_RETURN_VAL(p,val) if (ONIG_IS_NULL(p)) return (val)
76
+
77
+ #define enclen(enc,p,e) ((enc->max_enc_len == enc->min_enc_len) ? enc->min_enc_len : ONIGENC_MBC_ENC_LEN(enc,p,e))
78
+
79
+ /* character types bit flag */
80
+ #define BIT_CTYPE_NEWLINE (1<< ONIGENC_CTYPE_NEWLINE)
81
+ #define BIT_CTYPE_ALPHA (1<< ONIGENC_CTYPE_ALPHA)
82
+ #define BIT_CTYPE_BLANK (1<< ONIGENC_CTYPE_BLANK)
83
+ #define BIT_CTYPE_CNTRL (1<< ONIGENC_CTYPE_CNTRL)
84
+ #define BIT_CTYPE_DIGIT (1<< ONIGENC_CTYPE_DIGIT)
85
+ #define BIT_CTYPE_GRAPH (1<< ONIGENC_CTYPE_GRAPH)
86
+ #define BIT_CTYPE_LOWER (1<< ONIGENC_CTYPE_LOWER)
87
+ #define BIT_CTYPE_PRINT (1<< ONIGENC_CTYPE_PRINT)
88
+ #define BIT_CTYPE_PUNCT (1<< ONIGENC_CTYPE_PUNCT)
89
+ #define BIT_CTYPE_SPACE (1<< ONIGENC_CTYPE_SPACE)
90
+ #define BIT_CTYPE_UPPER (1<< ONIGENC_CTYPE_UPPER)
91
+ #define BIT_CTYPE_XDIGIT (1<< ONIGENC_CTYPE_XDIGIT)
92
+ #define BIT_CTYPE_WORD (1<< ONIGENC_CTYPE_WORD)
93
+ #define BIT_CTYPE_ALNUM (1<< ONIGENC_CTYPE_ALNUM)
94
+ #define BIT_CTYPE_ASCII (1<< ONIGENC_CTYPE_ASCII)
95
+
96
+ #define CTYPE_TO_BIT(ctype) (1<<(ctype))
97
+ #define CTYPE_IS_WORD_GRAPH_PRINT(ctype) \
98
+ ((ctype) == ONIGENC_CTYPE_WORD || (ctype) == ONIGENC_CTYPE_GRAPH ||\
99
+ (ctype) == ONIGENC_CTYPE_PRINT)
100
+
101
+
102
+ typedef struct {
103
+ const UChar *name;
104
+ int ctype;
105
+ short int len;
106
+ } PosixBracketEntryType;
107
+
108
+ #define PosixBracketEntryInit(name, ctype) {(const UChar *)name, ctype, (short int)(sizeof(name) - 1)}
109
+
110
+ /* #define USE_CRNL_AS_LINE_TERMINATOR */
111
+ #define USE_UNICODE_PROPERTIES
112
+ /* #define USE_UNICODE_CASE_FOLD_TURKISH_AZERI */
113
+ /* #define USE_UNICODE_ALL_LINE_TERMINATORS */ /* see Unicode.org UTF#18 */
114
+
115
+
116
+ #define ONIG_ENCODING_INIT_DEFAULT ONIG_ENCODING_ASCII
117
+
118
+ /* for encoding system implementation (internal) */
119
+ ONIG_EXTERN int onigenc_ascii_apply_all_case_fold P_((OnigCaseFoldType flag, OnigApplyAllCaseFoldFunc f, void* arg, OnigEncoding enc));
120
+ ONIG_EXTERN int onigenc_ascii_get_case_fold_codes_by_str P_((OnigCaseFoldType flag, const OnigUChar* p, const OnigUChar* end, OnigCaseFoldCodeItem items[], OnigEncoding enc));
121
+ ONIG_EXTERN int onigenc_apply_all_case_fold_with_map P_((int map_size, const OnigPairCaseFoldCodes map[], int ess_tsett_flag, OnigCaseFoldType flag, OnigApplyAllCaseFoldFunc f, void* arg));
122
+ ONIG_EXTERN int onigenc_get_case_fold_codes_by_str_with_map P_((int map_size, const OnigPairCaseFoldCodes map[], int ess_tsett_flag, OnigCaseFoldType flag, const OnigUChar* p, const OnigUChar* end, OnigCaseFoldCodeItem items[]));
123
+ ONIG_EXTERN int onigenc_not_support_get_ctype_code_range P_((OnigCtype ctype, OnigCodePoint* sb_out, const OnigCodePoint* ranges[], OnigEncoding enc));
124
+ ONIG_EXTERN int onigenc_is_mbc_newline_0x0a P_((const UChar* p, const UChar* end, OnigEncoding enc));
125
+
126
+
127
+ /* methods for single byte encoding */
128
+ ONIG_EXTERN int onigenc_ascii_mbc_case_fold P_((OnigCaseFoldType flag, const UChar** p, const UChar* end, UChar* lower, OnigEncoding enc));
129
+ ONIG_EXTERN int onigenc_single_byte_mbc_enc_len P_((const UChar* p, const UChar* e, OnigEncoding enc));
130
+ ONIG_EXTERN OnigCodePoint onigenc_single_byte_mbc_to_code P_((const UChar* p, const UChar* end, OnigEncoding enc));
131
+ ONIG_EXTERN int onigenc_single_byte_code_to_mbclen P_((OnigCodePoint code, OnigEncoding enc));
132
+ ONIG_EXTERN int onigenc_single_byte_code_to_mbc P_((OnigCodePoint code, UChar *buf, OnigEncoding enc));
133
+ ONIG_EXTERN UChar* onigenc_single_byte_left_adjust_char_head P_((const UChar* start, const UChar* s, const OnigUChar* end, OnigEncoding enc));
134
+ ONIG_EXTERN int onigenc_always_true_is_allowed_reverse_match P_((const UChar* s, const UChar* end, OnigEncoding enc));
135
+ ONIG_EXTERN int onigenc_always_false_is_allowed_reverse_match P_((const UChar* s, const UChar* end, OnigEncoding enc));
136
+ ONIG_EXTERN int onigenc_ascii_is_code_ctype P_((OnigCodePoint code, unsigned int ctype, OnigEncoding enc));
137
+
138
+ /* methods for multi byte encoding */
139
+ ONIG_EXTERN OnigCodePoint onigenc_mbn_mbc_to_code P_((OnigEncoding enc, const UChar* p, const UChar* end));
140
+ ONIG_EXTERN int onigenc_mbn_mbc_case_fold P_((OnigEncoding enc, OnigCaseFoldType flag, const UChar** p, const UChar* end, UChar* lower));
141
+ ONIG_EXTERN int onigenc_mb2_code_to_mbclen P_((OnigCodePoint code, OnigEncoding enc));
142
+ ONIG_EXTERN int onigenc_mb2_code_to_mbc P_((OnigEncoding enc, OnigCodePoint code, UChar *buf));
143
+ ONIG_EXTERN int onigenc_minimum_property_name_to_ctype P_((OnigEncoding enc, UChar* p, UChar* end));
144
+ ONIG_EXTERN int onigenc_unicode_property_name_to_ctype P_((OnigEncoding enc, UChar* p, UChar* end));
145
+ ONIG_EXTERN int onigenc_mb2_is_code_ctype P_((OnigEncoding enc, OnigCodePoint code, unsigned int ctype));
146
+ ONIG_EXTERN int onigenc_mb4_code_to_mbclen P_((OnigCodePoint code, OnigEncoding enc));
147
+ ONIG_EXTERN int onigenc_mb4_code_to_mbc P_((OnigEncoding enc, OnigCodePoint code, UChar *buf));
148
+ ONIG_EXTERN int onigenc_mb4_is_code_ctype P_((OnigEncoding enc, OnigCodePoint code, unsigned int ctype));
149
+
150
+
151
+ /* in enc/unicode.c */
152
+ ONIG_EXTERN int onigenc_unicode_is_code_ctype P_((OnigCodePoint code, unsigned int ctype, OnigEncoding enc));
153
+ ONIG_EXTERN int onigenc_utf16_32_get_ctype_code_range P_((OnigCtype ctype, OnigCodePoint *sb_out, const OnigCodePoint* ranges[], OnigEncoding enc));
154
+ ONIG_EXTERN int onigenc_unicode_ctype_code_range P_((int ctype, const OnigCodePoint* ranges[]));
155
+ ONIG_EXTERN int onigenc_unicode_get_case_fold_codes_by_str P_((OnigEncoding enc, OnigCaseFoldType flag, const OnigUChar* p, const OnigUChar* end, OnigCaseFoldCodeItem items[]));
156
+ ONIG_EXTERN int onigenc_unicode_mbc_case_fold P_((OnigEncoding enc, OnigCaseFoldType flag, const UChar** pp, const UChar* end, UChar* fold));
157
+ ONIG_EXTERN int onigenc_unicode_apply_all_case_fold P_((OnigCaseFoldType flag, OnigApplyAllCaseFoldFunc f, void* arg, OnigEncoding enc));
158
+
159
+
160
+ #define UTF16_IS_SURROGATE_FIRST(c) (((c) & 0xfc) == 0xd8)
161
+ #define UTF16_IS_SURROGATE_SECOND(c) (((c) & 0xfc) == 0xdc)
162
+
163
+ #define ONIGENC_ISO_8859_1_TO_LOWER_CASE(c) \
164
+ OnigEncISO_8859_1_ToLowerCaseTable[c]
165
+ #define ONIGENC_ISO_8859_1_TO_UPPER_CASE(c) \
166
+ OnigEncISO_8859_1_ToUpperCaseTable[c]
167
+
168
+ ONIG_EXTERN const UChar OnigEncISO_8859_1_ToLowerCaseTable[];
169
+ ONIG_EXTERN const UChar OnigEncISO_8859_1_ToUpperCaseTable[];
170
+
171
+ ONIG_EXTERN int
172
+ onigenc_with_ascii_strncmp P_((OnigEncoding enc, const UChar* p, const UChar* end, const UChar* sascii /* ascii */, int n));
173
+ ONIG_EXTERN UChar*
174
+ onigenc_step P_((OnigEncoding enc, const UChar* p, const UChar* end, int n));
175
+
176
+ /* defined in regexec.c, but used in enc/xxx.c */
177
+ extern int onig_is_in_code_range P_((const UChar* p, OnigCodePoint code));
178
+
179
+ ONIG_EXTERN OnigEncoding OnigEncDefaultCharEncoding;
180
+ ONIG_EXTERN const UChar OnigEncAsciiToLowerCaseTable[];
181
+ ONIG_EXTERN const UChar OnigEncAsciiToUpperCaseTable[];
182
+ ONIG_EXTERN const unsigned short OnigEncAsciiCtypeTable[];
183
+
184
+ #define ONIGENC_IS_ASCII_CODE(code) ((code) < 0x80)
185
+ #define ONIGENC_ASCII_CODE_TO_LOWER_CASE(c) OnigEncAsciiToLowerCaseTable[c]
186
+ #define ONIGENC_ASCII_CODE_TO_UPPER_CASE(c) OnigEncAsciiToUpperCaseTable[c]
187
+ #define ONIGENC_IS_ASCII_CODE_CTYPE(code,ctype) \
188
+ ((OnigEncAsciiCtypeTable[code] & CTYPE_TO_BIT(ctype)) != 0)
189
+ #define ONIGENC_IS_ASCII_CODE_CASE_AMBIG(code) \
190
+ (ONIGENC_IS_ASCII_CODE_CTYPE(code, ONIGENC_CTYPE_UPPER) ||\
191
+ ONIGENC_IS_ASCII_CODE_CTYPE(code, ONIGENC_CTYPE_LOWER))
192
+
193
+ #ifdef ONIG_ENC_REGISTER
194
+ extern int ONIG_ENC_REGISTER(const char *, OnigEncodingType*);
195
+ #define OnigEncodingName(n) encoding_##n
196
+ #define OnigEncodingDeclare(n) static OnigEncodingType OnigEncodingName(n)
197
+ #define OnigEncodingDefine(f,n) \
198
+ OnigEncodingDeclare(n); \
199
+ void Init_##f(void) { \
200
+ ONIG_ENC_REGISTER(OnigEncodingName(n).name, \
201
+ &OnigEncodingName(n)); \
202
+ } \
203
+ OnigEncodingDeclare(n)
204
+ #else
205
+ #define OnigEncodingName(n) OnigEncoding##n
206
+ #define OnigEncodingDeclare(n) OnigEncodingType OnigEncodingName(n)
207
+ #define OnigEncodingDefine(f,n) OnigEncodingDeclare(n)
208
+ #endif
209
+
210
+ /* macros for define replica encoding and encoding alias */
211
+ #define ENC_REPLICATE(name, orig)
212
+ #define ENC_ALIAS(name, orig)
213
+ #define ENC_DUMMY(name)
214
+
215
+ #if defined __GNUC__ && __GNUC__ >= 4
216
+ #pragma GCC visibility pop
217
+ #endif
218
+
219
+ #endif /* ONIGURUMA_REGENC_H */
@@ -0,0 +1,850 @@
1
+ #ifndef ONIGURUMA_REGINT_H
2
+ #define ONIGURUMA_REGINT_H
3
+ /**********************************************************************
4
+ regint.h - Oniguruma (regular expression library)
5
+ **********************************************************************/
6
+ /*-
7
+ * Copyright (c) 2002-2008 K.Kosako <sndgk393 AT ybb DOT ne DOT jp>
8
+ * All rights reserved.
9
+ *
10
+ * Redistribution and use in source and binary forms, with or without
11
+ * modification, are permitted provided that the following conditions
12
+ * are met:
13
+ * 1. Redistributions of source code must retain the above copyright
14
+ * notice, this list of conditions and the following disclaimer.
15
+ * 2. Redistributions in binary form must reproduce the above copyright
16
+ * notice, this list of conditions and the following disclaimer in the
17
+ * documentation and/or other materials provided with the distribution.
18
+ *
19
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
20
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22
+ * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
23
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29
+ * SUCH DAMAGE.
30
+ */
31
+
32
+ /* for debug */
33
+ /* #define ONIG_DEBUG_PARSE_TREE */
34
+ /* #define ONIG_DEBUG_COMPILE */
35
+ /* #define ONIG_DEBUG_SEARCH */
36
+ /* #define ONIG_DEBUG_MATCH */
37
+ /* #define ONIG_DONT_OPTIMIZE */
38
+
39
+ /* for byte-code statistical data. */
40
+ /* #define ONIG_DEBUG_STATISTICS */
41
+
42
+ #if defined(ONIG_DEBUG_PARSE_TREE) || defined(ONIG_DEBUG_MATCH) || \
43
+ defined(ONIG_DEBUG_SEARCH) || defined(ONIG_DEBUG_COMPILE) || \
44
+ defined(ONIG_DEBUG_STATISTICS)
45
+ #ifndef ONIG_DEBUG
46
+ #define ONIG_DEBUG
47
+ #endif
48
+ #endif
49
+
50
+ #if defined(__i386) || defined(__i386__) || defined(_M_IX86) || \
51
+ defined(__x86_64) || defined(__x86_64__) || defined(_M_AMD86) || \
52
+ defined(__mc68020__)
53
+ #define PLATFORM_UNALIGNED_WORD_ACCESS
54
+ #endif
55
+
56
+ /* config */
57
+ /* spec. config */
58
+ #define USE_NAMED_GROUP
59
+ #define USE_SUBEXP_CALL
60
+ #define USE_BACKREF_WITH_LEVEL /* \k<name+n>, \k<name-n> */
61
+ #define USE_MONOMANIAC_CHECK_CAPTURES_IN_ENDLESS_REPEAT /* /(?:()|())*\2/ */
62
+ #define USE_NEWLINE_AT_END_OF_STRING_HAS_EMPTY_LINE /* /\n$/ =~ "\n" */
63
+ #define USE_WARNING_REDUNDANT_NESTED_REPEAT_OPERATOR
64
+ /* #define USE_RECOMPILE_API */
65
+ /* !!! moved to regenc.h. */ /* #define USE_CRNL_AS_LINE_TERMINATOR */
66
+
67
+ /* internal config */
68
+ #define USE_PARSE_TREE_NODE_RECYCLE
69
+ #define USE_OP_PUSH_OR_JUMP_EXACT
70
+ #define USE_QTFR_PEEK_NEXT
71
+ #define USE_ST_LIBRARY
72
+ #define USE_SHARED_CCLASS_TABLE
73
+
74
+ #define INIT_MATCH_STACK_SIZE 160
75
+ #define DEFAULT_MATCH_STACK_LIMIT_SIZE 0 /* unlimited */
76
+
77
+ #if defined(__GNUC__)
78
+ # define ARG_UNUSED __attribute__ ((unused))
79
+ #else
80
+ # define ARG_UNUSED
81
+ #endif
82
+
83
+ /* */
84
+ /* escape other system UChar definition */
85
+ #ifndef RUBY_DEFINES_H
86
+ #include "ruby/ruby.h"
87
+ #undef xmalloc
88
+ #undef xrealloc
89
+ #undef xcalloc
90
+ #undef xfree
91
+ #endif
92
+ #ifdef ONIG_ESCAPE_UCHAR_COLLISION
93
+ #undef ONIG_ESCAPE_UCHAR_COLLISION
94
+ #endif
95
+ #undef USE_MATCH_RANGE_IS_COMPLETE_RANGE
96
+ #undef USE_CAPTURE_HISTORY
97
+ #define USE_VARIABLE_META_CHARS
98
+ #define USE_WORD_BEGIN_END /* "\<": word-begin, "\>": word-end */
99
+ #define USE_POSIX_REGION_OPTION /* needed for POSIX API support */
100
+ #define USE_FIND_LONGEST_SEARCH_ALL_OF_RANGE
101
+ /* #define USE_COMBINATION_EXPLOSION_CHECK */ /* (X*)* */
102
+ /* #define USE_MULTI_THREAD_SYSTEM */
103
+ #define THREAD_SYSTEM_INIT /* depend on thread system */
104
+ #define THREAD_SYSTEM_END /* depend on thread system */
105
+ #define THREAD_ATOMIC_START /* depend on thread system */
106
+ #define THREAD_ATOMIC_END /* depend on thread system */
107
+ #define THREAD_PASS /* depend on thread system */
108
+ #ifndef xmalloc
109
+ #define xmalloc malloc
110
+ #define xrealloc realloc
111
+ #define xcalloc calloc
112
+ #define xfree free
113
+ #endif
114
+
115
+ #ifdef RUBY
116
+
117
+ #define CHECK_INTERRUPT_IN_MATCH_AT rb_thread_check_ints()
118
+ #define onig_st_init_table st_init_table
119
+ #define onig_st_init_table_with_size st_init_table_with_size
120
+ #define onig_st_init_numtable st_init_numtable
121
+ #define onig_st_init_numtable_with_size st_init_numtable_with_size
122
+ #define onig_st_init_strtable st_init_strtable
123
+ #define onig_st_init_strtable_with_size st_init_strtable_with_size
124
+ #define onig_st_delete st_delete
125
+ #define onig_st_delete_safe st_delete_safe
126
+ #define onig_st_insert st_insert
127
+ #define onig_st_lookup st_lookup
128
+ #define onig_st_foreach st_foreach
129
+ #define onig_st_add_direct st_add_direct
130
+ #define onig_st_free_table st_free_table
131
+ #define onig_st_cleanup_safe st_cleanup_safe
132
+ #define onig_st_copy st_copy
133
+ #define onig_st_nothing_key_clone st_nothing_key_clone
134
+ #define onig_st_nothing_key_free st_nothing_key_free
135
+ #define onig_st_is_member st_is_member
136
+
137
+ #define USE_UPPER_CASE_TABLE
138
+ #else
139
+
140
+ #define st_init_table onig_st_init_table
141
+ #define st_init_table_with_size onig_st_init_table_with_size
142
+ #define st_init_numtable onig_st_init_numtable
143
+ #define st_init_numtable_with_size onig_st_init_numtable_with_size
144
+ #define st_init_strtable onig_st_init_strtable
145
+ #define st_init_strtable_with_size onig_st_init_strtable_with_size
146
+ #define st_delete onig_st_delete
147
+ #define st_delete_safe onig_st_delete_safe
148
+ #define st_insert onig_st_insert
149
+ #define st_lookup onig_st_lookup
150
+ #define st_foreach onig_st_foreach
151
+ #define st_add_direct onig_st_add_direct
152
+ #define st_free_table onig_st_free_table
153
+ #define st_cleanup_safe onig_st_cleanup_safe
154
+ #define st_copy onig_st_copy
155
+ #define st_nothing_key_clone onig_st_nothing_key_clone
156
+ #define st_nothing_key_free onig_st_nothing_key_free
157
+ /* */
158
+ #define onig_st_is_member st_is_member
159
+
160
+ #define CHECK_INTERRUPT_IN_MATCH_AT
161
+
162
+ #endif
163
+
164
+ #define STATE_CHECK_STRING_THRESHOLD_LEN 7
165
+ #define STATE_CHECK_BUFF_MAX_SIZE 0x4000
166
+
167
+ #define THREAD_PASS_LIMIT_COUNT 8
168
+ #define xmemset memset
169
+ #define xmemcpy memcpy
170
+ #define xmemmove memmove
171
+
172
+ #if defined(_WIN32) && !defined(__GNUC__)
173
+ #define xalloca _alloca
174
+ #define xvsnprintf _vsnprintf
175
+ #else
176
+ #define xalloca alloca
177
+ #define xvsnprintf vsnprintf
178
+ #endif
179
+
180
+
181
+ #if defined(USE_RECOMPILE_API) && defined(USE_MULTI_THREAD_SYSTEM)
182
+ #define ONIG_STATE_INC(reg) (reg)->state++
183
+ #define ONIG_STATE_DEC(reg) (reg)->state--
184
+
185
+ #define ONIG_STATE_INC_THREAD(reg) do {\
186
+ THREAD_ATOMIC_START;\
187
+ (reg)->state++;\
188
+ THREAD_ATOMIC_END;\
189
+ } while(0)
190
+ #define ONIG_STATE_DEC_THREAD(reg) do {\
191
+ THREAD_ATOMIC_START;\
192
+ (reg)->state--;\
193
+ THREAD_ATOMIC_END;\
194
+ } while(0)
195
+ #else
196
+ #define ONIG_STATE_INC(reg) /* Nothing */
197
+ #define ONIG_STATE_DEC(reg) /* Nothing */
198
+ #define ONIG_STATE_INC_THREAD(reg) /* Nothing */
199
+ #define ONIG_STATE_DEC_THREAD(reg) /* Nothing */
200
+ #endif /* USE_RECOMPILE_API && USE_MULTI_THREAD_SYSTEM */
201
+
202
+ #ifdef HAVE_STDLIB_H
203
+ #include <stdlib.h>
204
+ #endif
205
+
206
+ #if defined(HAVE_ALLOCA_H) && (defined(_AIX) || !defined(__GNUC__))
207
+ #include <alloca.h>
208
+ #endif
209
+
210
+ #ifdef HAVE_STRING_H
211
+ # include <string.h>
212
+ #else
213
+ # include <strings.h>
214
+ #endif
215
+
216
+ #include <ctype.h>
217
+ #ifdef HAVE_SYS_TYPES_H
218
+ #include <sys/types.h>
219
+ #endif
220
+
221
+ #ifdef ONIG_DEBUG
222
+ # include <stdio.h>
223
+ #endif
224
+
225
+ #include "regenc.h"
226
+
227
+ #if defined __GNUC__ && __GNUC__ >= 4
228
+ #pragma GCC visibility push(default)
229
+ #endif
230
+
231
+ #ifdef MIN
232
+ #undef MIN
233
+ #endif
234
+ #ifdef MAX
235
+ #undef MAX
236
+ #endif
237
+ #define MIN(a,b) (((a)>(b))?(b):(a))
238
+ #define MAX(a,b) (((a)<(b))?(b):(a))
239
+
240
+ #define IS_NULL(p) (((void*)(p)) == (void*)0)
241
+ #define IS_NOT_NULL(p) (((void*)(p)) != (void*)0)
242
+ #define CHECK_NULL_RETURN(p) if (IS_NULL(p)) return NULL
243
+ #define CHECK_NULL_RETURN_MEMERR(p) if (IS_NULL(p)) return ONIGERR_MEMORY
244
+ #define NULL_UCHARP ((UChar* )0)
245
+
246
+ #ifdef PLATFORM_UNALIGNED_WORD_ACCESS
247
+
248
+ #define PLATFORM_GET_INC(val,p,type) do{\
249
+ val = *(type* )p;\
250
+ (p) += sizeof(type);\
251
+ } while(0)
252
+
253
+ #else
254
+
255
+ #define PLATFORM_GET_INC(val,p,type) do{\
256
+ xmemcpy(&val, (p), sizeof(type));\
257
+ (p) += sizeof(type);\
258
+ } while(0)
259
+
260
+ /* sizeof(OnigCodePoint) */
261
+ #define WORD_ALIGNMENT_SIZE SIZEOF_LONG
262
+
263
+ #define GET_ALIGNMENT_PAD_SIZE(addr,pad_size) do {\
264
+ (pad_size) = WORD_ALIGNMENT_SIZE \
265
+ - ((uintptr_t )(addr) % WORD_ALIGNMENT_SIZE);\
266
+ if ((pad_size) == WORD_ALIGNMENT_SIZE) (pad_size) = 0;\
267
+ } while (0)
268
+
269
+ #define ALIGNMENT_RIGHT(addr) do {\
270
+ (addr) += (WORD_ALIGNMENT_SIZE - 1);\
271
+ (addr) -= ((uintptr_t )(addr) % WORD_ALIGNMENT_SIZE);\
272
+ } while (0)
273
+
274
+ #endif /* PLATFORM_UNALIGNED_WORD_ACCESS */
275
+
276
+ /* stack pop level */
277
+ #define STACK_POP_LEVEL_FREE 0
278
+ #define STACK_POP_LEVEL_MEM_START 1
279
+ #define STACK_POP_LEVEL_ALL 2
280
+
281
+ /* optimize flags */
282
+ #define ONIG_OPTIMIZE_NONE 0
283
+ #define ONIG_OPTIMIZE_EXACT 1 /* Slow Search */
284
+ #define ONIG_OPTIMIZE_EXACT_BM 2 /* Boyer Moore Search */
285
+ #define ONIG_OPTIMIZE_EXACT_BM_NOT_REV 3 /* BM (but not simple match) */
286
+ #define ONIG_OPTIMIZE_EXACT_IC 4 /* Slow Search (ignore case) */
287
+ #define ONIG_OPTIMIZE_MAP 5 /* char map */
288
+
289
+ /* bit status */
290
+ typedef unsigned int BitStatusType;
291
+
292
+ #define BIT_STATUS_BITS_NUM (sizeof(BitStatusType) * 8)
293
+ #define BIT_STATUS_CLEAR(stats) (stats) = 0
294
+ #define BIT_STATUS_ON_ALL(stats) (stats) = ~((BitStatusType )0)
295
+ #define BIT_STATUS_AT(stats,n) \
296
+ ((n) < (int )BIT_STATUS_BITS_NUM ? ((stats) & (1 << n)) : ((stats) & 1))
297
+
298
+ #define BIT_STATUS_ON_AT(stats,n) do {\
299
+ if ((n) < (int )BIT_STATUS_BITS_NUM) \
300
+ (stats) |= (1 << (n));\
301
+ else\
302
+ (stats) |= 1;\
303
+ } while (0)
304
+
305
+ #define BIT_STATUS_ON_AT_SIMPLE(stats,n) do {\
306
+ if ((n) < (int )BIT_STATUS_BITS_NUM)\
307
+ (stats) |= (1 << (n));\
308
+ } while (0)
309
+
310
+
311
+ #define INT_MAX_LIMIT ((1UL << (SIZEOF_INT * 8 - 1)) - 1)
312
+
313
+ #define DIGITVAL(code) ((code) - '0')
314
+ #define ODIGITVAL(code) DIGITVAL(code)
315
+ #define XDIGITVAL(enc,code) \
316
+ (ONIGENC_IS_CODE_DIGIT(enc,code) ? DIGITVAL(code) \
317
+ : (ONIGENC_IS_CODE_UPPER(enc,code) ? (code) - 'A' + 10 : (code) - 'a' + 10))
318
+
319
+ #define IS_SINGLELINE(option) ((option) & ONIG_OPTION_SINGLELINE)
320
+ #define IS_MULTILINE(option) ((option) & ONIG_OPTION_MULTILINE)
321
+ #define IS_IGNORECASE(option) ((option) & ONIG_OPTION_IGNORECASE)
322
+ #define IS_EXTEND(option) ((option) & ONIG_OPTION_EXTEND)
323
+ #define IS_FIND_LONGEST(option) ((option) & ONIG_OPTION_FIND_LONGEST)
324
+ #define IS_FIND_NOT_EMPTY(option) ((option) & ONIG_OPTION_FIND_NOT_EMPTY)
325
+ #define IS_FIND_CONDITION(option) ((option) & \
326
+ (ONIG_OPTION_FIND_LONGEST | ONIG_OPTION_FIND_NOT_EMPTY))
327
+ #define IS_NOTBOL(option) ((option) & ONIG_OPTION_NOTBOL)
328
+ #define IS_NOTEOL(option) ((option) & ONIG_OPTION_NOTEOL)
329
+ #define IS_POSIX_REGION(option) ((option) & ONIG_OPTION_POSIX_REGION)
330
+
331
+ /* OP_SET_OPTION is required for these options.
332
+ #define IS_DYNAMIC_OPTION(option) \
333
+ (((option) & (ONIG_OPTION_MULTILINE | ONIG_OPTION_IGNORECASE)) != 0)
334
+ */
335
+ /* ignore-case and multibyte status are included in compiled code. */
336
+ #define IS_DYNAMIC_OPTION(option) 0
337
+
338
+ #define DISABLE_CASE_FOLD_MULTI_CHAR(case_fold_flag) \
339
+ ((case_fold_flag) & ~INTERNAL_ONIGENC_CASE_FOLD_MULTI_CHAR)
340
+
341
+ #define REPEAT_INFINITE -1
342
+ #define IS_REPEAT_INFINITE(n) ((n) == REPEAT_INFINITE)
343
+
344
+ /* bitset */
345
+ #define BITS_PER_BYTE 8
346
+ #define SINGLE_BYTE_SIZE (1 << BITS_PER_BYTE)
347
+ #define BITS_IN_ROOM (sizeof(Bits) * BITS_PER_BYTE)
348
+ #define BITSET_SIZE (SINGLE_BYTE_SIZE / BITS_IN_ROOM)
349
+
350
+ #ifdef PLATFORM_UNALIGNED_WORD_ACCESS
351
+ typedef unsigned int Bits;
352
+ #else
353
+ typedef unsigned char Bits;
354
+ #endif
355
+ typedef Bits BitSet[BITSET_SIZE];
356
+ typedef Bits* BitSetRef;
357
+
358
+ #define SIZE_BITSET (int)sizeof(BitSet)
359
+
360
+ #define BITSET_CLEAR(bs) do {\
361
+ int i;\
362
+ for (i = 0; i < (int )BITSET_SIZE; i++) { (bs)[i] = 0; } \
363
+ } while (0)
364
+
365
+ #define BS_ROOM(bs,pos) (bs)[pos / BITS_IN_ROOM]
366
+ #define BS_BIT(pos) (1 << (pos % BITS_IN_ROOM))
367
+
368
+ #define BITSET_AT(bs, pos) (BS_ROOM(bs,pos) & BS_BIT(pos))
369
+ #define BITSET_SET_BIT(bs, pos) BS_ROOM(bs,pos) |= BS_BIT(pos)
370
+ #define BITSET_CLEAR_BIT(bs, pos) BS_ROOM(bs,pos) &= ~(BS_BIT(pos))
371
+ #define BITSET_INVERT_BIT(bs, pos) BS_ROOM(bs,pos) ^= BS_BIT(pos)
372
+
373
+ /* bytes buffer */
374
+ typedef struct _BBuf {
375
+ UChar* p;
376
+ unsigned int used;
377
+ unsigned int alloc;
378
+ } BBuf;
379
+
380
+ #define BBUF_INIT(buf,size) onig_bbuf_init((BBuf* )(buf), (size))
381
+
382
+ #define BBUF_SIZE_INC(buf,inc) do{\
383
+ (buf)->alloc += (inc);\
384
+ (buf)->p = (UChar* )xrealloc((buf)->p, (buf)->alloc);\
385
+ if (IS_NULL((buf)->p)) return(ONIGERR_MEMORY);\
386
+ } while (0)
387
+
388
+ #define BBUF_EXPAND(buf,low) do{\
389
+ do { (buf)->alloc *= 2; } while ((buf)->alloc < (unsigned int )low);\
390
+ (buf)->p = (UChar* )xrealloc((buf)->p, (buf)->alloc);\
391
+ if (IS_NULL((buf)->p)) return(ONIGERR_MEMORY);\
392
+ } while (0)
393
+
394
+ #define BBUF_ENSURE_SIZE(buf,size) do{\
395
+ unsigned int new_alloc = (buf)->alloc;\
396
+ while (new_alloc < (unsigned int )(size)) { new_alloc *= 2; }\
397
+ if ((buf)->alloc != new_alloc) {\
398
+ (buf)->p = (UChar* )xrealloc((buf)->p, new_alloc);\
399
+ if (IS_NULL((buf)->p)) return(ONIGERR_MEMORY);\
400
+ (buf)->alloc = new_alloc;\
401
+ }\
402
+ } while (0)
403
+
404
+ #define BBUF_WRITE(buf,pos,bytes,n) do{\
405
+ int used = (pos) + (int)(n);\
406
+ if ((buf)->alloc < (unsigned int )used) BBUF_EXPAND((buf),used);\
407
+ xmemcpy((buf)->p + (pos), (bytes), (n));\
408
+ if ((buf)->used < (unsigned int )used) (buf)->used = used;\
409
+ } while (0)
410
+
411
+ #define BBUF_WRITE1(buf,pos,byte) do{\
412
+ int used = (pos) + 1;\
413
+ if ((buf)->alloc < (unsigned int )used) BBUF_EXPAND((buf),used);\
414
+ (buf)->p[(pos)] = (byte);\
415
+ if ((buf)->used < (unsigned int )used) (buf)->used = used;\
416
+ } while (0)
417
+
418
+ #define BBUF_ADD(buf,bytes,n) BBUF_WRITE((buf),(buf)->used,(bytes),(n))
419
+ #define BBUF_ADD1(buf,byte) BBUF_WRITE1((buf),(buf)->used,(byte))
420
+ #define BBUF_GET_ADD_ADDRESS(buf) ((buf)->p + (buf)->used)
421
+ #define BBUF_GET_OFFSET_POS(buf) ((buf)->used)
422
+
423
+ /* from < to */
424
+ #define BBUF_MOVE_RIGHT(buf,from,to,n) do {\
425
+ if ((unsigned int )((to)+(n)) > (buf)->alloc) BBUF_EXPAND((buf),(to) + (n));\
426
+ xmemmove((buf)->p + (to), (buf)->p + (from), (n));\
427
+ if ((unsigned int )((to)+(n)) > (buf)->used) (buf)->used = (to) + (n);\
428
+ } while (0)
429
+
430
+ /* from > to */
431
+ #define BBUF_MOVE_LEFT(buf,from,to,n) do {\
432
+ xmemmove((buf)->p + (to), (buf)->p + (from), (n));\
433
+ } while (0)
434
+
435
+ /* from > to */
436
+ #define BBUF_MOVE_LEFT_REDUCE(buf,from,to) do {\
437
+ xmemmove((buf)->p + (to), (buf)->p + (from), (buf)->used - (from));\
438
+ (buf)->used -= (from - to);\
439
+ } while (0)
440
+
441
+ #define BBUF_INSERT(buf,pos,bytes,n) do {\
442
+ if (pos >= (buf)->used) {\
443
+ BBUF_WRITE(buf,pos,bytes,n);\
444
+ }\
445
+ else {\
446
+ BBUF_MOVE_RIGHT((buf),(pos),(pos) + (n),((buf)->used - (pos)));\
447
+ xmemcpy((buf)->p + (pos), (bytes), (n));\
448
+ }\
449
+ } while (0)
450
+
451
+ #define BBUF_GET_BYTE(buf, pos) (buf)->p[(pos)]
452
+
453
+
454
+ #define ANCHOR_BEGIN_BUF (1<<0)
455
+ #define ANCHOR_BEGIN_LINE (1<<1)
456
+ #define ANCHOR_BEGIN_POSITION (1<<2)
457
+ #define ANCHOR_END_BUF (1<<3)
458
+ #define ANCHOR_SEMI_END_BUF (1<<4)
459
+ #define ANCHOR_END_LINE (1<<5)
460
+
461
+ #define ANCHOR_WORD_BOUND (1<<6)
462
+ #define ANCHOR_NOT_WORD_BOUND (1<<7)
463
+ #define ANCHOR_WORD_BEGIN (1<<8)
464
+ #define ANCHOR_WORD_END (1<<9)
465
+ #define ANCHOR_PREC_READ (1<<10)
466
+ #define ANCHOR_PREC_READ_NOT (1<<11)
467
+ #define ANCHOR_LOOK_BEHIND (1<<12)
468
+ #define ANCHOR_LOOK_BEHIND_NOT (1<<13)
469
+
470
+ #define ANCHOR_ANYCHAR_STAR (1<<14) /* ".*" optimize info */
471
+ #define ANCHOR_ANYCHAR_STAR_ML (1<<15) /* ".*" optimize info (multi-line) */
472
+
473
+ /* operation code */
474
+ enum OpCode {
475
+ OP_FINISH = 0, /* matching process terminator (no more alternative) */
476
+ OP_END = 1, /* pattern code terminator (success end) */
477
+
478
+ OP_EXACT1 = 2, /* single byte, N = 1 */
479
+ OP_EXACT2, /* single byte, N = 2 */
480
+ OP_EXACT3, /* single byte, N = 3 */
481
+ OP_EXACT4, /* single byte, N = 4 */
482
+ OP_EXACT5, /* single byte, N = 5 */
483
+ OP_EXACTN, /* single byte */
484
+ OP_EXACTMB2N1, /* mb-length = 2 N = 1 */
485
+ OP_EXACTMB2N2, /* mb-length = 2 N = 2 */
486
+ OP_EXACTMB2N3, /* mb-length = 2 N = 3 */
487
+ OP_EXACTMB2N, /* mb-length = 2 */
488
+ OP_EXACTMB3N, /* mb-length = 3 */
489
+ OP_EXACTMBN, /* other length */
490
+
491
+ OP_EXACT1_IC, /* single byte, N = 1, ignore case */
492
+ OP_EXACTN_IC, /* single byte, ignore case */
493
+
494
+ OP_CCLASS,
495
+ OP_CCLASS_MB,
496
+ OP_CCLASS_MIX,
497
+ OP_CCLASS_NOT,
498
+ OP_CCLASS_MB_NOT,
499
+ OP_CCLASS_MIX_NOT,
500
+ OP_CCLASS_NODE, /* pointer to CClassNode node */
501
+
502
+ OP_ANYCHAR, /* "." */
503
+ OP_ANYCHAR_ML, /* "." multi-line */
504
+ OP_ANYCHAR_STAR, /* ".*" */
505
+ OP_ANYCHAR_ML_STAR, /* ".*" multi-line */
506
+ OP_ANYCHAR_STAR_PEEK_NEXT,
507
+ OP_ANYCHAR_ML_STAR_PEEK_NEXT,
508
+
509
+ OP_WORD,
510
+ OP_NOT_WORD,
511
+ OP_WORD_BOUND,
512
+ OP_NOT_WORD_BOUND,
513
+ OP_WORD_BEGIN,
514
+ OP_WORD_END,
515
+
516
+ OP_BEGIN_BUF,
517
+ OP_END_BUF,
518
+ OP_BEGIN_LINE,
519
+ OP_END_LINE,
520
+ OP_SEMI_END_BUF,
521
+ OP_BEGIN_POSITION,
522
+
523
+ OP_BACKREF1,
524
+ OP_BACKREF2,
525
+ OP_BACKREFN,
526
+ OP_BACKREFN_IC,
527
+ OP_BACKREF_MULTI,
528
+ OP_BACKREF_MULTI_IC,
529
+ OP_BACKREF_WITH_LEVEL, /* \k<xxx+n>, \k<xxx-n> */
530
+
531
+ OP_MEMORY_START,
532
+ OP_MEMORY_START_PUSH, /* push back-tracker to stack */
533
+ OP_MEMORY_END_PUSH, /* push back-tracker to stack */
534
+ OP_MEMORY_END_PUSH_REC, /* push back-tracker to stack */
535
+ OP_MEMORY_END,
536
+ OP_MEMORY_END_REC, /* push marker to stack */
537
+
538
+ OP_FAIL, /* pop stack and move */
539
+ OP_JUMP,
540
+ OP_PUSH,
541
+ OP_POP,
542
+ OP_PUSH_OR_JUMP_EXACT1, /* if match exact then push, else jump. */
543
+ OP_PUSH_IF_PEEK_NEXT, /* if match exact then push, else none. */
544
+ OP_REPEAT, /* {n,m} */
545
+ OP_REPEAT_NG, /* {n,m}? (non greedy) */
546
+ OP_REPEAT_INC,
547
+ OP_REPEAT_INC_NG, /* non greedy */
548
+ OP_REPEAT_INC_SG, /* search and get in stack */
549
+ OP_REPEAT_INC_NG_SG, /* search and get in stack (non greedy) */
550
+ OP_NULL_CHECK_START, /* null loop checker start */
551
+ OP_NULL_CHECK_END, /* null loop checker end */
552
+ OP_NULL_CHECK_END_MEMST, /* null loop checker end (with capture status) */
553
+ OP_NULL_CHECK_END_MEMST_PUSH, /* with capture status and push check-end */
554
+
555
+ OP_PUSH_POS, /* (?=...) start */
556
+ OP_POP_POS, /* (?=...) end */
557
+ OP_PUSH_POS_NOT, /* (?!...) start */
558
+ OP_FAIL_POS, /* (?!...) end */
559
+ OP_PUSH_STOP_BT, /* (?>...) start */
560
+ OP_POP_STOP_BT, /* (?>...) end */
561
+ OP_LOOK_BEHIND, /* (?<=...) start (no needs end opcode) */
562
+ OP_PUSH_LOOK_BEHIND_NOT, /* (?<!...) start */
563
+ OP_FAIL_LOOK_BEHIND_NOT, /* (?<!...) end */
564
+
565
+ OP_CALL, /* \g<name> */
566
+ OP_RETURN,
567
+
568
+ OP_STATE_CHECK_PUSH, /* combination explosion check and push */
569
+ OP_STATE_CHECK_PUSH_OR_JUMP, /* check ok -> push, else jump */
570
+ OP_STATE_CHECK, /* check only */
571
+ OP_STATE_CHECK_ANYCHAR_STAR,
572
+ OP_STATE_CHECK_ANYCHAR_ML_STAR,
573
+
574
+ /* no need: IS_DYNAMIC_OPTION() == 0 */
575
+ OP_SET_OPTION_PUSH, /* set option and push recover option */
576
+ OP_SET_OPTION /* set option */
577
+ };
578
+
579
+ typedef int RelAddrType;
580
+ typedef int AbsAddrType;
581
+ typedef int LengthType;
582
+ typedef int RepeatNumType;
583
+ typedef short int MemNumType;
584
+ typedef short int StateCheckNumType;
585
+ typedef void* PointerType;
586
+
587
+ #define SIZE_OPCODE 1
588
+ #define SIZE_RELADDR (int)sizeof(RelAddrType)
589
+ #define SIZE_ABSADDR (int)sizeof(AbsAddrType)
590
+ #define SIZE_LENGTH (int)sizeof(LengthType)
591
+ #define SIZE_MEMNUM (int)sizeof(MemNumType)
592
+ #define SIZE_STATE_CHECK_NUM (int)sizeof(StateCheckNumType)
593
+ #define SIZE_REPEATNUM (int)sizeof(RepeatNumType)
594
+ #define SIZE_OPTION (int)sizeof(OnigOptionType)
595
+ #define SIZE_CODE_POINT (int)sizeof(OnigCodePoint)
596
+ #define SIZE_POINTER (int)sizeof(PointerType)
597
+
598
+
599
+ #define GET_RELADDR_INC(addr,p) PLATFORM_GET_INC(addr, p, RelAddrType)
600
+ #define GET_ABSADDR_INC(addr,p) PLATFORM_GET_INC(addr, p, AbsAddrType)
601
+ #define GET_LENGTH_INC(len,p) PLATFORM_GET_INC(len, p, LengthType)
602
+ #define GET_MEMNUM_INC(num,p) PLATFORM_GET_INC(num, p, MemNumType)
603
+ #define GET_REPEATNUM_INC(num,p) PLATFORM_GET_INC(num, p, RepeatNumType)
604
+ #define GET_OPTION_INC(option,p) PLATFORM_GET_INC(option, p, OnigOptionType)
605
+ #define GET_POINTER_INC(ptr,p) PLATFORM_GET_INC(ptr, p, PointerType)
606
+ #define GET_STATE_CHECK_NUM_INC(num,p) PLATFORM_GET_INC(num, p, StateCheckNumType)
607
+
608
+ /* code point's address must be aligned address. */
609
+ #define GET_CODE_POINT(code,p) code = *((OnigCodePoint* )(p))
610
+ #define GET_BYTE_INC(byte,p) do{\
611
+ byte = *(p);\
612
+ (p)++;\
613
+ } while(0)
614
+
615
+
616
+ /* op-code + arg size */
617
+ #define SIZE_OP_ANYCHAR_STAR SIZE_OPCODE
618
+ #define SIZE_OP_ANYCHAR_STAR_PEEK_NEXT (SIZE_OPCODE + 1)
619
+ #define SIZE_OP_JUMP (SIZE_OPCODE + SIZE_RELADDR)
620
+ #define SIZE_OP_PUSH (SIZE_OPCODE + SIZE_RELADDR)
621
+ #define SIZE_OP_POP SIZE_OPCODE
622
+ #define SIZE_OP_PUSH_OR_JUMP_EXACT1 (SIZE_OPCODE + SIZE_RELADDR + 1)
623
+ #define SIZE_OP_PUSH_IF_PEEK_NEXT (SIZE_OPCODE + SIZE_RELADDR + 1)
624
+ #define SIZE_OP_REPEAT_INC (SIZE_OPCODE + SIZE_MEMNUM)
625
+ #define SIZE_OP_REPEAT_INC_NG (SIZE_OPCODE + SIZE_MEMNUM)
626
+ #define SIZE_OP_PUSH_POS SIZE_OPCODE
627
+ #define SIZE_OP_PUSH_POS_NOT (SIZE_OPCODE + SIZE_RELADDR)
628
+ #define SIZE_OP_POP_POS SIZE_OPCODE
629
+ #define SIZE_OP_FAIL_POS SIZE_OPCODE
630
+ #define SIZE_OP_SET_OPTION (SIZE_OPCODE + SIZE_OPTION)
631
+ #define SIZE_OP_SET_OPTION_PUSH (SIZE_OPCODE + SIZE_OPTION)
632
+ #define SIZE_OP_FAIL SIZE_OPCODE
633
+ #define SIZE_OP_MEMORY_START (SIZE_OPCODE + SIZE_MEMNUM)
634
+ #define SIZE_OP_MEMORY_START_PUSH (SIZE_OPCODE + SIZE_MEMNUM)
635
+ #define SIZE_OP_MEMORY_END_PUSH (SIZE_OPCODE + SIZE_MEMNUM)
636
+ #define SIZE_OP_MEMORY_END_PUSH_REC (SIZE_OPCODE + SIZE_MEMNUM)
637
+ #define SIZE_OP_MEMORY_END (SIZE_OPCODE + SIZE_MEMNUM)
638
+ #define SIZE_OP_MEMORY_END_REC (SIZE_OPCODE + SIZE_MEMNUM)
639
+ #define SIZE_OP_PUSH_STOP_BT SIZE_OPCODE
640
+ #define SIZE_OP_POP_STOP_BT SIZE_OPCODE
641
+ #define SIZE_OP_NULL_CHECK_START (SIZE_OPCODE + SIZE_MEMNUM)
642
+ #define SIZE_OP_NULL_CHECK_END (SIZE_OPCODE + SIZE_MEMNUM)
643
+ #define SIZE_OP_LOOK_BEHIND (SIZE_OPCODE + SIZE_LENGTH)
644
+ #define SIZE_OP_PUSH_LOOK_BEHIND_NOT (SIZE_OPCODE + SIZE_RELADDR + SIZE_LENGTH)
645
+ #define SIZE_OP_FAIL_LOOK_BEHIND_NOT SIZE_OPCODE
646
+ #define SIZE_OP_CALL (SIZE_OPCODE + SIZE_ABSADDR)
647
+ #define SIZE_OP_RETURN SIZE_OPCODE
648
+
649
+ #ifdef USE_COMBINATION_EXPLOSION_CHECK
650
+ #define SIZE_OP_STATE_CHECK (SIZE_OPCODE + SIZE_STATE_CHECK_NUM)
651
+ #define SIZE_OP_STATE_CHECK_PUSH (SIZE_OPCODE + SIZE_STATE_CHECK_NUM + SIZE_RELADDR)
652
+ #define SIZE_OP_STATE_CHECK_PUSH_OR_JUMP (SIZE_OPCODE + SIZE_STATE_CHECK_NUM + SIZE_RELADDR)
653
+ #define SIZE_OP_STATE_CHECK_ANYCHAR_STAR (SIZE_OPCODE + SIZE_STATE_CHECK_NUM)
654
+ #endif
655
+
656
+ #define MC_ESC(syn) (syn)->meta_char_table.esc
657
+ #define MC_ANYCHAR(syn) (syn)->meta_char_table.anychar
658
+ #define MC_ANYTIME(syn) (syn)->meta_char_table.anytime
659
+ #define MC_ZERO_OR_ONE_TIME(syn) (syn)->meta_char_table.zero_or_one_time
660
+ #define MC_ONE_OR_MORE_TIME(syn) (syn)->meta_char_table.one_or_more_time
661
+ #define MC_ANYCHAR_ANYTIME(syn) (syn)->meta_char_table.anychar_anytime
662
+
663
+ #define IS_MC_ESC_CODE(code, syn) \
664
+ ((code) == MC_ESC(syn) && \
665
+ !IS_SYNTAX_OP2((syn), ONIG_SYN_OP2_INEFFECTIVE_ESCAPE))
666
+
667
+
668
+ #define SYN_POSIX_COMMON_OP \
669
+ ( ONIG_SYN_OP_DOT_ANYCHAR | ONIG_SYN_OP_POSIX_BRACKET | \
670
+ ONIG_SYN_OP_DECIMAL_BACKREF | \
671
+ ONIG_SYN_OP_BRACKET_CC | ONIG_SYN_OP_ASTERISK_ZERO_INF | \
672
+ ONIG_SYN_OP_LINE_ANCHOR | \
673
+ ONIG_SYN_OP_ESC_CONTROL_CHARS )
674
+
675
+ #define SYN_GNU_REGEX_OP \
676
+ ( ONIG_SYN_OP_DOT_ANYCHAR | ONIG_SYN_OP_BRACKET_CC | \
677
+ ONIG_SYN_OP_POSIX_BRACKET | ONIG_SYN_OP_DECIMAL_BACKREF | \
678
+ ONIG_SYN_OP_BRACE_INTERVAL | ONIG_SYN_OP_LPAREN_SUBEXP | \
679
+ ONIG_SYN_OP_VBAR_ALT | \
680
+ ONIG_SYN_OP_ASTERISK_ZERO_INF | ONIG_SYN_OP_PLUS_ONE_INF | \
681
+ ONIG_SYN_OP_QMARK_ZERO_ONE | \
682
+ ONIG_SYN_OP_ESC_AZ_BUF_ANCHOR | ONIG_SYN_OP_ESC_CAPITAL_G_BEGIN_ANCHOR | \
683
+ ONIG_SYN_OP_ESC_W_WORD | \
684
+ ONIG_SYN_OP_ESC_B_WORD_BOUND | ONIG_SYN_OP_ESC_LTGT_WORD_BEGIN_END | \
685
+ ONIG_SYN_OP_ESC_S_WHITE_SPACE | ONIG_SYN_OP_ESC_D_DIGIT | \
686
+ ONIG_SYN_OP_LINE_ANCHOR )
687
+
688
+ #define SYN_GNU_REGEX_BV \
689
+ ( ONIG_SYN_CONTEXT_INDEP_ANCHORS | ONIG_SYN_CONTEXT_INDEP_REPEAT_OPS | \
690
+ ONIG_SYN_CONTEXT_INVALID_REPEAT_OPS | ONIG_SYN_ALLOW_INVALID_INTERVAL | \
691
+ ONIG_SYN_BACKSLASH_ESCAPE_IN_CC | ONIG_SYN_ALLOW_DOUBLE_RANGE_OP_IN_CC )
692
+
693
+
694
+ #define NCCLASS_FLAGS(cc) ((cc)->flags)
695
+ #define NCCLASS_FLAG_SET(cc,flag) (NCCLASS_FLAGS(cc) |= (flag))
696
+ #define NCCLASS_FLAG_CLEAR(cc,flag) (NCCLASS_FLAGS(cc) &= ~(flag))
697
+ #define IS_NCCLASS_FLAG_ON(cc,flag) ((NCCLASS_FLAGS(cc) & (flag)) != 0)
698
+
699
+ /* cclass node */
700
+ #define FLAG_NCCLASS_NOT (1<<0)
701
+ #define FLAG_NCCLASS_SHARE (1<<1)
702
+
703
+ #define NCCLASS_SET_NOT(nd) NCCLASS_FLAG_SET(nd, FLAG_NCCLASS_NOT)
704
+ #define NCCLASS_SET_SHARE(nd) NCCLASS_FLAG_SET(nd, FLAG_NCCLASS_SHARE)
705
+ #define NCCLASS_CLEAR_NOT(nd) NCCLASS_FLAG_CLEAR(nd, FLAG_NCCLASS_NOT)
706
+ #define IS_NCCLASS_NOT(nd) IS_NCCLASS_FLAG_ON(nd, FLAG_NCCLASS_NOT)
707
+ #define IS_NCCLASS_SHARE(nd) IS_NCCLASS_FLAG_ON(nd, FLAG_NCCLASS_SHARE)
708
+
709
+ typedef struct {
710
+ int type;
711
+ /* struct _Node* next; */
712
+ /* unsigned int flags; */
713
+ } NodeBase;
714
+
715
+ typedef struct {
716
+ NodeBase base;
717
+ unsigned int flags;
718
+ BitSet bs;
719
+ BBuf* mbuf; /* multi-byte info or NULL */
720
+ } CClassNode;
721
+
722
+ typedef intptr_t OnigStackIndex;
723
+
724
+ typedef struct _OnigStackType {
725
+ unsigned int type;
726
+ union {
727
+ struct {
728
+ UChar *pcode; /* byte code position */
729
+ UChar *pstr; /* string position */
730
+ UChar *pstr_prev; /* previous char position of pstr */
731
+ #ifdef USE_COMBINATION_EXPLOSION_CHECK
732
+ unsigned int state_check;
733
+ #endif
734
+ } state;
735
+ struct {
736
+ int count; /* for OP_REPEAT_INC, OP_REPEAT_INC_NG */
737
+ UChar *pcode; /* byte code position (head of repeated target) */
738
+ int num; /* repeat id */
739
+ } repeat;
740
+ struct {
741
+ OnigStackIndex si; /* index of stack */
742
+ } repeat_inc;
743
+ struct {
744
+ int num; /* memory num */
745
+ UChar *pstr; /* start/end position */
746
+ /* Following information is setted, if this stack type is MEM-START */
747
+ OnigStackIndex start; /* prev. info (for backtrack "(...)*" ) */
748
+ OnigStackIndex end; /* prev. info (for backtrack "(...)*" ) */
749
+ } mem;
750
+ struct {
751
+ int num; /* null check id */
752
+ UChar *pstr; /* start position */
753
+ } null_check;
754
+ #ifdef USE_SUBEXP_CALL
755
+ struct {
756
+ UChar *ret_addr; /* byte code position */
757
+ int num; /* null check id */
758
+ UChar *pstr; /* string position */
759
+ } call_frame;
760
+ #endif
761
+ } u;
762
+ } OnigStackType;
763
+
764
+ typedef struct {
765
+ void* stack_p;
766
+ size_t stack_n;
767
+ OnigOptionType options;
768
+ OnigRegion* region;
769
+ const UChar* start; /* search start position (for \G: BEGIN_POSITION) */
770
+ #ifdef USE_FIND_LONGEST_SEARCH_ALL_OF_RANGE
771
+ int best_len; /* for ONIG_OPTION_FIND_LONGEST */
772
+ UChar* best_s;
773
+ #endif
774
+ #ifdef USE_COMBINATION_EXPLOSION_CHECK
775
+ void* state_check_buff;
776
+ int state_check_buff_size;
777
+ #endif
778
+ } OnigMatchArg;
779
+
780
+
781
+ #define IS_CODE_SB_WORD(enc,code) \
782
+ (ONIGENC_IS_CODE_ASCII(code) && ONIGENC_IS_CODE_WORD(enc,code))
783
+
784
+ #ifdef ONIG_DEBUG
785
+
786
+ typedef struct {
787
+ short int opcode;
788
+ const char* name;
789
+ short int arg_type;
790
+ } OnigOpInfoType;
791
+
792
+ extern OnigOpInfoType OnigOpInfo[];
793
+
794
+ /* extern void onig_print_compiled_byte_code P_((FILE* f, UChar* bp, UChar* bpend, UChar** nextp, OnigEncoding enc)); */
795
+
796
+ #ifdef ONIG_DEBUG_STATISTICS
797
+ extern void onig_statistics_init P_((void));
798
+ extern void onig_print_statistics P_((FILE* f));
799
+ #endif
800
+ #endif
801
+
802
+ extern UChar* onig_error_code_to_format P_((int code));
803
+ extern void onig_snprintf_with_pattern PV_((UChar buf[], int bufsize, OnigEncoding enc, UChar* pat, UChar* pat_end, const UChar *fmt, ...));
804
+ extern int onig_bbuf_init P_((BBuf* buf, OnigDistance size));
805
+ extern int onig_compile P_((regex_t* reg, const UChar* pattern, const UChar* pattern_end, OnigErrorInfo* einfo, const char *sourcefile, int sourceline));
806
+ extern void onig_chain_reduce P_((regex_t* reg));
807
+ extern void onig_chain_link_add P_((regex_t* to, regex_t* add));
808
+ extern void onig_transfer P_((regex_t* to, regex_t* from));
809
+ extern int onig_is_code_in_cc P_((OnigEncoding enc, OnigCodePoint code, CClassNode* cc));
810
+ extern int onig_is_code_in_cc_len P_((int enclen, OnigCodePoint code, CClassNode* cc));
811
+
812
+ /* strend hash */
813
+ typedef void hash_table_type;
814
+ #ifdef RUBY
815
+ #include "ruby/st.h"
816
+ typedef st_data_t hash_data_type;
817
+ #else
818
+ typedef unsigned long hash_data_type;
819
+ #endif
820
+
821
+ extern hash_table_type* onig_st_init_strend_table_with_size P_((st_index_t size));
822
+ extern int onig_st_lookup_strend P_((hash_table_type* table, const UChar* str_key, const UChar* end_key, hash_data_type *value));
823
+ extern int onig_st_insert_strend P_((hash_table_type* table, const UChar* str_key, const UChar* end_key, hash_data_type value));
824
+
825
+ /* encoding property management */
826
+ #define PROPERTY_LIST_ADD_PROP(Name, CR) \
827
+ r = onigenc_property_list_add_property((UChar* )Name, CR,\
828
+ &PropertyNameTable, &PropertyList, &PropertyListNum,\
829
+ &PropertyListSize);\
830
+ if (r != 0) goto end
831
+
832
+ #define PROPERTY_LIST_INIT_CHECK \
833
+ if (PropertyInited == 0) {\
834
+ int r = onigenc_property_list_init(init_property_list);\
835
+ if (r != 0) return r;\
836
+ }
837
+
838
+ extern int onigenc_property_list_add_property P_((UChar* name, const OnigCodePoint* prop, hash_table_type **table, const OnigCodePoint*** plist, int *pnum, int *psize));
839
+
840
+ typedef int (*ONIGENC_INIT_PROPERTY_LIST_FUNC_TYPE)(void);
841
+
842
+ extern int onigenc_property_list_init P_((ONIGENC_INIT_PROPERTY_LIST_FUNC_TYPE));
843
+
844
+ extern size_t onig_memsize P_((const regex_t *reg));
845
+
846
+ #if defined __GNUC__ && __GNUC__ >= 4
847
+ #pragma GCC visibility pop
848
+ #endif
849
+
850
+ #endif /* ONIGURUMA_REGINT_H */