]> git.proxmox.com Git - mirror_edk2.git/blame - AppPkg/Applications/Python/Python-2.7.10/PyMod-2.7.10/Modules/_sre.c
projects / mirror_edk2.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
AppPkg/Applications/Python/Python-2.7.10: Initial Checkin part 5/5.
[mirror_edk2.git] / AppPkg / Applications / Python / Python-2.7.10 / PyMod-2.7.10 / Modules / _sre.c
CommitLineData
3ec97ca4
DM		 1/*\r
2 * Secret Labs' Regular Expression Engine\r
3 *\r
4 * regular expression matching engine\r
5 *\r
6 * partial history:\r
7 * 1999-10-24 fl created (based on existing template matcher code)\r
8 * 2000-03-06 fl first alpha, sort of\r
9 * 2000-08-01 fl fixes for 1.6b1\r
10 * 2000-08-07 fl use PyOS_CheckStack() if available\r
11 * 2000-09-20 fl added expand method\r
12 * 2001-03-20 fl lots of fixes for 2.1b2\r
13 * 2001-04-15 fl export copyright as Python attribute, not global\r
14 * 2001-04-28 fl added __copy__ methods (work in progress)\r
15 * 2001-05-14 fl fixes for 1.5.2 compatibility\r
16 * 2001-07-01 fl added BIGCHARSET support (from Martin von Loewis)\r
17 * 2001-10-18 fl fixed group reset issue (from Matthew Mueller)\r
18 * 2001-10-20 fl added split primitive; reenable unicode for 1.6/2.0/2.1\r
19 * 2001-10-21 fl added sub/subn primitive\r
20 * 2001-10-24 fl added finditer primitive (for 2.2 only)\r
21 * 2001-12-07 fl fixed memory leak in sub/subn (Guido van Rossum)\r
22 * 2002-11-09 fl fixed empty sub/subn return type\r
23 * 2003-04-18 mvl fully support 4-byte codes\r
24 * 2003-10-17 gn implemented non recursive scheme\r
25 *\r
26 * Copyright (c) 1997-2001 by Secret Labs AB. All rights reserved.\r
27 *\r
28 * This version of the SRE library can be redistributed under CNRI's\r
29 * Python 1.6 license. For any other use, please contact Secret Labs\r
30 * AB (info@pythonware.com).\r
31 *\r
32 * Portions of this engine have been developed in cooperation with\r
33 * CNRI. Hewlett-Packard provided funding for 1.6 integration and\r
34 * other compatibility work.\r
35 */\r
36\r
37#ifndef SRE_RECURSIVE\r
38\r
39static char copyright[] =\r
40 " SRE 2.2.2 Copyright (c) 1997-2002 by Secret Labs AB ";\r
41\r
42#define PY_SSIZE_T_CLEAN\r
43\r
44#include "Python.h"\r
45#include "structmember.h" /* offsetof */\r
46\r
47#include "sre.h"\r
48\r
49#include <ctype.h>\r
50\r
51/* name of this module, minus the leading underscore */\r
52#if !defined(SRE_MODULE)\r
53#define SRE_MODULE "sre"\r
54#endif\r
55\r
56#define SRE_PY_MODULE "re"\r
57\r
58/* defining this one enables tracing */\r
59#undef VERBOSE\r
60\r
61#if PY_VERSION_HEX >= 0x01060000\r
62#if PY_VERSION_HEX < 0x02020000 || defined(Py_USING_UNICODE)\r
63/* defining this enables unicode support (default under 1.6a1 and later) */\r
64#define HAVE_UNICODE\r
65#endif\r
66#endif\r
67\r
68/* -------------------------------------------------------------------- */\r
69/* optional features */\r
70\r
71/* enables fast searching */\r
72#define USE_FAST_SEARCH\r
73\r
74/* enables aggressive inlining (always on for Visual C) */\r
75#undef USE_INLINE\r
76\r
77/* enables copy/deepcopy handling (work in progress) */\r
78#undef USE_BUILTIN_COPY\r
79\r
80#if PY_VERSION_HEX < 0x01060000\r
81#define PyObject_DEL(op) PyMem_DEL((op))\r
82#endif\r
83\r
84/* -------------------------------------------------------------------- */\r
85\r
86#if defined(_MSC_VER)\r
87#pragma optimize("agtw", on) /* doesn't seem to make much difference... */\r
88#pragma warning(disable: 4710) /* who cares if functions are not inlined ;-) */\r
89/* fastest possible local call under MSVC */\r
90#define LOCAL(type) static __inline type __fastcall\r
91#elif defined(USE_INLINE)\r
92#define LOCAL(type) static inline type\r
93#else\r
94#define LOCAL(type) static type\r
95#endif\r
96\r
97/* error codes */\r
98#define SRE_ERROR_ILLEGAL -1 /* illegal opcode */\r
99#define SRE_ERROR_STATE -2 /* illegal state */\r
100#define SRE_ERROR_RECURSION_LIMIT -3 /* runaway recursion */\r
101#define SRE_ERROR_MEMORY -9 /* out of memory */\r
102#define SRE_ERROR_INTERRUPTED -10 /* signal handler raised exception */\r
103\r
104#if defined(VERBOSE)\r
105#define TRACE(v) printf v\r
106#else\r
107#define TRACE(v)\r
108#endif\r
109\r
110/* -------------------------------------------------------------------- */\r
111/* search engine state */\r
112\r
113/* default character predicates (run sre_chars.py to regenerate tables) */\r
114\r
115#define SRE_DIGIT_MASK 1\r
116#define SRE_SPACE_MASK 2\r
117#define SRE_LINEBREAK_MASK 4\r
118#define SRE_ALNUM_MASK 8\r
119#define SRE_WORD_MASK 16\r
120\r
121/* FIXME: this assumes ASCII. create tables in init_sre() instead */\r
122\r
123static char sre_char_info[128] = { 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 6, 2,\r
1242, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0,\r
1250, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 25, 25, 25, 25, 25, 25, 25, 25,\r
12625, 25, 0, 0, 0, 0, 0, 0, 0, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24,\r
12724, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 0, 0,\r
1280, 0, 16, 0, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24,\r
12924, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 0, 0, 0, 0, 0 };\r
130\r
131static char sre_char_lower[128] = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9,\r
13210, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26,\r
13327, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43,\r
13444, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60,\r
13561, 62, 63, 64, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107,\r
136108, 109, 110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121,\r
137122, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105,\r
138106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 117, 118, 119,\r
139120, 121, 122, 123, 124, 125, 126, 127 };\r
140\r
141#define SRE_IS_DIGIT(ch)\\r
142 ((ch) < 128 ? (sre_char_info[(ch)] & SRE_DIGIT_MASK) : 0)\r
143#define SRE_IS_SPACE(ch)\\r
144 ((ch) < 128 ? (sre_char_info[(ch)] & SRE_SPACE_MASK) : 0)\r
145#define SRE_IS_LINEBREAK(ch)\\r
146 ((ch) < 128 ? (sre_char_info[(ch)] & SRE_LINEBREAK_MASK) : 0)\r
147#define SRE_IS_ALNUM(ch)\\r
148 ((ch) < 128 ? (sre_char_info[(ch)] & SRE_ALNUM_MASK) : 0)\r
149#define SRE_IS_WORD(ch)\\r
150 ((ch) < 128 ? (sre_char_info[(ch)] & SRE_WORD_MASK) : 0)\r
151\r
152static unsigned int sre_lower(unsigned int ch)\r
153{\r
154 return ((ch) < 128 ? (unsigned int)sre_char_lower[ch] : ch);\r
155}\r
156\r
157/* locale-specific character predicates */\r
158/* !(c & ~N) == (c < N+1) for any unsigned c, this avoids\r
159 * warnings when c's type supports only numbers < N+1 */\r
160#define SRE_LOC_IS_DIGIT(ch) (!((ch) & ~255) ? isdigit((ch)) : 0)\r
161#define SRE_LOC_IS_SPACE(ch) (!((ch) & ~255) ? isspace((ch)) : 0)\r
162#define SRE_LOC_IS_LINEBREAK(ch) ((ch) == '\n')\r
163#define SRE_LOC_IS_ALNUM(ch) (!((ch) & ~255) ? isalnum((ch)) : 0)\r
164#define SRE_LOC_IS_WORD(ch) (SRE_LOC_IS_ALNUM((ch)) || (ch) == '_')\r
165\r
166static unsigned int sre_lower_locale(unsigned int ch)\r
167{\r
168 return ((ch) < 256 ? (unsigned int)tolower((ch)) : ch);\r
169}\r
170\r
171/* unicode-specific character predicates */\r
172\r
173#if defined(HAVE_UNICODE)\r
174\r
175#define SRE_UNI_IS_DIGIT(ch) Py_UNICODE_ISDECIMAL((Py_UNICODE)(ch))\r
176#define SRE_UNI_IS_SPACE(ch) Py_UNICODE_ISSPACE((Py_UNICODE)(ch))\r
177#define SRE_UNI_IS_LINEBREAK(ch) Py_UNICODE_ISLINEBREAK((Py_UNICODE)(ch))\r
178#define SRE_UNI_IS_ALNUM(ch) Py_UNICODE_ISALNUM((Py_UNICODE)(ch))\r
179#define SRE_UNI_IS_WORD(ch) (SRE_UNI_IS_ALNUM((ch)) || (ch) == '_')\r
180\r
181static unsigned int sre_lower_unicode(unsigned int ch)\r
182{\r
183 return (unsigned int) Py_UNICODE_TOLOWER((Py_UNICODE)(ch));\r
184}\r
185\r
186#endif\r
187\r
188LOCAL(int)\r
189sre_category(SRE_CODE category, unsigned int ch)\r
190{\r
191 switch (category) {\r
192\r
193 case SRE_CATEGORY_DIGIT:\r
194 return SRE_IS_DIGIT(ch);\r
195 case SRE_CATEGORY_NOT_DIGIT:\r
196 return !SRE_IS_DIGIT(ch);\r
197 case SRE_CATEGORY_SPACE:\r
198 return SRE_IS_SPACE(ch);\r
199 case SRE_CATEGORY_NOT_SPACE:\r
200 return !SRE_IS_SPACE(ch);\r
201 case SRE_CATEGORY_WORD:\r
202 return SRE_IS_WORD(ch);\r
203 case SRE_CATEGORY_NOT_WORD:\r
204 return !SRE_IS_WORD(ch);\r
205 case SRE_CATEGORY_LINEBREAK:\r
206 return SRE_IS_LINEBREAK(ch);\r
207 case SRE_CATEGORY_NOT_LINEBREAK:\r
208 return !SRE_IS_LINEBREAK(ch);\r
209\r
210 case SRE_CATEGORY_LOC_WORD:\r
211 return SRE_LOC_IS_WORD(ch);\r
212 case SRE_CATEGORY_LOC_NOT_WORD:\r
213 return !SRE_LOC_IS_WORD(ch);\r
214\r
215#if defined(HAVE_UNICODE)\r
216 case SRE_CATEGORY_UNI_DIGIT:\r
217 return SRE_UNI_IS_DIGIT(ch);\r
218 case SRE_CATEGORY_UNI_NOT_DIGIT:\r
219 return !SRE_UNI_IS_DIGIT(ch);\r
220 case SRE_CATEGORY_UNI_SPACE:\r
221 return SRE_UNI_IS_SPACE(ch);\r
222 case SRE_CATEGORY_UNI_NOT_SPACE:\r
223 return !SRE_UNI_IS_SPACE(ch);\r
224 case SRE_CATEGORY_UNI_WORD:\r
225 return SRE_UNI_IS_WORD(ch);\r
226 case SRE_CATEGORY_UNI_NOT_WORD:\r
227 return !SRE_UNI_IS_WORD(ch);\r
228 case SRE_CATEGORY_UNI_LINEBREAK:\r
229 return SRE_UNI_IS_LINEBREAK(ch);\r
230 case SRE_CATEGORY_UNI_NOT_LINEBREAK:\r
231 return !SRE_UNI_IS_LINEBREAK(ch);\r
232#else\r
233 case SRE_CATEGORY_UNI_DIGIT:\r
234 return SRE_IS_DIGIT(ch);\r
235 case SRE_CATEGORY_UNI_NOT_DIGIT:\r
236 return !SRE_IS_DIGIT(ch);\r
237 case SRE_CATEGORY_UNI_SPACE:\r
238 return SRE_IS_SPACE(ch);\r
239 case SRE_CATEGORY_UNI_NOT_SPACE:\r
240 return !SRE_IS_SPACE(ch);\r
241 case SRE_CATEGORY_UNI_WORD:\r
242 return SRE_LOC_IS_WORD(ch);\r
243 case SRE_CATEGORY_UNI_NOT_WORD:\r
244 return !SRE_LOC_IS_WORD(ch);\r
245 case SRE_CATEGORY_UNI_LINEBREAK:\r
246 return SRE_IS_LINEBREAK(ch);\r
247 case SRE_CATEGORY_UNI_NOT_LINEBREAK:\r
248 return !SRE_IS_LINEBREAK(ch);\r
249#endif\r
250 }\r
251 return 0;\r
252}\r
253\r
254/* helpers */\r
255\r
256static void\r
257data_stack_dealloc(SRE_STATE* state)\r
258{\r
259 if (state->data_stack) {\r
260 PyMem_FREE(state->data_stack);\r
261 state->data_stack = NULL;\r
262 }\r
263 state->data_stack_size = state->data_stack_base = 0;\r
264}\r
265\r
266static int\r
267data_stack_grow(SRE_STATE* state, Py_ssize_t size)\r
268{\r
269 Py_ssize_t minsize, cursize;\r
270 minsize = state->data_stack_base+size;\r
271 cursize = state->data_stack_size;\r
272 if (cursize < minsize) {\r
273 void* stack;\r
274 cursize = minsize+minsize/4+1024;\r
275 TRACE(("allocate/grow stack %" PY_FORMAT_SIZE_T "d\n", cursize));\r
276 stack = PyMem_REALLOC(state->data_stack, cursize);\r
277 if (!stack) {\r
278 data_stack_dealloc(state);\r
279 return SRE_ERROR_MEMORY;\r
280 }\r
281 state->data_stack = (char *)stack;\r
282 state->data_stack_size = cursize;\r
283 }\r
284 return 0;\r
285}\r
286\r
287/* generate 8-bit version */\r
288\r
289#define SRE_CHAR unsigned char\r
290#define SRE_AT sre_at\r
291#define SRE_COUNT sre_count\r
292#define SRE_CHARSET sre_charset\r
293#define SRE_INFO sre_info\r
294#define SRE_MATCH sre_match\r
295#define SRE_MATCH_CONTEXT sre_match_context\r
296#define SRE_SEARCH sre_search\r
297#define SRE_LITERAL_TEMPLATE sre_literal_template\r
298\r
299#if defined(HAVE_UNICODE)\r
300\r
301#define SRE_RECURSIVE\r
302#include "_sre.c"\r
303#undef SRE_RECURSIVE\r
304\r
305#undef SRE_LITERAL_TEMPLATE\r
306#undef SRE_SEARCH\r
307#undef SRE_MATCH\r
308#undef SRE_MATCH_CONTEXT\r
309#undef SRE_INFO\r
310#undef SRE_CHARSET\r
311#undef SRE_COUNT\r
312#undef SRE_AT\r
313#undef SRE_CHAR\r
314\r
315/* generate 16-bit unicode version */\r
316\r
317#define SRE_CHAR Py_UNICODE\r
318#define SRE_AT sre_uat\r
319#define SRE_COUNT sre_ucount\r
320#define SRE_CHARSET sre_ucharset\r
321#define SRE_INFO sre_uinfo\r
322#define SRE_MATCH sre_umatch\r
323#define SRE_MATCH_CONTEXT sre_umatch_context\r
324#define SRE_SEARCH sre_usearch\r
325#define SRE_LITERAL_TEMPLATE sre_uliteral_template\r
326#endif\r
327\r
328#endif /* SRE_RECURSIVE */\r
329\r
330/* -------------------------------------------------------------------- */\r
331/* String matching engine */\r
332\r
333/* the following section is compiled twice, with different character\r
334 settings */\r
335\r
336LOCAL(int)\r
337SRE_AT(SRE_STATE* state, SRE_CHAR* ptr, SRE_CODE at)\r
338{\r
339 /* check if pointer is at given position */\r
340\r
341 Py_ssize_t thisp, thatp;\r
342\r
343 switch (at) {\r
344\r
345 case SRE_AT_BEGINNING:\r
346 case SRE_AT_BEGINNING_STRING:\r
347 return ((void*) ptr == state->beginning);\r
348\r
349 case SRE_AT_BEGINNING_LINE:\r
350 return ((void*) ptr == state->beginning ||\r
351 SRE_IS_LINEBREAK((int) ptr[-1]));\r
352\r
353 case SRE_AT_END:\r
354 return (((void*) (ptr+1) == state->end &&\r
355 SRE_IS_LINEBREAK((int) ptr[0])) ||\r
356 ((void*) ptr == state->end));\r
357\r
358 case SRE_AT_END_LINE:\r
359 return ((void*) ptr == state->end ||\r
360 SRE_IS_LINEBREAK((int) ptr[0]));\r
361\r
362 case SRE_AT_END_STRING:\r
363 return ((void*) ptr == state->end);\r
364\r
365 case SRE_AT_BOUNDARY:\r
366 if (state->beginning == state->end)\r
367 return 0;\r
368 thatp = ((void*) ptr > state->beginning) ?\r
369 SRE_IS_WORD((int) ptr[-1]) : 0;\r
370 thisp = ((void*) ptr < state->end) ?\r
371 SRE_IS_WORD((int) ptr[0]) : 0;\r
372 return thisp != thatp;\r
373\r
374 case SRE_AT_NON_BOUNDARY:\r
375 if (state->beginning == state->end)\r
376 return 0;\r
377 thatp = ((void*) ptr > state->beginning) ?\r
378 SRE_IS_WORD((int) ptr[-1]) : 0;\r
379 thisp = ((void*) ptr < state->end) ?\r
380 SRE_IS_WORD((int) ptr[0]) : 0;\r
381 return thisp == thatp;\r
382\r
383 case SRE_AT_LOC_BOUNDARY:\r
384 if (state->beginning == state->end)\r
385 return 0;\r
386 thatp = ((void*) ptr > state->beginning) ?\r
387 SRE_LOC_IS_WORD((int) ptr[-1]) : 0;\r
388 thisp = ((void*) ptr < state->end) ?\r
389 SRE_LOC_IS_WORD((int) ptr[0]) : 0;\r
390 return thisp != thatp;\r
391\r
392 case SRE_AT_LOC_NON_BOUNDARY:\r
393 if (state->beginning == state->end)\r
394 return 0;\r
395 thatp = ((void*) ptr > state->beginning) ?\r
396 SRE_LOC_IS_WORD((int) ptr[-1]) : 0;\r
397 thisp = ((void*) ptr < state->end) ?\r
398 SRE_LOC_IS_WORD((int) ptr[0]) : 0;\r
399 return thisp == thatp;\r
400\r
401#if defined(HAVE_UNICODE)\r
402 case SRE_AT_UNI_BOUNDARY:\r
403 if (state->beginning == state->end)\r
404 return 0;\r
405 thatp = ((void*) ptr > state->beginning) ?\r
406 SRE_UNI_IS_WORD((int) ptr[-1]) : 0;\r
407 thisp = ((void*) ptr < state->end) ?\r
408 SRE_UNI_IS_WORD((int) ptr[0]) : 0;\r
409 return thisp != thatp;\r
410\r
411 case SRE_AT_UNI_NON_BOUNDARY:\r
412 if (state->beginning == state->end)\r
413 return 0;\r
414 thatp = ((void*) ptr > state->beginning) ?\r
415 SRE_UNI_IS_WORD((int) ptr[-1]) : 0;\r
416 thisp = ((void*) ptr < state->end) ?\r
417 SRE_UNI_IS_WORD((int) ptr[0]) : 0;\r
418 return thisp == thatp;\r
419#endif\r
420\r
421 }\r
422\r
423 return 0;\r
424}\r
425\r
426LOCAL(int)\r
427SRE_CHARSET(SRE_CODE* set, SRE_CODE ch)\r
428{\r
429 /* check if character is a member of the given set */\r
430\r
431 int ok = 1;\r
432\r
433 for (;;) {\r
434 switch (*set++) {\r
435\r
436 case SRE_OP_FAILURE:\r
437 return !ok;\r
438\r
439 case SRE_OP_LITERAL:\r
440 /* <LITERAL> <code> */\r
441 if (ch == set[0])\r
442 return ok;\r
443 set++;\r
444 break;\r
445\r
446 case SRE_OP_CATEGORY:\r
447 /* <CATEGORY> <code> */\r
448 if (sre_category(set[0], (int) ch))\r
449 return ok;\r
450 set += 1;\r
451 break;\r
452\r
453 case SRE_OP_CHARSET:\r
454 if (sizeof(SRE_CODE) == 2) {\r
455 /* <CHARSET> <bitmap> (16 bits per code word) */\r
456 if (ch < 256 && (set[ch >> 4] & (1 << (ch & 15))))\r
457 return ok;\r
458 set += 16;\r
459 }\r
460 else {\r
461 /* <CHARSET> <bitmap> (32 bits per code word) */\r
462 if (ch < 256 && (set[ch >> 5] & (1u << (ch & 31))))\r
463 return ok;\r
464 set += 8;\r
465 }\r
466 break;\r
467\r
468 case SRE_OP_RANGE:\r
469 /* <RANGE> <lower> <upper> */\r
470 if (set[0] <= ch && ch <= set[1])\r
471 return ok;\r
472 set += 2;\r
473 break;\r
474\r
475 case SRE_OP_NEGATE:\r
476 ok = !ok;\r
477 break;\r
478\r
479 case SRE_OP_BIGCHARSET:\r
480 /* <BIGCHARSET> <blockcount> <256 blockindices> <blocks> */\r
481 {\r
482 Py_ssize_t count, block;\r
483 count = *(set++);\r
484\r
485 if (sizeof(SRE_CODE) == 2) {\r
486 block = ((unsigned char*)set)[ch >> 8];\r
487 set += 128;\r
488 if (set[block*16 + ((ch & 255)>>4)] & (1 << (ch & 15)))\r
489 return ok;\r
490 set += count*16;\r
491 }\r
492 else {\r
493 /* !(c & ~N) == (c < N+1) for any unsigned c, this avoids\r
494 * warnings when c's type supports only numbers < N+1 */\r
495 if (!(ch & ~65535))\r
496 block = ((unsigned char*)set)[ch >> 8];\r
497 else\r
498 block = -1;\r
499 set += 64;\r
500 if (block >=0 &&\r
501 (set[block*8 + ((ch & 255)>>5)] & (1u << (ch & 31))))\r
502 return ok;\r
503 set += count*8;\r
504 }\r
505 break;\r
506 }\r
507\r
508 default:\r
509 /* internal error -- there's not much we can do about it\r
510 here, so let's just pretend it didn't match... */\r
511 return 0;\r
512 }\r
513 }\r
514}\r
515\r
516LOCAL(Py_ssize_t) SRE_MATCH(SRE_STATE* state, SRE_CODE* pattern);\r
517\r
518LOCAL(Py_ssize_t)\r
519SRE_COUNT(SRE_STATE* state, SRE_CODE* pattern, Py_ssize_t maxcount)\r
520{\r
521 SRE_CODE chr;\r
522 SRE_CHAR* ptr = (SRE_CHAR *)state->ptr;\r
523 SRE_CHAR* end = (SRE_CHAR *)state->end;\r
524 Py_ssize_t i;\r
525\r
526 /* adjust end */\r
527 if (maxcount < end - ptr && maxcount != SRE_MAXREPEAT)\r
528 end = ptr + maxcount;\r
529\r
530 switch (pattern[0]) {\r
531\r
532 case SRE_OP_IN:\r
533 /* repeated set */\r
534 TRACE(("|%p|%p|COUNT IN\n", pattern, ptr));\r
535 while (ptr < end && SRE_CHARSET(pattern + 2, *ptr))\r
536 ptr++;\r
537 break;\r
538\r
539 case SRE_OP_ANY:\r
540 /* repeated dot wildcard. */\r
541 TRACE(("|%p|%p|COUNT ANY\n", pattern, ptr));\r
542 while (ptr < end && !SRE_IS_LINEBREAK(*ptr))\r
543 ptr++;\r
544 break;\r
545\r
546 case SRE_OP_ANY_ALL:\r
547 /* repeated dot wildcard. skip to the end of the target\r
548 string, and backtrack from there */\r
549 TRACE(("|%p|%p|COUNT ANY_ALL\n", pattern, ptr));\r
550 ptr = end;\r
551 break;\r
552\r
553 case SRE_OP_LITERAL:\r
554 /* repeated literal */\r
555 chr = pattern[1];\r
556 TRACE(("|%p|%p|COUNT LITERAL %d\n", pattern, ptr, chr));\r
557 while (ptr < end && (SRE_CODE) *ptr == chr)\r
558 ptr++;\r
559 break;\r
560\r
561 case SRE_OP_LITERAL_IGNORE:\r
562 /* repeated literal */\r
563 chr = pattern[1];\r
564 TRACE(("|%p|%p|COUNT LITERAL_IGNORE %d\n", pattern, ptr, chr));\r
565 while (ptr < end && (SRE_CODE) state->lower(*ptr) == chr)\r
566 ptr++;\r
567 break;\r
568\r
569 case SRE_OP_NOT_LITERAL:\r
570 /* repeated non-literal */\r
571 chr = pattern[1];\r
572 TRACE(("|%p|%p|COUNT NOT_LITERAL %d\n", pattern, ptr, chr));\r
573 while (ptr < end && (SRE_CODE) *ptr != chr)\r
574 ptr++;\r
575 break;\r
576\r
577 case SRE_OP_NOT_LITERAL_IGNORE:\r
578 /* repeated non-literal */\r
579 chr = pattern[1];\r
580 TRACE(("|%p|%p|COUNT NOT_LITERAL_IGNORE %d\n", pattern, ptr, chr));\r
581 while (ptr < end && (SRE_CODE) state->lower(*ptr) != chr)\r
582 ptr++;\r
583 break;\r
584\r
585 default:\r
586 /* repeated single character pattern */\r
587 TRACE(("|%p|%p|COUNT SUBPATTERN\n", pattern, ptr));\r
588 while ((SRE_CHAR*) state->ptr < end) {\r
589 i = SRE_MATCH(state, pattern);\r
590 if (i < 0)\r
591 return i;\r
592 if (!i)\r
593 break;\r
594 }\r
595 TRACE(("|%p|%p|COUNT %" PY_FORMAT_SIZE_T "d\n", pattern, ptr,\r
596 (SRE_CHAR*) state->ptr - ptr));\r
597 return (SRE_CHAR*) state->ptr - ptr;\r
598 }\r
599\r
600 TRACE(("|%p|%p|COUNT %" PY_FORMAT_SIZE_T "d\n", pattern, ptr,\r
601 ptr - (SRE_CHAR*) state->ptr));\r
602 return ptr - (SRE_CHAR*) state->ptr;\r
603}\r
604\r
605#if 0 /* not used in this release */\r
606LOCAL(int)\r
607SRE_INFO(SRE_STATE* state, SRE_CODE* pattern)\r
608{\r
609 /* check if an SRE_OP_INFO block matches at the current position.\r
610 returns the number of SRE_CODE objects to skip if successful, 0\r
611 if no match */\r
612\r
613 SRE_CHAR* end = state->end;\r
614 SRE_CHAR* ptr = state->ptr;\r
615 Py_ssize_t i;\r
616\r
617 /* check minimal length */\r
618 if (pattern[3] && (end - ptr) < pattern[3])\r
619 return 0;\r
620\r
621 /* check known prefix */\r
622 if (pattern[2] & SRE_INFO_PREFIX && pattern[5] > 1) {\r
623 /* <length> <skip> <prefix data> <overlap data> */\r
624 for (i = 0; i < pattern[5]; i++)\r
625 if ((SRE_CODE) ptr[i] != pattern[7 + i])\r
626 return 0;\r
627 return pattern[0] + 2 * pattern[6];\r
628 }\r
629 return pattern[0];\r
630}\r
631#endif\r
632\r
633/* The macros below should be used to protect recursive SRE_MATCH()\r
634 * calls that *failed* and do *not* return immediately (IOW, those\r
635 * that will backtrack). Explaining:\r
636 *\r
637 * - Recursive SRE_MATCH() returned true: that's usually a success\r
638 * (besides atypical cases like ASSERT_NOT), therefore there's no\r
639 * reason to restore lastmark;\r
640 *\r
641 * - Recursive SRE_MATCH() returned false but the current SRE_MATCH()\r
642 * is returning to the caller: If the current SRE_MATCH() is the\r
643 * top function of the recursion, returning false will be a matching\r
644 * failure, and it doesn't matter where lastmark is pointing to.\r
645 * If it's *not* the top function, it will be a recursive SRE_MATCH()\r
646 * failure by itself, and the calling SRE_MATCH() will have to deal\r
647 * with the failure by the same rules explained here (it will restore\r
648 * lastmark by itself if necessary);\r
649 *\r
650 * - Recursive SRE_MATCH() returned false, and will continue the\r
651 * outside 'for' loop: must be protected when breaking, since the next\r
652 * OP could potentially depend on lastmark;\r
653 *\r
654 * - Recursive SRE_MATCH() returned false, and will be called again\r
655 * inside a local for/while loop: must be protected between each\r
656 * loop iteration, since the recursive SRE_MATCH() could do anything,\r
657 * and could potentially depend on lastmark.\r
658 *\r
659 * For more information, check the discussion at SF patch #712900.\r
660 */\r
661#define LASTMARK_SAVE() \\r
662 do { \\r
663 ctx->lastmark = state->lastmark; \\r
664 ctx->lastindex = state->lastindex; \\r
665 } while (0)\r
666#define LASTMARK_RESTORE() \\r
667 do { \\r
668 state->lastmark = ctx->lastmark; \\r
669 state->lastindex = ctx->lastindex; \\r
670 } while (0)\r
671\r
672#define RETURN_ERROR(i) do { return i; } while(0)\r
673#define RETURN_FAILURE do { ret = 0; goto exit; } while(0)\r
674#define RETURN_SUCCESS do { ret = 1; goto exit; } while(0)\r
675\r
676#define RETURN_ON_ERROR(i) \\r
677 do { if (i < 0) RETURN_ERROR(i); } while (0)\r
678#define RETURN_ON_SUCCESS(i) \\r
679 do { RETURN_ON_ERROR(i); if (i > 0) RETURN_SUCCESS; } while (0)\r
680#define RETURN_ON_FAILURE(i) \\r
681 do { RETURN_ON_ERROR(i); if (i == 0) RETURN_FAILURE; } while (0)\r
682\r
683#define SFY(x) #x\r
684\r
685#define DATA_STACK_ALLOC(state, type, ptr) \\r
686do { \\r
687 alloc_pos = state->data_stack_base; \\r
688 TRACE(("allocating %s in %" PY_FORMAT_SIZE_T "d " \\r
689 "(%" PY_FORMAT_SIZE_T "d)\n", \\r
690 SFY(type), alloc_pos, sizeof(type))); \\r
691 if (sizeof(type) > state->data_stack_size - alloc_pos) { \\r
692 int j = data_stack_grow(state, sizeof(type)); \\r
693 if (j < 0) return j; \\r
694 if (ctx_pos != -1) \\r
695 DATA_STACK_LOOKUP_AT(state, SRE_MATCH_CONTEXT, ctx, ctx_pos); \\r
696 } \\r
697 ptr = (type*)(state->data_stack+alloc_pos); \\r
698 state->data_stack_base += sizeof(type); \\r
699} while (0)\r
700\r
701#define DATA_STACK_LOOKUP_AT(state, type, ptr, pos) \\r
702do { \\r
703 TRACE(("looking up %s at %" PY_FORMAT_SIZE_T "d\n", SFY(type), pos)); \\r
704 ptr = (type*)(state->data_stack+pos); \\r
705} while (0)\r
706\r
707#define DATA_STACK_PUSH(state, data, size) \\r
708do { \\r
709 TRACE(("copy data in %p to %" PY_FORMAT_SIZE_T "d " \\r
710 "(%" PY_FORMAT_SIZE_T "d)\n", \\r
711 data, state->data_stack_base, size)); \\r
712 if (size > state->data_stack_size - state->data_stack_base) { \\r
713 int j = data_stack_grow(state, size); \\r
714 if (j < 0) return j; \\r
715 if (ctx_pos != -1) \\r
716 DATA_STACK_LOOKUP_AT(state, SRE_MATCH_CONTEXT, ctx, ctx_pos); \\r
717 } \\r
718 memcpy(state->data_stack+state->data_stack_base, data, size); \\r
719 state->data_stack_base += size; \\r
720} while (0)\r
721\r
722#define DATA_STACK_POP(state, data, size, discard) \\r
723do { \\r
724 TRACE(("copy data to %p from %" PY_FORMAT_SIZE_T "d " \\r
725 "(%" PY_FORMAT_SIZE_T "d)\n", \\r
726 data, state->data_stack_base-size, size)); \\r
727 memcpy(data, state->data_stack+state->data_stack_base-size, size); \\r
728 if (discard) \\r
729 state->data_stack_base -= size; \\r
730} while (0)\r
731\r
732#define DATA_STACK_POP_DISCARD(state, size) \\r
733do { \\r
734 TRACE(("discard data from %" PY_FORMAT_SIZE_T "d " \\r
735 "(%" PY_FORMAT_SIZE_T "d)\n", \\r
736 state->data_stack_base-size, size)); \\r
737 state->data_stack_base -= size; \\r
738} while(0)\r
739\r
740#define DATA_PUSH(x) \\r
741 DATA_STACK_PUSH(state, (x), sizeof(*(x)))\r
742#define DATA_POP(x) \\r
743 DATA_STACK_POP(state, (x), sizeof(*(x)), 1)\r
744#define DATA_POP_DISCARD(x) \\r
745 DATA_STACK_POP_DISCARD(state, sizeof(*(x)))\r
746#define DATA_ALLOC(t,p) \\r
747 DATA_STACK_ALLOC(state, t, p)\r
748#define DATA_LOOKUP_AT(t,p,pos) \\r
749 DATA_STACK_LOOKUP_AT(state,t,p,pos)\r
750\r
751#define MARK_PUSH(lastmark) \\r
752 do if (lastmark > 0) { \\r
753 i = lastmark; /* ctx->lastmark may change if reallocated */ \\r
754 DATA_STACK_PUSH(state, state->mark, (i+1)*sizeof(void*)); \\r
755 } while (0)\r
756#define MARK_POP(lastmark) \\r
757 do if (lastmark > 0) { \\r
758 DATA_STACK_POP(state, state->mark, (lastmark+1)*sizeof(void*), 1); \\r
759 } while (0)\r
760#define MARK_POP_KEEP(lastmark) \\r
761 do if (lastmark > 0) { \\r
762 DATA_STACK_POP(state, state->mark, (lastmark+1)*sizeof(void*), 0); \\r
763 } while (0)\r
764#define MARK_POP_DISCARD(lastmark) \\r
765 do if (lastmark > 0) { \\r
766 DATA_STACK_POP_DISCARD(state, (lastmark+1)*sizeof(void*)); \\r
767 } while (0)\r
768\r
769#define JUMP_NONE 0\r
770#define JUMP_MAX_UNTIL_1 1\r
771#define JUMP_MAX_UNTIL_2 2\r
772#define JUMP_MAX_UNTIL_3 3\r
773#define JUMP_MIN_UNTIL_1 4\r
774#define JUMP_MIN_UNTIL_2 5\r
775#define JUMP_MIN_UNTIL_3 6\r
776#define JUMP_REPEAT 7\r
777#define JUMP_REPEAT_ONE_1 8\r
778#define JUMP_REPEAT_ONE_2 9\r
779#define JUMP_MIN_REPEAT_ONE 10\r
780#define JUMP_BRANCH 11\r
781#define JUMP_ASSERT 12\r
782#define JUMP_ASSERT_NOT 13\r
783\r
784#define DO_JUMP(jumpvalue, jumplabel, nextpattern) \\r
785 DATA_ALLOC(SRE_MATCH_CONTEXT, nextctx); \\r
786 nextctx->last_ctx_pos = ctx_pos; \\r
787 nextctx->jump = jumpvalue; \\r
788 nextctx->pattern = nextpattern; \\r
789 ctx_pos = alloc_pos; \\r
790 ctx = nextctx; \\r
791 goto entrance; \\r
792 jumplabel: \\r
793 while (0) /* gcc doesn't like labels at end of scopes */ \\r
794\r
795typedef struct {\r
796 Py_ssize_t last_ctx_pos;\r
797 Py_ssize_t jump;\r
798 SRE_CHAR* ptr;\r
799 SRE_CODE* pattern;\r
800 Py_ssize_t count;\r
801 Py_ssize_t lastmark;\r
802 Py_ssize_t lastindex;\r
803 union {\r
804 SRE_CODE chr;\r
805 SRE_REPEAT* rep;\r
806 } u;\r
807} SRE_MATCH_CONTEXT;\r
808\r
809/* check if string matches the given pattern. returns <0 for\r
810 error, 0 for failure, and 1 for success */\r
811LOCAL(Py_ssize_t)\r
812SRE_MATCH(SRE_STATE* state, SRE_CODE* pattern)\r
813{\r
814 SRE_CHAR* end = (SRE_CHAR *)state->end;\r
815 Py_ssize_t alloc_pos, ctx_pos = -1;\r
816 Py_ssize_t i, ret = 0;\r
817 Py_ssize_t jump;\r
818 unsigned int sigcount=0;\r
819\r
820 SRE_MATCH_CONTEXT* ctx;\r
821 SRE_MATCH_CONTEXT* nextctx;\r
822\r
823 TRACE(("|%p|%p|ENTER\n", pattern, state->ptr));\r
824\r
825 DATA_ALLOC(SRE_MATCH_CONTEXT, ctx);\r
826 ctx->last_ctx_pos = -1;\r
827 ctx->jump = JUMP_NONE;\r
828 ctx->pattern = pattern;\r
829 ctx_pos = alloc_pos;\r
830\r
831entrance:\r
832\r
833 ctx->ptr = (SRE_CHAR *)state->ptr;\r
834\r
835 if (ctx->pattern[0] == SRE_OP_INFO) {\r
836 /* optimization info block */\r
837 /* <INFO> <1=skip> <2=flags> <3=min> ... */\r
838 if (ctx->pattern[3] && (end - ctx->ptr) < ctx->pattern[3]) {\r
839 TRACE(("reject (got %" PY_FORMAT_SIZE_T "d chars, "\r
840 "need %" PY_FORMAT_SIZE_T "d)\n",\r
841 (end - ctx->ptr), (Py_ssize_t) ctx->pattern[3]));\r
842 RETURN_FAILURE;\r
843 }\r
844 ctx->pattern += ctx->pattern[1] + 1;\r
845 }\r
846\r
847 for (;;) {\r
848 ++sigcount;\r
849 if ((0 == (sigcount & 0xfff)) && PyErr_CheckSignals())\r
850 RETURN_ERROR(SRE_ERROR_INTERRUPTED);\r
851\r
852 switch (*ctx->pattern++) {\r
853\r
854 case SRE_OP_MARK:\r
855 /* set mark */\r
856 /* <MARK> <gid> */\r
857 TRACE(("|%p|%p|MARK %d\n", ctx->pattern,\r
858 ctx->ptr, ctx->pattern[0]));\r
859 i = ctx->pattern[0];\r
860 if (i & 1)\r
861 state->lastindex = i/2 + 1;\r
862 if (i > state->lastmark) {\r
863 /* state->lastmark is the highest valid index in the\r
864 state->mark array. If it is increased by more than 1,\r
865 the intervening marks must be set to NULL to signal\r
866 that these marks have not been encountered. */\r
867 Py_ssize_t j = state->lastmark + 1;\r
868 while (j < i)\r
869 state->mark[j++] = NULL;\r
870 state->lastmark = i;\r
871 }\r
872 state->mark[i] = ctx->ptr;\r
873 ctx->pattern++;\r
874 break;\r
875\r
876 case SRE_OP_LITERAL:\r
877 /* match literal string */\r
878 /* <LITERAL> <code> */\r
879 TRACE(("|%p|%p|LITERAL %d\n", ctx->pattern,\r
880 ctx->ptr, *ctx->pattern));\r
881 if (ctx->ptr >= end || (SRE_CODE) ctx->ptr[0] != ctx->pattern[0])\r
882 RETURN_FAILURE;\r
883 ctx->pattern++;\r
884 ctx->ptr++;\r
885 break;\r
886\r
887 case SRE_OP_NOT_LITERAL:\r
888 /* match anything that is not literal character */\r
889 /* <NOT_LITERAL> <code> */\r
890 TRACE(("|%p|%p|NOT_LITERAL %d\n", ctx->pattern,\r
891 ctx->ptr, *ctx->pattern));\r
892 if (ctx->ptr >= end || (SRE_CODE) ctx->ptr[0] == ctx->pattern[0])\r
893 RETURN_FAILURE;\r
894 ctx->pattern++;\r
895 ctx->ptr++;\r
896 break;\r
897\r
898 case SRE_OP_SUCCESS:\r
899 /* end of pattern */\r
900 TRACE(("|%p|%p|SUCCESS\n", ctx->pattern, ctx->ptr));\r
901 state->ptr = ctx->ptr;\r
902 RETURN_SUCCESS;\r
903\r
904 case SRE_OP_AT:\r
905 /* match at given position */\r
906 /* <AT> <code> */\r
907 TRACE(("|%p|%p|AT %d\n", ctx->pattern, ctx->ptr, *ctx->pattern));\r
908 if (!SRE_AT(state, ctx->ptr, *ctx->pattern))\r
909 RETURN_FAILURE;\r
910 ctx->pattern++;\r
911 break;\r
912\r
913 case SRE_OP_CATEGORY:\r
914 /* match at given category */\r
915 /* <CATEGORY> <code> */\r
916 TRACE(("|%p|%p|CATEGORY %d\n", ctx->pattern,\r
917 ctx->ptr, *ctx->pattern));\r
918 if (ctx->ptr >= end || !sre_category(ctx->pattern[0], ctx->ptr[0]))\r
919 RETURN_FAILURE;\r
920 ctx->pattern++;\r
921 ctx->ptr++;\r
922 break;\r
923\r
924 case SRE_OP_ANY:\r
925 /* match anything (except a newline) */\r
926 /* <ANY> */\r
927 TRACE(("|%p|%p|ANY\n", ctx->pattern, ctx->ptr));\r
928 if (ctx->ptr >= end || SRE_IS_LINEBREAK(ctx->ptr[0]))\r
929 RETURN_FAILURE;\r
930 ctx->ptr++;\r
931 break;\r
932\r
933 case SRE_OP_ANY_ALL:\r
934 /* match anything */\r
935 /* <ANY_ALL> */\r
936 TRACE(("|%p|%p|ANY_ALL\n", ctx->pattern, ctx->ptr));\r
937 if (ctx->ptr >= end)\r
938 RETURN_FAILURE;\r
939 ctx->ptr++;\r
940 break;\r
941\r
942 case SRE_OP_IN:\r
943 /* match set member (or non_member) */\r
944 /* <IN> <skip> <set> */\r
945 TRACE(("|%p|%p|IN\n", ctx->pattern, ctx->ptr));\r
946 if (ctx->ptr >= end || !SRE_CHARSET(ctx->pattern + 1, *ctx->ptr))\r
947 RETURN_FAILURE;\r
948 ctx->pattern += ctx->pattern[0];\r
949 ctx->ptr++;\r
950 break;\r
951\r
952 case SRE_OP_LITERAL_IGNORE:\r
953 TRACE(("|%p|%p|LITERAL_IGNORE %d\n",\r
954 ctx->pattern, ctx->ptr, ctx->pattern[0]));\r
955 if (ctx->ptr >= end ||\r
956 state->lower(*ctx->ptr) != state->lower(*ctx->pattern))\r
957 RETURN_FAILURE;\r
958 ctx->pattern++;\r
959 ctx->ptr++;\r
960 break;\r
961\r
962 case SRE_OP_NOT_LITERAL_IGNORE:\r
963 TRACE(("|%p|%p|NOT_LITERAL_IGNORE %d\n",\r
964 ctx->pattern, ctx->ptr, *ctx->pattern));\r
965 if (ctx->ptr >= end ||\r
966 state->lower(*ctx->ptr) == state->lower(*ctx->pattern))\r
967 RETURN_FAILURE;\r
968 ctx->pattern++;\r
969 ctx->ptr++;\r
970 break;\r
971\r
972 case SRE_OP_IN_IGNORE:\r
973 TRACE(("|%p|%p|IN_IGNORE\n", ctx->pattern, ctx->ptr));\r
974 if (ctx->ptr >= end\r
975 || !SRE_CHARSET(ctx->pattern+1,\r
976 (SRE_CODE)state->lower(*ctx->ptr)))\r
977 RETURN_FAILURE;\r
978 ctx->pattern += ctx->pattern[0];\r
979 ctx->ptr++;\r
980 break;\r
981\r
982 case SRE_OP_JUMP:\r
983 case SRE_OP_INFO:\r
984 /* jump forward */\r
985 /* <JUMP> <offset> */\r
986 TRACE(("|%p|%p|JUMP %d\n", ctx->pattern,\r
987 ctx->ptr, ctx->pattern[0]));\r
988 ctx->pattern += ctx->pattern[0];\r
989 break;\r
990\r
991 case SRE_OP_BRANCH:\r
992 /* alternation */\r
993 /* <BRANCH> <0=skip> code <JUMP> ... <NULL> */\r
994 TRACE(("|%p|%p|BRANCH\n", ctx->pattern, ctx->ptr));\r
995 LASTMARK_SAVE();\r
996 ctx->u.rep = state->repeat;\r
997 if (ctx->u.rep)\r
998 MARK_PUSH(ctx->lastmark);\r
999 for (; ctx->pattern[0]; ctx->pattern += ctx->pattern[0]) {\r
1000 if (ctx->pattern[1] == SRE_OP_LITERAL &&\r
1001 (ctx->ptr >= end ||\r
1002 (SRE_CODE) *ctx->ptr != ctx->pattern[2]))\r
1003 continue;\r
1004 if (ctx->pattern[1] == SRE_OP_IN &&\r
1005 (ctx->ptr >= end ||\r
1006 !SRE_CHARSET(ctx->pattern + 3, (SRE_CODE) *ctx->ptr)))\r
1007 continue;\r
1008 state->ptr = ctx->ptr;\r
1009 DO_JUMP(JUMP_BRANCH, jump_branch, ctx->pattern+1);\r
1010 if (ret) {\r
1011 if (ctx->u.rep)\r
1012 MARK_POP_DISCARD(ctx->lastmark);\r
1013 RETURN_ON_ERROR(ret);\r
1014 RETURN_SUCCESS;\r
1015 }\r
1016 if (ctx->u.rep)\r
1017 MARK_POP_KEEP(ctx->lastmark);\r
1018 LASTMARK_RESTORE();\r
1019 }\r
1020 if (ctx->u.rep)\r
1021 MARK_POP_DISCARD(ctx->lastmark);\r
1022 RETURN_FAILURE;\r
1023\r
1024 case SRE_OP_REPEAT_ONE:\r
1025 /* match repeated sequence (maximizing regexp) */\r
1026\r
1027 /* this operator only works if the repeated item is\r
1028 exactly one character wide, and we're not already\r
1029 collecting backtracking points. for other cases,\r
1030 use the MAX_REPEAT operator */\r
1031\r
1032 /* <REPEAT_ONE> <skip> <1=min> <2=max> item <SUCCESS> tail */\r
1033\r
1034 TRACE(("|%p|%p|REPEAT_ONE %d %d\n", ctx->pattern, ctx->ptr,\r
1035 ctx->pattern[1], ctx->pattern[2]));\r
1036\r
1037 if ((Py_ssize_t) ctx->pattern[1] > end - ctx->ptr)\r
1038 RETURN_FAILURE; /* cannot match */\r
1039\r
1040 state->ptr = ctx->ptr;\r
1041\r
1042 ret = SRE_COUNT(state, ctx->pattern+3, ctx->pattern[2]);\r
1043 RETURN_ON_ERROR(ret);\r
1044 DATA_LOOKUP_AT(SRE_MATCH_CONTEXT, ctx, ctx_pos);\r
1045 ctx->count = ret;\r
1046 ctx->ptr += ctx->count;\r
1047\r
1048 /* when we arrive here, count contains the number of\r
1049 matches, and ctx->ptr points to the tail of the target\r
1050 string. check if the rest of the pattern matches,\r
1051 and backtrack if not. */\r
1052\r
1053 if (ctx->count < (Py_ssize_t) ctx->pattern[1])\r
1054 RETURN_FAILURE;\r
1055\r
1056 if (ctx->pattern[ctx->pattern[0]] == SRE_OP_SUCCESS) {\r
1057 /* tail is empty. we're finished */\r
1058 state->ptr = ctx->ptr;\r
1059 RETURN_SUCCESS;\r
1060 }\r
1061\r
1062 LASTMARK_SAVE();\r
1063\r
1064 if (ctx->pattern[ctx->pattern[0]] == SRE_OP_LITERAL) {\r
1065 /* tail starts with a literal. skip positions where\r
1066 the rest of the pattern cannot possibly match */\r
1067 ctx->u.chr = ctx->pattern[ctx->pattern[0]+1];\r
1068 for (;;) {\r
1069 while (ctx->count >= (Py_ssize_t) ctx->pattern[1] &&\r
1070 (ctx->ptr >= end || *ctx->ptr != ctx->u.chr)) {\r
1071 ctx->ptr--;\r
1072 ctx->count--;\r
1073 }\r
1074 if (ctx->count < (Py_ssize_t) ctx->pattern[1])\r
1075 break;\r
1076 state->ptr = ctx->ptr;\r
1077 DO_JUMP(JUMP_REPEAT_ONE_1, jump_repeat_one_1,\r
1078 ctx->pattern+ctx->pattern[0]);\r
1079 if (ret) {\r
1080 RETURN_ON_ERROR(ret);\r
1081 RETURN_SUCCESS;\r
1082 }\r
1083\r
1084 LASTMARK_RESTORE();\r
1085\r
1086 ctx->ptr--;\r
1087 ctx->count--;\r
1088 }\r
1089\r
1090 } else {\r
1091 /* general case */\r
1092 while (ctx->count >= (Py_ssize_t) ctx->pattern[1]) {\r
1093 state->ptr = ctx->ptr;\r
1094 DO_JUMP(JUMP_REPEAT_ONE_2, jump_repeat_one_2,\r
1095 ctx->pattern+ctx->pattern[0]);\r
1096 if (ret) {\r
1097 RETURN_ON_ERROR(ret);\r
1098 RETURN_SUCCESS;\r
1099 }\r
1100 ctx->ptr--;\r
1101 ctx->count--;\r
1102 LASTMARK_RESTORE();\r
1103 }\r
1104 }\r
1105 RETURN_FAILURE;\r
1106\r
1107 case SRE_OP_MIN_REPEAT_ONE:\r
1108 /* match repeated sequence (minimizing regexp) */\r
1109\r
1110 /* this operator only works if the repeated item is\r
1111 exactly one character wide, and we're not already\r
1112 collecting backtracking points. for other cases,\r
1113 use the MIN_REPEAT operator */\r
1114\r
1115 /* <MIN_REPEAT_ONE> <skip> <1=min> <2=max> item <SUCCESS> tail */\r
1116\r
1117 TRACE(("|%p|%p|MIN_REPEAT_ONE %d %d\n", ctx->pattern, ctx->ptr,\r
1118 ctx->pattern[1], ctx->pattern[2]));\r
1119\r
1120 if ((Py_ssize_t) ctx->pattern[1] > end - ctx->ptr)\r
1121 RETURN_FAILURE; /* cannot match */\r
1122\r
1123 state->ptr = ctx->ptr;\r
1124\r
1125 if (ctx->pattern[1] == 0)\r
1126 ctx->count = 0;\r
1127 else {\r
1128 /* count using pattern min as the maximum */\r
1129 ret = SRE_COUNT(state, ctx->pattern+3, ctx->pattern[1]);\r
1130 RETURN_ON_ERROR(ret);\r
1131 DATA_LOOKUP_AT(SRE_MATCH_CONTEXT, ctx, ctx_pos);\r
1132 if (ret < (Py_ssize_t) ctx->pattern[1])\r
1133 /* didn't match minimum number of times */\r
1134 RETURN_FAILURE;\r
1135 /* advance past minimum matches of repeat */\r
1136 ctx->count = ret;\r
1137 ctx->ptr += ctx->count;\r
1138 }\r
1139\r
1140 if (ctx->pattern[ctx->pattern[0]] == SRE_OP_SUCCESS) {\r
1141 /* tail is empty. we're finished */\r
1142 state->ptr = ctx->ptr;\r
1143 RETURN_SUCCESS;\r
1144\r
1145 } else {\r
1146 /* general case */\r
1147 LASTMARK_SAVE();\r
1148 while ((Py_ssize_t)ctx->pattern[2] == SRE_MAXREPEAT\r
1149 || ctx->count <= (Py_ssize_t)ctx->pattern[2]) {\r
1150 state->ptr = ctx->ptr;\r
1151 DO_JUMP(JUMP_MIN_REPEAT_ONE,jump_min_repeat_one,\r
1152 ctx->pattern+ctx->pattern[0]);\r
1153 if (ret) {\r
1154 RETURN_ON_ERROR(ret);\r
1155 RETURN_SUCCESS;\r
1156 }\r
1157 state->ptr = ctx->ptr;\r
1158 ret = SRE_COUNT(state, ctx->pattern+3, 1);\r
1159 RETURN_ON_ERROR(ret);\r
1160 DATA_LOOKUP_AT(SRE_MATCH_CONTEXT, ctx, ctx_pos);\r
1161 if (ret == 0)\r
1162 break;\r
1163 assert(ret == 1);\r
1164 ctx->ptr++;\r
1165 ctx->count++;\r
1166 LASTMARK_RESTORE();\r
1167 }\r
1168 }\r
1169 RETURN_FAILURE;\r
1170\r
1171 case SRE_OP_REPEAT:\r
1172 /* create repeat context. all the hard work is done\r
1173 by the UNTIL operator (MAX_UNTIL, MIN_UNTIL) */\r
1174 /* <REPEAT> <skip> <1=min> <2=max> item <UNTIL> tail */\r
1175 TRACE(("|%p|%p|REPEAT %d %d\n", ctx->pattern, ctx->ptr,\r
1176 ctx->pattern[1], ctx->pattern[2]));\r
1177\r
1178 /* install new repeat context */\r
1179 ctx->u.rep = (SRE_REPEAT*) PyObject_MALLOC(sizeof(*ctx->u.rep));\r
1180 if (!ctx->u.rep) {\r
1181 PyErr_NoMemory();\r
1182 RETURN_FAILURE;\r
1183 }\r
1184 ctx->u.rep->count = -1;\r
1185 ctx->u.rep->pattern = ctx->pattern;\r
1186 ctx->u.rep->prev = state->repeat;\r
1187 ctx->u.rep->last_ptr = NULL;\r
1188 state->repeat = ctx->u.rep;\r
1189\r
1190 state->ptr = ctx->ptr;\r
1191 DO_JUMP(JUMP_REPEAT, jump_repeat, ctx->pattern+ctx->pattern[0]);\r
1192 state->repeat = ctx->u.rep->prev;\r
1193 PyObject_FREE(ctx->u.rep);\r
1194\r
1195 if (ret) {\r
1196 RETURN_ON_ERROR(ret);\r
1197 RETURN_SUCCESS;\r
1198 }\r
1199 RETURN_FAILURE;\r
1200\r
1201 case SRE_OP_MAX_UNTIL:\r
1202 /* maximizing repeat */\r
1203 /* <REPEAT> <skip> <1=min> <2=max> item <MAX_UNTIL> tail */\r
1204\r
1205 /* FIXME: we probably need to deal with zero-width\r
1206 matches in here... */\r
1207\r
1208 ctx->u.rep = state->repeat;\r
1209 if (!ctx->u.rep)\r
1210 RETURN_ERROR(SRE_ERROR_STATE);\r
1211\r
1212 state->ptr = ctx->ptr;\r
1213\r
1214 ctx->count = ctx->u.rep->count+1;\r
1215\r
1216 TRACE(("|%p|%p|MAX_UNTIL %" PY_FORMAT_SIZE_T "d\n", ctx->pattern,\r
1217 ctx->ptr, ctx->count));\r
1218\r
1219 if (ctx->count < (Py_ssize_t) ctx->u.rep->pattern[1]) {\r
1220 /* not enough matches */\r
1221 ctx->u.rep->count = ctx->count;\r
1222 DO_JUMP(JUMP_MAX_UNTIL_1, jump_max_until_1,\r
1223 ctx->u.rep->pattern+3);\r
1224 if (ret) {\r
1225 RETURN_ON_ERROR(ret);\r
1226 RETURN_SUCCESS;\r
1227 }\r
1228 ctx->u.rep->count = ctx->count-1;\r
1229 state->ptr = ctx->ptr;\r
1230 RETURN_FAILURE;\r
1231 }\r
1232\r
1233 if ((ctx->count < (Py_ssize_t) ctx->u.rep->pattern[2] ||\r
1234 ctx->u.rep->pattern[2] == SRE_MAXREPEAT) &&\r
1235 state->ptr != ctx->u.rep->last_ptr) {\r
1236 /* we may have enough matches, but if we can\r
1237 match another item, do so */\r
1238 ctx->u.rep->count = ctx->count;\r
1239 LASTMARK_SAVE();\r
1240 MARK_PUSH(ctx->lastmark);\r
1241 /* zero-width match protection */\r
1242 DATA_PUSH(&ctx->u.rep->last_ptr);\r
1243 ctx->u.rep->last_ptr = state->ptr;\r
1244 DO_JUMP(JUMP_MAX_UNTIL_2, jump_max_until_2,\r
1245 ctx->u.rep->pattern+3);\r
1246 DATA_POP(&ctx->u.rep->last_ptr);\r
1247 if (ret) {\r
1248 MARK_POP_DISCARD(ctx->lastmark);\r
1249 RETURN_ON_ERROR(ret);\r
1250 RETURN_SUCCESS;\r
1251 }\r
1252 MARK_POP(ctx->lastmark);\r
1253 LASTMARK_RESTORE();\r
1254 ctx->u.rep->count = ctx->count-1;\r
1255 state->ptr = ctx->ptr;\r
1256 }\r
1257\r
1258 /* cannot match more repeated items here. make sure the\r
1259 tail matches */\r
1260 state->repeat = ctx->u.rep->prev;\r
1261 DO_JUMP(JUMP_MAX_UNTIL_3, jump_max_until_3, ctx->pattern);\r
1262 RETURN_ON_SUCCESS(ret);\r
1263 state->repeat = ctx->u.rep;\r
1264 state->ptr = ctx->ptr;\r
1265 RETURN_FAILURE;\r
1266\r
1267 case SRE_OP_MIN_UNTIL:\r
1268 /* minimizing repeat */\r
1269 /* <REPEAT> <skip> <1=min> <2=max> item <MIN_UNTIL> tail */\r
1270\r
1271 ctx->u.rep = state->repeat;\r
1272 if (!ctx->u.rep)\r
1273 RETURN_ERROR(SRE_ERROR_STATE);\r
1274\r
1275 state->ptr = ctx->ptr;\r
1276\r
1277 ctx->count = ctx->u.rep->count+1;\r
1278\r
1279 TRACE(("|%p|%p|MIN_UNTIL %" PY_FORMAT_SIZE_T "d %p\n", ctx->pattern,\r
1280 ctx->ptr, ctx->count, ctx->u.rep->pattern));\r
1281\r
1282 if (ctx->count < (Py_ssize_t) ctx->u.rep->pattern[1]) {\r
1283 /* not enough matches */\r
1284 ctx->u.rep->count = ctx->count;\r
1285 DO_JUMP(JUMP_MIN_UNTIL_1, jump_min_until_1,\r
1286 ctx->u.rep->pattern+3);\r
1287 if (ret) {\r
1288 RETURN_ON_ERROR(ret);\r
1289 RETURN_SUCCESS;\r
1290 }\r
1291 ctx->u.rep->count = ctx->count-1;\r
1292 state->ptr = ctx->ptr;\r
1293 RETURN_FAILURE;\r
1294 }\r
1295\r
1296 LASTMARK_SAVE();\r
1297\r
1298 /* see if the tail matches */\r
1299 state->repeat = ctx->u.rep->prev;\r
1300 DO_JUMP(JUMP_MIN_UNTIL_2, jump_min_until_2, ctx->pattern);\r
1301 if (ret) {\r
1302 RETURN_ON_ERROR(ret);\r
1303 RETURN_SUCCESS;\r
1304 }\r
1305\r
1306 state->repeat = ctx->u.rep;\r
1307 state->ptr = ctx->ptr;\r
1308\r
1309 LASTMARK_RESTORE();\r
1310\r
1311 if ((ctx->count >= (Py_ssize_t) ctx->u.rep->pattern[2]\r
1312 && ctx->u.rep->pattern[2] != SRE_MAXREPEAT) ||\r
1313 state->ptr == ctx->u.rep->last_ptr)\r
1314 RETURN_FAILURE;\r
1315\r
1316 ctx->u.rep->count = ctx->count;\r
1317 /* zero-width match protection */\r
1318 DATA_PUSH(&ctx->u.rep->last_ptr);\r
1319 ctx->u.rep->last_ptr = state->ptr;\r
1320 DO_JUMP(JUMP_MIN_UNTIL_3,jump_min_until_3,\r
1321 ctx->u.rep->pattern+3);\r
1322 DATA_POP(&ctx->u.rep->last_ptr);\r
1323 if (ret) {\r
1324 RETURN_ON_ERROR(ret);\r
1325 RETURN_SUCCESS;\r
1326 }\r
1327 ctx->u.rep->count = ctx->count-1;\r
1328 state->ptr = ctx->ptr;\r
1329 RETURN_FAILURE;\r
1330\r
1331 case SRE_OP_GROUPREF:\r
1332 /* match backreference */\r
1333 TRACE(("|%p|%p|GROUPREF %d\n", ctx->pattern,\r
1334 ctx->ptr, ctx->pattern[0]));\r
1335 i = ctx->pattern[0];\r
1336 {\r
1337 Py_ssize_t groupref = i+i;\r
1338 if (groupref >= state->lastmark) {\r
1339 RETURN_FAILURE;\r
1340 } else {\r
1341 SRE_CHAR* p = (SRE_CHAR*) state->mark[groupref];\r
1342 SRE_CHAR* e = (SRE_CHAR*) state->mark[groupref+1];\r
1343 if (!p || !e || e < p)\r
1344 RETURN_FAILURE;\r
1345 while (p < e) {\r
1346 if (ctx->ptr >= end || *ctx->ptr != *p)\r
1347 RETURN_FAILURE;\r
1348 p++; ctx->ptr++;\r
1349 }\r
1350 }\r
1351 }\r
1352 ctx->pattern++;\r
1353 break;\r
1354\r
1355 case SRE_OP_GROUPREF_IGNORE:\r
1356 /* match backreference */\r
1357 TRACE(("|%p|%p|GROUPREF_IGNORE %d\n", ctx->pattern,\r
1358 ctx->ptr, ctx->pattern[0]));\r
1359 i = ctx->pattern[0];\r
1360 {\r
1361 Py_ssize_t groupref = i+i;\r
1362 if (groupref >= state->lastmark) {\r
1363 RETURN_FAILURE;\r
1364 } else {\r
1365 SRE_CHAR* p = (SRE_CHAR*) state->mark[groupref];\r
1366 SRE_CHAR* e = (SRE_CHAR*) state->mark[groupref+1];\r
1367 if (!p || !e || e < p)\r
1368 RETURN_FAILURE;\r
1369 while (p < e) {\r
1370 if (ctx->ptr >= end ||\r
1371 state->lower(*ctx->ptr) != state->lower(*p))\r
1372 RETURN_FAILURE;\r
1373 p++; ctx->ptr++;\r
1374 }\r
1375 }\r
1376 }\r
1377 ctx->pattern++;\r
1378 break;\r
1379\r
1380 case SRE_OP_GROUPREF_EXISTS:\r
1381 TRACE(("|%p|%p|GROUPREF_EXISTS %d\n", ctx->pattern,\r
1382 ctx->ptr, ctx->pattern[0]));\r
1383 /* <GROUPREF_EXISTS> <group> <skip> codeyes <JUMP> codeno ... */\r
1384 i = ctx->pattern[0];\r
1385 {\r
1386 Py_ssize_t groupref = i+i;\r
1387 if (groupref >= state->lastmark) {\r
1388 ctx->pattern += ctx->pattern[1];\r
1389 break;\r
1390 } else {\r
1391 SRE_CHAR* p = (SRE_CHAR*) state->mark[groupref];\r
1392 SRE_CHAR* e = (SRE_CHAR*) state->mark[groupref+1];\r
1393 if (!p || !e || e < p) {\r
1394 ctx->pattern += ctx->pattern[1];\r
1395 break;\r
1396 }\r
1397 }\r
1398 }\r
1399 ctx->pattern += 2;\r
1400 break;\r
1401\r
1402 case SRE_OP_ASSERT:\r
1403 /* assert subpattern */\r
1404 /* <ASSERT> <skip> <back> <pattern> */\r
1405 TRACE(("|%p|%p|ASSERT %d\n", ctx->pattern,\r
1406 ctx->ptr, ctx->pattern[1]));\r
1407 state->ptr = ctx->ptr - ctx->pattern[1];\r
1408 if (state->ptr < state->beginning)\r
1409 RETURN_FAILURE;\r
1410 DO_JUMP(JUMP_ASSERT, jump_assert, ctx->pattern+2);\r
1411 RETURN_ON_FAILURE(ret);\r
1412 ctx->pattern += ctx->pattern[0];\r
1413 break;\r
1414\r
1415 case SRE_OP_ASSERT_NOT:\r
1416 /* assert not subpattern */\r
1417 /* <ASSERT_NOT> <skip> <back> <pattern> */\r
1418 TRACE(("|%p|%p|ASSERT_NOT %d\n", ctx->pattern,\r
1419 ctx->ptr, ctx->pattern[1]));\r
1420 state->ptr = ctx->ptr - ctx->pattern[1];\r
1421 if (state->ptr >= state->beginning) {\r
1422 DO_JUMP(JUMP_ASSERT_NOT, jump_assert_not, ctx->pattern+2);\r
1423 if (ret) {\r
1424 RETURN_ON_ERROR(ret);\r
1425 RETURN_FAILURE;\r
1426 }\r
1427 }\r
1428 ctx->pattern += ctx->pattern[0];\r
1429 break;\r
1430\r
1431 case SRE_OP_FAILURE:\r
1432 /* immediate failure */\r
1433 TRACE(("|%p|%p|FAILURE\n", ctx->pattern, ctx->ptr));\r
1434 RETURN_FAILURE;\r
1435\r
1436 default:\r
1437 TRACE(("|%p|%p|UNKNOWN %d\n", ctx->pattern, ctx->ptr,\r
1438 ctx->pattern[-1]));\r
1439 RETURN_ERROR(SRE_ERROR_ILLEGAL);\r
1440 }\r
1441 }\r
1442\r
1443exit:\r
1444 ctx_pos = ctx->last_ctx_pos;\r
1445 jump = ctx->jump;\r
1446 DATA_POP_DISCARD(ctx);\r
1447 if (ctx_pos == -1)\r
1448 return ret;\r
1449 DATA_LOOKUP_AT(SRE_MATCH_CONTEXT, ctx, ctx_pos);\r
1450\r
1451 switch (jump) {\r
1452 case JUMP_MAX_UNTIL_2:\r
1453 TRACE(("|%p|%p|JUMP_MAX_UNTIL_2\n", ctx->pattern, ctx->ptr));\r
1454 goto jump_max_until_2;\r
1455 case JUMP_MAX_UNTIL_3:\r
1456 TRACE(("|%p|%p|JUMP_MAX_UNTIL_3\n", ctx->pattern, ctx->ptr));\r
1457 goto jump_max_until_3;\r
1458 case JUMP_MIN_UNTIL_2:\r
1459 TRACE(("|%p|%p|JUMP_MIN_UNTIL_2\n", ctx->pattern, ctx->ptr));\r
1460 goto jump_min_until_2;\r
1461 case JUMP_MIN_UNTIL_3:\r
1462 TRACE(("|%p|%p|JUMP_MIN_UNTIL_3\n", ctx->pattern, ctx->ptr));\r
1463 goto jump_min_until_3;\r
1464 case JUMP_BRANCH:\r
1465 TRACE(("|%p|%p|JUMP_BRANCH\n", ctx->pattern, ctx->ptr));\r
1466 goto jump_branch;\r
1467 case JUMP_MAX_UNTIL_1:\r
1468 TRACE(("|%p|%p|JUMP_MAX_UNTIL_1\n", ctx->pattern, ctx->ptr));\r
1469 goto jump_max_until_1;\r
1470 case JUMP_MIN_UNTIL_1:\r
1471 TRACE(("|%p|%p|JUMP_MIN_UNTIL_1\n", ctx->pattern, ctx->ptr));\r
1472 goto jump_min_until_1;\r
1473 case JUMP_REPEAT:\r
1474 TRACE(("|%p|%p|JUMP_REPEAT\n", ctx->pattern, ctx->ptr));\r
1475 goto jump_repeat;\r
1476 case JUMP_REPEAT_ONE_1:\r
1477 TRACE(("|%p|%p|JUMP_REPEAT_ONE_1\n", ctx->pattern, ctx->ptr));\r
1478 goto jump_repeat_one_1;\r
1479 case JUMP_REPEAT_ONE_2:\r
1480 TRACE(("|%p|%p|JUMP_REPEAT_ONE_2\n", ctx->pattern, ctx->ptr));\r
1481 goto jump_repeat_one_2;\r
1482 case JUMP_MIN_REPEAT_ONE:\r
1483 TRACE(("|%p|%p|JUMP_MIN_REPEAT_ONE\n", ctx->pattern, ctx->ptr));\r
1484 goto jump_min_repeat_one;\r
1485 case JUMP_ASSERT:\r
1486 TRACE(("|%p|%p|JUMP_ASSERT\n", ctx->pattern, ctx->ptr));\r
1487 goto jump_assert;\r
1488 case JUMP_ASSERT_NOT:\r
1489 TRACE(("|%p|%p|JUMP_ASSERT_NOT\n", ctx->pattern, ctx->ptr));\r
1490 goto jump_assert_not;\r
1491 case JUMP_NONE:\r
1492 TRACE(("|%p|%p|RETURN %" PY_FORMAT_SIZE_T "d\n", ctx->pattern,\r
1493 ctx->ptr, ret));\r
1494 break;\r
1495 }\r
1496\r
1497 return ret; /* should never get here */\r
1498}\r
1499\r
1500LOCAL(Py_ssize_t)\r
1501SRE_SEARCH(SRE_STATE* state, SRE_CODE* pattern)\r
1502{\r
1503 SRE_CHAR* ptr = (SRE_CHAR *)state->start;\r
1504 SRE_CHAR* end = (SRE_CHAR *)state->end;\r
1505 Py_ssize_t status = 0;\r
1506 Py_ssize_t prefix_len = 0;\r
1507 Py_ssize_t prefix_skip = 0;\r
1508 SRE_CODE* prefix = NULL;\r
1509 SRE_CODE* charset = NULL;\r
1510 SRE_CODE* overlap = NULL;\r
1511 int flags = 0;\r
1512\r
1513 if (pattern[0] == SRE_OP_INFO) {\r
1514 /* optimization info block */\r
1515 /* <INFO> <1=skip> <2=flags> <3=min> <4=max> <5=prefix info> */\r
1516\r
1517 flags = pattern[2];\r
1518\r
1519 if (pattern[3] > 1) {\r
1520 /* adjust end point (but make sure we leave at least one\r
1521 character in there, so literal search will work) */\r
1522 end -= pattern[3]-1;\r
1523 if (end <= ptr)\r
1524 end = ptr+1;\r
1525 }\r
1526\r
1527 if (flags & SRE_INFO_PREFIX) {\r
1528 /* pattern starts with a known prefix */\r
1529 /* <length> <skip> <prefix data> <overlap data> */\r
1530 prefix_len = pattern[5];\r
1531 prefix_skip = pattern[6];\r
1532 prefix = pattern + 7;\r
1533 overlap = prefix + prefix_len - 1;\r
1534 } else if (flags & SRE_INFO_CHARSET)\r
1535 /* pattern starts with a character from a known set */\r
1536 /* <charset> */\r
1537 charset = pattern + 5;\r
1538\r
1539 pattern += 1 + pattern[1];\r
1540 }\r
1541\r
1542 TRACE(("prefix = %p %" PY_FORMAT_SIZE_T "d %" PY_FORMAT_SIZE_T "d\n",\r
1543 prefix, prefix_len, prefix_skip));\r
1544 TRACE(("charset = %p\n", charset));\r
1545\r
1546#if defined(USE_FAST_SEARCH)\r
1547 if (prefix_len > 1) {\r
1548 /* pattern starts with a known prefix. use the overlap\r
1549 table to skip forward as fast as we possibly can */\r
1550 Py_ssize_t i = 0;\r
1551 end = (SRE_CHAR *)state->end;\r
1552 while (ptr < end) {\r
1553 for (;;) {\r
1554 if ((SRE_CODE) ptr[0] != prefix[i]) {\r
1555 if (!i)\r
1556 break;\r
1557 else\r
1558 i = overlap[i];\r
1559 } else {\r
1560 if (++i == prefix_len) {\r
1561 /* found a potential match */\r
1562 TRACE(("|%p|%p|SEARCH SCAN\n", pattern, ptr));\r
1563 state->start = ptr + 1 - prefix_len;\r
1564 state->ptr = ptr + 1 - prefix_len + prefix_skip;\r
1565 if (flags & SRE_INFO_LITERAL)\r
1566 return 1; /* we got all of it */\r
1567 status = SRE_MATCH(state, pattern + 2*prefix_skip);\r
1568 if (status != 0)\r
1569 return status;\r
1570 /* close but no cigar -- try again */\r
1571 i = overlap[i];\r
1572 }\r
1573 break;\r
1574 }\r
1575 }\r
1576 ptr++;\r
1577 }\r
1578 return 0;\r
1579 }\r
1580#endif\r
1581\r
1582 if (pattern[0] == SRE_OP_LITERAL) {\r
1583 /* pattern starts with a literal character. this is used\r
1584 for short prefixes, and if fast search is disabled */\r
1585 SRE_CODE chr = pattern[1];\r
1586 end = (SRE_CHAR *)state->end;\r
1587 for (;;) {\r
1588 while (ptr < end && (SRE_CODE) ptr[0] != chr)\r
1589 ptr++;\r
1590 if (ptr >= end)\r
1591 return 0;\r
1592 TRACE(("|%p|%p|SEARCH LITERAL\n", pattern, ptr));\r
1593 state->start = ptr;\r
1594 state->ptr = ++ptr;\r
1595 if (flags & SRE_INFO_LITERAL)\r
1596 return 1; /* we got all of it */\r
1597 status = SRE_MATCH(state, pattern + 2);\r
1598 if (status != 0)\r
1599 break;\r
1600 }\r
1601 } else if (charset) {\r
1602 /* pattern starts with a character from a known set */\r
1603 end = (SRE_CHAR *)state->end;\r
1604 for (;;) {\r
1605 while (ptr < end && !SRE_CHARSET(charset, ptr[0]))\r
1606 ptr++;\r
1607 if (ptr >= end)\r
1608 return 0;\r
1609 TRACE(("|%p|%p|SEARCH CHARSET\n", pattern, ptr));\r
1610 state->start = ptr;\r
1611 state->ptr = ptr;\r
1612 status = SRE_MATCH(state, pattern);\r
1613 if (status != 0)\r
1614 break;\r
1615 ptr++;\r
1616 }\r
1617 } else\r
1618 /* general case */\r
1619 while (ptr <= end) {\r
1620 TRACE(("|%p|%p|SEARCH\n", pattern, ptr));\r
1621 state->start = state->ptr = ptr++;\r
1622 status = SRE_MATCH(state, pattern);\r
1623 if (status != 0)\r
1624 break;\r
1625 }\r
1626\r
1627 return status;\r
1628}\r
1629\r
1630LOCAL(int)\r
1631SRE_LITERAL_TEMPLATE(SRE_CHAR* ptr, Py_ssize_t len)\r
1632{\r
1633 /* check if given string is a literal template (i.e. no escapes) */\r
1634 while (len-- > 0)\r
1635 if (*ptr++ == '\\')\r
1636 return 0;\r
1637 return 1;\r
1638}\r
1639\r
1640#if !defined(SRE_RECURSIVE)\r
1641\r
1642/* -------------------------------------------------------------------- */\r
1643/* factories and destructors */\r
1644\r
1645/* see sre.h for object declarations */\r
1646static PyObject*pattern_new_match(PatternObject*, SRE_STATE*, int);\r
1647static PyObject*pattern_scanner(PatternObject*, PyObject*);\r
1648\r
1649static PyObject *\r
1650sre_codesize(PyObject* self, PyObject *unused)\r
1651{\r
1652 return PyInt_FromSize_t(sizeof(SRE_CODE));\r
1653}\r
1654\r
1655static PyObject *\r
1656sre_getlower(PyObject* self, PyObject* args)\r
1657{\r
1658 int character, flags;\r
1659 if (!PyArg_ParseTuple(args, "ii", &character, &flags))\r
1660 return NULL;\r
1661 if (flags & SRE_FLAG_LOCALE)\r
1662 return Py_BuildValue("i", sre_lower_locale(character));\r
1663 if (flags & SRE_FLAG_UNICODE)\r
1664#if defined(HAVE_UNICODE)\r
1665 return Py_BuildValue("i", sre_lower_unicode(character));\r
1666#else\r
1667 return Py_BuildValue("i", sre_lower_locale(character));\r
1668#endif\r
1669 return Py_BuildValue("i", sre_lower(character));\r
1670}\r
1671\r
1672LOCAL(void)\r
1673state_reset(SRE_STATE* state)\r
1674{\r
1675 /* FIXME: dynamic! */\r
1676 /*memset(state->mark, 0, sizeof(*state->mark) * SRE_MARK_SIZE);*/\r
1677\r
1678 state->lastmark = -1;\r
1679 state->lastindex = -1;\r
1680\r
1681 state->repeat = NULL;\r
1682\r
1683 data_stack_dealloc(state);\r
1684}\r
1685\r
1686static void*\r
1687getstring(PyObject* string, Py_ssize_t* p_length, int* p_charsize)\r
1688{\r
1689 /* given a python object, return a data pointer, a length (in\r
1690 characters), and a character size. return NULL if the object\r
1691 is not a string (or not compatible) */\r
1692\r
1693 PyBufferProcs *buffer;\r
1694 Py_ssize_t size, bytes;\r
1695 int charsize;\r
1696 void* ptr;\r
1697\r
1698#if defined(HAVE_UNICODE)\r
1699 if (PyUnicode_Check(string)) {\r
1700 /* unicode strings doesn't always support the buffer interface */\r
1701 ptr = (void*) PyUnicode_AS_DATA(string);\r
1702 /* bytes = PyUnicode_GET_DATA_SIZE(string); */\r
1703 size = PyUnicode_GET_SIZE(string);\r
1704 charsize = sizeof(Py_UNICODE);\r
1705\r
1706 } else {\r
1707#endif\r
1708\r
1709 /* get pointer to string buffer */\r
1710 buffer = Py_TYPE(string)->tp_as_buffer;\r
1711 if (!buffer || !buffer->bf_getreadbuffer || !buffer->bf_getsegcount ||\r
1712 buffer->bf_getsegcount(string, NULL) != 1) {\r
1713 PyErr_SetString(PyExc_TypeError, "expected string or buffer");\r
1714 return NULL;\r
1715 }\r
1716\r
1717 /* determine buffer size */\r
1718 bytes = buffer->bf_getreadbuffer(string, 0, &ptr);\r
1719 if (bytes < 0) {\r
1720 PyErr_SetString(PyExc_TypeError, "buffer has negative size");\r
1721 return NULL;\r
1722 }\r
1723\r
1724 /* determine character size */\r
1725#if PY_VERSION_HEX >= 0x01060000\r
1726 size = PyObject_Size(string);\r
1727#else\r
1728 size = PyObject_Length(string);\r
1729#endif\r
1730\r
1731 if (PyString_Check(string) || bytes == size)\r
1732 charsize = 1;\r
1733#if defined(HAVE_UNICODE)\r
1734 else if (bytes == (Py_ssize_t) (size * sizeof(Py_UNICODE)))\r
1735 charsize = sizeof(Py_UNICODE);\r
1736#endif\r
1737 else {\r
1738 PyErr_SetString(PyExc_TypeError, "buffer size mismatch");\r
1739 return NULL;\r
1740 }\r
1741\r
1742#if defined(HAVE_UNICODE)\r
1743 }\r
1744#endif\r
1745\r
1746 *p_length = size;\r
1747 *p_charsize = charsize;\r
1748\r
1749 return ptr;\r
1750}\r
1751\r
1752LOCAL(PyObject*)\r
1753state_init(SRE_STATE* state, PatternObject* pattern, PyObject* string,\r
1754 Py_ssize_t start, Py_ssize_t end)\r
1755{\r
1756 /* prepare state object */\r
1757\r
1758 Py_ssize_t length;\r
1759 int charsize;\r
1760 void* ptr;\r
1761\r
1762 memset(state, 0, sizeof(SRE_STATE));\r
1763\r
1764 state->lastmark = -1;\r
1765 state->lastindex = -1;\r
1766\r
1767 ptr = getstring(string, &length, &charsize);\r
1768 if (!ptr)\r
1769 return NULL;\r
1770\r
1771 /* adjust boundaries */\r
1772 if (start < 0)\r
1773 start = 0;\r
1774 else if (start > length)\r
1775 start = length;\r
1776\r
1777 if (end < 0)\r
1778 end = 0;\r
1779 else if (end > length)\r
1780 end = length;\r
1781\r
1782 state->charsize = charsize;\r
1783\r
1784 state->beginning = ptr;\r
1785\r
1786 state->start = (void*) ((char*) ptr + start * state->charsize);\r
1787 state->end = (void*) ((char*) ptr + end * state->charsize);\r
1788\r
1789 Py_INCREF(string);\r
1790 state->string = string;\r
1791 state->pos = start;\r
1792 state->endpos = end;\r
1793\r
1794 if (pattern->flags & SRE_FLAG_LOCALE)\r
1795 state->lower = sre_lower_locale;\r
1796 else if (pattern->flags & SRE_FLAG_UNICODE)\r
1797#if defined(HAVE_UNICODE)\r
1798 state->lower = sre_lower_unicode;\r
1799#else\r
1800 state->lower = sre_lower_locale;\r
1801#endif\r
1802 else\r
1803 state->lower = sre_lower;\r
1804\r
1805 return string;\r
1806}\r
1807\r
1808LOCAL(void)\r
1809state_fini(SRE_STATE* state)\r
1810{\r
1811 Py_XDECREF(state->string);\r
1812 data_stack_dealloc(state);\r
1813}\r
1814\r
1815/* calculate offset from start of string */\r
1816#define STATE_OFFSET(state, member)\\r
1817 (((char*)(member) - (char*)(state)->beginning) / (state)->charsize)\r
1818\r
1819LOCAL(PyObject*)\r
1820state_getslice(SRE_STATE* state, Py_ssize_t index, PyObject* string, int empty)\r
1821{\r
1822 Py_ssize_t i, j;\r
1823\r
1824 index = (index - 1) * 2;\r
1825\r
1826 if (string == Py_None || index >= state->lastmark || !state->mark[index] || !state->mark[index+1]) {\r
1827 if (empty)\r
1828 /* want empty string */\r
1829 i = j = 0;\r
1830 else {\r
1831 Py_INCREF(Py_None);\r
1832 return Py_None;\r
1833 }\r
1834 } else {\r
1835 i = STATE_OFFSET(state, state->mark[index]);\r
1836 j = STATE_OFFSET(state, state->mark[index+1]);\r
1837 }\r
1838\r
1839 return PySequence_GetSlice(string, i, j);\r
1840}\r
1841\r
1842static void\r
1843pattern_error(int status)\r
1844{\r
1845 switch (status) {\r
1846 case SRE_ERROR_RECURSION_LIMIT:\r
1847 PyErr_SetString(\r
1848 PyExc_RuntimeError,\r
1849 "maximum recursion limit exceeded"\r
1850 );\r
1851 break;\r
1852 case SRE_ERROR_MEMORY:\r
1853 PyErr_NoMemory();\r
1854 break;\r
1855 case SRE_ERROR_INTERRUPTED:\r
1856 /* An exception has already been raised, so let it fly */\r
1857 break;\r
1858 default:\r
1859 /* other error codes indicate compiler/engine bugs */\r
1860 PyErr_SetString(\r
1861 PyExc_RuntimeError,\r
1862 "internal error in regular expression engine"\r
1863 );\r
1864 }\r
1865}\r
1866\r
1867static void\r
1868pattern_dealloc(PatternObject* self)\r
1869{\r
1870 if (self->weakreflist != NULL)\r
1871 PyObject_ClearWeakRefs((PyObject *) self);\r
1872 Py_XDECREF(self->pattern);\r
1873 Py_XDECREF(self->groupindex);\r
1874 Py_XDECREF(self->indexgroup);\r
1875 PyObject_DEL(self);\r
1876}\r
1877\r
1878static int\r
1879check_args_size(const char *name, PyObject* args, PyObject* kw, int n)\r
1880{\r
1881 Py_ssize_t m = PyTuple_GET_SIZE(args) + (kw ? PyDict_Size(kw) : 0);\r
1882 if (m <= n)\r
1883 return 1;\r
1884 PyErr_Format(PyExc_TypeError,\r
1885 "%s() takes at most %d positional arguments (%zd given)",\r
1886 name, n, m);\r
1887 return 0;\r
1888}\r
1889\r
1890static PyObject*\r
1891fix_string_param(PyObject *string, PyObject *string2, const char *oldname)\r
1892{\r
1893 if (string2 != NULL) {\r
1894 char buf[100];\r
1895 if (string != NULL) {\r
1896 PyErr_Format(PyExc_TypeError,\r
1897 "Argument given by name ('%s') and position (1)",\r
1898 oldname);\r
1899 return NULL;\r
1900 }\r
1901 sprintf(buf, "The '%s' keyword parameter name is deprecated. "\r
1902 "Use 'string' instead.", oldname);\r
1903 if (PyErr_Warn(PyExc_DeprecationWarning, buf) < 0)\r
1904 return NULL;\r
1905 return string2;\r
1906 }\r
1907 if (string == NULL) {\r
1908 PyErr_SetString(PyExc_TypeError,\r
1909 "Required argument 'string' (pos 1) not found");\r
1910 return NULL;\r
1911 }\r
1912 return string;\r
1913}\r
1914\r
1915static PyObject*\r
1916pattern_match(PatternObject* self, PyObject* args, PyObject* kw)\r
1917{\r
1918 SRE_STATE state;\r
1919 int status;\r
1920\r
1921 PyObject *string = NULL, *string2 = NULL;\r
1922 Py_ssize_t start = 0;\r
1923 Py_ssize_t end = PY_SSIZE_T_MAX;\r
1924 static char* kwlist[] = { "string", "pos", "endpos", "pattern", NULL };\r
1925 if (!check_args_size("match", args, kw, 3))\r
1926 return NULL;\r
1927\r
1928 if (!PyArg_ParseTupleAndKeywords(args, kw, "|OnnO:match", kwlist,\r
1929 &string, &start, &end, &string2))\r
1930 return NULL;\r
1931\r
1932 string = fix_string_param(string, string2, "pattern");\r
1933 if (!string)\r
1934 return NULL;\r
1935\r
1936 string = state_init(&state, self, string, start, end);\r
1937 if (!string)\r
1938 return NULL;\r
1939\r
1940 state.ptr = state.start;\r
1941\r
1942 TRACE(("|%p|%p|MATCH\n", PatternObject_GetCode(self), state.ptr));\r
1943\r
1944 if (state.charsize == 1) {\r
1945 status = sre_match(&state, PatternObject_GetCode(self));\r
1946 } else {\r
1947#if defined(HAVE_UNICODE)\r
1948 status = sre_umatch(&state, PatternObject_GetCode(self));\r
1949#endif\r
1950 }\r
1951\r
1952 TRACE(("|%p|%p|END\n", PatternObject_GetCode(self), state.ptr));\r
1953 if (PyErr_Occurred())\r
1954 return NULL;\r
1955\r
1956 state_fini(&state);\r
1957\r
1958 return pattern_new_match(self, &state, status);\r
1959}\r
1960\r
1961static PyObject*\r
1962pattern_search(PatternObject* self, PyObject* args, PyObject* kw)\r
1963{\r
1964 SRE_STATE state;\r
1965 int status;\r
1966\r
1967 PyObject *string = NULL, *string2 = NULL;\r
1968 Py_ssize_t start = 0;\r
1969 Py_ssize_t end = PY_SSIZE_T_MAX;\r
1970 static char* kwlist[] = { "string", "pos", "endpos", "pattern", NULL };\r
1971 if (!check_args_size("search", args, kw, 3))\r
1972 return NULL;\r
1973\r
1974 if (!PyArg_ParseTupleAndKeywords(args, kw, "|OnnO:search", kwlist,\r
1975 &string, &start, &end, &string2))\r
1976 return NULL;\r
1977\r
1978 string = fix_string_param(string, string2, "pattern");\r
1979 if (!string)\r
1980 return NULL;\r
1981\r
1982 string = state_init(&state, self, string, start, end);\r
1983 if (!string)\r
1984 return NULL;\r
1985\r
1986 TRACE(("|%p|%p|SEARCH\n", PatternObject_GetCode(self), state.ptr));\r
1987\r
1988 if (state.charsize == 1) {\r
1989 status = sre_search(&state, PatternObject_GetCode(self));\r
1990 } else {\r
1991#if defined(HAVE_UNICODE)\r
1992 status = sre_usearch(&state, PatternObject_GetCode(self));\r
1993#endif\r
1994 }\r
1995\r
1996 TRACE(("|%p|%p|END\n", PatternObject_GetCode(self), state.ptr));\r
1997\r
1998 state_fini(&state);\r
1999\r
2000 if (PyErr_Occurred())\r
2001 return NULL;\r
2002\r
2003 return pattern_new_match(self, &state, status);\r
2004}\r
2005\r
2006static PyObject*\r
2007call(char* module, char* function, PyObject* args)\r
2008{\r
2009 PyObject* name;\r
2010 PyObject* mod;\r
2011 PyObject* func;\r
2012 PyObject* result;\r
2013\r
2014 if (!args)\r
2015 return NULL;\r
2016 name = PyString_FromString(module);\r
2017 if (!name)\r
2018 return NULL;\r
2019 mod = PyImport_Import(name);\r
2020 Py_DECREF(name);\r
2021 if (!mod)\r
2022 return NULL;\r
2023 func = PyObject_GetAttrString(mod, function);\r
2024 Py_DECREF(mod);\r
2025 if (!func)\r
2026 return NULL;\r
2027 result = PyObject_CallObject(func, args);\r
2028 Py_DECREF(func);\r
2029 Py_DECREF(args);\r
2030 return result;\r
2031}\r
2032\r
2033#ifdef USE_BUILTIN_COPY\r
2034static int\r
2035deepcopy(PyObject** object, PyObject* memo)\r
2036{\r
2037 PyObject* copy;\r
2038\r
2039 copy = call(\r
2040 "copy", "deepcopy",\r
2041 PyTuple_Pack(2, *object, memo)\r
2042 );\r
2043 if (!copy)\r
2044 return 0;\r
2045\r
2046 Py_DECREF(*object);\r
2047 *object = copy;\r
2048\r
2049 return 1; /* success */\r
2050}\r
2051#endif\r
2052\r
2053static PyObject*\r
2054join_list(PyObject* list, PyObject* string)\r
2055{\r
2056 /* join list elements */\r
2057\r
2058 PyObject* joiner;\r
2059#if PY_VERSION_HEX >= 0x01060000\r
2060 PyObject* function;\r
2061 PyObject* args;\r
2062#endif\r
2063 PyObject* result;\r
2064\r
2065 joiner = PySequence_GetSlice(string, 0, 0);\r
2066 if (!joiner)\r
2067 return NULL;\r
2068\r
2069 if (PyList_GET_SIZE(list) == 0) {\r
2070 Py_DECREF(list);\r
2071 return joiner;\r
2072 }\r
2073\r
2074#if PY_VERSION_HEX >= 0x01060000\r
2075 function = PyObject_GetAttrString(joiner, "join");\r
2076 if (!function) {\r
2077 Py_DECREF(joiner);\r
2078 return NULL;\r
2079 }\r
2080 args = PyTuple_New(1);\r
2081 if (!args) {\r
2082 Py_DECREF(function);\r
2083 Py_DECREF(joiner);\r
2084 return NULL;\r
2085 }\r
2086 PyTuple_SET_ITEM(args, 0, list);\r
2087 result = PyObject_CallObject(function, args);\r
2088 Py_DECREF(args); /* also removes list */\r
2089 Py_DECREF(function);\r
2090#else\r
2091 result = call(\r
2092 "string", "join",\r
2093 PyTuple_Pack(2, list, joiner)\r
2094 );\r
2095#endif\r
2096 Py_DECREF(joiner);\r
2097\r
2098 return result;\r
2099}\r
2100\r
2101static PyObject*\r
2102pattern_findall(PatternObject* self, PyObject* args, PyObject* kw)\r
2103{\r
2104 SRE_STATE state;\r
2105 PyObject* list;\r
2106 int status;\r
2107 Py_ssize_t i, b, e;\r
2108\r
2109 PyObject *string = NULL, *string2 = NULL;\r
2110 Py_ssize_t start = 0;\r
2111 Py_ssize_t end = PY_SSIZE_T_MAX;\r
2112 static char* kwlist[] = { "string", "pos", "endpos", "source", NULL };\r
2113 if (!check_args_size("findall", args, kw, 3))\r
2114 return NULL;\r
2115\r
2116 if (!PyArg_ParseTupleAndKeywords(args, kw, "|OnnO:findall", kwlist,\r
2117 &string, &start, &end, &string2))\r
2118 return NULL;\r
2119\r
2120 string = fix_string_param(string, string2, "source");\r
2121 if (!string)\r
2122 return NULL;\r
2123\r
2124 string = state_init(&state, self, string, start, end);\r
2125 if (!string)\r
2126 return NULL;\r
2127\r
2128 list = PyList_New(0);\r
2129 if (!list) {\r
2130 state_fini(&state);\r
2131 return NULL;\r
2132 }\r
2133\r
2134 while (state.start <= state.end) {\r
2135\r
2136 PyObject* item;\r
2137\r
2138 state_reset(&state);\r
2139\r
2140 state.ptr = state.start;\r
2141\r
2142 if (state.charsize == 1) {\r
2143 status = sre_search(&state, PatternObject_GetCode(self));\r
2144 } else {\r
2145#if defined(HAVE_UNICODE)\r
2146 status = sre_usearch(&state, PatternObject_GetCode(self));\r
2147#endif\r
2148 }\r
2149\r
2150 if (PyErr_Occurred())\r
2151 goto error;\r
2152\r
2153 if (status <= 0) {\r
2154 if (status == 0)\r
2155 break;\r
2156 pattern_error(status);\r
2157 goto error;\r
2158 }\r
2159\r
2160 /* don't bother to build a match object */\r
2161 switch (self->groups) {\r
2162 case 0:\r
2163 b = STATE_OFFSET(&state, state.start);\r
2164 e = STATE_OFFSET(&state, state.ptr);\r
2165 item = PySequence_GetSlice(string, b, e);\r
2166 if (!item)\r
2167 goto error;\r
2168 break;\r
2169 case 1:\r
2170 item = state_getslice(&state, 1, string, 1);\r
2171 if (!item)\r
2172 goto error;\r
2173 break;\r
2174 default:\r
2175 item = PyTuple_New(self->groups);\r
2176 if (!item)\r
2177 goto error;\r
2178 for (i = 0; i < self->groups; i++) {\r
2179 PyObject* o = state_getslice(&state, i+1, string, 1);\r
2180 if (!o) {\r
2181 Py_DECREF(item);\r
2182 goto error;\r
2183 }\r
2184 PyTuple_SET_ITEM(item, i, o);\r
2185 }\r
2186 break;\r
2187 }\r
2188\r
2189 status = PyList_Append(list, item);\r
2190 Py_DECREF(item);\r
2191 if (status < 0)\r
2192 goto error;\r
2193\r
2194 if (state.ptr == state.start)\r
2195 state.start = (void*) ((char*) state.ptr + state.charsize);\r
2196 else\r
2197 state.start = state.ptr;\r
2198\r
2199 }\r
2200\r
2201 state_fini(&state);\r
2202 return list;\r
2203\r
2204error:\r
2205 Py_DECREF(list);\r
2206 state_fini(&state);\r
2207 return NULL;\r
2208\r
2209}\r
2210\r
2211#if PY_VERSION_HEX >= 0x02020000\r
2212static PyObject*\r
2213pattern_finditer(PatternObject* pattern, PyObject* args)\r
2214{\r
2215 PyObject* scanner;\r
2216 PyObject* search;\r
2217 PyObject* iterator;\r
2218\r
2219 scanner = pattern_scanner(pattern, args);\r
2220 if (!scanner)\r
2221 return NULL;\r
2222\r
2223 search = PyObject_GetAttrString(scanner, "search");\r
2224 Py_DECREF(scanner);\r
2225 if (!search)\r
2226 return NULL;\r
2227\r
2228 iterator = PyCallIter_New(search, Py_None);\r
2229 Py_DECREF(search);\r
2230\r
2231 return iterator;\r
2232}\r
2233#endif\r
2234\r
2235static PyObject*\r
2236pattern_split(PatternObject* self, PyObject* args, PyObject* kw)\r
2237{\r
2238 SRE_STATE state;\r
2239 PyObject* list;\r
2240 PyObject* item;\r
2241 int status;\r
2242 Py_ssize_t n;\r
2243 Py_ssize_t i;\r
2244 void* last;\r
2245\r
2246 PyObject *string = NULL, *string2 = NULL;\r
2247 Py_ssize_t maxsplit = 0;\r
2248 static char* kwlist[] = { "string", "maxsplit", "source", NULL };\r
2249 if (!check_args_size("split", args, kw, 2))\r
2250 return NULL;\r
2251\r
2252 if (!PyArg_ParseTupleAndKeywords(args, kw, "|OnO:split", kwlist,\r
2253 &string, &maxsplit, &string2))\r
2254 return NULL;\r
2255\r
2256 string = fix_string_param(string, string2, "source");\r
2257 if (!string)\r
2258 return NULL;\r
2259\r
2260 string = state_init(&state, self, string, 0, PY_SSIZE_T_MAX);\r
2261 if (!string)\r
2262 return NULL;\r
2263\r
2264 list = PyList_New(0);\r
2265 if (!list) {\r
2266 state_fini(&state);\r
2267 return NULL;\r
2268 }\r
2269\r
2270 n = 0;\r
2271 last = state.start;\r
2272\r
2273 while (!maxsplit || n < maxsplit) {\r
2274\r
2275 state_reset(&state);\r
2276\r
2277 state.ptr = state.start;\r
2278\r
2279 if (state.charsize == 1) {\r
2280 status = sre_search(&state, PatternObject_GetCode(self));\r
2281 } else {\r
2282#if defined(HAVE_UNICODE)\r
2283 status = sre_usearch(&state, PatternObject_GetCode(self));\r
2284#endif\r
2285 }\r
2286\r
2287 if (PyErr_Occurred())\r
2288 goto error;\r
2289\r
2290 if (status <= 0) {\r
2291 if (status == 0)\r
2292 break;\r
2293 pattern_error(status);\r
2294 goto error;\r
2295 }\r
2296\r
2297 if (state.start == state.ptr) {\r
2298 if (last == state.end)\r
2299 break;\r
2300 /* skip one character */\r
2301 state.start = (void*) ((char*) state.ptr + state.charsize);\r
2302 continue;\r
2303 }\r
2304\r
2305 /* get segment before this match */\r
2306 item = PySequence_GetSlice(\r
2307 string, STATE_OFFSET(&state, last),\r
2308 STATE_OFFSET(&state, state.start)\r
2309 );\r
2310 if (!item)\r
2311 goto error;\r
2312 status = PyList_Append(list, item);\r
2313 Py_DECREF(item);\r
2314 if (status < 0)\r
2315 goto error;\r
2316\r
2317 /* add groups (if any) */\r
2318 for (i = 0; i < self->groups; i++) {\r
2319 item = state_getslice(&state, i+1, string, 0);\r
2320 if (!item)\r
2321 goto error;\r
2322 status = PyList_Append(list, item);\r
2323 Py_DECREF(item);\r
2324 if (status < 0)\r
2325 goto error;\r
2326 }\r
2327\r
2328 n = n + 1;\r
2329\r
2330 last = state.start = state.ptr;\r
2331\r
2332 }\r
2333\r
2334 /* get segment following last match (even if empty) */\r
2335 item = PySequence_GetSlice(\r
2336 string, STATE_OFFSET(&state, last), state.endpos\r
2337 );\r
2338 if (!item)\r
2339 goto error;\r
2340 status = PyList_Append(list, item);\r
2341 Py_DECREF(item);\r
2342 if (status < 0)\r
2343 goto error;\r
2344\r
2345 state_fini(&state);\r
2346 return list;\r
2347\r
2348error:\r
2349 Py_DECREF(list);\r
2350 state_fini(&state);\r
2351 return NULL;\r
2352\r
2353}\r
2354\r
2355static PyObject*\r
2356pattern_subx(PatternObject* self, PyObject* ptemplate, PyObject* string,\r
2357 Py_ssize_t count, Py_ssize_t subn)\r
2358{\r
2359 SRE_STATE state;\r
2360 PyObject* list;\r
2361 PyObject* item;\r
2362 PyObject* filter;\r
2363 PyObject* args;\r
2364 PyObject* match;\r
2365 void* ptr;\r
2366 int status;\r
2367 Py_ssize_t n;\r
2368 Py_ssize_t i, b, e;\r
2369 int bint;\r
2370 int filter_is_callable;\r
2371\r
2372 if (PyCallable_Check(ptemplate)) {\r
2373 /* sub/subn takes either a function or a template */\r
2374 filter = ptemplate;\r
2375 Py_INCREF(filter);\r
2376 filter_is_callable = 1;\r
2377 } else {\r
2378 /* if not callable, check if it's a literal string */\r
2379 int literal;\r
2380 ptr = getstring(ptemplate, &n, &bint);\r
2381 b = bint;\r
2382 if (ptr) {\r
2383 if (b == 1) {\r
2384 literal = sre_literal_template((unsigned char *)ptr, n);\r
2385 } else {\r
2386#if defined(HAVE_UNICODE)\r
2387 literal = sre_uliteral_template((Py_UNICODE *)ptr, n);\r
2388#endif\r
2389 }\r
2390 } else {\r
2391 PyErr_Clear();\r
2392 literal = 0;\r
2393 }\r
2394 if (literal) {\r
2395 filter = ptemplate;\r
2396 Py_INCREF(filter);\r
2397 filter_is_callable = 0;\r
2398 } else {\r
2399 /* not a literal; hand it over to the template compiler */\r
2400 filter = call(\r
2401 SRE_PY_MODULE, "_subx",\r
2402 PyTuple_Pack(2, self, ptemplate)\r
2403 );\r
2404 if (!filter)\r
2405 return NULL;\r
2406 filter_is_callable = PyCallable_Check(filter);\r
2407 }\r
2408 }\r
2409\r
2410 string = state_init(&state, self, string, 0, PY_SSIZE_T_MAX);\r
2411 if (!string) {\r
2412 Py_DECREF(filter);\r
2413 return NULL;\r
2414 }\r
2415\r
2416 list = PyList_New(0);\r
2417 if (!list) {\r
2418 Py_DECREF(filter);\r
2419 state_fini(&state);\r
2420 return NULL;\r
2421 }\r
2422\r
2423 n = i = 0;\r
2424\r
2425 while (!count || n < count) {\r
2426\r
2427 state_reset(&state);\r
2428\r
2429 state.ptr = state.start;\r
2430\r
2431 if (state.charsize == 1) {\r
2432 status = sre_search(&state, PatternObject_GetCode(self));\r
2433 } else {\r
2434#if defined(HAVE_UNICODE)\r
2435 status = sre_usearch(&state, PatternObject_GetCode(self));\r
2436#endif\r
2437 }\r
2438\r
2439 if (PyErr_Occurred())\r
2440 goto error;\r
2441\r
2442 if (status <= 0) {\r
2443 if (status == 0)\r
2444 break;\r
2445 pattern_error(status);\r
2446 goto error;\r
2447 }\r
2448\r
2449 b = STATE_OFFSET(&state, state.start);\r
2450 e = STATE_OFFSET(&state, state.ptr);\r
2451\r
2452 if (i < b) {\r
2453 /* get segment before this match */\r
2454 item = PySequence_GetSlice(string, i, b);\r
2455 if (!item)\r
2456 goto error;\r
2457 status = PyList_Append(list, item);\r
2458 Py_DECREF(item);\r
2459 if (status < 0)\r
2460 goto error;\r
2461\r
2462 } else if (i == b && i == e && n > 0)\r
2463 /* ignore empty match on latest position */\r
2464 goto next;\r
2465\r
2466 if (filter_is_callable) {\r
2467 /* pass match object through filter */\r
2468 match = pattern_new_match(self, &state, 1);\r
2469 if (!match)\r
2470 goto error;\r
2471 args = PyTuple_Pack(1, match);\r
2472 if (!args) {\r
2473 Py_DECREF(match);\r
2474 goto error;\r
2475 }\r
2476 item = PyObject_CallObject(filter, args);\r
2477 Py_DECREF(args);\r
2478 Py_DECREF(match);\r
2479 if (!item)\r
2480 goto error;\r
2481 } else {\r
2482 /* filter is literal string */\r
2483 item = filter;\r
2484 Py_INCREF(item);\r
2485 }\r
2486\r
2487 /* add to list */\r
2488 if (item != Py_None) {\r
2489 status = PyList_Append(list, item);\r
2490 Py_DECREF(item);\r
2491 if (status < 0)\r
2492 goto error;\r
2493 }\r
2494\r
2495 i = e;\r
2496 n = n + 1;\r
2497\r
2498next:\r
2499 /* move on */\r
2500 if (state.ptr == state.start)\r
2501 state.start = (void*) ((char*) state.ptr + state.charsize);\r
2502 else\r
2503 state.start = state.ptr;\r
2504\r
2505 }\r
2506\r
2507 /* get segment following last match */\r
2508 if (i < state.endpos) {\r
2509 item = PySequence_GetSlice(string, i, state.endpos);\r
2510 if (!item)\r
2511 goto error;\r
2512 status = PyList_Append(list, item);\r
2513 Py_DECREF(item);\r
2514 if (status < 0)\r
2515 goto error;\r
2516 }\r
2517\r
2518 state_fini(&state);\r
2519\r
2520 Py_DECREF(filter);\r
2521\r
2522 /* convert list to single string (also removes list) */\r
2523 item = join_list(list, string);\r
2524\r
2525 if (!item)\r
2526 return NULL;\r
2527\r
2528 if (subn)\r
2529 return Py_BuildValue("Nn", item, n);\r
2530\r
2531 return item;\r
2532\r
2533error:\r
2534 Py_DECREF(list);\r
2535 state_fini(&state);\r
2536 Py_DECREF(filter);\r
2537 return NULL;\r
2538\r
2539}\r
2540\r
2541static PyObject*\r
2542pattern_sub(PatternObject* self, PyObject* args, PyObject* kw)\r
2543{\r
2544 PyObject* ptemplate;\r
2545 PyObject* string;\r
2546 Py_ssize_t count = 0;\r
2547 static char* kwlist[] = { "repl", "string", "count", NULL };\r
2548 if (!PyArg_ParseTupleAndKeywords(args, kw, "OO|n:sub", kwlist,\r
2549 &ptemplate, &string, &count))\r
2550 return NULL;\r
2551\r
2552 return pattern_subx(self, ptemplate, string, count, 0);\r
2553}\r
2554\r
2555static PyObject*\r
2556pattern_subn(PatternObject* self, PyObject* args, PyObject* kw)\r
2557{\r
2558 PyObject* ptemplate;\r
2559 PyObject* string;\r
2560 Py_ssize_t count = 0;\r
2561 static char* kwlist[] = { "repl", "string", "count", NULL };\r
2562 if (!PyArg_ParseTupleAndKeywords(args, kw, "OO|n:subn", kwlist,\r
2563 &ptemplate, &string, &count))\r
2564 return NULL;\r
2565\r
2566 return pattern_subx(self, ptemplate, string, count, 1);\r
2567}\r
2568\r
2569static PyObject*\r
2570pattern_copy(PatternObject* self, PyObject *unused)\r
2571{\r
2572#ifdef USE_BUILTIN_COPY\r
2573 PatternObject* copy;\r
2574 int offset;\r
2575\r
2576 copy = PyObject_NEW_VAR(PatternObject, &Pattern_Type, self->codesize);\r
2577 if (!copy)\r
2578 return NULL;\r
2579\r
2580 offset = offsetof(PatternObject, groups);\r
2581\r
2582 Py_XINCREF(self->groupindex);\r
2583 Py_XINCREF(self->indexgroup);\r
2584 Py_XINCREF(self->pattern);\r
2585\r
2586 memcpy((char*) copy + offset, (char*) self + offset,\r
2587 sizeof(PatternObject) + self->codesize * sizeof(SRE_CODE) - offset);\r
2588 copy->weakreflist = NULL;\r
2589\r
2590 return (PyObject*) copy;\r
2591#else\r
2592 PyErr_SetString(PyExc_TypeError, "cannot copy this pattern object");\r
2593 return NULL;\r
2594#endif\r
2595}\r
2596\r
2597static PyObject*\r
2598pattern_deepcopy(PatternObject* self, PyObject* memo)\r
2599{\r
2600#ifdef USE_BUILTIN_COPY\r
2601 PatternObject* copy;\r
2602\r
2603 copy = (PatternObject*) pattern_copy(self);\r
2604 if (!copy)\r
2605 return NULL;\r
2606\r
2607 if (!deepcopy(&copy->groupindex, memo) ||\r
2608 !deepcopy(&copy->indexgroup, memo) ||\r
2609 !deepcopy(&copy->pattern, memo)) {\r
2610 Py_DECREF(copy);\r
2611 return NULL;\r
2612 }\r
2613\r
2614#else\r
2615 PyErr_SetString(PyExc_TypeError, "cannot deepcopy this pattern object");\r
2616 return NULL;\r
2617#endif\r
2618}\r
2619\r
2620PyDoc_STRVAR(pattern_match_doc,\r
2621"match(string[, pos[, endpos]]) --> match object or None.\n\\r
2622 Matches zero or more characters at the beginning of the string");\r
2623\r
2624PyDoc_STRVAR(pattern_search_doc,\r
2625"search(string[, pos[, endpos]]) --> match object or None.\n\\r
2626 Scan through string looking for a match, and return a corresponding\n\\r
2627 match object instance. Return None if no position in the string matches.");\r
2628\r
2629PyDoc_STRVAR(pattern_split_doc,\r
2630"split(string[, maxsplit = 0]) --> list.\n\\r
2631 Split string by the occurrences of pattern.");\r
2632\r
2633PyDoc_STRVAR(pattern_findall_doc,\r
2634"findall(string[, pos[, endpos]]) --> list.\n\\r
2635 Return a list of all non-overlapping matches of pattern in string.");\r
2636\r
2637PyDoc_STRVAR(pattern_finditer_doc,\r
2638"finditer(string[, pos[, endpos]]) --> iterator.\n\\r
2639 Return an iterator over all non-overlapping matches for the \n\\r
2640 RE pattern in string. For each match, the iterator returns a\n\\r
2641 match object.");\r
2642\r
2643PyDoc_STRVAR(pattern_sub_doc,\r
2644"sub(repl, string[, count = 0]) --> newstring\n\\r
2645 Return the string obtained by replacing the leftmost non-overlapping\n\\r
2646 occurrences of pattern in string by the replacement repl.");\r
2647\r
2648PyDoc_STRVAR(pattern_subn_doc,\r
2649"subn(repl, string[, count = 0]) --> (newstring, number of subs)\n\\r
2650 Return the tuple (new_string, number_of_subs_made) found by replacing\n\\r
2651 the leftmost non-overlapping occurrences of pattern with the\n\\r
2652 replacement repl.");\r
2653\r
2654PyDoc_STRVAR(pattern_doc, "Compiled regular expression objects");\r
2655\r
2656static PyMethodDef pattern_methods[] = {\r
2657 {"match", (PyCFunction) pattern_match, METH_VARARGS|METH_KEYWORDS,\r
2658 pattern_match_doc},\r
2659 {"search", (PyCFunction) pattern_search, METH_VARARGS|METH_KEYWORDS,\r
2660 pattern_search_doc},\r
2661 {"sub", (PyCFunction) pattern_sub, METH_VARARGS|METH_KEYWORDS,\r
2662 pattern_sub_doc},\r
2663 {"subn", (PyCFunction) pattern_subn, METH_VARARGS|METH_KEYWORDS,\r
2664 pattern_subn_doc},\r
2665 {"split", (PyCFunction) pattern_split, METH_VARARGS|METH_KEYWORDS,\r
2666 pattern_split_doc},\r
2667 {"findall", (PyCFunction) pattern_findall, METH_VARARGS|METH_KEYWORDS,\r
2668 pattern_findall_doc},\r
2669#if PY_VERSION_HEX >= 0x02020000\r
2670 {"finditer", (PyCFunction) pattern_finditer, METH_VARARGS,\r
2671 pattern_finditer_doc},\r
2672#endif\r
2673 {"scanner", (PyCFunction) pattern_scanner, METH_VARARGS},\r
2674 {"__copy__", (PyCFunction) pattern_copy, METH_NOARGS},\r
2675 {"__deepcopy__", (PyCFunction) pattern_deepcopy, METH_O},\r
2676 {NULL, NULL}\r
2677};\r
2678\r
2679#define PAT_OFF(x) offsetof(PatternObject, x)\r
2680static PyMemberDef pattern_members[] = {\r
2681 {"pattern", T_OBJECT, PAT_OFF(pattern), READONLY},\r
2682 {"flags", T_INT, PAT_OFF(flags), READONLY},\r
2683 {"groups", T_PYSSIZET, PAT_OFF(groups), READONLY},\r
2684 {"groupindex", T_OBJECT, PAT_OFF(groupindex), READONLY},\r
2685 {NULL} /* Sentinel */\r
2686};\r
2687\r
2688statichere PyTypeObject Pattern_Type = {\r
2689 PyObject_HEAD_INIT(NULL)\r
2690 0, "_" SRE_MODULE ".SRE_Pattern",\r
2691 sizeof(PatternObject), sizeof(SRE_CODE),\r
2692 (destructor)pattern_dealloc, /*tp_dealloc*/\r
2693 0, /* tp_print */\r
2694 0, /* tp_getattrn */\r
2695 0, /* tp_setattr */\r
2696 0, /* tp_compare */\r
2697 0, /* tp_repr */\r
2698 0, /* tp_as_number */\r
2699 0, /* tp_as_sequence */\r
2700 0, /* tp_as_mapping */\r
2701 0, /* tp_hash */\r
2702 0, /* tp_call */\r
2703 0, /* tp_str */\r
2704 0, /* tp_getattro */\r
2705 0, /* tp_setattro */\r
2706 0, /* tp_as_buffer */\r
2707 Py_TPFLAGS_DEFAULT, /* tp_flags */\r
2708 pattern_doc, /* tp_doc */\r
2709 0, /* tp_traverse */\r
2710 0, /* tp_clear */\r
2711 0, /* tp_richcompare */\r
2712 offsetof(PatternObject, weakreflist), /* tp_weaklistoffset */\r
2713 0, /* tp_iter */\r
2714 0, /* tp_iternext */\r
2715 pattern_methods, /* tp_methods */\r
2716 pattern_members, /* tp_members */\r
2717};\r
2718\r
2719static int _validate(PatternObject *self); /* Forward */\r
2720\r
2721static PyObject *\r
2722_compile(PyObject* self_, PyObject* args)\r
2723{\r
2724 /* "compile" pattern descriptor to pattern object */\r
2725\r
2726 PatternObject* self;\r
2727 Py_ssize_t i, n;\r
2728\r
2729 PyObject* pattern;\r
2730 int flags = 0;\r
2731 PyObject* code;\r
2732 Py_ssize_t groups = 0;\r
2733 PyObject* groupindex = NULL;\r
2734 PyObject* indexgroup = NULL;\r
2735 if (!PyArg_ParseTuple(args, "OiO!|nOO", &pattern, &flags,\r
2736 &PyList_Type, &code, &groups,\r
2737 &groupindex, &indexgroup))\r
2738 return NULL;\r
2739\r
2740 n = PyList_GET_SIZE(code);\r
2741 /* coverity[ampersand_in_size] */\r
2742 self = PyObject_NEW_VAR(PatternObject, &Pattern_Type, n);\r
2743 if (!self)\r
2744 return NULL;\r
2745 self->weakreflist = NULL;\r
2746 self->pattern = NULL;\r
2747 self->groupindex = NULL;\r
2748 self->indexgroup = NULL;\r
2749\r
2750 self->codesize = n;\r
2751\r
2752 for (i = 0; i < n; i++) {\r
2753 PyObject *o = PyList_GET_ITEM(code, i);\r
2754 unsigned long value = PyInt_Check(o) ? (unsigned long)PyInt_AsLong(o)\r
2755 : PyLong_AsUnsignedLong(o);\r
2756 if (value == (unsigned long)-1 && PyErr_Occurred()) {\r
2757 if (PyErr_ExceptionMatches(PyExc_OverflowError)) {\r
2758 PyErr_SetString(PyExc_OverflowError,\r
2759 "regular expression code size limit exceeded");\r
2760 }\r
2761 break;\r
2762 }\r
2763 self->code[i] = (SRE_CODE) value;\r
2764 if ((unsigned long) self->code[i] != value) {\r
2765 PyErr_SetString(PyExc_OverflowError,\r
2766 "regular expression code size limit exceeded");\r
2767 break;\r
2768 }\r
2769 }\r
2770\r
2771 if (PyErr_Occurred()) {\r
2772 Py_DECREF(self);\r
2773 return NULL;\r
2774 }\r
2775\r
2776 Py_INCREF(pattern);\r
2777 self->pattern = pattern;\r
2778\r
2779 self->flags = flags;\r
2780\r
2781 self->groups = groups;\r
2782\r
2783 Py_XINCREF(groupindex);\r
2784 self->groupindex = groupindex;\r
2785\r
2786 Py_XINCREF(indexgroup);\r
2787 self->indexgroup = indexgroup;\r
2788\r
2789 self->weakreflist = NULL;\r
2790\r
2791 if (!_validate(self)) {\r
2792 Py_DECREF(self);\r
2793 return NULL;\r
2794 }\r
2795\r
2796 return (PyObject*) self;\r
2797}\r
2798\r
2799/* -------------------------------------------------------------------- */\r
2800/* Code validation */\r
2801\r
2802/* To learn more about this code, have a look at the _compile() function in\r
2803 Lib/sre_compile.py. The validation functions below checks the code array\r
2804 for conformance with the code patterns generated there.\r
2805\r
2806 The nice thing about the generated code is that it is position-independent:\r
2807 all jumps are relative jumps forward. Also, jumps don't cross each other:\r
2808 the target of a later jump is always earlier than the target of an earlier\r
2809 jump. IOW, this is okay:\r
2810\r
2811 J---------J-------T--------T\r
2812 \ \_____/ /\r
2813 \______________________/\r
2814\r
2815 but this is not:\r
2816\r
2817 J---------J-------T--------T\r
2818 \_________\_____/ /\r
2819 \____________/\r
2820\r
2821 It also helps that SRE_CODE is always an unsigned type.\r
2822*/\r
2823\r
2824/* Defining this one enables tracing of the validator */\r
2825#undef VVERBOSE\r
2826\r
2827/* Trace macro for the validator */\r
2828#if defined(VVERBOSE)\r
2829#define VTRACE(v) printf v\r
2830#else\r
2831#define VTRACE(v) do {} while(0) /* do nothing */\r
2832#endif\r
2833\r
2834/* Report failure */\r
2835#define FAIL do { VTRACE(("FAIL: %d\n", __LINE__)); return 0; } while (0)\r
2836\r
2837/* Extract opcode, argument, or skip count from code array */\r
2838#define GET_OP \\r
2839 do { \\r
2840 VTRACE(("%p: ", code)); \\r
2841 if (code >= end) FAIL; \\r
2842 op = *code++; \\r
2843 VTRACE(("%lu (op)\n", (unsigned long)op)); \\r
2844 } while (0)\r
2845#define GET_ARG \\r
2846 do { \\r
2847 VTRACE(("%p= ", code)); \\r
2848 if (code >= end) FAIL; \\r
2849 arg = *code++; \\r
2850 VTRACE(("%lu (arg)\n", (unsigned long)arg)); \\r
2851 } while (0)\r
2852#define GET_SKIP_ADJ(adj) \\r
2853 do { \\r
2854 VTRACE(("%p= ", code)); \\r
2855 if (code >= end) FAIL; \\r
2856 skip = *code; \\r
2857 VTRACE(("%lu (skip to %p)\n", \\r
2858 (unsigned long)skip, code+skip)); \\r
2859 if (skip-adj > end-code) \\r
2860 FAIL; \\r
2861 code++; \\r
2862 } while (0)\r
2863#define GET_SKIP GET_SKIP_ADJ(0)\r
2864\r
2865static int\r
2866_validate_charset(SRE_CODE *code, SRE_CODE *end)\r
2867{\r
2868 /* Some variables are manipulated by the macros above */\r
2869 SRE_CODE op;\r
2870 SRE_CODE arg;\r
2871 SRE_CODE offset;\r
2872 int i;\r
2873\r
2874 while (code < end) {\r
2875 GET_OP;\r
2876 switch (op) {\r
2877\r
2878 case SRE_OP_NEGATE:\r
2879 break;\r
2880\r
2881 case SRE_OP_LITERAL:\r
2882 GET_ARG;\r
2883 break;\r
2884\r
2885 case SRE_OP_RANGE:\r
2886 GET_ARG;\r
2887 GET_ARG;\r
2888 break;\r
2889\r
2890 case SRE_OP_CHARSET:\r
2891 offset = 32/sizeof(SRE_CODE); /* 32-byte bitmap */\r
2892 if (offset > end-code)\r
2893 FAIL;\r
2894 code += offset;\r
2895 break;\r
2896\r
2897 case SRE_OP_BIGCHARSET:\r
2898 GET_ARG; /* Number of blocks */\r
2899 offset = 256/sizeof(SRE_CODE); /* 256-byte table */\r
2900 if (offset > end-code)\r
2901 FAIL;\r
2902 /* Make sure that each byte points to a valid block */\r
2903 for (i = 0; i < 256; i++) {\r
2904 if (((unsigned char *)code)[i] >= arg)\r
2905 FAIL;\r
2906 }\r
2907 code += offset;\r
2908 offset = arg * 32/sizeof(SRE_CODE); /* 32-byte bitmap times arg */\r
2909 if (offset > end-code)\r
2910 FAIL;\r
2911 code += offset;\r
2912 break;\r
2913\r
2914 case SRE_OP_CATEGORY:\r
2915 GET_ARG;\r
2916 switch (arg) {\r
2917 case SRE_CATEGORY_DIGIT:\r
2918 case SRE_CATEGORY_NOT_DIGIT:\r
2919 case SRE_CATEGORY_SPACE:\r
2920 case SRE_CATEGORY_NOT_SPACE:\r
2921 case SRE_CATEGORY_WORD:\r
2922 case SRE_CATEGORY_NOT_WORD:\r
2923 case SRE_CATEGORY_LINEBREAK:\r
2924 case SRE_CATEGORY_NOT_LINEBREAK:\r
2925 case SRE_CATEGORY_LOC_WORD:\r
2926 case SRE_CATEGORY_LOC_NOT_WORD:\r
2927 case SRE_CATEGORY_UNI_DIGIT:\r
2928 case SRE_CATEGORY_UNI_NOT_DIGIT:\r
2929 case SRE_CATEGORY_UNI_SPACE:\r
2930 case SRE_CATEGORY_UNI_NOT_SPACE:\r
2931 case SRE_CATEGORY_UNI_WORD:\r
2932 case SRE_CATEGORY_UNI_NOT_WORD:\r
2933 case SRE_CATEGORY_UNI_LINEBREAK:\r
2934 case SRE_CATEGORY_UNI_NOT_LINEBREAK:\r
2935 break;\r
2936 default:\r
2937 FAIL;\r
2938 }\r
2939 break;\r
2940\r
2941 default:\r
2942 FAIL;\r
2943\r
2944 }\r
2945 }\r
2946\r
2947 return 1;\r
2948}\r
2949\r
2950static int\r
2951_validate_inner(SRE_CODE *code, SRE_CODE *end, Py_ssize_t groups)\r
2952{\r
2953 /* Some variables are manipulated by the macros above */\r
2954 SRE_CODE op;\r
2955 SRE_CODE arg;\r
2956 SRE_CODE skip;\r
2957\r
2958 VTRACE(("code=%p, end=%p\n", code, end));\r
2959\r
2960 if (code > end)\r
2961 FAIL;\r
2962\r
2963 while (code < end) {\r
2964 GET_OP;\r
2965 switch (op) {\r
2966\r
2967 case SRE_OP_MARK:\r
2968 /* We don't check whether marks are properly nested; the\r
2969 sre_match() code is robust even if they don't, and the worst\r
2970 you can get is nonsensical match results. */\r
2971 GET_ARG;\r
2972 if (arg > 2*groups+1) {\r
2973 VTRACE(("arg=%d, groups=%d\n", (int)arg, (int)groups));\r
2974 FAIL;\r
2975 }\r
2976 break;\r
2977\r
2978 case SRE_OP_LITERAL:\r
2979 case SRE_OP_NOT_LITERAL:\r
2980 case SRE_OP_LITERAL_IGNORE:\r
2981 case SRE_OP_NOT_LITERAL_IGNORE:\r
2982 GET_ARG;\r
2983 /* The arg is just a character, nothing to check */\r
2984 break;\r
2985\r
2986 case SRE_OP_SUCCESS:\r
2987 case SRE_OP_FAILURE:\r
2988 /* Nothing to check; these normally end the matching process */\r
2989 break;\r
2990\r
2991 case SRE_OP_AT:\r
2992 GET_ARG;\r
2993 switch (arg) {\r
2994 case SRE_AT_BEGINNING:\r
2995 case SRE_AT_BEGINNING_STRING:\r
2996 case SRE_AT_BEGINNING_LINE:\r
2997 case SRE_AT_END:\r
2998 case SRE_AT_END_LINE:\r
2999 case SRE_AT_END_STRING:\r
3000 case SRE_AT_BOUNDARY:\r
3001 case SRE_AT_NON_BOUNDARY:\r
3002 case SRE_AT_LOC_BOUNDARY:\r
3003 case SRE_AT_LOC_NON_BOUNDARY:\r
3004 case SRE_AT_UNI_BOUNDARY:\r
3005 case SRE_AT_UNI_NON_BOUNDARY:\r
3006 break;\r
3007 default:\r
3008 FAIL;\r
3009 }\r
3010 break;\r
3011\r
3012 case SRE_OP_ANY:\r
3013 case SRE_OP_ANY_ALL:\r
3014 /* These have no operands */\r
3015 break;\r
3016\r
3017 case SRE_OP_IN:\r
3018 case SRE_OP_IN_IGNORE:\r
3019 GET_SKIP;\r
3020 /* Stop 1 before the end; we check the FAILURE below */\r
3021 if (!_validate_charset(code, code+skip-2))\r
3022 FAIL;\r
3023 if (code[skip-2] != SRE_OP_FAILURE)\r
3024 FAIL;\r
3025 code += skip-1;\r
3026 break;\r
3027\r
3028 case SRE_OP_INFO:\r
3029 {\r
3030 /* A minimal info field is\r
3031 <INFO> <1=skip> <2=flags> <3=min> <4=max>;\r
3032 If SRE_INFO_PREFIX or SRE_INFO_CHARSET is in the flags,\r
3033 more follows. */\r
3034 SRE_CODE flags, i;\r
3035 SRE_CODE *newcode;\r
3036 GET_SKIP;\r
3037 newcode = code+skip-1;\r
3038 GET_ARG; flags = arg;\r
3039 GET_ARG; /* min */\r
3040 GET_ARG; /* max */\r
3041 /* Check that only valid flags are present */\r
3042 if ((flags & ~(SRE_INFO_PREFIX |\r
3043 SRE_INFO_LITERAL |\r
3044 SRE_INFO_CHARSET)) != 0)\r
3045 FAIL;\r
3046 /* PREFIX and CHARSET are mutually exclusive */\r
3047 if ((flags & SRE_INFO_PREFIX) &&\r
3048 (flags & SRE_INFO_CHARSET))\r
3049 FAIL;\r
3050 /* LITERAL implies PREFIX */\r
3051 if ((flags & SRE_INFO_LITERAL) &&\r
3052 !(flags & SRE_INFO_PREFIX))\r
3053 FAIL;\r
3054 /* Validate the prefix */\r
3055 if (flags & SRE_INFO_PREFIX) {\r
3056 SRE_CODE prefix_len;\r
3057 GET_ARG; prefix_len = arg;\r
3058 GET_ARG; /* prefix skip */\r
3059 /* Here comes the prefix string */\r
3060 if (prefix_len > newcode-code)\r
3061 FAIL;\r
3062 code += prefix_len;\r
3063 /* And here comes the overlap table */\r
3064 if (prefix_len > newcode-code)\r
3065 FAIL;\r
3066 /* Each overlap value should be < prefix_len */\r
3067 for (i = 0; i < prefix_len; i++) {\r
3068 if (code[i] >= prefix_len)\r
3069 FAIL;\r
3070 }\r
3071 code += prefix_len;\r
3072 }\r
3073 /* Validate the charset */\r
3074 if (flags & SRE_INFO_CHARSET) {\r
3075 if (!_validate_charset(code, newcode-1))\r
3076 FAIL;\r
3077 if (newcode[-1] != SRE_OP_FAILURE)\r
3078 FAIL;\r
3079 code = newcode;\r
3080 }\r
3081 else if (code != newcode) {\r
3082 VTRACE(("code=%p, newcode=%p\n", code, newcode));\r
3083 FAIL;\r
3084 }\r
3085 }\r
3086 break;\r
3087\r
3088 case SRE_OP_BRANCH:\r
3089 {\r
3090 SRE_CODE *target = NULL;\r
3091 for (;;) {\r
3092 GET_SKIP;\r
3093 if (skip == 0)\r
3094 break;\r
3095 /* Stop 2 before the end; we check the JUMP below */\r
3096 if (!_validate_inner(code, code+skip-3, groups))\r
3097 FAIL;\r
3098 code += skip-3;\r
3099 /* Check that it ends with a JUMP, and that each JUMP\r
3100 has the same target */\r
3101 GET_OP;\r
3102 if (op != SRE_OP_JUMP)\r
3103 FAIL;\r
3104 GET_SKIP;\r
3105 if (target == NULL)\r
3106 target = code+skip-1;\r
3107 else if (code+skip-1 != target)\r
3108 FAIL;\r
3109 }\r
3110 }\r
3111 break;\r
3112\r
3113 case SRE_OP_REPEAT_ONE:\r
3114 case SRE_OP_MIN_REPEAT_ONE:\r
3115 {\r
3116 SRE_CODE min, max;\r
3117 GET_SKIP;\r
3118 GET_ARG; min = arg;\r
3119 GET_ARG; max = arg;\r
3120 if (min > max)\r
3121 FAIL;\r
3122 if (max > SRE_MAXREPEAT)\r
3123 FAIL;\r
3124 if (!_validate_inner(code, code+skip-4, groups))\r
3125 FAIL;\r
3126 code += skip-4;\r
3127 GET_OP;\r
3128 if (op != SRE_OP_SUCCESS)\r
3129 FAIL;\r
3130 }\r
3131 break;\r
3132\r
3133 case SRE_OP_REPEAT:\r
3134 {\r
3135 SRE_CODE min, max;\r
3136 GET_SKIP;\r
3137 GET_ARG; min = arg;\r
3138 GET_ARG; max = arg;\r
3139 if (min > max)\r
3140 FAIL;\r
3141 if (max > SRE_MAXREPEAT)\r
3142 FAIL;\r
3143 if (!_validate_inner(code, code+skip-3, groups))\r
3144 FAIL;\r
3145 code += skip-3;\r
3146 GET_OP;\r
3147 if (op != SRE_OP_MAX_UNTIL && op != SRE_OP_MIN_UNTIL)\r
3148 FAIL;\r
3149 }\r
3150 break;\r
3151\r
3152 case SRE_OP_GROUPREF:\r
3153 case SRE_OP_GROUPREF_IGNORE:\r
3154 GET_ARG;\r
3155 if (arg >= groups)\r
3156 FAIL;\r
3157 break;\r
3158\r
3159 case SRE_OP_GROUPREF_EXISTS:\r
3160 /* The regex syntax for this is: '(?(group)then|else)', where\r
3161 'group' is either an integer group number or a group name,\r
3162 'then' and 'else' are sub-regexes, and 'else' is optional. */\r
3163 GET_ARG;\r
3164 if (arg >= groups)\r
3165 FAIL;\r
3166 GET_SKIP_ADJ(1);\r
3167 code--; /* The skip is relative to the first arg! */\r
3168 /* There are two possibilities here: if there is both a 'then'\r
3169 part and an 'else' part, the generated code looks like:\r
3170\r
3171 GROUPREF_EXISTS\r
3172 <group>\r
3173 <skipyes>\r
3174 ...then part...\r
3175 JUMP\r
3176 <skipno>\r
3177 (<skipyes> jumps here)\r
3178 ...else part...\r
3179 (<skipno> jumps here)\r
3180\r
3181 If there is only a 'then' part, it looks like:\r
3182\r
3183 GROUPREF_EXISTS\r
3184 <group>\r
3185 <skip>\r
3186 ...then part...\r
3187 (<skip> jumps here)\r
3188\r
3189 There is no direct way to decide which it is, and we don't want\r
3190 to allow arbitrary jumps anywhere in the code; so we just look\r
3191 for a JUMP opcode preceding our skip target.\r
3192 */\r
3193 if (skip >= 3 && skip-3 < end-code &&\r
3194 code[skip-3] == SRE_OP_JUMP)\r
3195 {\r
3196 VTRACE(("both then and else parts present\n"));\r
3197 if (!_validate_inner(code+1, code+skip-3, groups))\r
3198 FAIL;\r
3199 code += skip-2; /* Position after JUMP, at <skipno> */\r
3200 GET_SKIP;\r
3201 if (!_validate_inner(code, code+skip-1, groups))\r
3202 FAIL;\r
3203 code += skip-1;\r
3204 }\r
3205 else {\r
3206 VTRACE(("only a then part present\n"));\r
3207 if (!_validate_inner(code+1, code+skip-1, groups))\r
3208 FAIL;\r
3209 code += skip-1;\r
3210 }\r
3211 break;\r
3212\r
3213 case SRE_OP_ASSERT:\r
3214 case SRE_OP_ASSERT_NOT:\r
3215 GET_SKIP;\r
3216 GET_ARG; /* 0 for lookahead, width for lookbehind */\r
3217 code--; /* Back up over arg to simplify math below */\r
3218 if (arg & 0x80000000)\r
3219 FAIL; /* Width too large */\r
3220 /* Stop 1 before the end; we check the SUCCESS below */\r
3221 if (!_validate_inner(code+1, code+skip-2, groups))\r
3222 FAIL;\r
3223 code += skip-2;\r
3224 GET_OP;\r
3225 if (op != SRE_OP_SUCCESS)\r
3226 FAIL;\r
3227 break;\r
3228\r
3229 default:\r
3230 FAIL;\r
3231\r
3232 }\r
3233 }\r
3234\r
3235 VTRACE(("okay\n"));\r
3236 return 1;\r
3237}\r
3238\r
3239static int\r
3240_validate_outer(SRE_CODE *code, SRE_CODE *end, Py_ssize_t groups)\r
3241{\r
3242 if (groups < 0 || groups > 100 || code >= end || end[-1] != SRE_OP_SUCCESS)\r
3243 FAIL;\r
3244 if (groups == 0) /* fix for simplejson */\r
3245 groups = 100; /* 100 groups should always be safe */\r
3246 return _validate_inner(code, end-1, groups);\r
3247}\r
3248\r
3249static int\r
3250_validate(PatternObject *self)\r
3251{\r
3252 if (!_validate_outer(self->code, self->code+self->codesize, self->groups))\r
3253 {\r
3254 PyErr_SetString(PyExc_RuntimeError, "invalid SRE code");\r
3255 return 0;\r
3256 }\r
3257 else\r
3258 VTRACE(("Success!\n"));\r
3259 return 1;\r
3260}\r
3261\r
3262/* -------------------------------------------------------------------- */\r
3263/* match methods */\r
3264\r
3265static void\r
3266match_dealloc(MatchObject* self)\r
3267{\r
3268 Py_XDECREF(self->regs);\r
3269 Py_XDECREF(self->string);\r
3270 Py_DECREF(self->pattern);\r
3271 PyObject_DEL(self);\r
3272}\r
3273\r
3274static PyObject*\r
3275match_getslice_by_index(MatchObject* self, Py_ssize_t index, PyObject* def)\r
3276{\r
3277 if (index < 0 || index >= self->groups) {\r
3278 /* raise IndexError if we were given a bad group number */\r
3279 PyErr_SetString(\r
3280 PyExc_IndexError,\r
3281 "no such group"\r
3282 );\r
3283 return NULL;\r
3284 }\r
3285\r
3286 index *= 2;\r
3287\r
3288 if (self->string == Py_None || self->mark[index] < 0) {\r
3289 /* return default value if the string or group is undefined */\r
3290 Py_INCREF(def);\r
3291 return def;\r
3292 }\r
3293\r
3294 return PySequence_GetSlice(\r
3295 self->string, self->mark[index], self->mark[index+1]\r
3296 );\r
3297}\r
3298\r
3299static Py_ssize_t\r
3300match_getindex(MatchObject* self, PyObject* index)\r
3301{\r
3302 Py_ssize_t i;\r
3303\r
3304 if (PyInt_Check(index) || PyLong_Check(index))\r
3305 return PyInt_AsSsize_t(index);\r
3306\r
3307 i = -1;\r
3308\r
3309 if (self->pattern->groupindex) {\r
3310 index = PyObject_GetItem(self->pattern->groupindex, index);\r
3311 if (index) {\r
3312 if (PyInt_Check(index) || PyLong_Check(index))\r
3313 i = PyInt_AsSsize_t(index);\r
3314 Py_DECREF(index);\r
3315 } else\r
3316 PyErr_Clear();\r
3317 }\r
3318\r
3319 return i;\r
3320}\r
3321\r
3322static PyObject*\r
3323match_getslice(MatchObject* self, PyObject* index, PyObject* def)\r
3324{\r
3325 return match_getslice_by_index(self, match_getindex(self, index), def);\r
3326}\r
3327\r
3328static PyObject*\r
3329match_expand(MatchObject* self, PyObject* ptemplate)\r
3330{\r
3331 /* delegate to Python code */\r
3332 return call(\r
3333 SRE_PY_MODULE, "_expand",\r
3334 PyTuple_Pack(3, self->pattern, self, ptemplate)\r
3335 );\r
3336}\r
3337\r
3338static PyObject*\r
3339match_group(MatchObject* self, PyObject* args)\r
3340{\r
3341 PyObject* result;\r
3342 Py_ssize_t i, size;\r
3343\r
3344 size = PyTuple_GET_SIZE(args);\r
3345\r
3346 switch (size) {\r
3347 case 0:\r
3348 result = match_getslice(self, Py_False, Py_None);\r
3349 break;\r
3350 case 1:\r
3351 result = match_getslice(self, PyTuple_GET_ITEM(args, 0), Py_None);\r
3352 break;\r
3353 default:\r
3354 /* fetch multiple items */\r
3355 result = PyTuple_New(size);\r
3356 if (!result)\r
3357 return NULL;\r
3358 for (i = 0; i < size; i++) {\r
3359 PyObject* item = match_getslice(\r
3360 self, PyTuple_GET_ITEM(args, i), Py_None\r
3361 );\r
3362 if (!item) {\r
3363 Py_DECREF(result);\r
3364 return NULL;\r
3365 }\r
3366 PyTuple_SET_ITEM(result, i, item);\r
3367 }\r
3368 break;\r
3369 }\r
3370 return result;\r
3371}\r
3372\r
3373static PyObject*\r
3374match_groups(MatchObject* self, PyObject* args, PyObject* kw)\r
3375{\r
3376 PyObject* result;\r
3377 Py_ssize_t index;\r
3378\r
3379 PyObject* def = Py_None;\r
3380 static char* kwlist[] = { "default", NULL };\r
3381 if (!PyArg_ParseTupleAndKeywords(args, kw, "|O:groups", kwlist, &def))\r
3382 return NULL;\r
3383\r
3384 result = PyTuple_New(self->groups-1);\r
3385 if (!result)\r
3386 return NULL;\r
3387\r
3388 for (index = 1; index < self->groups; index++) {\r
3389 PyObject* item;\r
3390 item = match_getslice_by_index(self, index, def);\r
3391 if (!item) {\r
3392 Py_DECREF(result);\r
3393 return NULL;\r
3394 }\r
3395 PyTuple_SET_ITEM(result, index-1, item);\r
3396 }\r
3397\r
3398 return result;\r
3399}\r
3400\r
3401static PyObject*\r
3402match_groupdict(MatchObject* self, PyObject* args, PyObject* kw)\r
3403{\r
3404 PyObject* result;\r
3405 PyObject* keys;\r
3406 Py_ssize_t index;\r
3407\r
3408 PyObject* def = Py_None;\r
3409 static char* kwlist[] = { "default", NULL };\r
3410 if (!PyArg_ParseTupleAndKeywords(args, kw, "|O:groupdict", kwlist, &def))\r
3411 return NULL;\r
3412\r
3413 result = PyDict_New();\r
3414 if (!result || !self->pattern->groupindex)\r
3415 return result;\r
3416\r
3417 keys = PyMapping_Keys(self->pattern->groupindex);\r
3418 if (!keys)\r
3419 goto failed;\r
3420\r
3421 for (index = 0; index < PyList_GET_SIZE(keys); index++) {\r
3422 int status;\r
3423 PyObject* key;\r
3424 PyObject* value;\r
3425 key = PyList_GET_ITEM(keys, index);\r
3426 if (!key)\r
3427 goto failed;\r
3428 value = match_getslice(self, key, def);\r
3429 if (!value) {\r
3430 Py_DECREF(key);\r
3431 goto failed;\r
3432 }\r
3433 status = PyDict_SetItem(result, key, value);\r
3434 Py_DECREF(value);\r
3435 if (status < 0)\r
3436 goto failed;\r
3437 }\r
3438\r
3439 Py_DECREF(keys);\r
3440\r
3441 return result;\r
3442\r
3443failed:\r
3444 Py_XDECREF(keys);\r
3445 Py_DECREF(result);\r
3446 return NULL;\r
3447}\r
3448\r
3449static PyObject*\r
3450match_start(MatchObject* self, PyObject* args)\r
3451{\r
3452 Py_ssize_t index;\r
3453\r
3454 PyObject* index_ = Py_False; /* zero */\r
3455 if (!PyArg_UnpackTuple(args, "start", 0, 1, &index_))\r
3456 return NULL;\r
3457\r
3458 index = match_getindex(self, index_);\r
3459\r
3460 if (index < 0 || index >= self->groups) {\r
3461 PyErr_SetString(\r
3462 PyExc_IndexError,\r
3463 "no such group"\r
3464 );\r
3465 return NULL;\r
3466 }\r
3467\r
3468 /* mark is -1 if group is undefined */\r
3469 return PyInt_FromSsize_t(self->mark[index*2]);\r
3470}\r
3471\r
3472static PyObject*\r
3473match_end(MatchObject* self, PyObject* args)\r
3474{\r
3475 Py_ssize_t index;\r
3476\r
3477 PyObject* index_ = Py_False; /* zero */\r
3478 if (!PyArg_UnpackTuple(args, "end", 0, 1, &index_))\r
3479 return NULL;\r
3480\r
3481 index = match_getindex(self, index_);\r
3482\r
3483 if (index < 0 || index >= self->groups) {\r
3484 PyErr_SetString(\r
3485 PyExc_IndexError,\r
3486 "no such group"\r
3487 );\r
3488 return NULL;\r
3489 }\r
3490\r
3491 /* mark is -1 if group is undefined */\r
3492 return PyInt_FromSsize_t(self->mark[index*2+1]);\r
3493}\r
3494\r
3495LOCAL(PyObject*)\r
3496_pair(Py_ssize_t i1, Py_ssize_t i2)\r
3497{\r
3498 PyObject* pair;\r
3499 PyObject* item;\r
3500\r
3501 pair = PyTuple_New(2);\r
3502 if (!pair)\r
3503 return NULL;\r
3504\r
3505 item = PyInt_FromSsize_t(i1);\r
3506 if (!item)\r
3507 goto error;\r
3508 PyTuple_SET_ITEM(pair, 0, item);\r
3509\r
3510 item = PyInt_FromSsize_t(i2);\r
3511 if (!item)\r
3512 goto error;\r
3513 PyTuple_SET_ITEM(pair, 1, item);\r
3514\r
3515 return pair;\r
3516\r
3517 error:\r
3518 Py_DECREF(pair);\r
3519 return NULL;\r
3520}\r
3521\r
3522static PyObject*\r
3523match_span(MatchObject* self, PyObject* args)\r
3524{\r
3525 Py_ssize_t index;\r
3526\r
3527 PyObject* index_ = Py_False; /* zero */\r
3528 if (!PyArg_UnpackTuple(args, "span", 0, 1, &index_))\r
3529 return NULL;\r
3530\r
3531 index = match_getindex(self, index_);\r
3532\r
3533 if (index < 0 || index >= self->groups) {\r
3534 PyErr_SetString(\r
3535 PyExc_IndexError,\r
3536 "no such group"\r
3537 );\r
3538 return NULL;\r
3539 }\r
3540\r
3541 /* marks are -1 if group is undefined */\r
3542 return _pair(self->mark[index*2], self->mark[index*2+1]);\r
3543}\r
3544\r
3545static PyObject*\r
3546match_regs(MatchObject* self)\r
3547{\r
3548 PyObject* regs;\r
3549 PyObject* item;\r
3550 Py_ssize_t index;\r
3551\r
3552 regs = PyTuple_New(self->groups);\r
3553 if (!regs)\r
3554 return NULL;\r
3555\r
3556 for (index = 0; index < self->groups; index++) {\r
3557 item = _pair(self->mark[index*2], self->mark[index*2+1]);\r
3558 if (!item) {\r
3559 Py_DECREF(regs);\r
3560 return NULL;\r
3561 }\r
3562 PyTuple_SET_ITEM(regs, index, item);\r
3563 }\r
3564\r
3565 Py_INCREF(regs);\r
3566 self->regs = regs;\r
3567\r
3568 return regs;\r
3569}\r
3570\r
3571static PyObject*\r
3572match_copy(MatchObject* self, PyObject *unused)\r
3573{\r
3574#ifdef USE_BUILTIN_COPY\r
3575 MatchObject* copy;\r
3576 Py_ssize_t slots, offset;\r
3577\r
3578 slots = 2 * (self->pattern->groups+1);\r
3579\r
3580 copy = PyObject_NEW_VAR(MatchObject, &Match_Type, slots);\r
3581 if (!copy)\r
3582 return NULL;\r
3583\r
3584 /* this value a constant, but any compiler should be able to\r
3585 figure that out all by itself */\r
3586 offset = offsetof(MatchObject, string);\r
3587\r
3588 Py_XINCREF(self->pattern);\r
3589 Py_XINCREF(self->string);\r
3590 Py_XINCREF(self->regs);\r
3591\r
3592 memcpy((char*) copy + offset, (char*) self + offset,\r
3593 sizeof(MatchObject) + slots * sizeof(Py_ssize_t) - offset);\r
3594\r
3595 return (PyObject*) copy;\r
3596#else\r
3597 PyErr_SetString(PyExc_TypeError, "cannot copy this match object");\r
3598 return NULL;\r
3599#endif\r
3600}\r
3601\r
3602static PyObject*\r
3603match_deepcopy(MatchObject* self, PyObject* memo)\r
3604{\r
3605#ifdef USE_BUILTIN_COPY\r
3606 MatchObject* copy;\r
3607\r
3608 copy = (MatchObject*) match_copy(self);\r
3609 if (!copy)\r
3610 return NULL;\r
3611\r
3612 if (!deepcopy((PyObject**) &copy->pattern, memo) ||\r
3613 !deepcopy(&copy->string, memo) ||\r
3614 !deepcopy(&copy->regs, memo)) {\r
3615 Py_DECREF(copy);\r
3616 return NULL;\r
3617 }\r
3618\r
3619#else\r
3620 PyErr_SetString(PyExc_TypeError, "cannot deepcopy this match object");\r
3621 return NULL;\r
3622#endif\r
3623}\r
3624\r
3625PyDoc_STRVAR(match_doc,\r
3626"The result of re.match() and re.search().\n\\r
3627Match objects always have a boolean value of True.");\r
3628\r
3629PyDoc_STRVAR(match_group_doc,\r
3630"group([group1, ...]) -> str or tuple.\n\\r
3631 Return subgroup(s) of the match by indices or names.\n\\r
3632 For 0 returns the entire match.");\r
3633\r
3634PyDoc_STRVAR(match_start_doc,\r
3635"start([group=0]) -> int.\n\\r
3636 Return index of the start of the substring matched by group.");\r
3637\r
3638PyDoc_STRVAR(match_end_doc,\r
3639"end([group=0]) -> int.\n\\r
3640 Return index of the end of the substring matched by group.");\r
3641\r
3642PyDoc_STRVAR(match_span_doc,\r
3643"span([group]) -> tuple.\n\\r
3644 For MatchObject m, return the 2-tuple (m.start(group), m.end(group)).");\r
3645\r
3646PyDoc_STRVAR(match_groups_doc,\r
3647"groups([default=None]) -> tuple.\n\\r
3648 Return a tuple containing all the subgroups of the match, from 1.\n\\r
3649 The default argument is used for groups\n\\r
3650 that did not participate in the match");\r
3651\r
3652PyDoc_STRVAR(match_groupdict_doc,\r
3653"groupdict([default=None]) -> dict.\n\\r
3654 Return a dictionary containing all the named subgroups of the match,\n\\r
3655 keyed by the subgroup name. The default argument is used for groups\n\\r
3656 that did not participate in the match");\r
3657\r
3658PyDoc_STRVAR(match_expand_doc,\r
3659"expand(template) -> str.\n\\r
3660 Return the string obtained by doing backslash substitution\n\\r
3661 on the string template, as done by the sub() method.");\r
3662\r
3663static PyMethodDef match_methods[] = {\r
3664 {"group", (PyCFunction) match_group, METH_VARARGS, match_group_doc},\r
3665 {"start", (PyCFunction) match_start, METH_VARARGS, match_start_doc},\r
3666 {"end", (PyCFunction) match_end, METH_VARARGS, match_end_doc},\r
3667 {"span", (PyCFunction) match_span, METH_VARARGS, match_span_doc},\r
3668 {"groups", (PyCFunction) match_groups, METH_VARARGS|METH_KEYWORDS,\r
3669 match_groups_doc},\r
3670 {"groupdict", (PyCFunction) match_groupdict, METH_VARARGS|METH_KEYWORDS,\r
3671 match_groupdict_doc},\r
3672 {"expand", (PyCFunction) match_expand, METH_O, match_expand_doc},\r
3673 {"__copy__", (PyCFunction) match_copy, METH_NOARGS},\r
3674 {"__deepcopy__", (PyCFunction) match_deepcopy, METH_O},\r
3675 {NULL, NULL}\r
3676};\r
3677\r
3678static PyObject *\r
3679match_lastindex_get(MatchObject *self)\r
3680{\r
3681 if (self->lastindex >= 0)\r
3682 return PyInt_FromSsize_t(self->lastindex);\r
3683 Py_INCREF(Py_None);\r
3684 return Py_None;\r
3685}\r
3686\r
3687static PyObject *\r
3688match_lastgroup_get(MatchObject *self)\r
3689{\r
3690 if (self->pattern->indexgroup && self->lastindex >= 0) {\r
3691 PyObject* result = PySequence_GetItem(\r
3692 self->pattern->indexgroup, self->lastindex\r
3693 );\r
3694 if (result)\r
3695 return result;\r
3696 PyErr_Clear();\r
3697 }\r
3698 Py_INCREF(Py_None);\r
3699 return Py_None;\r
3700}\r
3701\r
3702static PyObject *\r
3703match_regs_get(MatchObject *self)\r
3704{\r
3705 if (self->regs) {\r
3706 Py_INCREF(self->regs);\r
3707 return self->regs;\r
3708 } else\r
3709 return match_regs(self);\r
3710}\r
3711\r
3712static PyGetSetDef match_getset[] = {\r
3713 {"lastindex", (getter)match_lastindex_get, (setter)NULL},\r
3714 {"lastgroup", (getter)match_lastgroup_get, (setter)NULL},\r
3715 {"regs", (getter)match_regs_get, (setter)NULL},\r
3716 {NULL}\r
3717};\r
3718\r
3719#define MATCH_OFF(x) offsetof(MatchObject, x)\r
3720static PyMemberDef match_members[] = {\r
3721 {"string", T_OBJECT, MATCH_OFF(string), READONLY},\r
3722 {"re", T_OBJECT, MATCH_OFF(pattern), READONLY},\r
3723 {"pos", T_PYSSIZET, MATCH_OFF(pos), READONLY},\r
3724 {"endpos", T_PYSSIZET, MATCH_OFF(endpos), READONLY},\r
3725 {NULL}\r
3726};\r
3727\r
3728\r
3729/* FIXME: implement setattr("string", None) as a special case (to\r
3730 detach the associated string, if any */\r
3731\r
3732static PyTypeObject Match_Type = {\r
3733 PyVarObject_HEAD_INIT(NULL, 0)\r
3734 "_" SRE_MODULE ".SRE_Match",\r
3735 sizeof(MatchObject), sizeof(Py_ssize_t),\r
3736 (destructor)match_dealloc, /* tp_dealloc */\r
3737 0, /* tp_print */\r
3738 0, /* tp_getattr */\r
3739 0, /* tp_setattr */\r
3740 0, /* tp_compare */\r
3741 0, /* tp_repr */\r
3742 0, /* tp_as_number */\r
3743 0, /* tp_as_sequence */\r
3744 0, /* tp_as_mapping */\r
3745 0, /* tp_hash */\r
3746 0, /* tp_call */\r
3747 0, /* tp_str */\r
3748 0, /* tp_getattro */\r
3749 0, /* tp_setattro */\r
3750 0, /* tp_as_buffer */\r
3751 Py_TPFLAGS_DEFAULT,\r
3752 match_doc, /* tp_doc */\r
3753 0, /* tp_traverse */\r
3754 0, /* tp_clear */\r
3755 0, /* tp_richcompare */\r
3756 0, /* tp_weaklistoffset */\r
3757 0, /* tp_iter */\r
3758 0, /* tp_iternext */\r
3759 match_methods, /* tp_methods */\r
3760 match_members, /* tp_members */\r
3761 match_getset, /* tp_getset */\r
3762};\r
3763\r
3764static PyObject*\r
3765pattern_new_match(PatternObject* pattern, SRE_STATE* state, int status)\r
3766{\r
3767 /* create match object (from state object) */\r
3768\r
3769 MatchObject* match;\r
3770 Py_ssize_t i, j;\r
3771 char* base;\r
3772 int n;\r
3773\r
3774 if (status > 0) {\r
3775\r
3776 /* create match object (with room for extra group marks) */\r
3777 /* coverity[ampersand_in_size] */\r
3778 match = PyObject_NEW_VAR(MatchObject, &Match_Type,\r
3779 2*(pattern->groups+1));\r
3780 if (!match)\r
3781 return NULL;\r
3782\r
3783 Py_INCREF(pattern);\r
3784 match->pattern = pattern;\r
3785\r
3786 Py_INCREF(state->string);\r
3787 match->string = state->string;\r
3788\r
3789 match->regs = NULL;\r
3790 match->groups = pattern->groups+1;\r
3791\r
3792 /* fill in group slices */\r
3793\r
3794 base = (char*) state->beginning;\r
3795 n = state->charsize;\r
3796\r
3797 match->mark[0] = ((char*) state->start - base) / n;\r
3798 match->mark[1] = ((char*) state->ptr - base) / n;\r
3799\r
3800 for (i = j = 0; i < pattern->groups; i++, j+=2)\r
3801 if (j+1 <= state->lastmark && state->mark[j] && state->mark[j+1]) {\r
3802 match->mark[j+2] = ((char*) state->mark[j] - base) / n;\r
3803 match->mark[j+3] = ((char*) state->mark[j+1] - base) / n;\r
3804 } else\r
3805 match->mark[j+2] = match->mark[j+3] = -1; /* undefined */\r
3806\r
3807 match->pos = state->pos;\r
3808 match->endpos = state->endpos;\r
3809\r
3810 match->lastindex = state->lastindex;\r
3811\r
3812 return (PyObject*) match;\r
3813\r
3814 } else if (status == 0) {\r
3815\r
3816 /* no match */\r
3817 Py_INCREF(Py_None);\r
3818 return Py_None;\r
3819\r
3820 }\r
3821\r
3822 /* internal error */\r
3823 pattern_error(status);\r
3824 return NULL;\r
3825}\r
3826\r
3827\r
3828/* -------------------------------------------------------------------- */\r
3829/* scanner methods (experimental) */\r
3830\r
3831static void\r
3832scanner_dealloc(ScannerObject* self)\r
3833{\r
3834 state_fini(&self->state);\r
3835 Py_XDECREF(self->pattern);\r
3836 PyObject_DEL(self);\r
3837}\r
3838\r
3839static PyObject*\r
3840scanner_match(ScannerObject* self, PyObject *unused)\r
3841{\r
3842 SRE_STATE* state = &self->state;\r
3843 PyObject* match;\r
3844 int status;\r
3845\r
3846 state_reset(state);\r
3847\r
3848 state->ptr = state->start;\r
3849\r
3850 if (state->charsize == 1) {\r
3851 status = sre_match(state, PatternObject_GetCode(self->pattern));\r
3852 } else {\r
3853#if defined(HAVE_UNICODE)\r
3854 status = sre_umatch(state, PatternObject_GetCode(self->pattern));\r
3855#endif\r
3856 }\r
3857 if (PyErr_Occurred())\r
3858 return NULL;\r
3859\r
3860 match = pattern_new_match((PatternObject*) self->pattern,\r
3861 state, status);\r
3862\r
3863 if (status == 0 || state->ptr == state->start)\r
3864 state->start = (void*) ((char*) state->ptr + state->charsize);\r
3865 else\r
3866 state->start = state->ptr;\r
3867\r
3868 return match;\r
3869}\r
3870\r
3871\r
3872static PyObject*\r
3873scanner_search(ScannerObject* self, PyObject *unused)\r
3874{\r
3875 SRE_STATE* state = &self->state;\r
3876 PyObject* match;\r
3877 int status;\r
3878\r
3879 state_reset(state);\r
3880\r
3881 state->ptr = state->start;\r
3882\r
3883 if (state->charsize == 1) {\r
3884 status = sre_search(state, PatternObject_GetCode(self->pattern));\r
3885 } else {\r
3886#if defined(HAVE_UNICODE)\r
3887 status = sre_usearch(state, PatternObject_GetCode(self->pattern));\r
3888#endif\r
3889 }\r
3890 if (PyErr_Occurred())\r
3891 return NULL;\r
3892\r
3893 match = pattern_new_match((PatternObject*) self->pattern,\r
3894 state, status);\r
3895\r
3896 if (status == 0 || state->ptr == state->start)\r
3897 state->start = (void*) ((char*) state->ptr + state->charsize);\r
3898 else\r
3899 state->start = state->ptr;\r
3900\r
3901 return match;\r
3902}\r
3903\r
3904static PyMethodDef scanner_methods[] = {\r
3905 {"match", (PyCFunction) scanner_match, METH_NOARGS},\r
3906 {"search", (PyCFunction) scanner_search, METH_NOARGS},\r
3907 {NULL, NULL}\r
3908};\r
3909\r
3910#define SCAN_OFF(x) offsetof(ScannerObject, x)\r
3911static PyMemberDef scanner_members[] = {\r
3912 {"pattern", T_OBJECT, SCAN_OFF(pattern), READONLY},\r
3913 {NULL} /* Sentinel */\r
3914};\r
3915\r
3916statichere PyTypeObject Scanner_Type = {\r
3917 PyObject_HEAD_INIT(NULL)\r
3918 0, "_" SRE_MODULE ".SRE_Scanner",\r
3919 sizeof(ScannerObject), 0,\r
3920 (destructor)scanner_dealloc, /*tp_dealloc*/\r
3921 0, /* tp_print */\r
3922 0, /* tp_getattr */\r
3923 0, /* tp_setattr */\r
3924 0, /* tp_reserved */\r
3925 0, /* tp_repr */\r
3926 0, /* tp_as_number */\r
3927 0, /* tp_as_sequence */\r
3928 0, /* tp_as_mapping */\r
3929 0, /* tp_hash */\r
3930 0, /* tp_call */\r
3931 0, /* tp_str */\r
3932 0, /* tp_getattro */\r
3933 0, /* tp_setattro */\r
3934 0, /* tp_as_buffer */\r
3935 Py_TPFLAGS_DEFAULT, /* tp_flags */\r
3936 0, /* tp_doc */\r
3937 0, /* tp_traverse */\r
3938 0, /* tp_clear */\r
3939 0, /* tp_richcompare */\r
3940 0, /* tp_weaklistoffset */\r
3941 0, /* tp_iter */\r
3942 0, /* tp_iternext */\r
3943 scanner_methods, /* tp_methods */\r
3944 scanner_members, /* tp_members */\r
3945 0, /* tp_getset */\r
3946};\r
3947\r
3948static PyObject*\r
3949pattern_scanner(PatternObject* pattern, PyObject* args)\r
3950{\r
3951 /* create search state object */\r
3952\r
3953 ScannerObject* self;\r
3954\r
3955 PyObject* string;\r
3956 Py_ssize_t start = 0;\r
3957 Py_ssize_t end = PY_SSIZE_T_MAX;\r
3958 if (!PyArg_ParseTuple(args, "O|nn:scanner", &string, &start, &end))\r
3959 return NULL;\r
3960\r
3961 /* create scanner object */\r
3962 self = PyObject_NEW(ScannerObject, &Scanner_Type);\r
3963 if (!self)\r
3964 return NULL;\r
3965 self->pattern = NULL;\r
3966\r
3967 string = state_init(&self->state, pattern, string, start, end);\r
3968 if (!string) {\r
3969 Py_DECREF(self);\r
3970 return NULL;\r
3971 }\r
3972\r
3973 Py_INCREF(pattern);\r
3974 self->pattern = (PyObject*) pattern;\r
3975\r
3976 return (PyObject*) self;\r
3977}\r
3978\r
3979static PyMethodDef _functions[] = {\r
3980 {"compile", _compile, METH_VARARGS},\r
3981 {"getcodesize", sre_codesize, METH_NOARGS},\r
3982 {"getlower", sre_getlower, METH_VARARGS},\r
3983 {NULL, NULL}\r
3984};\r
3985\r
3986#if PY_VERSION_HEX < 0x02030000\r
3987DL_EXPORT(void) init_sre(void)\r
3988#else\r
3989PyMODINIT_FUNC init_sre(void)\r
3990#endif\r
3991{\r
3992 PyObject* m;\r
3993 PyObject* d;\r
3994 PyObject* x;\r
3995\r
3996 /* Patch object types */\r
3997 if (PyType_Ready(&Pattern_Type) || PyType_Ready(&Match_Type) ||\r
3998 PyType_Ready(&Scanner_Type))\r
3999 return;\r
4000\r
4001 m = Py_InitModule("_" SRE_MODULE, _functions);\r
4002 if (m == NULL)\r
4003 return;\r
4004 d = PyModule_GetDict(m);\r
4005\r
4006 x = PyInt_FromLong(SRE_MAGIC);\r
4007 if (x) {\r
4008 PyDict_SetItemString(d, "MAGIC", x);\r
4009 Py_DECREF(x);\r
4010 }\r
4011\r
4012 x = PyInt_FromLong(sizeof(SRE_CODE));\r
4013 if (x) {\r
4014 PyDict_SetItemString(d, "CODESIZE", x);\r
4015 Py_DECREF(x);\r
4016 }\r
4017\r
4018 x = PyLong_FromUnsignedLong(SRE_MAXREPEAT);\r
4019 if (x) {\r
4020 PyDict_SetItemString(d, "MAXREPEAT", x);\r
4021 Py_DECREF(x);\r
4022 }\r
4023\r
4024 x = PyString_FromString(copyright);\r
4025 if (x) {\r
4026 PyDict_SetItemString(d, "copyright", x);\r
4027 Py_DECREF(x);\r
4028 }\r
4029}\r
4030\r
4031#endif /* !defined(SRE_RECURSIVE) */\r
4032\r
4033/* vim:ts=4:sw=4:et\r
4034*/\r
EFI Development Kit II mirror for PVE