home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: SHell self-extracting ARchive
(archive/shar).
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| dexvert
| Newsgroup Content (archive/news)
| magic
| Supported |
| 100%
| dexvert
| SHell self-extracting ARchive (archive/shar)
| magic
| Supported |
| 100%
| dexvert
| Internet Message Format (text/imf)
| magic
| Supported |
| 1%
| dexvert
| Text File (text/txt)
| fallback
| Supported |
| 100%
| file
| news or mail, ASCII text
| default
| |
| 100%
| perlTextCheck
| Likely Text (Perl)
| default
| |
| 100%
| siegfried
| fmt/329 Shell Archive Format
| default
| |
| 100%
| detectItEasy
| Format: plain text[LF]
| default (weak)
| |
| 100%
| xdgMime
| message/rfc822
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 53 75 62 6a 65 63 74 3a | 20 20 76 32 34 69 30 32 |Subject:| v24i02|
|00000010| 32 3a 20 20 47 4e 55 20 | 44 69 66 66 2c 20 76 65 |2: GNU |Diff, ve|
|00000020| 72 73 69 6f 6e 20 31 2e | 31 35 2c 20 50 61 72 74 |rsion 1.|15, Part|
|00000030| 30 37 2f 30 38 0a 4e 65 | 77 73 67 72 6f 75 70 73 |07/08.Ne|wsgroups|
|00000040| 3a 20 63 6f 6d 70 2e 73 | 6f 75 72 63 65 73 2e 75 |: comp.s|ources.u|
|00000050| 6e 69 78 0a 41 70 70 72 | 6f 76 65 64 3a 20 72 73 |nix.Appr|oved: rs|
|00000060| 61 6c 7a 40 75 75 6e 65 | 74 2e 55 55 2e 4e 45 54 |alz@uune|t.UU.NET|
|00000070| 0a 58 2d 43 68 65 63 6b | 73 75 6d 2d 53 6e 65 66 |.X-Check|sum-Snef|
|00000080| 72 75 3a 20 32 63 35 35 | 36 63 34 63 20 66 65 61 |ru: 2c55|6c4c fea|
|00000090| 35 30 66 62 63 20 61 31 | 31 61 65 61 64 36 20 39 |50fbc a1|1aead6 9|
|000000a0| 66 64 64 31 39 39 31 0a | 0a 53 75 62 6d 69 74 74 |fdd1991.|.Submitt|
|000000b0| 65 64 2d 62 79 3a 20 50 | 61 75 6c 20 45 67 67 65 |ed-by: P|aul Egge|
|000000c0| 72 74 20 3c 65 67 67 65 | 72 74 40 74 77 69 6e 73 |rt <egge|rt@twins|
|000000d0| 75 6e 2e 63 6f 6d 3e 0a | 50 6f 73 74 69 6e 67 2d |un.com>.|Posting-|
|000000e0| 6e 75 6d 62 65 72 3a 20 | 56 6f 6c 75 6d 65 20 32 |number: |Volume 2|
|000000f0| 34 2c 20 49 73 73 75 65 | 20 32 32 0a 41 72 63 68 |4, Issue| 22.Arch|
|00000100| 69 76 65 2d 6e 61 6d 65 | 3a 20 67 6e 75 64 69 66 |ive-name|: gnudif|
|00000110| 66 31 2e 31 35 2f 70 61 | 72 74 30 37 0a 0a 23 21 |f1.15/pa|rt07..#!|
|00000120| 20 2f 62 69 6e 2f 73 68 | 0a 23 20 54 68 69 73 20 | /bin/sh|.# This |
|00000130| 69 73 20 61 20 73 68 65 | 6c 6c 20 61 72 63 68 69 |is a she|ll archi|
|00000140| 76 65 2e 20 20 52 65 6d | 6f 76 65 20 61 6e 79 74 |ve. Rem|ove anyt|
|00000150| 68 69 6e 67 20 62 65 66 | 6f 72 65 20 74 68 69 73 |hing bef|ore this|
|00000160| 20 6c 69 6e 65 2c 20 74 | 68 65 6e 20 75 6e 70 61 | line, t|hen unpa|
|00000170| 63 6b 0a 23 20 69 74 20 | 62 79 20 73 61 76 69 6e |ck.# it |by savin|
|00000180| 67 20 69 74 20 69 6e 74 | 6f 20 61 20 66 69 6c 65 |g it int|o a file|
|00000190| 20 61 6e 64 20 74 79 70 | 69 6e 67 20 22 73 68 20 | and typ|ing "sh |
|000001a0| 66 69 6c 65 22 2e 20 20 | 54 6f 20 6f 76 65 72 77 |file". |To overw|
|000001b0| 72 69 74 65 20 65 78 69 | 73 74 69 6e 67 0a 23 20 |rite exi|sting.# |
|000001c0| 66 69 6c 65 73 2c 20 74 | 79 70 65 20 22 73 68 20 |files, t|ype "sh |
|000001d0| 66 69 6c 65 20 2d 63 22 | 2e 20 20 59 6f 75 20 63 |file -c"|. You c|
|000001e0| 61 6e 20 61 6c 73 6f 20 | 66 65 65 64 20 74 68 69 |an also |feed thi|
|000001f0| 73 20 61 73 20 73 74 61 | 6e 64 61 72 64 20 69 6e |s as sta|ndard in|
|00000200| 70 75 74 20 76 69 61 0a | 23 20 75 6e 73 68 61 72 |put via.|# unshar|
|00000210| 2c 20 6f 72 20 62 79 20 | 74 79 70 69 6e 67 20 22 |, or by |typing "|
|00000220| 73 68 20 3c 66 69 6c 65 | 22 2c 20 65 2e 67 2e 2e |sh <file|", e.g..|
|00000230| 20 20 49 66 20 74 68 69 | 73 20 61 72 63 68 69 76 | If thi|s archiv|
|00000240| 65 20 69 73 20 63 6f 6d | 70 6c 65 74 65 2c 20 79 |e is com|plete, y|
|00000250| 6f 75 0a 23 20 77 69 6c | 6c 20 73 65 65 20 74 68 |ou.# wil|l see th|
|00000260| 65 20 66 6f 6c 6c 6f 77 | 69 6e 67 20 6d 65 73 73 |e follow|ing mess|
|00000270| 61 67 65 20 61 74 20 74 | 68 65 20 65 6e 64 3a 0a |age at t|he end:.|
|00000280| 23 09 09 22 45 6e 64 20 | 6f 66 20 61 72 63 68 69 |#.."End |of archi|
|00000290| 76 65 20 37 20 28 6f 66 | 20 38 29 2e 22 0a 23 20 |ve 7 (of| 8).".# |
|000002a0| 43 6f 6e 74 65 6e 74 73 | 3a 20 20 72 65 67 65 78 |Contents|: regex|
|000002b0| 2e 63 31 0a 23 20 57 72 | 61 70 70 65 64 20 62 79 |.c1.# Wr|apped by|
|000002c0| 20 65 67 67 65 72 74 40 | 61 74 61 20 6f 6e 20 4d | eggert@|ata on M|
|000002d0| 6f 6e 20 4a 61 6e 20 20 | 37 20 31 31 3a 32 35 3a |on Jan |7 11:25:|
|000002e0| 33 31 20 31 39 39 31 0a | 50 41 54 48 3d 2f 62 69 |31 1991.|PATH=/bi|
|000002f0| 6e 3a 2f 75 73 72 2f 62 | 69 6e 3a 2f 75 73 72 2f |n:/usr/b|in:/usr/|
|00000300| 75 63 62 20 3b 20 65 78 | 70 6f 72 74 20 50 41 54 |ucb ; ex|port PAT|
|00000310| 48 0a 69 66 20 74 65 73 | 74 20 2d 66 20 27 72 65 |H.if tes|t -f 're|
|00000320| 67 65 78 2e 63 31 27 20 | 2d 61 20 22 24 7b 31 7d |gex.c1' |-a "${1}|
|00000330| 22 20 21 3d 20 22 2d 63 | 22 20 3b 20 74 68 65 6e |" != "-c|" ; then|
|00000340| 20 0a 20 20 65 63 68 6f | 20 73 68 61 72 3a 20 57 | . echo| shar: W|
|00000350| 69 6c 6c 20 6e 6f 74 20 | 63 6c 6f 62 62 65 72 20 |ill not |clobber |
|00000360| 65 78 69 73 74 69 6e 67 | 20 66 69 6c 65 20 5c 22 |existing| file \"|
|00000370| 27 72 65 67 65 78 2e 63 | 31 27 5c 22 0a 65 6c 73 |'regex.c|1'\".els|
|00000380| 65 0a 65 63 68 6f 20 73 | 68 61 72 3a 20 45 78 74 |e.echo s|har: Ext|
|00000390| 72 61 63 74 69 6e 67 20 | 5c 22 27 72 65 67 65 78 |racting |\"'regex|
|000003a0| 2e 63 31 27 5c 22 20 5c | 28 34 35 34 37 32 20 63 |.c1'\" \|(45472 c|
|000003b0| 68 61 72 61 63 74 65 72 | 73 5c 29 0a 73 65 64 20 |haracter|s\).sed |
|000003c0| 22 73 2f 5e 58 2f 2f 22 | 20 3e 27 72 65 67 65 78 |"s/^X//"| >'regex|
|000003d0| 2e 63 31 27 20 3c 3c 27 | 45 4e 44 5f 4f 46 5f 46 |.c1' <<'|END_OF_F|
|000003e0| 49 4c 45 27 0a 58 2f 2a | 20 45 78 74 65 6e 64 65 |ILE'.X/*| Extende|
|000003f0| 64 20 72 65 67 75 6c 61 | 72 20 65 78 70 72 65 73 |d regula|r expres|
|00000400| 73 69 6f 6e 20 6d 61 74 | 63 68 69 6e 67 20 61 6e |sion mat|ching an|
|00000410| 64 20 73 65 61 72 63 68 | 20 6c 69 62 72 61 72 79 |d search| library|
|00000420| 2e 0a 58 20 20 20 43 6f | 70 79 72 69 67 68 74 20 |..X Co|pyright |
|00000430| 28 43 29 20 31 39 38 35 | 2c 20 31 39 38 39 2d 39 |(C) 1985|, 1989-9|
|00000440| 30 20 46 72 65 65 20 53 | 6f 66 74 77 61 72 65 20 |0 Free S|oftware |
|00000450| 46 6f 75 6e 64 61 74 69 | 6f 6e 2c 20 49 6e 63 2e |Foundati|on, Inc.|
|00000460| 0a 58 0a 58 20 20 20 54 | 68 69 73 20 70 72 6f 67 |.X.X T|his prog|
|00000470| 72 61 6d 20 69 73 20 66 | 72 65 65 20 73 6f 66 74 |ram is f|ree soft|
|00000480| 77 61 72 65 3b 20 79 6f | 75 20 63 61 6e 20 72 65 |ware; yo|u can re|
|00000490| 64 69 73 74 72 69 62 75 | 74 65 20 69 74 20 61 6e |distribu|te it an|
|000004a0| 64 2f 6f 72 20 6d 6f 64 | 69 66 79 0a 58 20 20 20 |d/or mod|ify.X |
|000004b0| 69 74 20 75 6e 64 65 72 | 20 74 68 65 20 74 65 72 |it under| the ter|
|000004c0| 6d 73 20 6f 66 20 74 68 | 65 20 47 4e 55 20 47 65 |ms of th|e GNU Ge|
|000004d0| 6e 65 72 61 6c 20 50 75 | 62 6c 69 63 20 4c 69 63 |neral Pu|blic Lic|
|000004e0| 65 6e 73 65 20 61 73 20 | 70 75 62 6c 69 73 68 65 |ense as |publishe|
|000004f0| 64 20 62 79 0a 58 20 20 | 20 74 68 65 20 46 72 65 |d by.X | the Fre|
|00000500| 65 20 53 6f 66 74 77 61 | 72 65 20 46 6f 75 6e 64 |e Softwa|re Found|
|00000510| 61 74 69 6f 6e 3b 20 65 | 69 74 68 65 72 20 76 65 |ation; e|ither ve|
|00000520| 72 73 69 6f 6e 20 31 2c | 20 6f 72 20 28 61 74 20 |rsion 1,| or (at |
|00000530| 79 6f 75 72 20 6f 70 74 | 69 6f 6e 29 0a 58 20 20 |your opt|ion).X |
|00000540| 20 61 6e 79 20 6c 61 74 | 65 72 20 76 65 72 73 69 | any lat|er versi|
|00000550| 6f 6e 2e 0a 58 0a 58 20 | 20 20 54 68 69 73 20 70 |on..X.X | This p|
|00000560| 72 6f 67 72 61 6d 20 69 | 73 20 64 69 73 74 72 69 |rogram i|s distri|
|00000570| 62 75 74 65 64 20 69 6e | 20 74 68 65 20 68 6f 70 |buted in| the hop|
|00000580| 65 20 74 68 61 74 20 69 | 74 20 77 69 6c 6c 20 62 |e that i|t will b|
|00000590| 65 20 75 73 65 66 75 6c | 2c 0a 58 20 20 20 62 75 |e useful|,.X bu|
|000005a0| 74 20 57 49 54 48 4f 55 | 54 20 41 4e 59 20 57 41 |t WITHOU|T ANY WA|
|000005b0| 52 52 41 4e 54 59 3b 20 | 77 69 74 68 6f 75 74 20 |RRANTY; |without |
|000005c0| 65 76 65 6e 20 74 68 65 | 20 69 6d 70 6c 69 65 64 |even the| implied|
|000005d0| 20 77 61 72 72 61 6e 74 | 79 20 6f 66 0a 58 20 20 | warrant|y of.X |
|000005e0| 20 4d 45 52 43 48 41 4e | 54 41 42 49 4c 49 54 59 | MERCHAN|TABILITY|
|000005f0| 20 6f 72 20 46 49 54 4e | 45 53 53 20 46 4f 52 20 | or FITN|ESS FOR |
|00000600| 41 20 50 41 52 54 49 43 | 55 4c 41 52 20 50 55 52 |A PARTIC|ULAR PUR|
|00000610| 50 4f 53 45 2e 20 20 53 | 65 65 20 74 68 65 0a 58 |POSE. S|ee the.X|
|00000620| 20 20 20 47 4e 55 20 47 | 65 6e 65 72 61 6c 20 50 | GNU G|eneral P|
|00000630| 75 62 6c 69 63 20 4c 69 | 63 65 6e 73 65 20 66 6f |ublic Li|cense fo|
|00000640| 72 20 6d 6f 72 65 20 64 | 65 74 61 69 6c 73 2e 0a |r more d|etails..|
|00000650| 58 0a 58 20 20 20 59 6f | 75 20 73 68 6f 75 6c 64 |X.X Yo|u should|
|00000660| 20 68 61 76 65 20 72 65 | 63 65 69 76 65 64 20 61 | have re|ceived a|
|00000670| 20 63 6f 70 79 20 6f 66 | 20 74 68 65 20 47 4e 55 | copy of| the GNU|
|00000680| 20 47 65 6e 65 72 61 6c | 20 50 75 62 6c 69 63 20 | General| Public |
|00000690| 4c 69 63 65 6e 73 65 0a | 58 20 20 20 61 6c 6f 6e |License.|X alon|
|000006a0| 67 20 77 69 74 68 20 74 | 68 69 73 20 70 72 6f 67 |g with t|his prog|
|000006b0| 72 61 6d 3b 20 69 66 20 | 6e 6f 74 2c 20 77 72 69 |ram; if |not, wri|
|000006c0| 74 65 20 74 6f 20 74 68 | 65 20 46 72 65 65 20 53 |te to th|e Free S|
|000006d0| 6f 66 74 77 61 72 65 0a | 58 20 20 20 46 6f 75 6e |oftware.|X Foun|
|000006e0| 64 61 74 69 6f 6e 2c 20 | 49 6e 63 2e 2c 20 36 37 |dation, |Inc., 67|
|000006f0| 35 20 4d 61 73 73 20 41 | 76 65 2c 20 43 61 6d 62 |5 Mass A|ve, Camb|
|00000700| 72 69 64 67 65 2c 20 4d | 41 20 30 32 31 33 39 2c |ridge, M|A 02139,|
|00000710| 20 55 53 41 2e 20 20 2a | 2f 0a 58 0a 58 0a 58 2f | USA. *|/.X.X.X/|
|00000720| 2a 20 54 6f 20 74 65 73 | 74 2c 20 63 6f 6d 70 69 |* To tes|t, compi|
|00000730| 6c 65 20 77 69 74 68 20 | 2d 44 74 65 73 74 2e 20 |le with |-Dtest. |
|00000740| 20 54 68 69 73 20 44 74 | 65 73 74 61 62 6c 65 20 | This Dt|estable |
|00000750| 66 65 61 74 75 72 65 20 | 74 75 72 6e 73 20 74 68 |feature |turns th|
|00000760| 69 73 20 69 6e 74 6f 0a | 58 20 20 20 61 20 73 65 |is into.|X a se|
|00000770| 6c 66 2d 63 6f 6e 74 61 | 69 6e 65 64 20 70 72 6f |lf-conta|ined pro|
|00000780| 67 72 61 6d 20 77 68 69 | 63 68 20 72 65 61 64 73 |gram whi|ch reads|
|00000790| 20 61 20 70 61 74 74 65 | 72 6e 2c 20 64 65 73 63 | a patte|rn, desc|
|000007a0| 72 69 62 65 73 20 68 6f | 77 20 69 74 0a 58 20 20 |ribes ho|w it.X |
|000007b0| 20 63 6f 6d 70 69 6c 65 | 73 2c 20 74 68 65 6e 20 | compile|s, then |
|000007c0| 72 65 61 64 73 20 61 20 | 73 74 72 69 6e 67 20 61 |reads a |string a|
|000007d0| 6e 64 20 73 65 61 72 63 | 68 65 73 20 66 6f 72 20 |nd searc|hes for |
|000007e0| 69 74 2e 0a 58 20 20 20 | 0a 58 20 20 20 4f 6e 20 |it..X |.X On |
|000007f0| 74 68 65 20 6f 74 68 65 | 72 20 68 61 6e 64 2c 20 |the othe|r hand, |
|00000800| 69 66 20 79 6f 75 20 63 | 6f 6d 70 69 6c 65 20 77 |if you c|ompile w|
|00000810| 69 74 68 20 62 6f 74 68 | 20 2d 44 74 65 73 74 20 |ith both| -Dtest |
|00000820| 61 6e 64 20 2d 44 63 61 | 6e 6e 65 64 20 79 6f 75 |and -Dca|nned you|
|00000830| 0a 58 20 20 20 63 61 6e | 20 72 75 6e 20 73 6f 6d |.X can| run som|
|00000840| 65 20 74 65 73 74 73 20 | 77 65 27 76 65 20 61 6c |e tests |we've al|
|00000850| 72 65 61 64 79 20 74 68 | 6f 75 67 68 74 20 6f 66 |ready th|ought of|
|00000860| 2e 20 20 2a 2f 0a 58 0a | 58 0a 58 23 69 66 64 65 |. */.X.|X.X#ifde|
|00000870| 66 20 65 6d 61 63 73 0a | 58 0a 58 2f 2a 20 54 68 |f emacs.|X.X/* Th|
|00000880| 65 20 60 65 6d 61 63 73 | 27 20 73 77 69 74 63 68 |e `emacs|' switch|
|00000890| 20 74 75 72 6e 73 20 6f | 6e 20 63 65 72 74 61 69 | turns o|n certai|
|000008a0| 6e 20 73 70 65 63 69 61 | 6c 20 6d 61 74 63 68 69 |n specia|l matchi|
|000008b0| 6e 67 20 63 6f 6d 6d 61 | 6e 64 73 0a 58 20 20 74 |ng comma|nds.X t|
|000008c0| 68 61 74 20 6d 61 6b 65 | 20 73 65 6e 73 65 20 6f |hat make| sense o|
|000008d0| 6e 6c 79 20 69 6e 20 65 | 6d 61 63 73 2e 20 2a 2f |nly in e|macs. */|
|000008e0| 0a 58 0a 58 23 69 6e 63 | 6c 75 64 65 20 22 63 6f |.X.X#inc|lude "co|
|000008f0| 6e 66 69 67 2e 68 22 0a | 58 23 69 6e 63 6c 75 64 |nfig.h".|X#includ|
|00000900| 65 20 22 6c 69 73 70 2e | 68 22 0a 58 23 69 6e 63 |e "lisp.|h".X#inc|
|00000910| 6c 75 64 65 20 22 62 75 | 66 66 65 72 2e 68 22 0a |lude "bu|ffer.h".|
|00000920| 58 23 69 6e 63 6c 75 64 | 65 20 22 73 79 6e 74 61 |X#includ|e "synta|
|00000930| 78 2e 68 22 0a 58 0a 58 | 23 65 6c 73 65 20 20 2f |x.h".X.X|#else /|
|00000940| 2a 20 6e 6f 74 20 65 6d | 61 63 73 20 2a 2f 0a 58 |* not em|acs */.X|
|00000950| 0a 58 23 69 66 20 64 65 | 66 69 6e 65 64 20 28 55 |.X#if de|fined (U|
|00000960| 53 47 29 20 7c 7c 20 64 | 65 66 69 6e 65 64 20 28 |SG) || d|efined (|
|00000970| 53 54 44 43 5f 48 45 41 | 44 45 52 53 29 0a 58 23 |STDC_HEA|DERS).X#|
|00000980| 69 66 6e 64 65 66 20 42 | 53 54 52 49 4e 47 0a 58 |ifndef B|STRING.X|
|00000990| 23 69 6e 63 6c 75 64 65 | 20 3c 73 74 72 69 6e 67 |#include| <string|
|000009a0| 2e 68 3e 0a 58 23 64 65 | 66 69 6e 65 20 62 63 6f |.h>.X#de|fine bco|
|000009b0| 70 79 28 73 2c 64 2c 6e | 29 09 6d 65 6d 63 70 79 |py(s,d,n|).memcpy|
|000009c0| 28 28 64 29 2c 28 73 29 | 2c 28 6e 29 29 0a 58 23 |((d),(s)|,(n)).X#|
|000009d0| 64 65 66 69 6e 65 20 62 | 63 6d 70 28 73 31 2c 73 |define b|cmp(s1,s|
|000009e0| 32 2c 6e 29 09 6d 65 6d | 63 6d 70 28 28 73 31 29 |2,n).mem|cmp((s1)|
|000009f0| 2c 28 73 32 29 2c 28 6e | 29 29 0a 58 23 64 65 66 |,(s2),(n|)).X#def|
|00000a00| 69 6e 65 20 62 7a 65 72 | 6f 28 73 2c 6e 29 09 6d |ine bzer|o(s,n).m|
|00000a10| 65 6d 73 65 74 28 28 73 | 29 2c 30 2c 28 6e 29 29 |emset((s|),0,(n))|
|00000a20| 0a 58 23 65 6e 64 69 66 | 0a 58 23 65 6e 64 69 66 |.X#endif|.X#endif|
|00000a30| 0a 58 0a 58 23 69 66 64 | 65 66 20 53 54 44 43 5f |.X.X#ifd|ef STDC_|
|00000a40| 48 45 41 44 45 52 53 0a | 58 23 69 6e 63 6c 75 64 |HEADERS.|X#includ|
|00000a50| 65 20 3c 73 74 64 6c 69 | 62 2e 68 3e 0a 58 23 65 |e <stdli|b.h>.X#e|
|00000a60| 6c 73 65 0a 58 63 68 61 | 72 20 2a 6d 61 6c 6c 6f |lse.Xcha|r *mallo|
|00000a70| 63 20 28 29 3b 0a 58 63 | 68 61 72 20 2a 72 65 61 |c ();.Xc|har *rea|
|00000a80| 6c 6c 6f 63 20 28 29 3b | 0a 58 23 65 6e 64 69 66 |lloc ();|.X#endif|
|00000a90| 0a 58 0a 58 2f 2a 20 4d | 61 6b 65 20 61 6c 6c 6f |.X.X/* M|ake allo|
|00000aa0| 63 61 20 77 6f 72 6b 20 | 74 68 65 20 62 65 73 74 |ca work |the best|
|00000ab0| 20 70 6f 73 73 69 62 6c | 65 20 77 61 79 2e 20 20 | possibl|e way. |
|00000ac0| 2a 2f 0a 58 23 69 66 64 | 65 66 20 5f 5f 47 4e 55 |*/.X#ifd|ef __GNU|
|00000ad0| 43 5f 5f 0a 58 23 64 65 | 66 69 6e 65 20 61 6c 6c |C__.X#de|fine all|
|00000ae0| 6f 63 61 20 5f 5f 62 75 | 69 6c 74 69 6e 5f 61 6c |oca __bu|iltin_al|
|00000af0| 6c 6f 63 61 0a 58 23 65 | 6c 73 65 0a 58 23 69 66 |loca.X#e|lse.X#if|
|00000b00| 64 65 66 20 73 70 61 72 | 63 0a 58 23 69 6e 63 6c |def spar|c.X#incl|
|00000b10| 75 64 65 20 3c 61 6c 6c | 6f 63 61 2e 68 3e 0a 58 |ude <all|oca.h>.X|
|00000b20| 23 65 6c 73 65 0a 58 63 | 68 61 72 20 2a 61 6c 6c |#else.Xc|har *all|
|00000b30| 6f 63 61 20 28 29 3b 0a | 58 23 65 6e 64 69 66 0a |oca ();.|X#endif.|
|00000b40| 58 23 65 6e 64 69 66 0a | 58 0a 58 0a 58 2f 2a 20 |X#endif.|X.X.X/* |
|00000b50| 44 65 66 69 6e 65 20 74 | 68 65 20 73 79 6e 74 61 |Define t|he synta|
|00000b60| 78 20 73 74 75 66 66 2c | 20 73 6f 20 77 65 20 63 |x stuff,| so we c|
|00000b70| 61 6e 20 64 6f 20 74 68 | 65 20 5c 3c 2c 20 5c 3e |an do th|e \<, \>|
|00000b80| 2c 20 65 74 63 2e 20 20 | 2a 2f 0a 58 0a 58 2f 2a |, etc. |*/.X.X/*|
|00000b90| 20 54 68 69 73 20 6d 75 | 73 74 20 62 65 20 6e 6f | This mu|st be no|
|00000ba0| 6e 7a 65 72 6f 20 66 6f | 72 20 74 68 65 20 77 6f |nzero fo|r the wo|
|00000bb0| 72 64 63 68 61 72 20 61 | 6e 64 20 6e 6f 74 77 6f |rdchar a|nd notwo|
|00000bc0| 72 64 63 68 61 72 20 70 | 61 74 74 65 72 6e 0a 58 |rdchar p|attern.X|
|00000bd0| 20 20 20 63 6f 6d 6d 61 | 6e 64 73 20 69 6e 20 72 | comma|nds in r|
|00000be0| 65 5f 6d 61 74 63 68 5f | 32 2e 20 20 2a 2f 0a 58 |e_match_|2. */.X|
|00000bf0| 23 69 66 6e 64 65 66 20 | 53 77 6f 72 64 20 0a 58 |#ifndef |Sword .X|
|00000c00| 23 64 65 66 69 6e 65 20 | 53 77 6f 72 64 20 31 0a |#define |Sword 1.|
|00000c10| 58 23 65 6e 64 69 66 0a | 58 0a 58 23 64 65 66 69 |X#endif.|X.X#defi|
|00000c20| 6e 65 20 53 59 4e 54 41 | 58 28 63 29 20 72 65 5f |ne SYNTA|X(c) re_|
|00000c30| 73 79 6e 74 61 78 5f 74 | 61 62 6c 65 5b 63 5d 0a |syntax_t|able[c].|
|00000c40| 58 0a 58 0a 58 23 69 66 | 64 65 66 20 53 59 4e 54 |X.X.X#if|def SYNT|
|00000c50| 41 58 5f 54 41 42 4c 45 | 0a 58 0a 58 63 68 61 72 |AX_TABLE|.X.Xchar|
|00000c60| 20 2a 72 65 5f 73 79 6e | 74 61 78 5f 74 61 62 6c | *re_syn|tax_tabl|
|00000c70| 65 3b 0a 58 0a 58 23 65 | 6c 73 65 20 2f 2a 20 6e |e;.X.X#e|lse /* n|
|00000c80| 6f 74 20 53 59 4e 54 41 | 58 5f 54 41 42 4c 45 20 |ot SYNTA|X_TABLE |
|00000c90| 2a 2f 0a 58 0a 58 73 74 | 61 74 69 63 20 63 68 61 |*/.X.Xst|atic cha|
|00000ca0| 72 20 72 65 5f 73 79 6e | 74 61 78 5f 74 61 62 6c |r re_syn|tax_tabl|
|00000cb0| 65 5b 32 35 36 5d 3b 0a | 58 0a 58 0a 58 73 74 61 |e[256];.|X.X.Xsta|
|00000cc0| 74 69 63 20 76 6f 69 64 | 0a 58 69 6e 69 74 5f 73 |tic void|.Xinit_s|
|00000cd0| 79 6e 74 61 78 5f 6f 6e | 63 65 20 28 29 0a 58 7b |yntax_on|ce ().X{|
|00000ce0| 0a 58 20 20 20 72 65 67 | 69 73 74 65 72 20 69 6e |.X reg|ister in|
|00000cf0| 74 20 63 3b 0a 58 20 20 | 20 73 74 61 74 69 63 20 |t c;.X | static |
|00000d00| 69 6e 74 20 64 6f 6e 65 | 20 3d 20 30 3b 0a 58 0a |int done| = 0;.X.|
|00000d10| 58 20 20 20 69 66 20 28 | 64 6f 6e 65 29 0a 58 20 |X if (|done).X |
|00000d20| 20 20 20 20 72 65 74 75 | 72 6e 3b 0a 58 0a 58 20 | retu|rn;.X.X |
|00000d30| 20 20 62 7a 65 72 6f 20 | 28 72 65 5f 73 79 6e 74 | bzero |(re_synt|
|00000d40| 61 78 5f 74 61 62 6c 65 | 2c 20 73 69 7a 65 6f 66 |ax_table|, sizeof|
|00000d50| 20 72 65 5f 73 79 6e 74 | 61 78 5f 74 61 62 6c 65 | re_synt|ax_table|
|00000d60| 29 3b 0a 58 0a 58 20 20 | 20 66 6f 72 20 28 63 20 |);.X.X | for (c |
|00000d70| 3d 20 27 61 27 3b 20 63 | 20 3c 3d 20 27 7a 27 3b |= 'a'; c| <= 'z';|
|00000d80| 20 63 2b 2b 29 0a 58 20 | 20 20 20 20 72 65 5f 73 | c++).X | re_s|
|00000d90| 79 6e 74 61 78 5f 74 61 | 62 6c 65 5b 63 5d 20 3d |yntax_ta|ble[c] =|
|00000da0| 20 53 77 6f 72 64 3b 0a | 58 0a 58 20 20 20 66 6f | Sword;.|X.X fo|
|00000db0| 72 20 28 63 20 3d 20 27 | 41 27 3b 20 63 20 3c 3d |r (c = '|A'; c <=|
|00000dc0| 20 27 5a 27 3b 20 63 2b | 2b 29 0a 58 20 20 20 20 | 'Z'; c+|+).X |
|00000dd0| 20 72 65 5f 73 79 6e 74 | 61 78 5f 74 61 62 6c 65 | re_synt|ax_table|
|00000de0| 5b 63 5d 20 3d 20 53 77 | 6f 72 64 3b 0a 58 0a 58 |[c] = Sw|ord;.X.X|
|00000df0| 20 20 20 66 6f 72 20 28 | 63 20 3d 20 27 30 27 3b | for (|c = '0';|
|00000e00| 20 63 20 3c 3d 20 27 39 | 27 3b 20 63 2b 2b 29 0a | c <= '9|'; c++).|
|00000e10| 58 20 20 20 20 20 72 65 | 5f 73 79 6e 74 61 78 5f |X re|_syntax_|
|00000e20| 74 61 62 6c 65 5b 63 5d | 20 3d 20 53 77 6f 72 64 |table[c]| = Sword|
|00000e30| 3b 0a 58 0a 58 20 20 20 | 64 6f 6e 65 20 3d 20 31 |;.X.X |done = 1|
|00000e40| 3b 0a 58 7d 0a 58 0a 58 | 23 65 6e 64 69 66 20 2f |;.X}.X.X|#endif /|
|00000e50| 2a 20 53 59 4e 54 41 58 | 5f 54 41 42 4c 45 20 2a |* SYNTAX|_TABLE *|
|00000e60| 2f 0a 58 23 65 6e 64 69 | 66 20 2f 2a 20 65 6d 61 |/.X#endi|f /* ema|
|00000e70| 63 73 20 2a 2f 0a 58 0a | 58 2f 2a 20 57 65 20 77 |cs */.X.|X/* We w|
|00000e80| 72 69 74 65 20 66 61 74 | 61 6c 20 65 72 72 6f 72 |rite fat|al error|
|00000e90| 20 6d 65 73 73 61 67 65 | 73 20 6f 6e 20 73 74 61 | message|s on sta|
|00000ea0| 6e 64 61 72 64 20 65 72 | 72 6f 72 2e 20 20 2a 2f |ndard er|ror. */|
|00000eb0| 0a 58 23 69 6e 63 6c 75 | 64 65 20 3c 73 74 64 69 |.X#inclu|de <stdi|
|00000ec0| 6f 2e 68 3e 0a 58 0a 58 | 2f 2a 20 69 73 61 6c 70 |o.h>.X.X|/* isalp|
|00000ed0| 68 61 28 33 29 20 65 74 | 63 2e 20 61 72 65 20 75 |ha(3) et|c. are u|
|00000ee0| 73 65 64 20 66 6f 72 20 | 74 68 65 20 63 68 61 72 |sed for |the char|
|00000ef0| 61 63 74 65 72 20 63 6c | 61 73 73 65 73 2e 20 20 |acter cl|asses. |
|00000f00| 2a 2f 0a 58 23 69 6e 63 | 6c 75 64 65 20 3c 63 74 |*/.X#inc|lude <ct|
|00000f10| 79 70 65 2e 68 3e 0a 58 | 2f 2a 20 53 65 71 75 65 |ype.h>.X|/* Seque|
|00000f20| 6e 74 73 20 61 72 65 20 | 6d 69 73 73 69 6e 67 20 |nts are |missing |
|00000f30| 69 73 67 72 61 70 68 2e | 20 20 2a 2f 0a 58 23 69 |isgraph.| */.X#i|
|00000f40| 66 6e 64 65 66 20 69 73 | 67 72 61 70 68 0a 58 23 |fndef is|graph.X#|
|00000f50| 64 65 66 69 6e 65 20 69 | 73 67 72 61 70 68 28 63 |define i|sgraph(c|
|00000f60| 29 20 28 69 73 70 72 69 | 6e 74 28 28 63 29 29 20 |) (ispri|nt((c)) |
|00000f70| 26 26 20 21 69 73 73 70 | 61 63 65 28 28 63 29 29 |&& !issp|ace((c))|
|00000f80| 29 0a 58 23 65 6e 64 69 | 66 0a 58 0a 58 2f 2a 20 |).X#endi|f.X.X/* |
|00000f90| 47 65 74 20 74 68 65 20 | 69 6e 74 65 72 66 61 63 |Get the |interfac|
|00000fa0| 65 2c 20 69 6e 63 6c 75 | 64 69 6e 67 20 74 68 65 |e, inclu|ding the|
|00000fb0| 20 73 79 6e 74 61 78 20 | 62 69 74 73 2e 20 20 2a | syntax |bits. *|
|00000fc0| 2f 0a 58 23 69 6e 63 6c | 75 64 65 20 22 72 65 67 |/.X#incl|ude "reg|
|00000fd0| 65 78 2e 68 22 0a 58 0a | 58 0a 58 2f 2a 20 54 68 |ex.h".X.|X.X/* Th|
|00000fe0| 65 73 65 20 61 72 65 20 | 74 68 65 20 63 6f 6d 6d |ese are |the comm|
|00000ff0| 61 6e 64 20 63 6f 64 65 | 73 20 74 68 61 74 20 61 |and code|s that a|
|00001000| 70 70 65 61 72 20 69 6e | 20 63 6f 6d 70 69 6c 65 |ppear in| compile|
|00001010| 64 20 72 65 67 75 6c 61 | 72 0a 58 20 20 20 65 78 |d regula|r.X ex|
|00001020| 70 72 65 73 73 69 6f 6e | 73 2c 20 6f 6e 65 20 70 |pression|s, one p|
|00001030| 65 72 20 62 79 74 65 2e | 20 20 53 6f 6d 65 20 63 |er byte.| Some c|
|00001040| 6f 6d 6d 61 6e 64 20 63 | 6f 64 65 73 20 61 72 65 |ommand c|odes are|
|00001050| 20 66 6f 6c 6c 6f 77 65 | 64 20 62 79 0a 58 20 20 | followe|d by.X |
|00001060| 20 61 72 67 75 6d 65 6e | 74 20 62 79 74 65 73 2e | argumen|t bytes.|
|00001070| 20 20 41 20 63 6f 6d 6d | 61 6e 64 20 63 6f 64 65 | A comm|and code|
|00001080| 20 63 61 6e 20 73 70 65 | 63 69 66 79 20 61 6e 79 | can spe|cify any|
|00001090| 20 69 6e 74 65 72 70 72 | 65 74 61 74 69 6f 6e 0a | interpr|etation.|
|000010a0| 58 20 20 20 77 68 61 74 | 73 6f 65 76 65 72 20 66 |X what|soever f|
|000010b0| 6f 72 20 69 74 73 20 61 | 72 67 75 6d 65 6e 74 73 |or its a|rguments|
|000010c0| 2e 20 20 5a 65 72 6f 2d | 62 79 74 65 73 20 6d 61 |. Zero-|bytes ma|
|000010d0| 79 20 61 70 70 65 61 72 | 20 69 6e 20 74 68 65 20 |y appear| in the |
|000010e0| 63 6f 6d 70 69 6c 65 64 | 0a 58 20 20 20 72 65 67 |compiled|.X reg|
|000010f0| 75 6c 61 72 20 65 78 70 | 72 65 73 73 69 6f 6e 2e |ular exp|ression.|
|00001100| 0a 58 20 20 20 0a 58 20 | 20 20 54 68 65 20 76 61 |.X .X | The va|
|00001110| 6c 75 65 20 6f 66 20 60 | 65 78 61 63 74 6e 27 20 |lue of `|exactn' |
|00001120| 69 73 20 6e 65 65 64 65 | 64 20 69 6e 20 73 65 61 |is neede|d in sea|
|00001130| 72 63 68 2e 63 20 28 73 | 65 61 72 63 68 5f 62 75 |rch.c (s|earch_bu|
|00001140| 66 66 65 72 29 20 69 6e | 20 65 6d 61 63 73 2e 0a |ffer) in| emacs..|
|00001150| 58 20 20 20 53 6f 20 72 | 65 67 65 78 2e 68 20 64 |X So r|egex.h d|
|00001160| 65 66 69 6e 65 73 20 61 | 20 73 79 6d 62 6f 6c 20 |efines a| symbol |
|00001170| 60 52 45 5f 45 58 41 43 | 54 4e 5f 56 41 4c 55 45 |`RE_EXAC|TN_VALUE|
|00001180| 27 20 74 6f 20 62 65 20 | 31 3b 20 74 68 65 20 76 |' to be |1; the v|
|00001190| 61 6c 75 65 20 6f 66 0a | 58 20 20 20 60 65 78 61 |alue of.|X `exa|
|000011a0| 63 74 6e 27 20 77 65 20 | 75 73 65 20 68 65 72 65 |ctn' we |use here|
|000011b0| 20 6d 75 73 74 20 61 6c | 73 6f 20 62 65 20 31 2e | must al|so be 1.|
|000011c0| 20 20 2a 2f 0a 58 0a 58 | 65 6e 75 6d 20 72 65 67 | */.X.X|enum reg|
|000011d0| 65 78 70 63 6f 64 65 0a | 58 20 20 7b 0a 58 20 20 |expcode.|X {.X |
|000011e0| 20 20 75 6e 75 73 65 64 | 3d 30 2c 0a 58 20 20 20 | unused|=0,.X |
|000011f0| 20 65 78 61 63 74 6e 3d | 31 2c 20 2f 2a 20 46 6f | exactn=|1, /* Fo|
|00001200| 6c 6c 6f 77 65 64 20 62 | 79 20 6f 6e 65 20 62 79 |llowed b|y one by|
|00001210| 74 65 20 67 69 76 69 6e | 67 20 6e 2c 20 74 68 65 |te givin|g n, the|
|00001220| 6e 20 62 79 20 6e 20 6c | 69 74 65 72 61 6c 20 62 |n by n l|iteral b|
|00001230| 79 74 65 73 2e 20 20 2a | 2f 0a 58 20 20 20 20 62 |ytes. *|/.X b|
|00001240| 65 67 6c 69 6e 65 2c 20 | 20 2f 2a 20 46 61 69 6c |egline, | /* Fail|
|00001250| 20 75 6e 6c 65 73 73 20 | 61 74 20 62 65 67 69 6e | unless |at begin|
|00001260| 6e 69 6e 67 20 6f 66 20 | 6c 69 6e 65 2e 20 20 2a |ning of |line. *|
|00001270| 2f 0a 58 20 20 20 20 65 | 6e 64 6c 69 6e 65 2c 20 |/.X e|ndline, |
|00001280| 20 2f 2a 20 46 61 69 6c | 20 75 6e 6c 65 73 73 20 | /* Fail| unless |
|00001290| 61 74 20 65 6e 64 20 6f | 66 20 6c 69 6e 65 2e 20 |at end o|f line. |
|000012a0| 20 2a 2f 0a 58 20 20 20 | 20 6a 75 6d 70 2c 20 20 | */.X | jump, |
|000012b0| 20 20 20 2f 2a 20 46 6f | 6c 6c 6f 77 65 64 20 62 | /* Fo|llowed b|
|000012c0| 79 20 74 77 6f 20 62 79 | 74 65 73 20 67 69 76 69 |y two by|tes givi|
|000012d0| 6e 67 20 72 65 6c 61 74 | 69 76 65 20 61 64 64 72 |ng relat|ive addr|
|000012e0| 65 73 73 20 74 6f 20 6a | 75 6d 70 20 74 6f 2e 20 |ess to j|ump to. |
|000012f0| 20 2a 2f 0a 58 20 20 20 | 20 6f 6e 5f 66 61 69 6c | */.X | on_fail|
|00001300| 75 72 65 5f 6a 75 6d 70 | 2c 09 20 2f 2a 20 46 6f |ure_jump|,. /* Fo|
|00001310| 6c 6c 6f 77 65 64 20 62 | 79 20 74 77 6f 20 62 79 |llowed b|y two by|
|00001320| 74 65 73 20 67 69 76 69 | 6e 67 20 72 65 6c 61 74 |tes givi|ng relat|
|00001330| 69 76 65 20 61 64 64 72 | 65 73 73 20 6f 66 20 0a |ive addr|ess of .|
|00001340| 58 09 09 09 20 20 20 20 | 70 6c 61 63 65 20 74 6f |X... |place to|
|00001350| 20 72 65 73 75 6d 65 20 | 61 74 20 69 6e 20 63 61 | resume |at in ca|
|00001360| 73 65 20 6f 66 20 66 61 | 69 6c 75 72 65 2e 20 20 |se of fa|ilure. |
|00001370| 2a 2f 0a 58 20 20 20 20 | 66 69 6e 61 6c 69 7a 65 |*/.X |finalize|
|00001380| 5f 6a 75 6d 70 2c 09 20 | 2f 2a 20 54 68 72 6f 77 |_jump,. |/* Throw|
|00001390| 20 61 77 61 79 20 6c 61 | 74 65 73 74 20 66 61 69 | away la|test fai|
|000013a0| 6c 75 72 65 20 70 6f 69 | 6e 74 20 61 6e 64 20 74 |lure poi|nt and t|
|000013b0| 68 65 6e 20 6a 75 6d 70 | 20 74 6f 20 0a 58 09 09 |hen jump| to .X..|
|000013c0| 09 20 20 20 20 61 64 64 | 72 65 73 73 2e 20 20 2a |. add|ress. *|
|000013d0| 2f 0a 58 20 20 20 20 6d | 61 79 62 65 5f 66 69 6e |/.X m|aybe_fin|
|000013e0| 61 6c 69 7a 65 5f 6a 75 | 6d 70 2c 20 2f 2a 20 4c |alize_ju|mp, /* L|
|000013f0| 69 6b 65 20 6a 75 6d 70 | 20 62 75 74 20 66 69 6e |ike jump| but fin|
|00001400| 61 6c 69 7a 65 20 69 66 | 20 73 61 66 65 20 74 6f |alize if| safe to|
|00001410| 20 64 6f 20 73 6f 2e 0a | 58 09 09 09 20 20 20 20 | do so..|X... |
|00001420| 54 68 69 73 20 69 73 20 | 75 73 65 64 20 74 6f 20 |This is |used to |
|00001430| 6a 75 6d 70 20 62 61 63 | 6b 20 74 6f 20 74 68 65 |jump bac|k to the|
|00001440| 20 62 65 67 69 6e 6e 69 | 6e 67 0a 58 09 09 09 20 | beginni|ng.X... |
|00001450| 20 20 20 6f 66 20 61 20 | 72 65 70 65 61 74 2e 20 | of a |repeat. |
|00001460| 20 49 66 20 74 68 65 20 | 63 6f 6d 6d 61 6e 64 20 | If the |command |
|00001470| 74 68 61 74 20 66 6f 6c | 6c 6f 77 73 0a 58 09 09 |that fol|lows.X..|
|00001480| 09 20 20 20 20 74 68 69 | 73 20 6a 75 6d 70 20 69 |. thi|s jump i|
|00001490| 73 20 63 6c 65 61 72 6c | 79 20 69 6e 63 6f 6d 70 |s clearl|y incomp|
|000014a0| 61 74 69 62 6c 65 20 77 | 69 74 68 20 74 68 65 0a |atible w|ith the.|
|000014b0| 58 09 09 09 20 20 20 20 | 6f 6e 65 20 61 74 20 74 |X... |one at t|
|000014c0| 68 65 20 62 65 67 69 6e | 6e 69 6e 67 20 6f 66 20 |he begin|ning of |
|000014d0| 74 68 65 20 72 65 70 65 | 61 74 2c 20 73 75 63 68 |the repe|at, such|
|000014e0| 20 74 68 61 74 0a 58 09 | 09 09 20 20 20 20 77 65 | that.X.|.. we|
|000014f0| 20 63 61 6e 20 62 65 20 | 73 75 72 65 20 74 68 61 | can be |sure tha|
|00001500| 74 20 74 68 65 72 65 20 | 69 73 20 6e 6f 20 75 73 |t there |is no us|
|00001510| 65 20 62 61 63 6b 74 72 | 61 63 6b 69 6e 67 0a 58 |e backtr|acking.X|
|00001520| 09 09 09 20 20 20 20 6f | 75 74 20 6f 66 20 72 65 |... o|ut of re|
|00001530| 70 65 74 69 74 69 6f 6e | 73 20 61 6c 72 65 61 64 |petition|s alread|
|00001540| 79 20 63 6f 6d 70 6c 65 | 74 65 64 2c 0a 58 09 09 |y comple|ted,.X..|
|00001550| 09 20 20 20 20 74 68 65 | 6e 20 77 65 20 66 69 6e |. the|n we fin|
|00001560| 61 6c 69 7a 65 2e 20 20 | 2a 2f 0a 58 20 20 20 20 |alize. |*/.X |
|00001570| 64 75 6d 6d 79 5f 66 61 | 69 6c 75 72 65 5f 6a 75 |dummy_fa|ilure_ju|
|00001580| 6d 70 2c 20 20 2f 2a 20 | 4a 75 6d 70 2c 20 61 6e |mp, /* |Jump, an|
|00001590| 64 20 70 75 73 68 20 61 | 20 64 75 6d 6d 79 20 66 |d push a| dummy f|
|000015a0| 61 69 6c 75 72 65 20 70 | 6f 69 6e 74 2e 20 54 68 |ailure p|oint. Th|
|000015b0| 69 73 20 0a 58 09 09 09 | 20 20 20 20 66 61 69 6c |is .X...| fail|
|000015c0| 75 72 65 20 70 6f 69 6e | 74 20 77 69 6c 6c 20 62 |ure poin|t will b|
|000015d0| 65 20 74 68 72 6f 77 6e | 20 61 77 61 79 20 69 66 |e thrown| away if|
|000015e0| 20 61 6e 20 61 74 74 65 | 6d 70 74 20 0a 58 20 20 | an atte|mpt .X |
|000015f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001600| 20 20 20 20 20 20 20 20 | 20 20 69 73 20 6d 61 64 | | is mad|
|00001610| 65 20 74 6f 20 75 73 65 | 20 69 74 20 66 6f 72 20 |e to use| it for |
|00001620| 61 20 66 61 69 6c 75 72 | 65 2e 20 41 20 2b 20 63 |a failur|e. A + c|
|00001630| 6f 6e 73 74 72 75 63 74 | 20 0a 58 20 20 20 20 20 |onstruct| .X |
|00001640| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001650| 20 20 20 20 20 20 20 6d | 61 6b 65 73 20 74 68 69 | m|akes thi|
|00001660| 73 20 62 65 66 6f 72 65 | 20 74 68 65 20 66 69 72 |s before| the fir|
|00001670| 73 74 20 72 65 70 65 61 | 74 2e 20 20 41 6c 73 6f |st repea|t. Also|
|00001680| 0a 58 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.X | |
|00001690| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 75 73 | | us|
|000016a0| 65 20 69 74 20 61 73 20 | 61 6e 20 69 6e 74 65 72 |e it as |an inter|
|000016b0| 6d 65 64 69 61 72 79 20 | 6b 69 6e 64 20 6f 66 20 |mediary |kind of |
|000016c0| 6a 75 6d 70 20 77 68 65 | 6e 0a 58 20 20 20 20 20 |jump whe|n.X |
|000016d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000016e0| 20 20 20 20 20 20 20 63 | 6f 6d 70 69 6c 69 6e 67 | c|ompiling|
|000016f0| 20 61 6e 20 6f 72 20 63 | 6f 6e 73 74 72 75 63 74 | an or c|onstruct|
|00001700| 2e 20 20 2a 2f 0a 58 20 | 20 20 20 73 75 63 63 65 |. */.X | succe|
|00001710| 65 64 5f 6e 2c 09 20 2f | 2a 20 55 73 65 64 20 6c |ed_n,. /|* Used l|
|00001720| 69 6b 65 20 6f 6e 5f 66 | 61 69 6c 75 72 65 5f 6a |ike on_f|ailure_j|
|00001730| 75 6d 70 20 65 78 63 65 | 70 74 20 68 61 73 20 74 |ump exce|pt has t|
|00001740| 6f 20 73 75 63 63 65 65 | 64 20 6e 20 74 69 6d 65 |o succee|d n time|
|00001750| 73 3b 0a 58 09 09 20 20 | 20 20 74 68 65 6e 20 67 |s;.X.. | then g|
|00001760| 65 74 73 20 74 75 72 6e | 65 64 20 69 6e 74 6f 20 |ets turn|ed into |
|00001770| 61 6e 20 6f 6e 5f 66 61 | 69 6c 75 72 65 5f 6a 75 |an on_fa|ilure_ju|
|00001780| 6d 70 2e 20 54 68 65 20 | 72 65 6c 61 74 69 76 65 |mp. The |relative|
|00001790| 0a 58 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.X | |
|000017a0| 20 20 20 20 20 20 61 64 | 64 72 65 73 73 20 66 6f | ad|dress fo|
|000017b0| 6c 6c 6f 77 69 6e 67 20 | 69 74 20 69 73 20 75 73 |llowing |it is us|
|000017c0| 65 6c 65 73 73 20 75 6e | 74 69 6c 20 74 68 65 6e |eless un|til then|
|000017d0| 2e 20 20 54 68 65 0a 58 | 20 20 20 20 20 20 20 20 |. The.X| |
|000017e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 61 64 64 72 | | addr|
|000017f0| 65 73 73 20 69 73 20 66 | 6f 6c 6c 6f 77 65 64 20 |ess is f|ollowed |
|00001800| 62 79 20 74 77 6f 20 62 | 79 74 65 73 20 63 6f 6e |by two b|ytes con|
|00001810| 74 61 69 6e 69 6e 67 20 | 6e 2e 20 20 2a 2f 0a 58 |taining |n. */.X|
|00001820| 20 20 20 20 6a 75 6d 70 | 5f 6e 2c 09 20 2f 2a 20 | jump|_n,. /* |
|00001830| 53 69 6d 69 6c 61 72 20 | 74 6f 20 6a 75 6d 70 2c |Similar |to jump,|
|00001840| 20 62 75 74 20 6a 75 6d | 70 20 6e 20 74 69 6d 65 | but jum|p n time|
|00001850| 73 20 6f 6e 6c 79 3b 20 | 61 6c 73 6f 20 74 68 65 |s only; |also the|
|00001860| 20 72 65 6c 61 74 69 76 | 65 0a 58 09 09 20 20 20 | relativ|e.X.. |
|00001870| 20 61 64 64 72 65 73 73 | 20 66 6f 6c 6c 6f 77 69 | address| followi|
|00001880| 6e 67 20 69 73 20 69 6e | 20 74 75 72 6e 20 66 6f |ng is in| turn fo|
|00001890| 6c 6c 6f 77 65 64 20 62 | 79 20 79 65 74 20 74 77 |llowed b|y yet tw|
|000018a0| 6f 20 6d 6f 72 65 20 62 | 79 74 65 73 0a 58 20 20 |o more b|ytes.X |
|000018b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000018c0| 20 20 63 6f 6e 74 61 69 | 6e 69 6e 67 20 6e 2e 20 | contai|ning n. |
|000018d0| 20 2a 2f 0a 58 20 20 20 | 20 73 65 74 5f 6e 75 6d | */.X | set_num|
|000018e0| 62 65 72 5f 61 74 2c 09 | 2f 2a 20 53 65 74 20 74 |ber_at,.|/* Set t|
|000018f0| 68 65 20 66 6f 6c 6c 6f | 77 69 6e 67 20 72 65 6c |he follo|wing rel|
|00001900| 61 74 69 76 65 20 6c 6f | 63 61 74 69 6f 6e 20 74 |ative lo|cation t|
|00001910| 6f 20 74 68 65 0a 58 09 | 09 09 20 20 20 73 75 62 |o the.X.|.. sub|
|00001920| 73 65 71 75 65 6e 74 20 | 6e 75 6d 62 65 72 2e 20 |sequent |number. |
|00001930| 20 2a 2f 0a 58 20 20 20 | 20 61 6e 79 63 68 61 72 | */.X | anychar|
|00001940| 2c 09 20 2f 2a 20 4d 61 | 74 63 68 65 73 20 61 6e |,. /* Ma|tches an|
|00001950| 79 20 28 6d 6f 72 65 20 | 6f 72 20 6c 65 73 73 29 |y (more |or less)|
|00001960| 20 6f 6e 65 20 63 68 61 | 72 61 63 74 65 72 2e 20 | one cha|racter. |
|00001970| 20 2a 2f 0a 58 20 20 20 | 20 63 68 61 72 73 65 74 | */.X | charset|
|00001980| 2c 20 20 20 20 20 2f 2a | 20 4d 61 74 63 68 65 73 |, /*| Matches|
|00001990| 20 61 6e 79 20 6f 6e 65 | 20 63 68 61 72 20 62 65 | any one| char be|
|000019a0| 6c 6f 6e 67 69 6e 67 20 | 74 6f 20 73 70 65 63 69 |longing |to speci|
|000019b0| 66 69 65 64 20 73 65 74 | 2e 0a 58 09 09 20 20 20 |fied set|..X.. |
|000019c0| 20 46 69 72 73 74 20 66 | 6f 6c 6c 6f 77 69 6e 67 | First f|ollowing|
|000019d0| 20 62 79 74 65 20 69 73 | 20 6e 75 6d 62 65 72 20 | byte is| number |
|000019e0| 6f 66 20 62 69 74 6d 61 | 70 20 62 79 74 65 73 2e |of bitma|p bytes.|
|000019f0| 0a 58 09 09 20 20 20 20 | 54 68 65 6e 20 63 6f 6d |.X.. |Then com|
|00001a00| 65 20 62 79 74 65 73 20 | 66 6f 72 20 61 20 62 69 |e bytes |for a bi|
|00001a10| 74 6d 61 70 20 73 61 79 | 69 6e 67 20 77 68 69 63 |tmap say|ing whic|
|00001a20| 68 20 63 68 61 72 73 20 | 61 72 65 20 69 6e 2e 0a |h chars |are in..|
|00001a30| 58 09 09 20 20 20 20 42 | 69 74 73 20 69 6e 20 65 |X.. B|its in e|
|00001a40| 61 63 68 20 62 79 74 65 | 20 61 72 65 20 6f 72 64 |ach byte| are ord|
|00001a50| 65 72 65 64 20 6c 6f 77 | 2d 62 69 74 2d 66 69 72 |ered low|-bit-fir|
|00001a60| 73 74 2e 0a 58 09 09 20 | 20 20 20 41 20 63 68 61 |st..X.. | A cha|
|00001a70| 72 61 63 74 65 72 20 69 | 73 20 69 6e 20 74 68 65 |racter i|s in the|
|00001a80| 20 73 65 74 20 69 66 20 | 69 74 73 20 62 69 74 20 | set if |its bit |
|00001a90| 69 73 20 31 2e 0a 58 09 | 09 20 20 20 20 41 20 63 |is 1..X.|. A c|
|00001aa0| 68 61 72 61 63 74 65 72 | 20 74 6f 6f 20 6c 61 72 |haracter| too lar|
|00001ab0| 67 65 20 74 6f 20 68 61 | 76 65 20 61 20 62 69 74 |ge to ha|ve a bit|
|00001ac0| 20 69 6e 20 74 68 65 20 | 6d 61 70 0a 58 09 09 20 | in the |map.X.. |
|00001ad0| 20 20 20 69 73 20 61 75 | 74 6f 6d 61 74 69 63 61 | is au|tomatica|
|00001ae0| 6c 6c 79 20 6e 6f 74 20 | 69 6e 20 74 68 65 20 73 |lly not |in the s|
|00001af0| 65 74 2e 20 20 2a 2f 0a | 58 20 20 20 20 63 68 61 |et. */.|X cha|
|00001b00| 72 73 65 74 5f 6e 6f 74 | 2c 20 2f 2a 20 53 61 6d |rset_not|, /* Sam|
|00001b10| 65 20 70 61 72 61 6d 65 | 74 65 72 73 20 61 73 20 |e parame|ters as |
|00001b20| 63 68 61 72 73 65 74 2c | 20 62 75 74 20 6d 61 74 |charset,| but mat|
|00001b30| 63 68 20 61 6e 79 20 63 | 68 61 72 61 63 74 65 72 |ch any c|haracter|
|00001b40| 0a 58 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.X | |
|00001b50| 20 20 20 20 20 20 74 68 | 61 74 20 69 73 20 6e 6f | th|at is no|
|00001b60| 74 20 6f 6e 65 20 6f 66 | 20 74 68 6f 73 65 20 73 |t one of| those s|
|00001b70| 70 65 63 69 66 69 65 64 | 2e 20 20 2a 2f 0a 58 20 |pecified|. */.X |
|00001b80| 20 20 20 73 74 61 72 74 | 5f 6d 65 6d 6f 72 79 2c | start|_memory,|
|00001b90| 20 2f 2a 20 53 74 61 72 | 74 20 72 65 6d 65 6d 62 | /* Star|t rememb|
|00001ba0| 65 72 69 6e 67 20 74 68 | 65 20 74 65 78 74 20 74 |ering th|e text t|
|00001bb0| 68 61 74 20 69 73 20 6d | 61 74 63 68 65 64 2c 20 |hat is m|atched, |
|00001bc0| 66 6f 72 0a 58 09 09 20 | 20 20 20 73 74 6f 72 69 |for.X.. | stori|
|00001bd0| 6e 67 20 69 6e 20 61 20 | 6d 65 6d 6f 72 79 20 72 |ng in a |memory r|
|00001be0| 65 67 69 73 74 65 72 2e | 20 20 46 6f 6c 6c 6f 77 |egister.| Follow|
|00001bf0| 65 64 20 62 79 20 6f 6e | 65 0a 58 20 20 20 20 20 |ed by on|e.X |
|00001c00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 62 | | b|
|00001c10| 79 74 65 20 63 6f 6e 74 | 61 69 6e 69 6e 67 20 74 |yte cont|aining t|
|00001c20| 68 65 20 72 65 67 69 73 | 74 65 72 20 6e 75 6d 62 |he regis|ter numb|
|00001c30| 65 72 2e 20 20 52 65 67 | 69 73 74 65 72 20 6e 75 |er. Reg|ister nu|
|00001c40| 6d 62 65 72 73 0a 58 20 | 20 20 20 20 20 20 20 20 |mbers.X | |
|00001c50| 20 20 20 20 20 20 20 20 | 20 20 20 6d 75 73 74 20 | | must |
|00001c60| 62 65 20 69 6e 20 74 68 | 65 20 72 61 6e 67 65 20 |be in th|e range |
|00001c70| 30 20 74 68 72 6f 75 67 | 68 20 52 45 5f 4e 52 45 |0 throug|h RE_NRE|
|00001c80| 47 53 2e 20 20 2a 2f 0a | 58 20 20 20 20 73 74 6f |GS. */.|X sto|
|00001c90| 70 5f 6d 65 6d 6f 72 79 | 2c 20 2f 2a 20 53 74 6f |p_memory|, /* Sto|
|00001ca0| 70 20 72 65 6d 65 6d 62 | 65 72 69 6e 67 20 74 68 |p rememb|ering th|
|00001cb0| 65 20 74 65 78 74 20 74 | 68 61 74 20 69 73 20 6d |e text t|hat is m|
|00001cc0| 61 74 63 68 65 64 0a 58 | 09 09 20 20 20 20 61 6e |atched.X|.. an|
|00001cd0| 64 20 73 74 6f 72 65 20 | 69 74 20 69 6e 20 61 20 |d store |it in a |
|00001ce0| 6d 65 6d 6f 72 79 20 72 | 65 67 69 73 74 65 72 2e |memory r|egister.|
|00001cf0| 20 20 46 6f 6c 6c 6f 77 | 65 64 20 62 79 0a 58 20 | Follow|ed by.X |
|00001d00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001d10| 20 20 20 6f 6e 65 20 62 | 79 74 65 20 63 6f 6e 74 | one b|yte cont|
|00001d20| 61 69 6e 69 6e 67 20 74 | 68 65 20 72 65 67 69 73 |aining t|he regis|
|00001d30| 74 65 72 20 6e 75 6d 62 | 65 72 2e 20 52 65 67 69 |ter numb|er. Regi|
|00001d40| 73 74 65 72 0a 58 20 20 | 20 20 20 20 20 20 20 20 |ster.X | |
|00001d50| 20 20 20 20 20 20 20 20 | 20 20 6e 75 6d 62 65 72 | | number|
|00001d60| 73 20 6d 75 73 74 20 62 | 65 20 69 6e 20 74 68 65 |s must b|e in the|
|00001d70| 20 72 61 6e 67 65 20 30 | 20 74 68 72 6f 75 67 68 | range 0| through|
|00001d80| 20 52 45 5f 4e 52 45 47 | 53 2e 20 20 2a 2f 0a 58 | RE_NREG|S. */.X|
|00001d90| 20 20 20 20 64 75 70 6c | 69 63 61 74 65 2c 20 20 | dupl|icate, |
|00001da0| 20 2f 2a 20 4d 61 74 63 | 68 20 61 20 64 75 70 6c | /* Matc|h a dupl|
|00001db0| 69 63 61 74 65 20 6f 66 | 20 73 6f 6d 65 74 68 69 |icate of| somethi|
|00001dc0| 6e 67 20 72 65 6d 65 6d | 62 65 72 65 64 2e 0a 58 |ng remem|bered..X|
|00001dd0| 09 09 20 20 20 20 46 6f | 6c 6c 6f 77 65 64 20 62 |.. Fo|llowed b|
|00001de0| 79 20 6f 6e 65 20 62 79 | 74 65 20 63 6f 6e 74 61 |y one by|te conta|
|00001df0| 69 6e 69 6e 67 20 74 68 | 65 20 69 6e 64 65 78 20 |ining th|e index |
|00001e00| 6f 66 20 74 68 65 20 6d | 65 6d 6f 72 79 20 0a 58 |of the m|emory .X|
|00001e10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001e20| 20 20 20 20 72 65 67 69 | 73 74 65 72 2e 20 20 2a | regi|ster. *|
|00001e30| 2f 0a 58 20 20 20 20 62 | 65 66 6f 72 65 5f 64 6f |/.X b|efore_do|
|00001e40| 74 2c 09 20 2f 2a 20 53 | 75 63 63 65 65 64 73 20 |t,. /* S|ucceeds |
|00001e50| 69 66 20 62 65 66 6f 72 | 65 20 70 6f 69 6e 74 2e |if befor|e point.|
|00001e60| 20 20 2a 2f 0a 58 20 20 | 20 20 61 74 5f 64 6f 74 | */.X | at_dot|
|00001e70| 2c 09 20 2f 2a 20 53 75 | 63 63 65 65 64 73 20 69 |,. /* Su|cceeds i|
|00001e80| 66 20 61 74 20 70 6f 69 | 6e 74 2e 20 20 2a 2f 0a |f at poi|nt. */.|
|00001e90| 58 20 20 20 20 61 66 74 | 65 72 5f 64 6f 74 2c 09 |X aft|er_dot,.|
|00001ea0| 20 2f 2a 20 53 75 63 63 | 65 65 64 73 20 69 66 20 | /* Succ|eeds if |
|00001eb0| 61 66 74 65 72 20 70 6f | 69 6e 74 2e 20 20 2a 2f |after po|int. */|
|00001ec0| 0a 58 20 20 20 20 62 65 | 67 62 75 66 2c 20 20 20 |.X be|gbuf, |
|00001ed0| 20 20 20 2f 2a 20 53 75 | 63 63 65 65 64 73 20 69 | /* Su|cceeds i|
|00001ee0| 66 20 61 74 20 62 65 67 | 69 6e 6e 69 6e 67 20 6f |f at beg|inning o|
|00001ef0| 66 20 62 75 66 66 65 72 | 2e 20 20 2a 2f 0a 58 20 |f buffer|. */.X |
|00001f00| 20 20 20 65 6e 64 62 75 | 66 2c 20 20 20 20 20 20 | endbu|f, |
|00001f10| 2f 2a 20 53 75 63 63 65 | 65 64 73 20 69 66 20 61 |/* Succe|eds if a|
|00001f20| 74 20 65 6e 64 20 6f 66 | 20 62 75 66 66 65 72 2e |t end of| buffer.|
|00001f30| 20 20 2a 2f 0a 58 20 20 | 20 20 77 6f 72 64 63 68 | */.X | wordch|
|00001f40| 61 72 2c 20 20 20 20 2f | 2a 20 4d 61 74 63 68 65 |ar, /|* Matche|
|00001f50| 73 20 61 6e 79 20 77 6f | 72 64 2d 63 6f 6e 73 74 |s any wo|rd-const|
|00001f60| 69 74 75 65 6e 74 20 63 | 68 61 72 61 63 74 65 72 |ituent c|haracter|
|00001f70| 2e 20 20 2a 2f 0a 58 20 | 20 20 20 6e 6f 74 77 6f |. */.X | notwo|
|00001f80| 72 64 63 68 61 72 2c 20 | 2f 2a 20 4d 61 74 63 68 |rdchar, |/* Match|
|00001f90| 65 73 20 61 6e 79 20 63 | 68 61 72 20 74 68 61 74 |es any c|har that|
|00001fa0| 20 69 73 20 6e 6f 74 20 | 61 20 77 6f 72 64 2d 63 | is not |a word-c|
|00001fb0| 6f 6e 73 74 69 74 75 65 | 6e 74 2e 20 20 2a 2f 0a |onstitue|nt. */.|
|00001fc0| 58 20 20 20 20 77 6f 72 | 64 62 65 67 2c 09 20 2f |X wor|dbeg,. /|
|00001fd0| 2a 20 53 75 63 63 65 65 | 64 73 20 69 66 20 61 74 |* Succee|ds if at|
|00001fe0| 20 77 6f 72 64 20 62 65 | 67 69 6e 6e 69 6e 67 2e | word be|ginning.|
|00001ff0| 20 20 2a 2f 0a 58 20 20 | 20 20 77 6f 72 64 65 6e | */.X | worden|
|00002000| 64 2c 09 20 2f 2a 20 53 | 75 63 63 65 65 64 73 20 |d,. /* S|ucceeds |
|00002010| 69 66 20 61 74 20 77 6f | 72 64 20 65 6e 64 2e 20 |if at wo|rd end. |
|00002020| 20 2a 2f 0a 58 20 20 20 | 20 77 6f 72 64 62 6f 75 | */.X | wordbou|
|00002030| 6e 64 2c 20 20 20 2f 2a | 20 53 75 63 63 65 65 64 |nd, /*| Succeed|
|00002040| 73 20 69 66 20 61 74 20 | 61 20 77 6f 72 64 20 62 |s if at |a word b|
|00002050| 6f 75 6e 64 61 72 79 2e | 20 20 2a 2f 0a 58 20 20 |oundary.| */.X |
|00002060| 20 20 6e 6f 74 77 6f 72 | 64 62 6f 75 6e 64 2c 2f | notwor|dbound,/|
|00002070| 2a 20 53 75 63 63 65 65 | 64 73 20 69 66 20 6e 6f |* Succee|ds if no|
|00002080| 74 20 61 74 20 61 20 77 | 6f 72 64 20 62 6f 75 6e |t at a w|ord boun|
|00002090| 64 61 72 79 2e 20 20 2a | 2f 0a 58 20 20 20 20 73 |dary. *|/.X s|
|000020a0| 79 6e 74 61 78 73 70 65 | 63 2c 20 20 2f 2a 20 4d |yntaxspe|c, /* M|
|000020b0| 61 74 63 68 65 73 20 61 | 6e 79 20 63 68 61 72 61 |atches a|ny chara|
|000020c0| 63 74 65 72 20 77 68 6f | 73 65 20 73 79 6e 74 61 |cter who|se synta|
|000020d0| 78 20 69 73 20 73 70 65 | 63 69 66 69 65 64 2e 0a |x is spe|cified..|
|000020e0| 58 09 09 20 20 20 20 66 | 6f 6c 6c 6f 77 65 64 20 |X.. f|ollowed |
|000020f0| 62 79 20 61 20 62 79 74 | 65 20 77 68 69 63 68 20 |by a byt|e which |
|00002100| 63 6f 6e 74 61 69 6e 73 | 20 61 20 73 79 6e 74 61 |contains| a synta|
|00002110| 78 20 63 6f 64 65 2c 0a | 58 20 20 20 20 20 20 20 |x code,.|X |
|00002120| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 65 2e 67 | | e.g|
|00002130| 2e 2c 20 53 77 6f 72 64 | 2e 20 20 2a 2f 0a 58 20 |., Sword|. */.X |
|00002140| 20 20 20 6e 6f 74 73 79 | 6e 74 61 78 73 70 65 63 | notsy|ntaxspec|
|00002150| 20 2f 2a 20 4d 61 74 63 | 68 65 73 20 61 6e 79 20 | /* Matc|hes any |
|00002160| 63 68 61 72 61 63 74 65 | 72 20 77 68 6f 73 65 20 |characte|r whose |
|00002170| 73 79 6e 74 61 78 20 64 | 69 66 66 65 72 73 20 66 |syntax d|iffers f|
|00002180| 72 6f 6d 0a 58 20 20 20 | 20 20 20 20 20 20 20 20 |rom.X | |
|00002190| 20 20 20 20 20 20 20 20 | 20 20 74 68 61 74 20 73 | | that s|
|000021a0| 70 65 63 69 66 69 65 64 | 2e 20 20 2a 2f 0a 58 20 |pecified|. */.X |
|000021b0| 20 7d 3b 0a 58 0a 58 20 | 0a 58 2f 2a 20 4e 75 6d | };.X.X |.X/* Num|
|000021c0| 62 65 72 20 6f 66 20 66 | 61 69 6c 75 72 65 20 70 |ber of f|ailure p|
|000021d0| 6f 69 6e 74 73 20 74 6f | 20 61 6c 6c 6f 63 61 74 |oints to| allocat|
|000021e0| 65 20 73 70 61 63 65 20 | 66 6f 72 20 69 6e 69 74 |e space |for init|
|000021f0| 69 61 6c 6c 79 2c 0a 58 | 20 20 20 77 68 65 6e 20 |ially,.X| when |
|00002200| 6d 61 74 63 68 69 6e 67 | 2e 20 20 49 66 20 74 68 |matching|. If th|
|00002210| 69 73 20 6e 75 6d 62 65 | 72 20 69 73 20 65 78 63 |is numbe|r is exc|
|00002220| 65 65 64 65 64 2c 20 6d | 6f 72 65 20 73 70 61 63 |eeded, m|ore spac|
|00002230| 65 20 69 73 20 61 6c 6c | 6f 63 61 74 65 64 2c 0a |e is all|ocated,.|
|00002240| 58 20 20 20 73 6f 20 69 | 74 20 69 73 20 6e 6f 74 |X so i|t is not|
|00002250| 20 61 20 68 61 72 64 20 | 6c 69 6d 69 74 2e 20 20 | a hard |limit. |
|00002260| 2a 2f 0a 58 0a 58 23 69 | 66 6e 64 65 66 20 4e 46 |*/.X.X#i|fndef NF|
|00002270| 41 49 4c 55 52 45 53 0a | 58 23 64 65 66 69 6e 65 |AILURES.|X#define|
|00002280| 20 4e 46 41 49 4c 55 52 | 45 53 20 38 30 0a 58 23 | NFAILUR|ES 80.X#|
|00002290| 65 6e 64 69 66 0a 58 0a | 58 23 69 66 64 65 66 20 |endif.X.|X#ifdef |
|000022a0| 43 48 41 52 5f 55 4e 53 | 49 47 4e 45 44 0a 58 23 |CHAR_UNS|IGNED.X#|
|000022b0| 64 65 66 69 6e 65 20 53 | 49 47 4e 5f 45 58 54 45 |define S|IGN_EXTE|
|000022c0| 4e 44 5f 43 48 41 52 28 | 63 29 20 28 28 63 29 3e |ND_CHAR(|c) ((c)>|
|000022d0| 28 63 68 61 72 29 31 32 | 37 3f 28 63 29 2d 32 35 |(char)12|7?(c)-25|
|000022e0| 36 3a 28 63 29 29 20 2f | 2a 20 66 6f 72 20 49 42 |6:(c)) /|* for IB|
|000022f0| 4d 20 52 54 20 2a 2f 0a | 58 23 65 6e 64 69 66 0a |M RT */.|X#endif.|
|00002300| 58 23 69 66 6e 64 65 66 | 20 53 49 47 4e 5f 45 58 |X#ifndef| SIGN_EX|
|00002310| 54 45 4e 44 5f 43 48 41 | 52 0a 58 23 64 65 66 69 |TEND_CHA|R.X#defi|
|00002320| 6e 65 20 53 49 47 4e 5f | 45 58 54 45 4e 44 5f 43 |ne SIGN_|EXTEND_C|
|00002330| 48 41 52 28 78 29 20 28 | 78 29 0a 58 23 65 6e 64 |HAR(x) (|x).X#end|
|00002340| 69 66 0a 58 20 0a 58 0a | 58 2f 2a 20 53 74 6f 72 |if.X .X.|X/* Stor|
|00002350| 65 20 4e 55 4d 42 45 52 | 20 69 6e 20 74 77 6f 20 |e NUMBER| in two |
|00002360| 63 6f 6e 74 69 67 75 6f | 75 73 20 62 79 74 65 73 |contiguo|us bytes|
|00002370| 20 73 74 61 72 74 69 6e | 67 20 61 74 20 44 45 53 | startin|g at DES|
|00002380| 54 49 4e 41 54 49 4f 4e | 2e 20 20 2a 2f 0a 58 23 |TINATION|. */.X#|
|00002390| 64 65 66 69 6e 65 20 53 | 54 4f 52 45 5f 4e 55 4d |define S|TORE_NUM|
|000023a0| 42 45 52 28 64 65 73 74 | 69 6e 61 74 69 6f 6e 2c |BER(dest|ination,|
|000023b0| 20 6e 75 6d 62 65 72 29 | 09 09 09 09 5c 0a 58 20 | number)|....\.X |
|000023c0| 20 7b 20 28 64 65 73 74 | 69 6e 61 74 69 6f 6e 29 | { (dest|ination)|
|000023d0| 5b 30 5d 20 3d 20 28 6e | 75 6d 62 65 72 29 20 26 |[0] = (n|umber) &|
|000023e0| 20 30 33 37 37 3b 09 09 | 09 09 09 5c 0a 58 20 20 | 0377;..|...\.X |
|000023f0| 20 20 28 64 65 73 74 69 | 6e 61 74 69 6f 6e 29 5b | (desti|nation)[|
|00002400| 31 5d 20 3d 20 28 6e 75 | 6d 62 65 72 29 20 3e 3e |1] = (nu|mber) >>|
|00002410| 20 38 3b 20 7d 0a 58 20 | 20 0a 58 2f 2a 20 53 61 | 8; }.X | .X/* Sa|
|00002420| 6d 65 20 61 73 20 53 54 | 4f 52 45 5f 4e 55 4d 42 |me as ST|ORE_NUMB|
|00002430| 45 52 2c 20 65 78 63 65 | 70 74 20 69 6e 63 72 65 |ER, exce|pt incre|
|00002440| 6d 65 6e 74 20 74 68 65 | 20 64 65 73 74 69 6e 61 |ment the| destina|
|00002450| 74 69 6f 6e 20 70 6f 69 | 6e 74 65 72 20 74 6f 0a |tion poi|nter to.|
|00002460| 58 20 20 20 74 68 65 20 | 62 79 74 65 20 61 66 74 |X the |byte aft|
|00002470| 65 72 20 77 68 65 72 65 | 20 74 68 65 20 6e 75 6d |er where| the num|
|00002480| 62 65 72 20 69 73 20 73 | 74 6f 72 65 64 2e 20 20 |ber is s|tored. |
|00002490| 57 61 74 63 68 20 6f 75 | 74 20 74 68 61 74 20 76 |Watch ou|t that v|
|000024a0| 61 6c 75 65 73 20 66 6f | 72 0a 58 20 20 20 44 45 |alues fo|r.X DE|
|000024b0| 53 54 49 4e 41 54 49 4f | 4e 20 73 75 63 68 20 61 |STINATIO|N such a|
|000024c0| 73 20 70 20 2b 20 31 20 | 77 6f 6e 27 74 20 77 6f |s p + 1 |won't wo|
|000024d0| 72 6b 2c 20 77 68 65 72 | 65 61 73 20 70 20 77 69 |rk, wher|eas p wi|
|000024e0| 6c 6c 2e 20 20 2a 2f 0a | 58 23 64 65 66 69 6e 65 |ll. */.|X#define|
|000024f0| 20 53 54 4f 52 45 5f 4e | 55 4d 42 45 52 5f 41 4e | STORE_N|UMBER_AN|
|00002500| 44 5f 49 4e 43 52 28 64 | 65 73 74 69 6e 61 74 69 |D_INCR(d|estinati|
|00002510| 6f 6e 2c 20 6e 75 6d 62 | 65 72 29 09 09 09 5c 0a |on, numb|er)...\.|
|00002520| 58 20 20 7b 20 53 54 4f | 52 45 5f 4e 55 4d 42 45 |X { STO|RE_NUMBE|
|00002530| 52 28 64 65 73 74 69 6e | 61 74 69 6f 6e 2c 20 6e |R(destin|ation, n|
|00002540| 75 6d 62 65 72 29 3b 09 | 09 09 09 09 5c 0a 58 20 |umber);.|....\.X |
|00002550| 20 20 20 28 64 65 73 74 | 69 6e 61 74 69 6f 6e 29 | (dest|ination)|
|00002560| 20 2b 3d 20 32 3b 20 7d | 0a 58 0a 58 0a 58 2f 2a | += 2; }|.X.X.X/*|
|00002570| 20 50 75 74 20 69 6e 74 | 6f 20 44 45 53 54 49 4e | Put int|o DESTIN|
|00002580| 41 54 49 4f 4e 20 61 20 | 6e 75 6d 62 65 72 20 73 |ATION a |number s|
|00002590| 74 6f 72 65 64 20 69 6e | 20 74 77 6f 20 63 6f 6e |tored in| two con|
|000025a0| 74 69 6e 67 6f 75 73 20 | 62 79 74 65 73 20 73 74 |tingous |bytes st|
|000025b0| 61 72 74 69 6e 67 0a 58 | 20 20 20 61 74 20 53 4f |arting.X| at SO|
|000025c0| 55 52 43 45 2e 20 20 2a | 2f 0a 58 23 64 65 66 69 |URCE. *|/.X#defi|
|000025d0| 6e 65 20 45 58 54 52 41 | 43 54 5f 4e 55 4d 42 45 |ne EXTRA|CT_NUMBE|
|000025e0| 52 28 64 65 73 74 69 6e | 61 74 69 6f 6e 2c 20 73 |R(destin|ation, s|
|000025f0| 6f 75 72 63 65 29 09 09 | 09 09 5c 0a 58 20 20 7b |ource)..|..\.X {|
|00002600| 20 28 64 65 73 74 69 6e | 61 74 69 6f 6e 29 20 3d | (destin|ation) =|
|00002610| 20 2a 28 73 6f 75 72 63 | 65 29 20 26 20 30 33 37 | *(sourc|e) & 037|
|00002620| 37 3b 09 09 09 09 09 5c | 0a 58 20 20 20 20 28 64 |7;.....\|.X (d|
|00002630| 65 73 74 69 6e 61 74 69 | 6f 6e 29 20 2b 3d 20 53 |estinati|on) += S|
|00002640| 49 47 4e 5f 45 58 54 45 | 4e 44 5f 43 48 41 52 20 |IGN_EXTE|ND_CHAR |
|00002650| 28 2a 28 63 68 61 72 20 | 2a 29 28 28 73 6f 75 72 |(*(char |*)((sour|
|00002660| 63 65 29 20 2b 20 31 29 | 29 20 3c 3c 20 38 3b 20 |ce) + 1)|) << 8; |
|00002670| 7d 0a 58 0a 58 2f 2a 20 | 53 61 6d 65 20 61 73 20 |}.X.X/* |Same as |
|00002680| 45 58 54 52 41 43 54 5f | 4e 55 4d 42 45 52 2c 20 |EXTRACT_|NUMBER, |
|00002690| 65 78 63 65 70 74 20 69 | 6e 63 72 65 6d 65 6e 74 |except i|ncrement|
|000026a0| 20 74 68 65 20 70 6f 69 | 6e 74 65 72 20 66 6f 72 | the poi|nter for|
|000026b0| 20 73 6f 75 72 63 65 20 | 74 6f 0a 58 20 20 20 70 | source |to.X p|
|000026c0| 6f 69 6e 74 20 74 6f 20 | 73 65 63 6f 6e 64 20 62 |oint to |second b|
|000026d0| 79 74 65 20 6f 66 20 53 | 4f 55 52 43 45 2e 20 20 |yte of S|OURCE. |
|000026e0| 4e 6f 74 65 20 74 68 61 | 74 20 53 4f 55 52 43 45 |Note tha|t SOURCE|
|000026f0| 20 68 61 73 20 74 6f 20 | 62 65 20 61 20 76 61 6c | has to |be a val|
|00002700| 75 65 0a 58 20 20 20 73 | 75 63 68 20 61 73 20 70 |ue.X s|uch as p|
|00002710| 2c 20 6e 6f 74 2c 20 65 | 2e 67 2e 2c 20 70 20 2b |, not, e|.g., p +|
|00002720| 20 31 2e 20 2a 2f 0a 58 | 23 64 65 66 69 6e 65 20 | 1. */.X|#define |
|00002730| 45 58 54 52 41 43 54 5f | 4e 55 4d 42 45 52 5f 41 |EXTRACT_|NUMBER_A|
|00002740| 4e 44 5f 49 4e 43 52 28 | 64 65 73 74 69 6e 61 74 |ND_INCR(|destinat|
|00002750| 69 6f 6e 2c 20 73 6f 75 | 72 63 65 29 09 09 09 5c |ion, sou|rce)...\|
|00002760| 0a 58 20 20 7b 20 45 58 | 54 52 41 43 54 5f 4e 55 |.X { EX|TRACT_NU|
|00002770| 4d 42 45 52 20 28 64 65 | 73 74 69 6e 61 74 69 6f |MBER (de|stinatio|
|00002780| 6e 2c 20 73 6f 75 72 63 | 65 29 3b 09 09 09 09 5c |n, sourc|e);....\|
|00002790| 0a 58 20 20 20 20 28 73 | 6f 75 72 63 65 29 20 2b |.X (s|ource) +|
|000027a0| 3d 20 32 3b 20 7d 0a 58 | 0a 58 0a 58 2f 2a 20 53 |= 2; }.X|.X.X/* S|
|000027b0| 70 65 63 69 66 79 20 74 | 68 65 20 70 72 65 63 69 |pecify t|he preci|
|000027c0| 73 65 20 73 79 6e 74 61 | 78 20 6f 66 20 72 65 67 |se synta|x of reg|
|000027d0| 65 78 70 73 20 66 6f 72 | 20 63 6f 6d 70 69 6c 61 |exps for| compila|
|000027e0| 74 69 6f 6e 2e 20 20 54 | 68 69 73 20 70 72 6f 76 |tion. T|his prov|
|000027f0| 69 64 65 73 0a 58 20 20 | 20 66 6f 72 20 63 6f 6d |ides.X | for com|
|00002800| 70 61 74 69 62 69 6c 69 | 74 79 20 66 6f 72 20 76 |patibili|ty for v|
|00002810| 61 72 69 6f 75 73 20 75 | 74 69 6c 69 74 69 65 73 |arious u|tilities|
|00002820| 20 77 68 69 63 68 20 68 | 69 73 74 6f 72 69 63 61 | which h|istorica|
|00002830| 6c 6c 79 20 68 61 76 65 | 0a 58 20 20 20 64 69 66 |lly have|.X dif|
|00002840| 66 65 72 65 6e 74 2c 20 | 69 6e 63 6f 6d 70 61 74 |ferent, |incompat|
|00002850| 69 62 6c 65 20 73 79 6e | 74 61 78 65 73 2e 0a 58 |ible syn|taxes..X|
|00002860| 20 20 20 0a 58 20 20 20 | 54 68 65 20 61 72 67 75 | .X |The argu|
|00002870| 6d 65 6e 74 20 53 59 4e | 54 41 58 20 69 73 20 61 |ment SYN|TAX is a|
|00002880| 20 62 69 74 2d 6d 61 73 | 6b 20 63 6f 6d 70 72 69 | bit-mas|k compri|
|00002890| 73 65 64 20 6f 66 20 74 | 68 65 20 76 61 72 69 6f |sed of t|he vario|
|000028a0| 75 73 20 62 69 74 73 0a | 58 20 20 20 64 65 66 69 |us bits.|X defi|
|000028b0| 6e 65 64 20 69 6e 20 72 | 65 67 65 78 2e 68 2e 20 |ned in r|egex.h. |
|000028c0| 20 2a 2f 0a 58 0a 58 69 | 6e 74 0a 58 72 65 5f 73 | */.X.Xi|nt.Xre_s|
|000028d0| 65 74 5f 73 79 6e 74 61 | 78 20 28 73 79 6e 74 61 |et_synta|x (synta|
|000028e0| 78 29 0a 58 20 20 69 6e | 74 20 73 79 6e 74 61 78 |x).X in|t syntax|
|000028f0| 3b 0a 58 7b 0a 58 20 20 | 69 6e 74 20 72 65 74 3b |;.X{.X |int ret;|
|00002900| 0a 58 0a 58 20 20 72 65 | 74 20 3d 20 6f 62 73 63 |.X.X re|t = obsc|
|00002910| 75 72 65 5f 73 79 6e 74 | 61 78 3b 0a 58 20 20 6f |ure_synt|ax;.X o|
|00002920| 62 73 63 75 72 65 5f 73 | 79 6e 74 61 78 20 3d 20 |bscure_s|yntax = |
|00002930| 73 79 6e 74 61 78 3b 0a | 58 20 20 72 65 74 75 72 |syntax;.|X retur|
|00002940| 6e 20 72 65 74 3b 0a 58 | 7d 0a 58 0a 58 2f 2a 20 |n ret;.X|}.X.X/* |
|00002950| 53 65 74 20 62 79 20 72 | 65 5f 73 65 74 5f 73 79 |Set by r|e_set_sy|
|00002960| 6e 74 61 78 20 74 6f 20 | 74 68 65 20 63 75 72 72 |ntax to |the curr|
|00002970| 65 6e 74 20 72 65 67 65 | 78 70 20 73 79 6e 74 61 |ent rege|xp synta|
|00002980| 78 20 74 6f 20 72 65 63 | 6f 67 6e 69 7a 65 2e 20 |x to rec|ognize. |
|00002990| 20 2a 2f 0a 58 69 6e 74 | 20 6f 62 73 63 75 72 65 | */.Xint| obscure|
|000029a0| 5f 73 79 6e 74 61 78 20 | 3d 20 30 3b 0a 58 0a 58 |_syntax |= 0;.X.X|
|000029b0| 0a 58 0c 0a 58 2f 2a 20 | 4d 61 63 72 6f 73 20 66 |.X..X/* |Macros f|
|000029c0| 6f 72 20 72 65 5f 63 6f | 6d 70 69 6c 65 5f 70 61 |or re_co|mpile_pa|
|000029d0| 74 74 65 72 6e 2c 20 77 | 68 69 63 68 20 69 73 20 |ttern, w|hich is |
|000029e0| 66 6f 75 6e 64 20 62 65 | 6c 6f 77 20 74 68 65 73 |found be|low thes|
|000029f0| 65 20 64 65 66 69 6e 69 | 74 69 6f 6e 73 2e 20 20 |e defini|tions. |
|00002a00| 2a 2f 0a 58 0a 58 23 64 | 65 66 69 6e 65 20 43 48 |*/.X.X#d|efine CH|
|00002a10| 41 52 5f 43 4c 41 53 53 | 5f 4d 41 58 5f 4c 45 4e |AR_CLASS|_MAX_LEN|
|00002a20| 47 54 48 20 20 36 0a 58 | 0a 58 2f 2a 20 46 65 74 |GTH 6.X|.X/* Fet|
|00002a30| 63 68 20 74 68 65 20 6e | 65 78 74 20 63 68 61 72 |ch the n|ext char|
|00002a40| 61 63 74 65 72 20 69 6e | 20 74 68 65 20 75 6e 63 |acter in| the unc|
|00002a50| 6f 6d 70 69 6c 65 64 20 | 70 61 74 74 65 72 6e 2c |ompiled |pattern,|
|00002a60| 20 74 72 61 6e 73 6c 61 | 74 69 6e 67 20 69 74 20 | transla|ting it |
|00002a70| 69 66 0a 58 20 20 20 6e | 65 63 65 73 73 61 72 79 |if.X n|ecessary|
|00002a80| 2e 20 20 2a 2f 0a 58 23 | 64 65 66 69 6e 65 20 50 |. */.X#|define P|
|00002a90| 41 54 46 45 54 43 48 28 | 63 29 09 09 09 09 09 09 |ATFETCH(|c)......|
|00002aa0| 09 5c 0a 58 20 20 7b 69 | 66 20 28 70 20 3d 3d 20 |.\.X {i|f (p == |
|00002ab0| 70 65 6e 64 29 20 67 6f | 74 6f 20 65 6e 64 5f 6f |pend) go|to end_o|
|00002ac0| 66 5f 70 61 74 74 65 72 | 6e 3b 09 09 09 09 09 5c |f_patter|n;.....\|
|00002ad0| 0a 58 20 20 63 20 3d 20 | 2a 20 28 75 6e 73 69 67 |.X c = |* (unsig|
|00002ae0| 6e 65 64 20 63 68 61 72 | 20 2a 29 20 70 2b 2b 3b |ned char| *) p++;|
|00002af0| 09 09 09 09 09 09 5c 0a | 58 20 20 69 66 20 28 74 |......\.|X if (t|
|00002b00| 72 61 6e 73 6c 61 74 65 | 29 20 63 20 3d 20 74 72 |ranslate|) c = tr|
|00002b10| 61 6e 73 6c 61 74 65 5b | 63 5d 3b 20 7d 0a 58 0a |anslate[|c]; }.X.|
|00002b20| 58 2f 2a 20 46 65 74 63 | 68 20 74 68 65 20 6e 65 |X/* Fetc|h the ne|
|00002b30| 78 74 20 63 68 61 72 61 | 63 74 65 72 20 69 6e 20 |xt chara|cter in |
|00002b40| 74 68 65 20 75 6e 63 6f | 6d 70 69 6c 65 64 20 70 |the unco|mpiled p|
|00002b50| 61 74 74 65 72 6e 2c 20 | 77 69 74 68 20 6e 6f 0a |attern, |with no.|
|00002b60| 58 20 20 20 74 72 61 6e | 73 6c 61 74 69 6f 6e 2e |X tran|slation.|
|00002b70| 20 20 2a 2f 0a 58 23 64 | 65 66 69 6e 65 20 50 41 | */.X#d|efine PA|
|00002b80| 54 46 45 54 43 48 5f 52 | 41 57 28 63 29 09 09 09 |TFETCH_R|AW(c)...|
|00002b90| 09 09 09 09 5c 0a 58 20 | 7b 69 66 20 28 70 20 3d |....\.X |{if (p =|
|00002ba0| 3d 20 70 65 6e 64 29 20 | 67 6f 74 6f 20 65 6e 64 |= pend) |goto end|
|00002bb0| 5f 6f 66 5f 70 61 74 74 | 65 72 6e 3b 09 09 09 09 |_of_patt|ern;....|
|00002bc0| 09 5c 0a 58 20 20 63 20 | 3d 20 2a 20 28 75 6e 73 |.\.X c |= * (uns|
|00002bd0| 69 67 6e 65 64 20 63 68 | 61 72 20 2a 29 20 70 2b |igned ch|ar *) p+|
|00002be0| 2b 3b 20 7d 0a 58 0a 58 | 23 64 65 66 69 6e 65 20 |+; }.X.X|#define |
|00002bf0| 50 41 54 55 4e 46 45 54 | 43 48 20 70 2d 2d 0a 58 |PATUNFET|CH p--.X|
|00002c00| 0a 58 0a 58 2f 2a 20 49 | 66 20 74 68 65 20 62 75 |.X.X/* I|f the bu|
|00002c10| 66 66 65 72 20 69 73 6e | 27 74 20 61 6c 6c 6f 63 |ffer isn|'t alloc|
|00002c20| 61 74 65 64 20 77 68 65 | 6e 20 69 74 20 63 6f 6d |ated whe|n it com|
|00002c30| 65 73 20 69 6e 2c 20 75 | 73 65 20 74 68 69 73 2e |es in, u|se this.|
|00002c40| 20 20 2a 2f 0a 58 23 64 | 65 66 69 6e 65 20 49 4e | */.X#d|efine IN|
|00002c50| 49 54 5f 42 55 46 5f 53 | 49 5a 45 20 20 32 38 0a |IT_BUF_S|IZE 28.|
|00002c60| 58 0a 58 2f 2a 20 4d 61 | 6b 65 20 73 75 72 65 20 |X.X/* Ma|ke sure |
|00002c70| 77 65 20 68 61 76 65 20 | 61 74 20 6c 65 61 73 74 |we have |at least|
|00002c80| 20 4e 20 6d 6f 72 65 20 | 62 79 74 65 73 20 6f 66 | N more |bytes of|
|00002c90| 20 73 70 61 63 65 20 69 | 6e 20 62 75 66 66 65 72 | space i|n buffer|
|00002ca0| 2e 20 20 2a 2f 0a 58 23 | 64 65 66 69 6e 65 20 47 |. */.X#|define G|
|00002cb0| 45 54 5f 42 55 46 46 45 | 52 5f 53 50 41 43 45 28 |ET_BUFFE|R_SPACE(|
|00002cc0| 6e 29 09 09 09 09 09 09 | 5c 0a 58 20 20 7b 09 09 |n)......|\.X {..|
|00002cd0| 09 09 09 09 09 09 20 20 | 20 20 20 20 20 20 5c 0a |...... | \.|
|00002ce0| 58 20 20 20 20 77 68 69 | 6c 65 20 28 62 20 2d 20 |X whi|le (b - |
|00002cf0| 62 75 66 70 2d 3e 62 75 | 66 66 65 72 20 2b 20 28 |bufp->bu|ffer + (|
|00002d00| 6e 29 20 3e 3d 20 62 75 | 66 70 2d 3e 61 6c 6c 6f |n) >= bu|fp->allo|
|00002d10| 63 61 74 65 64 29 09 09 | 09 5c 0a 58 20 20 20 20 |cated)..|.\.X |
|00002d20| 20 20 45 58 54 45 4e 44 | 5f 42 55 46 46 45 52 3b | EXTEND|_BUFFER;|
|00002d30| 09 09 09 09 09 09 09 5c | 0a 58 20 20 7d 0a 58 0a |.......\|.X }.X.|
|00002d40| 58 2f 2a 20 4d 61 6b 65 | 20 73 75 72 65 20 77 65 |X/* Make| sure we|
|00002d50| 20 68 61 76 65 20 6f 6e | 65 20 6d 6f 72 65 20 62 | have on|e more b|
|00002d60| 79 74 65 20 6f 66 20 62 | 75 66 66 65 72 20 73 70 |yte of b|uffer sp|
|00002d70| 61 63 65 20 61 6e 64 20 | 74 68 65 6e 20 61 64 64 |ace and |then add|
|00002d80| 20 43 48 20 74 6f 20 69 | 74 2e 20 20 2a 2f 0a 58 | CH to i|t. */.X|
|00002d90| 23 64 65 66 69 6e 65 20 | 42 55 46 50 55 53 48 28 |#define |BUFPUSH(|
|00002da0| 63 68 29 09 09 09 09 09 | 09 09 5c 0a 58 20 20 7b |ch).....|..\.X {|
|00002db0| 09 09 09 09 09 09 09 09 | 09 5c 0a 58 20 20 20 20 |........|.\.X |
|00002dc0| 47 45 54 5f 42 55 46 46 | 45 52 5f 53 50 41 43 45 |GET_BUFF|ER_SPACE|
|00002dd0| 20 28 31 29 3b 09 09 09 | 09 09 09 5c 0a 58 20 20 | (1);...|...\.X |
|00002de0| 20 20 2a 62 2b 2b 20 3d | 20 28 63 68 61 72 29 20 | *b++ =| (char) |
|00002df0| 28 63 68 29 3b 09 09 09 | 09 09 09 09 5c 0a 58 20 |(ch);...|....\.X |
|00002e00| 20 7d 0a 58 20 20 0a 58 | 2f 2a 20 45 78 74 65 6e | }.X .X|/* Exten|
|00002e10| 64 20 74 68 65 20 62 75 | 66 66 65 72 20 62 79 20 |d the bu|ffer by |
|00002e20| 74 77 69 63 65 20 69 74 | 73 20 63 75 72 72 65 6e |twice it|s curren|
|00002e30| 74 20 73 69 7a 65 20 76 | 69 61 20 72 65 61 6c 6c |t size v|ia reall|
|00002e40| 6f 63 69 61 74 69 6f 6e | 20 61 6e 64 0a 58 20 20 |ociation| and.X |
|00002e50| 20 72 65 73 65 74 20 74 | 68 65 20 70 6f 69 6e 74 | reset t|he point|
|00002e60| 65 72 73 20 74 68 61 74 | 20 70 6f 69 6e 74 65 64 |ers that| pointed|
|00002e70| 20 69 6e 74 6f 20 74 68 | 65 20 6f 6c 64 20 61 6c | into th|e old al|
|00002e80| 6c 6f 63 61 74 69 6f 6e | 20 74 6f 20 70 6f 69 6e |location| to poin|
|00002e90| 74 20 74 6f 0a 58 20 20 | 20 74 68 65 20 63 6f 72 |t to.X | the cor|
|00002ea0| 72 65 63 74 20 70 6c 61 | 63 65 73 20 69 6e 20 74 |rect pla|ces in t|
|00002eb0| 68 65 20 6e 65 77 20 61 | 6c 6c 6f 63 61 74 69 6f |he new a|llocatio|
|00002ec0| 6e 2e 20 20 49 66 20 65 | 78 74 65 6e 64 69 6e 67 |n. If e|xtending|
|00002ed0| 20 74 68 65 20 62 75 66 | 66 65 72 0a 58 20 20 20 | the buf|fer.X |
|00002ee0| 72 65 73 75 6c 74 73 20 | 69 6e 20 69 74 20 62 65 |results |in it be|
|00002ef0| 69 6e 67 20 6c 61 72 67 | 65 72 20 74 68 61 6e 20 |ing larg|er than |
|00002f00| 31 20 3c 3c 20 31 36 2c | 20 74 68 65 6e 20 66 6c |1 << 16,| then fl|
|00002f10| 61 67 20 6d 65 6d 6f 72 | 79 20 65 78 68 61 75 73 |ag memor|y exhaus|
|00002f20| 74 65 64 2e 20 20 2a 2f | 0a 58 23 64 65 66 69 6e |ted. */|.X#defin|
|00002f30| 65 20 45 58 54 45 4e 44 | 5f 42 55 46 46 45 52 09 |e EXTEND|_BUFFER.|
|00002f40| 09 09 09 09 09 09 5c 0a | 58 20 20 7b 20 63 68 61 |......\.|X { cha|
|00002f50| 72 20 2a 6f 6c 64 5f 62 | 75 66 66 65 72 20 3d 20 |r *old_b|uffer = |
|00002f60| 62 75 66 70 2d 3e 62 75 | 66 66 65 72 3b 09 09 09 |bufp->bu|ffer;...|
|00002f70| 09 09 5c 0a 58 20 20 20 | 20 69 66 20 28 62 75 66 |..\.X | if (buf|
|00002f80| 70 2d 3e 61 6c 6c 6f 63 | 61 74 65 64 20 3d 3d 20 |p->alloc|ated == |
|00002f90| 28 31 4c 3c 3c 31 36 29 | 29 20 67 6f 74 6f 20 74 |(1L<<16)|) goto t|
|00002fa0| 6f 6f 5f 62 69 67 3b 09 | 09 09 5c 0a 58 20 20 20 |oo_big;.|..\.X |
|00002fb0| 20 62 75 66 70 2d 3e 61 | 6c 6c 6f 63 61 74 65 64 | bufp->a|llocated|
|00002fc0| 20 2a 3d 20 32 3b 09 09 | 09 09 09 09 5c 0a 58 20 | *= 2;..|....\.X |
|00002fd0| 20 20 20 69 66 20 28 62 | 75 66 70 2d 3e 61 6c 6c | if (b|ufp->all|
|00002fe0| 6f 63 61 74 65 64 20 3e | 20 28 31 4c 3c 3c 31 36 |ocated >| (1L<<16|
|00002ff0| 29 29 20 62 75 66 70 2d | 3e 61 6c 6c 6f 63 61 74 |)) bufp-|>allocat|
|00003000| 65 64 20 3d 20 28 31 4c | 3c 3c 31 36 29 3b 09 09 |ed = (1L|<<16);..|
|00003010| 5c 0a 58 20 20 20 20 62 | 75 66 70 2d 3e 62 75 66 |\.X b|ufp->buf|
|00003020| 66 65 72 20 3d 20 28 63 | 68 61 72 20 2a 29 20 72 |fer = (c|har *) r|
|00003030| 65 61 6c 6c 6f 63 20 28 | 62 75 66 70 2d 3e 62 75 |ealloc (|bufp->bu|
|00003040| 66 66 65 72 2c 20 62 75 | 66 70 2d 3e 61 6c 6c 6f |ffer, bu|fp->allo|
|00003050| 63 61 74 65 64 29 3b 09 | 5c 0a 58 20 20 20 20 69 |cated);.|\.X i|
|00003060| 66 20 28 62 75 66 70 2d | 3e 62 75 66 66 65 72 20 |f (bufp-|>buffer |
|00003070| 3d 3d 20 30 29 09 09 09 | 09 09 09 5c 0a 58 20 20 |== 0)...|...\.X |
|00003080| 20 20 20 20 67 6f 74 6f | 20 6d 65 6d 6f 72 79 5f | goto| memory_|
|00003090| 65 78 68 61 75 73 74 65 | 64 3b 09 09 09 09 09 09 |exhauste|d;......|
|000030a0| 5c 0a 58 20 20 20 20 62 | 20 3d 20 28 62 20 2d 20 |\.X b| = (b - |
|000030b0| 6f 6c 64 5f 62 75 66 66 | 65 72 29 20 2b 20 62 75 |old_buff|er) + bu|
|000030c0| 66 70 2d 3e 62 75 66 66 | 65 72 3b 09 09 09 09 5c |fp->buff|er;....\|
|000030d0| 0a 58 20 20 20 20 69 66 | 20 28 66 69 78 75 70 5f |.X if| (fixup_|
|000030e0| 6a 75 6d 70 29 09 09 09 | 09 09 09 09 5c 0a 58 20 |jump)...|....\.X |
|000030f0| 20 20 20 20 20 66 69 78 | 75 70 5f 6a 75 6d 70 20 | fix|up_jump |
|00003100| 3d 20 28 66 69 78 75 70 | 5f 6a 75 6d 70 20 2d 20 |= (fixup|_jump - |
|00003110| 6f 6c 64 5f 62 75 66 66 | 65 72 29 20 2b 20 62 75 |old_buff|er) + bu|
|00003120| 66 70 2d 3e 62 75 66 66 | 65 72 3b 09 09 5c 0a 58 |fp->buff|er;..\.X|
|00003130| 20 20 20 20 69 66 20 28 | 6c 61 73 74 73 74 61 72 | if (|laststar|
|00003140| 74 29 09 09 09 09 09 09 | 09 5c 0a 58 20 20 20 20 |t)......|.\.X |
|00003150| 20 20 6c 61 73 74 73 74 | 61 72 74 20 3d 20 28 6c | lastst|art = (l|
|00003160| 61 73 74 73 74 61 72 74 | 20 2d 20 6f 6c 64 5f 62 |aststart| - old_b|
|00003170| 75 66 66 65 72 29 20 2b | 20 62 75 66 70 2d 3e 62 |uffer) +| bufp->b|
|00003180| 75 66 66 65 72 3b 09 09 | 5c 0a 58 20 20 20 20 62 |uffer;..|\.X b|
|00003190| 65 67 61 6c 74 20 3d 20 | 28 62 65 67 61 6c 74 20 |egalt = |(begalt |
|000031a0| 2d 20 6f 6c 64 5f 62 75 | 66 66 65 72 29 20 2b 20 |- old_bu|ffer) + |
|000031b0| 62 75 66 70 2d 3e 62 75 | 66 66 65 72 3b 09 09 09 |bufp->bu|ffer;...|
|000031c0| 5c 0a 58 20 20 20 20 69 | 66 20 28 70 65 6e 64 69 |\.X i|f (pendi|
|000031d0| 6e 67 5f 65 78 61 63 74 | 29 09 09 09 09 09 09 09 |ng_exact|).......|
|000031e0| 5c 0a 58 20 20 20 20 20 | 20 70 65 6e 64 69 6e 67 |\.X | pending|
|000031f0| 5f 65 78 61 63 74 20 3d | 20 28 70 65 6e 64 69 6e |_exact =| (pendin|
|00003200| 67 5f 65 78 61 63 74 20 | 2d 20 6f 6c 64 5f 62 75 |g_exact |- old_bu|
|00003210| 66 66 65 72 29 20 2b 20 | 62 75 66 70 2d 3e 62 75 |ffer) + |bufp->bu|
|00003220| 66 66 65 72 3b 09 5c 0a | 58 20 20 7d 0a 58 0a 58 |ffer;.\.|X }.X.X|
|00003230| 2f 2a 20 53 65 74 20 74 | 68 65 20 62 69 74 20 66 |/* Set t|he bit f|
|00003240| 6f 72 20 63 68 61 72 61 | 63 74 65 72 20 43 20 69 |or chara|cter C i|
|00003250| 6e 20 61 20 63 68 61 72 | 61 63 74 65 72 20 73 65 |n a char|acter se|
|00003260| 74 20 6c 69 73 74 2e 20 | 20 2a 2f 0a 58 23 64 65 |t list. | */.X#de|
|00003270| 66 69 6e 65 20 53 45 54 | 5f 4c 49 53 54 5f 42 49 |fine SET|_LIST_BI|
|00003280| 54 28 63 29 20 20 28 62 | 5b 28 63 29 20 2f 20 42 |T(c) (b|[(c) / B|
|00003290| 59 54 45 57 49 44 54 48 | 5d 20 7c 3d 20 31 20 3c |YTEWIDTH|] |= 1 <|
|000032a0| 3c 20 28 28 63 29 20 25 | 20 42 59 54 45 57 49 44 |< ((c) %| BYTEWID|
|000032b0| 54 48 29 29 0a 58 0a 58 | 2f 2a 20 47 65 74 20 74 |TH)).X.X|/* Get t|
|000032c0| 68 65 20 6e 65 78 74 20 | 75 6e 73 69 67 6e 65 64 |he next |unsigned|
|000032d0| 20 6e 75 6d 62 65 72 20 | 69 6e 20 74 68 65 20 75 | number |in the u|
|000032e0| 6e 63 6f 6d 70 69 6c 65 | 64 20 70 61 74 74 65 72 |ncompile|d patter|
|000032f0| 6e 2e 20 20 2a 2f 0a 58 | 23 64 65 66 69 6e 65 20 |n. */.X|#define |
|00003300| 47 45 54 5f 55 4e 53 49 | 47 4e 45 44 5f 4e 55 4d |GET_UNSI|GNED_NUM|
|00003310| 42 45 52 28 6e 75 6d 29 | 20 09 09 09 09 09 5c 0a |BER(num)| .....\.|
|00003320| 58 20 20 7b 20 69 66 20 | 28 70 20 21 3d 20 70 65 |X { if |(p != pe|
|00003330| 6e 64 29 20 09 09 09 09 | 09 09 09 5c 0a 58 20 20 |nd) ....|...\.X |
|00003340| 20 20 20 20 7b 20 09 09 | 09 09 09 09 09 09 5c 0a | { ..|......\.|
|00003350| 58 20 20 20 20 20 20 20 | 20 50 41 54 46 45 54 43 |X | PATFETC|
|00003360| 48 20 28 63 29 3b 20 09 | 09 09 09 09 09 09 5c 0a |H (c); .|......\.|
|00003370| 58 09 77 68 69 6c 65 20 | 28 69 73 64 69 67 69 74 |X.while |(isdigit|
|00003380| 20 28 63 29 29 20 09 09 | 09 09 09 09 5c 0a 58 09 | (c)) ..|....\.X.|
|00003390| 20 20 7b 20 09 09 09 09 | 09 09 09 09 5c 0a 58 09 | { ....|....\.X.|
|000033a0| 20 20 20 20 69 66 20 28 | 6e 75 6d 20 3c 20 30 29 | if (|num < 0)|
|000033b0| 20 09 09 09 09 09 09 5c | 0a 58 09 20 20 20 20 20 | ......\|.X. |
|000033c0| 20 20 6e 75 6d 20 3d 20 | 30 3b 20 09 09 09 09 09 | num = |0; .....|
|000033d0| 09 5c 0a 58 20 20 20 20 | 20 20 20 20 20 20 20 20 |.\.X | |
|000033e0| 6e 75 6d 20 3d 20 6e 75 | 6d 20 2a 20 31 30 20 2b |num = nu|m * 10 +|
|000033f0| 20 63 20 2d 20 27 30 27 | 3b 20 09 09 09 09 09 5c | c - '0'|; .....\|
|00003400| 0a 58 09 20 20 20 20 69 | 66 20 28 70 20 3d 3d 20 |.X. i|f (p == |
|00003410| 70 65 6e 64 29 20 09 09 | 09 09 09 09 5c 0a 58 09 |pend) ..|....\.X.|
|00003420| 20 20 20 20 20 20 20 62 | 72 65 61 6b 3b 20 09 09 | b|reak; ..|
|00003430| 09 09 09 09 09 5c 0a 58 | 09 20 20 20 20 50 41 54 |.....\.X|. PAT|
|00003440| 46 45 54 43 48 20 28 63 | 29 3b 20 09 09 09 09 09 |FETCH (c|); .....|
|00003450| 09 5c 0a 58 09 20 20 7d | 20 09 09 09 09 09 09 09 |.\.X. }| .......|
|00003460| 09 5c 0a 58 20 20 20 20 | 20 20 20 20 7d 20 09 09 |.\.X | } ..|
|00003470| 09 09 09 09 09 09 5c 0a | 58 20 20 7d 0a 58 0a 58 |......\.|X }.X.X|
|00003480| 2f 2a 20 53 75 62 72 6f | 75 74 69 6e 65 73 20 66 |/* Subro|utines f|
|00003490| 6f 72 20 72 65 5f 63 6f | 6d 70 69 6c 65 5f 70 61 |or re_co|mpile_pa|
|000034a0| 74 74 65 72 6e 2e 20 20 | 2a 2f 0a 58 73 74 61 74 |ttern. |*/.Xstat|
|000034b0| 69 63 20 76 6f 69 64 20 | 73 74 6f 72 65 5f 6a 75 |ic void |store_ju|
|000034c0| 6d 70 20 28 29 2c 20 69 | 6e 73 65 72 74 5f 6a 75 |mp (), i|nsert_ju|
|000034d0| 6d 70 20 28 29 2c 20 73 | 74 6f 72 65 5f 6a 75 6d |mp (), s|tore_jum|
|000034e0| 70 5f 6e 20 28 29 2c 0a | 58 09 20 20 20 20 69 6e |p_n (),.|X. in|
|000034f0| 73 65 72 74 5f 6a 75 6d | 70 5f 6e 20 28 29 2c 20 |sert_jum|p_n (), |
|00003500| 69 6e 73 65 72 74 5f 6f | 70 5f 32 20 28 29 3b 0a |insert_o|p_2 ();.|
|00003510| 58 0a 58 0a 58 2f 2a 20 | 72 65 5f 63 6f 6d 70 69 |X.X.X/* |re_compi|
|00003520| 6c 65 5f 70 61 74 74 65 | 72 6e 20 74 61 6b 65 73 |le_patte|rn takes|
|00003530| 20 61 20 72 65 67 75 6c | 61 72 2d 65 78 70 72 65 | a regul|ar-expre|
|00003540| 73 73 69 6f 6e 20 73 74 | 72 69 6e 67 0a 58 20 20 |ssion st|ring.X |
|00003550| 20 61 6e 64 20 63 6f 6e | 76 65 72 74 73 20 69 74 | and con|verts it|
|00003560| 20 69 6e 74 6f 20 61 20 | 62 75 66 66 65 72 20 66 | into a |buffer f|
|00003570| 75 6c 6c 20 6f 66 20 62 | 79 74 65 20 63 6f 6d 6d |ull of b|yte comm|
|00003580| 61 6e 64 73 20 66 6f 72 | 20 6d 61 74 63 68 69 6e |ands for| matchin|
|00003590| 67 2e 0a 58 0a 58 20 20 | 20 50 41 54 54 45 52 4e |g..X.X | PATTERN|
|000035a0| 20 20 20 69 73 20 74 68 | 65 20 61 64 64 72 65 73 | is th|e addres|
|000035b0| 73 20 6f 66 20 74 68 65 | 20 70 61 74 74 65 72 6e |s of the| pattern|
|000035c0| 20 73 74 72 69 6e 67 0a | 58 20 20 20 53 49 5a 45 | string.|X SIZE|
|000035d0| 20 20 20 20 20 20 69 73 | 20 74 68 65 20 6c 65 6e | is| the len|
|000035e0| 67 74 68 20 6f 66 20 69 | 74 2e 0a 58 20 20 20 42 |gth of i|t..X B|
|000035f0| 55 46 50 09 20 20 20 20 | 69 73 20 61 20 20 73 74 |UFP. |is a st|
|00003600| 72 75 63 74 20 72 65 5f | 70 61 74 74 65 72 6e 5f |ruct re_|pattern_|
|00003610| 62 75 66 66 65 72 20 2a | 20 20 77 68 69 63 68 20 |buffer *| which |
|00003620| 70 6f 69 6e 74 73 20 74 | 6f 20 74 68 65 20 69 6e |points t|o the in|
|00003630| 66 6f 0a 58 09 20 20 20 | 20 20 6f 6e 20 77 68 65 |fo.X. | on whe|
|00003640| 72 65 20 74 6f 20 73 74 | 6f 72 65 20 74 68 65 20 |re to st|ore the |
|00003650| 62 79 74 65 20 63 6f 6d | 6d 61 6e 64 73 2e 0a 58 |byte com|mands..X|
|00003660| 09 20 20 20 20 20 54 68 | 69 73 20 73 74 72 75 63 |. Th|is struc|
|00003670| 74 75 72 65 20 63 6f 6e | 74 61 69 6e 73 20 61 20 |ture con|tains a |
|00003680| 20 63 68 61 72 20 2a 20 | 20 77 68 69 63 68 20 70 | char * | which p|
|00003690| 6f 69 6e 74 73 20 74 6f | 20 74 68 65 0a 58 09 20 |oints to| the.X. |
|000036a0| 20 20 20 20 61 63 74 75 | 61 6c 20 73 70 61 63 65 | actu|al space|
|000036b0| 2c 20 77 68 69 63 68 20 | 73 68 6f 75 6c 64 20 68 |, which |should h|
|000036c0| 61 76 65 20 62 65 65 6e | 20 6f 62 74 61 69 6e 65 |ave been| obtaine|
|000036d0| 64 20 77 69 74 68 20 6d | 61 6c 6c 6f 63 2e 0a 58 |d with m|alloc..X|
|000036e0| 09 20 20 20 20 20 72 65 | 5f 63 6f 6d 70 69 6c 65 |. re|_compile|
|000036f0| 5f 70 61 74 74 65 72 6e | 20 6d 61 79 20 75 73 65 |_pattern| may use|
|00003700| 20 72 65 61 6c 6c 6f 63 | 20 74 6f 20 67 72 6f 77 | realloc| to grow|
|00003710| 20 74 68 65 20 62 75 66 | 66 65 72 20 73 70 61 63 | the buf|fer spac|
|00003720| 65 2e 0a 58 0a 58 20 20 | 20 54 68 65 20 6e 75 6d |e..X.X | The num|
|00003730| 62 65 72 20 6f 66 20 62 | 79 74 65 73 20 6f 66 20 |ber of b|ytes of |
|00003740| 63 6f 6d 6d 61 6e 64 73 | 20 63 61 6e 20 62 65 20 |commands| can be |
|00003750| 66 6f 75 6e 64 20 6f 75 | 74 20 62 79 20 6c 6f 6f |found ou|t by loo|
|00003760| 6b 69 6e 67 20 69 6e 0a | 58 20 20 20 74 68 65 20 |king in.|X the |
|00003770| 60 73 74 72 75 63 74 20 | 72 65 5f 70 61 74 74 65 |`struct |re_patte|
|00003780| 72 6e 5f 62 75 66 66 65 | 72 27 20 74 68 61 74 20 |rn_buffe|r' that |
|00003790| 62 75 66 70 20 70 6f 69 | 6e 74 65 64 20 74 6f 2c |bufp poi|nted to,|
|000037a0| 20 61 66 74 65 72 0a 58 | 20 20 20 72 65 5f 63 6f | after.X| re_co|
|000037b0| 6d 70 69 6c 65 5f 70 61 | 74 74 65 72 6e 20 72 65 |mpile_pa|ttern re|
|000037c0| 74 75 72 6e 73 2e 20 2a | 2f 0a 58 0a 58 63 68 61 |turns. *|/.X.Xcha|
|000037d0| 72 20 2a 0a 58 72 65 5f | 63 6f 6d 70 69 6c 65 5f |r *.Xre_|compile_|
|000037e0| 70 61 74 74 65 72 6e 20 | 28 70 61 74 74 65 72 6e |pattern |(pattern|
|000037f0| 2c 20 73 69 7a 65 2c 20 | 62 75 66 70 29 0a 58 20 |, size, |bufp).X |
|00003800| 20 20 20 20 63 68 61 72 | 20 2a 70 61 74 74 65 72 | char| *patter|
|00003810| 6e 3b 0a 58 20 20 20 20 | 20 69 6e 74 20 73 69 7a |n;.X | int siz|
|00003820| 65 3b 0a 58 20 20 20 20 | 20 73 74 72 75 63 74 20 |e;.X | struct |
|00003830| 72 65 5f 70 61 74 74 65 | 72 6e 5f 62 75 66 66 65 |re_patte|rn_buffe|
|00003840| 72 20 2a 62 75 66 70 3b | 0a 58 7b 0a 58 20 20 72 |r *bufp;|.X{.X r|
|00003850| 65 67 69 73 74 65 72 20 | 63 68 61 72 20 2a 62 20 |egister |char *b |
|00003860| 3d 20 62 75 66 70 2d 3e | 62 75 66 66 65 72 3b 0a |= bufp->|buffer;.|
|00003870| 58 20 20 72 65 67 69 73 | 74 65 72 20 63 68 61 72 |X regis|ter char|
|00003880| 20 2a 70 20 3d 20 70 61 | 74 74 65 72 6e 3b 0a 58 | *p = pa|ttern;.X|
|00003890| 20 20 63 68 61 72 20 2a | 70 65 6e 64 20 3d 20 70 | char *|pend = p|
|000038a0| 61 74 74 65 72 6e 20 2b | 20 73 69 7a 65 3b 0a 58 |attern +| size;.X|
|000038b0| 20 20 72 65 67 69 73 74 | 65 72 20 75 6e 73 69 67 | regist|er unsig|
|000038c0| 6e 65 64 20 63 2c 20 63 | 31 3b 0a 58 20 20 63 68 |ned c, c|1;.X ch|
|000038d0| 61 72 20 2a 70 31 3b 0a | 58 20 20 75 6e 73 69 67 |ar *p1;.|X unsig|
|000038e0| 6e 65 64 20 63 68 61 72 | 20 2a 74 72 61 6e 73 6c |ned char| *transl|
|000038f0| 61 74 65 20 3d 20 28 75 | 6e 73 69 67 6e 65 64 20 |ate = (u|nsigned |
|00003900| 63 68 61 72 20 2a 29 20 | 62 75 66 70 2d 3e 74 72 |char *) |bufp->tr|
|00003910| 61 6e 73 6c 61 74 65 3b | 0a 58 0a 58 20 20 2f 2a |anslate;|.X.X /*|
|00003920| 20 41 64 64 72 65 73 73 | 20 6f 66 20 74 68 65 20 | Address| of the |
|00003930| 63 6f 75 6e 74 2d 62 79 | 74 65 20 6f 66 20 74 68 |count-by|te of th|
|00003940| 65 20 6d 6f 73 74 20 72 | 65 63 65 6e 74 6c 79 20 |e most r|ecently |
|00003950| 69 6e 73 65 72 74 65 64 | 20 60 65 78 61 63 74 6e |inserted| `exactn|
|00003960| 27 0a 58 20 20 20 20 20 | 63 6f 6d 6d 61 6e 64 2e |'.X |command.|
|00003970| 20 20 54 68 69 73 20 6d | 61 6b 65 73 20 69 74 20 | This m|akes it |
|00003980| 70 6f 73 73 69 62 6c 65 | 20 74 6f 20 74 65 6c 6c |possible| to tell|
|00003990| 20 77 68 65 74 68 65 72 | 20 61 20 6e 65 77 20 65 | whether| a new e|
|000039a0| 78 61 63 74 2d 6d 61 74 | 63 68 0a 58 20 20 20 20 |xact-mat|ch.X |
|000039b0| 20 63 68 61 72 61 63 74 | 65 72 20 63 61 6e 20 62 | charact|er can b|
|000039c0| 65 20 61 64 64 65 64 20 | 74 6f 20 74 68 61 74 20 |e added |to that |
|000039d0| 63 6f 6d 6d 61 6e 64 20 | 6f 72 20 72 65 71 75 69 |command |or requi|
|000039e0| 72 65 73 20 61 20 6e 65 | 77 20 60 65 78 61 63 74 |res a ne|w `exact|
|000039f0| 6e 27 0a 58 20 20 20 20 | 20 63 6f 6d 6d 61 6e 64 |n'.X | command|
|00003a00| 2e 20 20 2a 2f 0a 58 20 | 20 20 20 20 0a 58 20 20 |. */.X | .X |
|00003a10| 63 68 61 72 20 2a 70 65 | 6e 64 69 6e 67 5f 65 78 |char *pe|nding_ex|
|00003a20| 61 63 74 20 3d 20 30 3b | 0a 58 0a 58 20 20 2f 2a |act = 0;|.X.X /*|
|00003a30| 20 41 64 64 72 65 73 73 | 20 6f 66 20 74 68 65 20 | Address| of the |
|00003a40| 70 6c 61 63 65 20 77 68 | 65 72 65 20 61 20 66 6f |place wh|ere a fo|
|00003a50| 72 77 61 72 64 2d 6a 75 | 6d 70 20 73 68 6f 75 6c |rward-ju|mp shoul|
|00003a60| 64 20 67 6f 20 74 6f 20 | 74 68 65 20 65 6e 64 20 |d go to |the end |
|00003a70| 6f 66 0a 58 20 20 20 20 | 20 74 68 65 20 63 6f 6e |of.X | the con|
|00003a80| 74 61 69 6e 69 6e 67 20 | 65 78 70 72 65 73 73 69 |taining |expressi|
|00003a90| 6f 6e 2e 20 20 45 61 63 | 68 20 61 6c 74 65 72 6e |on. Eac|h altern|
|00003aa0| 61 74 69 76 65 20 6f 66 | 20 61 6e 20 60 6f 72 27 |ative of| an `or'|
|00003ab0| 2c 20 65 78 63 65 70 74 | 20 74 68 65 0a 58 20 20 |, except| the.X |
|00003ac0| 20 20 20 6c 61 73 74 2c | 20 65 6e 64 73 20 77 69 | last,| ends wi|
|00003ad0| 74 68 20 61 20 66 6f 72 | 77 61 72 64 2d 6a 75 6d |th a for|ward-jum|
|00003ae0| 70 20 6f 66 20 74 68 69 | 73 20 73 6f 72 74 2e 20 |p of thi|s sort. |
|00003af0| 20 2a 2f 0a 58 0a 58 20 | 20 63 68 61 72 20 2a 66 | */.X.X | char *f|
|00003b00| 69 78 75 70 5f 6a 75 6d | 70 20 3d 20 30 3b 0a 58 |ixup_jum|p = 0;.X|
|00003b10| 0a 58 20 20 2f 2a 20 41 | 64 64 72 65 73 73 20 6f |.X /* A|ddress o|
|00003b20| 66 20 73 74 61 72 74 20 | 6f 66 20 74 68 65 20 6d |f start |of the m|
|00003b30| 6f 73 74 20 72 65 63 65 | 6e 74 6c 79 20 66 69 6e |ost rece|ntly fin|
|00003b40| 69 73 68 65 64 20 65 78 | 70 72 65 73 73 69 6f 6e |ished ex|pression|
|00003b50| 2e 0a 58 20 20 20 20 20 | 54 68 69 73 20 74 65 6c |..X |This tel|
|00003b60| 6c 73 20 70 6f 73 74 66 | 69 78 20 2a 20 77 68 65 |ls postf|ix * whe|
|00003b70| 72 65 20 74 6f 20 66 69 | 6e 64 20 74 68 65 20 73 |re to fi|nd the s|
|00003b80| 74 61 72 74 20 6f 66 20 | 69 74 73 20 6f 70 65 72 |tart of |its oper|
|00003b90| 61 6e 64 2e 20 20 2a 2f | 0a 58 0a 58 20 20 63 68 |and. */|.X.X ch|
|00003ba0| 61 72 20 2a 6c 61 73 74 | 73 74 61 72 74 20 3d 20 |ar *last|start = |
|00003bb0| 30 3b 0a 58 0a 58 20 20 | 2f 2a 20 49 6e 20 70 72 |0;.X.X |/* In pr|
|00003bc0| 6f 63 65 73 73 69 6e 67 | 20 61 20 72 65 70 65 61 |ocessing| a repea|
|00003bd0| 74 2c 20 31 20 6d 65 61 | 6e 73 20 7a 65 72 6f 20 |t, 1 mea|ns zero |
|00003be0| 6d 61 74 63 68 65 73 20 | 69 73 20 61 6c 6c 6f 77 |matches |is allow|
|00003bf0| 65 64 2e 20 20 2a 2f 0a | 58 0a 58 20 20 63 68 61 |ed. */.|X.X cha|
|00003c00| 72 20 7a 65 72 6f 5f 74 | 69 6d 65 73 5f 6f 6b 3b |r zero_t|imes_ok;|
|00003c10| 0a 58 0a 58 20 20 2f 2a | 20 49 6e 20 70 72 6f 63 |.X.X /*| In proc|
|00003c20| 65 73 73 69 6e 67 20 61 | 20 72 65 70 65 61 74 2c |essing a| repeat,|
|00003c30| 20 31 20 6d 65 61 6e 73 | 20 6d 61 6e 79 20 6d 61 | 1 means| many ma|
|00003c40| 74 63 68 65 73 20 69 73 | 20 61 6c 6c 6f 77 65 64 |tches is| allowed|
|00003c50| 2e 20 20 2a 2f 0a 58 0a | 58 20 20 63 68 61 72 20 |. */.X.|X char |
|00003c60| 6d 61 6e 79 5f 74 69 6d | 65 73 5f 6f 6b 3b 0a 58 |many_tim|es_ok;.X|
|00003c70| 0a 58 20 20 2f 2a 20 41 | 64 64 72 65 73 73 20 6f |.X /* A|ddress o|
|00003c80| 66 20 62 65 67 69 6e 6e | 69 6e 67 20 6f 66 20 72 |f beginn|ing of r|
|00003c90| 65 67 65 78 70 2c 20 6f | 72 20 69 6e 73 69 64 65 |egexp, o|r inside|
|00003ca0| 20 6f 66 20 6c 61 73 74 | 20 5c 28 2e 20 20 2a 2f | of last| \(. */|
|00003cb0| 0a 58 0a 58 20 20 63 68 | 61 72 20 2a 62 65 67 61 |.X.X ch|ar *bega|
|00003cc0| 6c 74 20 3d 20 62 3b 0a | 58 0a 58 20 20 2f 2a 20 |lt = b;.|X.X /* |
|00003cd0| 49 6e 20 70 72 6f 63 65 | 73 73 69 6e 67 20 61 6e |In proce|ssing an|
|00003ce0| 20 69 6e 74 65 72 76 61 | 6c 2c 20 61 74 20 6c 65 | interva|l, at le|
|00003cf0| 61 73 74 20 74 68 69 73 | 20 6d 61 6e 79 20 6d 61 |ast this| many ma|
|00003d00| 74 63 68 65 73 20 6d 75 | 73 74 20 62 65 20 6d 61 |tches mu|st be ma|
|00003d10| 64 65 2e 20 20 2a 2f 0a | 58 20 20 69 6e 74 20 6c |de. */.|X int l|
|00003d20| 6f 77 65 72 5f 62 6f 75 | 6e 64 3b 0a 58 0a 58 20 |ower_bou|nd;.X.X |
|00003d30| 20 2f 2a 20 49 6e 20 70 | 72 6f 63 65 73 73 69 6e | /* In p|rocessin|
|00003d40| 67 20 61 6e 20 69 6e 74 | 65 72 76 61 6c 2c 20 61 |g an int|erval, a|
|00003d50| 74 20 6d 6f 73 74 20 74 | 68 69 73 20 6d 61 6e 79 |t most t|his many|
|00003d60| 20 6d 61 74 63 68 65 73 | 20 63 61 6e 20 62 65 20 | matches| can be |
|00003d70| 6d 61 64 65 2e 20 20 2a | 2f 0a 58 20 20 69 6e 74 |made. *|/.X int|
|00003d80| 20 75 70 70 65 72 5f 62 | 6f 75 6e 64 3b 0a 58 0a | upper_b|ound;.X.|
|00003d90| 58 20 20 2f 2a 20 50 6c | 61 63 65 20 69 6e 20 70 |X /* Pl|ace in p|
|00003da0| 61 74 74 65 72 6e 20 28 | 69 2e 65 2e 2c 20 74 68 |attern (|i.e., th|
|00003db0| 65 20 7b 29 20 74 6f 20 | 77 68 69 63 68 20 74 6f |e {) to |which to|
|00003dc0| 20 67 6f 20 62 61 63 6b | 20 69 66 20 74 68 65 20 | go back| if the |
|00003dd0| 69 6e 74 65 72 76 61 6c | 0a 58 20 20 20 20 20 69 |interval|.X i|
|00003de0| 73 20 69 6e 76 61 6c 69 | 64 2e 20 20 2a 2f 0a 58 |s invali|d. */.X|
|00003df0| 20 20 63 68 61 72 20 2a | 62 65 67 5f 69 6e 74 65 | char *|beg_inte|
|00003e00| 72 76 61 6c 20 3d 20 30 | 3b 0a 58 20 20 0a 58 20 |rval = 0|;.X .X |
|00003e10| 20 2f 2a 20 53 74 61 63 | 6b 20 6f 66 20 69 6e 66 | /* Stac|k of inf|
|00003e20| 6f 72 6d 61 74 69 6f 6e | 20 73 61 76 65 64 20 62 |ormation| saved b|
|00003e30| 79 20 5c 28 20 61 6e 64 | 20 72 65 73 74 6f 72 65 |y \( and| restore|
|00003e40| 64 20 62 79 20 5c 29 2e | 0a 58 20 20 20 20 20 46 |d by \).|.X F|
|00003e50| 6f 75 72 20 73 74 61 63 | 6b 20 65 6c 65 6d 65 6e |our stac|k elemen|
|00003e60| 74 73 20 61 72 65 20 70 | 75 73 68 65 64 20 62 79 |ts are p|ushed by|
|00003e70| 20 65 61 63 68 20 5c 28 | 3a 0a 58 20 20 20 20 20 | each \(|:.X |
|00003e80| 20 20 46 69 72 73 74 2c | 20 74 68 65 20 76 61 6c | First,| the val|
|00003e90| 75 65 20 6f 66 20 62 2e | 0a 58 20 20 20 20 20 20 |ue of b.|.X |
|00003ea0| 20 53 65 63 6f 6e 64 2c | 20 74 68 65 20 76 61 6c | Second,| the val|
|00003eb0| 75 65 20 6f 66 20 66 69 | 78 75 70 5f 6a 75 6d 70 |ue of fi|xup_jump|
|00003ec0| 2e 0a 58 20 20 20 20 20 | 20 20 54 68 69 72 64 2c |..X | Third,|
|00003ed0| 20 74 68 65 20 76 61 6c | 75 65 20 6f 66 20 72 65 | the val|ue of re|
|00003ee0| 67 6e 75 6d 2e 0a 58 20 | 20 20 20 20 20 20 46 6f |gnum..X | Fo|
|00003ef0| 75 72 74 68 2c 20 74 68 | 65 20 76 61 6c 75 65 20 |urth, th|e value |
|00003f00| 6f 66 20 62 65 67 61 6c | 74 2e 20 20 2a 2f 0a 58 |of begal|t. */.X|
|00003f10| 0a 58 20 20 69 6e 74 20 | 73 74 61 63 6b 62 5b 34 |.X int |stackb[4|
|00003f20| 30 5d 3b 0a 58 20 20 69 | 6e 74 20 2a 73 74 61 63 |0];.X i|nt *stac|
|00003f30| 6b 70 20 3d 20 73 74 61 | 63 6b 62 3b 0a 58 20 20 |kp = sta|ckb;.X |
|00003f40| 69 6e 74 20 2a 73 74 61 | 63 6b 65 20 3d 20 73 74 |int *sta|cke = st|
|00003f50| 61 63 6b 62 20 2b 20 34 | 30 3b 0a 58 20 20 69 6e |ackb + 4|0;.X in|
|00003f60| 74 20 2a 73 74 61 63 6b | 74 3b 0a 58 0a 58 20 20 |t *stack|t;.X.X |
|00003f70| 2f 2a 20 43 6f 75 6e 74 | 73 20 5c 28 27 73 20 61 |/* Count|s \('s a|
|00003f80| 73 20 74 68 65 79 20 61 | 72 65 20 65 6e 63 6f 75 |s they a|re encou|
|00003f90| 6e 74 65 72 65 64 2e 20 | 20 52 65 6d 65 6d 62 65 |ntered. | Remembe|
|00003fa0| 72 65 64 20 66 6f 72 20 | 74 68 65 20 6d 61 74 63 |red for |the matc|
|00003fb0| 68 69 6e 67 20 5c 29 2c | 0a 58 20 20 20 20 20 77 |hing \),|.X w|
|00003fc0| 68 65 72 65 20 69 74 20 | 62 65 63 6f 6d 65 73 20 |here it |becomes |
|00003fd0| 74 68 65 20 72 65 67 69 | 73 74 65 72 20 6e 75 6d |the regi|ster num|
|00003fe0| 62 65 72 20 74 6f 20 70 | 75 74 20 69 6e 20 74 68 |ber to p|ut in th|
|00003ff0| 65 20 73 74 6f 70 5f 6d | 65 6d 6f 72 79 0a 58 20 |e stop_m|emory.X |
|00004000| 20 20 20 20 63 6f 6d 6d | 61 6e 64 2e 20 20 2a 2f | comm|and. */|
|00004010| 0a 58 0a 58 20 20 69 6e | 74 20 72 65 67 6e 75 6d |.X.X in|t regnum|
|00004020| 20 3d 20 31 3b 0a 58 0a | 58 20 20 62 75 66 70 2d | = 1;.X.|X bufp-|
|00004030| 3e 66 61 73 74 6d 61 70 | 5f 61 63 63 75 72 61 74 |>fastmap|_accurat|
|00004040| 65 20 3d 20 30 3b 0a 58 | 0a 58 23 69 66 6e 64 65 |e = 0;.X|.X#ifnde|
|00004050| 66 20 65 6d 61 63 73 0a | 58 23 69 66 6e 64 65 66 |f emacs.|X#ifndef|
|00004060| 20 53 59 4e 54 41 58 5f | 54 41 42 4c 45 0a 58 20 | SYNTAX_|TABLE.X |
|00004070| 20 2f 2a 20 49 6e 69 74 | 69 61 6c 69 7a 65 20 74 | /* Init|ialize t|
|00004080| 68 65 20 73 79 6e 74 61 | 78 20 74 61 62 6c 65 2e |he synta|x table.|
|00004090| 20 20 2a 2f 0a 58 20 20 | 20 69 6e 69 74 5f 73 79 | */.X | init_sy|
|000040a0| 6e 74 61 78 5f 6f 6e 63 | 65 28 29 3b 0a 58 23 65 |ntax_onc|e();.X#e|
|000040b0| 6e 64 69 66 0a 58 23 65 | 6e 64 69 66 0a 58 0a 58 |ndif.X#e|ndif.X.X|
|000040c0| 20 20 69 66 20 28 62 75 | 66 70 2d 3e 61 6c 6c 6f | if (bu|fp->allo|
|000040d0| 63 61 74 65 64 20 3d 3d | 20 30 29 0a 58 20 20 20 |cated ==| 0).X |
|000040e0| 20 7b 0a 58 20 20 20 20 | 20 20 62 75 66 70 2d 3e | {.X | bufp->|
|000040f0| 61 6c 6c 6f 63 61 74 65 | 64 20 3d 20 49 4e 49 54 |allocate|d = INIT|
|00004100| 5f 42 55 46 5f 53 49 5a | 45 3b 0a 58 20 20 20 20 |_BUF_SIZ|E;.X |
|00004110| 20 20 69 66 20 28 62 75 | 66 70 2d 3e 62 75 66 66 | if (bu|fp->buff|
|00004120| 65 72 29 0a 58 09 2f 2a | 20 45 58 54 45 4e 44 5f |er).X./*| EXTEND_|
|00004130| 42 55 46 46 45 52 20 6c | 6f 73 65 73 20 77 68 65 |BUFFER l|oses whe|
|00004140| 6e 20 62 75 66 70 2d 3e | 61 6c 6c 6f 63 61 74 65 |n bufp->|allocate|
|00004150| 64 20 69 73 20 30 2e 20 | 20 2a 2f 0a 58 09 62 75 |d is 0. | */.X.bu|
|00004160| 66 70 2d 3e 62 75 66 66 | 65 72 20 3d 20 28 63 68 |fp->buff|er = (ch|
|00004170| 61 72 20 2a 29 20 72 65 | 61 6c 6c 6f 63 20 28 62 |ar *) re|alloc (b|
|00004180| 75 66 70 2d 3e 62 75 66 | 66 65 72 2c 20 49 4e 49 |ufp->buf|fer, INI|
|00004190| 54 5f 42 55 46 5f 53 49 | 5a 45 29 3b 0a 58 20 20 |T_BUF_SI|ZE);.X |
|000041a0| 20 20 20 20 65 6c 73 65 | 0a 58 09 2f 2a 20 43 61 | else|.X./* Ca|
|000041b0| 6c 6c 65 72 20 64 69 64 | 20 6e 6f 74 20 61 6c 6c |ller did| not all|
|000041c0| 6f 63 61 74 65 20 61 20 | 62 75 66 66 65 72 2e 20 |ocate a |buffer. |
|000041d0| 20 44 6f 20 69 74 20 66 | 6f 72 20 74 68 65 6d 2e | Do it f|or them.|
|000041e0| 20 20 2a 2f 0a 58 09 62 | 75 66 70 2d 3e 62 75 66 | */.X.b|ufp->buf|
|000041f0| 66 65 72 20 3d 20 28 63 | 68 61 72 20 2a 29 20 6d |fer = (c|har *) m|
|00004200| 61 6c 6c 6f 63 20 28 49 | 4e 49 54 5f 42 55 46 5f |alloc (I|NIT_BUF_|
|00004210| 53 49 5a 45 29 3b 0a 58 | 20 20 20 20 20 20 69 66 |SIZE);.X| if|
|00004220| 20 28 21 62 75 66 70 2d | 3e 62 75 66 66 65 72 29 | (!bufp-|>buffer)|
|00004230| 20 67 6f 74 6f 20 6d 65 | 6d 6f 72 79 5f 65 78 68 | goto me|mory_exh|
|00004240| 61 75 73 74 65 64 3b 0a | 58 20 20 20 20 20 20 62 |austed;.|X b|
|00004250| 65 67 61 6c 74 20 3d 20 | 62 20 3d 20 62 75 66 70 |egalt = |b = bufp|
|00004260| 2d 3e 62 75 66 66 65 72 | 3b 0a 58 20 20 20 20 7d |->buffer|;.X }|
|00004270| 0a 58 0a 58 20 20 77 68 | 69 6c 65 20 28 70 20 21 |.X.X wh|ile (p !|
|00004280| 3d 20 70 65 6e 64 29 0a | 58 20 20 20 20 7b 0a 58 |= pend).|X {.X|
|00004290| 20 20 20 20 20 20 50 41 | 54 46 45 54 43 48 20 28 | PA|TFETCH (|
|000042a0| 63 29 3b 0a 58 0a 58 20 | 20 20 20 20 20 73 77 69 |c);.X.X | swi|
|000042b0| 74 63 68 20 28 63 29 0a | 58 09 7b 0a 58 09 63 61 |tch (c).|X.{.X.ca|
|000042c0| 73 65 20 27 24 27 3a 0a | 58 09 20 20 7b 0a 58 09 |se '$':.|X. {.X.|
|000042d0| 20 20 20 20 63 68 61 72 | 20 2a 70 31 20 3d 20 70 | char| *p1 = p|
|000042e0| 3b 0a 58 09 20 20 20 20 | 2f 2a 20 57 68 65 6e 20 |;.X. |/* When |
|000042f0| 74 65 73 74 69 6e 67 20 | 77 68 61 74 20 66 6f 6c |testing |what fol|
|00004300| 6c 6f 77 73 20 74 68 65 | 20 24 2c 0a 58 09 20 20 |lows the| $,.X. |
|00004310| 20 20 20 20 20 6c 6f 6f | 6b 20 70 61 73 74 20 74 | loo|k past t|
|00004320| 68 65 20 5c 2d 63 6f 6e | 73 74 72 75 63 74 73 20 |he \-con|structs |
|00004330| 74 68 61 74 20 64 6f 6e | 27 74 20 63 6f 6e 73 75 |that don|'t consu|
|00004340| 6d 65 20 61 6e 79 74 68 | 69 6e 67 2e 20 20 2a 2f |me anyth|ing. */|
|00004350| 0a 58 09 20 20 20 20 69 | 66 20 28 21 20 28 6f 62 |.X. i|f (! (ob|
|00004360| 73 63 75 72 65 5f 73 79 | 6e 74 61 78 20 26 20 52 |scure_sy|ntax & R|
|00004370| 45 5f 43 4f 4e 54 45 58 | 54 5f 49 4e 44 45 50 5f |E_CONTEX|T_INDEP_|
|00004380| 4f 50 53 29 29 0a 58 09 | 20 20 20 20 20 20 77 68 |OPS)).X.| wh|
|00004390| 69 6c 65 20 28 70 31 20 | 21 3d 20 70 65 6e 64 29 |ile (p1 |!= pend)|
|000043a0| 0a 58 09 09 7b 0a 58 09 | 09 20 20 69 66 20 28 2a |.X..{.X.|. if (*|
|000043b0| 70 31 20 3d 3d 20 27 5c | 5c 27 20 26 26 20 70 31 |p1 == '\|\' && p1|
|000043c0| 20 2b 20 31 20 21 3d 20 | 70 65 6e 64 0a 58 09 09 | + 1 != |pend.X..|
|000043d0| 20 20 20 20 20 20 26 26 | 20 28 70 31 5b 31 5d 20 | &&| (p1[1] |
|000043e0| 3d 3d 20 27 3c 27 20 7c | 7c 20 70 31 5b 31 5d 20 |== '<' ||| p1[1] |
|000043f0| 3d 3d 20 27 3e 27 0a 58 | 09 09 09 20 20 7c 7c 20 |== '>'.X|... || |
|00004400| 70 31 5b 31 5d 20 3d 3d | 20 27 60 27 20 7c 7c 20 |p1[1] ==| '`' || |
|00004410| 70 31 5b 31 5d 20 3d 3d | 20 27 5c 27 27 0a 58 23 |p1[1] ==| '\''.X#|
|00004420| 69 66 64 65 66 20 65 6d | 61 63 73 0a 58 09 09 09 |ifdef em|acs.X...|
|00004430| 20 20 7c 7c 20 70 31 5b | 31 5d 20 3d 3d 20 27 3d | || p1[|1] == '=|
|00004440| 27 0a 58 23 65 6e 64 69 | 66 0a 58 09 09 09 20 20 |'.X#endi|f.X... |
|00004450| 7c 7c 20 70 31 5b 31 5d | 20 3d 3d 20 27 62 27 20 ||| p1[1]| == 'b' |
|00004460| 7c 7c 20 70 31 5b 31 5d | 20 3d 3d 20 27 42 27 29 ||| p1[1]| == 'B')|
|00004470| 29 0a 58 09 09 20 20 20 | 20 70 31 20 2b 3d 20 32 |).X.. | p1 += 2|
|00004480| 3b 0a 58 09 09 20 20 65 | 6c 73 65 0a 58 09 09 20 |;.X.. e|lse.X.. |
|00004490| 20 20 20 62 72 65 61 6b | 3b 0a 58 09 09 7d 0a 58 | break|;.X..}.X|
|000044a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 69 66 20 28 | | if (|
|000044b0| 6f 62 73 63 75 72 65 5f | 73 79 6e 74 61 78 20 26 |obscure_|syntax &|
|000044c0| 20 52 45 5f 54 49 47 48 | 54 5f 56 42 41 52 29 0a | RE_TIGH|T_VBAR).|
|000044d0| 58 09 20 20 20 20 20 20 | 7b 0a 58 09 09 69 66 20 |X. |{.X..if |
|000044e0| 28 21 20 28 6f 62 73 63 | 75 72 65 5f 73 79 6e 74 |(! (obsc|ure_synt|
|000044f0| 61 78 20 26 20 52 45 5f | 43 4f 4e 54 45 58 54 5f |ax & RE_|CONTEXT_|
|00004500| 49 4e 44 45 50 5f 4f 50 | 53 29 20 26 26 20 70 31 |INDEP_OP|S) && p1|
|00004510| 20 21 3d 20 70 65 6e 64 | 29 0a 58 09 09 20 20 67 | != pend|).X.. g|
|00004520| 6f 74 6f 20 6e 6f 72 6d | 61 6c 5f 63 68 61 72 3b |oto norm|al_char;|
|00004530| 0a 58 09 09 2f 2a 20 4d | 61 6b 65 20 6f 70 65 72 |.X../* M|ake oper|
|00004540| 61 6e 64 20 6f 66 20 6c | 61 73 74 20 76 62 61 72 |and of l|ast vbar|
|00004550| 20 65 6e 64 20 62 65 66 | 6f 72 65 20 74 68 69 73 | end bef|ore this|
|00004560| 20 60 24 27 2e 20 20 2a | 2f 0a 58 09 09 69 66 20 | `$'. *|/.X..if |
|00004570| 28 66 69 78 75 70 5f 6a | 75 6d 70 29 0a 58 09 09 |(fixup_j|ump).X..|
|00004580| 20 20 73 74 6f 72 65 5f | 6a 75 6d 70 20 28 66 69 | store_|jump (fi|
|00004590| 78 75 70 5f 6a 75 6d 70 | 2c 20 6a 75 6d 70 2c 20 |xup_jump|, jump, |
|000045a0| 62 29 3b 0a 58 09 09 66 | 69 78 75 70 5f 6a 75 6d |b);.X..f|ixup_jum|
|000045b0| 70 20 3d 20 30 3b 0a 58 | 09 09 42 55 46 50 55 53 |p = 0;.X|..BUFPUS|
|000045c0| 48 20 28 65 6e 64 6c 69 | 6e 65 29 3b 0a 58 09 09 |H (endli|ne);.X..|
|000045d0| 62 72 65 61 6b 3b 0a 58 | 09 20 20 20 20 20 20 7d |break;.X|. }|
|000045e0| 0a 58 09 20 20 20 20 2f | 2a 20 24 20 6d 65 61 6e |.X. /|* $ mean|
|000045f0| 73 20 73 75 63 63 65 65 | 64 20 69 66 20 61 74 20 |s succee|d if at |
|00004600| 65 6e 64 20 6f 66 20 6c | 69 6e 65 2c 20 62 75 74 |end of l|ine, but|
|00004610| 20 6f 6e 6c 79 20 69 6e | 20 73 70 65 63 69 61 6c | only in| special|
|00004620| 20 63 6f 6e 74 65 78 74 | 73 2e 0a 58 09 20 20 20 | context|s..X. |
|00004630| 20 20 20 49 66 20 76 61 | 6c 69 64 6c 79 20 69 6e | If va|lidly in|
|00004640| 20 74 68 65 20 6d 69 64 | 64 6c 65 20 6f 66 20 61 | the mid|dle of a|
|00004650| 20 70 61 74 74 65 72 6e | 2c 20 69 74 20 69 73 20 | pattern|, it is |
|00004660| 61 20 6e 6f 72 6d 61 6c | 20 63 68 61 72 61 63 74 |a normal| charact|
|00004670| 65 72 2e 20 2a 2f 0a 58 | 0a 58 20 20 20 20 20 20 |er. */.X|.X |
|00004680| 20 20 20 20 20 20 69 66 | 20 28 28 6f 62 73 63 75 | if| ((obscu|
|00004690| 72 65 5f 73 79 6e 74 61 | 78 20 26 20 52 45 5f 43 |re_synta|x & RE_C|
|000046a0| 4f 4e 54 45 58 54 55 41 | 4c 5f 49 4e 56 41 4c 49 |ONTEXTUA|L_INVALI|
|000046b0| 44 5f 4f 50 53 29 20 26 | 26 20 70 31 20 21 3d 20 |D_OPS) &|& p1 != |
|000046c0| 70 65 6e 64 29 0a 58 09 | 20 20 20 20 20 20 67 6f |pend).X.| go|
|000046d0| 74 6f 20 69 6e 76 61 6c | 69 64 5f 70 61 74 74 65 |to inval|id_patte|
|000046e0| 72 6e 3b 0a 58 09 20 20 | 20 20 69 66 20 28 70 31 |rn;.X. | if (p1|
|000046f0| 20 3d 3d 20 70 65 6e 64 | 20 7c 7c 20 2a 70 31 20 | == pend| || *p1 |
|00004700| 3d 3d 20 27 5c 6e 27 0a | 58 09 09 7c 7c 20 28 6f |== '\n'.|X..|| (o|
|00004710| 62 73 63 75 72 65 5f 73 | 79 6e 74 61 78 20 26 20 |bscure_s|yntax & |
|00004720| 52 45 5f 43 4f 4e 54 45 | 58 54 5f 49 4e 44 45 50 |RE_CONTE|XT_INDEP|
|00004730| 5f 4f 50 53 29 0a 58 09 | 09 7c 7c 20 28 6f 62 73 |_OPS).X.|.|| (obs|
|00004740| 63 75 72 65 5f 73 79 6e | 74 61 78 20 26 20 52 45 |cure_syn|tax & RE|
|00004750| 5f 4e 4f 5f 42 4b 5f 50 | 41 52 45 4e 53 0a 58 09 |_NO_BK_P|ARENS.X.|
|00004760| 09 20 20 20 20 3f 20 2a | 70 31 20 3d 3d 20 27 29 |. ? *|p1 == ')|
|00004770| 27 0a 58 09 09 20 20 20 | 20 3a 20 2a 70 31 20 3d |'.X.. | : *p1 =|
|00004780| 3d 20 27 5c 5c 27 20 26 | 26 20 70 31 5b 31 5d 20 |= '\\' &|& p1[1] |
|00004790| 3d 3d 20 27 29 27 29 0a | 58 09 09 7c 7c 20 28 6f |== ')').|X..|| (o|
|000047a0| 62 73 63 75 72 65 5f 73 | 79 6e 74 61 78 20 26 20 |bscure_s|yntax & |
|000047b0| 52 45 5f 4e 4f 5f 42 4b | 5f 56 42 41 52 0a 58 09 |RE_NO_BK|_VBAR.X.|
|000047c0| 09 20 20 20 20 3f 20 2a | 70 31 20 3d 3d 20 27 7c |. ? *|p1 == '||
|000047d0| 27 0a 58 09 09 20 20 20 | 20 3a 20 2a 70 31 20 3d |'.X.. | : *p1 =|
|000047e0| 3d 20 27 5c 5c 27 20 26 | 26 20 70 31 5b 31 5d 20 |= '\\' &|& p1[1] |
|000047f0| 3d 3d 20 27 7c 27 29 29 | 0a 58 09 20 20 20 20 20 |== '|'))|.X. |
|00004800| 20 7b 0a 58 09 09 42 55 | 46 50 55 53 48 20 28 65 | {.X..BU|FPUSH (e|
|00004810| 6e 64 6c 69 6e 65 29 3b | 0a 58 09 09 62 72 65 61 |ndline);|.X..brea|
|00004820| 6b 3b 0a 58 09 20 20 20 | 20 20 20 7d 0a 58 09 20 |k;.X. | }.X. |
|00004830| 20 20 20 67 6f 74 6f 20 | 6e 6f 72 6d 61 6c 5f 63 | goto |normal_c|
|00004840| 68 61 72 3b 0a 58 20 20 | 20 20 20 20 20 20 20 20 |har;.X | |
|00004850| 7d 0a 58 09 63 61 73 65 | 20 27 5e 27 3a 0a 58 09 |}.X.case| '^':.X.|
|00004860| 20 20 2f 2a 20 5e 20 6d | 65 61 6e 73 20 73 75 63 | /* ^ m|eans suc|
|00004870| 63 65 65 64 20 69 66 20 | 61 74 20 62 65 67 20 6f |ceed if |at beg o|
|00004880| 66 20 6c 69 6e 65 2c 20 | 62 75 74 20 6f 6e 6c 79 |f line, |but only|
|00004890| 20 69 66 20 6e 6f 20 70 | 72 65 63 65 64 69 6e 67 | if no p|receding|
|000048a0| 20 0a 58 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | .X | |
|000048b0| 70 61 74 74 65 72 6e 2e | 20 20 2a 2f 0a 58 20 20 |pattern.| */.X |
|000048c0| 20 20 20 20 20 20 20 20 | 20 20 20 0a 58 20 20 20 | | .X |
|000048d0| 20 20 20 20 20 20 20 69 | 66 20 28 28 6f 62 73 63 | i|f ((obsc|
|000048e0| 75 72 65 5f 73 79 6e 74 | 61 78 20 26 20 52 45 5f |ure_synt|ax & RE_|
|000048f0| 43 4f 4e 54 45 58 54 55 | 41 4c 5f 49 4e 56 41 4c |CONTEXTU|AL_INVAL|
|00004900| 49 44 5f 4f 50 53 29 20 | 26 26 20 6c 61 73 74 73 |ID_OPS) |&& lasts|
|00004910| 74 61 72 74 29 0a 58 20 | 20 20 20 20 20 20 20 20 |tart).X | |
|00004920| 20 20 20 67 6f 74 6f 20 | 69 6e 76 61 6c 69 64 5f | goto |invalid_|
|00004930| 70 61 74 74 65 72 6e 3b | 0a 58 20 20 20 20 20 20 |pattern;|.X |
|00004940| 20 20 20 20 69 66 20 28 | 6c 61 73 74 73 74 61 72 | if (|laststar|
|00004950| 74 20 26 26 20 70 20 2d | 20 32 20 3e 3d 20 70 61 |t && p -| 2 >= pa|
|00004960| 74 74 65 72 6e 20 26 26 | 20 70 5b 2d 32 5d 20 21 |ttern &&| p[-2] !|
|00004970| 3d 20 27 5c 6e 27 0a 58 | 09 20 20 20 20 20 20 20 |= '\n'.X|. |
|00004980| 26 26 20 21 28 6f 62 73 | 63 75 72 65 5f 73 79 6e |&& !(obs|cure_syn|
|00004990| 74 61 78 20 26 20 52 45 | 5f 43 4f 4e 54 45 58 54 |tax & RE|_CONTEXT|
|000049a0| 5f 49 4e 44 45 50 5f 4f | 50 53 29 29 0a 58 09 20 |_INDEP_O|PS)).X. |
|000049b0| 20 20 20 67 6f 74 6f 20 | 6e 6f 72 6d 61 6c 5f 63 | goto |normal_c|
|000049c0| 68 61 72 3b 0a 58 09 20 | 20 69 66 20 28 6f 62 73 |har;.X. | if (obs|
|000049d0| 63 75 72 65 5f 73 79 6e | 74 61 78 20 26 20 52 45 |cure_syn|tax & RE|
|000049e0| 5f 54 49 47 48 54 5f 56 | 42 41 52 29 0a 58 09 20 |_TIGHT_V|BAR).X. |
|000049f0| 20 20 20 7b 0a 58 09 20 | 20 20 20 20 20 69 66 20 | {.X. | if |
|00004a00| 28 70 20 21 3d 20 70 61 | 74 74 65 72 6e 20 2b 20 |(p != pa|ttern + |
|00004a10| 31 0a 58 09 09 20 20 26 | 26 20 21 20 28 6f 62 73 |1.X.. &|& ! (obs|
|00004a20| 63 75 72 65 5f 73 79 6e | 74 61 78 20 26 20 52 45 |cure_syn|tax & RE|
|00004a30| 5f 43 4f 4e 54 45 58 54 | 5f 49 4e 44 45 50 5f 4f |_CONTEXT|_INDEP_O|
|00004a40| 50 53 29 29 0a 58 09 09 | 67 6f 74 6f 20 6e 6f 72 |PS)).X..|goto nor|
|00004a50| 6d 61 6c 5f 63 68 61 72 | 3b 0a 58 09 20 20 20 20 |mal_char|;.X. |
|00004a60| 20 20 42 55 46 50 55 53 | 48 20 28 62 65 67 6c 69 | BUFPUS|H (begli|
|00004a70| 6e 65 29 3b 0a 58 09 20 | 20 20 20 20 20 62 65 67 |ne);.X. | beg|
|00004a80| 61 6c 74 20 3d 20 62 3b | 0a 58 09 20 20 20 20 7d |alt = b;|.X. }|
|00004a90| 0a 58 09 20 20 65 6c 73 | 65 0a 58 09 20 20 20 20 |.X. els|e.X. |
|00004aa0| 42 55 46 50 55 53 48 20 | 28 62 65 67 6c 69 6e 65 |BUFPUSH |(begline|
|00004ab0| 29 3b 0a 58 09 20 20 62 | 72 65 61 6b 3b 0a 58 0a |);.X. b|reak;.X.|
|00004ac0| 58 09 63 61 73 65 20 27 | 2b 27 3a 0a 58 09 63 61 |X.case '|+':.X.ca|
|00004ad0| 73 65 20 27 3f 27 3a 0a | 58 09 20 20 69 66 20 28 |se '?':.|X. if (|
|00004ae0| 28 6f 62 73 63 75 72 65 | 5f 73 79 6e 74 61 78 20 |(obscure|_syntax |
|00004af0| 26 20 52 45 5f 42 4b 5f | 50 4c 55 53 5f 51 4d 29 |& RE_BK_|PLUS_QM)|
|00004b00| 0a 58 09 20 20 20 20 20 | 20 7c 7c 20 28 6f 62 73 |.X. | || (obs|
|00004b10| 63 75 72 65 5f 73 79 6e | 74 61 78 20 26 20 52 45 |cure_syn|tax & RE|
|00004b20| 5f 4c 49 4d 49 54 45 44 | 5f 4f 50 53 29 29 0a 58 |_LIMITED|_OPS)).X|
|00004b30| 09 20 20 20 20 67 6f 74 | 6f 20 6e 6f 72 6d 61 6c |. got|o normal|
|00004b40| 5f 63 68 61 72 3b 0a 58 | 09 68 61 6e 64 6c 65 5f |_char;.X|.handle_|
|00004b50| 70 6c 75 73 3a 0a 58 09 | 63 61 73 65 20 27 2a 27 |plus:.X.|case '*'|
|00004b60| 3a 0a 58 09 20 20 2f 2a | 20 49 66 20 74 68 65 72 |:.X. /*| If ther|
|00004b70| 65 20 69 73 20 6e 6f 20 | 70 72 65 76 69 6f 75 73 |e is no |previous|
|00004b80| 20 70 61 74 74 65 72 6e | 2c 20 63 68 61 72 20 6e | pattern|, char n|
|00004b90| 6f 74 20 73 70 65 63 69 | 61 6c 2e 20 2a 2f 0a 58 |ot speci|al. */.X|
|00004ba0| 09 20 20 69 66 20 28 21 | 6c 61 73 74 73 74 61 72 |. if (!|laststar|
|00004bb0| 74 29 0a 58 20 20 20 20 | 20 20 20 20 20 20 20 20 |t).X | |
|00004bc0| 7b 0a 58 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |{.X | |
|00004bd0| 20 69 66 20 28 6f 62 73 | 63 75 72 65 5f 73 79 6e | if (obs|cure_syn|
|00004be0| 74 61 78 20 26 20 52 45 | 5f 43 4f 4e 54 45 58 54 |tax & RE|_CONTEXT|
|00004bf0| 55 41 4c 5f 49 4e 56 41 | 4c 49 44 5f 4f 50 53 29 |UAL_INVA|LID_OPS)|
|00004c00| 0a 58 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.X | |
|00004c10| 20 20 67 6f 74 6f 20 69 | 6e 76 61 6c 69 64 5f 70 | goto i|nvalid_p|
|00004c20| 61 74 74 65 72 6e 3b 0a | 58 20 20 20 20 20 20 20 |attern;.|X |
|00004c30| 20 20 20 20 20 20 20 65 | 6c 73 65 20 69 66 20 28 | e|lse if (|
|00004c40| 21 20 28 6f 62 73 63 75 | 72 65 5f 73 79 6e 74 61 |! (obscu|re_synta|
|00004c50| 78 20 26 20 52 45 5f 43 | 4f 4e 54 45 58 54 5f 49 |x & RE_C|ONTEXT_I|
|00004c60| 4e 44 45 50 5f 4f 50 53 | 29 29 0a 58 09 09 67 6f |NDEP_OPS|)).X..go|
|00004c70| 74 6f 20 6e 6f 72 6d 61 | 6c 5f 63 68 61 72 3b 0a |to norma|l_char;.|
|00004c80| 58 20 20 20 20 20 20 20 | 20 20 20 20 20 7d 0a 58 |X | }.X|
|00004c90| 09 20 20 2f 2a 20 49 66 | 20 74 68 65 72 65 20 69 |. /* If| there i|
|00004ca0| 73 20 61 20 73 65 71 75 | 65 6e 63 65 20 6f 66 20 |s a sequ|ence of |
|00004cb0| 72 65 70 65 74 69 74 69 | 6f 6e 20 63 68 61 72 73 |repetiti|on chars|
|00004cc0| 2c 0a 58 09 20 20 20 20 | 20 63 6f 6c 6c 61 70 73 |,.X. | collaps|
|00004cd0| 65 20 69 74 20 64 6f 77 | 6e 20 74 6f 20 6a 75 73 |e it dow|n to jus|
|00004ce0| 74 20 6f 6e 65 2e 20 20 | 2a 2f 0a 58 09 20 20 7a |t one. |*/.X. z|
|00004cf0| 65 72 6f 5f 74 69 6d 65 | 73 5f 6f 6b 20 3d 20 30 |ero_time|s_ok = 0|
|00004d00| 3b 0a 58 09 20 20 6d 61 | 6e 79 5f 74 69 6d 65 73 |;.X. ma|ny_times|
|00004d10| 5f 6f 6b 20 3d 20 30 3b | 0a 58 09 20 20 77 68 69 |_ok = 0;|.X. whi|
|00004d20| 6c 65 20 28 31 29 0a 58 | 09 20 20 20 20 7b 0a 58 |le (1).X|. {.X|
|00004d30| 09 20 20 20 20 20 20 7a | 65 72 6f 5f 74 69 6d 65 |. z|ero_time|
|00004d40| 73 5f 6f 6b 20 7c 3d 20 | 63 20 21 3d 20 27 2b 27 |s_ok |= |c != '+'|
|00004d50| 3b 0a 58 09 20 20 20 20 | 20 20 6d 61 6e 79 5f 74 |;.X. | many_t|
|00004d60| 69 6d 65 73 5f 6f 6b 20 | 7c 3d 20 63 20 21 3d 20 |imes_ok ||= c != |
|00004d70| 27 3f 27 3b 0a 58 09 20 | 20 20 20 20 20 69 66 20 |'?';.X. | if |
|00004d80| 28 70 20 3d 3d 20 70 65 | 6e 64 29 0a 58 09 09 62 |(p == pe|nd).X..b|
|00004d90| 72 65 61 6b 3b 0a 58 09 | 20 20 20 20 20 20 50 41 |reak;.X.| PA|
|00004da0| 54 46 45 54 43 48 20 28 | 63 29 3b 0a 58 09 20 20 |TFETCH (|c);.X. |
|00004db0| 20 20 20 20 69 66 20 28 | 63 20 3d 3d 20 27 2a 27 | if (|c == '*'|
|00004dc0| 29 0a 58 09 09 3b 0a 58 | 09 20 20 20 20 20 20 65 |).X..;.X|. e|
|00004dd0| 6c 73 65 20 69 66 20 28 | 21 28 6f 62 73 63 75 72 |lse if (|!(obscur|
|00004de0| 65 5f 73 79 6e 74 61 78 | 20 26 20 52 45 5f 42 4b |e_syntax| & RE_BK|
|00004df0| 5f 50 4c 55 53 5f 51 4d | 29 0a 58 09 09 20 20 20 |_PLUS_QM|).X.. |
|00004e00| 20 20 20 20 26 26 20 28 | 63 20 3d 3d 20 27 2b 27 | && (|c == '+'|
|00004e10| 20 7c 7c 20 63 20 3d 3d | 20 27 3f 27 29 29 0a 58 | || c ==| '?')).X|
|00004e20| 09 09 3b 0a 58 09 20 20 | 20 20 20 20 65 6c 73 65 |..;.X. | else|
|00004e30| 20 69 66 20 28 28 6f 62 | 73 63 75 72 65 5f 73 79 | if ((ob|scure_sy|
|00004e40| 6e 74 61 78 20 26 20 52 | 45 5f 42 4b 5f 50 4c 55 |ntax & R|E_BK_PLU|
|00004e50| 53 5f 51 4d 29 0a 58 09 | 09 20 20 20 20 20 20 20 |S_QM).X.|. |
|00004e60| 26 26 20 63 20 3d 3d 20 | 27 5c 5c 27 29 0a 58 09 |&& c == |'\\').X.|
|00004e70| 09 7b 0a 58 09 09 20 20 | 69 6e 74 20 63 31 3b 0a |.{.X.. |int c1;.|
|00004e80| 58 09 09 20 20 50 41 54 | 46 45 54 43 48 20 28 63 |X.. PAT|FETCH (c|
|00004e90| 31 29 3b 0a 58 09 09 20 | 20 69 66 20 28 21 28 63 |1);.X.. | if (!(c|
|00004ea0| 31 20 3d 3d 20 27 2b 27 | 20 7c 7c 20 63 31 20 3d |1 == '+'| || c1 =|
|00004eb0| 3d 20 27 3f 27 29 29 0a | 58 09 09 20 20 20 20 7b |= '?')).|X.. {|
|00004ec0| 0a 58 09 09 20 20 20 20 | 20 20 50 41 54 55 4e 46 |.X.. | PATUNF|
|00004ed0| 45 54 43 48 3b 0a 58 09 | 09 20 20 20 20 20 20 50 |ETCH;.X.|. P|
|00004ee0| 41 54 55 4e 46 45 54 43 | 48 3b 0a 58 09 09 20 20 |ATUNFETC|H;.X.. |
|00004ef0| 20 20 20 20 62 72 65 61 | 6b 3b 0a 58 09 09 20 20 | brea|k;.X.. |
|00004f00| 20 20 7d 0a 58 09 09 20 | 20 63 20 3d 20 63 31 3b | }.X.. | c = c1;|
|00004f10| 0a 58 09 09 7d 0a 58 09 | 20 20 20 20 20 20 65 6c |.X..}.X.| el|
|00004f20| 73 65 0a 58 09 09 7b 0a | 58 09 09 20 20 50 41 54 |se.X..{.|X.. PAT|
|00004f30| 55 4e 46 45 54 43 48 3b | 0a 58 09 09 20 20 62 72 |UNFETCH;|.X.. br|
|00004f40| 65 61 6b 3b 0a 58 09 09 | 7d 0a 58 09 20 20 20 20 |eak;.X..|}.X. |
|00004f50| 7d 0a 58 0a 58 09 20 20 | 2f 2a 20 53 74 61 72 2c |}.X.X. |/* Star,|
|00004f60| 20 65 74 63 2e 20 61 70 | 70 6c 69 65 64 20 74 6f | etc. ap|plied to|
|00004f70| 20 61 6e 20 65 6d 70 74 | 79 20 70 61 74 74 65 72 | an empt|y patter|
|00004f80| 6e 20 69 73 20 65 71 75 | 69 76 61 6c 65 6e 74 0a |n is equ|ivalent.|
|00004f90| 58 09 20 20 20 20 20 74 | 6f 20 61 6e 20 65 6d 70 |X. t|o an emp|
|00004fa0| 74 79 20 70 61 74 74 65 | 72 6e 2e 20 20 2a 2f 0a |ty patte|rn. */.|
|00004fb0| 58 09 20 20 69 66 20 28 | 21 6c 61 73 74 73 74 61 |X. if (|!laststa|
|00004fc0| 72 74 29 20 20 0a 58 09 | 20 20 20 20 62 72 65 61 |rt) .X.| brea|
|00004fd0| 6b 3b 0a 58 0a 58 09 20 | 20 2f 2a 20 4e 6f 77 20 |k;.X.X. | /* Now |
|00004fe0| 77 65 20 6b 6e 6f 77 20 | 77 68 65 74 68 65 72 20 |we know |whether |
|00004ff0| 6f 72 20 6e 6f 74 20 7a | 65 72 6f 20 6d 61 74 63 |or not z|ero matc|
|00005000| 68 65 73 20 69 73 20 61 | 6c 6c 6f 77 65 64 0a 58 |hes is a|llowed.X|
|00005010| 09 20 20 20 20 20 61 6e | 64 20 61 6c 73 6f 20 77 |. an|d also w|
|00005020| 68 65 74 68 65 72 20 6f | 72 20 6e 6f 74 20 74 77 |hether o|r not tw|
|00005030| 6f 20 6f 72 20 6d 6f 72 | 65 20 6d 61 74 63 68 65 |o or mor|e matche|
|00005040| 73 20 69 73 20 61 6c 6c | 6f 77 65 64 2e 20 20 2a |s is all|owed. *|
|00005050| 2f 0a 58 09 20 20 69 66 | 20 28 6d 61 6e 79 5f 74 |/.X. if| (many_t|
|00005060| 69 6d 65 73 5f 6f 6b 29 | 0a 58 09 20 20 20 20 7b |imes_ok)|.X. {|
|00005070| 0a 58 09 20 20 20 20 20 | 20 2f 2a 20 49 66 20 6d |.X. | /* If m|
|00005080| 6f 72 65 20 74 68 61 6e | 20 6f 6e 65 20 72 65 70 |ore than| one rep|
|00005090| 65 74 69 74 69 6f 6e 20 | 69 73 20 61 6c 6c 6f 77 |etition |is allow|
|000050a0| 65 64 2c 20 70 75 74 20 | 69 6e 20 61 74 20 74 68 |ed, put |in at th|
|000050b0| 65 0a 58 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |e.X | |
|000050c0| 20 20 20 20 65 6e 64 20 | 61 20 62 61 63 6b 77 61 | end |a backwa|
|000050d0| 72 64 20 72 65 6c 61 74 | 69 76 65 20 6a 75 6d 70 |rd relat|ive jump|
|000050e0| 20 66 72 6f 6d 20 62 20 | 74 6f 20 62 65 66 6f 72 | from b |to befor|
|000050f0| 65 20 74 68 65 20 6e 65 | 78 74 0a 58 20 20 20 20 |e the ne|xt.X |
|00005100| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 6a 75 6d | | jum|
|00005110| 70 20 77 65 27 72 65 20 | 67 6f 69 6e 67 20 74 6f |p we're |going to|
|00005120| 20 70 75 74 20 69 6e 20 | 62 65 6c 6f 77 20 28 77 | put in |below (w|
|00005130| 68 69 63 68 20 6a 75 6d | 70 73 20 66 72 6f 6d 0a |hich jum|ps from.|
|00005140| 58 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |X | |
|00005150| 20 20 6c 61 73 74 73 74 | 61 72 74 20 74 6f 20 61 | lastst|art to a|
|00005160| 66 74 65 72 20 74 68 69 | 73 20 6a 75 6d 70 29 2e |fter thi|s jump).|
|00005170| 20 20 2a 2f 0a 58 20 20 | 20 20 20 20 20 20 20 20 | */.X | |
|00005180| 20 20 20 20 47 45 54 5f | 42 55 46 46 45 52 5f 53 | GET_|BUFFER_S|
|00005190| 50 41 43 45 20 28 33 29 | 3b 0a 58 09 20 20 20 20 |PACE (3)|;.X. |
|000051a0| 20 20 73 74 6f 72 65 5f | 6a 75 6d 70 20 28 62 2c | store_|jump (b,|
|000051b0| 20 6d 61 79 62 65 5f 66 | 69 6e 61 6c 69 7a 65 5f | maybe_f|inalize_|
|000051c0| 6a 75 6d 70 2c 20 6c 61 | 73 74 73 74 61 72 74 20 |jump, la|ststart |
|000051d0| 2d 20 33 29 3b 0a 58 09 | 20 20 20 20 20 20 62 20 |- 3);.X.| b |
|000051e0| 2b 3d 20 33 3b 20 20 09 | 2f 2a 20 42 65 63 61 75 |+= 3; .|/* Becau|
|000051f0| 73 65 20 73 74 6f 72 65 | 5f 6a 75 6d 70 20 70 75 |se store|_jump pu|
|00005200| 74 20 73 74 75 66 66 20 | 68 65 72 65 2e 20 20 2a |t stuff |here. *|
|00005210| 2f 0a 58 09 20 20 20 20 | 7d 0a 58 20 20 20 20 20 |/.X. |}.X |
|00005220| 20 20 20 20 20 2f 2a 20 | 4f 6e 20 66 61 69 6c 75 | /* |On failu|
|00005230| 72 65 2c 20 6a 75 6d 70 | 20 66 72 6f 6d 20 6c 61 |re, jump| from la|
|00005240| 73 74 73 74 61 72 74 20 | 74 6f 20 62 20 2b 20 33 |ststart |to b + 3|
|00005250| 2c 20 77 68 69 63 68 20 | 77 69 6c 6c 20 62 65 20 |, which |will be |
|00005260| 74 68 65 0a 58 20 20 20 | 20 20 20 20 20 20 20 20 |the.X | |
|00005270| 20 20 65 6e 64 20 6f 66 | 20 74 68 65 20 62 75 66 | end of| the buf|
|00005280| 66 65 72 20 61 66 74 65 | 72 20 74 68 69 73 20 6a |fer afte|r this j|
|00005290| 75 6d 70 20 69 73 20 69 | 6e 73 65 72 74 65 64 2e |ump is i|nserted.|
|000052a0| 20 20 2a 2f 0a 58 20 20 | 20 20 20 20 20 20 20 20 | */.X | |
|000052b0| 47 45 54 5f 42 55 46 46 | 45 52 5f 53 50 41 43 45 |GET_BUFF|ER_SPACE|
|000052c0| 20 28 33 29 3b 0a 58 09 | 20 20 69 6e 73 65 72 74 | (3);.X.| insert|
|000052d0| 5f 6a 75 6d 70 20 28 6f | 6e 5f 66 61 69 6c 75 72 |_jump (o|n_failur|
|000052e0| 65 5f 6a 75 6d 70 2c 20 | 6c 61 73 74 73 74 61 72 |e_jump, |laststar|
|000052f0| 74 2c 20 62 20 2b 20 33 | 2c 20 62 29 3b 0a 58 09 |t, b + 3|, b);.X.|
|00005300| 20 20 70 65 6e 64 69 6e | 67 5f 65 78 61 63 74 20 | pendin|g_exact |
|00005310| 3d 20 30 3b 0a 58 09 20 | 20 62 20 2b 3d 20 33 3b |= 0;.X. | b += 3;|
|00005320| 0a 58 09 20 20 69 66 20 | 28 21 7a 65 72 6f 5f 74 |.X. if |(!zero_t|
|00005330| 69 6d 65 73 5f 6f 6b 29 | 0a 58 09 20 20 20 20 7b |imes_ok)|.X. {|
|00005340| 0a 58 09 20 20 20 20 20 | 20 2f 2a 20 41 74 20 6c |.X. | /* At l|
|00005350| 65 61 73 74 20 6f 6e 65 | 20 72 65 70 65 74 69 74 |east one| repetit|
|00005360| 69 6f 6e 20 69 73 20 72 | 65 71 75 69 72 65 64 2c |ion is r|equired,|
|00005370| 20 73 6f 20 69 6e 73 65 | 72 74 20 61 0a 58 20 20 | so inse|rt a.X |
|00005380| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 64 | | d|
|00005390| 75 6d 6d 79 2d 66 61 69 | 6c 75 72 65 20 62 65 66 |ummy-fai|lure bef|
|000053a0| 6f 72 65 20 74 68 65 20 | 69 6e 69 74 69 61 6c 20 |ore the |initial |
|000053b0| 6f 6e 2d 66 61 69 6c 75 | 72 65 2d 6a 75 6d 70 0a |on-failu|re-jump.|
|000053c0| 58 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |X | |
|000053d0| 20 20 69 6e 73 74 72 75 | 63 74 69 6f 6e 20 6f 66 | instru|ction of|
|000053e0| 20 74 68 65 20 6c 6f 6f | 70 2e 20 54 68 69 73 20 | the loo|p. This |
|000053f0| 65 66 66 65 63 74 73 20 | 61 20 73 6b 69 70 20 6f |effects |a skip o|
|00005400| 76 65 72 20 74 68 61 74 | 0a 58 20 20 20 20 20 20 |ver that|.X |
|00005410| 20 20 20 20 20 20 20 20 | 20 20 20 69 6e 73 74 72 | | instr|
|00005420| 75 63 74 69 6f 6e 20 74 | 68 65 20 66 69 72 73 74 |uction t|he first|
|00005430| 20 74 69 6d 65 20 77 65 | 20 68 69 74 20 74 68 61 | time we| hit tha|
|00005440| 74 20 6c 6f 6f 70 2e 20 | 20 2a 2f 0a 58 20 20 20 |t loop. | */.X |
|00005450| 20 20 20 20 20 20 20 20 | 20 20 20 47 45 54 5f 42 | | GET_B|
|00005460| 55 46 46 45 52 5f 53 50 | 41 43 45 20 28 36 29 3b |UFFER_SP|ACE (6);|
|00005470| 0a 58 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.X | |
|00005480| 69 6e 73 65 72 74 5f 6a | 75 6d 70 20 28 64 75 6d |insert_j|ump (dum|
|00005490| 6d 79 5f 66 61 69 6c 75 | 72 65 5f 6a 75 6d 70 2c |my_failu|re_jump,|
|000054a0| 20 6c 61 73 74 73 74 61 | 72 74 2c 20 6c 61 73 74 | laststa|rt, last|
|000054b0| 73 74 61 72 74 20 2b 20 | 36 2c 20 62 29 3b 0a 58 |start + |6, b);.X|
|000054c0| 09 20 20 20 20 20 20 62 | 20 2b 3d 20 33 3b 0a 58 |. b| += 3;.X|
|000054d0| 09 20 20 20 20 7d 0a 58 | 09 20 20 62 72 65 61 6b |. }.X|. break|
|000054e0| 3b 0a 58 0a 58 09 63 61 | 73 65 20 27 2e 27 3a 0a |;.X.X.ca|se '.':.|
|000054f0| 58 09 20 20 6c 61 73 74 | 73 74 61 72 74 20 3d 20 |X. last|start = |
|00005500| 62 3b 0a 58 09 20 20 42 | 55 46 50 55 53 48 20 28 |b;.X. B|UFPUSH (|
|00005510| 61 6e 79 63 68 61 72 29 | 3b 0a 58 09 20 20 62 72 |anychar)|;.X. br|
|00005520| 65 61 6b 3b 0a 58 0a 58 | 20 20 20 20 20 20 20 20 |eak;.X.X| |
|00005530| 63 61 73 65 20 27 5b 27 | 3a 0a 58 20 20 20 20 20 |case '['|:.X |
|00005540| 20 20 20 20 20 69 66 20 | 28 70 20 3d 3d 20 70 65 | if |(p == pe|
|00005550| 6e 64 29 0a 58 20 20 20 | 20 20 20 20 20 20 20 20 |nd).X | |
|00005560| 20 67 6f 74 6f 20 69 6e | 76 61 6c 69 64 5f 70 61 | goto in|valid_pa|
|00005570| 74 74 65 72 6e 3b 0a 58 | 09 20 20 77 68 69 6c 65 |ttern;.X|. while|
|00005580| 20 28 62 20 2d 20 62 75 | 66 70 2d 3e 62 75 66 66 | (b - bu|fp->buff|
|00005590| 65 72 0a 58 09 09 20 3e | 20 62 75 66 70 2d 3e 61 |er.X.. >| bufp->a|
|000055a0| 6c 6c 6f 63 61 74 65 64 | 20 2d 20 33 20 2d 20 28 |llocated| - 3 - (|
|000055b0| 31 20 3c 3c 20 42 59 54 | 45 57 49 44 54 48 29 20 |1 << BYT|EWIDTH) |
|000055c0| 2f 20 42 59 54 45 57 49 | 44 54 48 29 0a 58 09 20 |/ BYTEWI|DTH).X. |
|000055d0| 20 20 20 45 58 54 45 4e | 44 5f 42 55 46 46 45 52 | EXTEN|D_BUFFER|
|000055e0| 3b 0a 58 0a 58 09 20 20 | 6c 61 73 74 73 74 61 72 |;.X.X. |laststar|
|000055f0| 74 20 3d 20 62 3b 0a 58 | 09 20 20 69 66 20 28 2a |t = b;.X|. if (*|
|00005600| 70 20 3d 3d 20 27 5e 27 | 29 0a 58 09 20 20 20 20 |p == '^'|).X. |
|00005610| 7b 0a 58 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |{.X | |
|00005620| 20 42 55 46 50 55 53 48 | 20 28 63 68 61 72 73 65 | BUFPUSH| (charse|
|00005630| 74 5f 6e 6f 74 29 3b 20 | 0a 58 20 20 20 20 20 20 |t_not); |.X |
|00005640| 20 20 20 20 20 20 20 20 | 70 2b 2b 3b 0a 58 20 20 | |p++;.X |
|00005650| 20 20 20 20 20 20 20 20 | 20 20 7d 0a 58 09 20 20 | | }.X. |
|00005660| 65 6c 73 65 0a 58 09 20 | 20 20 20 42 55 46 50 55 |else.X. | BUFPU|
|00005670| 53 48 20 28 63 68 61 72 | 73 65 74 29 3b 0a 58 09 |SH (char|set);.X.|
|00005680| 20 20 70 31 20 3d 20 70 | 3b 0a 58 0a 58 09 20 20 | p1 = p|;.X.X. |
|00005690| 42 55 46 50 55 53 48 20 | 28 28 31 20 3c 3c 20 42 |BUFPUSH |((1 << B|
|000056a0| 59 54 45 57 49 44 54 48 | 29 20 2f 20 42 59 54 45 |YTEWIDTH|) / BYTE|
|000056b0| 57 49 44 54 48 29 3b 0a | 58 09 20 20 2f 2a 20 43 |WIDTH);.|X. /* C|
|000056c0| 6c 65 61 72 20 74 68 65 | 20 77 68 6f 6c 65 20 6d |lear the| whole m|
|000056d0| 61 70 20 2a 2f 0a 58 09 | 20 20 62 7a 65 72 6f 20 |ap */.X.| bzero |
|000056e0| 28 62 2c 20 28 31 20 3c | 3c 20 42 59 54 45 57 49 |(b, (1 <|< BYTEWI|
|000056f0| 44 54 48 29 20 2f 20 42 | 59 54 45 57 49 44 54 48 |DTH) / B|YTEWIDTH|
|00005700| 29 3b 0a 58 20 20 20 20 | 20 20 20 20 20 20 0a 58 |);.X | .X|
|00005710| 09 20 20 69 66 20 28 28 | 6f 62 73 63 75 72 65 5f |. if ((|obscure_|
|00005720| 73 79 6e 74 61 78 20 26 | 20 52 45 5f 48 41 54 5f |syntax &| RE_HAT_|
|00005730| 4e 4f 54 5f 4e 45 57 4c | 49 4e 45 29 20 26 26 20 |NOT_NEWL|INE) && |
|00005740| 62 5b 2d 32 5d 20 3d 3d | 20 63 68 61 72 73 65 74 |b[-2] ==| charset|
|00005750| 5f 6e 6f 74 29 0a 58 20 | 20 20 20 20 20 20 20 20 |_not).X | |
|00005760| 20 20 20 53 45 54 5f 4c | 49 53 54 5f 42 49 54 20 | SET_L|IST_BIT |
|00005770| 28 27 5c 6e 27 29 3b 0a | 58 0a 58 0a 58 09 20 20 |('\n');.|X.X.X. |
|00005780| 2f 2a 20 52 65 61 64 20 | 69 6e 20 63 68 61 72 61 |/* Read |in chara|
|00005790| 63 74 65 72 73 20 61 6e | 64 20 72 61 6e 67 65 73 |cters an|d ranges|
|000057a0| 2c 20 73 65 74 74 69 6e | 67 20 6d 61 70 20 62 69 |, settin|g map bi|
|000057b0| 74 73 2e 20 20 2a 2f 0a | 58 09 20 20 77 68 69 6c |ts. */.|X. whil|
|000057c0| 65 20 28 31 29 0a 58 09 | 20 20 20 20 7b 0a 58 09 |e (1).X.| {.X.|
|000057d0| 20 20 20 20 20 20 50 41 | 54 46 45 54 43 48 20 28 | PA|TFETCH (|
|000057e0| 63 29 3b 0a 58 0a 58 09 | 20 20 20 20 20 20 2f 2a |c);.X.X.| /*|
|000057f0| 20 49 66 20 73 65 74 2c | 20 5c 20 65 73 63 61 70 | If set,| \ escap|
|00005800| 65 73 20 63 68 61 72 61 | 63 74 65 72 73 20 77 68 |es chara|cters wh|
|00005810| 65 6e 20 69 6e 73 69 64 | 65 20 5b 2e 2e 2e 5d 2e |en insid|e [...].|
|00005820| 20 20 2a 2f 0a 58 09 20 | 20 20 20 20 20 69 66 20 | */.X. | if |
|00005830| 28 28 6f 62 73 63 75 72 | 65 5f 73 79 6e 74 61 78 |((obscur|e_syntax|
|00005840| 20 26 20 52 45 5f 41 57 | 4b 5f 43 4c 41 53 53 5f | & RE_AW|K_CLASS_|
|00005850| 48 41 43 4b 29 20 26 26 | 20 63 20 3d 3d 20 27 5c |HACK) &&| c == '\|
|00005860| 5c 27 29 0a 58 09 20 20 | 20 20 20 20 20 20 7b 0a |\').X. | {.|
|00005870| 58 09 20 20 20 20 20 20 | 20 20 20 20 50 41 54 46 |X. | PATF|
|00005880| 45 54 43 48 28 63 31 29 | 3b 0a 58 20 20 20 20 20 |ETCH(c1)|;.X |
|00005890| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 53 45 54 | | SET|
|000058a0| 5f 4c 49 53 54 5f 42 49 | 54 20 28 63 31 29 3b 0a |_LIST_BI|T (c1);.|
|000058b0| 58 09 20 20 20 20 20 20 | 20 20 20 20 63 6f 6e 74 |X. | cont|
|000058c0| 69 6e 75 65 3b 0a 58 09 | 20 20 20 20 20 20 20 20 |inue;.X.| |
|000058d0| 7d 0a 58 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |}.X | |
|000058e0| 20 69 66 20 28 63 20 3d | 3d 20 27 5d 27 29 0a 58 | if (c =|= ']').X|
|000058f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005900| 7b 0a 58 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |{.X | |
|00005910| 20 20 20 20 20 69 66 20 | 28 70 20 3d 3d 20 70 31 | if |(p == p1|
|00005920| 20 2b 20 31 29 0a 58 20 | 20 20 20 20 20 20 20 20 | + 1).X | |
|00005930| 20 20 20 20 20 20 20 20 | 20 20 20 7b 0a 58 09 09 | | {.X..|
|00005940| 20 20 20 20 20 20 2f 2a | 20 49 66 20 74 68 69 73 | /*| If this|
|00005950| 20 69 73 20 61 6e 20 65 | 6d 70 74 79 20 62 72 61 | is an e|mpty bra|
|00005960| 63 6b 65 74 20 65 78 70 | 72 65 73 73 69 6f 6e 2e |cket exp|ression.|
|00005970| 20 20 2a 2f 0a 58 20 20 | 20 20 20 20 20 20 20 20 | */.X | |
|00005980| 20 20 20 20 20 20 20 20 | 20 20 20 20 69 66 20 28 | | if (|
|00005990| 28 6f 62 73 63 75 72 65 | 5f 73 79 6e 74 61 78 20 |(obscure|_syntax |
|000059a0| 26 20 52 45 5f 4e 4f 5f | 45 4d 50 54 59 5f 42 52 |& RE_NO_|EMPTY_BR|
|000059b0| 41 43 4b 45 54 53 29 20 | 0a 58 20 20 20 20 20 20 |ACKETS) |.X |
|000059c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000059d0| 20 20 20 20 26 26 20 70 | 20 3d 3d 20 70 65 6e 64 | && p| == pend|
|000059e0| 29 0a 58 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |).X | |
|000059f0| 20 20 20 20 20 20 20 20 | 20 20 20 67 6f 74 6f 20 | | goto |
|00005a00| 69 6e 76 61 6c 69 64 5f | 70 61 74 74 65 72 6e 3b |invalid_|pattern;|
|00005a10| 0a 58 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.X | |
|00005a20| 20 20 20 20 20 20 7d 0a | 58 20 20 20 20 20 20 20 | }.|X |
|00005a30| 20 20 20 20 20 20 20 20 | 20 20 20 65 6c 73 65 20 | | else |
|00005a40| 0a 58 09 09 20 20 20 20 | 2f 2a 20 53 74 6f 70 20 |.X.. |/* Stop |
|00005a50| 69 66 20 74 68 69 73 20 | 69 73 6e 27 74 20 6d 65 |if this |isn't me|
|00005a60| 72 65 6c 79 20 61 20 5d | 20 69 6e 73 69 64 65 20 |rely a ]| inside |
|00005a70| 61 20 62 72 61 63 6b 65 | 74 0a 58 20 20 20 20 20 |a bracke|t.X |
|00005a80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005a90| 20 20 65 78 70 72 65 73 | 73 69 6f 6e 2c 20 62 75 | expres|sion, bu|
|00005aa0| 74 20 72 61 74 68 65 72 | 20 74 68 65 20 65 6e 64 |t rather| the end|
|00005ab0| 20 6f 66 20 61 20 62 72 | 61 63 6b 65 74 0a 58 20 | of a br|acket.X |
|00005ac0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005ad0| 20 20 20 20 20 20 65 78 | 70 72 65 73 73 69 6f 6e | ex|pression|
|00005ae0| 2e 20 20 2a 2f 0a 58 20 | 20 20 20 20 20 20 20 20 |. */.X | |
|00005af0| 20 20 20 20 20 20 20 20 | 20 20 20 62 72 65 61 6b | | break|
|00005b00| 3b 0a 58 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |;.X | |
|00005b10| 20 20 20 7d 0a 58 20 20 | 20 20 20 20 20 20 20 20 | }.X | |
|00005b20| 20 20 20 20 2f 2a 20 47 | 65 74 20 61 20 72 61 6e | /* G|et a ran|
|00005b30| 67 65 2e 20 20 2a 2f 0a | 58 20 20 20 20 20 20 20 |ge. */.|X |
|00005b40| 20 20 20 20 20 20 20 69 | 66 20 28 70 5b 30 5d 20 | i|f (p[0] |
|00005b50| 3d 3d 20 27 2d 27 20 26 | 26 20 70 5b 31 5d 20 21 |== '-' &|& p[1] !|
|00005b60| 3d 20 27 5d 27 29 0a 58 | 09 09 7b 0a 58 20 20 20 |= ']').X|..{.X |
|00005b70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 50 | | P|
|00005b80| 41 54 46 45 54 43 48 20 | 28 63 31 29 3b 0a 58 09 |ATFETCH |(c1);.X.|
|00005b90| 09 20 20 50 41 54 46 45 | 54 43 48 20 28 63 31 29 |. PATFE|TCH (c1)|
|00005ba0| 3b 0a 58 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |;.X | |
|00005bb0| 20 20 20 20 20 0a 58 09 | 09 20 20 69 66 20 28 28 | .X.|. if ((|
|00005bc0| 6f 62 73 63 75 72 65 5f | 73 79 6e 74 61 78 20 26 |obscure_|syntax &|
|00005bd0| 20 52 45 5f 4e 4f 5f 45 | 4d 50 54 59 5f 52 41 4e | RE_NO_E|MPTY_RAN|
|00005be0| 47 45 53 29 20 26 26 20 | 63 20 3e 20 63 31 29 0a |GES) && |c > c1).|
|00005bf0| 58 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |X | |
|00005c00| 20 20 20 20 20 67 6f 74 | 6f 20 69 6e 76 61 6c 69 | got|o invali|
|00005c10| 64 5f 70 61 74 74 65 72 | 6e 3b 0a 58 20 20 20 20 |d_patter|n;.X |
|00005c20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005c30| 0a 58 09 09 20 20 69 66 | 20 28 28 6f 62 73 63 75 |.X.. if| ((obscu|
|00005c40| 72 65 5f 73 79 6e 74 61 | 78 20 26 20 52 45 5f 4e |re_synta|x & RE_N|
|00005c50| 4f 5f 48 59 50 48 45 4e | 5f 52 41 4e 47 45 5f 45 |O_HYPHEN|_RANGE_E|
|00005c60| 4e 44 29 20 0a 58 20 20 | 20 20 20 20 20 20 20 20 |ND) .X | |
|00005c70| 20 20 20 20 20 20 20 20 | 20 20 20 20 26 26 20 63 | | && c|
|00005c80| 31 20 3d 3d 20 27 2d 27 | 20 26 26 20 2a 70 20 21 |1 == '-'| && *p !|
|00005c90| 3d 20 27 5d 27 29 0a 58 | 20 20 20 20 20 20 20 20 |= ']').X| |
|00005ca0| 20 20 20 20 20 20 20 20 | 20 20 20 20 67 6f 74 6f | | goto|
|00005cb0| 20 69 6e 76 61 6c 69 64 | 5f 70 61 74 74 65 72 6e | invalid|_pattern|
|00005cc0| 3b 0a 58 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |;.X | |
|00005cd0| 20 20 20 20 20 20 20 0a | 58 20 20 20 20 20 20 20 | .|X |
|00005ce0| 20 20 20 20 20 20 20 20 | 20 20 20 77 68 69 6c 65 | | while|
|00005cf0| 20 28 63 20 3c 3d 20 63 | 31 29 0a 58 09 09 20 20 | (c <= c|1).X.. |
|00005d00| 20 20 7b 0a 58 20 20 20 | 20 20 20 20 20 20 20 20 | {.X | |
|00005d10| 20 20 20 20 20 20 20 20 | 20 20 20 53 45 54 5f 4c | | SET_L|
|00005d20| 49 53 54 5f 42 49 54 20 | 28 63 29 3b 0a 58 20 20 |IST_BIT |(c);.X |
|00005d30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005d40| 20 20 20 20 63 2b 2b 3b | 0a 58 09 09 20 20 20 20 | c++;|.X.. |
|00005d50| 7d 0a 58 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |}.X | |
|00005d60| 20 20 20 7d 0a 58 09 20 | 20 20 20 20 20 65 6c 73 | }.X. | els|
|00005d70| 65 20 69 66 20 28 28 6f | 62 73 63 75 72 65 5f 73 |e if ((o|bscure_s|
|00005d80| 79 6e 74 61 78 20 26 20 | 52 45 5f 43 48 41 52 5f |yntax & |RE_CHAR_|
|00005d90| 43 4c 41 53 53 45 53 29 | 0a 58 09 09 09 26 26 20 |CLASSES)|.X...&& |
|00005da0| 20 63 20 3d 3d 20 27 5b | 27 20 26 26 20 70 5b 30 | c == '[|' && p[0|
|00005db0| 5d 20 3d 3d 20 27 3a 27 | 29 0a 58 20 20 20 20 20 |] == ':'|).X |
|00005dc0| 20 20 20 20 20 20 20 20 | 20 20 20 7b 0a 58 09 09 | | {.X..|
|00005dd0| 20 20 2f 2a 20 4c 6f 6e | 67 65 73 74 20 76 61 6c | /* Lon|gest val|
|00005de0| 69 64 20 63 68 61 72 61 | 63 74 65 72 20 63 6c 61 |id chara|cter cla|
|00005df0| 73 73 20 77 6f 72 64 20 | 68 61 73 20 73 69 78 20 |ss word |has six |
|00005e00| 63 68 61 72 61 63 74 65 | 72 73 2e 20 20 2a 2f 0a |characte|rs. */.|
|00005e10| 58 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |X | |
|00005e20| 20 20 20 63 68 61 72 20 | 73 74 72 5b 43 48 41 52 | char |str[CHAR|
|00005e30| 5f 43 4c 41 53 53 5f 4d | 41 58 5f 4c 45 4e 47 54 |_CLASS_M|AX_LENGT|
|00005e40| 48 5d 3b 0a 58 09 09 20 | 20 50 41 54 46 45 54 43 |H];.X.. | PATFETC|
|00005e50| 48 20 28 63 29 3b 0a 58 | 09 09 20 20 63 31 20 3d |H (c);.X|.. c1 =|
|00005e60| 20 30 3b 0a 58 09 09 20 | 20 2f 2a 20 49 66 20 6e | 0;.X.. | /* If n|
|00005e70| 6f 20 5d 20 61 74 20 65 | 6e 64 2e 20 20 2a 2f 0a |o ] at e|nd. */.|
|00005e80| 58 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |X | |
|00005e90| 20 20 20 69 66 20 28 70 | 20 3d 3d 20 70 65 6e 64 | if (p| == pend|
|00005ea0| 29 0a 58 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |).X | |
|00005eb0| 20 20 20 20 20 20 20 67 | 6f 74 6f 20 69 6e 76 61 | g|oto inva|
|00005ec0| 6c 69 64 5f 70 61 74 74 | 65 72 6e 3b 0a 58 09 09 |lid_patt|ern;.X..|
|00005ed0| 20 20 77 68 69 6c 65 20 | 28 31 29 0a 58 09 09 20 | while |(1).X.. |
|00005ee0| 20 20 20 7b 0a 58 09 09 | 20 20 20 20 20 20 2f 2a | {.X..| /*|
|00005ef0| 20 44 6f 6e 27 74 20 74 | 72 61 6e 73 6c 61 74 65 | Don't t|ranslate|
|00005f00| 20 74 68 65 20 60 60 63 | 68 61 72 61 63 74 65 72 | the ``c|haracter|
|00005f10| 20 63 6c 61 73 73 27 27 | 20 63 68 61 72 61 63 74 | class''| charact|
|00005f20| 65 72 73 2e 20 20 2a 2f | 0a 58 20 20 20 20 20 20 |ers. */|.X |
|00005f30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005f40| 50 41 54 46 45 54 43 48 | 5f 52 41 57 20 28 63 29 |PATFETCH|_RAW (c)|
|00005f50| 3b 0a 58 09 09 20 20 20 | 20 20 20 69 66 20 28 63 |;.X.. | if (c|
|00005f60| 20 3d 3d 20 27 3a 27 20 | 7c 7c 20 63 20 3d 3d 20 | == ':' ||| c == |
|00005f70| 27 5d 27 20 7c 7c 20 70 | 20 3d 3d 20 70 65 6e 64 |']' || p| == pend|
|00005f80| 0a 58 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.X | |
|00005f90| 20 20 20 20 20 20 20 20 | 20 20 20 20 7c 7c 20 63 | | || c|
|00005fa0| 31 20 3d 3d 20 43 48 41 | 52 5f 43 4c 41 53 53 5f |1 == CHA|R_CLASS_|
|00005fb0| 4d 41 58 5f 4c 45 4e 47 | 54 48 29 0a 58 09 09 20 |MAX_LENG|TH).X.. |
|00005fc0| 20 20 20 20 20 20 20 62 | 72 65 61 6b 3b 0a 58 09 | b|reak;.X.|
|00005fd0| 09 20 20 20 20 20 20 73 | 74 72 5b 63 31 2b 2b 5d |. s|tr[c1++]|
|00005fe0| 20 3d 20 63 3b 0a 58 09 | 09 20 20 20 20 7d 0a 58 | = c;.X.|. }.X|
|00005ff0| 09 09 20 20 73 74 72 5b | 63 31 5d 20 3d 20 27 5c |.. str[|c1] = '\|
|00006000| 30 27 3b 0a 58 09 09 20 | 20 69 66 20 28 70 20 3d |0';.X.. | if (p =|
|00006010| 3d 20 70 65 6e 64 20 09 | 0a 58 09 09 20 20 20 20 |= pend .|.X.. |
|00006020| 20 20 7c 7c 20 63 20 3d | 3d 20 27 5d 27 09 2f 2a | || c =|= ']'./*|
|00006030| 20 45 6e 64 20 6f 66 20 | 74 68 65 20 62 72 61 63 | End of |the brac|
|00006040| 6b 65 74 20 65 78 70 72 | 65 73 73 69 6f 6e 2e 20 |ket expr|ession. |
|00006050| 20 2a 2f 0a 58 20 20 20 | 20 20 20 20 20 20 20 20 | */.X | |
|00006060| 20 20 20 20 20 20 20 20 | 20 20 20 7c 7c 20 70 5b | | || p[|
|00006070| 30 5d 20 21 3d 20 27 5d | 27 0a 58 09 09 20 20 20 |0] != ']|'.X.. |
|00006080| 20 20 20 7c 7c 20 70 20 | 2b 20 31 20 3d 3d 20 70 | || p |+ 1 == p|
|00006090| 65 6e 64 0a 58 20 20 20 | 20 20 20 20 20 20 20 20 |end.X | |
|000060a0| 20 20 20 20 20 20 20 20 | 20 20 20 7c 7c 20 28 73 | | || (s|
|000060b0| 74 72 63 6d 70 20 28 73 | 74 72 2c 20 22 61 6c 70 |trcmp (s|tr, "alp|
|000060c0| 68 61 22 29 20 21 3d 20 | 30 20 0a 58 20 20 20 20 |ha") != |0 .X |
|000060d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000060e0| 20 20 20 20 20 20 26 26 | 20 73 74 72 63 6d 70 20 | &&| strcmp |
|000060f0| 28 73 74 72 2c 20 22 75 | 70 70 65 72 22 29 20 21 |(str, "u|pper") !|
|00006100| 3d 20 30 0a 58 09 09 09 | 20 20 26 26 20 73 74 72 |= 0.X...| && str|
|00006110| 63 6d 70 20 28 73 74 72 | 2c 20 22 6c 6f 77 65 72 |cmp (str|, "lower|
|00006120| 22 29 20 21 3d 20 30 20 | 0a 58 20 20 20 20 20 20 |") != 0 |.X |
|00006130| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00006140| 20 20 20 20 26 26 20 73 | 74 72 63 6d 70 20 28 73 | && s|trcmp (s|
|00006150| 74 72 2c 20 22 64 69 67 | 69 74 22 29 20 21 3d 20 |tr, "dig|it") != |
|00006160| 30 0a 58 09 09 09 20 20 | 26 26 20 73 74 72 63 6d |0.X... |&& strcm|
|00006170| 70 20 28 73 74 72 2c 20 | 22 61 6c 6e 75 6d 22 29 |p (str, |"alnum")|
|00006180| 20 21 3d 20 30 20 0a 58 | 20 20 20 20 20 20 20 20 | != 0 .X| |
|00006190| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000061a0| 20 20 26 26 20 73 74 72 | 63 6d 70 20 28 73 74 72 | && str|cmp (str|
|000061b0| 2c 20 22 78 64 69 67 69 | 74 22 29 20 21 3d 20 30 |, "xdigi|t") != 0|
|000061c0| 0a 58 09 09 09 20 20 26 | 26 20 73 74 72 63 6d 70 |.X... &|& strcmp|
|000061d0| 20 28 73 74 72 2c 20 22 | 73 70 61 63 65 22 29 20 | (str, "|space") |
|000061e0| 21 3d 20 30 20 0a 58 20 | 20 20 20 20 20 20 20 20 |!= 0 .X | |
|000061f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00006200| 20 26 26 20 73 74 72 63 | 6d 70 20 28 73 74 72 2c | && strc|mp (str,|
|00006210| 20 22 70 72 69 6e 74 22 | 29 20 21 3d 20 30 0a 58 | "print"|) != 0.X|
|00006220| 09 09 09 20 20 26 26 20 | 73 74 72 63 6d 70 20 28 |... && |strcmp (|
|00006230| 73 74 72 2c 20 22 70 75 | 6e 63 74 22 29 20 21 3d |str, "pu|nct") !=|
|00006240| 20 30 20 0a 58 20 20 20 | 20 20 20 20 20 20 20 20 | 0 .X | |
|00006250| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 26 | | &|
|00006260| 26 20 73 74 72 63 6d 70 | 20 28 73 74 72 2c 20 22 |& strcmp| (str, "|
|00006270| 67 72 61 70 68 22 29 20 | 21 3d 20 30 0a 58 09 09 |graph") |!= 0.X..|
|00006280| 09 20 20 26 26 20 73 74 | 72 63 6d 70 20 28 73 74 |. && st|rcmp (st|
|00006290| 72 2c 20 22 63 6e 74 72 | 6c 22 29 20 21 3d 20 30 |r, "cntr|l") != 0|
|000062a0| 29 29 0a 58 09 09 20 20 | 20 20 7b 0a 58 09 09 20 |)).X.. | {.X.. |
|000062b0| 20 20 20 20 20 20 2f 2a | 20 55 6e 64 6f 20 74 68 | /*| Undo th|
|000062c0| 65 20 65 6e 64 69 6e 67 | 20 63 68 61 72 61 63 74 |e ending| charact|
|000062d0| 65 72 2c 20 74 68 65 20 | 6c 65 74 74 65 72 73 2c |er, the |letters,|
|000062e0| 20 61 6e 64 20 6c 65 61 | 76 65 20 0a 58 20 20 20 | and lea|ve .X |
|000062f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00006300| 20 20 20 20 20 20 20 74 | 68 65 20 6c 65 61 64 69 | t|he leadi|
|00006310| 6e 67 20 3a 20 61 6e 64 | 20 5b 20 28 62 75 74 20 |ng : and| [ (but |
|00006320| 73 65 74 20 62 69 74 73 | 20 66 6f 72 20 74 68 65 |set bits| for the|
|00006330| 6d 29 2e 20 20 2a 2f 0a | 58 20 20 20 20 20 20 20 |m). */.|X |
|00006340| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 63 | | c|
|00006350| 31 2b 2b 3b 0a 58 09 09 | 20 20 20 20 20 20 77 68 |1++;.X..| wh|
|00006360| 69 6c 65 20 28 63 31 2d | 2d 29 20 20 20 20 0a 58 |ile (c1-|-) .X|
|00006370| 09 09 09 50 41 54 55 4e | 46 45 54 43 48 3b 0a 58 |...PATUN|FETCH;.X|
|00006380| 09 09 20 20 20 20 20 20 | 53 45 54 5f 4c 49 53 54 |.. |SET_LIST|
|00006390| 5f 42 49 54 20 28 27 5b | 27 29 3b 0a 58 09 09 20 |_BIT ('[|');.X.. |
|000063a0| 20 20 20 20 20 53 45 54 | 5f 4c 49 53 54 5f 42 49 | SET|_LIST_BI|
|000063b0| 54 20 28 27 3a 27 29 3b | 0a 58 09 20 20 20 20 20 |T (':');|.X. |
|000063c0| 20 20 20 20 20 20 20 7d | 0a 58 20 20 20 20 20 20 | }|.X |
|000063d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 65 6c 73 65 | | else|
|000063e0| 0a 58 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.X | |
|000063f0| 20 20 20 20 20 20 7b 0a | 58 20 20 20 20 20 20 20 | {.|X |
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
