1 /*
2  * This program was generated by testconv.rb.
3  */
4 #ifdef ONIG_ESCAPE_UCHAR_COLLISION
5 #undef ONIG_ESCAPE_UCHAR_COLLISION
6 #endif
7 #include <stdio.h>
8 
9 #ifdef POSIX_TEST
10 #include "onigposix.h"
11 #else
12 #include "oniguruma.h"
13 #endif
14 
15 #include <string.h>
16 
17 #define SLEN(s)  strlen(s)
18 
19 static int nsucc  = 0;
20 static int nfail  = 0;
21 static int nerror = 0;
22 
23 static FILE* err_file;
24 
25 #ifndef POSIX_TEST
26 static OnigRegion* region;
27 #endif
28 
xx(char * pattern,char * str,int from,int to,int mem,int not)29 static void xx(char* pattern, char* str, int from, int to, int mem, int not)
30 {
31   int r;
32 
33 #ifdef POSIX_TEST
34   regex_t reg;
35   char buf[200];
36   regmatch_t pmatch[25];
37 
38   r = regcomp(&reg, pattern, REG_EXTENDED | REG_NEWLINE);
39   if (r) {
40     regerror(r, &reg, buf, sizeof(buf));
41     fprintf(err_file, "ERROR: %s\n", buf);
42     nerror++;
43     return ;
44   }
45 
46   r = regexec(&reg, str, reg.re_nsub + 1, pmatch, 0);
47   if (r != 0 && r != REG_NOMATCH) {
48     regerror(r, &reg, buf, sizeof(buf));
49     fprintf(err_file, "ERROR: %s\n", buf);
50     nerror++;
51     return ;
52   }
53 
54   if (r == REG_NOMATCH) {
55     if (not) {
56       fprintf(stdout, "OK(N): /%s/ '%s'\n", pattern, str);
57       nsucc++;
58     }
59     else {
60       fprintf(stdout, "FAIL: /%s/ '%s'\n", pattern, str);
61       nfail++;
62     }
63   }
64   else {
65     if (not) {
66       fprintf(stdout, "FAIL(N): /%s/ '%s'\n", pattern, str);
67       nfail++;
68     }
69     else {
70       if (pmatch[mem].rm_so == from && pmatch[mem].rm_eo == to) {
71         fprintf(stdout, "OK: /%s/ '%s'\n", pattern, str);
72         nsucc++;
73       }
74       else {
75         fprintf(stdout, "FAIL: /%s/ '%s' %d-%d : %d-%d\n", pattern, str,
76                 from, to, pmatch[mem].rm_so, pmatch[mem].rm_eo);
77         nfail++;
78       }
79     }
80   }
81   regfree(&reg);
82 
83 #else
84   regex_t* reg;
85   OnigErrorInfo einfo;
86 
87   r = onig_new(&reg, (UChar* )pattern, (UChar* )(pattern + SLEN(pattern)),
88          ONIG_OPTION_DEFAULT, ONIG_ENCODING_SJIS, ONIG_SYNTAX_DEFAULT, &einfo);
89   if (r) {
90     char s[ONIG_MAX_ERROR_MESSAGE_LEN];
91     onig_error_code_to_str((UChar* )s, r, &einfo);
92     fprintf(err_file, "ERROR: %s\n", s);
93     nerror++;
94     return ;
95   }
96 
97   r = onig_search(reg, (UChar* )str, (UChar* )(str + SLEN(str)),
98                   (UChar* )str, (UChar* )(str + SLEN(str)),
99                   region, ONIG_OPTION_NONE);
100   if (r < ONIG_MISMATCH) {
101     char s[ONIG_MAX_ERROR_MESSAGE_LEN];
102     onig_error_code_to_str((UChar* )s, r);
103     fprintf(err_file, "ERROR: %s\n", s);
104     nerror++;
105     return ;
106   }
107 
108   if (r == ONIG_MISMATCH) {
109     if (not) {
110       fprintf(stdout, "OK(N): /%s/ '%s'\n", pattern, str);
111       nsucc++;
112     }
113     else {
114       fprintf(stdout, "FAIL: /%s/ '%s'\n", pattern, str);
115       nfail++;
116     }
117   }
118   else {
119     if (not) {
120       fprintf(stdout, "FAIL(N): /%s/ '%s'\n", pattern, str);
121       nfail++;
122     }
123     else {
124       if (region->beg[mem] == from && region->end[mem] == to) {
125         fprintf(stdout, "OK: /%s/ '%s'\n", pattern, str);
126         nsucc++;
127       }
128       else {
129         fprintf(stdout, "FAIL: /%s/ '%s' %d-%d : %d-%d\n", pattern, str,
130                 from, to, region->beg[mem], region->end[mem]);
131         nfail++;
132       }
133     }
134   }
135   onig_free(reg);
136 #endif
137 }
138 
x2(char * pattern,char * str,int from,int to)139 static void x2(char* pattern, char* str, int from, int to)
140 {
141   xx(pattern, str, from, to, 0, 0);
142 }
143 
x3(char * pattern,char * str,int from,int to,int mem)144 static void x3(char* pattern, char* str, int from, int to, int mem)
145 {
146   xx(pattern, str, from, to, mem, 0);
147 }
148 
n(char * pattern,char * str)149 static void n(char* pattern, char* str)
150 {
151   xx(pattern, str, 0, 0, 0, 1);
152 }
153 
main(int argc,char * argv[])154 extern int main(int argc, char* argv[])
155 {
156 #ifndef POSIX_TEST
157   static OnigEncoding use_encs[1];
158 
159   use_encs[0] = ONIG_ENCODING_SJIS;
160   onig_initialize(use_encs, sizeof(use_encs)/sizeof(use_encs[0]));
161 #endif
162 
163   err_file = stdout;
164 
165 #ifdef POSIX_TEST
166   reg_set_encoding(REG_POSIX_ENCODING_SJIS);
167 #else
168   region = onig_region_new();
169 #endif
170 
171   x2("", "", 0, 0);
172   x2("^", "", 0, 0);
173   x2("$", "", 0, 0);
174   x2("\\G", "", 0, 0);
175   x2("\\A", "", 0, 0);
176   x2("\\Z", "", 0, 0);
177   x2("\\z", "", 0, 0);
178   x2("^$", "", 0, 0);
179   x2("\\ca", "\001", 0, 1);
180   x2("\\C-b", "\002", 0, 1);
181   x2("\\c\\\\", "\034", 0, 1);
182   x2("q[\\c\\\\]", "q\034", 0, 2);
183   x2("", "a", 0, 0);
184   x2("a", "a", 0, 1);
185   x2("\\x61", "a", 0, 1);
186   x2("aa", "aa", 0, 2);
187   x2("aaa", "aaa", 0, 3);
188   x2("aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa", "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa", 0, 35);
189   x2("ab", "ab", 0, 2);
190   x2("b", "ab", 1, 2);
191   x2("bc", "abc", 1, 3);
192   x2("(?i:#RET#)", "#INS##RET#", 5, 10);
193   x2("\\17", "\017", 0, 1);
194   x2("\\x1f", "\x1f", 0, 1);
195   x2("a(?#....\\\\JJJJ)b", "ab", 0, 2);
196   x2("(?x)  G (o O(?-x)oO) g L", "GoOoOgLe", 0, 7);
197   x2(".", "a", 0, 1);
198   n(".", "");
199   x2("..", "ab", 0, 2);
200   x2("\\w", "e", 0, 1);
201   n("\\W", "e");
202   x2("\\s", " ", 0, 1);
203   x2("\\S", "b", 0, 1);
204   x2("\\d", "4", 0, 1);
205   n("\\D", "4");
206   x2("\\b", "z ", 0, 0);
207   x2("\\b", " z", 1, 1);
208   x2("\\B", "zz ", 1, 1);
209   x2("\\B", "z ", 2, 2);
210   x2("\\B", " z", 0, 0);
211   x2("[ab]", "b", 0, 1);
212   n("[ab]", "c");
213   x2("[a-z]", "t", 0, 1);
214   n("[^a]", "a");
215   x2("[^a]", "\n", 0, 1);
216   x2("[]]", "]", 0, 1);
217   n("[^]]", "]");
218   x2("[\\^]+", "0^^1", 1, 3);
219   x2("[b-]", "b", 0, 1);
220   x2("[b-]", "-", 0, 1);
221   x2("[\\w]", "z", 0, 1);
222   n("[\\w]", " ");
223   x2("[\\W]", "b$", 1, 2);
224   x2("[\\d]", "5", 0, 1);
225   n("[\\d]", "e");
226   x2("[\\D]", "t", 0, 1);
227   n("[\\D]", "3");
228   x2("[\\s]", " ", 0, 1);
229   n("[\\s]", "a");
230   x2("[\\S]", "b", 0, 1);
231   n("[\\S]", " ");
232   x2("[\\w\\d]", "2", 0, 1);
233   n("[\\w\\d]", " ");
234   x2("[[:upper:]]", "B", 0, 1);
235   x2("[*[:xdigit:]+]", "+", 0, 1);
236   x2("[*[:xdigit:]+]", "GHIKK-9+*", 6, 7);
237   x2("[*[:xdigit:]+]", "-@^+", 3, 4);
238   n("[[:upper]]", "A");
239   x2("[[:upper]]", ":", 0, 1);
240   x2("[\\044-\\047]", "\046", 0, 1);
241   x2("[\\x5a-\\x5c]", "\x5b", 0, 1);
242   x2("[\\x6A-\\x6D]", "\x6c", 0, 1);
243   n("[\\x6A-\\x6D]", "\x6E");
244   n("^[0-9A-F]+ 0+ UNDEF ", "75F 00000000 SECT14A notype ()    External    | _rb_apply");
245   x2("[\\[]", "[", 0, 1);
246   x2("[\\]]", "]", 0, 1);
247   x2("[&]", "&", 0, 1);
248   x2("[[ab]]", "b", 0, 1);
249   x2("[[ab]c]", "c", 0, 1);
250   n("[[^a]]", "a");
251   n("[^[a]]", "a");
252   x2("[[ab]&&bc]", "b", 0, 1);
253   n("[[ab]&&bc]", "a");
254   n("[[ab]&&bc]", "c");
255   x2("[a-z&&b-y&&c-x]", "w", 0, 1);
256   n("[^a-z&&b-y&&c-x]", "w");
257   x2("[[^a&&a]&&a-z]", "b", 0, 1);
258   n("[[^a&&a]&&a-z]", "a");
259   x2("[[^a-z&&bcdef]&&[^c-g]]", "h", 0, 1);
260   n("[[^a-z&&bcdef]&&[^c-g]]", "c");
261   x2("[^[^abc]&&[^cde]]", "c", 0, 1);
262   x2("[^[^abc]&&[^cde]]", "e", 0, 1);
263   n("[^[^abc]&&[^cde]]", "f");
264   x2("[a-&&-a]", "-", 0, 1);
265   n("[a\\-&&\\-a]", "&");
266   n("\\wabc", " abc");
267   x2("a\\Wbc", "a bc", 0, 4);
268   x2("a.b.c", "aabbc", 0, 5);
269   x2(".\\wb\\W..c", "abb bcc", 0, 7);
270   x2("\\s\\wzzz", " zzzz", 0, 5);
271   x2("aa.b", "aabb", 0, 4);
272   n(".a", "ab");
273   x2(".a", "aa", 0, 2);
274   x2("^a", "a", 0, 1);
275   x2("^a$", "a", 0, 1);
276   x2("^\\w$", "a", 0, 1);
277   n("^\\w$", " ");
278   x2("^\\wab$", "zab", 0, 3);
279   x2("^\\wabcdef$", "zabcdef", 0, 7);
280   x2("^\\w...def$", "zabcdef", 0, 7);
281   x2("\\w\\w\\s\\Waaa\\d", "aa  aaa4", 0, 8);
282   x2("\\A\\Z", "", 0, 0);
283   x2("\\Axyz", "xyz", 0, 3);
284   x2("xyz\\Z", "xyz", 0, 3);
285   x2("xyz\\z", "xyz", 0, 3);
286   x2("a\\Z", "a", 0, 1);
287   x2("\\Gaz", "az", 0, 2);
288   n("\\Gz", "bza");
289   n("az\\G", "az");
290   n("az\\A", "az");
291   n("a\\Az", "az");
292   x2("\\^\\$", "^$", 0, 2);
293   x2("^x?y", "xy", 0, 2);
294   x2("^(x?y)", "xy", 0, 2);
295   x2("\\w", "_", 0, 1);
296   n("\\W", "_");
297   x2("(?=z)z", "z", 0, 1);
298   n("(?=z).", "a");
299   x2("(?!z)a", "a", 0, 1);
300   n("(?!z)a", "z");
301   x2("(?i:a)", "a", 0, 1);
302   x2("(?i:a)", "A", 0, 1);
303   x2("(?i:A)", "a", 0, 1);
304   n("(?i:A)", "b");
305   x2("(?i:[A-Z])", "a", 0, 1);
306   x2("(?i:[f-m])", "H", 0, 1);
307   x2("(?i:[f-m])", "h", 0, 1);
308   n("(?i:[f-m])", "e");
309   x2("(?i:[A-c])", "D", 0, 1);
310   n("(?i:[^a-z])", "A");
311   n("(?i:[^a-z])", "a");
312   x2("(?i:[!-k])", "Z", 0, 1);
313   x2("(?i:[!-k])", "7", 0, 1);
314   x2("(?i:[T-}])", "b", 0, 1);
315   x2("(?i:[T-}])", "{", 0, 1);
316   x2("(?i:\\?a)", "?A", 0, 2);
317   x2("(?i:\\*A)", "*a", 0, 2);
318   n(".", "\n");
319   x2("(?m:.)", "\n", 0, 1);
320   x2("(?m:a.)", "a\n", 0, 2);
321   x2("(?m:.b)", "a\nb", 1, 3);
322   x2(".*abc", "dddabdd\nddabc", 8, 13);
323   x2("(?m:.*abc)", "dddabddabc", 0, 10);
324   n("(?i)(?-i)a", "A");
325   n("(?i)(?-i:a)", "A");
326   x2("a?", "", 0, 0);
327   x2("a?", "b", 0, 0);
328   x2("a?", "a", 0, 1);
329   x2("a*", "", 0, 0);
330   x2("a*", "a", 0, 1);
331   x2("a*", "aaa", 0, 3);
332   x2("a*", "baaaa", 0, 0);
333   n("a+", "");
334   x2("a+", "a", 0, 1);
335   x2("a+", "aaaa", 0, 4);
336   x2("a+", "aabbb", 0, 2);
337   x2("a+", "baaaa", 1, 5);
338   x2(".?", "", 0, 0);
339   x2(".?", "f", 0, 1);
340   x2(".?", "\n", 0, 0);
341   x2(".*", "", 0, 0);
342   x2(".*", "abcde", 0, 5);
343   x2(".+", "z", 0, 1);
344   x2(".+", "zdswer\n", 0, 6);
345   x2("(.*)a\\1f", "babfbac", 0, 4);
346   x2("(.*)a\\1f", "bacbabf", 3, 7);
347   x2("((.*)a\\2f)", "bacbabf", 3, 7);
348   x2("(.*)a\\1f", "baczzzzzz\nbazz\nzzzzbabf", 19, 23);
349   x2("a|b", "a", 0, 1);
350   x2("a|b", "b", 0, 1);
351   x2("|a", "a", 0, 0);
352   x2("(|a)", "a", 0, 0);
353   x2("ab|bc", "ab", 0, 2);
354   x2("ab|bc", "bc", 0, 2);
355   x2("z(?:ab|bc)", "zbc", 0, 3);
356   x2("a(?:ab|bc)c", "aabc", 0, 4);
357   x2("ab|(?:ac|az)", "az", 0, 2);
358   x2("a|b|c", "dc", 1, 2);
359   x2("a|b|cd|efg|h|ijk|lmn|o|pq|rstuvwx|yz", "pqr", 0, 2);
360   n("a|b|cd|efg|h|ijk|lmn|o|pq|rstuvwx|yz", "mn");
361   x2("a|^z", "ba", 1, 2);
362   x2("a|^z", "za", 0, 1);
363   x2("a|\\Gz", "bza", 2, 3);
364   x2("a|\\Gz", "za", 0, 1);
365   x2("a|\\Az", "bza", 2, 3);
366   x2("a|\\Az", "za", 0, 1);
367   x2("a|b\\Z", "ba", 1, 2);
368   x2("a|b\\Z", "b", 0, 1);
369   x2("a|b\\z", "ba", 1, 2);
370   x2("a|b\\z", "b", 0, 1);
371   x2("\\w|\\s", " ", 0, 1);
372   n("\\w|\\w", " ");
373   x2("\\w|%", "%", 0, 1);
374   x2("\\w|[&$]", "&", 0, 1);
375   x2("[b-d]|[^e-z]", "a", 0, 1);
376   x2("(?:a|[c-f])|bz", "dz", 0, 1);
377   x2("(?:a|[c-f])|bz", "bz", 0, 2);
378   x2("abc|(?=zz)..f", "zzf", 0, 3);
379   x2("abc|(?!zz)..f", "abf", 0, 3);
380   x2("(?=za)..a|(?=zz)..a", "zza", 0, 3);
381   n("(?>a|abd)c", "abdc");
382   x2("(?>abd|a)c", "abdc", 0, 4);
383   x2("a?|b", "a", 0, 1);
384   x2("a?|b", "b", 0, 0);
385   x2("a?|b", "", 0, 0);
386   x2("a*|b", "aa", 0, 2);
387   x2("a*|b*", "ba", 0, 0);
388   x2("a*|b*", "ab", 0, 1);
389   x2("a+|b*", "", 0, 0);
390   x2("a+|b*", "bbb", 0, 3);
391   x2("a+|b*", "abbb", 0, 1);
392   n("a+|b+", "");
393   x2("(a|b)?", "b", 0, 1);
394   x2("(a|b)*", "ba", 0, 2);
395   x2("(a|b)+", "bab", 0, 3);
396   x2("(ab|ca)+", "caabbc", 0, 4);
397   x2("(ab|ca)+", "aabca", 1, 5);
398   x2("(ab|ca)+", "abzca", 0, 2);
399   x2("(a|bab)+", "ababa", 0, 5);
400   x2("(a|bab)+", "ba", 1, 2);
401   x2("(a|bab)+", "baaaba", 1, 4);
402   x2("(?:a|b)(?:a|b)", "ab", 0, 2);
403   x2("(?:a*|b*)(?:a*|b*)", "aaabbb", 0, 3);
404   x2("(?:a*|b*)(?:a+|b+)", "aaabbb", 0, 6);
405   x2("(?:a+|b+){2}", "aaabbb", 0, 6);
406   x2("h{0,}", "hhhh", 0, 4);
407   x2("(?:a+|b+){1,2}", "aaabbb", 0, 6);
408   n("ax{2}*a", "0axxxa1");
409   n("a.{0,2}a", "0aXXXa0");
410   n("a.{0,2}?a", "0aXXXa0");
411   n("a.{0,2}?a", "0aXXXXa0");
412   x2("^a{2,}?a$", "aaa", 0, 3);
413   x2("^[a-z]{2,}?$", "aaa", 0, 3);
414   x2("(?:a+|\\Ab*)cc", "cc", 0, 2);
415   n("(?:a+|\\Ab*)cc", "abcc");
416   x2("(?:^a+|b+)*c", "aabbbabc", 6, 8);
417   x2("(?:^a+|b+)*c", "aabbbbc", 0, 7);
418   x2("a|(?i)c", "C", 0, 1);
419   x2("(?i)c|a", "C", 0, 1);
420   x2("(?i)c|a", "A", 0, 1);
421   x2("(?i:c)|a", "C", 0, 1);
422   n("(?i:c)|a", "A");
423   x2("[abc]?", "abc", 0, 1);
424   x2("[abc]*", "abc", 0, 3);
425   x2("[^abc]*", "abc", 0, 0);
426   n("[^abc]+", "abc");
427   x2("a?\?", "aaa", 0, 0);
428   x2("ba?\?b", "bab", 0, 3);
429   x2("a*?", "aaa", 0, 0);
430   x2("ba*?", "baa", 0, 1);
431   x2("ba*?b", "baab", 0, 4);
432   x2("a+?", "aaa", 0, 1);
433   x2("ba+?", "baa", 0, 2);
434   x2("ba+?b", "baab", 0, 4);
435   x2("(?:a?)?\?", "a", 0, 0);
436   x2("(?:a?\?)?", "a", 0, 0);
437   x2("(?:a?)+?", "aaa", 0, 1);
438   x2("(?:a+)?\?", "aaa", 0, 0);
439   x2("(?:a+)?\?b", "aaab", 0, 4);
440   x2("(?:ab)?{2}", "", 0, 0);
441   x2("(?:ab)?{2}", "ababa", 0, 4);
442   x2("(?:ab)*{0}", "ababa", 0, 0);
443   x2("(?:ab){3,}", "abababab", 0, 8);
444   n("(?:ab){3,}", "abab");
445   x2("(?:ab){2,4}", "ababab", 0, 6);
446   x2("(?:ab){2,4}", "ababababab", 0, 8);
447   x2("(?:ab){2,4}?", "ababababab", 0, 4);
448   x2("(?:ab){,}", "ab{,}", 0, 5);
449   x2("(?:abc)+?{2}", "abcabcabc", 0, 6);
450   x2("(?:X*)(?i:xa)", "XXXa", 0, 4);
451   x2("(d+)([^abc]z)", "dddz", 0, 4);
452   x2("([^abc]*)([^abc]z)", "dddz", 0, 4);
453   x2("(\\w+)(\\wz)", "dddz", 0, 4);
454   x3("(a)", "a", 0, 1, 1);
455   x3("(ab)", "ab", 0, 2, 1);
456   x2("((ab))", "ab", 0, 2);
457   x3("((ab))", "ab", 0, 2, 1);
458   x3("((ab))", "ab", 0, 2, 2);
459   x3("((((((((((((((((((((ab))))))))))))))))))))", "ab", 0, 2, 20);
460   x3("(ab)(cd)", "abcd", 0, 2, 1);
461   x3("(ab)(cd)", "abcd", 2, 4, 2);
462   x3("()(a)bc(def)ghijk", "abcdefghijk", 3, 6, 3);
463   x3("(()(a)bc(def)ghijk)", "abcdefghijk", 3, 6, 4);
464   x2("(^a)", "a", 0, 1);
465   x3("(a)|(a)", "ba", 1, 2, 1);
466   x3("(^a)|(a)", "ba", 1, 2, 2);
467   x3("(a?)", "aaa", 0, 1, 1);
468   x3("(a*)", "aaa", 0, 3, 1);
469   x3("(a*)", "", 0, 0, 1);
470   x3("(a+)", "aaaaaaa", 0, 7, 1);
471   x3("(a+|b*)", "bbbaa", 0, 3, 1);
472   x3("(a+|b?)", "bbbaa", 0, 1, 1);
473   x3("(abc)?", "abc", 0, 3, 1);
474   x3("(abc)*", "abc", 0, 3, 1);
475   x3("(abc)+", "abc", 0, 3, 1);
476   x3("(xyz|abc)+", "abc", 0, 3, 1);
477   x3("([xyz][abc]|abc)+", "abc", 0, 3, 1);
478   x3("((?i:abc))", "AbC", 0, 3, 1);
479   x2("(abc)(?i:\\1)", "abcABC", 0, 6);
480   x3("((?m:a.c))", "a\nc", 0, 3, 1);
481   x3("((?=az)a)", "azb", 0, 1, 1);
482   x3("abc|(.abd)", "zabd", 0, 4, 1);
483   x2("(?:abc)|(ABC)", "abc", 0, 3);
484   x3("(?i:(abc))|(zzz)", "ABC", 0, 3, 1);
485   x3("a*(.)", "aaaaz", 4, 5, 1);
486   x3("a*?(.)", "aaaaz", 0, 1, 1);
487   x3("a*?(c)", "aaaac", 4, 5, 1);
488   x3("[bcd]a*(.)", "caaaaz", 5, 6, 1);
489   x3("(\\Abb)cc", "bbcc", 0, 2, 1);
490   n("(\\Abb)cc", "zbbcc");
491   x3("(^bb)cc", "bbcc", 0, 2, 1);
492   n("(^bb)cc", "zbbcc");
493   x3("cc(bb$)", "ccbb", 2, 4, 1);
494   n("cc(bb$)", "ccbbb");
495   n("(\\1)", "");
496   n("\\1(a)", "aa");
497   n("(a(b)\\1)\\2+", "ababb");
498   n("(?:(?:\\1|z)(a))+$", "zaa");
499   x2("(?:(?:\\1|z)(a))+$", "zaaa", 0, 4);
500   x2("(a)(?=\\1)", "aa", 0, 1);
501   n("(a)$|\\1", "az");
502   x2("(a)\\1", "aa", 0, 2);
503   n("(a)\\1", "ab");
504   x2("(a?)\\1", "aa", 0, 2);
505   x2("(a?\?)\\1", "aa", 0, 0);
506   x2("(a*)\\1", "aaaaa", 0, 4);
507   x3("(a*)\\1", "aaaaa", 0, 2, 1);
508   x2("a(b*)\\1", "abbbb", 0, 5);
509   x2("a(b*)\\1", "ab", 0, 1);
510   x2("(a*)(b*)\\1\\2", "aaabbaaabb", 0, 10);
511   x2("(a*)(b*)\\2", "aaabbbb", 0, 7);
512   x2("(((((((a*)b))))))c\\7", "aaabcaaa", 0, 8);
513   x3("(((((((a*)b))))))c\\7", "aaabcaaa", 0, 3, 7);
514   x2("(a)(b)(c)\\2\\1\\3", "abcbac", 0, 6);
515   x2("([a-d])\\1", "cc", 0, 2);
516   x2("(\\w\\d\\s)\\1", "f5 f5 ", 0, 6);
517   n("(\\w\\d\\s)\\1", "f5 f5");
518   x2("(who|[a-c]{3})\\1", "whowho", 0, 6);
519   x2("...(who|[a-c]{3})\\1", "abcwhowho", 0, 9);
520   x2("(who|[a-c]{3})\\1", "cbccbc", 0, 6);
521   x2("(^a)\\1", "aa", 0, 2);
522   n("(^a)\\1", "baa");
523   n("(a$)\\1", "aa");
524   n("(ab\\Z)\\1", "ab");
525   x2("(a*\\Z)\\1", "a", 1, 1);
526   x2(".(a*\\Z)\\1", "ba", 1, 2);
527   x3("(.(abc)\\2)", "zabcabc", 0, 7, 1);
528   x3("(.(..\\d.)\\2)", "z12341234", 0, 9, 1);
529   x2("((?i:az))\\1", "AzAz", 0, 4);
530   n("((?i:az))\\1", "Azaz");
531   x2("(?<=a)b", "ab", 1, 2);
532   n("(?<=a)b", "bb");
533   x2("(?<=a|b)b", "bb", 1, 2);
534   x2("(?<=a|bc)b", "bcb", 2, 3);
535   x2("(?<=a|bc)b", "ab", 1, 2);
536   x2("(?<=a|bc||defghij|klmnopq|r)z", "rz", 1, 2);
537   x2("(a)\\g<1>", "aa", 0, 2);
538   x2("(?<!a)b", "cb", 1, 2);
539   n("(?<!a)b", "ab");
540   x2("(?<!a|bc)b", "bbb", 0, 1);
541   n("(?<!a|bc)z", "bcz");
542   x2("(?<name1>a)", "a", 0, 1);
543   x2("(?<name_2>ab)\\g<name_2>", "abab", 0, 4);
544   x2("(?<name_3>.zv.)\\k<name_3>", "azvbazvb", 0, 8);
545   x2("(?<=\\g<ab>)|-\\zEND (?<ab>XyZ)", "XyZ", 3, 3);
546   x2("(?<n>|a\\g<n>)+", "", 0, 0);
547   x2("(?<n>|\\(\\g<n>\\))+$", "()(())", 0, 6);
548   x3("\\g<n>(?<n>.){0}", "X", 0, 1, 1);
549   x2("\\g<n>(abc|df(?<n>.YZ){2,8}){0}", "XYZ", 0, 3);
550   x2("\\A(?<n>(a\\g<n>)|)\\z", "aaaa", 0, 4);
551   x2("(?<n>|\\g<m>\\g<n>)\\z|\\zEND (?<m>a|(b)\\g<m>)", "bbbbabba", 0, 8);
552   x2("(?<name1240>\\w+\\sx)a+\\k<name1240>", "  fg xaaaaaaaafg x", 2, 18);
553   x3("(z)()()(?<_9>a)\\g<_9>", "zaa", 2, 3, 1);
554   x2("(.)(((?<_>a)))\\k<_>", "zaa", 0, 3);
555   x2("((?<name1>\\d)|(?<name2>\\w))(\\k<name1>|\\k<name2>)", "ff", 0, 2);
556   x2("(?:(?<x>)|(?<x>efg))\\k<x>", "", 0, 0);
557   x2("(?:(?<x>abc)|(?<x>efg))\\k<x>", "abcefgefg", 3, 9);
558   n("(?:(?<x>abc)|(?<x>efg))\\k<x>", "abcefg");
559   x2("(?:(?<n1>.)|(?<n1>..)|(?<n1>...)|(?<n1>....)|(?<n1>.....)|(?<n1>......)|(?<n1>.......)|(?<n1>........)|(?<n1>.........)|(?<n1>..........)|(?<n1>...........)|(?<n1>............)|(?<n1>.............)|(?<n1>..............))\\k<n1>$", "a-pyumpyum", 2, 10);
560   x3("(?:(?<n1>.)|(?<n1>..)|(?<n1>...)|(?<n1>....)|(?<n1>.....)|(?<n1>......)|(?<n1>.......)|(?<n1>........)|(?<n1>.........)|(?<n1>..........)|(?<n1>...........)|(?<n1>............)|(?<n1>.............)|(?<n1>..............))\\k<n1>$", "xxxxabcdefghijklmnabcdefghijklmn", 4, 18, 14);
561   x3("(?<name1>)(?<name2>)(?<name3>)(?<name4>)(?<name5>)(?<name6>)(?<name7>)(?<name8>)(?<name9>)(?<name10>)(?<name11>)(?<name12>)(?<name13>)(?<name14>)(?<name15>)(?<name16>aaa)(?<name17>)$", "aaa", 0, 3, 16);
562   x2("(?<foo>a|\\(\\g<foo>\\))", "a", 0, 1);
563   x2("(?<foo>a|\\(\\g<foo>\\))", "((((((a))))))", 0, 13);
564   x3("(?<foo>a|\\(\\g<foo>\\))", "((((((((a))))))))", 0, 17, 1);
565   x2("\\g<bar>|\\zEND(?<bar>.*abc$)", "abcxxxabc", 0, 9);
566   x2("\\g<1>|\\zEND(.a.)", "bac", 0, 3);
567   x3("\\g<_A>\\g<_A>|\\zEND(.a.)(?<_A>.b.)", "xbxyby", 3, 6, 1);
568   x2("\\A(?:\\g<pon>|\\g<pan>|\\zEND  (?<pan>a|c\\g<pon>c)(?<pon>b|d\\g<pan>d))$", "cdcbcdc", 0, 7);
569   x2("\\A(?<n>|a\\g<m>)\\z|\\zEND (?<m>\\g<n>)", "aaaa", 0, 4);
570   x2("(?<n>(a|b\\g<n>c){3,5})", "baaaaca", 1, 5);
571   x2("(?<n>(a|b\\g<n>c){3,5})", "baaaacaaaaa", 0, 10);
572   x2("(?<pare>\\(([^\\(\\)]++|\\g<pare>)*+\\))", "((a))", 0, 5);
573   x2("()*\\1", "", 0, 0);
574   x2("(?:()|())*\\1\\2", "", 0, 0);
575   x3("(?:\\1a|())*", "a", 0, 0, 1);
576   x2("x((.)*)*x", "0x1x2x3", 1, 6);
577   x2("x((.)*)*x(?i:\\1)\\Z", "0x1x2x1X2", 1, 9);
578   x2("(?:()|()|()|()|()|())*\\2\\5", "", 0, 0);
579   x2("(?:()|()|()|(x)|()|())*\\2b\\5", "b", 0, 1);
580   x2("\\xED\\xF2", "\xed\xf2", 0, 2);
581   x2("", "��", 0, 0);
582   x2("��", "��", 0, 2);
583   n("��", "��");
584   x2("����", "����", 0, 4);
585   x2("������", "������", 0, 6);
586   x2("����������������������������������������������������������������������", "����������������������������������������������������������������������", 0, 70);
587   x2("��", "����", 2, 4);
588   x2("����", "������", 2, 6);
589   x2("\\xca\\xb8", "\xca\xb8", 0, 2);
590   x2(".", "��", 0, 2);
591   x2("..", "����", 0, 4);
592   x2("\\w", "��", 0, 2);
593   n("\\W", "��");
594   x2("[\\W]", "��$", 2, 3);
595   x2("\\S", "��", 0, 2);
596   x2("\\S", "��", 0, 2);
597   x2("\\b", "�C ", 0, 0);
598   x2("\\b", " ��", 1, 1);
599   x2("\\B", "���� ", 2, 2);
600   x2("\\B", "�� ", 3, 3);
601   x2("\\B", " ��", 0, 0);
602   x2("[����]", "��", 0, 2);
603   n("[�Ȃ�]", "��");
604   x2("[��-��]", "��", 0, 2);
605   n("[^��]", "��");
606   x2("[\\w]", "��", 0, 2);
607   n("[\\d]", "��");
608   x2("[\\D]", "��", 0, 2);
609   n("[\\s]", "��");
610   x2("[\\S]", "��", 0, 2);
611   x2("[\\w\\d]", "��", 0, 2);
612   x2("[\\w\\d]", "   ��", 3, 5);
613   n("\\w�S��", " �S��");
614   x2("�S\\W��", "�S ��", 0, 5);
615   x2("��.��.��", "����������", 0, 10);
616   x2(".\\w��\\W..��", "������ ������", 0, 13);
617   x2("\\s\\w������", " ��������", 0, 9);
618   x2("����.��", "��������", 0, 8);
619   n(".��", "����");
620   x2(".��", "����", 0, 4);
621   x2("^��", "��", 0, 2);
622   x2("^��$", "��", 0, 2);
623   x2("^\\w$", "��", 0, 2);
624   x2("^\\w����������$", "z����������", 0, 11);
625   x2("^\\w...������$", "z������������", 0, 13);
626   x2("\\w\\w\\s\\W������\\d", "a��  ������4", 0, 12);
627   x2("\\A������", "������", 0, 6);
628   x2("�ނ߂�\\Z", "�ނ߂�", 0, 6);
629   x2("������\\z", "������", 0, 6);
630   x2("������\\Z", "������\n", 0, 6);
631   x2("\\G�ۂ�", "�ۂ�", 0, 4);
632   n("\\G��", "������");
633   n("�Ƃ�\\G", "�Ƃ�");
634   n("�܂�\\A", "�܂�");
635   n("��\\A��", "�܂�");
636   x2("(?=��)��", "��", 0, 2);
637   n("(?=��).", "��");
638   x2("(?!��)��", "��", 0, 2);
639   n("(?!��)��", "��");
640   x2("(?i:��)", "��", 0, 2);
641   x2("(?i:�Ԃ�)", "�Ԃ�", 0, 4);
642   n("(?i:��)", "��");
643   x2("(?m:��.)", "��\n", 0, 3);
644   x2("(?m:.��)", "��\n��", 2, 5);
645   x2("��?", "", 0, 0);
646   x2("��?", "��", 0, 0);
647   x2("��?", "��", 0, 2);
648   x2("��*", "", 0, 0);
649   x2("��*", "��", 0, 2);
650   x2("�q*", "�q�q�q", 0, 6);
651   x2("�n*", "���n�n�n�n", 0, 0);
652   n("�R+", "");
653   x2("��+", "��", 0, 2);
654   x2("��+", "��������", 0, 8);
655   x2("��+", "����������", 0, 4);
656   x2("��+", "����������", 2, 10);
657   x2(".?", "��", 0, 2);
658   x2(".*", "�ς҂Ղ�", 0, 8);
659   x2(".+", "��", 0, 2);
660   x2(".+", "��������\n", 0, 8);
661   x2("��|��", "��", 0, 2);
662   x2("��|��", "��", 0, 2);
663   x2("����|����", "����", 0, 4);
664   x2("����|����", "����", 0, 4);
665   x2("��(?:����|����)", "������", 0, 6);
666   x2("��(?:����|����)��", "��������", 0, 8);
667   x2("����|(?:����|����)", "����", 0, 4);
668   x2("��|��|��", "����", 2, 4);
669   x2("��|��|����|������|��|������|������|��|����|�‚ĂƂȂ�|�ʂ�", "������", 0, 6);
670   n("��|��|����|������|��|������|������|��|����|�‚ĂƂȂ�|�ʂ�", "����");
671   x2("��|^��", "�Ԃ�", 2, 4);
672   x2("��|^��", "����", 0, 2);
673   x2("�S|\\G��", "���ԋS", 4, 6);
674   x2("�S|\\G��", "�ԋS", 0, 2);
675   x2("�S|\\A��", "b�ԋS", 3, 5);
676   x2("�S|\\A��", "��", 0, 2);
677   x2("�S|��\\Z", "�ԋS", 2, 4);
678   x2("�S|��\\Z", "��", 0, 2);
679   x2("�S|��\\Z", "��\n", 0, 2);
680   x2("�S|��\\z", "�ԋS", 2, 4);
681   x2("�S|��\\z", "��", 0, 2);
682   x2("\\w|\\s", "��", 0, 2);
683   x2("\\w|%", "%��", 0, 1);
684   x2("\\w|[&$]", "��&", 0, 2);
685   x2("[��-��]", "��", 0, 2);
686   x2("[��-��]|[^��-��]", "��", 0, 2);
687   x2("[��-��]|[^��-��]", "��", 0, 2);
688   x2("[^��]", "\n", 0, 1);
689   x2("(?:��|[��-��])|����", "����", 0, 2);
690   x2("(?:��|[��-��])|����", "����", 0, 4);
691   x2("������|(?=����)..��", "������", 0, 6);
692   x2("������|(?!����)..��", "������", 0, 6);
693   x2("(?=����)..��|(?=����)..��", "������", 0, 6);
694   x2("(?<=��|����)��", "������", 4, 6);
695   n("(?>��|������)��", "��������");
696   x2("(?>������|��)��", "��������", 0, 8);
697   x2("��?|��", "��", 0, 2);
698   x2("��?|��", "��", 0, 0);
699   x2("��?|��", "", 0, 0);
700   x2("��*|��", "����", 0, 4);
701   x2("��*|��*", "����", 0, 0);
702   x2("��*|��*", "����", 0, 2);
703   x2("[a��]*|��*", "a��������", 0, 3);
704   x2("��+|��*", "", 0, 0);
705   x2("��+|��*", "������", 0, 6);
706   x2("��+|��*", "��������", 0, 2);
707   x2("��+|��*", "a��������", 0, 0);
708   n("��+|��+", "");
709   x2("(��|��)?", "��", 0, 2);
710   x2("(��|��)*", "����", 0, 4);
711   x2("(��|��)+", "������", 0, 6);
712   x2("(����|����)+", "������������", 0, 8);
713   x2("(����|����)+", "������������", 4, 12);
714   x2("(����|����)+", "����������", 2, 10);
715   x2("(����|����)+", "����������", 0, 4);
716   x2("(����|����)+", "$$zzzz����������", 6, 10);
717   x2("(��|������)+", "����������", 0, 10);
718   x2("(��|������)+", "����", 2, 4);
719   x2("(��|������)+", "������������", 2, 8);
720   x2("(?:��|��)(?:��|��)", "����", 0, 4);
721   x2("(?:��*|��*)(?:��*|��*)", "������������", 0, 6);
722   x2("(?:��*|��*)(?:��+|��+)", "������������", 0, 12);
723   x2("(?:��+|��+){2}", "������������", 0, 12);
724   x2("(?:��+|��+){1,2}", "������������", 0, 12);
725   x2("(?:��+|\\A��*)����", "����", 0, 4);
726   n("(?:��+|\\A��*)����", "��������");
727   x2("(?:^��+|��+)*��", "����������������", 12, 16);
728   x2("(?:^��+|��+)*��", "��������������", 0, 14);
729   x2("��{0,}", "��������", 0, 8);
730   x2("��|(?i)c", "C", 0, 1);
731   x2("(?i)c|��", "C", 0, 1);
732   x2("(?i:��)|a", "a", 0, 1);
733   n("(?i:��)|a", "A");
734   x2("[������]?", "������", 0, 2);
735   x2("[������]*", "������", 0, 6);
736   x2("[^������]*", "������", 0, 0);
737   n("[^������]+", "������");
738   x2("��?\?", "������", 0, 0);
739   x2("����?\?��", "������", 0, 6);
740   x2("��*?", "������", 0, 0);
741   x2("����*?", "������", 0, 2);
742   x2("����*?��", "��������", 0, 8);
743   x2("��+?", "������", 0, 2);
744   x2("����+?", "������", 0, 4);
745   x2("����+?��", "��������", 0, 8);
746   x2("(?:�V?)?\?", "�V", 0, 0);
747   x2("(?:�V?\?)?", "�V", 0, 0);
748   x2("(?:��?)+?", "������", 0, 2);
749   x2("(?:��+)?\?", "������", 0, 0);
750   x2("(?:��+)?\?��", "���ᑚ", 0, 8);
751   x2("(?:����)?{2}", "", 0, 0);
752   x2("(?:�S��)?{2}", "�S�ԋS�ԋS", 0, 8);
753   x2("(?:�S��)*{0}", "�S�ԋS�ԋS", 0, 0);
754   x2("(?:�S��){3,}", "�S�ԋS�ԋS�ԋS��", 0, 16);
755   n("(?:�S��){3,}", "�S�ԋS��");
756   x2("(?:�S��){2,4}", "�S�ԋS�ԋS��", 0, 12);
757   x2("(?:�S��){2,4}", "�S�ԋS�ԋS�ԋS�ԋS��", 0, 16);
758   x2("(?:�S��){2,4}?", "�S�ԋS�ԋS�ԋS�ԋS��", 0, 8);
759   x2("(?:�S��){,}", "�S��{,}", 0, 7);
760   x2("(?:������)+?{2}", "������������������", 0, 12);
761   x3("(��)", "��", 0, 2, 1);
762   x3("(�ΐ�)", "�ΐ�", 0, 4, 1);
763   x2("((����))", "����", 0, 4);
764   x3("((����))", "����", 0, 4, 1);
765   x3("((���))", "���", 0, 4, 2);
766   x3("((((((((((((((((((((�ʎq))))))))))))))))))))", "�ʎq", 0, 4, 20);
767   x3("(����)(����)", "��������", 0, 4, 1);
768   x3("(����)(����)", "��������", 4, 8, 2);
769   x3("()(��)����(������)��������", "��������������������", 6, 12, 3);
770   x3("(()(��)����(������)��������)", "��������������������", 6, 12, 4);
771   x3(".*(�t�H)���E�}(��()�V���^)�C��", "�t�H���E�}���V���^�C��", 10, 18, 2);
772   x2("(^��)", "��", 0, 2);
773   x3("(��)|(��)", "����", 2, 4, 1);
774   x3("(^��)|(��)", "����", 2, 4, 2);
775   x3("(��?)", "������", 0, 2, 1);
776   x3("(��*)", "�܂܂�", 0, 6, 1);
777   x3("(��*)", "", 0, 0, 1);
778   x3("(��+)", "��������", 0, 14, 1);
779   x3("(��+|��*)", "�ӂӂӂւ�", 0, 6, 1);
780   x3("(��+|��?)", "����������", 0, 2, 1);
781   x3("(������)?", "������", 0, 6, 1);
782   x3("(������)*", "������", 0, 6, 1);
783   x3("(������)+", "������", 0, 6, 1);
784   x3("(������|������)+", "������", 0, 6, 1);
785   x3("([�Ȃɂ�][������]|������)+", "������", 0, 6, 1);
786   x3("((?i:������))", "������", 0, 6, 1);
787   x3("((?m:��.��))", "��\n��", 0, 5, 1);
788   x3("((?=����)��)", "����", 0, 2, 1);
789   x3("������|(.������)", "������", 0, 8, 1);
790   x3("��*(.)", "����������", 8, 10, 1);
791   x3("��*?(.)", "����������", 0, 2, 1);
792   x3("��*?(��)", "����������", 8, 10, 1);
793   x3("[������]��*(.)", "������������", 10, 12, 1);
794   x3("(\\A����)����", "��������", 0, 4, 1);
795   n("(\\A����)����", "��������");
796   x3("(^����)����", "��������", 0, 4, 1);
797   n("(^����)����", "��������");
798   x3("���(���$)", "�����", 4, 8, 1);
799   n("���(���$)", "������");
800   x2("(��)\\1", "����", 0, 4);
801   n("(��)\\1", "����");
802   x2("(��?)\\1", "���", 0, 4);
803   x2("(��?\?)\\1", "���", 0, 0);
804   x2("(��*)\\1", "������", 0, 8);
805   x3("(��*)\\1", "������", 0, 4, 1);
806   x2("��(��*)\\1", "����������", 0, 10);
807   x2("��(��*)\\1", "����", 0, 2);
808   x2("(��*)(��*)\\1\\2", "��������������������", 0, 20);
809   x2("(��*)(��*)\\2", "��������������", 0, 14);
810   x3("(��*)(��*)\\2", "��������������", 6, 10, 2);
811   x2("(((((((��*)��))))))��\\7", "�ۂۂۂ؂҂ۂۂ�", 0, 16);
812   x3("(((((((��*)��))))))��\\7", "�ۂۂۂ؂҂ۂۂ�", 0, 6, 7);
813   x2("(��)(��)(��)\\2\\1\\3", "�͂ЂӂЂ͂�", 0, 12);
814   x2("([��-��])\\1", "����", 0, 4);
815   x2("(\\w\\d\\s)\\1", "��5 ��5 ", 0, 8);
816   n("(\\w\\d\\s)\\1", "��5 ��5");
817   x2("(�N�H|[��-��]{3})\\1", "�N�H�N�H", 0, 8);
818   x2("...(�N�H|[��-��]{3})\\1", "��a���N�H�N�H", 0, 13);
819   x2("(�N�H|[��-��]{3})\\1", "������������", 0, 12);
820   x2("(^��)\\1", "����", 0, 4);
821   n("(^��)\\1", "�߂ނ�");
822   n("(��$)\\1", "����");
823   n("(����\\Z)\\1", "����");
824   x2("(��*\\Z)\\1", "��", 2, 2);
825   x2(".(��*\\Z)\\1", "����", 2, 4);
826   x3("(.(�₢��)\\2)", "z�₢��₢��", 0, 13, 1);
827   x3("(.(..\\d.)\\2)", "��12341234", 0, 10, 1);
828   x2("((?i:��v��))\\1", "��v����v��", 0, 10);
829   x2("(?<����>��|\\(\\g<����>\\))", "((((((��))))))", 0, 14);
830   x2("\\A(?:\\g<��_1>|\\g<�]_2>|\\z�I��  (?<��_1>��|��\\g<�]_2>��)(?<�]_2>��|��F\\g<��_1>��F))$", "��F����F���ݎ���F����F", 0, 26);
831   x2("[[�Ђ�]]", "��", 0, 2);
832   x2("[[������]��]", "��", 0, 2);
833   n("[[^��]]", "��");
834   n("[^[��]]", "��");
835   x2("[^[^��]]", "��", 0, 2);
836   x2("[[������]&&����]", "��", 0, 2);
837   n("[[������]&&����]", "��");
838   n("[[������]&&����]", "��");
839   x2("[��-��&&��-��&&��-��]", "��", 0, 2);
840   n("[^��-��&&��-��&&��-��]", "��");
841   x2("[[^��&&��]&&��-��]", "��", 0, 2);
842   n("[[^��&&��]&&��-��]", "��");
843   x2("[[^��-��&&��������]&&[^��-��]]", "��", 0, 2);
844   n("[[^��-��&&��������]&&[^��-��]]", "��");
845   x2("[^[^������]&&[^������]]", "��", 0, 2);
846   x2("[^[^������]&&[^������]]", "��", 0, 2);
847   n("[^[^������]&&[^������]]", "��");
848   x2("[��-&&-��]", "-", 0, 1);
849   x2("[^[^a-z������]&&[^bcdefg������]q-w]", "��", 0, 2);
850   x2("[^[^a-z������]&&[^bcdefg������]g-w]", "f", 0, 1);
851   x2("[^[^a-z������]&&[^bcdefg������]g-w]", "g", 0, 1);
852   n("[^[^a-z������]&&[^bcdefg������]g-w]", "2");
853   x2("a<b>�o�[�W�����̃_�E�����[�h<\\/b>", "a<b>�o�[�W�����̃_�E�����[�h</b>", 0, 32);
854   x2(".<b>�o�[�W�����̃_�E�����[�h<\\/b>", "a<b>�o�[�W�����̃_�E�����[�h</b>", 0, 32);
855   fprintf(stdout,
856        "\nRESULT   SUCC: %d,  FAIL: %d,  ERROR: %d      (by Oniguruma %s)\n",
857        nsucc, nfail, nerror, onig_version());
858 
859 #ifndef POSIX_TEST
860   onig_region_free(region, 1);
861   onig_end();
862 #endif
863 
864   return ((nfail == 0 && nerror == 0) ? 0 : -1);
865 }
866