0000: 0d 0a 23 69 6e 63 6c 75 64 65 20 22 73 74 64 61 ..#include "stda
0010: 66 78 2e 68 22 0d 0a 23 69 6e 63 6c 75 64 65 20 fx.h"..#include
0020: 22 52 53 65 61 72 63 68 2e 68 22 0d 0a 23 69 6e "RSearch.h"..#in
0030: 63 6c 75 64 65 20 22 6b 69 6c 69 62 2f 6b 74 6c clude "kilib/ktl
0040: 61 70 74 72 2e 68 22 0d 0a 75 73 69 6e 67 20 6e aptr.h"..using n
0050: 61 6d 65 73 70 61 63 65 20 6b 69 3b 0d 0a 0d 0a amespace ki;....
0060: 0d 0a 0d 0a 2f 2f 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ....//==========
0070: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0080: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0090: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
00a0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0d ===============.
00b0: 0a 2f 2f 40 7b 0d 0a 2f 2f 09 95 b6 8e 9a 82 cc .//@{..//.......
00c0: 8e ed 97 de 0d 0a 2f 2f 40 7d 0d 0a 2f 2f 3d 3d ......//@}..//==
00d0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
00e0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
00f0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0100: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0110: 3d 3d 3d 3d 3d 3d 3d 0d 0a 0d 0a 65 6e 75 6d 20 =======....enum
0120: 52 65 67 54 6f 6b 65 6e 0d 0a 7b 0d 0a 09 52 5f RegToken..{...R_
0130: 43 68 61 72 2c 20 20 2f 2f 20 95 81 92 ca 82 cc Char, // ......
0140: 95 b6 8e 9a 0d 0a 09 52 5f 41 6e 79 2c 20 20 20 .......R_Any,
0150: 2f 2f 20 27 2e 27 0d 0a 09 52 5f 4c 63 6c 2c 20 // '.'...R_Lcl,
0160: 20 20 2f 2f 20 27 5b 27 0d 0a 09 52 5f 52 63 6c // '['...R_Rcl
0170: 2c 20 20 20 2f 2f 20 27 5d 27 0d 0a 09 52 5f 4e , // ']'...R_N
0180: 63 6c 2c 20 20 20 2f 2f 20 27 5e 27 0d 0a 09 52 cl, // '^'...R
0190: 5f 52 61 6e 67 65 2c 20 2f 2f 20 27 2d 27 0d 0a _Range, // '-'..
01a0: 09 52 5f 4c 62 72 2c 20 20 20 2f 2f 20 27 28 27 .R_Lbr, // '('
01b0: 0d 0a 09 52 5f 52 62 72 2c 20 20 20 2f 2f 20 27 ...R_Rbr, // '
01c0: 29 27 0d 0a 09 52 5f 42 61 72 2c 20 20 20 2f 2f )'...R_Bar, //
01d0: 20 27 7c 27 0d 0a 09 52 5f 53 74 61 72 2c 20 20 '|'...R_Star,
01e0: 2f 2f 20 27 2a 27 0d 0a 09 52 5f 50 6c 75 73 2c // '*'...R_Plus,
01f0: 20 20 2f 2f 20 27 2b 27 0d 0a 09 52 5f 51 75 65 // '+'...R_Que
0200: 73 74 2c 20 2f 2f 20 27 3f 27 0d 0a 09 52 5f 45 st, // '?'...R_E
0210: 6e 64 20 20 20 20 2f 2f 20 27 5c 30 27 0d 0a 7d nd // '\0'..}
0220: 3b 0d 0a 0d 0a 0d 0a 0d 0a 2f 2f 3d 3d 3d 3d 3d ;........//=====
0230: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0240: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0250: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0260: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0270: 3d 3d 3d 3d 0d 0a 2f 2f 40 7b 0d 0a 2f 2f 09 83 ====..//@{..//..
0280: 67 81 5b 83 4e 83 93 82 c9 95 aa 89 f0 0d 0a 2f g.[.N........../
0290: 2f 0d 0a 2f 2f 09 8d 73 93 aa 82 f0 95 5c 82 b7 /..//..s.....\..
02a0: 5e 82 c6 8d 73 96 96 82 f0 95 5c 82 b7 24 82 c9 ^...s.....\..$..
02b0: 82 c2 82 a2 82 c4 82 cd 8f e3 88 ca 91 77 82 c5 .............w..
02c0: 8a e6 92 a3 82 e9 0d 0a 2f 2f 40 7d 0d 0a 2f 2f ........//@}..//
02d0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
02e0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
02f0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0300: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0310: 3d 3d 3d 3d 3d 3d 3d 3d 3d 0d 0a 0d 0a 63 6c 61 =========....cla
0320: 73 73 20 52 65 67 4c 65 78 65 72 0d 0a 7b 0d 0a ss RegLexer..{..
0330: 70 75 62 6c 69 63 3a 0d 0a 09 52 65 67 4c 65 78 public:...RegLex
0340: 65 72 28 20 63 6f 6e 73 74 20 77 63 68 61 72 5f er( const wchar_
0350: 74 2a 20 70 61 74 2c 20 75 6c 6f 6e 67 20 6c 65 t* pat, ulong le
0360: 6e 20 29 3b 0d 0a 09 52 65 67 54 6f 6b 65 6e 20 n );...RegToken
0370: 47 65 74 54 6f 6b 65 6e 28 29 3b 0d 0a 09 77 63 GetToken();...wc
0380: 68 61 72 5f 74 20 20 47 65 74 43 68 61 72 28 29 har_t GetChar()
0390: 20 7b 20 72 65 74 75 72 6e 20 63 68 72 5f 3b 20 { return chr_;
03a0: 7d 0d 0a 0d 0a 70 72 69 76 61 74 65 3a 0d 0a 09 }....private:...
03b0: 63 6f 6e 73 74 20 77 63 68 61 72 5f 74 2a 20 70 const wchar_t* p
03c0: 61 74 5f 3b 0d 0a 09 63 6f 6e 73 74 20 77 63 68 at_;...const wch
03d0: 61 72 5f 74 2a 20 65 6e 64 5f 3b 0d 0a 09 63 6f ar_t* end_;...co
03e0: 6e 73 74 20 77 63 68 61 72 5f 74 2a 20 73 75 62 nst wchar_t* sub
03f0: 5f 3b 0d 0a 09 77 63 68 61 72 5f 74 20 20 20 20 _;...wchar_t
0400: 20 20 20 20 63 68 72 5f 3b 0d 0a 7d 3b 0d 0a 0d chr_;..};...
0410: 0a 0d 0a 0d 0a 2f 2f 3d 3d 3d 3d 3d 3d 3d 3d 3d .....//=========
0420: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0430: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0440: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0450: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0460: 0d 0a 2f 2f 40 7b 0d 0a 2f 2f 09 83 67 81 5b 83 ..//@{..//..g.[.
0470: 4e 83 93 82 c9 95 aa 89 f0 81 46 8e c0 91 95 0d N.........F.....
0480: 0a 2f 2f 40 7d 0d 0a 2f 2f 3d 3d 3d 3d 3d 3d 3d .//@}..//=======
0490: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
04a0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
04b0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
04c0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
04d0: 3d 3d 0d 0a 0d 0a 69 6e 6c 69 6e 65 20 52 65 67 ==....inline Reg
04e0: 4c 65 78 65 72 3a 3a 52 65 67 4c 65 78 65 72 28 Lexer::RegLexer(
04f0: 20 63 6f 6e 73 74 20 77 63 68 61 72 5f 74 2a 20 const wchar_t*
0500: 70 61 74 2c 20 75 6c 6f 6e 67 20 6c 65 6e 20 29 pat, ulong len )
0510: 0d 0a 09 3a 20 70 61 74 5f 28 20 70 61 74 20 29 ...: pat_( pat )
0520: 0d 0a 09 2c 20 65 6e 64 5f 28 20 70 61 74 2b 6c ..., end_( pat+l
0530: 65 6e 20 29 0d 0a 09 2c 20 73 75 62 5f 28 20 4c en )..., sub_( L
0540: 22 22 20 29 0d 0a 7b 0d 0a 7d 0d 0a 0d 0a 52 65 "" )..{..}....Re
0550: 67 54 6f 6b 65 6e 20 52 65 67 4c 65 78 65 72 3a gToken RegLexer:
0560: 3a 47 65 74 54 6f 6b 65 6e 28 29 0d 0a 7b 0d 0a :GetToken()..{..
0570: 09 63 6f 6e 73 74 20 77 63 68 61 72 5f 74 2a 26 .const wchar_t*&
0580: 20 78 20 3d 20 28 2a 73 75 62 5f 20 3f 20 73 75 x = (*sub_ ? su
0590: 62 5f 20 3a 20 70 61 74 5f 29 3b 0d 0a 09 69 66 b_ : pat_);...if
05a0: 28 20 78 20 3d 3d 20 65 6e 64 5f 20 29 20 72 65 ( x == end_ ) re
05b0: 74 75 72 6e 20 52 5f 45 6e 64 3b 0d 0a 09 73 77 turn R_End;...sw
05c0: 69 74 63 68 28 20 2a 78 2b 2b 20 29 0d 0a 09 7b itch( *x++ )...{
05d0: 0d 0a 09 63 61 73 65 20 4c 27 2e 27 3a 20 72 65 ...case L'.': re
05e0: 74 75 72 6e 20 52 5f 41 6e 79 3b 0d 0a 09 63 61 turn R_Any;...ca
05f0: 73 65 20 4c 27 5b 27 3a 20 72 65 74 75 72 6e 20 se L'[': return
0600: 52 5f 4c 63 6c 3b 0d 0a 09 63 61 73 65 20 4c 27 R_Lcl;...case L'
0610: 5d 27 3a 20 72 65 74 75 72 6e 20 52 5f 52 63 6c ]': return R_Rcl
0620: 3b 0d 0a 09 63 61 73 65 20 4c 27 5e 27 3a 20 72 ;...case L'^': r
0630: 65 74 75 72 6e 20 52 5f 4e 63 6c 3b 0d 0a 09 63 eturn R_Ncl;...c
0640: 61 73 65 20 4c 27 2d 27 3a 20 72 65 74 75 72 6e ase L'-': return
0650: 20 52 5f 52 61 6e 67 65 3b 0d 0a 09 63 61 73 65 R_Range;...case
0660: 20 4c 27 28 27 3a 20 72 65 74 75 72 6e 20 52 5f L'(': return R_
0670: 4c 62 72 3b 0d 0a 09 63 61 73 65 20 4c 27 29 27 Lbr;...case L')'
0680: 3a 20 72 65 74 75 72 6e 20 52 5f 52 62 72 3b 0d : return R_Rbr;.
0690: 0a 09 63 61 73 65 20 4c 27 7c 27 3a 20 72 65 74 ..case L'|': ret
06a0: 75 72 6e 20 52 5f 42 61 72 3b 0d 0a 09 63 61 73 urn R_Bar;...cas
06b0: 65 20 4c 27 2a 27 3a 20 72 65 74 75 72 6e 20 52 e L'*': return R
06c0: 5f 53 74 61 72 3b 0d 0a 09 63 61 73 65 20 4c 27 _Star;...case L'
06d0: 2b 27 3a 20 72 65 74 75 72 6e 20 52 5f 50 6c 75 +': return R_Plu
06e0: 73 3b 0d 0a 09 63 61 73 65 20 4c 27 3f 27 3a 20 s;...case L'?':
06f0: 72 65 74 75 72 6e 20 52 5f 51 75 65 73 74 3b 0d return R_Quest;.
0700: 0a 09 63 61 73 65 20 4c 27 5c 5c 27 3a 20 69 66 ..case L'\\': if
0710: 28 20 78 3d 3d 65 6e 64 5f 20 29 20 72 65 74 75 ( x==end_ ) retu
0720: 72 6e 20 52 5f 45 6e 64 3b 20 73 77 69 74 63 68 rn R_End; switch
0730: 28 20 2a 78 2b 2b 20 29 20 7b 0d 0a 09 09 63 61 ( *x++ ) {....ca
0740: 73 65 20 4c 27 74 27 3a 20 63 68 72 5f 3d 4c 27 se L't': chr_=L'
0750: 5c 74 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 \t';
0760: 72 65 74 75 72 6e 20 52 5f 43 68 61 72 3b 0d 0a return R_Char;..
0770: 09 09 63 61 73 65 20 4c 27 77 27 3a 20 73 75 62 ..case L'w': sub
0780: 5f 3d 4c 22 5b 30 2d 39 61 2d 7a 41 2d 5a 5f 5d _=L"[0-9a-zA-Z_]
0790: 22 3b 20 20 72 65 74 75 72 6e 20 47 65 74 54 6f "; return GetTo
07a0: 6b 65 6e 28 29 3b 0d 0a 09 09 63 61 73 65 20 4c ken();....case L
07b0: 27 57 27 3a 20 73 75 62 5f 3d 4c 22 5b 5e 30 2d 'W': sub_=L"[^0-
07c0: 39 61 2d 7a 41 2d 5a 5f 5d 22 3b 20 72 65 74 75 9a-zA-Z_]"; retu
07d0: 72 6e 20 47 65 74 54 6f 6b 65 6e 28 29 3b 0d 0a rn GetToken();..
07e0: 09 09 63 61 73 65 20 4c 27 64 27 3a 20 73 75 62 ..case L'd': sub
07f0: 5f 3d 4c 22 5b 30 2d 39 5d 22 3b 20 20 20 20 20 _=L"[0-9]";
0800: 20 20 20 20 72 65 74 75 72 6e 20 47 65 74 54 6f return GetTo
0810: 6b 65 6e 28 29 3b 0d 0a 09 09 63 61 73 65 20 4c ken();....case L
0820: 27 44 27 3a 20 73 75 62 5f 3d 4c 22 5b 5e 30 2d 'D': sub_=L"[^0-
0830: 39 5d 22 3b 20 20 20 20 20 20 20 20 72 65 74 75 9]"; retu
0840: 72 6e 20 47 65 74 54 6f 6b 65 6e 28 29 3b 0d 0a rn GetToken();..
0850: 09 09 63 61 73 65 20 4c 27 73 27 3a 20 73 75 62 ..case L's': sub
0860: 5f 3d 4c 22 5b 5c 74 20 5d 22 3b 20 20 20 20 20 _=L"[\t ]";
0870: 20 20 20 20 72 65 74 75 72 6e 20 47 65 74 54 6f return GetTo
0880: 6b 65 6e 28 29 3b 0d 0a 09 09 63 61 73 65 20 4c ken();....case L
0890: 27 53 27 3a 20 73 75 62 5f 3d 4c 22 5b 5e 5c 74 'S': sub_=L"[^\t
08a0: 20 5d 22 3b 20 20 20 20 20 20 20 20 72 65 74 75 ]"; retu
08b0: 72 6e 20 47 65 74 54 6f 6b 65 6e 28 29 3b 0d 0a rn GetToken();..
08c0: 09 09 7d 20 2f 2f 20 66 61 6c 6c 20 74 68 72 6f ..} // fall thro
08d0: 75 67 68 2e 2e 2e 0d 0a 09 64 65 66 61 75 6c 74 ugh......default
08e0: 3a 0d 0a 09 09 63 68 72 5f 20 3d 20 2a 28 78 2d :....chr_ = *(x-
08f0: 31 29 3b 0d 0a 09 09 72 65 74 75 72 6e 20 52 5f 1);....return R_
0900: 43 68 61 72 3b 0d 0a 09 7d 0d 0a 7d 0d 0a 0d 0a Char;...}..}....
0910: 0d 0a 0d 0a 2f 2f 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ....//==========
0920: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0930: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0940: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0950: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0d ===============.
0960: 0a 2f 2f 40 7b 0d 0a 2f 2f 09 8d 5c 95 b6 96 d8 .//@{..//..\....
0970: 82 cc 83 6d 81 5b 83 68 82 c9 90 55 82 e7 82 ea ...m.[.h...U....
0980: 82 e9 92 6c 82 cc 8e ed 97 de 0d 0a 2f 2f 40 7d ...l........//@}
0990: 0d 0a 2f 2f 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ..//============
09a0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
09b0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
09c0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
09d0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0d 0a 0d =============...
09e0: 0a 65 6e 75 6d 20 52 65 67 54 79 70 65 0d 0a 7b .enum RegType..{
09f0: 0d 0a 09 4e 5f 43 68 61 72 2c 20 20 20 20 20 2f ...N_Char, /
0a00: 2f 20 95 81 92 ca 82 cc 95 b6 8e 9a 20 28 63 68 / .......... (ch
0a10: 29 0d 0a 09 4e 5f 43 6c 61 73 73 2c 20 20 20 20 )...N_Class,
0a20: 2f 2f 20 5b 2e 2e 2e 5d 20 82 c8 82 c7 20 28 63 // [...] .... (c
0a30: 6c 73 29 0d 0a 09 4e 5f 43 6f 6e 63 61 74 2c 20 ls)...N_Concat,
0a40: 20 20 2f 2f 20 98 41 90 da 20 20 20 20 20 20 20 // .A..
0a50: 28 6c 65 66 74 2c 20 72 69 67 68 74 29 0d 0a 09 (left, right)...
0a60: 4e 5f 4f 72 2c 20 20 20 20 20 20 20 2f 2f 20 7c N_Or, // |
0a70: 20 20 20 20 20 20 20 20 20 20 28 6c 65 66 74 2c (left,
0a80: 20 72 69 67 68 74 29 0d 0a 09 4e 5f 43 6c 6f 73 right)...N_Clos
0a90: 75 72 65 2c 20 20 2f 2f 20 2a 20 20 20 20 20 20 ure, // *
0aa0: 20 20 20 20 28 6c 65 66 74 29 0d 0a 09 4e 5f 43 (left)...N_C
0ab0: 6c 6f 73 75 72 65 31 2c 20 2f 2f 20 2b 20 20 20 losure1, // +
0ac0: 20 20 20 20 20 20 20 28 6c 65 66 74 29 0d 0a 09 (left)...
0ad0: 4e 5f 30 31 2c 20 20 20 20 20 20 20 2f 2f 20 3f N_01, // ?
0ae0: 20 20 20 20 20 20 20 20 20 20 28 6c 65 66 74 29 (left)
0af0: 0d 0a 09 4e 5f 45 6d 70 74 79 20 20 20 20 20 2f ...N_Empty /
0b00: 2f 20 8b f3 20 20 20 20 20 20 20 20 20 28 2d 2d / .. (--
0b10: 29 0d 0a 7d 3b 0d 0a 0d 0a 73 74 72 75 63 74 20 )..};....struct
0b20: 52 65 67 43 6c 61 73 73 0d 0a 7b 0d 0a 09 73 74 RegClass..{...st
0b30: 72 75 63 74 20 4f 6e 65 52 61 6e 67 65 0d 0a 09 ruct OneRange...
0b40: 7b 0d 0a 09 09 77 63 68 61 72 5f 74 20 73 74 74 {....wchar_t stt
0b50: 3b 0d 0a 09 09 77 63 68 61 72 5f 74 20 65 6e 64 ;....wchar_t end
0b60: 3b 0d 0a 09 7d 3b 0d 0a 09 4f 6e 65 52 61 6e 67 ;...};...OneRang
0b70: 65 20 20 20 20 20 20 72 61 6e 67 65 3b 0d 0a 09 e range;...
0b80: 61 70 74 72 3c 52 65 67 43 6c 61 73 73 3e 20 6e aptr<RegClass> n
0b90: 65 78 74 3b 0d 0a 09 52 65 67 43 6c 61 73 73 28 ext;...RegClass(
0ba0: 20 77 63 68 61 72 5f 74 20 73 2c 20 77 63 68 61 wchar_t s, wcha
0bb0: 72 5f 74 20 65 2c 20 52 65 67 43 6c 61 73 73 2a r_t e, RegClass*
0bc0: 20 6e 20 29 0d 0a 09 09 7b 20 61 70 74 72 3c 52 n )....{ aptr<R
0bd0: 65 67 43 6c 61 73 73 3e 20 61 6e 28 6e 29 3b 20 egClass> an(n);
0be0: 72 61 6e 67 65 2e 73 74 74 3d 73 2c 20 72 61 6e range.stt=s, ran
0bf0: 67 65 2e 65 6e 64 3d 65 2c 20 6e 65 78 74 3d 61 ge.end=e, next=a
0c00: 6e 3b 20 7d 0d 0a 7d 3b 0d 0a 0d 0a 73 74 72 75 n; }..};....stru
0c10: 63 74 20 52 65 67 4e 6f 64 65 0d 0a 7b 0d 0a 09 ct RegNode..{...
0c20: 52 65 67 54 79 70 65 20 20 20 20 20 20 20 20 20 RegType
0c30: 20 20 74 79 70 65 3b 20 2f 2f 20 82 b1 82 cc 83 type; // .....
0c40: 6d 81 5b 83 68 82 cc 8e ed 97 de 0d 0a 09 77 63 m.[.h.........wc
0c50: 68 61 72 5f 74 20 20 20 20 20 20 20 20 20 20 20 har_t
0c60: 20 20 63 68 3b 20 2f 2f 20 95 b6 8e 9a 0d 0a 09 ch; // .......
0c70: 61 70 74 72 3c 52 65 67 43 6c 61 73 73 3e 20 20 aptr<RegClass>
0c80: 20 20 20 63 6c 73 3b 20 2f 2f 20 95 b6 8e 9a 8f cls; // .....
0c90: 57 8d 87 0d 0a 09 62 6f 6f 6c 20 20 20 20 20 20 W.....bool
0ca0: 20 20 20 20 20 20 63 6d 70 63 6c 73 3b 20 2f 2f cmpcls; //
0cb0: 20 81 aa 95 e2 8f 57 8d 87 82 a9 82 c7 82 a4 82 .....W.........
0cc0: a9 0d 0a 09 64 70 74 72 3c 52 65 67 4e 6f 64 65 ....dptr<RegNode
0cd0: 3e 20 20 20 20 20 6c 65 66 74 3b 20 2f 2f 20 8d > left; // .
0ce0: b6 82 cc 8e 71 0d 0a 09 64 70 74 72 3c 52 65 67 ....q...dptr<Reg
0cf0: 4e 6f 64 65 3e 20 20 20 20 72 69 67 68 74 3b 20 Node> right;
0d00: 2f 2f 20 89 45 82 cc 8e 71 0d 0a 7d 3b 0d 0a 0d // .E...q..};...
0d10: 0a 0d 0a 0d 0a 2f 2f 3d 3d 3d 3d 3d 3d 3d 3d 3d .....//=========
0d20: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0d30: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0d40: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0d50: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0d60: 0d 0a 2f 2f 40 7b 0d 0a 2f 2f 09 8d 5c 95 b6 96 ..//@{..//..\...
0d70: d8 8d ec 90 ac 0d 0a 2f 2f 40 7d 0d 0a 2f 2f 3d .......//@}..//=
0d80: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0d90: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0da0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0db0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0dc0: 3d 3d 3d 3d 3d 3d 3d 3d 0d 0a 0d 0a 63 6c 61 73 ========....clas
0dd0: 73 20 52 65 67 50 61 72 73 65 72 0d 0a 7b 0d 0a s RegParser..{..
0de0: 70 75 62 6c 69 63 3a 0d 0a 09 52 65 67 50 61 72 public:...RegPar
0df0: 73 65 72 28 20 63 6f 6e 73 74 20 75 6e 69 63 6f ser( const unico
0e00: 64 65 2a 20 70 61 74 20 29 3b 0d 0a 09 52 65 67 de* pat );...Reg
0e10: 4e 6f 64 65 2a 20 72 6f 6f 74 28 29 20 7b 20 72 Node* root() { r
0e20: 65 74 75 72 6e 20 72 6f 6f 74 5f 2e 67 65 74 28 eturn root_.get(
0e30: 29 3b 20 7d 0d 0a 09 62 6f 6f 6c 20 65 72 72 28 ); }...bool err(
0e40: 29 20 7b 20 72 65 74 75 72 6e 20 65 72 72 5f 3b ) { return err_;
0e50: 20 7d 0d 0a 09 62 6f 6f 6c 20 69 73 48 65 61 64 }...bool isHead
0e60: 54 79 70 65 28 29 20 63 6f 6e 73 74 20 7b 20 72 Type() const { r
0e70: 65 74 75 72 6e 20 69 73 48 65 61 64 54 79 70 65 eturn isHeadType
0e80: 5f 3b 20 7d 0d 0a 09 62 6f 6f 6c 20 69 73 54 61 _; }...bool isTa
0e90: 69 6c 54 79 70 65 28 29 20 63 6f 6e 73 74 20 7b ilType() const {
0ea0: 20 72 65 74 75 72 6e 20 69 73 54 61 69 6c 54 79 return isTailTy
0eb0: 70 65 5f 3b 20 7d 0d 0a 0d 0a 70 72 69 76 61 74 pe_; }....privat
0ec0: 65 3a 0d 0a 09 52 65 67 4e 6f 64 65 2a 20 6d 61 e:...RegNode* ma
0ed0: 6b 65 5f 65 6d 70 74 79 5f 6c 65 61 66 28 29 3b ke_empty_leaf();
0ee0: 0d 0a 09 52 65 67 4e 6f 64 65 2a 20 6d 61 6b 65 ...RegNode* make
0ef0: 5f 63 68 61 72 5f 6c 65 61 66 28 20 77 63 68 61 _char_leaf( wcha
0f00: 72 5f 74 20 63 20 29 3b 0d 0a 09 52 65 67 4e 6f r_t c );...RegNo
0f10: 64 65 2a 20 6d 61 6b 65 5f 6e 6f 64 65 28 20 52 de* make_node( R
0f20: 65 67 54 79 70 65 20 74 2c 20 52 65 67 4e 6f 64 egType t, RegNod
0f30: 65 2a 20 6c 66 74 2c 20 52 65 67 4e 6f 64 65 2a e* lft, RegNode*
0f40: 20 72 68 74 20 29 3b 0d 0a 09 76 6f 69 64 20 65 rht );...void e
0f50: 61 74 5f 74 6f 6b 65 6e 28 29 3b 0d 0a 09 52 65 at_token();...Re
0f60: 67 4e 6f 64 65 2a 20 65 78 70 72 28 29 3b 0d 0a gNode* expr();..
0f70: 09 52 65 67 4e 6f 64 65 2a 20 74 65 72 6d 28 29 .RegNode* term()
0f80: 3b 0d 0a 09 52 65 67 4e 6f 64 65 2a 20 66 61 63 ;...RegNode* fac
0f90: 74 6f 72 28 29 3b 0d 0a 09 52 65 67 4e 6f 64 65 tor();...RegNode
0fa0: 2a 20 70 72 69 6d 61 72 79 28 29 3b 0d 0a 09 52 * primary();...R
0fb0: 65 67 4e 6f 64 65 2a 20 72 65 63 6c 61 73 73 28 egNode* reclass(
0fc0: 29 3b 0d 0a 0d 0a 70 72 69 76 61 74 65 3a 0d 0a );....private:..
0fd0: 09 62 6f 6f 6c 20 20 20 20 65 72 72 5f 3b 0d 0a .bool err_;..
0fe0: 09 62 6f 6f 6c 20 20 20 20 69 73 48 65 61 64 54 .bool isHeadT
0ff0: 79 70 65 5f 3b 0d 0a 09 62 6f 6f 6c 20 20 20 20 ype_;...bool
1000: 69 73 54 61 69 6c 54 79 70 65 5f 3b 0d 0a 09 64 isTailType_;...d
1010: 70 74 72 3c 52 65 67 4e 6f 64 65 3e 20 72 6f 6f ptr<RegNode> roo
1020: 74 5f 3b 0d 0a 0d 0a 09 52 65 67 4c 65 78 65 72 t_;.....RegLexer
1030: 20 6c 65 78 5f 3b 0d 0a 09 52 65 67 54 6f 6b 65 lex_;...RegToke
1040: 6e 20 6e 65 78 74 54 6f 6b 65 6e 5f 3b 0d 0a 7d n nextToken_;..}
1050: 3b 0d 0a 0d 0a 0d 0a 0d 0a 2f 2f 3d 3d 3d 3d 3d ;........//=====
1060: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
1070: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
1080: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
1090: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
10a0: 3d 3d 3d 3d 0d 0a 2f 2f 40 7b 0d 0a 2f 2f 09 8d ====..//@{..//..
10b0: 5c 95 b6 96 d8 8d ec 90 ac 81 46 8e c0 91 95 0d \.........F.....
10c0: 0a 2f 2f 40 7d 0d 0a 2f 2f 3d 3d 3d 3d 3d 3d 3d .//@}..//=======
10d0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
10e0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
10f0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
1100: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
1110: 3d 3d 0d 0a 0d 0a 6e 61 6d 65 73 70 61 63 65 20 ==....namespace
1120: 7b 20 73 74 61 74 69 63 20 69 6e 74 20 74 6d 70 { static int tmp
1130: 3b 20 7d 0d 0a 0d 0a 69 6e 6c 69 6e 65 20 52 65 ; }....inline Re
1140: 67 50 61 72 73 65 72 3a 3a 52 65 67 50 61 72 73 gParser::RegPars
1150: 65 72 28 20 63 6f 6e 73 74 20 75 6e 69 63 6f 64 er( const unicod
1160: 65 2a 20 70 61 74 20 29 0d 0a 09 3a 20 65 72 72 e* pat )...: err
1170: 5f 20 20 20 20 20 20 20 28 20 66 61 6c 73 65 20 _ ( false
1180: 29 0d 0a 09 2c 20 69 73 48 65 61 64 54 79 70 65 )..., isHeadType
1190: 5f 28 20 2a 70 61 74 3d 3d 4c 27 5e 27 20 29 0d _( *pat==L'^' ).
11a0: 0a 09 2c 20 69 73 54 61 69 6c 54 79 70 65 5f 28 .., isTailType_(
11b0: 20 28 74 6d 70 3d 6d 79 5f 6c 73 74 72 6c 65 6e (tmp=my_lstrlen
11c0: 57 28 70 61 74 29 2c 20 74 6d 70 20 26 26 20 70 W(pat), tmp && p
11d0: 61 74 5b 74 6d 70 2d 31 5d 3d 3d 4c 27 24 27 29 at[tmp-1]==L'$')
11e0: 20 29 0d 0a 09 2c 20 6c 65 78 5f 28 0d 0a 09 09 )..., lex_(....
11f0: 28 69 73 48 65 61 64 54 79 70 65 5f 20 3f 20 70 (isHeadType_ ? p
1200: 61 74 2b 31 20 3a 20 70 61 74 29 2c 0d 0a 09 09 at+1 : pat),....
1210: 28 6d 79 5f 6c 73 74 72 6c 65 6e 57 28 70 61 74 (my_lstrlenW(pat
1220: 29 20 2d 20 28 69 73 48 65 61 64 54 79 70 65 5f ) - (isHeadType_
1230: 20 3f 20 31 20 3a 20 30 29 0d 0a 09 09 20 20 20 ? 1 : 0)....
1240: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2d -
1250: 20 28 69 73 54 61 69 6c 54 79 70 65 5f 20 3f 20 (isTailType_ ?
1260: 31 20 3a 20 30 29 29 20 29 0d 0a 7b 0d 0a 09 65 1 : 0)) )..{...e
1270: 61 74 5f 74 6f 6b 65 6e 28 29 3b 0d 0a 09 72 6f at_token();...ro
1280: 6f 74 5f 20 3d 20 65 78 70 72 28 29 3b 0d 0a 7d ot_ = expr();..}
1290: 0d 0a 0d 0a 69 6e 6c 69 6e 65 20 76 6f 69 64 20 ....inline void
12a0: 52 65 67 50 61 72 73 65 72 3a 3a 65 61 74 5f 74 RegParser::eat_t
12b0: 6f 6b 65 6e 28 29 0d 0a 7b 0d 0a 09 6e 65 78 74 oken()..{...next
12c0: 54 6f 6b 65 6e 5f 20 3d 20 6c 65 78 5f 2e 47 65 Token_ = lex_.Ge
12d0: 74 54 6f 6b 65 6e 28 29 3b 0d 0a 7d 0d 0a 0d 0a tToken();..}....
12e0: 69 6e 6c 69 6e 65 20 52 65 67 4e 6f 64 65 2a 20 inline RegNode*
12f0: 52 65 67 50 61 72 73 65 72 3a 3a 6d 61 6b 65 5f RegParser::make_
1300: 65 6d 70 74 79 5f 6c 65 61 66 28 29 0d 0a 7b 0d empty_leaf()..{.
1310: 0a 09 52 65 67 4e 6f 64 65 2a 20 6e 6f 64 65 20 ..RegNode* node
1320: 3d 20 6e 65 77 20 52 65 67 4e 6f 64 65 3b 0d 0a = new RegNode;..
1330: 09 6e 6f 64 65 2d 3e 74 79 70 65 20 3d 20 4e 5f .node->type = N_
1340: 45 6d 70 74 79 3b 0d 0a 09 72 65 74 75 72 6e 20 Empty;...return
1350: 6e 6f 64 65 3b 0d 0a 7d 0d 0a 0d 0a 69 6e 6c 69 node;..}....inli
1360: 6e 65 20 52 65 67 4e 6f 64 65 2a 20 52 65 67 50 ne RegNode* RegP
1370: 61 72 73 65 72 3a 3a 6d 61 6b 65 5f 63 68 61 72 arser::make_char
1380: 5f 6c 65 61 66 28 20 77 63 68 61 72 5f 74 20 63 _leaf( wchar_t c
1390: 20 29 0d 0a 7b 0d 0a 09 52 65 67 4e 6f 64 65 2a )..{...RegNode*
13a0: 20 6e 6f 64 65 20 3d 20 6e 65 77 20 52 65 67 4e node = new RegN
13b0: 6f 64 65 3b 0d 0a 09 6e 6f 64 65 2d 3e 74 79 70 ode;...node->typ
13c0: 65 20 3d 20 4e 5f 43 68 61 72 3b 0d 0a 09 6e 6f e = N_Char;...no
13d0: 64 65 2d 3e 63 68 20 20 20 3d 20 63 3b 0d 0a 09 de->ch = c;...
13e0: 72 65 74 75 72 6e 20 6e 6f 64 65 3b 0d 0a 7d 0d return node;..}.
13f0: 0a 0d 0a 52 65 67 4e 6f 64 65 2a 20 52 65 67 50 ...RegNode* RegP
1400: 61 72 73 65 72 3a 3a 6d 61 6b 65 5f 6e 6f 64 65 arser::make_node
1410: 28 20 52 65 67 54 79 70 65 20 74 2c 20 52 65 67 ( RegType t, Reg
1420: 4e 6f 64 65 2a 20 6c 66 74 2c 20 52 65 67 4e 6f Node* lft, RegNo
1430: 64 65 2a 20 72 68 74 20 29 0d 0a 7b 0d 0a 09 52 de* rht )..{...R
1440: 65 67 4e 6f 64 65 2a 20 6e 6f 64 65 20 3d 20 6e egNode* node = n
1450: 65 77 20 52 65 67 4e 6f 64 65 3b 0d 0a 09 6e 6f ew RegNode;...no
1460: 64 65 2d 3e 74 79 70 65 20 3d 20 74 3b 0d 0a 09 de->type = t;...
1470: 6e 6f 64 65 2d 3e 6c 65 66 74 20 3d 20 6c 66 74 node->left = lft
1480: 3b 0d 0a 09 6e 6f 64 65 2d 3e 72 69 67 68 74 3d ;...node->right=
1490: 20 72 68 74 3b 0d 0a 09 72 65 74 75 72 6e 20 6e rht;...return n
14a0: 6f 64 65 3b 0d 0a 7d 0d 0a 0d 0a 52 65 67 4e 6f ode;..}....RegNo
14b0: 64 65 2a 20 52 65 67 50 61 72 73 65 72 3a 3a 72 de* RegParser::r
14c0: 65 63 6c 61 73 73 28 29 0d 0a 7b 0d 0a 2f 2f 09 eclass()..{..//.
14d0: 43 4c 41 53 53 20 20 20 3a 3a 3d 20 27 5e 27 3f CLASS ::= '^'?
14e0: 20 43 48 41 52 20 28 43 48 41 52 20 7c 20 2d 43 CHAR (CHAR | -C
14f0: 48 41 52 29 2a 0d 0a 0d 0a 09 62 6f 6f 6c 20 6e HAR)*.....bool n
1500: 65 67 20 3d 20 66 61 6c 73 65 3b 0d 0a 09 69 66 eg = false;...if
1510: 28 20 6e 65 78 74 54 6f 6b 65 6e 5f 20 3d 3d 20 ( nextToken_ ==
1520: 52 5f 4e 63 6c 20 29 0d 0a 09 09 6e 65 67 3d 74 R_Ncl )....neg=t
1530: 72 75 65 2c 20 65 61 74 5f 74 6f 6b 65 6e 28 29 rue, eat_token()
1540: 3b 0d 0a 0d 0a 09 52 65 67 43 6c 61 73 73 2a 20 ;.....RegClass*
1550: 63 6c 73 20 3d 20 4e 55 4c 4c 3b 0d 0a 09 77 68 cls = NULL;...wh
1560: 69 6c 65 28 20 6e 65 78 74 54 6f 6b 65 6e 5f 20 ile( nextToken_
1570: 3d 3d 20 52 5f 43 68 61 72 20 29 0d 0a 09 7b 0d == R_Char )...{.
1580: 0a 09 09 77 63 68 61 72 5f 74 20 63 68 20 3d 20 ...wchar_t ch =
1590: 6c 65 78 5f 2e 47 65 74 43 68 61 72 28 29 3b 0d lex_.GetChar();.
15a0: 0a 09 09 65 61 74 5f 74 6f 6b 65 6e 28 29 3b 0d ...eat_token();.
15b0: 0a 09 09 69 66 28 20 6e 65 78 74 54 6f 6b 65 6e ...if( nextToken
15c0: 5f 20 3d 3d 20 52 5f 52 61 6e 67 65 20 29 0d 0a _ == R_Range )..
15d0: 09 09 7b 0d 0a 09 09 09 65 61 74 5f 74 6f 6b 65 ..{.....eat_toke
15e0: 6e 28 29 3b 0d 0a 09 09 09 69 66 28 20 6e 65 78 n();.....if( nex
15f0: 74 54 6f 6b 65 6e 5f 20 21 3d 20 52 5f 43 68 61 tToken_ != R_Cha
1600: 72 20 29 0d 0a 09 09 09 09 65 72 72 5f 20 3d 20 r )......err_ =
1610: 74 72 75 65 3b 0d 0a 09 09 09 65 6c 73 65 0d 0a true;.....else..
1620: 09 09 09 7b 0d 0a 09 09 09 09 77 63 68 61 72 5f ...{......wchar_
1630: 74 20 63 68 32 20 3d 20 6c 65 78 5f 2e 47 65 74 t ch2 = lex_.Get
1640: 43 68 61 72 28 29 3b 0d 0a 09 09 09 09 63 6c 73 Char();......cls
1650: 20 3d 20 6e 65 77 20 52 65 67 43 6c 61 73 73 28 = new RegClass(
1660: 20 4d 69 6e 28 63 68 2c 63 68 32 29 2c 20 4d 61 Min(ch,ch2), Ma
1670: 78 28 63 68 2c 63 68 32 29 2c 20 63 6c 73 20 29 x(ch,ch2), cls )
1680: 3b 0d 0a 09 09 09 09 65 61 74 5f 74 6f 6b 65 6e ;......eat_token
1690: 28 29 3b 0d 0a 09 09 09 7d 0d 0a 09 09 7d 0d 0a ();.....}....}..
16a0: 09 09 65 6c 73 65 0d 0a 09 09 7b 0d 0a 09 09 09 ..else....{.....
16b0: 63 6c 73 20 3d 20 6e 65 77 20 52 65 67 43 6c 61 cls = new RegCla
16c0: 73 73 28 20 63 68 2c 20 63 68 2c 20 63 6c 73 20 ss( ch, ch, cls
16d0: 29 3b 0d 0a 09 09 7d 0d 0a 09 7d 0d 0a 0d 0a 09 );....}...}.....
16e0: 52 65 67 4e 6f 64 65 2a 20 6e 6f 64 65 20 3d 20 RegNode* node =
16f0: 6e 65 77 20 52 65 67 4e 6f 64 65 3b 0d 0a 09 6e new RegNode;...n
1700: 6f 64 65 2d 3e 74 79 70 65 20 20 20 3d 20 4e 5f ode->type = N_
1710: 43 6c 61 73 73 3b 0d 0a 09 61 70 74 72 3c 52 65 Class;...aptr<Re
1720: 67 43 6c 61 73 73 3e 20 6e 63 6c 73 28 63 6c 73 gClass> ncls(cls
1730: 29 3b 0d 0a 09 6e 6f 64 65 2d 3e 63 6c 73 20 20 );...node->cls
1740: 20 20 3d 20 6e 63 6c 73 3b 0d 0a 09 6e 6f 64 65 = ncls;...node
1750: 2d 3e 63 6d 70 63 6c 73 20 3d 20 6e 65 67 3b 0d ->cmpcls = neg;.
1760: 0a 09 72 65 74 75 72 6e 20 6e 6f 64 65 3b 0d 0a ..return node;..
1770: 7d 0d 0a 0d 0a 52 65 67 4e 6f 64 65 2a 20 52 65 }....RegNode* Re
1780: 67 50 61 72 73 65 72 3a 3a 70 72 69 6d 61 72 79 gParser::primary
1790: 28 29 0d 0a 7b 0d 0a 2f 2f 09 50 52 49 4d 41 52 ()..{..//.PRIMAR
17a0: 59 20 3a 3a 3d 20 43 48 41 52 0d 0a 2f 2f 20 20 Y ::= CHAR..//
17b0: 20 20 20 20 20 20 20 20 20 20 20 20 27 2e 27 0d '.'.
17c0: 0a 2f 2f 09 20 20 20 20 20 20 20 20 20 20 20 20 .//.
17d0: 27 5b 27 20 43 4c 41 53 53 20 27 5d 27 0d 0a 2f '[' CLASS ']'../
17e0: 2f 09 09 09 09 27 28 27 20 52 45 47 45 58 50 20 /....'(' REGEXP
17f0: 27 29 27 0d 0a 0d 0a 09 52 65 67 4e 6f 64 65 2a ')'.....RegNode*
1800: 20 6e 6f 64 65 3b 0d 0a 09 73 77 69 74 63 68 28 node;...switch(
1810: 20 6e 65 78 74 54 6f 6b 65 6e 5f 20 29 0d 0a 09 nextToken_ )...
1820: 7b 0d 0a 09 63 61 73 65 20 52 5f 43 68 61 72 3a {...case R_Char:
1830: 0d 0a 09 09 6e 6f 64 65 20 3d 20 6d 61 6b 65 5f ....node = make_
1840: 63 68 61 72 5f 6c 65 61 66 28 20 6c 65 78 5f 2e char_leaf( lex_.
1850: 47 65 74 43 68 61 72 28 29 20 29 3b 0d 0a 09 09 GetChar() );....
1860: 65 61 74 5f 74 6f 6b 65 6e 28 29 3b 0d 0a 09 09 eat_token();....
1870: 62 72 65 61 6b 3b 0d 0a 09 63 61 73 65 20 52 5f break;...case R_
1880: 41 6e 79 3a 7b 0d 0a 09 09 6e 6f 64 65 20 20 20 Any:{....node
1890: 20 20 20 20 20 20 3d 20 6e 65 77 20 52 65 67 4e = new RegN
18a0: 6f 64 65 3b 0d 0a 09 09 6e 6f 64 65 2d 3e 74 79 ode;....node->ty
18b0: 70 65 20 20 20 3d 20 4e 5f 43 6c 61 73 73 3b 0d pe = N_Class;.
18c0: 0a 09 09 61 70 74 72 3c 52 65 67 43 6c 61 73 73 ...aptr<RegClass
18d0: 3e 20 6e 63 6c 73 28 6e 65 77 20 52 65 67 43 6c > ncls(new RegCl
18e0: 61 73 73 28 20 30 2c 20 36 35 35 33 35 2c 20 4e ass( 0, 65535, N
18f0: 55 4c 4c 20 29 29 3b 0d 0a 09 09 6e 6f 64 65 2d ULL ));....node-
1900: 3e 63 6c 73 20 20 20 20 3d 20 6e 63 6c 73 3b 0d >cls = ncls;.
1910: 0a 09 09 6e 6f 64 65 2d 3e 63 6d 70 63 6c 73 20 ...node->cmpcls
1920: 3d 20 66 61 6c 73 65 3b 0d 0a 09 09 65 61 74 5f = false;....eat_
1930: 74 6f 6b 65 6e 28 29 3b 0d 0a 09 09 7d 62 72 65 token();....}bre
1940: 61 6b 3b 0d 0a 09 63 61 73 65 20 52 5f 4c 63 6c ak;...case R_Lcl
1950: 3a 0d 0a 09 09 65 61 74 5f 74 6f 6b 65 6e 28 29 :....eat_token()
1960: 3b 0d 0a 09 09 6e 6f 64 65 20 3d 20 72 65 63 6c ;....node = recl
1970: 61 73 73 28 29 3b 0d 0a 09 09 69 66 28 20 6e 65 ass();....if( ne
1980: 78 74 54 6f 6b 65 6e 5f 20 3d 3d 20 52 5f 52 63 xtToken_ == R_Rc
1990: 6c 20 29 0d 0a 09 09 09 65 61 74 5f 74 6f 6b 65 l ).....eat_toke
19a0: 6e 28 29 3b 0d 0a 09 09 65 6c 73 65 0d 0a 09 09 n();....else....
19b0: 09 65 72 72 5f 20 3d 20 74 72 75 65 3b 0d 0a 09 .err_ = true;...
19c0: 09 62 72 65 61 6b 3b 0d 0a 09 63 61 73 65 20 52 .break;...case R
19d0: 5f 4c 62 72 3a 0d 0a 09 09 65 61 74 5f 74 6f 6b _Lbr:....eat_tok
19e0: 65 6e 28 29 3b 0d 0a 09 09 6e 6f 64 65 20 3d 20 en();....node =
19f0: 65 78 70 72 28 29 3b 0d 0a 09 09 69 66 28 20 6e expr();....if( n
1a00: 65 78 74 54 6f 6b 65 6e 5f 20 3d 3d 20 52 5f 52 extToken_ == R_R
1a10: 62 72 20 29 0d 0a 09 09 09 65 61 74 5f 74 6f 6b br ).....eat_tok
1a20: 65 6e 28 29 3b 0d 0a 09 09 65 6c 73 65 0d 0a 09 en();....else...
1a30: 09 09 65 72 72 5f 20 3d 20 74 72 75 65 3b 0d 0a ..err_ = true;..
1a40: 09 09 62 72 65 61 6b 3b 0d 0a 09 64 65 66 61 75 ..break;...defau
1a50: 6c 74 3a 0d 0a 09 09 6e 6f 64 65 20 3d 20 6d 61 lt:....node = ma
1a60: 6b 65 5f 65 6d 70 74 79 5f 6c 65 61 66 28 29 3b ke_empty_leaf();
1a70: 0d 0a 09 09 65 72 72 5f 20 3d 20 74 72 75 65 3b ....err_ = true;
1a80: 0d 0a 09 09 62 72 65 61 6b 3b 0d 0a 09 7d 0d 0a ....break;...}..
1a90: 09 72 65 74 75 72 6e 20 6e 6f 64 65 3b 0d 0a 7d .return node;..}
1aa0: 0d 0a 0d 0a 52 65 67 4e 6f 64 65 2a 20 52 65 67 ....RegNode* Reg
1ab0: 50 61 72 73 65 72 3a 3a 66 61 63 74 6f 72 28 29 Parser::factor()
1ac0: 0d 0a 7b 0d 0a 2f 2f 09 46 41 43 54 4f 52 20 20 ..{..//.FACTOR
1ad0: 3a 3a 3d 20 50 52 49 4d 41 52 59 0d 0a 2f 2f 09 ::= PRIMARY..//.
1ae0: 20 20 20 20 20 20 20 20 20 20 20 20 50 52 49 4d PRIM
1af0: 41 52 59 20 27 2a 27 0d 0a 2f 2f 09 09 09 20 20 ARY '*'..//...
1b00: 20 20 50 52 49 4d 41 52 59 20 27 2b 27 0d 0a 2f PRIMARY '+'../
1b10: 2f 09 09 09 20 20 20 20 50 52 49 4d 41 52 59 20 /... PRIMARY
1b20: 27 3f 27 0d 0a 0d 0a 09 52 65 67 4e 6f 64 65 2a '?'.....RegNode*
1b30: 20 6e 6f 64 65 20 3d 20 70 72 69 6d 61 72 79 28 node = primary(
1b40: 29 3b 0d 0a 09 73 77 69 74 63 68 28 20 6e 65 78 );...switch( nex
1b50: 74 54 6f 6b 65 6e 5f 20 29 0d 0a 09 7b 0d 0a 09 tToken_ )...{...
1b60: 63 61 73 65 20 52 5f 53 74 61 72 3a 20 6e 6f 64 case R_Star: nod
1b70: 65 3d 6d 61 6b 65 5f 6e 6f 64 65 28 4e 5f 43 6c e=make_node(N_Cl
1b80: 6f 73 75 72 65 2c 6e 6f 64 65 2c 4e 55 4c 4c 29 osure,node,NULL)
1b90: 3b 20 65 61 74 5f 74 6f 6b 65 6e 28 29 3b 62 72 ; eat_token();br
1ba0: 65 61 6b 3b 0d 0a 09 63 61 73 65 20 52 5f 50 6c eak;...case R_Pl
1bb0: 75 73 3a 20 6e 6f 64 65 3d 6d 61 6b 65 5f 6e 6f us: node=make_no
1bc0: 64 65 28 4e 5f 43 6c 6f 73 75 72 65 31 2c 6e 6f de(N_Closure1,no
1bd0: 64 65 2c 4e 55 4c 4c 29 3b 65 61 74 5f 74 6f 6b de,NULL);eat_tok
1be0: 65 6e 28 29 3b 62 72 65 61 6b 3b 0d 0a 09 63 61 en();break;...ca
1bf0: 73 65 20 52 5f 51 75 65 73 74 3a 6e 6f 64 65 3d se R_Quest:node=
1c00: 6d 61 6b 65 5f 6e 6f 64 65 28 4e 5f 30 31 2c 6e make_node(N_01,n
1c10: 6f 64 65 2c 4e 55 4c 4c 20 29 3b 20 20 20 20 20 ode,NULL );
1c20: 65 61 74 5f 74 6f 6b 65 6e 28 29 3b 62 72 65 61 eat_token();brea
1c30: 6b 3b 0d 0a 09 7d 0d 0a 09 72 65 74 75 72 6e 20 k;...}...return
1c40: 6e 6f 64 65 3b 0d 0a 7d 0d 0a 0d 0a 52 65 67 4e node;..}....RegN
1c50: 6f 64 65 2a 20 52 65 67 50 61 72 73 65 72 3a 3a ode* RegParser::
1c60: 74 65 72 6d 28 29 0d 0a 7b 0d 0a 2f 2f 09 54 45 term()..{..//.TE
1c70: 52 4d 20 20 20 20 3a 3a 3d 20 45 4d 50 54 59 0d RM ::= EMPTY.
1c80: 0a 2f 2f 09 20 20 20 20 20 20 20 20 20 20 20 20 .//.
1c90: 46 41 43 54 4f 52 20 54 45 52 4d 0d 0a 0d 0a 09 FACTOR TERM.....
1ca0: 69 66 28 20 6e 65 78 74 54 6f 6b 65 6e 5f 20 3d if( nextToken_ =
1cb0: 3d 20 52 5f 45 6e 64 20 29 0d 0a 09 09 72 65 74 = R_End )....ret
1cc0: 75 72 6e 20 6d 61 6b 65 5f 65 6d 70 74 79 5f 6c urn make_empty_l
1cd0: 65 61 66 28 29 3b 0d 0a 0d 0a 09 52 65 67 4e 6f eaf();.....RegNo
1ce0: 64 65 2a 20 6e 6f 64 65 20 3d 20 66 61 63 74 6f de* node = facto
1cf0: 72 28 29 3b 0d 0a 09 69 66 28 20 6e 65 78 74 54 r();...if( nextT
1d00: 6f 6b 65 6e 5f 3d 3d 52 5f 4c 62 72 20 7c 7c 20 oken_==R_Lbr ||
1d10: 6e 65 78 74 54 6f 6b 65 6e 5f 3d 3d 52 5f 4c 63 nextToken_==R_Lc
1d20: 6c 0d 0a 09 20 7c 7c 20 6e 65 78 74 54 6f 6b 65 l... || nextToke
1d30: 6e 5f 3d 3d 52 5f 43 68 61 72 7c 7c 20 6e 65 78 n_==R_Char|| nex
1d40: 74 54 6f 6b 65 6e 5f 3d 3d 52 5f 41 6e 79 20 29 tToken_==R_Any )
1d50: 0d 0a 09 09 6e 6f 64 65 20 3d 20 6d 61 6b 65 5f ....node = make_
1d60: 6e 6f 64 65 28 20 4e 5f 43 6f 6e 63 61 74 2c 20 node( N_Concat,
1d70: 6e 6f 64 65 2c 20 74 65 72 6d 28 29 20 29 3b 0d node, term() );.
1d80: 0a 09 72 65 74 75 72 6e 20 6e 6f 64 65 3b 0d 0a ..return node;..
1d90: 7d 0d 0a 0d 0a 52 65 67 4e 6f 64 65 2a 20 52 65 }....RegNode* Re
1da0: 67 50 61 72 73 65 72 3a 3a 65 78 70 72 28 29 0d gParser::expr().
1db0: 0a 7b 0d 0a 2f 2f 09 52 45 47 45 58 50 20 20 3a .{..//.REGEXP :
1dc0: 3a 3d 20 54 45 52 4d 0d 0a 2f 2f 09 20 20 20 20 := TERM..//.
1dd0: 20 20 20 20 20 20 20 20 54 45 52 4d 20 27 7c 27 TERM '|'
1de0: 20 52 45 47 45 58 50 0d 0a 0d 0a 09 52 65 67 4e REGEXP.....RegN
1df0: 6f 64 65 2a 20 6e 6f 64 65 20 3d 20 74 65 72 6d ode* node = term
1e00: 28 29 3b 0d 0a 09 69 66 28 20 6e 65 78 74 54 6f ();...if( nextTo
1e10: 6b 65 6e 5f 20 3d 3d 20 52 5f 42 61 72 20 29 0d ken_ == R_Bar ).
1e20: 0a 09 7b 0d 0a 09 09 65 61 74 5f 74 6f 6b 65 6e ..{....eat_token
1e30: 28 29 3b 0d 0a 09 09 6e 6f 64 65 20 3d 20 6d 61 ();....node = ma
1e40: 6b 65 5f 6e 6f 64 65 28 20 4e 5f 4f 72 2c 20 6e ke_node( N_Or, n
1e50: 6f 64 65 2c 20 65 78 70 72 28 29 20 29 3b 0d 0a ode, expr() );..
1e60: 09 7d 0d 0a 09 72 65 74 75 72 6e 20 6e 6f 64 65 .}...return node
1e70: 3b 0d 0a 7d 0d 0a 0d 0a 0d 0a 0d 0a 2f 2f 3d 3d ;..}........//==
1e80: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
1e90: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
1ea0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
1eb0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
1ec0: 3d 3d 3d 3d 3d 3d 3d 0d 0a 2f 2f 40 7b 0d 0a 2f =======..//@{../
1ed0: 2f 09 8f f3 91 d4 91 4a 88 da 0d 0a 2f 2f 40 7d /......J....//@}
1ee0: 0d 0a 2f 2f 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ..//============
1ef0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
1f00: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
1f10: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
1f20: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0d 0a 0d =============...
1f30: 0a 73 74 72 75 63 74 20 52 65 67 54 72 61 6e 73 .struct RegTrans
1f40: 0d 0a 7b 0d 0a 09 65 6e 75 6d 20 7b 0d 0a 09 09 ..{...enum {....
1f50: 45 70 73 69 6c 6f 6e 2c 0d 0a 09 09 43 6c 61 73 Epsilon,....Clas
1f60: 73 2c 0d 0a 09 09 43 68 61 72 0d 0a 09 7d 20 20 s,....Char...}
1f70: 20 20 20 20 20 20 20 20 20 20 20 20 74 79 70 65 type
1f80: 3b 0d 0a 09 61 70 74 72 3c 52 65 67 43 6c 61 73 ;...aptr<RegClas
1f90: 73 3e 20 20 63 6c 73 3b 20 2f 2f 20 82 b1 82 cc s> cls; // ....
1fa0: 95 b6 8e 9a 8f 57 8d 87 0d 0a 09 20 20 20 20 20 .....W.....
1fb0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1fc0: 2f 2f 20 6f 72 45 70 73 69 6c 6f 6e 20 82 aa 97 // orEpsilon ...
1fd0: 88 82 bd 82 e7 0d 0a 09 62 6f 6f 6c 20 20 20 20 ........bool
1fe0: 20 20 20 20 20 63 6d 70 63 6c 73 3b 0d 0a 09 69 cmpcls;...i
1ff0: 6e 74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 nt
2000: 74 6f 3b 20 2f 2f 20 8f f3 91 d4 94 d4 8d 86 74 to; // ........t
2010: 6f 82 cc 8f f3 91 d4 82 d6 91 4a 88 da 0d 0a 0d o.........J.....
2020: 0a 09 61 70 74 72 3c 52 65 67 54 72 61 6e 73 3e ..aptr<RegTrans>
2030: 20 6e 65 78 74 3b 20 2f 2f 20 98 41 8c 8b 83 8a next; // .A....
2040: 83 58 83 67 0d 0a 2f 2a 0d 0a 09 74 65 6d 70 6c .X.g../*...templ
2050: 61 74 65 3c 63 6c 61 73 73 20 43 6d 70 3e 0d 0a ate<class Cmp>..
2060: 09 62 6f 6f 6c 20 6d 61 74 63 68 5f 69 28 20 77 .bool match_i( w
2070: 63 68 61 72 5f 74 20 63 2c 20 43 6d 70 20 29 0d char_t c, Cmp ).
2080: 0a 09 7b 0d 0a 09 09 63 20 3d 20 43 6d 70 3a 3a ..{....c = Cmp::
2090: 6d 61 70 28 63 29 3b 0d 0a 09 09 52 65 67 43 6c map(c);....RegCl
20a0: 61 73 73 2a 20 70 20 3d 20 63 6c 73 2e 67 65 74 ass* p = cls.get
20b0: 28 29 3b 0d 0a 09 09 77 68 69 6c 65 28 20 70 20 ();....while( p
20c0: 29 0d 0a 09 09 09 69 66 28 20 43 6d 70 3a 3a 6d ).....if( Cmp::m
20d0: 61 70 28 70 2d 3e 72 61 6e 67 65 2e 73 74 74 29 ap(p->range.stt)
20e0: 3c 3d 63 20 26 26 20 63 3c 3d 43 6d 70 3a 3a 6d <=c && c<=Cmp::m
20f0: 61 70 28 70 2d 3e 72 61 6e 67 65 2e 65 6e 64 29 ap(p->range.end)
2100: 20 29 0d 0a 09 09 09 09 72 65 74 75 72 6e 20 74 )......return t
2110: 72 75 65 3b 0d 0a 09 09 09 65 6c 73 65 0d 0a 09 rue;.....else...
2120: 09 09 09 70 20 3d 20 70 2d 3e 6e 65 78 74 2e 67 ...p = p->next.g
2130: 65 74 28 29 3b 0d 0a 09 09 72 65 74 75 72 6e 20 et();....return
2140: 66 61 6c 73 65 3b 0d 0a 09 7d 0d 0a 2a 2f 0d 0a false;...}..*/..
2150: 09 62 6f 6f 6c 20 6d 61 74 63 68 5f 63 28 20 77 .bool match_c( w
2160: 63 68 61 72 5f 74 20 63 20 29 0d 0a 09 7b 0d 0a char_t c )...{..
2170: 09 09 66 6f 72 28 20 52 65 67 43 6c 61 73 73 2a ..for( RegClass*
2180: 20 70 3d 63 6c 73 2e 67 65 74 28 29 3b 20 70 3b p=cls.get(); p;
2190: 20 70 3d 70 2d 3e 6e 65 78 74 2e 67 65 74 28 29 p=p->next.get()
21a0: 20 29 0d 0a 09 09 09 69 66 28 20 70 2d 3e 72 61 ).....if( p->ra
21b0: 6e 67 65 2e 73 74 74 3c 3d 63 20 26 26 20 63 3c nge.stt<=c && c<
21c0: 3d 70 2d 3e 72 61 6e 67 65 2e 65 6e 64 20 29 0d =p->range.end ).
21d0: 0a 09 09 09 09 72 65 74 75 72 6e 20 74 72 75 65 .....return true
21e0: 3b 0d 0a 09 09 72 65 74 75 72 6e 20 66 61 6c 73 ;....return fals
21f0: 65 3b 0d 0a 09 7d 0d 0a 0d 0a 09 62 6f 6f 6c 20 e;...}.....bool
2200: 6d 61 74 63 68 5f 69 28 20 77 63 68 61 72 5f 74 match_i( wchar_t
2210: 20 63 20 29 0d 0a 09 7b 0d 0a 09 09 63 20 3d 20 c )...{....c =
2220: 49 67 6e 6f 72 65 43 61 73 65 3a 3a 6d 61 70 28 IgnoreCase::map(
2230: 63 29 3b 0d 0a 09 09 66 6f 72 28 20 52 65 67 43 c);....for( RegC
2240: 6c 61 73 73 2a 20 70 3d 63 6c 73 2e 67 65 74 28 lass* p=cls.get(
2250: 29 3b 20 70 3b 20 70 3d 70 2d 3e 6e 65 78 74 2e ); p; p=p->next.
2260: 67 65 74 28 29 20 29 0d 0a 09 09 09 69 66 28 20 get() ).....if(
2270: 49 67 6e 6f 72 65 43 61 73 65 3a 3a 6d 61 70 28 IgnoreCase::map(
2280: 70 2d 3e 72 61 6e 67 65 2e 73 74 74 29 3c 3d 63 p->range.stt)<=c
2290: 0d 0a 09 09 09 20 26 26 20 63 3c 3d 49 67 6e 6f ..... && c<=Igno
22a0: 72 65 43 61 73 65 3a 3a 6d 61 70 28 70 2d 3e 72 reCase::map(p->r
22b0: 61 6e 67 65 2e 65 6e 64 29 20 29 0d 0a 09 09 09 ange.end) ).....
22c0: 09 72 65 74 75 72 6e 20 74 72 75 65 3b 0d 0a 09 .return true;...
22d0: 09 72 65 74 75 72 6e 20 66 61 6c 73 65 3b 0d 0a .return false;..
22e0: 09 7d 0d 0a 0d 0a 09 62 6f 6f 6c 20 6d 61 74 63 .}.....bool matc
22f0: 68 28 20 77 63 68 61 72 5f 74 20 63 2c 20 62 6f h( wchar_t c, bo
2300: 6f 6c 20 63 61 73 65 53 20 29 0d 0a 09 7b 0d 0a ol caseS )...{..
2310: 09 09 62 6f 6f 6c 20 6d 20 3d 20 63 61 73 65 53 ..bool m = caseS
2320: 20 3f 20 6d 61 74 63 68 5f 63 28 20 63 20 29 20 ? match_c( c )
2330: 3a 20 6d 61 74 63 68 5f 69 28 20 63 20 29 3b 0d : match_i( c );.
2340: 0a 09 09 72 65 74 75 72 6e 20 63 6d 70 63 6c 73 ...return cmpcls
2350: 20 3f 20 21 6d 20 3a 20 6d 3b 0d 0a 09 7d 0d 0a ? !m : m;...}..
2360: 7d 3b 0d 0a 0d 0a 0d 0a 0d 0a 2f 2f 3d 3d 3d 3d };........//====
2370: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
2380: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
2390: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
23a0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
23b0: 3d 3d 3d 3d 3d 0d 0a 2f 2f 40 7b 0d 0a 2f 2f 09 =====..//@{..//.
23c0: 8d 5c 95 b6 96 d8 2d 3e 4e 46 41 95 cf 8a b7 0d .\....->NFA.....
23d0: 0a 2f 2f 40 7d 0d 0a 2f 2f 3d 3d 3d 3d 3d 3d 3d .//@}..//=======
23e0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
23f0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
2400: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
2410: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
2420: 3d 3d 0d 0a 0d 0a 63 6c 61 73 73 20 52 65 67 4e ==....class RegN
2430: 46 41 0d 0a 7b 0d 0a 70 75 62 6c 69 63 3a 0d 0a FA..{..public:..
2440: 09 52 65 67 4e 46 41 28 20 63 6f 6e 73 74 20 77 .RegNFA( const w
2450: 63 68 61 72 5f 74 2a 20 70 61 74 20 29 3b 0d 0a char_t* pat );..
2460: 09 7e 52 65 67 4e 46 41 28 29 3b 0d 0a 0d 0a 09 .~RegNFA();.....
2470: 69 6e 74 20 6d 61 74 63 68 28 20 63 6f 6e 73 74 int match( const
2480: 20 77 63 68 61 72 5f 74 2a 20 73 74 72 2c 20 69 wchar_t* str, i
2490: 6e 74 20 6c 65 6e 2c 20 62 6f 6f 6c 20 63 61 73 nt len, bool cas
24a0: 65 53 20 29 3b 0d 0a 09 62 6f 6f 6c 20 69 73 48 eS );...bool isH
24b0: 65 61 64 54 79 70 65 28 29 20 63 6f 6e 73 74 20 eadType() const
24c0: 7b 20 72 65 74 75 72 6e 20 70 61 72 73 65 72 2e { return parser.
24d0: 69 73 48 65 61 64 54 79 70 65 28 29 3b 20 7d 0d isHeadType(); }.
24e0: 0a 09 62 6f 6f 6c 20 69 73 54 61 69 6c 54 79 70 ..bool isTailTyp
24f0: 65 28 29 20 63 6f 6e 73 74 20 7b 20 72 65 74 75 e() const { retu
2500: 72 6e 20 70 61 72 73 65 72 2e 69 73 54 61 69 6c rn parser.isTail
2510: 54 79 70 65 28 29 3b 20 7d 0d 0a 0d 0a 70 72 69 Type(); }....pri
2520: 76 61 74 65 3a 0d 0a 09 2f 2f 20 83 7d 83 62 83 vate:...// .}.b.
2530: 60 83 93 83 4f 8f 88 97 9d 0d 0a 09 69 6e 74 20 `...O.......int
2540: 64 66 61 5f 6d 61 74 63 68 28 20 63 6f 6e 73 74 dfa_match( const
2550: 20 77 63 68 61 72 5f 74 2a 20 73 74 72 2c 20 69 wchar_t* str, i
2560: 6e 74 20 6c 65 6e 2c 20 62 6f 6f 6c 20 63 61 73 nt len, bool cas
2570: 65 53 20 29 3b 0d 0a 0d 0a 09 73 74 72 75 63 74 eS );.....struct
2580: 20 73 74 5f 65 6c 65 20 7b 20 69 6e 74 20 73 74 st_ele { int st
2590: 2c 20 70 73 3b 20 7d 3b 0d 0a 09 76 6f 69 64 20 , ps; };...void
25a0: 70 75 73 68 28 73 74 6f 72 61 67 65 3c 73 74 5f push(storage<st_
25b0: 65 6c 65 3e 26 20 73 74 61 63 6b 2c 20 69 6e 74 ele>& stack, int
25c0: 20 63 75 72 53 74 2c 20 69 6e 74 20 70 6f 73 29 curSt, int pos)
25d0: 3b 0d 0a 09 73 74 5f 65 6c 65 20 70 6f 70 28 73 ;...st_ele pop(s
25e0: 74 6f 72 61 67 65 3c 73 74 5f 65 6c 65 3e 26 20 torage<st_ele>&
25f0: 73 74 61 63 6b 29 3b 0d 0a 0d 0a 70 72 69 76 61 stack);....priva
2600: 74 65 3a 0d 0a 09 76 6f 69 64 20 61 64 64 5f 74 te:...void add_t
2610: 72 61 6e 73 69 74 69 6f 6e 28 20 69 6e 74 20 66 ransition( int f
2620: 72 6f 6d 2c 20 77 63 68 61 72 5f 74 20 63 68 2c rom, wchar_t ch,
2630: 20 69 6e 74 20 74 6f 20 29 3b 0d 0a 09 76 6f 69 int to );...voi
2640: 64 20 61 64 64 5f 74 72 61 6e 73 69 74 69 6f 6e d add_transition
2650: 28 20 69 6e 74 20 66 72 6f 6d 2c 20 61 70 74 72 ( int from, aptr
2660: 3c 52 65 67 43 6c 61 73 73 3e 20 63 6c 73 2c 20 <RegClass> cls,
2670: 62 6f 6f 6c 20 63 6d 70 2c 20 69 6e 74 20 74 6f bool cmp, int to
2680: 20 29 3b 0d 0a 09 76 6f 69 64 20 61 64 64 5f 65 );...void add_e
2690: 5f 74 72 61 6e 73 69 74 69 6f 6e 28 20 69 6e 74 _transition( int
26a0: 20 66 72 6f 6d 2c 20 69 6e 74 20 74 6f 20 29 3b from, int to );
26b0: 0d 0a 09 69 6e 74 20 67 65 6e 5f 73 74 61 74 65 ...int gen_state
26c0: 28 29 3b 0d 0a 09 76 6f 69 64 20 67 65 6e 5f 6e ();...void gen_n
26d0: 66 61 28 20 69 6e 74 20 65 6e 74 72 79 2c 20 52 fa( int entry, R
26e0: 65 67 4e 6f 64 65 2a 20 74 2c 20 69 6e 74 20 65 egNode* t, int e
26f0: 78 69 74 20 29 3b 0d 0a 0d 0a 70 72 69 76 61 74 xit );....privat
2700: 65 3a 0d 0a 09 52 65 67 50 61 72 73 65 72 20 20 e:...RegParser
2710: 20 20 20 20 70 61 72 73 65 72 3b 0d 0a 09 73 74 parser;...st
2720: 6f 72 61 67 65 3c 52 65 67 54 72 61 6e 73 2a 3e orage<RegTrans*>
2730: 20 73 74 3b 0d 0a 09 69 6e 74 20 20 20 20 20 20 st;...int
2740: 73 74 61 72 74 2c 20 66 69 6e 61 6c 3b 0d 0a 7d start, final;..}
2750: 3b 0d 0a 0d 0a 52 65 67 4e 46 41 3a 3a 52 65 67 ;....RegNFA::Reg
2760: 4e 46 41 28 20 63 6f 6e 73 74 20 77 63 68 61 72 NFA( const wchar
2770: 5f 74 2a 20 70 61 74 20 29 0d 0a 09 3a 20 70 61 _t* pat )...: pa
2780: 72 73 65 72 28 20 70 61 74 20 29 0d 0a 7b 0d 0a rser( pat )..{..
2790: 09 73 74 61 72 74 20 3d 20 67 65 6e 5f 73 74 61 .start = gen_sta
27a0: 74 65 28 29 3b 0d 0a 09 66 69 6e 61 6c 20 3d 20 te();...final =
27b0: 67 65 6e 5f 73 74 61 74 65 28 29 3b 0d 0a 09 67 gen_state();...g
27c0: 65 6e 5f 6e 66 61 28 20 73 74 61 72 74 2c 20 70 en_nfa( start, p
27d0: 61 72 73 65 72 2e 72 6f 6f 74 28 29 2c 20 66 69 arser.root(), fi
27e0: 6e 61 6c 20 29 3b 0d 0a 7d 0d 0a 0d 0a 69 6e 6c nal );..}....inl
27f0: 69 6e 65 20 52 65 67 4e 46 41 3a 3a 7e 52 65 67 ine RegNFA::~Reg
2800: 4e 46 41 28 29 0d 0a 7b 0d 0a 09 66 6f 72 28 20 NFA()..{...for(
2810: 75 6c 6f 6e 67 20 69 3d 30 2c 65 3d 73 74 2e 73 ulong i=0,e=st.s
2820: 69 7a 65 28 29 3b 20 69 3c 65 3b 20 2b 2b 69 20 ize(); i<e; ++i
2830: 29 0d 0a 09 09 64 65 6c 65 74 65 20 73 74 5b 69 )....delete st[i
2840: 5d 3b 0d 0a 7d 0d 0a 0d 0a 69 6e 6c 69 6e 65 20 ];..}....inline
2850: 76 6f 69 64 20 52 65 67 4e 46 41 3a 3a 61 64 64 void RegNFA::add
2860: 5f 74 72 61 6e 73 69 74 69 6f 6e 0d 0a 09 28 20 _transition...(
2870: 69 6e 74 20 66 72 6f 6d 2c 20 61 70 74 72 3c 52 int from, aptr<R
2880: 65 67 43 6c 61 73 73 3e 20 63 6c 73 2c 20 62 6f egClass> cls, bo
2890: 6f 6c 20 63 6d 70 2c 20 69 6e 74 20 74 6f 20 29 ol cmp, int to )
28a0: 0d 0a 7b 0d 0a 09 52 65 67 54 72 61 6e 73 2a 20 ..{...RegTrans*
28b0: 78 20 3d 20 6e 65 77 20 52 65 67 54 72 61 6e 73 x = new RegTrans
28c0: 3b 0d 0a 09 61 70 74 72 3c 52 65 67 54 72 61 6e ;...aptr<RegTran
28d0: 73 3e 20 6e 6e 28 20 73 74 5b 66 72 6f 6d 5d 20 s> nn( st[from]
28e0: 29 3b 0d 0a 09 78 2d 3e 6e 65 78 74 20 20 3d 20 );...x->next =
28f0: 6e 6e 3b 0d 0a 09 78 2d 3e 74 6f 20 20 20 20 3d nn;...x->to =
2900: 20 74 6f 3b 0d 0a 09 78 2d 3e 74 79 70 65 20 20 to;...x->type
2910: 3d 20 52 65 67 54 72 61 6e 73 3a 3a 43 6c 61 73 = RegTrans::Clas
2920: 73 3b 0d 0a 09 78 2d 3e 63 6c 73 20 20 20 3d 20 s;...x->cls =
2930: 63 6c 73 3b 0d 0a 09 78 2d 3e 63 6d 70 63 6c 73 cls;...x->cmpcls
2940: 3d 20 63 6d 70 3b 0d 0a 09 73 74 5b 66 72 6f 6d = cmp;...st[from
2950: 5d 20 3d 20 78 3b 0d 0a 7d 0d 0a 0d 0a 69 6e 6c ] = x;..}....inl
2960: 69 6e 65 20 76 6f 69 64 20 52 65 67 4e 46 41 3a ine void RegNFA:
2970: 3a 61 64 64 5f 74 72 61 6e 73 69 74 69 6f 6e 28 :add_transition(
2980: 20 69 6e 74 20 66 72 6f 6d 2c 20 77 63 68 61 72 int from, wchar
2990: 5f 74 20 63 68 2c 20 69 6e 74 20 74 6f 20 29 0d _t ch, int to ).
29a0: 0a 7b 0d 0a 09 61 70 74 72 3c 52 65 67 43 6c 61 .{...aptr<RegCla
29b0: 73 73 3e 20 63 6c 73 28 6e 65 77 20 52 65 67 43 ss> cls(new RegC
29c0: 6c 61 73 73 28 63 68 2c 63 68 2c 4e 55 4c 4c 29 lass(ch,ch,NULL)
29d0: 29 3b 0d 0a 09 61 64 64 5f 74 72 61 6e 73 69 74 );...add_transit
29e0: 69 6f 6e 28 20 66 72 6f 6d 2c 20 63 6c 73 2c 20 ion( from, cls,
29f0: 66 61 6c 73 65 2c 20 74 6f 20 29 3b 0d 0a 7d 0d false, to );..}.
2a00: 0a 0d 0a 69 6e 6c 69 6e 65 20 76 6f 69 64 20 52 ...inline void R
2a10: 65 67 4e 46 41 3a 3a 61 64 64 5f 65 5f 74 72 61 egNFA::add_e_tra
2a20: 6e 73 69 74 69 6f 6e 28 20 69 6e 74 20 66 72 6f nsition( int fro
2a30: 6d 2c 20 69 6e 74 20 74 6f 20 29 0d 0a 7b 0d 0a m, int to )..{..
2a40: 09 52 65 67 54 72 61 6e 73 2a 20 78 20 3d 20 6e .RegTrans* x = n
2a50: 65 77 20 52 65 67 54 72 61 6e 73 3b 0d 0a 09 61 ew RegTrans;...a
2a60: 70 74 72 3c 52 65 67 54 72 61 6e 73 3e 20 6e 6e ptr<RegTrans> nn
2a70: 28 20 73 74 5b 66 72 6f 6d 5d 20 29 3b 0d 0a 09 ( st[from] );...
2a80: 78 2d 3e 6e 65 78 74 20 20 3d 20 6e 6e 3b 0d 0a x->next = nn;..
2a90: 09 78 2d 3e 74 6f 20 20 20 20 3d 20 74 6f 3b 0d .x->to = to;.
2aa0: 0a 09 78 2d 3e 74 79 70 65 20 20 3d 20 52 65 67 ..x->type = Reg
2ab0: 54 72 61 6e 73 3a 3a 45 70 73 69 6c 6f 6e 3b 0d Trans::Epsilon;.
2ac0: 0a 09 73 74 5b 66 72 6f 6d 5d 20 3d 20 78 3b 0d ..st[from] = x;.
2ad0: 0a 7d 0d 0a 0d 0a 69 6e 6c 69 6e 65 20 69 6e 74 .}....inline int
2ae0: 20 52 65 67 4e 46 41 3a 3a 67 65 6e 5f 73 74 61 RegNFA::gen_sta
2af0: 74 65 28 29 0d 0a 7b 0d 0a 09 73 74 2e 41 64 64 te()..{...st.Add
2b00: 28 20 4e 55 4c 4c 20 29 3b 0d 0a 09 72 65 74 75 ( NULL );...retu
2b10: 72 6e 20 73 74 2e 73 69 7a 65 28 29 20 2d 20 31 rn st.size() - 1
2b20: 3b 0d 0a 7d 0d 0a 0d 0a 76 6f 69 64 20 52 65 67 ;..}....void Reg
2b30: 4e 46 41 3a 3a 67 65 6e 5f 6e 66 61 28 20 69 6e NFA::gen_nfa( in
2b40: 74 20 65 6e 74 72 79 2c 20 52 65 67 4e 6f 64 65 t entry, RegNode
2b50: 2a 20 74 2c 20 69 6e 74 20 65 78 69 74 20 29 0d * t, int exit ).
2b60: 0a 7b 0d 0a 09 73 77 69 74 63 68 28 20 74 2d 3e .{...switch( t->
2b70: 74 79 70 65 20 29 0d 0a 09 7b 0d 0a 09 63 61 73 type )...{...cas
2b80: 65 20 4e 5f 43 68 61 72 3a 0d 0a 09 09 2f 2f 20 e N_Char:....//
2b90: 20 20 20 20 20 20 20 20 63 68 0d 0a 09 09 2f 2f ch....//
2ba0: 20 20 65 6e 74 72 79 20 2d 2d 2d 2d 3e 20 65 78 entry ----> ex
2bb0: 69 74 0d 0a 09 09 61 64 64 5f 74 72 61 6e 73 69 it....add_transi
2bc0: 74 69 6f 6e 28 20 65 6e 74 72 79 2c 20 74 2d 3e tion( entry, t->
2bd0: 63 68 2c 20 65 78 69 74 20 29 3b 0d 0a 09 09 62 ch, exit );....b
2be0: 72 65 61 6b 3b 0d 0a 09 63 61 73 65 20 4e 5f 43 reak;...case N_C
2bf0: 6c 61 73 73 3a 0d 0a 09 09 2f 2f 20 20 20 20 20 lass:....//
2c00: 20 20 20 20 63 6c 73 0d 0a 09 09 2f 2f 20 20 65 cls....// e
2c10: 6e 74 72 79 20 2d 2d 2d 2d 2d 3e 20 65 78 69 74 ntry -----> exit
2c20: 0d 0a 09 09 61 64 64 5f 74 72 61 6e 73 69 74 69 ....add_transiti
2c30: 6f 6e 28 20 65 6e 74 72 79 2c 20 74 2d 3e 63 6c on( entry, t->cl
2c40: 73 2c 20 74 2d 3e 63 6d 70 63 6c 73 2c 20 65 78 s, t->cmpcls, ex
2c50: 69 74 20 29 3b 0d 0a 09 09 62 72 65 61 6b 3b 0d it );....break;.
2c60: 0a 09 63 61 73 65 20 4e 5f 43 6f 6e 63 61 74 3a ..case N_Concat:
2c70: 20 7b 0d 0a 09 09 2f 2f 20 20 20 20 20 20 20 20 {....//
2c80: 20 6c 65 66 74 20 20 20 20 20 20 20 20 20 72 69 left ri
2c90: 67 68 74 0d 0a 09 09 2f 2f 20 20 65 6e 74 72 79 ght....// entry
2ca0: 20 2d 2d 2d 2d 2d 2d 3e 20 73 74 65 70 20 2d 2d ------> step --
2cb0: 2d 2d 2d 2d 2d 3e 20 65 78 69 74 0d 0a 09 09 69 -----> exit....i
2cc0: 6e 74 20 73 74 65 70 20 3d 20 67 65 6e 5f 73 74 nt step = gen_st
2cd0: 61 74 65 28 29 3b 0d 0a 09 09 67 65 6e 5f 6e 66 ate();....gen_nf
2ce0: 61 28 20 65 6e 74 72 79 2c 20 74 2d 3e 6c 65 66 a( entry, t->lef
2cf0: 74 2e 67 65 74 28 29 2c 20 73 74 65 70 20 29 3b t.get(), step );
2d00: 0d 0a 09 09 67 65 6e 5f 6e 66 61 28 20 73 74 65 ....gen_nfa( ste
2d10: 70 2c 20 74 2d 3e 72 69 67 68 74 2e 67 65 74 28 p, t->right.get(
2d20: 29 2c 20 65 78 69 74 20 29 3b 0d 0a 09 09 7d 20 ), exit );....}
2d30: 62 72 65 61 6b 3b 0d 0a 09 63 61 73 65 20 4e 5f break;...case N_
2d40: 4f 72 3a 0d 0a 09 09 2f 2f 20 20 20 20 20 20 20 Or:....//
2d50: 20 20 20 6c 65 66 74 0d 0a 09 09 2f 2f 20 20 20 left....//
2d60: 20 20 20 20 20 20 2d 2d 2d 2d 2d 2d 3e 0d 0a 09 ------>...
2d70: 09 2f 2f 20 20 65 6e 74 72 79 20 2d 2d 2d 2d 2d .// entry -----
2d80: 2d 2d 3e 2d 2d 3e 20 65 78 69 74 0d 0a 09 09 2f -->--> exit..../
2d90: 2f 20 20 20 20 20 20 20 20 20 20 72 69 67 68 74 / right
2da0: 0d 0a 09 09 67 65 6e 5f 6e 66 61 28 20 65 6e 74 ....gen_nfa( ent
2db0: 72 79 2c 20 74 2d 3e 6c 65 66 74 2e 67 65 74 28 ry, t->left.get(
2dc0: 29 2c 20 65 78 69 74 20 29 3b 0d 0a 09 09 67 65 ), exit );....ge
2dd0: 6e 5f 6e 66 61 28 20 65 6e 74 72 79 2c 20 74 2d n_nfa( entry, t-
2de0: 3e 72 69 67 68 74 2e 67 65 74 28 29 2c 20 65 78 >right.get(), ex
2df0: 69 74 20 29 3b 0d 0a 09 09 62 72 65 61 6b 3b 0d it );....break;.
2e00: 0a 09 63 61 73 65 20 4e 5f 43 6c 6f 73 75 72 65 ..case N_Closure
2e10: 3a 0d 0a 09 09 2f 2f 20 20 20 20 20 20 20 20 20 :....//
2e20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 0d e.
2e30: 0a 09 09 2f 2f 20 20 20 20 20 20 20 20 20 65 20 ...// e
2e40: 20 20 20 20 20 20 20 20 20 3c 2d 2d 2d 2d 2d 2d <------
2e50: 20 20 20 20 20 20 20 20 65 0d 0a 09 09 2f 2f 20 e....//
2e60: 20 65 6e 74 72 79 20 2d 2d 2d 3e 20 62 65 66 6f entry ---> befo
2e70: 72 65 20 2d 2d 2d 2d 2d 2d 3e 20 61 66 74 65 72 re ------> after
2e80: 20 2d 2d 2d 3e 20 65 78 69 74 0d 0a 09 09 2f 2f ---> exit....//
2e90: 20 20 20 20 7c 20 20 20 20 20 20 20 20 20 20 20 |
2ea0: 20 20 20 20 20 6c 65 66 74 20 20 20 20 20 20 20 left
2eb0: 20 20 20 20 20 20 20 20 20 5e 0d 0a 09 09 2f 2f ^....//
2ec0: 20 20 20 20 3e 2d 2d 2d 2d 2d 2d 2d 3e 2d 2d 2d >------->---
2ed0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
2ee0: 3e 2d 2d 2d 2d 2d 2d 3e 2d 7c 0d 0a 09 09 2f 2f >------>-|....//
2ef0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
2f00: 20 20 20 20 20 20 65 0d 0a 09 63 61 73 65 20 4e e...case N
2f10: 5f 43 6c 6f 73 75 72 65 31 3a 20 7b 0d 0a 09 09 _Closure1: {....
2f20: 2f 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 //
2f30: 20 20 20 20 20 20 20 20 20 65 0d 0a 09 09 2f 2f e....//
2f40: 20 20 20 20 20 20 20 20 20 65 20 20 20 20 20 20 e
2f50: 20 20 20 20 3c 2d 2d 2d 2d 2d 2d 20 20 20 20 20 <------
2f60: 20 20 20 65 0d 0a 09 09 2f 2f 20 20 65 6e 74 72 e....// entr
2f70: 79 20 2d 2d 2d 3e 20 62 65 66 6f 72 65 20 2d 2d y ---> before --
2f80: 2d 2d 2d 2d 3e 20 61 66 74 65 72 20 2d 2d 2d 3e ----> after --->
2f90: 20 65 78 69 74 0d 0a 09 09 2f 2f 20 20 20 20 20 exit....//
2fa0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
2fb0: 6c 65 66 74 0d 0a 09 09 69 6e 74 20 62 65 66 6f left....int befo
2fc0: 72 65 20 3d 20 67 65 6e 5f 73 74 61 74 65 28 29 re = gen_state()
2fd0: 3b 0d 0a 09 09 69 6e 74 20 61 66 74 65 72 20 3d ;....int after =
2fe0: 20 67 65 6e 5f 73 74 61 74 65 28 29 3b 0d 0a 09 gen_state();...
2ff0: 09 61 64 64 5f 65 5f 74 72 61 6e 73 69 74 69 6f .add_e_transitio
3000: 6e 28 20 65 6e 74 72 79 2c 20 62 65 66 6f 72 65 n( entry, before
3010: 20 29 3b 0d 0a 09 09 61 64 64 5f 65 5f 74 72 61 );....add_e_tra
3020: 6e 73 69 74 69 6f 6e 28 20 61 66 74 65 72 2c 20 nsition( after,
3030: 65 78 69 74 20 29 3b 0d 0a 09 09 61 64 64 5f 65 exit );....add_e
3040: 5f 74 72 61 6e 73 69 74 69 6f 6e 28 20 61 66 74 _transition( aft
3050: 65 72 2c 20 62 65 66 6f 72 65 20 29 3b 0d 0a 09 er, before );...
3060: 09 67 65 6e 5f 6e 66 61 28 20 62 65 66 6f 72 65 .gen_nfa( before
3070: 2c 20 74 2d 3e 6c 65 66 74 2e 67 65 74 28 29 2c , t->left.get(),
3080: 20 61 66 74 65 72 20 29 3b 0d 0a 09 09 69 66 28 after );....if(
3090: 20 74 2d 3e 74 79 70 65 20 21 3d 20 4e 5f 43 6c t->type != N_Cl
30a0: 6f 73 75 72 65 31 20 29 0d 0a 09 09 09 61 64 64 osure1 ).....add
30b0: 5f 65 5f 74 72 61 6e 73 69 74 69 6f 6e 28 20 65 _e_transition( e
30c0: 6e 74 72 79 2c 20 65 78 69 74 20 29 3b 0d 0a 09 ntry, exit );...
30d0: 09 7d 20 62 72 65 61 6b 3b 0d 0a 09 63 61 73 65 .} break;...case
30e0: 20 4e 5f 30 31 3a 0d 0a 09 09 2f 2f 20 20 20 20 N_01:....//
30f0: 20 20 20 20 20 20 20 65 0d 0a 09 09 2f 2f 20 20 e....//
3100: 20 20 20 20 20 20 2d 2d 2d 2d 2d 2d 3e 0d 0a 09 ------>...
3110: 09 2f 2f 20 20 65 6e 74 72 79 20 2d 2d 2d 2d 2d .// entry -----
3120: 2d 3e 20 65 78 69 74 0d 0a 09 09 2f 2f 20 20 20 -> exit....//
3130: 20 20 20 20 20 20 6c 65 66 74 0d 0a 09 09 61 64 left....ad
3140: 64 5f 65 5f 74 72 61 6e 73 69 74 69 6f 6e 28 20 d_e_transition(
3150: 65 6e 74 72 79 2c 20 65 78 69 74 20 29 3b 0d 0a entry, exit );..
3160: 09 09 67 65 6e 5f 6e 66 61 28 20 65 6e 74 72 79 ..gen_nfa( entry
3170: 2c 20 74 2d 3e 6c 65 66 74 2e 67 65 74 28 29 2c , t->left.get(),
3180: 20 65 78 69 74 20 29 3b 0d 0a 09 09 62 72 65 61 exit );....brea
3190: 6b 3b 0d 0a 09 63 61 73 65 20 4e 5f 45 6d 70 74 k;...case N_Empt
31a0: 79 3a 0d 0a 09 09 2f 2f 20 20 20 20 20 20 20 20 y:....//
31b0: 20 65 0d 0a 09 09 2f 2f 20 20 65 6e 74 72 79 20 e....// entry
31c0: 2d 2d 2d 3e 20 65 78 69 74 0d 0a 09 09 61 64 64 ---> exit....add
31d0: 5f 65 5f 74 72 61 6e 73 69 74 69 6f 6e 28 20 65 _e_transition( e
31e0: 6e 74 72 79 2c 20 65 78 69 74 20 29 3b 0d 0a 09 ntry, exit );...
31f0: 09 62 72 65 61 6b 3b 0d 0a 09 7d 0d 0a 7d 0d 0a .break;...}..}..
3200: 0d 0a 0d 0a 0d 0a 2f 2f 3d 3d 3d 3d 3d 3d 3d 3d ......//========
3210: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
3220: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
3230: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
3240: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
3250: 3d 0d 0a 2f 2f 40 7b 0d 0a 2f 2f 09 83 7d 83 62 =..//@{..//..}.b
3260: 83 60 83 93 83 4f 0d 0a 2f 2f 40 7d 0d 0a 2f 2f .`...O..//@}..//
3270: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
3280: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
3290: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
32a0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
32b0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 0d 0a 0d 0a 76 6f 69 =========....voi
32c0: 64 20 52 65 67 4e 46 41 3a 3a 70 75 73 68 28 73 d RegNFA::push(s
32d0: 74 6f 72 61 67 65 3c 73 74 5f 65 6c 65 3e 26 20 torage<st_ele>&
32e0: 73 74 61 63 6b 2c 20 69 6e 74 20 63 75 72 53 74 stack, int curSt
32f0: 2c 20 69 6e 74 20 70 6f 73 29 0d 0a 7b 0d 0a 09 , int pos)..{...
3300: 2f 2f 20 83 c3 96 b3 8c c0 83 8b 81 5b 83 76 96 // .........[.v.
3310: 68 8e 7e 8d f4 81 42 93 af 82 b6 8f f3 91 d4 82 h.~...B.........
3320: c9 82 cd 96 df 82 e7 82 c8 82 a2 82 e6 82 a4 82 ................
3330: c9 81 63 0d 0a 09 66 6f 72 28 20 69 6e 74 20 69 ..c...for( int i
3340: 3d 73 74 61 63 6b 2e 73 69 7a 65 28 29 2d 31 3b =stack.size()-1;
3350: 20 69 3e 3d 30 3b 20 2d 2d 69 20 29 0d 0a 09 09 i>=0; --i )....
3360: 69 66 28 20 73 74 61 63 6b 5b 69 5d 2e 70 73 20 if( stack[i].ps
3370: 21 3d 20 70 6f 73 20 29 0d 0a 09 09 09 62 72 65 != pos ).....bre
3380: 61 6b 3b 0d 0a 09 09 65 6c 73 65 20 69 66 28 20 ak;....else if(
3390: 73 74 61 63 6b 5b 69 5d 2e 73 74 20 3d 3d 20 63 stack[i].st == c
33a0: 75 72 53 74 20 29 0d 0a 09 09 09 72 65 74 75 72 urSt ).....retur
33b0: 6e 3b 0d 0a 0d 0a 09 73 74 5f 65 6c 65 20 6e 77 n;.....st_ele nw
33c0: 20 3d 20 7b 63 75 72 53 74 2c 70 6f 73 7d 3b 0d = {curSt,pos};.
33d0: 0a 09 73 74 61 63 6b 2e 41 64 64 28 20 6e 77 20 ..stack.Add( nw
33e0: 29 3b 0d 0a 7d 0d 0a 0d 0a 52 65 67 4e 46 41 3a );..}....RegNFA:
33f0: 3a 73 74 5f 65 6c 65 20 52 65 67 4e 46 41 3a 3a :st_ele RegNFA::
3400: 70 6f 70 28 73 74 6f 72 61 67 65 3c 73 74 5f 65 pop(storage<st_e
3410: 6c 65 3e 26 20 73 74 61 63 6b 29 0d 0a 7b 0d 0a le>& stack)..{..
3420: 09 73 74 5f 65 6c 65 20 73 65 20 3d 20 73 74 61 .st_ele se = sta
3430: 63 6b 5b 73 74 61 63 6b 2e 73 69 7a 65 28 29 2d ck[stack.size()-
3440: 31 5d 3b 0d 0a 09 73 74 61 63 6b 2e 46 6f 72 63 1];...stack.Forc
3450: 65 53 69 7a 65 28 20 73 74 61 63 6b 2e 73 69 7a eSize( stack.siz
3460: 65 28 29 2d 31 20 29 3b 0d 0a 09 72 65 74 75 72 e()-1 );...retur
3470: 6e 20 73 65 3b 0d 0a 7d 0d 0a 0d 0a 69 6e 74 20 n se;..}....int
3480: 52 65 67 4e 46 41 3a 3a 6d 61 74 63 68 28 20 63 RegNFA::match( c
3490: 6f 6e 73 74 20 77 63 68 61 72 5f 74 2a 20 73 74 onst wchar_t* st
34a0: 72 2c 20 69 6e 74 20 6c 65 6e 2c 20 62 6f 6f 6c r, int len, bool
34b0: 20 63 61 73 65 53 20 29 0d 0a 7b 0d 0a 09 69 66 caseS )..{...if
34c0: 28 20 70 61 72 73 65 72 2e 65 72 72 28 29 20 29 ( parser.err() )
34d0: 0d 0a 09 09 72 65 74 75 72 6e 20 2d 31 3b 20 2f ....return -1; /
34e0: 2f 20 83 47 83 89 81 5b 8f f3 91 d4 82 c8 82 cc / .G...[........
34f0: 82 c5 6d 61 74 63 68 82 c6 82 a9 82 c5 82 ab 82 ..match.........
3500: dc 82 b9 82 f1 0d 0a 09 2f 2f 69 66 28 20 73 74 ........//if( st
3510: 2e 73 69 7a 65 28 29 20 3c 3d 20 33 31 20 29 0d .size() <= 31 ).
3520: 0a 09 2f 2f 09 72 65 74 75 72 6e 20 64 66 61 5f ..//.return dfa_
3530: 6d 61 74 63 68 28 73 74 72 2c 6c 65 6e 2c 63 61 match(str,len,ca
3540: 73 65 53 29 3b 20 2f 2f 20 8f f3 91 d4 90 94 82 seS); // .......
3550: aa 8f ad 82 c8 82 af 82 ea 82 ce 44 46 41 82 f0 ...........DFA..
3560: 8e 67 82 a4 81 41 82 a9 82 e0 0d 0a 0d 0a 09 69 .g...A.........i
3570: 6e 74 20 6d 61 74 63 68 70 6f 73 20 3d 20 2d 31 nt matchpos = -1
3580: 3b 0d 0a 0d 0a 09 73 74 6f 72 61 67 65 3c 73 74 ;.....storage<st
3590: 5f 65 6c 65 3e 20 73 74 61 63 6b 3b 0d 0a 09 70 _ele> stack;...p
35a0: 75 73 68 28 73 74 61 63 6b 2c 20 73 74 61 72 74 ush(stack, start
35b0: 2c 20 30 29 3b 0d 0a 09 77 68 69 6c 65 28 20 73 , 0);...while( s
35c0: 74 61 63 6b 2e 73 69 7a 65 28 29 20 3e 20 30 20 tack.size() > 0
35d0: 29 0d 0a 09 7b 0d 0a 09 09 2f 2f 20 83 58 83 5e )...{....// .X.^
35e0: 83 62 83 4e 82 a9 82 e7 70 6f 70 0d 0a 09 09 73 .b.N....pop....s
35f0: 74 5f 65 6c 65 20 73 65 20 3d 20 70 6f 70 28 73 t_ele se = pop(s
3600: 74 61 63 6b 29 3b 0d 0a 09 09 69 6e 74 20 63 75 tack);....int cu
3610: 72 53 74 20 3d 20 73 65 2e 73 74 3b 0d 0a 09 09 rSt = se.st;....
3620: 69 6e 74 20 20 20 70 6f 73 20 3d 20 73 65 2e 70 int pos = se.p
3630: 73 3b 0d 0a 0d 0a 09 09 2f 2f 20 83 7d 83 62 83 s;......// .}.b.
3640: 60 90 ac 8c f7 82 b5 82 c4 82 bd 82 e7 8b 4c 98 `.............L.
3650: 5e 0d 0a 09 09 69 66 28 20 63 75 72 53 74 20 3d ^....if( curSt =
3660: 3d 20 66 69 6e 61 6c 20 29 20 2f 2f 20 31 3d 3d = final ) // 1==
3670: 8f 49 8f f3 91 d4 0d 0a 09 09 09 69 66 28 20 6d .I.........if( m
3680: 61 74 63 68 70 6f 73 20 3c 20 70 6f 73 20 29 0d atchpos < pos ).
3690: 0a 09 09 09 09 6d 61 74 63 68 70 6f 73 20 3d 20 .....matchpos =
36a0: 70 6f 73 3b 0d 0a 0d 0a 09 09 2f 2f 20 82 b3 82 pos;......// ...
36b0: e7 82 c9 90 e6 82 cc 91 4a 88 da 82 f0 92 b2 82 ........J.......
36c0: d7 82 e9 0d 0a 09 09 69 66 28 20 6d 61 74 63 68 .......if( match
36d0: 70 6f 73 20 3c 20 6c 65 6e 20 29 0d 0a 09 09 09 pos < len ).....
36e0: 66 6f 72 28 20 52 65 67 54 72 61 6e 73 2a 20 74 for( RegTrans* t
36f0: 72 3d 73 74 5b 63 75 72 53 74 5d 3b 20 74 72 21 r=st[curSt]; tr!
3700: 3d 4e 55 4c 4c 3b 20 74 72 3d 74 72 2d 3e 6e 65 =NULL; tr=tr->ne
3710: 78 74 2e 67 65 74 28 29 20 29 0d 0a 09 09 09 09 xt.get() )......
3720: 69 66 28 20 74 72 2d 3e 74 79 70 65 20 3d 3d 20 if( tr->type ==
3730: 52 65 67 54 72 61 6e 73 3a 3a 45 70 73 69 6c 6f RegTrans::Epsilo
3740: 6e 20 29 0d 0a 09 09 09 09 09 70 75 73 68 28 73 n ).......push(s
3750: 74 61 63 6b 2c 20 74 72 2d 3e 74 6f 2c 20 70 6f tack, tr->to, po
3760: 73 29 3b 0d 0a 09 09 09 09 65 6c 73 65 20 69 66 s);......else if
3770: 28 20 70 6f 73 3c 6c 65 6e 20 26 26 20 74 72 2d ( pos<len && tr-
3780: 3e 6d 61 74 63 68 28 20 73 74 72 5b 70 6f 73 5d >match( str[pos]
3790: 2c 20 63 61 73 65 53 20 29 20 29 0d 0a 09 09 09 , caseS ) ).....
37a0: 09 09 70 75 73 68 28 73 74 61 63 6b 2c 20 74 72 ..push(stack, tr
37b0: 2d 3e 74 6f 2c 20 70 6f 73 2b 31 29 3b 0d 0a 09 ->to, pos+1);...
37c0: 7d 0d 0a 0d 0a 09 72 65 74 75 72 6e 20 6d 61 74 }.....return mat
37d0: 63 68 70 6f 73 3b 0d 0a 7d 0d 0a 0d 0a 69 6e 74 chpos;..}....int
37e0: 20 52 65 67 4e 46 41 3a 3a 64 66 61 5f 6d 61 74 RegNFA::dfa_mat
37f0: 63 68 28 20 63 6f 6e 73 74 20 77 63 68 61 72 5f ch( const wchar_
3800: 74 2a 20 73 74 72 2c 20 69 6e 74 20 6c 65 6e 2c t* str, int len,
3810: 20 62 6f 6f 6c 20 63 61 73 65 53 20 29 0d 0a 7b bool caseS )..{
3820: 0d 0a 09 69 6e 74 20 6d 61 74 63 68 70 6f 73 20 ...int matchpos
3830: 3d 20 2d 31 3b 0d 0a 0d 0a 09 75 6e 73 69 67 6e = -1;.....unsign
3840: 65 64 20 69 6e 74 20 53 74 61 74 65 53 65 74 20 ed int StateSet
3850: 3d 20 28 31 3c 3c 73 74 61 72 74 29 3b 0d 0a 09 = (1<<start);...
3860: 66 6f 72 28 69 6e 74 20 70 6f 73 3d 30 3b 20 53 for(int pos=0; S
3870: 74 61 74 65 53 65 74 3b 20 2b 2b 70 6f 73 29 0d tateSet; ++pos).
3880: 0a 09 7b 0d 0a 09 09 2f 2f 20 83 c3 2d 63 6c 6f ..{....// ..-clo
3890: 73 75 72 65 0d 0a 09 09 66 6f 72 28 75 69 6e 74 sure....for(uint
38a0: 20 44 69 66 53 53 3d 53 74 61 74 65 53 65 74 3b DifSS=StateSet;
38b0: 20 44 69 66 53 53 3b 29 0d 0a 09 09 7b 0d 0a 09 DifSS;)....{...
38c0: 09 09 75 6e 73 69 67 6e 65 64 20 69 6e 74 20 4e ..unsigned int N
38d0: 65 77 53 53 20 3d 20 30 3b 0d 0a 09 09 09 66 6f ewSS = 0;.....fo
38e0: 72 28 69 6e 74 20 73 3d 30 3b 20 28 31 75 3c 3c r(int s=0; (1u<<
38f0: 73 29 3c 3d 44 69 66 53 53 3b 20 2b 2b 73 29 0d s)<=DifSS; ++s).
3900: 0a 09 09 09 09 69 66 28 20 28 31 75 3c 3c 73 29 .....if( (1u<<s)
3910: 20 26 20 44 69 66 53 53 20 29 0d 0a 09 09 09 09 & DifSS )......
3920: 09 66 6f 72 28 20 52 65 67 54 72 61 6e 73 2a 20 .for( RegTrans*
3930: 74 72 3d 73 74 5b 73 5d 3b 20 74 72 21 3d 4e 55 tr=st[s]; tr!=NU
3940: 4c 4c 3b 20 74 72 3d 74 72 2d 3e 6e 65 78 74 2e LL; tr=tr->next.
3950: 67 65 74 28 29 20 29 0d 0a 09 09 09 09 09 09 69 get() )........i
3960: 66 28 20 74 72 2d 3e 74 79 70 65 20 3d 3d 20 52 f( tr->type == R
3970: 65 67 54 72 61 6e 73 3a 3a 45 70 73 69 6c 6f 6e egTrans::Epsilon
3980: 20 29 0d 0a 09 09 09 09 09 09 20 4e 65 77 53 53 )........ NewSS
3990: 20 7c 3d 20 31 75 20 3c 3c 20 74 72 2d 3e 74 6f |= 1u << tr->to
39a0: 3b 0d 0a 09 09 09 44 69 66 53 53 20 3d 20 28 4e ;.....DifSS = (N
39b0: 65 77 53 53 7c 53 74 61 74 65 53 65 74 29 20 5e ewSS|StateSet) ^
39c0: 20 53 74 61 74 65 53 65 74 3b 0d 0a 09 09 09 53 StateSet;.....S
39d0: 74 61 74 65 53 65 74 20 7c 3d 20 4e 65 77 53 53 tateSet |= NewSS
39e0: 3b 0d 0a 09 09 7d 0d 0a 0d 0a 09 09 2f 2f 20 8e ;....}......// .
39f0: f3 97 9d 8f f3 91 d4 82 f0 8a dc 82 f1 82 c5 82 ................
3a00: e9 82 a9 82 c7 82 a4 82 a9 94 bb 92 e8 0d 0a 09 ................
3a10: 09 69 66 28 20 53 74 61 74 65 53 65 74 20 26 20 .if( StateSet &
3a20: 28 31 3c 3c 66 69 6e 61 6c 29 20 29 0d 0a 09 09 (1<<final) )....
3a30: 09 6d 61 74 63 68 70 6f 73 20 3d 20 70 6f 73 3b .matchpos = pos;
3a40: 0d 0a 0d 0a 09 09 2f 2f 20 95 b6 8e 9a 97 f1 82 ......// .......
3a50: cc 8f 49 82 ed 82 e8 82 c9 92 42 82 b5 82 bd 0d ..I.......B.....
3a60: 0a 09 09 69 66 28 20 70 6f 73 20 3d 3d 20 6c 65 ...if( pos == le
3a70: 6e 20 29 0d 0a 09 09 09 62 72 65 61 6b 3b 0d 0a n ).....break;..
3a80: 0d 0a 09 09 2f 2f 20 91 4a 88 da 0d 0a 09 09 75 ....// .J......u
3a90: 6e 73 69 67 6e 65 64 20 69 6e 74 20 4e 65 77 53 nsigned int NewS
3aa0: 53 20 3d 20 30 3b 0d 0a 09 09 66 6f 72 28 69 6e S = 0;....for(in
3ab0: 74 20 73 3d 30 3b 20 28 31 75 3c 3c 73 29 3c 3d t s=0; (1u<<s)<=
3ac0: 53 74 61 74 65 53 65 74 3b 20 2b 2b 73 29 0d 0a StateSet; ++s)..
3ad0: 09 09 09 69 66 28 20 28 31 75 3c 3c 73 29 20 26 ...if( (1u<<s) &
3ae0: 20 53 74 61 74 65 53 65 74 20 29 0d 0a 09 09 09 StateSet ).....
3af0: 09 66 6f 72 28 20 52 65 67 54 72 61 6e 73 2a 20 .for( RegTrans*
3b00: 74 72 3d 73 74 5b 73 5d 3b 20 74 72 21 3d 4e 55 tr=st[s]; tr!=NU
3b10: 4c 4c 3b 20 74 72 3d 74 72 2d 3e 6e 65 78 74 2e LL; tr=tr->next.
3b20: 67 65 74 28 29 20 29 0d 0a 09 09 09 09 09 69 66 get() ).......if
3b30: 28 20 74 72 2d 3e 74 79 70 65 21 3d 52 65 67 54 ( tr->type!=RegT
3b40: 72 61 6e 73 3a 3a 45 70 73 69 6c 6f 6e 20 26 26 rans::Epsilon &&
3b50: 20 74 72 2d 3e 6d 61 74 63 68 28 73 74 72 5b 70 tr->match(str[p
3b60: 6f 73 5d 2c 20 63 61 73 65 53 29 20 29 0d 0a 09 os], caseS) )...
3b70: 09 09 09 09 20 4e 65 77 53 53 20 7c 3d 20 31 75 .... NewSS |= 1u
3b80: 20 3c 3c 20 74 72 2d 3e 74 6f 3b 0d 0a 09 09 53 << tr->to;....S
3b90: 74 61 74 65 53 65 74 20 3d 20 4e 65 77 53 53 3b tateSet = NewSS;
3ba0: 0d 0a 09 7d 0d 0a 0d 0a 09 72 65 74 75 72 6e 20 ...}.....return
3bb0: 6d 61 74 63 68 70 6f 73 3b 0d 0a 7d 0d 0a 0d 0a matchpos;..}....
3bc0: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f ////////////////
3bd0: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f ////////////////
3be0: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f ////////////////
3bf0: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f ////////////////
3c00: 2f 2f 2f 2f 2f 2f 0d 0a 0d 0a 62 6f 6f 6c 20 72 //////....bool r
3c10: 65 67 5f 6d 61 74 63 68 28 20 63 6f 6e 73 74 20 eg_match( const
3c20: 77 63 68 61 72 5f 74 2a 20 70 61 74 2c 20 63 6f wchar_t* pat, co
3c30: 6e 73 74 20 77 63 68 61 72 5f 74 2a 20 73 74 72 nst wchar_t* str
3c40: 2c 20 62 6f 6f 6c 20 63 61 73 65 53 20 29 0d 0a , bool caseS )..
3c50: 7b 0d 0a 09 69 6e 74 20 6c 65 6e 20 3d 20 6d 79 {...int len = my
3c60: 5f 6c 73 74 72 6c 65 6e 57 28 73 74 72 29 3b 0d _lstrlenW(str);.
3c70: 0a 0d 0a 09 52 65 67 4e 46 41 20 72 65 28 20 70 ....RegNFA re( p
3c80: 61 74 20 29 3b 0d 0a 09 72 65 74 75 72 6e 20 6c at );...return l
3c90: 65 6e 20 3d 3d 20 72 65 2e 6d 61 74 63 68 28 20 en == re.match(
3ca0: 73 74 72 2c 20 6c 65 6e 2c 20 63 61 73 65 53 20 str, len, caseS
3cb0: 29 3b 0d 0a 7d 0d 0a 0d 0a 0d 0a 0d 0a 2f 2f 3d );..}........//=
3cc0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
3cd0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
3ce0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
3cf0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
3d00: 3d 3d 3d 3d 3d 3d 3d 3d 0d 0a 2f 2f 40 7b 0d 0a ========..//@{..
3d10: 2f 2f 09 47 72 65 65 6e 50 61 64 97 70 8c 9f 8d //.GreenPad.p...
3d20: f5 83 49 83 75 83 57 83 46 83 4e 83 67 0d 0a 2f ..I.u.W.F.N.g../
3d30: 2f 40 7d 0d 0a 2f 2f 3d 3d 3d 3d 3d 3d 3d 3d 3d /@}..//=========
3d40: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
3d50: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
3d60: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
3d70: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
3d80: 0d 0a 0d 0a 52 53 65 61 72 63 68 3a 3a 52 53 65 ....RSearch::RSe
3d90: 61 72 63 68 28 20 63 6f 6e 73 74 20 75 6e 69 63 arch( const unic
3da0: 6f 64 65 2a 20 6b 65 79 2c 20 62 6f 6f 6c 20 63 ode* key, bool c
3db0: 61 73 65 53 2c 20 62 6f 6f 6c 20 64 6f 77 6e 20 aseS, bool down
3dc0: 29 0d 0a 09 3a 20 72 65 5f 20 20 20 20 28 20 6e )...: re_ ( n
3dd0: 65 77 20 52 65 67 4e 46 41 28 6b 65 79 29 20 29 ew RegNFA(key) )
3de0: 0d 0a 09 2c 20 63 61 73 65 53 5f 20 28 20 63 61 ..., caseS_ ( ca
3df0: 73 65 53 20 29 0d 0a 09 2c 20 64 6f 77 6e 5f 20 seS )..., down_
3e00: 20 28 20 64 6f 77 6e 20 29 0d 0a 7b 0d 0a 7d 0d ( down )..{..}.
3e10: 0a 0d 0a 62 6f 6f 6c 20 52 53 65 61 72 63 68 3a ...bool RSearch:
3e20: 3a 53 65 61 72 63 68 28 0d 0a 09 63 6f 6e 73 74 :Search(...const
3e30: 20 75 6e 69 63 6f 64 65 2a 20 73 74 72 2c 20 75 unicode* str, u
3e40: 6c 6f 6e 67 20 6c 65 6e 2c 20 75 6c 6f 6e 67 20 long len, ulong
3e50: 73 74 74 2c 20 75 6c 6f 6e 67 2a 20 6d 62 67 2c stt, ulong* mbg,
3e60: 20 75 6c 6f 6e 67 2a 20 6d 65 64 20 29 0d 0a 7b ulong* med )..{
3e70: 0d 0a 09 69 66 28 20 64 6f 77 6e 5f 20 26 26 20 ...if( down_ &&
3e80: 72 65 5f 2d 3e 69 73 48 65 61 64 54 79 70 65 28 re_->isHeadType(
3e90: 29 20 26 26 20 73 74 74 3e 30 20 29 0d 0a 09 09 ) && stt>0 )....
3ea0: 72 65 74 75 72 6e 20 66 61 6c 73 65 3b 0d 0a 0d return false;...
3eb0: 0a 09 63 6f 6e 73 74 20 69 6e 74 20 64 20 3d 20 ..const int d =
3ec0: 28 64 6f 77 6e 5f 20 3f 20 31 20 3a 20 2d 31 29 (down_ ? 1 : -1)
3ed0: 3b 0d 0a 09 20 20 20 20 20 20 69 6e 74 20 73 20 ;... int s
3ee0: 3d 20 28 21 64 6f 77 6e 5f 20 26 26 20 72 65 5f = (!down_ && re_
3ef0: 2d 3e 69 73 48 65 61 64 54 79 70 65 28 29 20 3f ->isHeadType() ?
3f00: 20 30 20 3a 20 73 74 74 29 3b 0d 0a 09 63 6f 6e 0 : stt);...con
3f10: 73 74 20 69 6e 74 20 65 20 3d 20 28 64 6f 77 6e st int e = (down
3f20: 5f 20 3f 20 28 72 65 5f 2d 3e 69 73 48 65 61 64 _ ? (re_->isHead
3f30: 54 79 70 65 28 29 20 3f 20 31 20 3a 20 28 6c 6f Type() ? 1 : (lo
3f40: 6e 67 29 6c 65 6e 29 20 3a 20 2d 31 29 3b 0d 0a ng)len) : -1);..
3f50: 0d 0a 09 66 6f 72 28 20 3b 20 73 21 3d 65 3b 20 ...for( ; s!=e;
3f60: 73 2b 3d 64 20 29 0d 0a 09 7b 0d 0a 09 09 63 6f s+=d )...{....co
3f70: 6e 73 74 20 69 6e 74 20 4c 20 3d 20 72 65 5f 2d nst int L = re_-
3f80: 3e 6d 61 74 63 68 28 20 73 74 72 2b 73 2c 20 6c >match( str+s, l
3f90: 65 6e 2d 73 2c 20 63 61 73 65 53 5f 20 29 3b 0d en-s, caseS_ );.
3fa0: 0a 09 09 69 66 28 20 4c 20 3e 20 30 20 29 0d 0a ...if( L > 0 )..
3fb0: 09 09 7b 0d 0a 09 09 09 69 66 28 20 72 65 5f 2d ..{.....if( re_-
3fc0: 3e 69 73 54 61 69 6c 54 79 70 65 28 29 20 26 26 >isTailType() &&
3fd0: 20 4c 21 3d 73 74 61 74 69 63 5f 63 61 73 74 3c L!=static_cast<
3fe0: 69 6e 74 3e 28 6c 65 6e 2d 73 29 20 29 0d 0a 09 int>(len-s) )...
3ff0: 09 09 09 63 6f 6e 74 69 6e 75 65 3b 0d 0a 09 09 ...continue;....
4000: 09 2a 6d 62 67 20 3d 20 73 74 61 74 69 63 5f 63 .*mbg = static_c
4010: 61 73 74 3c 75 6c 6f 6e 67 3e 28 73 29 3b 0d 0a ast<ulong>(s);..
4020: 09 09 09 2a 6d 65 64 20 3d 20 73 74 61 74 69 63 ...*med = static
4030: 5f 63 61 73 74 3c 75 6c 6f 6e 67 3e 28 73 2b 4c _cast<ulong>(s+L
4040: 29 3b 0d 0a 09 09 09 72 65 74 75 72 6e 20 74 72 );.....return tr
4050: 75 65 3b 0d 0a 09 09 7d 0d 0a 09 7d 0d 0a 0d 0a ue;....}...}....
4060: 09 72 65 74 75 72 6e 20 66 61 6c 73 65 3b 0d 0a .return false;..
4070: 7d 0d 0a 0d 0a 0d 0a }......