home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: SHell self-extracting ARchive
(archive/shar).
You can browse this item here: 2993
| 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%
| TrID
| E-Mail message (Var. 2)
| default
| |
| 100%
| checkBytes
| Printable ASCII
| 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| 46 72 6f 6d 3a 20 6d 61 | 72 6b 40 75 6e 69 78 33 |From: ma|rk@unix3|
|00000010| 38 36 2e 43 6f 6e 76 65 | 72 67 65 6e 74 2e 43 4f |86.Conve|rgent.CO|
|00000020| 4d 20 28 4d 61 72 6b 20 | 4e 75 64 65 6c 6d 61 6e |M (Mark |Nudelman|
|00000030| 29 0a 4e 65 77 73 67 72 | 6f 75 70 73 3a 20 61 6c |).Newsgr|oups: al|
|00000040| 74 2e 73 6f 75 72 63 65 | 73 0a 53 75 62 6a 65 63 |t.source|s.Subjec|
|00000050| 74 3a 20 6c 65 73 73 20 | 28 70 61 72 74 20 33 20 |t: less |(part 3 |
|00000060| 6f 66 20 36 29 0a 4d 65 | 73 73 61 67 65 2d 49 44 |of 6).Me|ssage-ID|
|00000070| 3a 20 3c 36 34 32 32 40 | 75 6e 69 78 33 38 36 2e |: <6422@|unix386.|
|00000080| 43 6f 6e 76 65 72 67 65 | 6e 74 2e 43 4f 4d 3e 0a |Converge|nt.COM>.|
|00000090| 44 61 74 65 3a 20 36 20 | 4d 61 72 20 39 31 20 30 |Date: 6 |Mar 91 0|
|000000a0| 30 3a 31 33 3a 33 38 20 | 47 4d 54 0a 0a 23 21 20 |0:13:38 |GMT..#! |
|000000b0| 2f 62 69 6e 2f 73 68 0a | 23 20 54 68 69 73 20 69 |/bin/sh.|# This i|
|000000c0| 73 20 61 20 73 68 65 6c | 6c 20 61 72 63 68 69 76 |s a shel|l archiv|
|000000d0| 65 2e 0a 23 20 52 65 6d | 6f 76 65 20 61 6e 79 74 |e..# Rem|ove anyt|
|000000e0| 68 69 6e 67 20 62 65 66 | 6f 72 65 20 74 68 69 73 |hing bef|ore this|
|000000f0| 20 6c 69 6e 65 2c 20 74 | 68 65 6e 20 75 6e 70 61 | line, t|hen unpa|
|00000100| 63 6b 20 69 74 0a 23 20 | 62 79 20 73 61 76 69 6e |ck it.# |by savin|
|00000110| 67 20 69 74 20 69 6e 74 | 6f 20 61 20 66 69 6c 65 |g it int|o a file|
|00000120| 20 61 6e 64 20 74 79 70 | 69 6e 67 20 22 73 68 20 | and typ|ing "sh |
|00000130| 66 69 6c 65 22 2e 0a 0a | 65 63 68 6f 20 73 68 61 |file"...|echo sha|
|00000140| 72 3a 20 45 78 74 72 61 | 63 74 69 6e 67 20 5c 22 |r: Extra|cting \"|
|00000150| 6c 65 73 73 6b 65 79 2e | 63 5c 22 0a 73 65 64 20 |lesskey.|c\".sed |
|00000160| 22 73 2f 5e 58 2f 2f 22 | 20 3e 27 6c 65 73 73 6b |"s/^X//"| >'lessk|
|00000170| 65 79 2e 63 27 20 3c 3c | 27 45 4e 44 5f 4f 46 5f |ey.c' <<|'END_OF_|
|00000180| 46 49 4c 45 27 0a 58 2f | 2a 0a 58 20 2a 09 6c 65 |FILE'.X/|*.X *.le|
|00000190| 73 73 6b 65 79 20 5b 2d | 6f 20 6f 75 74 70 75 74 |sskey [-|o output|
|000001a0| 5d 20 5b 69 6e 70 75 74 | 5d 0a 58 20 2a 0a 58 20 |] [input|].X *.X |
|000001b0| 2a 09 4d 61 6b 65 20 61 | 20 2e 6c 65 73 73 20 66 |*.Make a| .less f|
|000001c0| 69 6c 65 2e 0a 58 20 2a | 09 49 66 20 6e 6f 20 69 |ile..X *|.If no i|
|000001d0| 6e 70 75 74 20 66 69 6c | 65 20 69 73 20 73 70 65 |nput fil|e is spe|
|000001e0| 63 69 66 69 65 64 2c 20 | 73 74 61 6e 64 61 72 64 |cified, |standard|
|000001f0| 20 69 6e 70 75 74 20 69 | 73 20 75 73 65 64 2e 0a | input i|s used..|
|00000200| 58 20 2a 09 49 66 20 6e | 6f 20 6f 75 74 70 75 74 |X *.If n|o output|
|00000210| 20 66 69 6c 65 20 69 73 | 20 73 70 65 63 69 66 69 | file is| specifi|
|00000220| 65 64 2c 20 24 48 4f 4d | 45 2f 2e 6c 65 73 73 20 |ed, $HOM|E/.less |
|00000230| 69 73 20 75 73 65 64 2e | 0a 58 20 2a 0a 58 20 2a |is used.|.X *.X *|
|00000240| 09 54 68 65 20 2e 6c 65 | 73 73 20 66 69 6c 65 20 |.The .le|ss file |
|00000250| 69 73 20 75 73 65 64 20 | 74 6f 20 73 70 65 63 69 |is used |to speci|
|00000260| 66 79 20 28 74 6f 20 22 | 6c 65 73 73 22 29 20 75 |fy (to "|less") u|
|00000270| 73 65 72 2d 64 65 66 69 | 6e 65 64 0a 58 20 2a 09 |ser-defi|ned.X *.|
|00000280| 6b 65 79 20 62 69 6e 64 | 69 6e 67 73 2e 20 20 42 |key bind|ings. B|
|00000290| 61 73 69 63 61 6c 6c 79 | 20 61 6e 79 20 73 65 71 |asically| any seq|
|000002a0| 75 65 6e 63 65 20 6f 66 | 20 31 20 74 6f 20 4d 41 |uence of| 1 to MA|
|000002b0| 58 5f 43 4d 44 4c 45 4e | 0a 58 20 2a 09 6b 65 79 |X_CMDLEN|.X *.key|
|000002c0| 73 74 72 6f 6b 65 73 20 | 6d 61 79 20 62 65 20 62 |strokes |may be b|
|000002d0| 6f 75 6e 64 20 74 6f 20 | 61 6e 20 65 78 69 73 74 |ound to |an exist|
|000002e0| 69 6e 67 20 6c 65 73 73 | 20 66 75 6e 63 74 69 6f |ing less| functio|
|000002f0| 6e 2e 0a 58 20 2a 0a 58 | 20 2a 09 54 68 65 20 69 |n..X *.X| *.The i|
|00000300| 6e 70 75 74 20 66 69 6c | 65 20 69 73 20 61 6e 20 |nput fil|e is an |
|00000310| 61 73 63 69 69 20 66 69 | 6c 65 20 63 6f 6e 73 69 |ascii fi|le consi|
|00000320| 73 74 69 6e 67 20 6f 66 | 20 61 20 0a 58 20 2a 09 |sting of| a .X *.|
|00000330| 73 65 71 75 65 6e 63 65 | 20 6f 66 20 6c 69 6e 65 |sequence| of line|
|00000340| 73 20 6f 66 20 74 68 65 | 20 66 6f 72 6d 3a 0a 58 |s of the| form:.X|
|00000350| 20 2a 09 09 73 74 72 69 | 6e 67 20 3c 77 68 69 74 | *..stri|ng <whit|
|00000360| 65 73 70 61 63 65 3e 20 | 61 63 74 69 6f 6e 20 5b |espace> |action [|
|00000370| 63 68 61 72 73 5d 20 3c | 6e 65 77 6c 69 6e 65 3e |chars] <|newline>|
|00000380| 0a 58 20 2a 0a 58 20 2a | 09 22 73 74 72 69 6e 67 |.X *.X *|."string|
|00000390| 22 20 69 73 20 61 20 73 | 65 71 75 65 6e 63 65 20 |" is a s|equence |
|000003a0| 6f 66 20 63 6f 6d 6d 61 | 6e 64 20 63 68 61 72 61 |of comma|nd chara|
|000003b0| 63 74 65 72 73 20 77 68 | 69 63 68 20 66 6f 72 6d |cters wh|ich form|
|000003c0| 0a 58 20 2a 09 09 74 68 | 65 20 6e 65 77 20 75 73 |.X *..th|e new us|
|000003d0| 65 72 2d 64 65 66 69 6e | 65 64 20 63 6f 6d 6d 61 |er-defin|ed comma|
|000003e0| 6e 64 2e 20 20 54 68 65 | 20 63 6f 6d 6d 61 6e 64 |nd. The| command|
|000003f0| 0a 58 20 2a 09 09 63 68 | 61 72 61 63 74 65 72 73 |.X *..ch|aracters|
|00000400| 20 6d 61 79 20 62 65 3a | 0a 58 20 2a 09 09 31 2e | may be:|.X *..1.|
|00000410| 20 54 68 65 20 61 63 74 | 75 61 6c 20 63 68 61 72 | The act|ual char|
|00000420| 61 63 74 65 72 20 69 74 | 73 65 6c 66 2e 0a 58 20 |acter it|self..X |
|00000430| 2a 09 09 32 2e 20 41 20 | 63 68 61 72 61 63 74 65 |*..2. A |characte|
|00000440| 72 20 70 72 65 63 65 64 | 65 64 20 62 79 20 5e 20 |r preced|ed by ^ |
|00000450| 74 6f 20 73 70 65 63 69 | 66 79 20 61 0a 58 20 2a |to speci|fy a.X *|
|00000460| 09 09 20 20 20 63 6f 6e | 74 72 6f 6c 20 63 68 61 |.. con|trol cha|
|00000470| 72 61 63 74 65 72 20 28 | 65 2e 67 2e 20 5e 58 20 |racter (|e.g. ^X |
|00000480| 6d 65 61 6e 73 20 63 6f | 6e 74 72 6f 6c 2d 58 29 |means co|ntrol-X)|
|00000490| 2e 0a 58 20 2a 09 09 33 | 2e 20 41 6e 79 20 63 68 |..X *..3|. Any ch|
|000004a0| 61 72 61 63 74 65 72 20 | 28 6f 74 68 65 72 20 74 |aracter |(other t|
|000004b0| 68 61 6e 20 61 6e 20 6f | 63 74 61 6c 20 64 69 67 |han an o|ctal dig|
|000004c0| 69 74 29 20 70 72 65 63 | 65 64 65 64 20 62 79 0a |it) prec|eded by.|
|000004d0| 58 20 2a 09 09 20 20 20 | 61 20 5c 20 74 6f 20 73 |X *.. |a \ to s|
|000004e0| 70 65 63 69 66 79 20 74 | 68 65 20 63 68 61 72 61 |pecify t|he chara|
|000004f0| 63 74 65 72 20 69 74 73 | 65 6c 66 20 28 63 68 61 |cter its|elf (cha|
|00000500| 72 61 63 74 65 72 73 20 | 77 68 69 63 68 0a 58 20 |racters |which.X |
|00000510| 2a 09 09 20 20 20 6d 75 | 73 74 20 62 65 20 70 72 |*.. mu|st be pr|
|00000520| 65 63 65 64 65 64 20 62 | 79 20 5c 20 69 6e 63 6c |eceded b|y \ incl|
|00000530| 75 64 65 20 5e 2c 20 5c | 2c 20 61 6e 64 20 77 68 |ude ^, \|, and wh|
|00000540| 69 74 65 73 70 61 63 65 | 2e 0a 58 20 2a 09 09 34 |itespace|..X *..4|
|00000550| 2e 20 41 20 62 61 63 6b | 73 6c 61 73 68 20 66 6f |. A back|slash fo|
|00000560| 6c 6c 6f 77 65 64 20 62 | 79 20 6f 6e 65 20 74 6f |llowed b|y one to|
|00000570| 20 74 68 72 65 65 20 6f | 63 74 61 6c 20 64 69 67 | three o|ctal dig|
|00000580| 69 74 73 0a 58 20 2a 09 | 09 20 20 20 74 6f 20 73 |its.X *.|. to s|
|00000590| 70 65 63 69 66 79 20 61 | 20 63 68 61 72 61 63 74 |pecify a| charact|
|000005a0| 65 72 20 62 79 20 69 74 | 73 20 6f 63 74 61 6c 20 |er by it|s octal |
|000005b0| 76 61 6c 75 65 2e 0a 58 | 20 2a 09 22 61 63 74 69 |value..X| *."acti|
|000005c0| 6f 6e 22 20 69 73 20 74 | 68 65 20 6e 61 6d 65 20 |on" is t|he name |
|000005d0| 6f 66 20 61 20 22 6c 65 | 73 73 22 20 61 63 74 69 |of a "le|ss" acti|
|000005e0| 6f 6e 2c 20 66 72 6f 6d | 20 74 68 65 20 74 61 62 |on, from| the tab|
|000005f0| 6c 65 20 62 65 6c 6f 77 | 2e 0a 58 20 2a 09 22 63 |le below|..X *."c|
|00000600| 68 61 72 73 22 20 69 73 | 20 61 6e 20 6f 70 74 69 |hars" is| an opti|
|00000610| 6f 6e 61 6c 20 73 65 71 | 75 65 6e 63 65 20 6f 66 |onal seq|uence of|
|00000620| 20 63 68 61 72 61 63 74 | 65 72 73 20 77 68 69 63 | charact|ers whic|
|00000630| 68 20 69 73 20 74 72 65 | 61 74 65 64 0a 58 20 2a |h is tre|ated.X *|
|00000640| 09 09 61 73 20 6b 65 79 | 62 6f 61 72 64 20 69 6e |..as key|board in|
|00000650| 70 75 74 20 61 66 74 65 | 72 20 74 68 65 20 63 6f |put afte|r the co|
|00000660| 6d 6d 61 6e 64 20 69 73 | 20 65 78 65 63 75 74 65 |mmand is| execute|
|00000670| 64 2e 0a 58 20 2a 0a 58 | 20 2a 09 42 6c 61 6e 6b |d..X *.X| *.Blank|
|00000680| 20 6c 69 6e 65 73 20 61 | 6e 64 20 6c 69 6e 65 73 | lines a|nd lines|
|00000690| 20 77 68 69 63 68 20 73 | 74 61 72 74 20 77 69 74 | which s|tart wit|
|000006a0| 68 20 23 20 61 72 65 20 | 69 67 6e 6f 72 65 64 2e |h # are |ignored.|
|000006b0| 0a 58 20 2a 0a 58 20 2a | 0a 58 20 2a 09 54 68 65 |.X *.X *|.X *.The|
|000006c0| 20 6f 75 74 70 75 74 20 | 66 69 6c 65 20 69 73 20 | output |file is |
|000006d0| 61 20 6e 6f 6e 2d 61 73 | 63 69 69 20 66 69 6c 65 |a non-as|cii file|
|000006e0| 2c 20 63 6f 6e 73 69 73 | 74 69 6e 67 20 6f 66 0a |, consis|ting of.|
|000006f0| 58 20 2a 09 7a 65 72 6f | 20 6f 72 20 6d 6f 72 65 |X *.zero| or more|
|00000700| 20 62 79 74 65 20 73 65 | 71 75 65 6e 63 65 73 20 | byte se|quences |
|00000710| 6f 66 20 74 68 65 20 66 | 6f 72 6d 3a 0a 58 20 2a |of the f|orm:.X *|
|00000720| 09 09 73 74 72 69 6e 67 | 20 3c 30 3e 20 3c 61 63 |..string| <0> <ac|
|00000730| 74 69 6f 6e 3e 0a 58 20 | 2a 09 6f 72 0a 58 20 2a |tion>.X |*.or.X *|
|00000740| 09 09 73 74 72 69 6e 67 | 20 3c 30 3e 20 3c 61 63 |..string| <0> <ac|
|00000750| 74 69 6f 6e 7c 41 5f 45 | 58 54 52 41 3e 20 63 68 |tion|A_E|XTRA> ch|
|00000760| 61 72 73 20 3c 30 3e 0a | 58 20 2a 0a 58 20 2a 09 |ars <0>.|X *.X *.|
|00000770| 22 73 74 72 69 6e 67 22 | 20 69 73 20 74 68 65 20 |"string"| is the |
|00000780| 63 6f 6d 6d 61 6e 64 20 | 73 74 72 69 6e 67 2e 0a |command |string..|
|00000790| 58 20 2a 09 22 3c 30 3e | 22 20 69 73 20 6f 6e 65 |X *."<0>|" is one|
|000007a0| 20 6e 75 6c 6c 20 62 79 | 74 65 2e 0a 58 20 2a 09 | null by|te..X *.|
|000007b0| 22 3c 61 63 74 69 6f 6e | 3e 22 20 69 73 20 6f 6e |"<action|>" is on|
|000007c0| 65 20 62 79 74 65 20 63 | 6f 6e 74 61 69 6e 69 6e |e byte c|ontainin|
|000007d0| 67 20 74 68 65 20 61 63 | 74 69 6f 6e 20 63 6f 64 |g the ac|tion cod|
|000007e0| 65 20 28 74 68 65 20 41 | 5f 78 78 78 20 76 61 6c |e (the A|_xxx val|
|000007f0| 75 65 29 2e 0a 58 20 2a | 09 49 66 20 61 63 74 69 |ue)..X *|.If acti|
|00000800| 6f 6e 20 69 73 20 4f 52 | 65 64 20 77 69 74 68 20 |on is OR|ed with |
|00000810| 41 5f 45 58 54 52 41 2c | 20 74 68 65 20 61 63 74 |A_EXTRA,| the act|
|00000820| 69 6f 6e 20 62 79 74 65 | 20 69 73 20 66 6f 6c 6c |ion byte| is foll|
|00000830| 6f 77 65 64 0a 58 20 2a | 09 09 62 79 20 74 68 65 |owed.X *|..by the|
|00000840| 20 6e 75 6c 6c 2d 74 65 | 72 6d 69 6e 61 74 65 64 | null-te|rminated|
|00000850| 20 22 63 68 61 72 73 22 | 20 73 74 72 69 6e 67 2e | "chars"| string.|
|00000860| 0a 58 20 2a 2f 0a 58 0a | 58 23 69 6e 63 6c 75 64 |.X */.X.|X#includ|
|00000870| 65 20 3c 73 74 64 69 6f | 2e 68 3e 0a 58 23 69 6e |e <stdio|.h>.X#in|
|00000880| 63 6c 75 64 65 20 22 6c | 65 73 73 2e 68 22 0a 58 |clude "l|ess.h".X|
|00000890| 23 69 6e 63 6c 75 64 65 | 20 22 63 6d 64 2e 68 22 |#include| "cmd.h"|
|000008a0| 0a 58 0a 58 63 68 61 72 | 20 75 73 65 72 74 61 62 |.X.Xchar| usertab|
|000008b0| 6c 65 5b 4d 41 58 5f 55 | 53 45 52 43 4d 44 5d 3b |le[MAX_U|SERCMD];|
|000008c0| 0a 58 0a 58 73 74 72 75 | 63 74 20 63 6d 64 6e 61 |.X.Xstru|ct cmdna|
|000008d0| 6d 65 0a 58 7b 0a 58 09 | 63 68 61 72 20 2a 63 6e |me.X{.X.|char *cn|
|000008e0| 5f 6e 61 6d 65 3b 0a 58 | 09 69 6e 74 20 63 6e 5f |_name;.X|.int cn_|
|000008f0| 61 63 74 69 6f 6e 3b 0a | 58 7d 20 63 6d 64 6e 61 |action;.|X} cmdna|
|00000900| 6d 65 73 5b 5d 20 3d 20 | 0a 58 7b 0a 58 09 22 62 |mes[] = |.X{.X."b|
|00000910| 61 63 6b 2d 62 72 61 63 | 6b 65 74 22 2c 09 09 41 |ack-brac|ket",..A|
|00000920| 5f 42 5f 42 52 41 43 4b | 45 54 2c 0a 58 09 22 62 |_B_BRACK|ET,.X."b|
|00000930| 61 63 6b 2d 6c 69 6e 65 | 22 2c 09 09 41 5f 42 5f |ack-line|",..A_B_|
|00000940| 4c 49 4e 45 2c 0a 58 09 | 22 62 61 63 6b 2d 6c 69 |LINE,.X.|"back-li|
|00000950| 6e 65 2d 66 6f 72 63 65 | 22 2c 09 41 5f 42 46 5f |ne-force|",.A_BF_|
|00000960| 4c 49 4e 45 2c 0a 58 09 | 22 62 61 63 6b 2d 73 63 |LINE,.X.|"back-sc|
|00000970| 72 65 65 6e 22 2c 09 09 | 41 5f 42 5f 53 43 52 45 |reen",..|A_B_SCRE|
|00000980| 45 4e 2c 0a 58 09 22 62 | 61 63 6b 2d 73 63 72 6f |EN,.X."b|ack-scro|
|00000990| 6c 6c 22 2c 09 09 41 5f | 42 5f 53 43 52 4f 4c 4c |ll",..A_|B_SCROLL|
|000009a0| 2c 0a 58 09 22 62 61 63 | 6b 2d 73 65 61 72 63 68 |,.X."bac|k-search|
|000009b0| 22 2c 09 09 41 5f 42 5f | 53 45 41 52 43 48 2c 0a |",..A_B_|SEARCH,.|
|000009c0| 58 09 22 62 61 63 6b 2d | 77 69 6e 64 6f 77 22 2c |X."back-|window",|
|000009d0| 09 09 41 5f 42 5f 57 49 | 4e 44 4f 57 2c 0a 58 09 |..A_B_WI|NDOW,.X.|
|000009e0| 22 64 65 62 75 67 22 2c | 09 09 41 5f 44 45 42 55 |"debug",|..A_DEBU|
|000009f0| 47 2c 0a 58 09 22 64 69 | 73 70 6c 61 79 2d 66 6c |G,.X."di|splay-fl|
|00000a00| 61 67 22 2c 09 09 41 5f | 44 49 53 50 5f 4f 50 54 |ag",..A_|DISP_OPT|
|00000a10| 49 4f 4e 2c 0a 58 09 22 | 64 69 73 70 6c 61 79 2d |ION,.X."|display-|
|00000a20| 6f 70 74 69 6f 6e 22 2c | 09 41 5f 44 49 53 50 5f |option",|.A_DISP_|
|00000a30| 4f 50 54 49 4f 4e 2c 0a | 58 09 22 65 6e 64 22 2c |OPTION,.|X."end",|
|00000a40| 09 09 09 41 5f 47 4f 45 | 4e 44 2c 0a 58 09 22 65 |...A_GOE|ND,.X."e|
|00000a50| 78 61 6d 69 6e 65 22 2c | 09 09 41 5f 45 58 41 4d |xamine",|..A_EXAM|
|00000a60| 49 4e 45 2c 0a 58 09 22 | 66 69 72 73 74 2d 63 6d |INE,.X."|first-cm|
|00000a70| 64 22 2c 09 09 41 5f 46 | 49 52 53 54 43 4d 44 2c |d",..A_F|IRSTCMD,|
|00000a80| 0a 58 09 22 66 69 72 73 | 74 63 6d 64 22 2c 09 09 |.X."firs|tcmd",..|
|00000a90| 41 5f 46 49 52 53 54 43 | 4d 44 2c 0a 58 09 22 66 |A_FIRSTC|MD,.X."f|
|00000aa0| 6c 75 73 68 2d 72 65 70 | 61 69 6e 74 22 2c 09 41 |lush-rep|aint",.A|
|00000ab0| 5f 46 52 45 50 41 49 4e | 54 2c 0a 58 09 22 66 6f |_FREPAIN|T,.X."fo|
|00000ac0| 72 77 2d 62 72 61 63 6b | 65 74 22 2c 09 09 41 5f |rw-brack|et",..A_|
|00000ad0| 46 5f 42 52 41 43 4b 45 | 54 2c 0a 58 09 22 66 6f |F_BRACKE|T,.X."fo|
|00000ae0| 72 77 2d 66 6f 72 65 76 | 65 72 22 2c 09 09 41 5f |rw-forev|er",..A_|
|00000af0| 46 5f 46 4f 52 45 56 45 | 52 2c 0a 58 09 22 66 6f |F_FOREVE|R,.X."fo|
|00000b00| 72 77 2d 6c 69 6e 65 22 | 2c 09 09 41 5f 46 5f 4c |rw-line"|,..A_F_L|
|00000b10| 49 4e 45 2c 0a 58 09 22 | 66 6f 72 77 2d 6c 69 6e |INE,.X."|forw-lin|
|00000b20| 65 2d 66 6f 72 63 65 22 | 2c 09 41 5f 46 46 5f 4c |e-force"|,.A_FF_L|
|00000b30| 49 4e 45 2c 0a 58 09 22 | 66 6f 72 77 2d 73 63 72 |INE,.X."|forw-scr|
|00000b40| 65 65 6e 22 2c 09 09 41 | 5f 46 5f 53 43 52 45 45 |een",..A|_F_SCREE|
|00000b50| 4e 2c 0a 58 09 22 66 6f | 72 77 2d 73 63 72 6f 6c |N,.X."fo|rw-scrol|
|00000b60| 6c 22 2c 09 09 41 5f 46 | 5f 53 43 52 4f 4c 4c 2c |l",..A_F|_SCROLL,|
|00000b70| 0a 58 09 22 66 6f 72 77 | 2d 73 65 61 72 63 68 22 |.X."forw|-search"|
|00000b80| 2c 09 09 41 5f 46 5f 53 | 45 41 52 43 48 2c 0a 58 |,..A_F_S|EARCH,.X|
|00000b90| 09 22 66 6f 72 77 2d 77 | 69 6e 64 6f 77 22 2c 09 |."forw-w|indow",.|
|00000ba0| 09 41 5f 46 5f 57 49 4e | 44 4f 57 2c 0a 58 09 22 |.A_F_WIN|DOW,.X."|
|00000bb0| 67 6f 74 6f 2d 65 6e 64 | 22 2c 09 09 41 5f 47 4f |goto-end|",..A_GO|
|00000bc0| 45 4e 44 2c 0a 58 09 22 | 67 6f 74 6f 2d 6c 69 6e |END,.X."|goto-lin|
|00000bd0| 65 22 2c 09 09 41 5f 47 | 4f 4c 49 4e 45 2c 0a 58 |e",..A_G|OLINE,.X|
|00000be0| 09 22 67 6f 74 6f 2d 6d | 61 72 6b 22 2c 09 09 41 |."goto-m|ark",..A|
|00000bf0| 5f 47 4f 4d 41 52 4b 2c | 0a 58 09 22 68 65 6c 70 |_GOMARK,|.X."help|
|00000c00| 22 2c 09 09 09 41 5f 48 | 45 4c 50 2c 0a 58 09 22 |",...A_H|ELP,.X."|
|00000c10| 69 6e 64 65 78 2d 66 69 | 6c 65 22 2c 09 09 41 5f |index-fi|le",..A_|
|00000c20| 49 4e 44 45 58 5f 46 49 | 4c 45 2c 0a 58 09 22 69 |INDEX_FI|LE,.X."i|
|00000c30| 6e 76 61 6c 69 64 22 2c | 09 09 41 5f 55 49 4e 56 |nvalid",|..A_UINV|
|00000c40| 41 4c 49 44 2c 0a 58 09 | 22 6e 65 78 74 2d 66 69 |ALID,.X.|"next-fi|
|00000c50| 6c 65 22 2c 09 09 41 5f | 4e 45 58 54 5f 46 49 4c |le",..A_|NEXT_FIL|
|00000c60| 45 2c 0a 58 09 22 6e 6f | 61 63 74 69 6f 6e 22 2c |E,.X."no|action",|
|00000c70| 09 09 41 5f 4e 4f 41 43 | 54 49 4f 4e 2c 0a 58 09 |..A_NOAC|TION,.X.|
|00000c80| 22 70 65 72 63 65 6e 74 | 22 2c 09 09 41 5f 50 45 |"percent|",..A_PE|
|00000c90| 52 43 45 4e 54 2c 0a 58 | 09 22 70 69 70 65 22 2c |RCENT,.X|."pipe",|
|00000ca0| 09 09 09 41 5f 50 49 50 | 45 2c 0a 58 09 22 70 72 |...A_PIP|E,.X."pr|
|00000cb0| 65 76 2d 66 69 6c 65 22 | 2c 09 09 41 5f 50 52 45 |ev-file"|,..A_PRE|
|00000cc0| 56 5f 46 49 4c 45 2c 0a | 58 09 22 71 75 69 74 22 |V_FILE,.|X."quit"|
|00000cd0| 2c 09 09 09 41 5f 51 55 | 49 54 2c 0a 58 09 22 72 |,...A_QU|IT,.X."r|
|00000ce0| 65 70 61 69 6e 74 22 2c | 09 09 41 5f 52 45 50 41 |epaint",|..A_REPA|
|00000cf0| 49 4e 54 2c 0a 58 09 22 | 72 65 70 61 69 6e 74 2d |INT,.X."|repaint-|
|00000d00| 66 6c 75 73 68 22 2c 09 | 41 5f 46 52 45 50 41 49 |flush",.|A_FREPAI|
|00000d10| 4e 54 2c 0a 58 09 22 72 | 65 70 65 61 74 2d 73 65 |NT,.X."r|epeat-se|
|00000d20| 61 72 63 68 22 2c 09 41 | 5f 41 47 41 49 4e 5f 53 |arch",.A|_AGAIN_S|
|00000d30| 45 41 52 43 48 2c 0a 58 | 09 22 72 65 70 65 61 74 |EARCH,.X|."repeat|
|00000d40| 2d 73 65 61 72 63 68 2d | 61 6c 6c 22 2c 09 41 5f |-search-|all",.A_|
|00000d50| 54 5f 41 47 41 49 4e 5f | 53 45 41 52 43 48 2c 0a |T_AGAIN_|SEARCH,.|
|00000d60| 58 09 22 72 65 76 65 72 | 73 65 2d 73 65 61 72 63 |X."rever|se-searc|
|00000d70| 68 22 2c 09 41 5f 52 45 | 56 45 52 53 45 5f 53 45 |h",.A_RE|VERSE_SE|
|00000d80| 41 52 43 48 2c 0a 58 09 | 22 72 65 76 65 72 73 65 |ARCH,.X.|"reverse|
|00000d90| 2d 73 65 61 72 63 68 2d | 61 6c 6c 22 2c 09 41 5f |-search-|all",.A_|
|00000da0| 54 5f 52 45 56 45 52 53 | 45 5f 53 45 41 52 43 48 |T_REVERS|E_SEARCH|
|00000db0| 2c 0a 58 09 22 73 65 74 | 2d 6d 61 72 6b 22 2c 09 |,.X."set|-mark",.|
|00000dc0| 09 41 5f 53 45 54 4d 41 | 52 4b 2c 0a 58 09 22 73 |.A_SETMA|RK,.X."s|
|00000dd0| 68 65 6c 6c 22 2c 09 09 | 41 5f 53 48 45 4c 4c 2c |hell",..|A_SHELL,|
|00000de0| 0a 58 09 22 73 74 61 74 | 75 73 22 2c 09 09 41 5f |.X."stat|us",..A_|
|00000df0| 53 54 41 54 2c 0a 58 09 | 22 74 6f 67 67 6c 65 2d |STAT,.X.|"toggle-|
|00000e00| 66 6c 61 67 22 2c 09 09 | 41 5f 4f 50 54 5f 54 4f |flag",..|A_OPT_TO|
|00000e10| 47 47 4c 45 2c 0a 58 09 | 22 74 6f 67 67 6c 65 2d |GGLE,.X.|"toggle-|
|00000e20| 6f 70 74 69 6f 6e 22 2c | 09 41 5f 4f 50 54 5f 54 |option",|.A_OPT_T|
|00000e30| 4f 47 47 4c 45 2c 0a 58 | 09 22 76 65 72 73 69 6f |OGGLE,.X|."versio|
|00000e40| 6e 22 2c 09 09 41 5f 56 | 45 52 53 49 4f 4e 2c 0a |n",..A_V|ERSION,.|
|00000e50| 58 09 22 76 69 73 75 61 | 6c 22 2c 09 09 41 5f 56 |X."visua|l",..A_V|
|00000e60| 49 53 55 41 4c 2c 0a 58 | 09 4e 55 4c 4c 2c 09 09 |ISUAL,.X|.NULL,..|
|00000e70| 09 30 0a 58 7d 3b 0a 58 | 0a 58 6d 61 69 6e 28 61 |.0.X};.X|.Xmain(a|
|00000e80| 72 67 63 2c 20 61 72 67 | 76 29 0a 58 09 69 6e 74 |rgc, arg|v).X.int|
|00000e90| 20 61 72 67 63 3b 0a 58 | 09 63 68 61 72 20 2a 61 | argc;.X|.char *a|
|00000ea0| 72 67 76 5b 5d 3b 0a 58 | 7b 0a 58 09 63 68 61 72 |rgv[];.X|{.X.char|
|00000eb0| 20 2a 70 3b 09 09 2f 2a | 20 7b 7b 20 43 61 6e 27 | *p;../*| {{ Can'|
|00000ec0| 74 20 62 65 20 72 65 67 | 69 73 74 65 72 20 73 69 |t be reg|ister si|
|00000ed0| 6e 63 65 20 77 65 20 75 | 73 65 20 26 70 20 7d 7d |nce we u|se &p }}|
|00000ee0| 20 2a 2f 0a 58 09 72 65 | 67 69 73 74 65 72 20 63 | */.X.re|gister c|
|00000ef0| 68 61 72 20 2a 75 70 3b | 09 2f 2a 20 50 6f 69 6e |har *up;|./* Poin|
|00000f00| 74 65 72 20 69 6e 74 6f | 20 75 73 65 72 74 61 62 |ter into| usertab|
|00000f10| 6c 65 20 2a 2f 0a 58 09 | 46 49 4c 45 20 2a 64 65 |le */.X.|FILE *de|
|00000f20| 73 63 3b 09 09 2f 2a 20 | 44 65 73 63 72 69 70 74 |sc;../* |Descript|
|00000f30| 69 6f 6e 20 66 69 6c 65 | 20 28 69 6e 70 75 74 29 |ion file| (input)|
|00000f40| 20 2a 2f 0a 58 09 46 49 | 4c 45 20 2a 6f 75 74 3b | */.X.FI|LE *out;|
|00000f50| 09 09 2f 2a 20 4f 75 74 | 70 75 74 20 66 69 6c 65 |../* Out|put file|
|00000f60| 20 2a 2f 0a 58 09 69 6e | 74 20 6c 69 6e 65 6e 75 | */.X.in|t linenu|
|00000f70| 6d 3b 09 09 2f 2a 20 4c | 69 6e 65 20 6e 75 6d 62 |m;../* L|ine numb|
|00000f80| 65 72 20 69 6e 20 69 6e | 70 75 74 20 66 69 6c 65 |er in in|put file|
|00000f90| 20 2a 2f 0a 58 09 63 68 | 61 72 20 2a 63 75 72 72 | */.X.ch|ar *curr|
|00000fa0| 63 6d 64 3b 09 09 2f 2a | 20 53 74 61 72 74 20 6f |cmd;../*| Start o|
|00000fb0| 66 20 63 75 72 72 65 6e | 74 20 63 6f 6d 6d 61 6e |f curren|t comman|
|00000fc0| 64 20 73 74 72 69 6e 67 | 20 2a 2f 0a 58 09 69 6e |d string| */.X.in|
|00000fd0| 74 20 65 72 72 6f 72 73 | 3b 0a 58 09 69 6e 74 20 |t errors|;.X.int |
|00000fe0| 69 2c 20 6a 3b 0a 58 09 | 63 68 61 72 20 6c 69 6e |i, j;.X.|char lin|
|00000ff0| 65 5b 32 30 30 5d 3b 0a | 58 09 63 68 61 72 20 2a |e[200];.|X.char *|
|00001000| 6f 75 74 66 69 6c 65 3b | 0a 58 0a 58 09 65 78 74 |outfile;|.X.X.ext|
|00001010| 65 72 6e 20 63 68 61 72 | 20 2a 67 65 74 65 6e 76 |ern char| *getenv|
|00001020| 28 29 3b 0a 58 0a 58 09 | 2f 2a 0a 58 09 20 2a 20 |();.X.X.|/*.X. * |
|00001030| 50 72 6f 63 65 73 73 20 | 63 6f 6d 6d 61 6e 64 20 |Process |command |
|00001040| 6c 69 6e 65 20 61 72 67 | 75 6d 65 6e 74 73 2e 0a |line arg|uments..|
|00001050| 58 09 20 2a 2f 0a 58 09 | 6f 75 74 66 69 6c 65 20 |X. */.X.|outfile |
|00001060| 3d 20 4e 55 4c 4c 3b 0a | 58 09 77 68 69 6c 65 20 |= NULL;.|X.while |
|00001070| 28 2d 2d 61 72 67 63 20 | 3e 20 30 20 26 26 20 2a |(--argc |> 0 && *|
|00001080| 2a 28 2b 2b 61 72 67 76 | 29 20 3d 3d 20 27 2d 27 |*(++argv|) == '-'|
|00001090| 29 0a 58 09 7b 0a 58 09 | 09 73 77 69 74 63 68 20 |).X.{.X.|.switch |
|000010a0| 28 61 72 67 76 5b 30 5d | 5b 31 5d 29 0a 58 09 09 |(argv[0]|[1]).X..|
|000010b0| 7b 0a 58 09 09 63 61 73 | 65 20 27 6f 27 3a 0a 58 |{.X..cas|e 'o':.X|
|000010c0| 09 09 09 6f 75 74 66 69 | 6c 65 20 3d 20 26 61 72 |...outfi|le = &ar|
|000010d0| 67 76 5b 30 5d 5b 32 5d | 3b 0a 58 09 09 09 69 66 |gv[0][2]|;.X...if|
|000010e0| 20 28 2a 6f 75 74 66 69 | 6c 65 20 3d 3d 20 27 5c | (*outfi|le == '\|
|000010f0| 30 27 29 0a 58 09 09 09 | 7b 0a 58 09 09 09 09 69 |0').X...|{.X....i|
|00001100| 66 20 28 2d 2d 61 72 67 | 63 20 3c 3d 20 30 29 0a |f (--arg|c <= 0).|
|00001110| 58 09 09 09 09 09 75 73 | 61 67 65 28 29 3b 0a 58 |X.....us|age();.X|
|00001120| 09 09 09 09 6f 75 74 66 | 69 6c 65 20 3d 20 2a 28 |....outf|ile = *(|
|00001130| 2b 2b 61 72 67 76 29 3b | 0a 58 09 09 09 7d 0a 58 |++argv);|.X...}.X|
|00001140| 09 09 09 62 72 65 61 6b | 3b 0a 58 09 09 64 65 66 |...break|;.X..def|
|00001150| 61 75 6c 74 3a 0a 58 09 | 09 09 75 73 61 67 65 28 |ault:.X.|..usage(|
|00001160| 29 3b 0a 58 09 09 7d 0a | 58 09 7d 0a 58 09 69 66 |);.X..}.|X.}.X.if|
|00001170| 20 28 61 72 67 63 20 3e | 20 31 29 0a 58 09 09 75 | (argc >| 1).X..u|
|00001180| 73 61 67 65 28 29 3b 0a | 58 0a 58 0a 58 09 2f 2a |sage();.|X.X.X./*|
|00001190| 0a 58 09 20 2a 20 4f 70 | 65 6e 20 74 68 65 20 69 |.X. * Op|en the i|
|000011a0| 6e 70 75 74 20 66 69 6c | 65 2c 20 6f 72 20 75 73 |nput fil|e, or us|
|000011b0| 65 20 73 74 61 6e 64 61 | 72 64 20 69 6e 70 75 74 |e standa|rd input|
|000011c0| 20 69 66 20 6e 6f 6e 65 | 20 73 70 65 63 69 66 69 | if none| specifi|
|000011d0| 65 64 2e 0a 58 09 20 2a | 2f 0a 58 09 69 66 20 28 |ed..X. *|/.X.if (|
|000011e0| 61 72 67 63 20 3e 20 30 | 29 0a 58 09 7b 0a 58 09 |argc > 0|).X.{.X.|
|000011f0| 09 69 66 20 28 28 64 65 | 73 63 20 3d 20 66 6f 70 |.if ((de|sc = fop|
|00001200| 65 6e 28 2a 61 72 67 76 | 2c 20 22 72 22 29 29 20 |en(*argv|, "r")) |
|00001210| 3d 3d 20 4e 55 4c 4c 29 | 0a 58 09 09 7b 0a 58 09 |== NULL)|.X..{.X.|
|00001220| 09 09 70 65 72 72 6f 72 | 28 2a 61 72 67 76 29 3b |..perror|(*argv);|
|00001230| 0a 58 09 09 09 65 78 69 | 74 28 31 29 3b 0a 58 09 |.X...exi|t(1);.X.|
|00001240| 09 7d 0a 58 09 7d 20 65 | 6c 73 65 0a 58 09 09 64 |.}.X.} e|lse.X..d|
|00001250| 65 73 63 20 3d 20 73 74 | 64 69 6e 3b 0a 58 0a 58 |esc = st|din;.X.X|
|00001260| 09 2f 2a 0a 58 09 20 2a | 20 52 65 61 64 20 74 68 |./*.X. *| Read th|
|00001270| 65 20 69 6e 70 75 74 20 | 66 69 6c 65 2c 20 6f 6e |e input |file, on|
|00001280| 65 20 6c 69 6e 65 20 61 | 74 20 61 20 74 69 6d 65 |e line a|t a time|
|00001290| 2e 0a 58 09 20 2a 20 45 | 61 63 68 20 6c 69 6e 65 |..X. * E|ach line|
|000012a0| 20 63 6f 6e 73 69 73 74 | 73 20 6f 66 20 61 20 63 | consist|s of a c|
|000012b0| 6f 6d 6d 61 6e 64 20 73 | 74 72 69 6e 67 2c 0a 58 |ommand s|tring,.X|
|000012c0| 09 20 2a 20 66 6f 6c 6c | 6f 77 65 64 20 62 79 20 |. * foll|owed by |
|000012d0| 77 68 69 74 65 20 73 70 | 61 63 65 2c 20 66 6f 6c |white sp|ace, fol|
|000012e0| 6c 6f 77 65 64 20 62 79 | 20 61 6e 20 61 63 74 69 |lowed by| an acti|
|000012f0| 6f 6e 20 6e 61 6d 65 2e | 0a 58 09 20 2a 2f 0a 58 |on name.|.X. */.X|
|00001300| 09 6c 69 6e 65 6e 75 6d | 20 3d 20 30 3b 0a 58 09 |.linenum| = 0;.X.|
|00001310| 65 72 72 6f 72 73 20 3d | 20 30 3b 0a 58 09 75 70 |errors =| 0;.X.up|
|00001320| 20 3d 20 75 73 65 72 74 | 61 62 6c 65 3b 0a 58 09 | = usert|able;.X.|
|00001330| 77 68 69 6c 65 20 28 66 | 67 65 74 73 28 6c 69 6e |while (f|gets(lin|
|00001340| 65 2c 20 73 69 7a 65 6f | 66 28 6c 69 6e 65 29 2c |e, sizeo|f(line),|
|00001350| 20 64 65 73 63 29 20 21 | 3d 20 4e 55 4c 4c 29 0a | desc) !|= NULL).|
|00001360| 58 09 7b 0a 58 09 09 2b | 2b 6c 69 6e 65 6e 75 6d |X.{.X..+|+linenum|
|00001370| 3b 0a 58 0a 58 09 09 2f | 2a 0a 58 09 09 20 2a 20 |;.X.X../|*.X.. * |
|00001380| 53 6b 69 70 20 6c 65 61 | 64 69 6e 67 20 77 68 69 |Skip lea|ding whi|
|00001390| 74 65 20 73 70 61 63 65 | 2e 0a 58 09 09 20 2a 20 |te space|..X.. * |
|000013a0| 52 65 70 6c 61 63 65 20 | 74 68 65 20 66 69 6e 61 |Replace |the fina|
|000013b0| 6c 20 6e 65 77 6c 69 6e | 65 20 77 69 74 68 20 61 |l newlin|e with a|
|000013c0| 20 6e 75 6c 6c 20 62 79 | 74 65 2e 0a 58 09 09 20 | null by|te..X.. |
|000013d0| 2a 20 49 67 6e 6f 72 65 | 20 62 6c 61 6e 6b 20 6c |* Ignore| blank l|
|000013e0| 69 6e 65 73 20 61 6e 64 | 20 63 6f 6d 6d 65 6e 74 |ines and| comment|
|000013f0| 20 6c 69 6e 65 73 2e 0a | 58 09 09 20 2a 2f 0a 58 | lines..|X.. */.X|
|00001400| 09 09 70 20 3d 20 6c 69 | 6e 65 3b 0a 58 09 09 77 |..p = li|ne;.X..w|
|00001410| 68 69 6c 65 20 28 2a 70 | 20 3d 3d 20 27 20 27 20 |hile (*p| == ' ' |
|00001420| 7c 7c 20 2a 70 20 3d 3d | 20 27 5c 74 27 29 0a 58 ||| *p ==| '\t').X|
|00001430| 09 09 09 2b 2b 70 3b 0a | 58 09 09 66 6f 72 20 28 |...++p;.|X..for (|
|00001440| 69 20 3d 20 30 3b 20 20 | 70 5b 69 5d 20 21 3d 20 |i = 0; |p[i] != |
|00001450| 27 5c 6e 27 20 26 26 20 | 70 5b 69 5d 20 21 3d 20 |'\n' && |p[i] != |
|00001460| 27 5c 30 27 3b 20 20 69 | 2b 2b 29 0a 58 09 09 09 |'\0'; i|++).X...|
|00001470| 3b 0a 58 09 09 70 5b 69 | 5d 20 3d 20 27 5c 30 27 |;.X..p[i|] = '\0'|
|00001480| 3b 0a 58 09 09 69 66 20 | 28 2a 70 20 3d 3d 20 27 |;.X..if |(*p == '|
|00001490| 23 27 20 7c 7c 20 2a 70 | 20 3d 3d 20 27 5c 30 27 |#' || *p| == '\0'|
|000014a0| 29 0a 58 09 09 09 63 6f | 6e 74 69 6e 75 65 3b 0a |).X...co|ntinue;.|
|000014b0| 58 0a 58 09 09 2f 2a 0a | 58 09 09 20 2a 20 50 61 |X.X../*.|X.. * Pa|
|000014c0| 72 73 65 20 74 68 65 20 | 63 6f 6d 6d 61 6e 64 20 |rse the |command |
|000014d0| 73 74 72 69 6e 67 20 61 | 6e 64 20 73 74 6f 72 65 |string a|nd store|
|000014e0| 20 69 74 20 69 6e 20 74 | 68 65 20 75 73 65 72 74 | it in t|he usert|
|000014f0| 61 62 6c 65 2e 0a 58 09 | 09 20 2a 2f 0a 58 09 09 |able..X.|. */.X..|
|00001500| 63 75 72 72 63 6d 64 20 | 3d 20 75 70 3b 0a 58 09 |currcmd |= up;.X.|
|00001510| 09 64 6f 0a 58 09 09 7b | 0a 58 09 09 09 69 66 20 |.do.X..{|.X...if |
|00001520| 28 75 70 20 3e 3d 20 75 | 73 65 72 74 61 62 6c 65 |(up >= u|sertable|
|00001530| 20 2b 20 4d 41 58 5f 55 | 53 45 52 43 4d 44 29 0a | + MAX_U|SERCMD).|
|00001540| 58 09 09 09 7b 0a 58 09 | 09 09 09 66 70 72 69 6e |X...{.X.|...fprin|
|00001550| 74 66 28 73 74 64 65 72 | 72 2c 20 22 74 6f 6f 20 |tf(stder|r, "too |
|00001560| 6d 61 6e 79 20 63 6f 6d | 6d 61 6e 64 73 2c 20 6c |many com|mands, l|
|00001570| 69 6e 65 20 25 64 5c 6e | 22 2c 0a 58 09 09 09 09 |ine %d\n|",.X....|
|00001580| 09 6c 69 6e 65 6e 75 6d | 29 3b 0a 58 09 09 09 09 |.linenum|);.X....|
|00001590| 65 78 69 74 28 31 29 3b | 0a 58 09 09 09 7d 0a 58 |exit(1);|.X...}.X|
|000015a0| 09 09 09 69 66 20 28 75 | 70 20 3e 3d 20 63 75 72 |...if (u|p >= cur|
|000015b0| 72 63 6d 64 20 2b 20 4d | 41 58 5f 43 4d 44 4c 45 |rcmd + M|AX_CMDLE|
|000015c0| 4e 29 0a 58 09 09 09 7b | 0a 58 09 09 09 09 66 70 |N).X...{|.X....fp|
|000015d0| 72 69 6e 74 66 28 73 74 | 64 65 72 72 2c 20 22 63 |rintf(st|derr, "c|
|000015e0| 6f 6d 6d 61 6e 64 20 74 | 6f 6f 20 6c 6f 6e 67 20 |ommand t|oo long |
|000015f0| 6f 6e 20 6c 69 6e 65 20 | 25 64 5c 6e 22 2c 0a 58 |on line |%d\n",.X|
|00001600| 09 09 09 09 09 6c 69 6e | 65 6e 75 6d 29 3b 0a 58 |.....lin|enum);.X|
|00001610| 09 09 09 09 65 72 72 6f | 72 73 2b 2b 3b 0a 58 09 |....erro|rs++;.X.|
|00001620| 09 09 09 62 72 65 61 6b | 3b 0a 58 09 09 09 7d 0a |...break|;.X...}.|
|00001630| 58 0a 58 09 09 09 2a 75 | 70 2b 2b 20 3d 20 74 63 |X.X...*u|p++ = tc|
|00001640| 68 61 72 28 26 70 29 3b | 0a 58 0a 58 09 09 7d 20 |har(&p);|.X.X..} |
|00001650| 77 68 69 6c 65 20 28 2a | 70 20 21 3d 20 27 20 27 |while (*|p != ' '|
|00001660| 20 26 26 20 2a 70 20 21 | 3d 20 27 5c 74 27 20 26 | && *p !|= '\t' &|
|00001670| 26 20 2a 70 20 21 3d 20 | 27 5c 30 27 29 3b 0a 58 |& *p != |'\0');.X|
|00001680| 0a 58 09 09 2f 2a 0a 58 | 09 09 20 2a 20 54 65 72 |.X../*.X|.. * Ter|
|00001690| 6d 69 6e 61 74 65 20 74 | 68 65 20 63 6f 6d 6d 61 |minate t|he comma|
|000016a0| 6e 64 20 73 74 72 69 6e | 67 20 77 69 74 68 20 61 |nd strin|g with a|
|000016b0| 20 6e 75 6c 6c 20 62 79 | 74 65 2e 0a 58 09 09 20 | null by|te..X.. |
|000016c0| 2a 2f 0a 58 09 09 2a 75 | 70 2b 2b 20 3d 20 27 5c |*/.X..*u|p++ = '\|
|000016d0| 30 27 3b 0a 58 0a 58 09 | 09 2f 2a 0a 58 09 09 20 |0';.X.X.|./*.X.. |
|000016e0| 2a 20 53 6b 69 70 20 77 | 68 69 74 65 20 73 70 61 |* Skip w|hite spa|
|000016f0| 63 65 20 62 65 74 77 65 | 65 6e 20 74 68 65 20 63 |ce betwe|en the c|
|00001700| 6f 6d 6d 61 6e 64 20 73 | 74 72 69 6e 67 0a 58 09 |ommand s|tring.X.|
|00001710| 09 20 2a 20 61 6e 64 20 | 74 68 65 20 61 63 74 69 |. * and |the acti|
|00001720| 6f 6e 20 6e 61 6d 65 2e | 0a 58 09 09 20 2a 20 54 |on name.|.X.. * T|
|00001730| 65 72 6d 69 6e 61 74 65 | 20 74 68 65 20 61 63 74 |erminate| the act|
|00001740| 69 6f 6e 20 6e 61 6d 65 | 20 77 69 74 68 20 61 20 |ion name| with a |
|00001750| 6e 75 6c 6c 20 62 79 74 | 65 20 69 66 20 69 74 20 |null byt|e if it |
|00001760| 0a 58 09 09 20 2a 20 69 | 73 20 66 6f 6c 6c 6f 77 |.X.. * i|s follow|
|00001770| 65 64 20 62 79 20 77 68 | 69 74 65 73 70 61 63 65 |ed by wh|itespace|
|00001780| 20 6f 72 20 61 20 23 20 | 63 6f 6d 6d 65 6e 74 2e | or a # |comment.|
|00001790| 0a 58 09 09 20 2a 2f 0a | 58 09 09 69 66 20 28 2a |.X.. */.|X..if (*|
|000017a0| 70 20 3d 3d 20 27 5c 30 | 27 29 0a 58 09 09 7b 0a |p == '\0|').X..{.|
|000017b0| 58 09 09 09 66 70 72 69 | 6e 74 66 28 73 74 64 65 |X...fpri|ntf(stde|
|000017c0| 72 72 2c 20 22 6d 69 73 | 73 69 6e 67 20 77 68 69 |rr, "mis|sing whi|
|000017d0| 74 65 73 70 61 63 65 20 | 6f 6e 20 6c 69 6e 65 20 |tespace |on line |
|000017e0| 25 64 5c 6e 22 2c 0a 58 | 09 09 09 09 6c 69 6e 65 |%d\n",.X|....line|
|000017f0| 6e 75 6d 29 3b 0a 58 09 | 09 09 65 72 72 6f 72 73 |num);.X.|..errors|
|00001800| 2b 2b 3b 0a 58 09 09 09 | 63 6f 6e 74 69 6e 75 65 |++;.X...|continue|
|00001810| 3b 0a 58 09 09 7d 0a 58 | 09 09 77 68 69 6c 65 20 |;.X..}.X|..while |
|00001820| 28 2a 70 20 3d 3d 20 27 | 20 27 20 7c 7c 20 2a 70 |(*p == '| ' || *p|
|00001830| 20 3d 3d 20 27 5c 74 27 | 29 0a 58 09 09 09 2b 2b | == '\t'|).X...++|
|00001840| 70 3b 0a 58 09 09 66 6f | 72 20 28 6a 20 3d 20 30 |p;.X..fo|r (j = 0|
|00001850| 3b 20 20 70 5b 6a 5d 20 | 21 3d 20 27 20 27 20 26 |; p[j] |!= ' ' &|
|00001860| 26 20 70 5b 6a 5d 20 21 | 3d 20 27 5c 74 27 20 26 |& p[j] !|= '\t' &|
|00001870| 26 20 0a 58 09 09 09 20 | 20 20 20 20 70 5b 6a 5d |& .X... | p[j]|
|00001880| 20 21 3d 20 27 23 27 20 | 26 26 20 70 5b 6a 5d 20 | != '#' |&& p[j] |
|00001890| 21 3d 20 27 5c 30 27 3b | 20 20 6a 2b 2b 29 0a 58 |!= '\0';| j++).X|
|000018a0| 09 09 09 3b 0a 58 09 09 | 70 5b 6a 5d 20 3d 20 27 |...;.X..|p[j] = '|
|000018b0| 5c 30 27 3b 0a 58 0a 58 | 09 09 2f 2a 0a 58 09 09 |\0';.X.X|../*.X..|
|000018c0| 20 2a 20 50 61 72 73 65 | 20 74 68 65 20 61 63 74 | * Parse| the act|
|000018d0| 69 6f 6e 20 6e 61 6d 65 | 20 61 6e 64 20 73 74 6f |ion name| and sto|
|000018e0| 72 65 20 69 74 20 69 6e | 20 74 68 65 20 75 73 65 |re it in| the use|
|000018f0| 72 74 61 62 6c 65 2e 0a | 58 09 09 20 2a 2f 0a 58 |rtable..|X.. */.X|
|00001900| 09 09 66 6f 72 20 28 69 | 20 3d 20 30 3b 20 20 63 |..for (i| = 0; c|
|00001910| 6d 64 6e 61 6d 65 73 5b | 69 5d 2e 63 6e 5f 6e 61 |mdnames[|i].cn_na|
|00001920| 6d 65 20 21 3d 20 4e 55 | 4c 4c 3b 20 20 69 2b 2b |me != NU|LL; i++|
|00001930| 29 0a 58 09 09 09 69 66 | 20 28 73 74 72 63 6d 70 |).X...if| (strcmp|
|00001940| 28 63 6d 64 6e 61 6d 65 | 73 5b 69 5d 2e 63 6e 5f |(cmdname|s[i].cn_|
|00001950| 6e 61 6d 65 2c 20 70 29 | 20 3d 3d 20 30 29 0a 58 |name, p)| == 0).X|
|00001960| 09 09 09 09 62 72 65 61 | 6b 3b 0a 58 09 09 69 66 |....brea|k;.X..if|
|00001970| 20 28 63 6d 64 6e 61 6d | 65 73 5b 69 5d 2e 63 6e | (cmdnam|es[i].cn|
|00001980| 5f 6e 61 6d 65 20 3d 3d | 20 4e 55 4c 4c 29 0a 58 |_name ==| NULL).X|
|00001990| 09 09 7b 0a 58 09 09 09 | 66 70 72 69 6e 74 66 28 |..{.X...|fprintf(|
|000019a0| 73 74 64 65 72 72 2c 20 | 22 75 6e 6b 6e 6f 77 6e |stderr, |"unknown|
|000019b0| 20 61 63 74 69 6f 6e 20 | 3c 25 73 3e 20 6f 6e 20 | action |<%s> on |
|000019c0| 6c 69 6e 65 20 25 64 5c | 6e 22 2c 0a 58 09 09 09 |line %d\|n",.X...|
|000019d0| 09 70 2c 20 6c 69 6e 65 | 6e 75 6d 29 3b 0a 58 09 |.p, line|num);.X.|
|000019e0| 09 09 65 72 72 6f 72 73 | 2b 2b 3b 0a 58 09 09 09 |..errors|++;.X...|
|000019f0| 63 6f 6e 74 69 6e 75 65 | 3b 0a 58 09 09 7d 0a 58 |continue|;.X..}.X|
|00001a00| 09 09 2a 75 70 2b 2b 20 | 3d 20 63 6d 64 6e 61 6d |..*up++ |= cmdnam|
|00001a10| 65 73 5b 69 5d 2e 63 6e | 5f 61 63 74 69 6f 6e 3b |es[i].cn|_action;|
|00001a20| 0a 58 0a 58 09 09 2f 2a | 0a 58 09 09 20 2a 20 53 |.X.X../*|.X.. * S|
|00001a30| 65 65 20 69 66 20 61 6e | 20 65 78 74 72 61 20 73 |ee if an| extra s|
|00001a40| 74 72 69 6e 67 20 66 6f | 6c 6c 6f 77 73 20 74 68 |tring fo|llows th|
|00001a50| 65 20 61 63 74 69 6f 6e | 20 6e 61 6d 65 2e 0a 58 |e action| name..X|
|00001a60| 09 09 20 2a 2f 0a 58 09 | 09 66 6f 72 20 28 6a 20 |.. */.X.|.for (j |
|00001a70| 3d 20 6a 2b 31 3b 20 20 | 70 5b 6a 5d 20 3d 3d 20 |= j+1; |p[j] == |
|00001a80| 27 20 27 20 7c 7c 20 70 | 5b 6a 5d 20 3d 3d 20 27 |' ' || p|[j] == '|
|00001a90| 5c 74 27 3b 20 20 6a 2b | 2b 29 0a 58 09 09 09 3b |\t'; j+|+).X...;|
|00001aa0| 0a 58 09 09 70 20 2b 3d | 20 6a 3b 0a 58 09 09 69 |.X..p +=| j;.X..i|
|00001ab0| 66 20 28 2a 70 20 21 3d | 20 27 5c 30 27 29 0a 58 |f (*p !=| '\0').X|
|00001ac0| 09 09 7b 0a 58 09 09 09 | 2f 2a 0a 58 09 09 09 20 |..{.X...|/*.X... |
|00001ad0| 2a 20 4f 52 20 74 68 65 | 20 73 70 65 63 69 61 6c |* OR the| special|
|00001ae0| 20 76 61 6c 75 65 20 41 | 5f 45 58 54 52 41 20 69 | value A|_EXTRA i|
|00001af0| 6e 74 6f 20 74 68 65 20 | 61 63 74 69 6f 6e 20 62 |nto the |action b|
|00001b00| 79 74 65 2e 0a 58 09 09 | 09 20 2a 20 50 75 74 20 |yte..X..|. * Put |
|00001b10| 74 68 65 20 65 78 74 72 | 61 20 73 74 72 69 6e 67 |the extr|a string|
|00001b20| 20 61 66 74 65 72 20 74 | 68 65 20 61 63 74 69 6f | after t|he actio|
|00001b30| 6e 20 62 79 74 65 2e 0a | 58 09 09 09 20 2a 2f 0a |n byte..|X... */.|
|00001b40| 58 09 09 09 75 70 5b 2d | 31 5d 20 7c 3d 20 41 5f |X...up[-|1] |= A_|
|00001b50| 45 58 54 52 41 3b 0a 58 | 09 09 09 77 68 69 6c 65 |EXTRA;.X|...while|
|00001b60| 20 28 2a 70 20 21 3d 20 | 27 5c 30 27 29 0a 58 09 | (*p != |'\0').X.|
|00001b70| 09 09 09 2a 75 70 2b 2b | 20 3d 20 74 63 68 61 72 |...*up++| = tchar|
|00001b80| 28 26 70 29 3b 0a 58 09 | 09 09 2a 75 70 2b 2b 20 |(&p);.X.|..*up++ |
|00001b90| 3d 20 27 5c 30 27 3b 0a | 58 09 09 7d 0a 58 09 7d |= '\0';.|X..}.X.}|
|00001ba0| 0a 58 0a 58 09 69 66 20 | 28 65 72 72 6f 72 73 20 |.X.X.if |(errors |
|00001bb0| 3e 20 30 29 0a 58 09 7b | 0a 58 09 09 66 70 72 69 |> 0).X.{|.X..fpri|
|00001bc0| 6e 74 66 28 73 74 64 65 | 72 72 2c 20 22 25 64 20 |ntf(stde|rr, "%d |
|00001bd0| 65 72 72 6f 72 73 3b 20 | 6e 6f 20 6f 75 74 70 75 |errors; |no outpu|
|00001be0| 74 20 70 72 6f 64 75 63 | 65 64 5c 6e 22 2c 20 65 |t produc|ed\n", e|
|00001bf0| 72 72 6f 72 73 29 3b 0a | 58 09 09 65 78 69 74 28 |rrors);.|X..exit(|
|00001c00| 31 29 3b 0a 58 09 7d 0a | 58 0a 58 09 2f 2a 0a 58 |1);.X.}.|X.X./*.X|
|00001c10| 09 20 2a 20 57 72 69 74 | 65 20 74 68 65 20 6f 75 |. * Writ|e the ou|
|00001c20| 74 70 75 74 20 66 69 6c | 65 2e 0a 58 09 20 2a 20 |tput fil|e..X. * |
|00001c30| 49 66 20 6e 6f 20 6f 75 | 74 70 75 74 20 66 69 6c |If no ou|tput fil|
|00001c40| 65 20 77 61 73 20 73 70 | 65 63 69 66 69 65 64 2c |e was sp|ecified,|
|00001c50| 20 75 73 65 20 22 24 48 | 4f 4d 45 2f 2e 6c 65 73 | use "$H|OME/.les|
|00001c60| 73 22 0a 58 09 20 2a 2f | 0a 58 09 69 66 20 28 6f |s".X. */|.X.if (o|
|00001c70| 75 74 66 69 6c 65 20 3d | 3d 20 4e 55 4c 4c 29 0a |utfile =|= NULL).|
|00001c80| 58 09 7b 0a 58 09 09 70 | 20 3d 20 67 65 74 65 6e |X.{.X..p| = geten|
|00001c90| 76 28 22 48 4f 4d 45 22 | 29 3b 0a 58 09 09 69 66 |v("HOME"|);.X..if|
|00001ca0| 20 28 70 20 3d 3d 20 4e | 55 4c 4c 20 7c 7c 20 2a | (p == N|ULL || *|
|00001cb0| 70 20 3d 3d 20 27 5c 30 | 27 29 0a 58 09 09 7b 0a |p == '\0|').X..{.|
|00001cc0| 58 09 09 09 66 70 72 69 | 6e 74 66 28 73 74 64 65 |X...fpri|ntf(stde|
|00001cd0| 72 72 2c 20 22 63 61 6e | 6e 6f 74 20 66 69 6e 64 |rr, "can|not find|
|00001ce0| 20 24 48 4f 4d 45 20 2d | 20 75 73 69 6e 67 20 63 | $HOME -| using c|
|00001cf0| 75 72 72 65 6e 74 20 64 | 69 72 65 63 74 6f 72 79 |urrent d|irectory|
|00001d00| 5c 6e 22 29 3b 0a 58 23 | 69 66 20 5f 5f 4d 53 44 |\n");.X#|if __MSD|
|00001d10| 4f 53 5f 5f 0a 58 09 09 | 09 73 74 72 63 70 79 28 |OS__.X..|.strcpy(|
|00001d20| 6c 69 6e 65 2c 20 22 5f | 6c 65 73 73 22 29 3b 0a |line, "_|less");.|
|00001d30| 58 23 65 6c 73 65 0a 58 | 09 09 09 73 74 72 63 70 |X#else.X|...strcp|
|00001d40| 79 28 6c 69 6e 65 2c 20 | 22 2e 6c 65 73 73 22 29 |y(line, |".less")|
|00001d50| 3b 0a 58 23 65 6e 64 69 | 66 0a 58 09 09 7d 20 65 |;.X#endi|f.X..} e|
|00001d60| 6c 73 65 0a 58 09 09 7b | 0a 58 09 09 09 73 74 72 |lse.X..{|.X...str|
|00001d70| 63 70 79 28 6c 69 6e 65 | 2c 20 70 29 3b 0a 58 23 |cpy(line|, p);.X#|
|00001d80| 69 66 20 5f 5f 4d 53 44 | 4f 53 5f 5f 0a 58 09 09 |if __MSD|OS__.X..|
|00001d90| 09 73 74 72 63 61 74 28 | 6c 69 6e 65 2c 20 22 5c |.strcat(|line, "\|
|00001da0| 5c 5f 6c 65 73 73 22 29 | 3b 0a 58 23 65 6c 73 65 |\_less")|;.X#else|
|00001db0| 0a 58 09 09 09 73 74 72 | 63 61 74 28 6c 69 6e 65 |.X...str|cat(line|
|00001dc0| 2c 20 22 2f 2e 6c 65 73 | 73 22 29 3b 0a 58 23 65 |, "/.les|s");.X#e|
|00001dd0| 6e 64 69 66 0a 58 09 09 | 7d 0a 58 09 09 6f 75 74 |ndif.X..|}.X..out|
|00001de0| 66 69 6c 65 20 3d 20 6c | 69 6e 65 3b 0a 58 09 7d |file = l|ine;.X.}|
|00001df0| 0a 58 09 69 66 20 28 28 | 6f 75 74 20 3d 20 66 6f |.X.if ((|out = fo|
|00001e00| 70 65 6e 28 6f 75 74 66 | 69 6c 65 2c 20 22 77 22 |pen(outf|ile, "w"|
|00001e10| 29 29 20 3d 3d 20 4e 55 | 4c 4c 29 0a 58 09 09 70 |)) == NU|LL).X..p|
|00001e20| 65 72 72 6f 72 28 6f 75 | 74 66 69 6c 65 29 3b 0a |error(ou|tfile);.|
|00001e30| 58 09 65 6c 73 65 0a 58 | 09 09 66 77 72 69 74 65 |X.else.X|..fwrite|
|00001e40| 28 28 63 68 61 72 20 2a | 29 75 73 65 72 74 61 62 |((char *|)usertab|
|00001e50| 6c 65 2c 20 31 2c 20 75 | 70 2d 75 73 65 72 74 61 |le, 1, u|p-userta|
|00001e60| 62 6c 65 2c 20 6f 75 74 | 29 3b 0a 58 7d 0a 58 0a |ble, out|);.X}.X.|
|00001e70| 58 2f 2a 0a 58 20 2a 20 | 50 61 72 73 65 20 6f 6e |X/*.X * |Parse on|
|00001e80| 65 20 63 68 61 72 61 63 | 74 65 72 20 6f 66 20 61 |e charac|ter of a|
|00001e90| 20 73 74 72 69 6e 67 2e | 0a 58 20 2a 2f 0a 58 74 | string.|.X */.Xt|
|00001ea0| 63 68 61 72 28 70 70 29 | 0a 58 09 63 68 61 72 20 |char(pp)|.X.char |
|00001eb0| 2a 2a 70 70 3b 0a 58 7b | 0a 58 09 72 65 67 69 73 |**pp;.X{|.X.regis|
|00001ec0| 74 65 72 20 63 68 61 72 | 20 2a 70 3b 0a 58 09 72 |ter char| *p;.X.r|
|00001ed0| 65 67 69 73 74 65 72 20 | 63 68 61 72 20 63 68 3b |egister |char ch;|
|00001ee0| 0a 58 09 72 65 67 69 73 | 74 65 72 20 69 6e 74 20 |.X.regis|ter int |
|00001ef0| 69 3b 0a 58 0a 58 09 70 | 20 3d 20 2a 70 70 3b 0a |i;.X.X.p| = *pp;.|
|00001f00| 58 09 73 77 69 74 63 68 | 20 28 2a 70 29 0a 58 09 |X.switch| (*p).X.|
|00001f10| 7b 0a 58 09 63 61 73 65 | 20 27 5c 5c 27 3a 0a 58 |{.X.case| '\\':.X|
|00001f20| 09 09 69 66 20 28 2a 2b | 2b 70 20 3e 3d 20 27 30 |..if (*+|+p >= '0|
|00001f30| 27 20 26 26 20 2a 70 20 | 3c 3d 20 27 37 27 29 0a |' && *p |<= '7').|
|00001f40| 58 09 09 7b 0a 58 09 09 | 09 2f 2a 0a 58 09 09 09 |X..{.X..|./*.X...|
|00001f50| 20 2a 20 50 61 72 73 65 | 20 61 6e 20 6f 63 74 61 | * Parse| an octa|
|00001f60| 6c 20 6e 75 6d 62 65 72 | 2e 0a 58 09 09 09 20 2a |l number|..X... *|
|00001f70| 2f 0a 58 09 09 09 63 68 | 20 3d 20 30 3b 0a 58 09 |/.X...ch| = 0;.X.|
|00001f80| 09 09 69 20 3d 20 30 3b | 0a 58 09 09 09 64 6f 0a |..i = 0;|.X...do.|
|00001f90| 58 09 09 09 09 63 68 20 | 3d 20 38 2a 63 68 20 2b |X....ch |= 8*ch +|
|00001fa0| 20 28 2a 70 20 2d 20 27 | 30 27 29 3b 0a 58 09 09 | (*p - '|0');.X..|
|00001fb0| 09 77 68 69 6c 65 20 28 | 2a 2b 2b 70 20 3e 3d 20 |.while (|*++p >= |
|00001fc0| 27 30 27 20 26 26 20 2a | 70 20 3c 3d 20 27 37 27 |'0' && *|p <= '7'|
|00001fd0| 20 26 26 20 2b 2b 69 20 | 3c 20 33 29 3b 0a 58 09 | && ++i |< 3);.X.|
|00001fe0| 09 09 2a 70 70 20 3d 20 | 70 3b 0a 58 09 09 09 72 |..*pp = |p;.X...r|
|00001ff0| 65 74 75 72 6e 20 28 63 | 68 29 3b 0a 58 09 09 7d |eturn (c|h);.X..}|
|00002000| 0a 58 09 09 2f 2a 0a 58 | 09 09 20 2a 20 42 61 63 |.X../*.X|.. * Bac|
|00002010| 6b 73 6c 61 73 68 20 66 | 6f 6c 6c 6f 77 65 64 20 |kslash f|ollowed |
|00002020| 62 79 20 61 20 63 68 61 | 72 20 6a 75 73 74 20 6d |by a cha|r just m|
|00002030| 65 61 6e 73 20 74 68 61 | 74 20 63 68 61 72 2e 0a |eans tha|t char..|
|00002040| 58 09 09 20 2a 2f 0a 58 | 09 09 2a 70 70 20 3d 20 |X.. */.X|..*pp = |
|00002050| 70 2b 31 3b 0a 58 09 09 | 72 65 74 75 72 6e 20 28 |p+1;.X..|return (|
|00002060| 2a 70 29 3b 0a 58 09 63 | 61 73 65 20 27 5e 27 3a |*p);.X.c|ase '^':|
|00002070| 0a 58 09 09 2f 2a 0a 58 | 09 09 20 2a 20 43 61 72 |.X../*.X|.. * Car|
|00002080| 61 74 20 6d 65 61 6e 73 | 20 43 4f 4e 54 52 4f 4c |at means| CONTROL|
|00002090| 2e 0a 58 09 09 20 2a 2f | 0a 58 09 09 2a 70 70 20 |..X.. */|.X..*pp |
|000020a0| 3d 20 70 2b 32 3b 0a 58 | 09 09 72 65 74 75 72 6e |= p+2;.X|..return|
|000020b0| 20 28 43 4f 4e 54 52 4f | 4c 28 70 5b 31 5d 29 29 | (CONTRO|L(p[1]))|
|000020c0| 3b 0a 58 09 7d 0a 58 09 | 2a 70 70 20 3d 20 70 2b |;.X.}.X.|*pp = p+|
|000020d0| 31 3b 0a 58 09 72 65 74 | 75 72 6e 20 28 2a 70 29 |1;.X.ret|urn (*p)|
|000020e0| 3b 0a 58 7d 0a 58 0a 58 | 75 73 61 67 65 28 29 0a |;.X}.X.X|usage().|
|000020f0| 58 7b 0a 58 09 66 70 72 | 69 6e 74 66 28 73 74 64 |X{.X.fpr|intf(std|
|00002100| 65 72 72 2c 20 22 75 73 | 61 67 65 3a 20 6c 65 73 |err, "us|age: les|
|00002110| 73 6b 65 79 20 5b 2d 6f | 20 6f 75 74 70 75 74 5d |skey [-o| output]|
|00002120| 20 5b 69 6e 70 75 74 5d | 5c 6e 22 29 3b 0a 58 09 | [input]|\n");.X.|
|00002130| 65 78 69 74 28 31 29 3b | 0a 58 7d 0a 45 4e 44 5f |exit(1);|.X}.END_|
|00002140| 4f 46 5f 46 49 4c 45 0a | 65 63 68 6f 20 73 68 61 |OF_FILE.|echo sha|
|00002150| 72 3a 20 45 78 74 72 61 | 63 74 69 6e 67 20 5c 22 |r: Extra|cting \"|
|00002160| 63 68 2e 63 5c 22 0a 73 | 65 64 20 22 73 2f 5e 58 |ch.c\".s|ed "s/^X|
|00002170| 2f 2f 22 20 3e 27 63 68 | 2e 63 27 20 3c 3c 27 45 |//" >'ch|.c' <<'E|
|00002180| 4e 44 5f 4f 46 5f 46 49 | 4c 45 27 0a 58 2f 2a 0a |ND_OF_FI|LE'.X/*.|
|00002190| 58 20 2a 20 4c 6f 77 20 | 6c 65 76 65 6c 20 63 68 |X * Low |level ch|
|000021a0| 61 72 61 63 74 65 72 20 | 69 6e 70 75 74 20 66 72 |aracter |input fr|
|000021b0| 6f 6d 20 74 68 65 20 69 | 6e 70 75 74 20 66 69 6c |om the i|nput fil|
|000021c0| 65 2e 0a 58 20 2a 20 57 | 65 20 75 73 65 20 74 68 |e..X * W|e use th|
|000021d0| 65 73 65 20 73 70 65 63 | 69 61 6c 20 70 75 72 70 |ese spec|ial purp|
|000021e0| 6f 73 65 20 72 6f 75 74 | 69 6e 65 73 20 77 68 69 |ose rout|ines whi|
|000021f0| 63 68 20 6f 70 74 69 6d | 69 7a 65 20 6d 6f 76 69 |ch optim|ize movi|
|00002200| 6e 67 0a 58 20 2a 20 62 | 6f 74 68 20 66 6f 72 77 |ng.X * b|oth forw|
|00002210| 61 72 64 20 61 6e 64 20 | 62 61 63 6b 77 61 72 64 |ard and |backward|
|00002220| 20 66 72 6f 6d 20 74 68 | 65 20 63 75 72 72 65 6e | from th|e curren|
|00002230| 74 20 72 65 61 64 20 70 | 6f 69 6e 74 65 72 2e 0a |t read p|ointer..|
|00002240| 58 20 2a 2f 0a 58 0a 58 | 23 69 6e 63 6c 75 64 65 |X */.X.X|#include|
|00002250| 20 22 6c 65 73 73 2e 68 | 22 0a 58 0a 58 70 75 62 | "less.h|".X.Xpub|
|00002260| 6c 69 63 20 69 6e 74 20 | 66 69 6c 65 20 3d 20 2d |lic int |file = -|
|00002270| 31 3b 09 09 2f 2a 20 46 | 69 6c 65 20 64 65 73 63 |1;../* F|ile desc|
|00002280| 72 69 70 74 6f 72 20 6f | 66 20 74 68 65 20 69 6e |riptor o|f the in|
|00002290| 70 75 74 20 66 69 6c 65 | 20 2a 2f 0a 58 70 75 62 |put file| */.Xpub|
|000022a0| 6c 69 63 20 69 6e 74 20 | 69 67 6e 6f 72 65 5f 65 |lic int |ignore_e|
|000022b0| 6f 69 3b 0a 58 0a 58 2f | 2a 0a 58 20 2a 20 50 6f |oi;.X.X/|*.X * Po|
|000022c0| 6f 6c 20 6f 66 20 62 75 | 66 66 65 72 73 20 68 6f |ol of bu|ffers ho|
|000022d0| 6c 64 69 6e 67 20 74 68 | 65 20 6d 6f 73 74 20 72 |lding th|e most r|
|000022e0| 65 63 65 6e 74 6c 79 20 | 75 73 65 64 20 62 6c 6f |ecently |used blo|
|000022f0| 63 6b 73 20 6f 66 20 74 | 68 65 20 69 6e 70 75 74 |cks of t|he input|
|00002300| 20 66 69 6c 65 2e 0a 58 | 20 2a 2f 0a 58 23 64 65 | file..X| */.X#de|
|00002310| 66 69 6e 65 20 42 55 46 | 53 49 5a 09 31 30 32 34 |fine BUF|SIZ.1024|
|00002320| 0a 58 73 74 72 75 63 74 | 20 62 75 66 20 7b 0a 58 |.Xstruct| buf {.X|
|00002330| 09 73 74 72 75 63 74 20 | 62 75 66 20 2a 6e 65 78 |.struct |buf *nex|
|00002340| 74 2c 20 2a 70 72 65 76 | 3b 20 20 2f 2a 20 4d 75 |t, *prev|; /* Mu|
|00002350| 73 74 20 62 65 20 66 69 | 72 73 74 20 74 6f 20 6d |st be fi|rst to m|
|00002360| 61 74 63 68 20 73 74 72 | 75 63 74 20 66 69 6c 65 |atch str|uct file|
|00002370| 73 74 61 74 65 20 2a 2f | 0a 58 09 6c 6f 6e 67 20 |state */|.X.long |
|00002380| 62 6c 6f 63 6b 3b 0a 58 | 09 75 6e 73 69 67 6e 65 |block;.X|.unsigne|
|00002390| 64 20 69 6e 74 20 64 61 | 74 61 73 69 7a 65 3b 0a |d int da|tasize;.|
|000023a0| 58 09 75 6e 73 69 67 6e | 65 64 20 63 68 61 72 20 |X.unsign|ed char |
|000023b0| 64 61 74 61 5b 42 55 46 | 53 49 5a 5d 3b 0a 58 7d |data[BUF|SIZ];.X}|
|000023c0| 3b 0a 58 0a 58 2f 2a 0a | 58 20 2a 20 54 68 65 20 |;.X.X/*.|X * The |
|000023d0| 62 75 66 66 65 72 20 70 | 6f 6f 6c 20 69 73 20 6b |buffer p|ool is k|
|000023e0| 65 70 74 20 61 73 20 61 | 20 64 6f 75 62 6c 79 2d |ept as a| doubly-|
|000023f0| 6c 69 6e 6b 65 64 20 63 | 69 72 63 75 6c 61 72 20 |linked c|ircular |
|00002400| 6c 69 73 74 2c 0a 58 20 | 2a 20 69 6e 20 6f 72 64 |list,.X |* in ord|
|00002410| 65 72 20 66 72 6f 6d 20 | 6d 6f 73 74 2d 20 74 6f |er from |most- to|
|00002420| 20 6c 65 61 73 74 2d 72 | 65 63 65 6e 74 6c 79 20 | least-r|ecently |
|00002430| 75 73 65 64 2e 0a 58 20 | 2a 20 54 68 65 20 63 69 |used..X |* The ci|
|00002440| 72 63 75 6c 61 72 20 6c | 69 73 74 20 69 73 20 61 |rcular l|ist is a|
|00002450| 6e 63 68 6f 72 65 64 20 | 62 79 20 74 68 65 20 66 |nchored |by the f|
|00002460| 69 6c 65 20 73 74 61 74 | 65 20 22 74 68 69 73 66 |ile stat|e "thisf|
|00002470| 69 6c 65 22 2e 0a 58 20 | 2a 0a 58 20 2a 20 54 68 |ile"..X |*.X * Th|
|00002480| 65 20 66 69 6c 65 20 73 | 74 61 74 65 20 69 73 20 |e file s|tate is |
|00002490| 6d 61 69 6e 74 61 69 6e | 65 64 20 69 6e 20 61 20 |maintain|ed in a |
|000024a0| 66 69 6c 65 73 74 61 74 | 65 20 73 74 72 75 63 74 |filestat|e struct|
|000024b0| 75 72 65 2e 0a 58 20 2a | 20 54 68 65 72 65 20 61 |ure..X *| There a|
|000024c0| 72 65 20 74 77 6f 20 73 | 75 63 68 20 73 74 72 75 |re two s|uch stru|
|000024d0| 63 74 75 72 65 73 2c 20 | 6f 6e 65 20 75 73 65 64 |ctures, |one used|
|000024e0| 20 77 68 65 6e 20 69 6e | 70 75 74 20 69 73 20 61 | when in|put is a|
|000024f0| 20 70 69 70 65 0a 58 20 | 2a 20 61 6e 64 20 74 68 | pipe.X |* and th|
|00002500| 65 20 6f 74 68 65 72 20 | 77 68 65 6e 20 69 6e 70 |e other |when inp|
|00002510| 75 74 20 69 73 20 61 6e | 20 6f 72 64 69 6e 61 72 |ut is an| ordinar|
|00002520| 79 20 66 69 6c 65 2e 0a | 58 20 2a 20 54 68 69 73 |y file..|X * This|
|00002530| 20 69 73 20 73 6f 20 74 | 68 61 74 20 77 65 20 63 | is so t|hat we c|
|00002540| 61 6e 20 6c 65 61 76 65 | 20 61 20 70 69 70 65 2c |an leave| a pipe,|
|00002550| 20 6c 6f 6f 6b 20 61 6e | 64 20 6f 74 68 65 72 20 | look an|d other |
|00002560| 66 69 6c 65 73 2c 0a 58 | 20 2a 20 61 6e 64 20 72 |files,.X| * and r|
|00002570| 65 74 75 72 6e 20 74 6f | 20 74 68 65 20 70 69 70 |eturn to| the pip|
|00002580| 65 20 77 69 74 68 6f 75 | 74 20 6c 6f 73 69 6e 67 |e withou|t losing|
|00002590| 20 62 75 66 66 65 72 65 | 64 20 64 61 74 61 2e 0a | buffere|d data..|
|000025a0| 58 20 2a 20 42 75 66 66 | 65 72 65 64 20 64 61 74 |X * Buff|ered dat|
|000025b0| 61 20 63 61 6e 20 62 65 | 20 72 65 63 6f 6e 73 74 |a can be| reconst|
|000025c0| 72 75 63 74 65 64 20 66 | 6f 72 20 61 20 6e 6f 6e |ructed f|or a non|
|000025d0| 2d 70 69 70 65 20 66 69 | 6c 65 20 62 79 0a 58 20 |-pipe fi|le by.X |
|000025e0| 2a 20 73 69 6d 70 6c 79 | 20 72 65 2d 72 65 61 64 |* simply| re-read|
|000025f0| 69 6e 67 20 74 68 65 20 | 66 69 6c 65 2c 20 62 75 |ing the |file, bu|
|00002600| 74 20 61 20 70 69 70 65 | 20 63 61 6e 6e 6f 74 20 |t a pipe| cannot |
|00002610| 62 65 20 72 65 2d 72 65 | 61 64 2e 0a 58 20 2a 2f |be re-re|ad..X */|
|00002620| 0a 58 0a 58 73 74 61 74 | 69 63 20 73 74 72 75 63 |.X.Xstat|ic struc|
|00002630| 74 20 66 69 6c 65 73 74 | 61 74 65 20 7b 0a 58 09 |t filest|ate {.X.|
|00002640| 73 74 72 75 63 74 20 62 | 75 66 20 2a 6e 65 78 74 |struct b|uf *next|
|00002650| 2c 20 2a 70 72 65 76 3b | 20 20 20 2f 2a 20 4d 75 |, *prev;| /* Mu|
|00002660| 73 74 20 62 65 20 66 69 | 72 73 74 20 74 6f 20 6d |st be fi|rst to m|
|00002670| 61 74 63 68 20 73 74 72 | 75 63 74 20 62 75 66 20 |atch str|uct buf |
|00002680| 2a 2f 0a 58 09 50 4f 53 | 49 54 49 4f 4e 20 66 70 |*/.X.POS|ITION fp|
|00002690| 6f 73 3b 0a 58 09 69 6e | 74 20 6e 62 75 66 73 3b |os;.X.in|t nbufs;|
|000026a0| 0a 58 09 6c 6f 6e 67 20 | 62 6c 6f 63 6b 3b 0a 58 |.X.long |block;.X|
|000026b0| 09 69 6e 74 20 6f 66 66 | 73 65 74 3b 0a 58 09 50 |.int off|set;.X.P|
|000026c0| 4f 53 49 54 49 4f 4e 20 | 66 73 69 7a 65 3b 0a 58 |OSITION |fsize;.X|
|000026d0| 7d 3b 0a 58 0a 58 23 64 | 65 66 69 6e 65 09 45 4e |};.X.X#d|efine.EN|
|000026e0| 44 5f 4f 46 5f 43 48 41 | 49 4e 09 28 28 73 74 72 |D_OF_CHA|IN.((str|
|000026f0| 75 63 74 20 62 75 66 20 | 2a 29 74 68 69 73 66 69 |uct buf |*)thisfi|
|00002700| 6c 65 29 0a 58 23 64 65 | 66 69 6e 65 09 62 75 66 |le).X#de|fine.buf|
|00002710| 5f 68 65 61 64 09 74 68 | 69 73 66 69 6c 65 2d 3e |_head.th|isfile->|
|00002720| 6e 65 78 74 0a 58 23 64 | 65 66 69 6e 65 09 62 75 |next.X#d|efine.bu|
|00002730| 66 5f 74 61 69 6c 09 74 | 68 69 73 66 69 6c 65 2d |f_tail.t|hisfile-|
|00002740| 3e 70 72 65 76 0a 58 23 | 64 65 66 69 6e 65 09 63 |>prev.X#|define.c|
|00002750| 68 5f 6e 62 75 66 73 09 | 74 68 69 73 66 69 6c 65 |h_nbufs.|thisfile|
|00002760| 2d 3e 6e 62 75 66 73 0a | 58 23 64 65 66 69 6e 65 |->nbufs.|X#define|
|00002770| 09 63 68 5f 62 6c 6f 63 | 6b 09 74 68 69 73 66 69 |.ch_bloc|k.thisfi|
|00002780| 6c 65 2d 3e 62 6c 6f 63 | 6b 0a 58 23 64 65 66 69 |le->bloc|k.X#defi|
|00002790| 6e 65 09 63 68 5f 6f 66 | 66 73 65 74 09 74 68 69 |ne.ch_of|fset.thi|
|000027a0| 73 66 69 6c 65 2d 3e 6f | 66 66 73 65 74 0a 58 23 |sfile->o|ffset.X#|
|000027b0| 64 65 66 69 6e 65 09 63 | 68 5f 66 70 6f 73 09 09 |define.c|h_fpos..|
|000027c0| 74 68 69 73 66 69 6c 65 | 2d 3e 66 70 6f 73 0a 58 |thisfile|->fpos.X|
|000027d0| 23 64 65 66 69 6e 65 09 | 63 68 5f 66 73 69 7a 65 |#define.|ch_fsize|
|000027e0| 09 74 68 69 73 66 69 6c | 65 2d 3e 66 73 69 7a 65 |.thisfil|e->fsize|
|000027f0| 0a 58 0a 58 73 74 61 74 | 69 63 20 73 74 72 75 63 |.X.Xstat|ic struc|
|00002800| 74 20 66 69 6c 65 73 74 | 61 74 65 20 70 69 70 65 |t filest|ate pipe|
|00002810| 66 69 6c 65 20 3d 0a 58 | 09 7b 20 28 73 74 72 75 |file =.X|.{ (stru|
|00002820| 63 74 20 62 75 66 20 2a | 29 26 70 69 70 65 66 69 |ct buf *|)&pipefi|
|00002830| 6c 65 2c 20 28 73 74 72 | 75 63 74 20 62 75 66 20 |le, (str|uct buf |
|00002840| 2a 29 26 70 69 70 65 66 | 69 6c 65 20 7d 3b 0a 58 |*)&pipef|ile };.X|
|00002850| 0a 58 73 74 61 74 69 63 | 20 73 74 72 75 63 74 20 |.Xstatic| struct |
|00002860| 66 69 6c 65 73 74 61 74 | 65 20 6e 6f 6e 70 69 70 |filestat|e nonpip|
|00002870| 65 66 69 6c 65 20 3d 20 | 0a 58 09 7b 20 28 73 74 |efile = |.X.{ (st|
|00002880| 72 75 63 74 20 62 75 66 | 20 2a 29 26 6e 6f 6e 70 |ruct buf| *)&nonp|
|00002890| 69 70 65 66 69 6c 65 2c | 20 28 73 74 72 75 63 74 |ipefile,| (struct|
|000028a0| 20 62 75 66 20 2a 29 26 | 6e 6f 6e 70 69 70 65 66 | buf *)&|nonpipef|
|000028b0| 69 6c 65 20 7d 3b 0a 58 | 0a 58 73 74 61 74 69 63 |ile };.X|.Xstatic|
|000028c0| 20 73 74 72 75 63 74 20 | 66 69 6c 65 73 74 61 74 | struct |filestat|
|000028d0| 65 20 2a 74 68 69 73 66 | 69 6c 65 3b 0a 58 0a 58 |e *thisf|ile;.X.X|
|000028e0| 65 78 74 65 72 6e 20 69 | 6e 74 20 69 73 70 69 70 |extern i|nt ispip|
|000028f0| 65 3b 0a 58 65 78 74 65 | 72 6e 20 69 6e 74 20 61 |e;.Xexte|rn int a|
|00002900| 75 74 6f 62 75 66 3b 0a | 58 65 78 74 65 72 6e 20 |utobuf;.|Xextern |
|00002910| 69 6e 74 20 73 69 67 73 | 3b 0a 58 23 69 66 20 4c |int sigs|;.X#if L|
|00002920| 4f 47 46 49 4c 45 0a 58 | 65 78 74 65 72 6e 20 69 |OGFILE.X|extern i|
|00002930| 6e 74 20 6c 6f 67 66 69 | 6c 65 3b 0a 58 23 65 6e |nt logfi|le;.X#en|
|00002940| 64 69 66 0a 58 0a 58 73 | 74 61 74 69 63 20 69 6e |dif.X.Xs|tatic in|
|00002950| 74 20 63 68 5f 61 64 64 | 62 75 66 28 29 3b 0a 58 |t ch_add|buf();.X|
|00002960| 0a 58 0a 58 2f 2a 0a 58 | 20 2a 20 47 65 74 20 74 |.X.X/*.X| * Get t|
|00002970| 68 65 20 63 68 61 72 61 | 63 74 65 72 20 70 6f 69 |he chara|cter poi|
|00002980| 6e 74 65 64 20 74 6f 20 | 62 79 20 74 68 65 20 72 |nted to |by the r|
|00002990| 65 61 64 20 70 6f 69 6e | 74 65 72 2e 0a 58 20 2a |ead poin|ter..X *|
|000029a0| 20 63 68 5f 67 65 74 28 | 29 20 69 73 20 61 20 6d | ch_get(|) is a m|
|000029b0| 61 63 72 6f 20 77 68 69 | 63 68 20 69 73 20 6d 6f |acro whi|ch is mo|
|000029c0| 72 65 20 65 66 66 69 63 | 69 65 6e 74 20 74 6f 20 |re effic|ient to |
|000029d0| 63 61 6c 6c 0a 58 20 2a | 20 74 68 61 6e 20 66 63 |call.X *| than fc|
|000029e0| 68 5f 67 65 74 20 28 74 | 68 65 20 66 75 6e 63 74 |h_get (t|he funct|
|000029f0| 69 6f 6e 29 2c 20 69 6e | 20 74 68 65 20 75 73 75 |ion), in| the usu|
|00002a00| 61 6c 20 63 61 73 65 20 | 0a 58 20 2a 20 74 68 61 |al case |.X * tha|
|00002a10| 74 20 74 68 65 20 62 6c | 6f 63 6b 20 64 65 73 69 |t the bl|ock desi|
|00002a20| 72 65 64 20 69 73 20 61 | 74 20 74 68 65 20 68 65 |red is a|t the he|
|00002a30| 61 64 20 6f 66 20 74 68 | 65 20 63 68 61 69 6e 2e |ad of th|e chain.|
|00002a40| 0a 58 20 2a 2f 0a 58 23 | 64 65 66 69 6e 65 09 63 |.X */.X#|define.c|
|00002a50| 68 5f 67 65 74 28 29 20 | 20 20 28 28 63 68 5f 62 |h_get() | ((ch_b|
|00002a60| 6c 6f 63 6b 20 3d 3d 20 | 62 75 66 5f 68 65 61 64 |lock == |buf_head|
|00002a70| 2d 3e 62 6c 6f 63 6b 20 | 26 26 20 5c 0a 58 09 09 |->block |&& \.X..|
|00002a80| 20 20 20 20 20 63 68 5f | 6f 66 66 73 65 74 20 3c | ch_|offset <|
|00002a90| 20 62 75 66 5f 68 65 61 | 64 2d 3e 64 61 74 61 73 | buf_hea|d->datas|
|00002aa0| 69 7a 65 29 20 3f 20 5c | 0a 58 09 09 09 62 75 66 |ize) ? \|.X...buf|
|00002ab0| 5f 68 65 61 64 2d 3e 64 | 61 74 61 5b 63 68 5f 6f |_head->d|ata[ch_o|
|00002ac0| 66 66 73 65 74 5d 20 3a | 20 66 63 68 5f 67 65 74 |ffset] :| fch_get|
|00002ad0| 28 29 29 0a 58 09 73 74 | 61 74 69 63 20 69 6e 74 |()).X.st|atic int|
|00002ae0| 0a 58 66 63 68 5f 67 65 | 74 28 29 0a 58 7b 0a 58 |.Xfch_ge|t().X{.X|
|00002af0| 09 72 65 67 69 73 74 65 | 72 20 73 74 72 75 63 74 |.registe|r struct|
|00002b00| 20 62 75 66 20 2a 62 70 | 3b 0a 58 09 72 65 67 69 | buf *bp|;.X.regi|
|00002b10| 73 74 65 72 20 69 6e 74 | 20 6e 3b 0a 58 09 72 65 |ster int| n;.X.re|
|00002b20| 67 69 73 74 65 72 20 69 | 6e 74 20 73 6c 65 70 74 |gister i|nt slept|
|00002b30| 3b 0a 58 09 50 4f 53 49 | 54 49 4f 4e 20 70 6f 73 |;.X.POSI|TION pos|
|00002b40| 3b 0a 58 09 50 4f 53 49 | 54 49 4f 4e 20 6c 65 6e |;.X.POSI|TION len|
|00002b50| 3b 0a 58 0a 58 09 73 6c | 65 70 74 20 3d 20 30 3b |;.X.X.sl|ept = 0;|
|00002b60| 0a 58 0a 58 09 2f 2a 0a | 58 09 20 2a 20 4c 6f 6f |.X.X./*.|X. * Loo|
|00002b70| 6b 20 66 6f 72 20 61 20 | 62 75 66 66 65 72 20 68 |k for a |buffer h|
|00002b80| 6f 6c 64 69 6e 67 20 74 | 68 65 20 64 65 73 69 72 |olding t|he desir|
|00002b90| 65 64 20 62 6c 6f 63 6b | 2e 0a 58 09 20 2a 2f 0a |ed block|..X. */.|
|00002ba0| 58 09 66 6f 72 20 28 62 | 70 20 3d 20 62 75 66 5f |X.for (b|p = buf_|
|00002bb0| 68 65 61 64 3b 20 20 62 | 70 20 21 3d 20 45 4e 44 |head; b|p != END|
|00002bc0| 5f 4f 46 5f 43 48 41 49 | 4e 3b 20 20 62 70 20 3d |_OF_CHAI|N; bp =|
|00002bd0| 20 62 70 2d 3e 6e 65 78 | 74 29 0a 58 09 09 69 66 | bp->nex|t).X..if|
|00002be0| 20 28 62 70 2d 3e 62 6c | 6f 63 6b 20 3d 3d 20 63 | (bp->bl|ock == c|
|00002bf0| 68 5f 62 6c 6f 63 6b 29 | 0a 58 09 09 7b 0a 58 09 |h_block)|.X..{.X.|
|00002c00| 09 09 69 66 20 28 63 68 | 5f 6f 66 66 73 65 74 20 |..if (ch|_offset |
|00002c10| 3e 3d 20 62 70 2d 3e 64 | 61 74 61 73 69 7a 65 29 |>= bp->d|atasize)|
|00002c20| 0a 58 09 09 09 09 2f 2a | 0a 58 09 09 09 09 20 2a |.X..../*|.X.... *|
|00002c30| 20 4e 65 65 64 20 6d 6f | 72 65 20 64 61 74 61 20 | Need mo|re data |
|00002c40| 69 6e 20 74 68 69 73 20 | 62 75 66 66 65 72 2e 0a |in this |buffer..|
|00002c50| 58 09 09 09 09 20 2a 2f | 0a 58 09 09 09 09 67 6f |X.... */|.X....go|
|00002c60| 74 6f 20 72 65 61 64 5f | 6d 6f 72 65 3b 0a 58 09 |to read_|more;.X.|
|00002c70| 09 09 67 6f 74 6f 20 66 | 6f 75 6e 64 3b 0a 58 09 |..goto f|ound;.X.|
|00002c80| 09 7d 0a 58 09 2f 2a 0a | 58 09 20 2a 20 42 6c 6f |.}.X./*.|X. * Blo|
|00002c90| 63 6b 20 69 73 20 6e 6f | 74 20 69 6e 20 61 20 62 |ck is no|t in a b|
|00002ca0| 75 66 66 65 72 2e 20 20 | 0a 58 09 20 2a 20 54 61 |uffer. |.X. * Ta|
|00002cb0| 6b 65 20 74 68 65 20 6c | 65 61 73 74 20 72 65 63 |ke the l|east rec|
|00002cc0| 65 6e 74 6c 79 20 75 73 | 65 64 20 62 75 66 66 65 |ently us|ed buffe|
|00002cd0| 72 20 0a 58 09 20 2a 20 | 61 6e 64 20 72 65 61 64 |r .X. * |and read|
|00002ce0| 20 74 68 65 20 64 65 73 | 69 72 65 64 20 62 6c 6f | the des|ired blo|
|00002cf0| 63 6b 20 69 6e 74 6f 20 | 69 74 2e 0a 58 09 20 2a |ck into |it..X. *|
|00002d00| 20 49 66 20 74 68 65 20 | 4c 52 55 20 62 75 66 66 | If the |LRU buff|
|00002d10| 65 72 20 68 61 73 20 64 | 61 74 61 20 69 6e 20 69 |er has d|ata in i|
|00002d20| 74 2c 20 0a 58 09 20 2a | 20 61 6e 64 20 61 75 74 |t, .X. *| and aut|
|00002d30| 6f 62 75 66 20 69 73 20 | 74 72 75 65 2c 20 61 6e |obuf is |true, an|
|00002d40| 64 20 69 6e 70 75 74 20 | 69 73 20 61 20 70 69 70 |d input |is a pip|
|00002d50| 65 2c 20 0a 58 09 20 2a | 20 74 68 65 6e 20 74 72 |e, .X. *| then tr|
|00002d60| 79 20 74 6f 20 61 6c 6c | 6f 63 61 74 65 20 61 20 |y to all|ocate a |
|00002d70| 6e 65 77 20 62 75 66 66 | 65 72 20 66 69 72 73 74 |new buff|er first|
|00002d80| 2e 0a 58 09 20 2a 2f 0a | 58 09 69 66 20 28 61 75 |..X. */.|X.if (au|
|00002d90| 74 6f 62 75 66 20 26 26 | 20 69 73 70 69 70 65 20 |tobuf &&| ispipe |
|00002da0| 26 26 20 62 75 66 5f 74 | 61 69 6c 2d 3e 62 6c 6f |&& buf_t|ail->blo|
|00002db0| 63 6b 20 21 3d 20 28 6c | 6f 6e 67 29 28 2d 31 29 |ck != (l|ong)(-1)|
|00002dc0| 29 0a 58 09 09 69 66 20 | 28 63 68 5f 61 64 64 62 |).X..if |(ch_addb|
|00002dd0| 75 66 28 31 29 29 0a 58 | 09 09 09 2f 2a 0a 58 09 |uf(1)).X|.../*.X.|
|00002de0| 09 09 20 2a 20 41 6c 6c | 6f 63 61 74 69 6f 6e 20 |.. * All|ocation |
|00002df0| 66 61 69 6c 65 64 3a 20 | 74 75 72 6e 20 6f 66 66 |failed: |turn off|
|00002e00| 20 61 75 74 6f 62 75 66 | 2e 0a 58 09 09 09 20 2a | autobuf|..X... *|
|00002e10| 2f 0a 58 09 09 09 61 75 | 74 6f 62 75 66 20 3d 20 |/.X...au|tobuf = |
|00002e20| 30 3b 0a 58 09 62 70 20 | 3d 20 62 75 66 5f 74 61 |0;.X.bp |= buf_ta|
|00002e30| 69 6c 3b 0a 58 09 62 70 | 2d 3e 62 6c 6f 63 6b 20 |il;.X.bp|->block |
|00002e40| 3d 20 63 68 5f 62 6c 6f | 63 6b 3b 0a 58 09 62 70 |= ch_blo|ck;.X.bp|
|00002e50| 2d 3e 64 61 74 61 73 69 | 7a 65 20 3d 20 30 3b 0a |->datasi|ze = 0;.|
|00002e60| 58 0a 58 20 20 20 20 72 | 65 61 64 5f 6d 6f 72 65 |X.X r|ead_more|
|00002e70| 3a 0a 58 09 70 6f 73 20 | 3d 20 28 63 68 5f 62 6c |:.X.pos |= (ch_bl|
|00002e80| 6f 63 6b 20 2a 20 42 55 | 46 53 49 5a 29 20 2b 20 |ock * BU|FSIZ) + |
|00002e90| 62 70 2d 3e 64 61 74 61 | 73 69 7a 65 3b 0a 58 09 |bp->data|size;.X.|
|00002ea0| 69 66 20 28 28 6c 65 6e | 20 3d 20 63 68 5f 6c 65 |if ((len| = ch_le|
|00002eb0| 6e 67 74 68 28 29 29 20 | 21 3d 20 4e 55 4c 4c 5f |ngth()) |!= NULL_|
|00002ec0| 50 4f 53 49 54 49 4f 4e | 20 26 26 20 70 6f 73 20 |POSITION| && pos |
|00002ed0| 3e 3d 20 6c 65 6e 29 0a | 58 09 09 2f 2a 0a 58 09 |>= len).|X../*.X.|
|00002ee0| 09 20 2a 20 41 74 20 65 | 6e 64 20 6f 66 20 66 69 |. * At e|nd of fi|
|00002ef0| 6c 65 2e 0a 58 09 09 20 | 2a 2f 0a 58 09 09 72 65 |le..X.. |*/.X..re|
|00002f00| 74 75 72 6e 20 28 45 4f | 49 29 3b 0a 58 0a 58 09 |turn (EO|I);.X.X.|
|00002f10| 69 66 20 28 70 6f 73 20 | 21 3d 20 63 68 5f 66 70 |if (pos |!= ch_fp|
|00002f20| 6f 73 29 0a 58 09 7b 0a | 58 09 09 2f 2a 0a 58 09 |os).X.{.|X../*.X.|
|00002f30| 09 20 2a 20 4e 6f 74 20 | 61 74 20 74 68 65 20 63 |. * Not |at the c|
|00002f40| 6f 72 72 65 63 74 20 70 | 6f 73 69 74 69 6f 6e 3a |orrect p|osition:|
|00002f50| 20 6d 75 73 74 20 73 65 | 65 6b 2e 0a 58 09 09 20 | must se|ek..X.. |
|00002f60| 2a 20 49 66 20 69 6e 70 | 75 74 20 69 73 20 61 20 |* If inp|ut is a |
|00002f70| 70 69 70 65 2c 20 77 65 | 27 72 65 20 69 6e 20 74 |pipe, we|'re in t|
|00002f80| 72 6f 75 62 6c 65 20 28 | 63 61 6e 27 74 20 73 65 |rouble (|can't se|
|00002f90| 65 6b 20 6f 6e 20 61 20 | 70 69 70 65 29 2e 0a 58 |ek on a |pipe)..X|
|00002fa0| 09 09 20 2a 20 53 6f 6d | 65 20 64 61 74 61 20 68 |.. * Som|e data h|
|00002fb0| 61 73 20 62 65 65 6e 20 | 6c 6f 73 74 3a 20 6a 75 |as been |lost: ju|
|00002fc0| 73 74 20 72 65 74 75 72 | 6e 20 22 3f 22 2e 0a 58 |st retur|n "?"..X|
|00002fd0| 09 09 20 2a 2f 0a 58 09 | 09 69 66 20 28 69 73 70 |.. */.X.|.if (isp|
|00002fe0| 69 70 65 29 0a 58 09 09 | 09 72 65 74 75 72 6e 20 |ipe).X..|.return |
|00002ff0| 28 27 3f 27 29 3b 0a 58 | 09 09 69 66 20 28 6c 73 |('?');.X|..if (ls|
|00003000| 65 65 6b 28 66 69 6c 65 | 2c 20 28 6f 66 66 73 65 |eek(file|, (offse|
|00003010| 74 5f 74 29 70 6f 73 2c | 20 30 29 20 3d 3d 20 42 |t_t)pos,| 0) == B|
|00003020| 41 44 5f 4c 53 45 45 4b | 29 0a 58 09 09 7b 0a 58 |AD_LSEEK|).X..{.X|
|00003030| 20 09 09 09 65 72 72 6f | 72 28 22 73 65 65 6b 20 | ...erro|r("seek |
|00003040| 65 72 72 6f 72 22 2c 20 | 4e 55 4c 4c 5f 50 41 52 |error", |NULL_PAR|
|00003050| 47 29 3b 0a 58 20 09 09 | 09 71 75 69 74 28 31 29 |G);.X ..|.quit(1)|
|00003060| 3b 0a 58 20 09 09 7d 0a | 58 20 09 09 63 68 5f 66 |;.X ..}.|X ..ch_f|
|00003070| 70 6f 73 20 3d 20 70 6f | 73 3b 0a 58 20 09 7d 0a |pos = po|s;.X .}.|
|00003080| 58 0a 58 09 2f 2a 0a 58 | 09 20 2a 20 52 65 61 64 |X.X./*.X|. * Read|
|00003090| 20 74 68 65 20 62 6c 6f | 63 6b 2e 0a 58 09 20 2a | the blo|ck..X. *|
|000030a0| 20 49 66 20 77 65 20 72 | 65 61 64 20 6c 65 73 73 | If we r|ead less|
|000030b0| 20 74 68 61 6e 20 61 20 | 66 75 6c 6c 20 62 6c 6f | than a |full blo|
|000030c0| 63 6b 2c 20 74 68 61 74 | 27 73 20 6f 6b 2e 0a 58 |ck, that|'s ok..X|
|000030d0| 09 20 2a 20 57 65 20 75 | 73 65 20 70 61 72 74 69 |. * We u|se parti|
|000030e0| 61 6c 20 62 6c 6f 63 6b | 20 61 6e 64 20 70 69 63 |al block| and pic|
|000030f0| 6b 20 75 70 20 74 68 65 | 20 72 65 73 74 20 6e 65 |k up the| rest ne|
|00003100| 78 74 20 74 69 6d 65 2e | 0a 58 09 20 2a 2f 0a 58 |xt time.|.X. */.X|
|00003110| 09 6e 20 3d 20 69 72 65 | 61 64 28 66 69 6c 65 2c |.n = ire|ad(file,|
|00003120| 20 26 62 70 2d 3e 64 61 | 74 61 5b 62 70 2d 3e 64 | &bp->da|ta[bp->d|
|00003130| 61 74 61 73 69 7a 65 5d | 2c 20 0a 58 09 09 28 75 |atasize]|, .X..(u|
|00003140| 6e 73 69 67 6e 65 64 20 | 69 6e 74 29 28 42 55 46 |nsigned |int)(BUF|
|00003150| 53 49 5a 20 2d 20 62 70 | 2d 3e 64 61 74 61 73 69 |SIZ - bp|->datasi|
|00003160| 7a 65 29 29 3b 0a 58 09 | 69 66 20 28 6e 20 3d 3d |ze));.X.|if (n ==|
|00003170| 20 52 45 41 44 5f 49 4e | 54 52 29 0a 58 09 09 72 | READ_IN|TR).X..r|
|00003180| 65 74 75 72 6e 20 28 45 | 4f 49 29 3b 0a 58 09 69 |eturn (E|OI);.X.i|
|00003190| 66 20 28 6e 20 3c 20 30 | 29 0a 58 09 7b 0a 58 09 |f (n < 0|).X.{.X.|
|000031a0| 09 65 72 72 6f 72 28 22 | 72 65 61 64 20 65 72 72 |.error("|read err|
|000031b0| 6f 72 22 2c 20 4e 55 4c | 4c 5f 50 41 52 47 29 3b |or", NUL|L_PARG);|
|000031c0| 0a 58 09 09 71 75 69 74 | 28 31 29 3b 0a 58 09 7d |.X..quit|(1);.X.}|
|000031d0| 0a 58 09 63 68 5f 66 70 | 6f 73 20 2b 3d 20 6e 3b |.X.ch_fp|os += n;|
|000031e0| 0a 58 0a 58 23 69 66 20 | 4c 4f 47 46 49 4c 45 0a |.X.X#if |LOGFILE.|
|000031f0| 58 09 2f 2a 0a 58 09 20 | 2a 20 49 66 20 77 65 20 |X./*.X. |* If we |
|00003200| 68 61 76 65 20 61 20 6c | 6f 67 20 66 69 6c 65 2c |have a l|og file,|
|00003210| 20 77 72 69 74 65 20 74 | 68 65 20 6e 65 77 20 64 | write t|he new d|
|00003220| 61 74 61 20 74 6f 20 69 | 74 2e 0a 58 09 20 2a 2f |ata to i|t..X. */|
|00003230| 0a 58 09 69 66 20 28 6c | 6f 67 66 69 6c 65 20 3e |.X.if (l|ogfile >|
|00003240| 3d 20 30 20 26 26 20 6e | 20 3e 20 30 29 0a 58 09 |= 0 && n| > 0).X.|
|00003250| 09 77 72 69 74 65 28 6c | 6f 67 66 69 6c 65 2c 20 |.write(l|ogfile, |
|00003260| 26 62 70 2d 3e 64 61 74 | 61 5b 62 70 2d 3e 64 61 |&bp->dat|a[bp->da|
|00003270| 74 61 73 69 7a 65 5d 2c | 20 6e 29 3b 0a 58 23 65 |tasize],| n);.X#e|
|00003280| 6e 64 69 66 0a 58 0a 58 | 09 62 70 2d 3e 64 61 74 |ndif.X.X|.bp->dat|
|00003290| 61 73 69 7a 65 20 2b 3d | 20 6e 3b 0a 58 0a 58 09 |asize +=| n;.X.X.|
|000032a0| 2f 2a 0a 58 09 20 2a 20 | 49 66 20 77 65 20 68 61 |/*.X. * |If we ha|
|000032b0| 76 65 20 72 65 61 64 20 | 74 6f 20 65 6e 64 20 6f |ve read |to end o|
|000032c0| 66 20 66 69 6c 65 2c 20 | 73 65 74 20 63 68 5f 66 |f file, |set ch_f|
|000032d0| 73 69 7a 65 20 74 6f 20 | 69 6e 64 69 63 61 74 65 |size to |indicate|
|000032e0| 0a 58 09 20 2a 20 74 68 | 65 20 70 6f 73 69 74 69 |.X. * th|e positi|
|000032f0| 6f 6e 20 6f 66 20 74 68 | 65 20 65 6e 64 20 6f 66 |on of th|e end of|
|00003300| 20 66 69 6c 65 2e 0a 58 | 09 20 2a 2f 0a 58 09 69 | file..X|. */.X.i|
|00003310| 66 20 28 6e 20 3d 3d 20 | 30 29 0a 58 09 7b 0a 58 |f (n == |0).X.{.X|
|00003320| 09 09 63 68 5f 66 73 69 | 7a 65 20 3d 20 70 6f 73 |..ch_fsi|ze = pos|
|00003330| 3b 0a 58 09 09 69 66 20 | 28 69 67 6e 6f 72 65 5f |;.X..if |(ignore_|
|00003340| 65 6f 69 29 0a 58 09 09 | 7b 0a 58 09 09 09 2f 2a |eoi).X..|{.X.../*|
|00003350| 0a 58 09 09 09 20 2a 20 | 57 65 20 61 72 65 20 69 |.X... * |We are i|
|00003360| 67 6e 6f 72 69 6e 67 20 | 45 4f 46 2e 0a 58 09 09 |gnoring |EOF..X..|
|00003370| 09 20 2a 20 57 61 69 74 | 20 61 20 77 68 69 6c 65 |. * Wait| a while|
|00003380| 2c 20 74 68 65 6e 20 74 | 72 79 20 61 67 61 69 6e |, then t|ry again|
|00003390| 2e 0a 58 09 09 09 20 2a | 2f 0a 58 09 09 09 69 66 |..X... *|/.X...if|
|000033a0| 20 28 21 73 6c 65 70 74 | 29 0a 58 09 09 09 09 69 | (!slept|).X....i|
|000033b0| 65 72 72 6f 72 28 22 57 | 61 69 74 69 6e 67 20 66 |error("W|aiting f|
|000033c0| 6f 72 20 64 61 74 61 22 | 2c 20 4e 55 4c 4c 5f 50 |or data"|, NULL_P|
|000033d0| 41 52 47 29 3b 0a 58 09 | 09 09 73 6c 65 65 70 28 |ARG);.X.|..sleep(|
|000033e0| 31 29 3b 0a 58 09 09 09 | 73 6c 65 70 74 20 3d 20 |1);.X...|slept = |
|000033f0| 31 3b 0a 58 09 09 7d 0a | 58 09 09 69 66 20 28 73 |1;.X..}.|X..if (s|
|00003400| 69 67 73 29 0a 58 09 09 | 09 72 65 74 75 72 6e 20 |igs).X..|.return |
|00003410| 28 45 4f 49 29 3b 0a 58 | 09 7d 0a 58 0a 58 20 20 |(EOI);.X|.}.X.X |
|00003420| 20 20 66 6f 75 6e 64 3a | 0a 58 09 69 66 20 28 62 | found:|.X.if (b|
|00003430| 75 66 5f 68 65 61 64 20 | 21 3d 20 62 70 29 0a 58 |uf_head |!= bp).X|
|00003440| 09 7b 0a 58 09 09 2f 2a | 0a 58 09 09 20 2a 20 4d |.{.X../*|.X.. * M|
|00003450| 6f 76 65 20 74 68 65 20 | 62 75 66 66 65 72 20 74 |ove the |buffer t|
|00003460| 6f 20 74 68 65 20 68 65 | 61 64 20 6f 66 20 74 68 |o the he|ad of th|
|00003470| 65 20 62 75 66 66 65 72 | 20 63 68 61 69 6e 2e 0a |e buffer| chain..|
|00003480| 58 09 09 20 2a 20 54 68 | 69 73 20 6f 72 64 65 72 |X.. * Th|is order|
|00003490| 73 20 74 68 65 20 62 75 | 66 66 65 72 20 63 68 61 |s the bu|ffer cha|
|000034a0| 69 6e 2c 20 6d 6f 73 74 | 2d 20 74 6f 20 6c 65 61 |in, most|- to lea|
|000034b0| 73 74 2d 72 65 63 65 6e | 74 6c 79 20 75 73 65 64 |st-recen|tly used|
|000034c0| 2e 0a 58 09 09 20 2a 2f | 0a 58 09 09 62 70 2d 3e |..X.. */|.X..bp->|
|000034d0| 6e 65 78 74 2d 3e 70 72 | 65 76 20 3d 20 62 70 2d |next->pr|ev = bp-|
|000034e0| 3e 70 72 65 76 3b 0a 58 | 09 09 62 70 2d 3e 70 72 |>prev;.X|..bp->pr|
|000034f0| 65 76 2d 3e 6e 65 78 74 | 20 3d 20 62 70 2d 3e 6e |ev->next| = bp->n|
|00003500| 65 78 74 3b 0a 58 0a 58 | 09 09 62 70 2d 3e 6e 65 |ext;.X.X|..bp->ne|
|00003510| 78 74 20 3d 20 62 75 66 | 5f 68 65 61 64 3b 0a 58 |xt = buf|_head;.X|
|00003520| 09 09 62 70 2d 3e 70 72 | 65 76 20 3d 20 45 4e 44 |..bp->pr|ev = END|
|00003530| 5f 4f 46 5f 43 48 41 49 | 4e 3b 0a 58 09 09 62 75 |_OF_CHAI|N;.X..bu|
|00003540| 66 5f 68 65 61 64 2d 3e | 70 72 65 76 20 3d 20 62 |f_head->|prev = b|
|00003550| 70 3b 0a 58 09 09 62 75 | 66 5f 68 65 61 64 20 3d |p;.X..bu|f_head =|
|00003560| 20 62 70 3b 0a 58 09 7d | 0a 58 0a 58 09 69 66 20 | bp;.X.}|.X.X.if |
|00003570| 28 63 68 5f 6f 66 66 73 | 65 74 20 3e 3d 20 62 70 |(ch_offs|et >= bp|
|00003580| 2d 3e 64 61 74 61 73 69 | 7a 65 29 0a 58 09 09 2f |->datasi|ze).X../|
|00003590| 2a 0a 58 09 09 20 2a 20 | 41 66 74 65 72 20 61 6c |*.X.. * |After al|
|000035a0| 6c 20 74 68 61 74 2c 20 | 77 65 20 73 74 69 6c 6c |l that, |we still|
|000035b0| 20 64 6f 6e 27 74 20 68 | 61 76 65 20 65 6e 6f 75 | don't h|ave enou|
|000035c0| 67 68 20 64 61 74 61 2e | 0a 58 09 09 20 2a 20 47 |gh data.|.X.. * G|
|000035d0| 6f 20 62 61 63 6b 20 61 | 6e 64 20 74 72 79 20 61 |o back a|nd try a|
|000035e0| 67 61 69 6e 2e 0a 58 09 | 09 20 2a 2f 0a 58 09 09 |gain..X.|. */.X..|
|000035f0| 67 6f 74 6f 20 72 65 61 | 64 5f 6d 6f 72 65 3b 0a |goto rea|d_more;.|
|00003600| 58 0a 58 09 72 65 74 75 | 72 6e 20 28 62 70 2d 3e |X.X.retu|rn (bp->|
|00003610| 64 61 74 61 5b 63 68 5f | 6f 66 66 73 65 74 5d 29 |data[ch_|offset])|
|00003620| 3b 0a 58 7d 0a 58 0a 58 | 23 69 66 20 4c 4f 47 46 |;.X}.X.X|#if LOGF|
|00003630| 49 4c 45 0a 58 2f 2a 0a | 58 20 2a 20 43 6c 6f 73 |ILE.X/*.|X * Clos|
|00003640| 65 20 74 68 65 20 6c 6f | 67 66 69 6c 65 2e 0a 58 |e the lo|gfile..X|
|00003650| 20 2a 20 49 66 20 77 65 | 20 68 61 76 65 6e 27 74 | * If we| haven't|
|00003660| 20 72 65 61 64 20 61 6c | 6c 20 6f 66 20 73 74 61 | read al|l of sta|
|00003670| 6e 64 61 72 64 20 69 6e | 70 75 74 20 69 6e 74 6f |ndard in|put into|
|00003680| 20 69 74 2c 20 64 6f 20 | 74 68 61 74 20 6e 6f 77 | it, do |that now|
|00003690| 2e 0a 58 20 2a 2f 0a 58 | 09 70 75 62 6c 69 63 20 |..X */.X|.public |
|000036a0| 76 6f 69 64 0a 58 65 6e | 64 5f 6c 6f 67 66 69 6c |void.Xen|d_logfil|
|000036b0| 65 28 29 0a 58 7b 0a 58 | 09 73 74 61 74 69 63 20 |e().X{.X|.static |
|000036c0| 69 6e 74 20 74 72 69 65 | 64 20 3d 20 30 3b 0a 58 |int trie|d = 0;.X|
|000036d0| 0a 58 09 69 66 20 28 6c | 6f 67 66 69 6c 65 20 3c |.X.if (l|ogfile <|
|000036e0| 20 30 29 0a 58 09 09 72 | 65 74 75 72 6e 3b 0a 58 | 0).X..r|eturn;.X|
|000036f0| 09 69 66 20 28 21 74 72 | 69 65 64 20 26 26 20 63 |.if (!tr|ied && c|
|00003700| 68 5f 66 73 69 7a 65 20 | 3d 3d 20 4e 55 4c 4c 5f |h_fsize |== NULL_|
|00003710| 50 4f 53 49 54 49 4f 4e | 29 0a 58 09 7b 0a 58 09 |POSITION|).X.{.X.|
|00003720| 09 74 72 69 65 64 20 3d | 20 31 3b 0a 58 09 09 69 |.tried =| 1;.X..i|
|00003730| 65 72 72 6f 72 28 22 46 | 69 6e 69 73 68 69 6e 67 |error("F|inishing|
|00003740| 20 6c 6f 67 66 69 6c 65 | 22 2c 20 4e 55 4c 4c 5f | logfile|", NULL_|
|00003750| 50 41 52 47 29 3b 0a 58 | 09 09 77 68 69 6c 65 20 |PARG);.X|..while |
|00003760| 28 63 68 5f 66 6f 72 77 | 5f 67 65 74 28 29 20 21 |(ch_forw|_get() !|
|00003770| 3d 20 45 4f 49 29 0a 58 | 09 09 09 69 66 20 28 73 |= EOI).X|...if (s|
|00003780| 69 67 73 29 0a 58 09 09 | 09 09 62 72 65 61 6b 3b |igs).X..|..break;|
|00003790| 0a 58 09 7d 0a 58 09 63 | 6c 6f 73 65 28 6c 6f 67 |.X.}.X.c|lose(log|
|000037a0| 66 69 6c 65 29 3b 0a 58 | 09 6c 6f 67 66 69 6c 65 |file);.X|.logfile|
|000037b0| 20 3d 20 2d 31 3b 0a 58 | 7d 0a 58 0a 58 2f 2a 0a | = -1;.X|}.X.X/*.|
|000037c0| 58 20 2a 20 53 74 61 72 | 74 20 61 20 6c 6f 67 20 |X * Star|t a log |
|000037d0| 66 69 6c 65 20 41 46 54 | 45 52 20 6c 65 73 73 20 |file AFT|ER less |
|000037e0| 68 61 73 20 61 6c 72 65 | 61 64 79 20 62 65 65 6e |has alre|ady been|
|000037f0| 20 72 75 6e 6e 69 6e 67 | 2e 0a 58 20 2a 20 49 6e | running|..X * In|
|00003800| 76 6f 6b 65 64 20 66 72 | 6f 6d 20 74 68 65 20 2d |voked fr|om the -|
|00003810| 20 63 6f 6d 6d 61 6e 64 | 3b 20 73 65 65 20 74 6f | command|; see to|
|00003820| 67 67 6c 65 5f 6f 70 74 | 69 6f 6e 28 29 2e 0a 58 |ggle_opt|ion()..X|
|00003830| 20 2a 20 57 72 69 74 65 | 20 61 6c 6c 20 74 68 65 | * Write| all the|
|00003840| 20 65 78 69 73 74 69 6e | 67 20 62 75 66 66 65 72 | existin|g buffer|
|00003850| 65 64 20 64 61 74 61 20 | 74 6f 20 74 68 65 20 6c |ed data |to the l|
|00003860| 6f 67 20 66 69 6c 65 2e | 0a 58 20 2a 2f 0a 58 09 |og file.|.X */.X.|
|00003870| 70 75 62 6c 69 63 20 76 | 6f 69 64 0a 58 73 79 6e |public v|oid.Xsyn|
|00003880| 63 5f 6c 6f 67 66 69 6c | 65 28 29 0a 58 7b 0a 58 |c_logfil|e().X{.X|
|00003890| 09 72 65 67 69 73 74 65 | 72 20 73 74 72 75 63 74 |.registe|r struct|
|000038a0| 20 62 75 66 20 2a 62 70 | 3b 0a 58 09 6c 6f 6e 67 | buf *bp|;.X.long|
|000038b0| 20 62 6c 6f 63 6b 3b 0a | 58 09 6c 6f 6e 67 20 6c | block;.|X.long l|
|000038c0| 61 73 74 5f 62 6c 6f 63 | 6b 3b 0a 58 0a 58 09 6c |ast_bloc|k;.X.X.l|
|000038d0| 61 73 74 5f 62 6c 6f 63 | 6b 20 3d 20 28 63 68 5f |ast_bloc|k = (ch_|
|000038e0| 66 70 6f 73 20 2b 20 42 | 55 46 53 49 5a 20 2d 20 |fpos + B|UFSIZ - |
|000038f0| 31 29 20 2f 20 42 55 46 | 53 49 5a 3b 0a 58 09 66 |1) / BUF|SIZ;.X.f|
|00003900| 6f 72 20 28 62 6c 6f 63 | 6b 20 3d 20 30 3b 20 20 |or (bloc|k = 0; |
|00003910| 62 6c 6f 63 6b 20 3c 3d | 20 6c 61 73 74 5f 62 6c |block <=| last_bl|
|00003920| 6f 63 6b 3b 20 20 62 6c | 6f 63 6b 2b 2b 29 0a 58 |ock; bl|ock++).X|
|00003930| 09 09 66 6f 72 20 28 62 | 70 20 3d 20 62 75 66 5f |..for (b|p = buf_|
|00003940| 68 65 61 64 3b 20 20 62 | 70 20 21 3d 20 45 4e 44 |head; b|p != END|
|00003950| 5f 4f 46 5f 43 48 41 49 | 4e 3b 20 20 62 70 20 3d |_OF_CHAI|N; bp =|
|00003960| 20 62 70 2d 3e 6e 65 78 | 74 29 0a 58 09 09 09 69 | bp->nex|t).X...i|
|00003970| 66 20 28 62 70 2d 3e 62 | 6c 6f 63 6b 20 3d 3d 20 |f (bp->b|lock == |
|00003980| 62 6c 6f 63 6b 29 0a 58 | 09 09 09 7b 0a 58 09 09 |block).X|...{.X..|
|00003990| 09 09 77 72 69 74 65 28 | 6c 6f 67 66 69 6c 65 2c |..write(|logfile,|
|000039a0| 20 62 70 2d 3e 64 61 74 | 61 2c 20 62 70 2d 3e 64 | bp->dat|a, bp->d|
|000039b0| 61 74 61 73 69 7a 65 29 | 3b 0a 58 09 09 09 09 62 |atasize)|;.X....b|
|000039c0| 72 65 61 6b 3b 0a 58 09 | 09 09 7d 0a 58 7d 0a 58 |reak;.X.|..}.X}.X|
|000039d0| 0a 58 23 65 6e 64 69 66 | 0a 58 0a 58 2f 2a 0a 58 |.X#endif|.X.X/*.X|
|000039e0| 20 2a 20 44 65 74 65 72 | 6d 69 6e 65 20 69 66 20 | * Deter|mine if |
|000039f0| 61 20 73 70 65 63 69 66 | 69 63 20 62 6c 6f 63 6b |a specif|ic block|
|00003a00| 20 69 73 20 63 75 72 72 | 65 6e 74 6c 79 20 69 6e | is curr|ently in|
|00003a10| 20 6f 6e 65 20 6f 66 20 | 74 68 65 20 62 75 66 66 | one of |the buff|
|00003a20| 65 72 73 2e 0a 58 20 2a | 2f 0a 58 09 73 74 61 74 |ers..X *|/.X.stat|
|00003a30| 69 63 20 69 6e 74 0a 58 | 62 75 66 66 65 72 65 64 |ic int.X|buffered|
|00003a40| 28 62 6c 6f 63 6b 29 0a | 58 09 6c 6f 6e 67 20 62 |(block).|X.long b|
|00003a50| 6c 6f 63 6b 3b 0a 58 7b | 0a 58 09 72 65 67 69 73 |lock;.X{|.X.regis|
|00003a60| 74 65 72 20 73 74 72 75 | 63 74 20 62 75 66 20 2a |ter stru|ct buf *|
|00003a70| 62 70 3b 0a 58 0a 58 09 | 66 6f 72 20 28 62 70 20 |bp;.X.X.|for (bp |
|00003a80| 3d 20 62 75 66 5f 68 65 | 61 64 3b 20 20 62 70 20 |= buf_he|ad; bp |
|00003a90| 21 3d 20 45 4e 44 5f 4f | 46 5f 43 48 41 49 4e 3b |!= END_O|F_CHAIN;|
|00003aa0| 20 20 62 70 20 3d 20 62 | 70 2d 3e 6e 65 78 74 29 | bp = b|p->next)|
|00003ab0| 0a 58 09 09 69 66 20 28 | 62 70 2d 3e 62 6c 6f 63 |.X..if (|bp->bloc|
|00003ac0| 6b 20 3d 3d 20 62 6c 6f | 63 6b 29 0a 58 09 09 09 |k == blo|ck).X...|
|00003ad0| 72 65 74 75 72 6e 20 28 | 31 29 3b 0a 58 09 72 65 |return (|1);.X.re|
|00003ae0| 74 75 72 6e 20 28 30 29 | 3b 0a 58 7d 0a 58 0a 58 |turn (0)|;.X}.X.X|
|00003af0| 2f 2a 0a 58 20 2a 20 53 | 65 65 6b 20 74 6f 20 61 |/*.X * S|eek to a|
|00003b00| 20 73 70 65 63 69 66 69 | 65 64 20 70 6f 73 69 74 | specifi|ed posit|
|00003b10| 69 6f 6e 20 69 6e 20 74 | 68 65 20 66 69 6c 65 2e |ion in t|he file.|
|00003b20| 0a 58 20 2a 20 52 65 74 | 75 72 6e 20 30 20 69 66 |.X * Ret|urn 0 if|
|00003b30| 20 73 75 63 63 65 73 73 | 66 75 6c 2c 20 6e 6f 6e | success|ful, non|
|00003b40| 2d 7a 65 72 6f 20 69 66 | 20 63 61 6e 27 74 20 73 |-zero if| can't s|
|00003b50| 65 65 6b 20 74 68 65 72 | 65 2e 0a 58 20 2a 2f 0a |eek ther|e..X */.|
|00003b60| 58 09 70 75 62 6c 69 63 | 20 69 6e 74 0a 58 63 68 |X.public| int.Xch|
|00003b70| 5f 73 65 65 6b 28 70 6f | 73 29 0a 58 09 72 65 67 |_seek(po|s).X.reg|
|00003b80| 69 73 74 65 72 20 50 4f | 53 49 54 49 4f 4e 20 70 |ister PO|SITION p|
|00003b90| 6f 73 3b 0a 58 7b 0a 58 | 09 6c 6f 6e 67 20 6e 65 |os;.X{.X|.long ne|
|00003ba0| 77 5f 62 6c 6f 63 6b 3b | 0a 58 09 50 4f 53 49 54 |w_block;|.X.POSIT|
|00003bb0| 49 4f 4e 20 6c 65 6e 3b | 0a 58 0a 58 09 6c 65 6e |ION len;|.X.X.len|
|00003bc0| 20 3d 20 63 68 5f 6c 65 | 6e 67 74 68 28 29 3b 0a | = ch_le|ngth();.|
|00003bd0| 58 09 69 66 20 28 70 6f | 73 20 3c 20 63 68 5f 7a |X.if (po|s < ch_z|
|00003be0| 65 72 6f 28 29 20 7c 7c | 20 28 6c 65 6e 20 21 3d |ero() ||| (len !=|
|00003bf0| 20 4e 55 4c 4c 5f 50 4f | 53 49 54 49 4f 4e 20 26 | NULL_PO|SITION &|
|00003c00| 26 20 70 6f 73 20 3e 20 | 6c 65 6e 29 29 0a 58 09 |& pos > |len)).X.|
|00003c10| 09 72 65 74 75 72 6e 20 | 28 31 29 3b 0a 58 0a 58 |.return |(1);.X.X|
|00003c20| 09 6e 65 77 5f 62 6c 6f | 63 6b 20 3d 20 70 6f 73 |.new_blo|ck = pos|
|00003c30| 20 2f 20 42 55 46 53 49 | 5a 3b 0a 58 09 69 66 20 | / BUFSI|Z;.X.if |
|00003c40| 28 69 73 70 69 70 65 20 | 26 26 20 70 6f 73 20 21 |(ispipe |&& pos !|
|00003c50| 3d 20 63 68 5f 66 70 6f | 73 20 26 26 20 21 62 75 |= ch_fpo|s && !bu|
|00003c60| 66 66 65 72 65 64 28 6e | 65 77 5f 62 6c 6f 63 6b |ffered(n|ew_block|
|00003c70| 29 29 0a 58 09 09 72 65 | 74 75 72 6e 20 28 31 29 |)).X..re|turn (1)|
|00003c80| 3b 0a 58 09 2f 2a 0a 58 | 09 20 2a 20 53 65 74 20 |;.X./*.X|. * Set |
|00003c90| 72 65 61 64 20 70 6f 69 | 6e 74 65 72 2e 0a 58 09 |read poi|nter..X.|
|00003ca0| 20 2a 2f 0a 58 09 63 68 | 5f 62 6c 6f 63 6b 20 3d | */.X.ch|_block =|
|00003cb0| 20 6e 65 77 5f 62 6c 6f | 63 6b 3b 0a 58 09 63 68 | new_blo|ck;.X.ch|
|00003cc0| 5f 6f 66 66 73 65 74 20 | 3d 20 70 6f 73 20 25 20 |_offset |= pos % |
|00003cd0| 42 55 46 53 49 5a 3b 0a | 58 09 72 65 74 75 72 6e |BUFSIZ;.|X.return|
|00003ce0| 20 28 30 29 3b 0a 58 7d | 0a 58 0a 58 2f 2a 0a 58 | (0);.X}|.X.X/*.X|
|00003cf0| 20 2a 20 53 65 65 6b 20 | 74 6f 20 74 68 65 20 65 | * Seek |to the e|
|00003d00| 6e 64 20 6f 66 20 74 68 | 65 20 66 69 6c 65 2e 0a |nd of th|e file..|
|00003d10| 58 20 2a 2f 0a 58 09 70 | 75 62 6c 69 63 20 69 6e |X */.X.p|ublic in|
|00003d20| 74 0a 58 63 68 5f 65 6e | 64 5f 73 65 65 6b 28 29 |t.Xch_en|d_seek()|
|00003d30| 0a 58 7b 0a 58 09 50 4f | 53 49 54 49 4f 4e 20 6c |.X{.X.PO|SITION l|
|00003d40| 65 6e 3b 0a 58 0a 58 09 | 69 66 20 28 21 69 73 70 |en;.X.X.|if (!isp|
|00003d50| 69 70 65 29 0a 58 09 09 | 63 68 5f 66 73 69 7a 65 |ipe).X..|ch_fsize|
|00003d60| 20 3d 20 66 69 6c 65 73 | 69 7a 65 28 66 69 6c 65 | = files|ize(file|
|00003d70| 29 3b 0a 58 0a 58 09 6c | 65 6e 20 3d 20 63 68 5f |);.X.X.l|en = ch_|
|00003d80| 6c 65 6e 67 74 68 28 29 | 3b 0a 58 09 69 66 20 28 |length()|;.X.if (|
|00003d90| 6c 65 6e 20 21 3d 20 4e | 55 4c 4c 5f 50 4f 53 49 |len != N|ULL_POSI|
|00003da0| 54 49 4f 4e 29 0a 58 09 | 09 72 65 74 75 72 6e 20 |TION).X.|.return |
|00003db0| 28 63 68 5f 73 65 65 6b | 28 6c 65 6e 29 29 3b 0a |(ch_seek|(len));.|
|00003dc0| 58 0a 58 09 2f 2a 0a 58 | 09 20 2a 20 44 6f 20 69 |X.X./*.X|. * Do i|
|00003dd0| 74 20 74 68 65 20 73 6c | 6f 77 20 77 61 79 3a 20 |t the sl|ow way: |
|00003de0| 72 65 61 64 20 74 69 6c | 6c 20 65 6e 64 20 6f 66 |read til|l end of|
|00003df0| 20 64 61 74 61 2e 0a 58 | 09 20 2a 2f 0a 58 09 77 | data..X|. */.X.w|
|00003e00| 68 69 6c 65 20 28 63 68 | 5f 66 6f 72 77 5f 67 65 |hile (ch|_forw_ge|
|00003e10| 74 28 29 20 21 3d 20 45 | 4f 49 29 0a 58 09 09 69 |t() != E|OI).X..i|
|00003e20| 66 20 28 73 69 67 73 29 | 0a 58 09 09 09 72 65 74 |f (sigs)|.X...ret|
|00003e30| 75 72 6e 20 28 31 29 3b | 0a 58 09 72 65 74 75 72 |urn (1);|.X.retur|
|00003e40| 6e 20 28 30 29 3b 0a 58 | 7d 0a 58 0a 58 2f 2a 0a |n (0);.X|}.X.X/*.|
|00003e50| 58 20 2a 20 53 65 65 6b | 20 74 6f 20 74 68 65 20 |X * Seek| to the |
|00003e60| 62 65 67 69 6e 6e 69 6e | 67 20 6f 66 20 74 68 65 |beginnin|g of the|
|00003e70| 20 66 69 6c 65 2c 20 6f | 72 20 61 73 20 63 6c 6f | file, o|r as clo|
|00003e80| 73 65 20 74 6f 20 69 74 | 20 61 73 20 77 65 20 63 |se to it| as we c|
|00003e90| 61 6e 20 67 65 74 2e 0a | 58 20 2a 20 57 65 20 6d |an get..|X * We m|
|00003ea0| 61 79 20 6e 6f 74 20 62 | 65 20 61 62 6c 65 20 74 |ay not b|e able t|
|00003eb0| 6f 20 73 65 65 6b 20 74 | 68 65 72 65 20 69 66 20 |o seek t|here if |
|00003ec0| 69 6e 70 75 74 20 69 73 | 20 61 20 70 69 70 65 20 |input is| a pipe |
|00003ed0| 61 6e 64 20 74 68 65 0a | 58 20 2a 20 62 65 67 69 |and the.|X * begi|
|00003ee0| 6e 6e 69 6e 67 20 6f 66 | 20 74 68 65 20 70 69 70 |nning of| the pip|
|00003ef0| 65 20 69 73 20 6e 6f 20 | 6c 6f 6e 67 65 72 20 62 |e is no |longer b|
|00003f00| 75 66 66 65 72 65 64 2e | 0a 58 20 2a 2f 0a 58 09 |uffered.|.X */.X.|
|00003f10| 70 75 62 6c 69 63 20 69 | 6e 74 0a 58 63 68 5f 62 |public i|nt.Xch_b|
|00003f20| 65 67 5f 73 65 65 6b 28 | 29 0a 58 7b 0a 58 09 72 |eg_seek(|).X{.X.r|
|00003f30| 65 67 69 73 74 65 72 20 | 73 74 72 75 63 74 20 62 |egister |struct b|
|00003f40| 75 66 20 2a 62 70 2c 20 | 2a 66 69 72 73 74 62 70 |uf *bp, |*firstbp|
|00003f50| 3b 0a 58 0a 58 09 2f 2a | 0a 58 09 20 2a 20 54 72 |;.X.X./*|.X. * Tr|
|00003f60| 79 20 61 20 70 6c 61 69 | 6e 20 63 68 5f 73 65 65 |y a plai|n ch_see|
|00003f70| 6b 20 66 69 72 73 74 2e | 0a 58 09 20 2a 2f 0a 58 |k first.|.X. */.X|
|00003f80| 09 69 66 20 28 63 68 5f | 73 65 65 6b 28 63 68 5f |.if (ch_|seek(ch_|
|00003f90| 7a 65 72 6f 28 29 29 20 | 3d 3d 20 30 29 0a 58 09 |zero()) |== 0).X.|
|00003fa0| 09 72 65 74 75 72 6e 20 | 28 30 29 3b 0a 58 0a 58 |.return |(0);.X.X|
|00003fb0| 09 2f 2a 0a 58 09 20 2a | 20 43 61 6e 27 74 20 67 |./*.X. *| Can't g|
|00003fc0| 65 74 20 74 6f 20 70 6f | 73 69 74 69 6f 6e 20 30 |et to po|sition 0|
|00003fd0| 2e 0a 58 09 20 2a 20 4c | 6f 6f 6b 20 74 68 72 75 |..X. * L|ook thru|
|00003fe0| 20 74 68 65 20 62 75 66 | 66 65 72 73 20 66 6f 72 | the buf|fers for|
|00003ff0| 20 74 68 65 20 6f 6e 65 | 20 63 6c 6f 73 65 73 74 | the one| closest|
|00004000| 20 74 6f 20 70 6f 73 69 | 74 69 6f 6e 20 30 2e 0a | to posi|tion 0..|
|00004010| 58 09 20 2a 2f 0a 58 09 | 66 69 72 73 74 62 70 20 |X. */.X.|firstbp |
|00004020| 3d 20 62 70 20 3d 20 62 | 75 66 5f 68 65 61 64 3b |= bp = b|uf_head;|
|00004030| 0a 58 09 69 66 20 28 62 | 70 20 3d 3d 20 45 4e 44 |.X.if (b|p == END|
|00004040| 5f 4f 46 5f 43 48 41 49 | 4e 29 0a 58 09 09 72 65 |_OF_CHAI|N).X..re|
|00004050| 74 75 72 6e 20 28 31 29 | 3b 0a 58 09 77 68 69 6c |turn (1)|;.X.whil|
|00004060| 65 20 28 28 62 70 20 3d | 20 62 70 2d 3e 6e 65 78 |e ((bp =| bp->nex|
|00004070| 74 29 20 21 3d 20 45 4e | 44 5f 4f 46 5f 43 48 41 |t) != EN|D_OF_CHA|
|00004080| 49 4e 29 0a 58 09 09 69 | 66 20 28 62 70 2d 3e 62 |IN).X..i|f (bp->b|
|00004090| 6c 6f 63 6b 20 3c 20 66 | 69 72 73 74 62 70 2d 3e |lock < f|irstbp->|
|000040a0| 62 6c 6f 63 6b 29 0a 58 | 09 09 09 66 69 72 73 74 |block).X|...first|
|000040b0| 62 70 20 3d 20 62 70 3b | 0a 58 09 63 68 5f 62 6c |bp = bp;|.X.ch_bl|
|000040c0| 6f 63 6b 20 3d 20 66 69 | 72 73 74 62 70 2d 3e 62 |ock = fi|rstbp->b|
|000040d0| 6c 6f 63 6b 3b 0a 58 09 | 63 68 5f 6f 66 66 73 65 |lock;.X.|ch_offse|
|000040e0| 74 20 3d 20 30 3b 0a 58 | 09 72 65 74 75 72 6e 20 |t = 0;.X|.return |
|000040f0| 28 30 29 3b 0a 58 7d 0a | 58 0a 58 2f 2a 0a 58 20 |(0);.X}.|X.X/*.X |
|00004100| 2a 20 52 65 74 75 72 6e | 20 74 68 65 20 6c 65 6e |* Return| the len|
|00004110| 67 74 68 20 6f 66 20 74 | 68 65 20 66 69 6c 65 2c |gth of t|he file,|
|00004120| 20 69 66 20 6b 6e 6f 77 | 6e 2e 0a 58 20 2a 2f 0a | if know|n..X */.|
|00004130| 58 09 70 75 62 6c 69 63 | 20 50 4f 53 49 54 49 4f |X.public| POSITIO|
|00004140| 4e 0a 58 63 68 5f 6c 65 | 6e 67 74 68 28 29 0a 58 |N.Xch_le|ngth().X|
|00004150| 7b 0a 58 09 69 66 20 28 | 69 67 6e 6f 72 65 5f 65 |{.X.if (|ignore_e|
|00004160| 6f 69 29 0a 58 09 09 72 | 65 74 75 72 6e 20 28 4e |oi).X..r|eturn (N|
|00004170| 55 4c 4c 5f 50 4f 53 49 | 54 49 4f 4e 29 3b 0a 58 |ULL_POSI|TION);.X|
|00004180| 09 72 65 74 75 72 6e 20 | 28 63 68 5f 66 73 69 7a |.return |(ch_fsiz|
|00004190| 65 29 3b 0a 58 7d 0a 58 | 0a 58 2f 2a 0a 58 20 2a |e);.X}.X|.X/*.X *|
|000041a0| 20 52 65 74 75 72 6e 20 | 74 68 65 20 63 75 72 72 | Return |the curr|
|000041b0| 65 6e 74 20 70 6f 73 69 | 74 69 6f 6e 20 69 6e 20 |ent posi|tion in |
|000041c0| 74 68 65 20 66 69 6c 65 | 2e 0a 58 20 2a 2f 0a 58 |the file|..X */.X|
|000041d0| 23 64 65 66 69 6e 65 09 | 74 65 6c 6c 70 6f 73 28 |#define.|tellpos(|
|000041e0| 62 6c 6b 2c 6f 66 66 29 | 20 20 20 28 28 50 4f 53 |blk,off)| ((POS|
|000041f0| 49 54 49 4f 4e 29 28 28 | 28 28 6c 6f 6e 67 29 28 |ITION)((|((long)(|
|00004200| 62 6c 6b 29 29 20 2a 20 | 42 55 46 53 49 5a 29 20 |blk)) * |BUFSIZ) |
|00004210| 2b 20 28 6f 66 66 29 29 | 29 0a 58 0a 58 09 70 75 |+ (off))|).X.X.pu|
|00004220| 62 6c 69 63 20 50 4f 53 | 49 54 49 4f 4e 0a 58 63 |blic POS|ITION.Xc|
|00004230| 68 5f 74 65 6c 6c 28 29 | 0a 58 7b 0a 58 09 72 65 |h_tell()|.X{.X.re|
|00004240| 74 75 72 6e 20 28 74 65 | 6c 6c 70 6f 73 28 63 68 |turn (te|llpos(ch|
|00004250| 5f 62 6c 6f 63 6b 2c 20 | 63 68 5f 6f 66 66 73 65 |_block, |ch_offse|
|00004260| 74 29 29 3b 0a 58 7d 0a | 58 0a 58 2f 2a 0a 58 20 |t));.X}.|X.X/*.X |
|00004270| 2a 20 47 65 74 20 74 68 | 65 20 63 75 72 72 65 6e |* Get th|e curren|
|00004280| 74 20 63 68 61 72 20 61 | 6e 64 20 70 6f 73 74 2d |t char a|nd post-|
|00004290| 69 6e 63 72 65 6d 65 6e | 74 20 74 68 65 20 72 65 |incremen|t the re|
|000042a0| 61 64 20 70 6f 69 6e 74 | 65 72 2e 0a 58 20 2a 2f |ad point|er..X */|
|000042b0| 0a 58 09 70 75 62 6c 69 | 63 20 69 6e 74 0a 58 63 |.X.publi|c int.Xc|
|000042c0| 68 5f 66 6f 72 77 5f 67 | 65 74 28 29 0a 58 7b 0a |h_forw_g|et().X{.|
|000042d0| 58 09 72 65 67 69 73 74 | 65 72 20 69 6e 74 20 63 |X.regist|er int c|
|000042e0| 3b 0a 58 0a 58 09 63 20 | 3d 20 63 68 5f 67 65 74 |;.X.X.c |= ch_get|
|000042f0| 28 29 3b 0a 58 09 69 66 | 20 28 63 20 3d 3d 20 45 |();.X.if| (c == E|
|00004300| 4f 49 29 0a 58 09 09 72 | 65 74 75 72 6e 20 28 45 |OI).X..r|eturn (E|
|00004310| 4f 49 29 3b 0a 58 09 69 | 66 20 28 63 68 5f 6f 66 |OI);.X.i|f (ch_of|
|00004320| 66 73 65 74 20 3c 20 42 | 55 46 53 49 5a 2d 31 29 |fset < B|UFSIZ-1)|
|00004330| 0a 58 09 09 63 68 5f 6f | 66 66 73 65 74 2b 2b 3b |.X..ch_o|ffset++;|
|00004340| 0a 58 09 65 6c 73 65 0a | 58 09 7b 0a 58 23 69 66 |.X.else.|X.{.X#if|
|00004350| 20 5f 5f 5a 4f 46 46 53 | 45 54 20 2f 2a 20 4e 4f | __ZOFFS|ET /* NO|
|00004360| 54 20 57 4f 52 4b 49 4e | 47 20 2a 2f 0a 58 09 09 |T WORKIN|G */.X..|
|00004370| 69 66 20 28 63 68 5f 66 | 73 69 7a 65 20 21 3d 20 |if (ch_f|size != |
|00004380| 4e 55 4c 4c 5f 50 4f 53 | 49 54 49 4f 4e 20 26 26 |NULL_POS|ITION &&|
|00004390| 20 0a 58 09 09 20 20 20 | 20 74 65 6c 6c 70 6f 73 | .X.. | tellpos|
|000043a0| 28 63 68 5f 62 6c 6f 63 | 6b 2b 31 2c 20 30 29 20 |(ch_bloc|k+1, 0) |
|000043b0| 3e 3d 20 63 68 5f 66 73 | 69 7a 65 29 0a 58 09 09 |>= ch_fs|ize).X..|
|000043c0| 09 72 65 74 75 72 6e 20 | 28 45 4f 49 29 3b 0a 58 |.return |(EOI);.X|
|000043d0| 23 65 6e 64 69 66 0a 58 | 09 09 63 68 5f 62 6c 6f |#endif.X|..ch_blo|
|000043e0| 63 6b 20 2b 2b 3b 0a 58 | 09 09 63 68 5f 6f 66 66 |ck ++;.X|..ch_off|
|000043f0| 73 65 74 20 3d 20 30 3b | 0a 58 09 7d 0a 58 09 72 |set = 0;|.X.}.X.r|
|00004400| 65 74 75 72 6e 20 28 63 | 29 3b 0a 58 7d 0a 58 0a |eturn (c|);.X}.X.|
|00004410| 58 2f 2a 0a 58 20 2a 20 | 50 72 65 2d 64 65 63 72 |X/*.X * |Pre-decr|
|00004420| 65 6d 65 6e 74 20 74 68 | 65 20 72 65 61 64 20 70 |ement th|e read p|
|00004430| 6f 69 6e 74 65 72 20 61 | 6e 64 20 67 65 74 20 74 |ointer a|nd get t|
|00004440| 68 65 20 6e 65 77 20 63 | 75 72 72 65 6e 74 20 63 |he new c|urrent c|
|00004450| 68 61 72 2e 0a 58 20 2a | 2f 0a 58 09 70 75 62 6c |har..X *|/.X.publ|
|00004460| 69 63 20 69 6e 74 0a 58 | 63 68 5f 62 61 63 6b 5f |ic int.X|ch_back_|
|00004470| 67 65 74 28 29 0a 58 7b | 0a 58 09 69 66 20 28 63 |get().X{|.X.if (c|
|00004480| 68 5f 6f 66 66 73 65 74 | 20 3e 20 30 29 0a 58 09 |h_offset| > 0).X.|
|00004490| 09 63 68 5f 6f 66 66 73 | 65 74 20 2d 2d 3b 0a 58 |.ch_offs|et --;.X|
|000044a0| 09 65 6c 73 65 0a 58 09 | 7b 0a 58 23 69 66 20 5f |.else.X.|{.X#if _|
|000044b0| 5f 5a 4f 46 46 53 45 54 | 20 2f 2a 20 4e 4f 54 20 |_ZOFFSET| /* NOT |
|000044c0| 57 4f 52 4b 49 4e 47 20 | 2a 2f 0a 58 09 09 69 66 |WORKING |*/.X..if|
|000044d0| 20 28 74 65 6c 6c 70 6f | 73 28 63 68 5f 62 6c 6f | (tellpo|s(ch_blo|
|000044e0| 63 6b 2d 31 2c 20 42 55 | 46 53 49 5a 2d 31 29 20 |ck-1, BU|FSIZ-1) |
|000044f0| 3c 20 63 68 5f 7a 65 72 | 6f 28 29 29 0a 58 09 09 |< ch_zer|o()).X..|
|00004500| 09 72 65 74 75 72 6e 20 | 28 45 4f 49 29 3b 0a 58 |.return |(EOI);.X|
|00004510| 23 65 6c 73 65 0a 58 09 | 09 69 66 20 28 63 68 5f |#else.X.|.if (ch_|
|00004520| 62 6c 6f 63 6b 20 3c 3d | 20 30 29 0a 58 09 09 09 |block <=| 0).X...|
|00004530| 72 65 74 75 72 6e 20 28 | 45 4f 49 29 3b 0a 58 23 |return (|EOI);.X#|
|00004540| 65 6e 64 69 66 0a 58 09 | 09 69 66 20 28 69 73 70 |endif.X.|.if (isp|
|00004550| 69 70 65 20 26 26 20 21 | 62 75 66 66 65 72 65 64 |ipe && !|buffered|
|00004560| 28 63 68 5f 62 6c 6f 63 | 6b 2d 31 29 29 0a 58 09 |(ch_bloc|k-1)).X.|
|00004570| 09 09 72 65 74 75 72 6e | 20 28 45 4f 49 29 3b 0a |..return| (EOI);.|
|00004580| 58 09 09 63 68 5f 62 6c | 6f 63 6b 2d 2d 3b 0a 58 |X..ch_bl|ock--;.X|
|00004590| 09 09 63 68 5f 6f 66 66 | 73 65 74 20 3d 20 42 55 |..ch_off|set = BU|
|000045a0| 46 53 49 5a 2d 31 3b 0a | 58 09 7d 0a 58 09 72 65 |FSIZ-1;.|X.}.X.re|
|000045b0| 74 75 72 6e 20 28 63 68 | 5f 67 65 74 28 29 29 3b |turn (ch|_get());|
|000045c0| 0a 58 7d 0a 58 0a 58 2f | 2a 0a 58 20 2a 20 41 6c |.X}.X.X/|*.X * Al|
|000045d0| 6c 6f 63 61 74 65 20 62 | 75 66 66 65 72 73 2e 0a |locate b|uffers..|
|000045e0| 58 20 2a 20 43 61 6c 6c | 65 72 20 77 61 6e 74 73 |X * Call|er wants|
|000045f0| 20 75 73 20 74 6f 20 68 | 61 76 65 20 61 20 74 6f | us to h|ave a to|
|00004600| 74 61 6c 20 6f 66 20 61 | 74 20 6c 65 61 73 74 20 |tal of a|t least |
|00004610| 77 61 6e 74 5f 6e 62 75 | 66 73 20 62 75 66 66 65 |want_nbu|fs buffe|
|00004620| 72 73 2e 0a 58 20 2a 2f | 0a 58 09 70 75 62 6c 69 |rs..X */|.X.publi|
|00004630| 63 20 69 6e 74 0a 58 63 | 68 5f 6e 62 75 66 28 77 |c int.Xc|h_nbuf(w|
|00004640| 61 6e 74 5f 6e 62 75 66 | 73 29 0a 58 09 69 6e 74 |ant_nbuf|s).X.int|
|00004650| 20 77 61 6e 74 5f 6e 62 | 75 66 73 3b 0a 58 7b 0a | want_nb|ufs;.X{.|
|00004660| 58 09 50 41 52 47 20 70 | 61 72 67 3b 0a 58 0a 58 |X.PARG p|arg;.X.X|
|00004670| 09 69 66 20 28 63 68 5f | 6e 62 75 66 73 20 3c 20 |.if (ch_|nbufs < |
|00004680| 77 61 6e 74 5f 6e 62 75 | 66 73 20 26 26 20 63 68 |want_nbu|fs && ch|
|00004690| 5f 61 64 64 62 75 66 28 | 77 61 6e 74 5f 6e 62 75 |_addbuf(|want_nbu|
|000046a0| 66 73 20 2d 20 63 68 5f | 6e 62 75 66 73 29 29 0a |fs - ch_|nbufs)).|
|000046b0| 58 09 7b 0a 58 09 09 2f | 2a 0a 58 09 09 20 2a 20 |X.{.X../|*.X.. * |
|000046c0| 43 61 6e 6e 6f 74 20 61 | 6c 6c 6f 63 61 74 65 20 |Cannot a|llocate |
|000046d0| 65 6e 6f 75 67 68 20 62 | 75 66 66 65 72 73 2e 0a |enough b|uffers..|
|000046e0| 58 09 09 20 2a 20 49 66 | 20 77 65 20 64 6f 6e 27 |X.. * If| we don'|
|000046f0| 74 20 68 61 76 65 20 41 | 4e 59 2c 20 74 68 65 6e |t have A|NY, then|
|00004700| 20 71 75 69 74 2e 0a 58 | 09 09 20 2a 20 4f 74 68 | quit..X|.. * Oth|
|00004710| 65 72 77 69 73 65 2c 20 | 6a 75 73 74 20 72 65 70 |erwise, |just rep|
|00004720| 6f 72 74 20 74 68 65 20 | 65 72 72 6f 72 20 61 6e |ort the |error an|
|00004730| 64 20 72 65 74 75 72 6e | 2e 0a 58 09 09 20 2a 2f |d return|..X.. */|
|00004740| 0a 58 09 09 70 61 72 67 | 2e 70 5f 69 6e 74 20 3d |.X..parg|.p_int =|
|00004750| 20 77 61 6e 74 5f 6e 62 | 75 66 73 20 2d 20 63 68 | want_nb|ufs - ch|
|00004760| 5f 6e 62 75 66 73 3b 0a | 58 09 09 65 72 72 6f 72 |_nbufs;.|X..error|
|00004770| 28 22 43 61 6e 6e 6f 74 | 20 61 6c 6c 6f 63 61 74 |("Cannot| allocat|
|00004780| 65 20 25 64 20 62 75 66 | 66 65 72 73 22 2c 20 26 |e %d buf|fers", &|
|00004790| 70 61 72 67 29 3b 0a 58 | 09 09 69 66 20 28 63 68 |parg);.X|..if (ch|
|000047a0| 5f 6e 62 75 66 73 20 3d | 3d 20 30 29 0a 58 09 09 |_nbufs =|= 0).X..|
|000047b0| 09 71 75 69 74 28 31 29 | 3b 0a 58 09 7d 0a 58 09 |.quit(1)|;.X.}.X.|
|000047c0| 72 65 74 75 72 6e 20 28 | 63 68 5f 6e 62 75 66 73 |return (|ch_nbufs|
|000047d0| 29 3b 0a 58 7d 0a 58 0a | 58 2f 2a 0a 58 20 2a 20 |);.X}.X.|X/*.X * |
|000047e0| 46 6c 75 73 68 20 61 6e | 79 20 73 61 76 65 64 20 |Flush an|y saved |
|000047f0| 66 69 6c 65 20 73 74 61 | 74 65 2c 20 69 6e 63 6c |file sta|te, incl|
|00004800| 75 64 69 6e 67 20 62 75 | 66 66 65 72 20 63 6f 6e |uding bu|ffer con|
|00004810| 74 65 6e 74 73 2e 0a 58 | 20 2a 2f 0a 58 09 70 75 |tents..X| */.X.pu|
|00004820| 62 6c 69 63 20 76 6f 69 | 64 0a 58 63 68 5f 66 6c |blic voi|d.Xch_fl|
|00004830| 75 73 68 28 29 0a 58 7b | 0a 58 09 72 65 67 69 73 |ush().X{|.X.regis|
|00004840| 74 65 72 20 73 74 72 75 | 63 74 20 62 75 66 20 2a |ter stru|ct buf *|
|00004850| 62 70 3b 0a 58 0a 58 09 | 69 66 20 28 69 73 70 69 |bp;.X.X.|if (ispi|
|00004860| 70 65 29 0a 58 09 7b 0a | 58 09 09 2f 2a 0a 58 09 |pe).X.{.|X../*.X.|
|00004870| 09 20 2a 20 49 66 20 69 | 6e 70 75 74 20 69 73 20 |. * If i|nput is |
|00004880| 61 20 70 69 70 65 2c 20 | 77 65 20 64 6f 6e 27 74 |a pipe, |we don't|
|00004890| 20 66 6c 75 73 68 20 62 | 75 66 66 65 72 20 63 6f | flush b|uffer co|
|000048a0| 6e 74 65 6e 74 73 2c 0a | 58 09 09 20 2a 20 73 69 |ntents,.|X.. * si|
|000048b0| 6e 63 65 20 74 68 65 20 | 63 6f 6e 74 65 6e 74 73 |nce the |contents|
|000048c0| 20 63 61 6e 27 74 20 62 | 65 20 72 65 63 6f 76 65 | can't b|e recove|
|000048d0| 72 65 64 2e 0a 58 09 09 | 20 2a 2f 0a 58 09 09 63 |red..X..| */.X..c|
|000048e0| 68 5f 66 73 69 7a 65 20 | 3d 20 4e 55 4c 4c 5f 50 |h_fsize |= NULL_P|
|000048f0| 4f 53 49 54 49 4f 4e 3b | 0a 58 09 09 72 65 74 75 |OSITION;|.X..retu|
|00004900| 72 6e 3b 0a 58 09 7d 0a | 58 0a 58 09 2f 2a 0a 58 |rn;.X.}.|X.X./*.X|
|00004910| 09 20 2a 20 49 6e 69 74 | 69 61 6c 69 7a 65 20 61 |. * Init|ialize a|
|00004920| 6c 6c 20 74 68 65 20 62 | 75 66 66 65 72 73 2e 0a |ll the b|uffers..|
|00004930| 58 09 20 2a 2f 0a 58 09 | 66 6f 72 20 28 62 70 20 |X. */.X.|for (bp |
|00004940| 3d 20 62 75 66 5f 68 65 | 61 64 3b 20 20 62 70 20 |= buf_he|ad; bp |
|00004950| 21 3d 20 45 4e 44 5f 4f | 46 5f 43 48 41 49 4e 3b |!= END_O|F_CHAIN;|
|00004960| 20 20 62 70 20 3d 20 62 | 70 2d 3e 6e 65 78 74 29 | bp = b|p->next)|
|00004970| 0a 58 09 09 62 70 2d 3e | 62 6c 6f 63 6b 20 3d 20 |.X..bp->|block = |
|00004980| 28 6c 6f 6e 67 29 28 2d | 31 29 3b 0a 58 0a 58 09 |(long)(-|1);.X.X.|
|00004990| 2f 2a 0a 58 09 20 2a 20 | 46 69 67 75 72 65 20 6f |/*.X. * |Figure o|
|000049a0| 75 74 20 74 68 65 20 73 | 69 7a 65 20 6f 66 20 74 |ut the s|ize of t|
|000049b0| 68 65 20 66 69 6c 65 2c | 20 69 66 20 77 65 20 63 |he file,| if we c|
|000049c0| 61 6e 2e 0a 58 09 20 2a | 2f 0a 58 09 63 68 5f 66 |an..X. *|/.X.ch_f|
|000049d0| 73 69 7a 65 20 3d 20 66 | 69 6c 65 73 69 7a 65 28 |size = f|ilesize(|
|000049e0| 66 69 6c 65 29 3b 0a 58 | 0a 58 09 2f 2a 0a 58 09 |file);.X|.X./*.X.|
|000049f0| 20 2a 20 53 65 65 6b 20 | 74 6f 20 61 20 6b 6e 6f | * Seek |to a kno|
|00004a00| 77 6e 20 70 6f 73 69 74 | 69 6f 6e 3a 20 74 68 65 |wn posit|ion: the|
|00004a10| 20 62 65 67 69 6e 6e 69 | 6e 67 20 6f 66 20 74 68 | beginni|ng of th|
|00004a20| 65 20 66 69 6c 65 2e 0a | 58 09 20 2a 2f 0a 58 09 |e file..|X. */.X.|
|00004a30| 63 68 5f 66 70 6f 73 20 | 3d 20 30 3b 0a 58 09 63 |ch_fpos |= 0;.X.c|
|00004a40| 68 5f 62 6c 6f 63 6b 20 | 3d 20 63 68 5f 66 70 6f |h_block |= ch_fpo|
|00004a50| 73 20 2f 20 42 55 46 53 | 49 5a 3b 0a 58 09 63 68 |s / BUFS|IZ;.X.ch|
|00004a60| 5f 6f 66 66 73 65 74 20 | 3d 20 63 68 5f 66 70 6f |_offset |= ch_fpo|
|00004a70| 73 20 25 20 42 55 46 53 | 49 5a 3b 0a 58 0a 58 09 |s % BUFS|IZ;.X.X.|
|00004a80| 69 66 20 28 6c 73 65 65 | 6b 28 66 69 6c 65 2c 20 |if (lsee|k(file, |
|00004a90| 28 6f 66 66 73 65 74 5f | 74 29 30 2c 20 30 29 20 |(offset_|t)0, 0) |
|00004aa0| 3d 3d 20 42 41 44 5f 4c | 53 45 45 4b 29 0a 58 09 |== BAD_L|SEEK).X.|
|00004ab0| 7b 0a 58 09 09 2f 2a 0a | 58 09 09 20 2a 20 57 61 |{.X../*.|X.. * Wa|
|00004ac0| 72 6e 69 6e 67 20 6f 6e | 6c 79 3b 20 65 76 65 6e |rning on|ly; even|
|00004ad0| 20 69 66 20 74 68 65 20 | 73 65 65 6b 20 66 61 69 | if the |seek fai|
|00004ae0| 6c 73 20 66 6f 72 20 73 | 6f 6d 65 20 72 65 61 73 |ls for s|ome reas|
|00004af0| 6f 6e 2c 0a 58 09 09 20 | 2a 20 74 68 65 72 65 27 |on,.X.. |* there'|
|00004b00| 73 20 61 20 67 6f 6f 64 | 20 63 68 61 6e 63 65 20 |s a good| chance |
|00004b10| 77 65 27 72 65 20 61 74 | 20 74 68 65 20 62 65 67 |we're at| the beg|
|00004b20| 69 6e 6e 69 6e 67 20 61 | 6e 79 77 61 79 2e 0a 58 |inning a|nyway..X|
|00004b30| 09 09 20 2a 20 7b 7b 20 | 49 20 74 68 69 6e 6b 20 |.. * {{ |I think |
|00004b40| 74 68 69 73 20 69 73 20 | 62 6f 67 75 73 20 72 65 |this is |bogus re|
|00004b50| 61 73 6f 6e 69 6e 67 2e | 20 7d 7d 0a 58 09 09 20 |asoning.| }}.X.. |
|00004b60| 2a 2f 0a 58 09 09 65 72 | 72 6f 72 28 22 73 65 65 |*/.X..er|ror("see|
|00004b70| 6b 20 65 72 72 6f 72 20 | 74 6f 20 30 22 2c 20 4e |k error |to 0", N|
|00004b80| 55 4c 4c 5f 50 41 52 47 | 29 3b 0a 58 09 7d 0a 58 |ULL_PARG|);.X.}.X|
|00004b90| 7d 0a 58 0a 58 2f 2a 0a | 58 20 2a 20 41 6c 6c 6f |}.X.X/*.|X * Allo|
|00004ba0| 63 61 74 65 20 73 6f 6d | 65 20 6e 65 77 20 62 75 |cate som|e new bu|
|00004bb0| 66 66 65 72 73 2e 0a 58 | 20 2a 20 54 68 65 20 62 |ffers..X| * The b|
|00004bc0| 75 66 66 65 72 73 20 61 | 72 65 20 61 64 64 65 64 |uffers a|re added|
|00004bd0| 20 74 6f 20 74 68 65 20 | 74 61 69 6c 20 6f 66 20 | to the |tail of |
|00004be0| 74 68 65 20 62 75 66 66 | 65 72 20 63 68 61 69 6e |the buff|er chain|
|00004bf0| 2e 0a 58 20 2a 2f 0a 58 | 09 73 74 61 74 69 63 20 |..X */.X|.static |
|00004c00| 69 6e 74 0a 58 63 68 5f | 61 64 64 62 75 66 28 6e |int.Xch_|addbuf(n|
|00004c10| 6e 65 77 29 0a 58 09 69 | 6e 74 20 6e 6e 65 77 3b |new).X.i|nt nnew;|
|00004c20| 0a 58 7b 0a 58 09 72 65 | 67 69 73 74 65 72 20 73 |.X{.X.re|gister s|
|00004c30| 74 72 75 63 74 20 62 75 | 66 20 2a 62 70 3b 0a 58 |truct bu|f *bp;.X|
|00004c40| 09 72 65 67 69 73 74 65 | 72 20 73 74 72 75 63 74 |.registe|r struct|
|00004c50| 20 62 75 66 20 2a 6e 65 | 77 62 75 66 73 3b 0a 58 | buf *ne|wbufs;.X|
|00004c60| 0a 58 09 2f 2a 0a 58 09 | 20 2a 20 57 65 20 64 6f |.X./*.X.| * We do|
|00004c70| 6e 27 74 20 68 61 76 65 | 20 65 6e 6f 75 67 68 20 |n't have| enough |
|00004c80| 62 75 66 66 65 72 73 2e | 20 20 0a 58 09 20 2a 20 |buffers.| .X. * |
|00004c90| 41 6c 6c 6f 63 61 74 65 | 20 73 6f 6d 65 20 6e 65 |Allocate| some ne|
|00004ca0| 77 20 6f 6e 65 73 2e 0a | 58 09 20 2a 2f 0a 58 09 |w ones..|X. */.X.|
|00004cb0| 6e 65 77 62 75 66 73 20 | 3d 20 28 73 74 72 75 63 |newbufs |= (struc|
|00004cc0| 74 20 62 75 66 20 2a 29 | 20 63 61 6c 6c 6f 63 28 |t buf *)| calloc(|
|00004cd0| 6e 6e 65 77 2c 20 73 69 | 7a 65 6f 66 28 73 74 72 |nnew, si|zeof(str|
|00004ce0| 75 63 74 20 62 75 66 29 | 29 3b 0a 58 09 69 66 20 |uct buf)|);.X.if |
|00004cf0| 28 6e 65 77 62 75 66 73 | 20 3d 3d 20 4e 55 4c 4c |(newbufs| == NULL|
|00004d00| 29 0a 58 09 09 72 65 74 | 75 72 6e 20 28 31 29 3b |).X..ret|urn (1);|
|00004d10| 0a 58 0a 58 09 2f 2a 0a | 58 09 20 2a 20 49 6e 69 |.X.X./*.|X. * Ini|
|00004d20| 74 69 61 6c 69 7a 65 20 | 74 68 65 20 6e 65 77 20 |tialize |the new |
|00004d30| 62 75 66 66 65 72 73 20 | 61 6e 64 20 6c 69 6e 6b |buffers |and link|
|00004d40| 20 74 68 65 6d 20 74 6f | 67 65 74 68 65 72 2e 0a | them to|gether..|
|00004d50| 58 09 20 2a 20 4c 69 6e | 6b 20 74 68 65 6d 20 61 |X. * Lin|k them a|
|00004d60| 6c 6c 20 6f 6e 74 6f 20 | 74 68 65 20 74 61 69 6c |ll onto |the tail|
|00004d70| 20 6f 66 20 74 68 65 20 | 62 75 66 66 65 72 20 6c | of the |buffer l|
|00004d80| 69 73 74 2e 0a 58 09 20 | 2a 2f 0a 58 09 63 68 5f |ist..X. |*/.X.ch_|
|00004d90| 6e 62 75 66 73 20 2b 3d | 20 6e 6e 65 77 3b 0a 58 |nbufs +=| nnew;.X|
|00004da0| 09 66 6f 72 20 28 62 70 | 20 3d 20 26 6e 65 77 62 |.for (bp| = &newb|
|00004db0| 75 66 73 5b 30 5d 3b 20 | 20 62 70 20 3c 20 26 6e |ufs[0]; | bp < &n|
|00004dc0| 65 77 62 75 66 73 5b 6e | 6e 65 77 5d 3b 20 20 62 |ewbufs[n|new]; b|
|00004dd0| 70 2b 2b 29 0a 58 09 7b | 0a 58 09 09 62 70 2d 3e |p++).X.{|.X..bp->|
|00004de0| 6e 65 78 74 20 3d 20 62 | 70 20 2b 20 31 3b 0a 58 |next = b|p + 1;.X|
|00004df0| 09 09 62 70 2d 3e 70 72 | 65 76 20 3d 20 62 70 20 |..bp->pr|ev = bp |
|00004e00| 2d 20 31 3b 0a 58 09 09 | 62 70 2d 3e 62 6c 6f 63 |- 1;.X..|bp->bloc|
|00004e10| 6b 20 3d 20 28 6c 6f 6e | 67 29 28 2d 31 29 3b 0a |k = (lon|g)(-1);.|
|00004e20| 58 09 7d 0a 58 09 6e 65 | 77 62 75 66 73 5b 6e 6e |X.}.X.ne|wbufs[nn|
|00004e30| 65 77 2d 31 5d 2e 6e 65 | 78 74 20 3d 20 45 4e 44 |ew-1].ne|xt = END|
|00004e40| 5f 4f 46 5f 43 48 41 49 | 4e 3b 0a 58 09 6e 65 77 |_OF_CHAI|N;.X.new|
|00004e50| 62 75 66 73 5b 30 5d 2e | 70 72 65 76 20 3d 20 62 |bufs[0].|prev = b|
|00004e60| 75 66 5f 74 61 69 6c 3b | 0a 58 09 62 75 66 5f 74 |uf_tail;|.X.buf_t|
|00004e70| 61 69 6c 2d 3e 6e 65 78 | 74 20 3d 20 26 6e 65 77 |ail->nex|t = &new|
|00004e80| 62 75 66 73 5b 30 5d 3b | 0a 58 09 62 75 66 5f 74 |bufs[0];|.X.buf_t|
|00004e90| 61 69 6c 20 3d 20 26 6e | 65 77 62 75 66 73 5b 6e |ail = &n|ewbufs[n|
|00004ea0| 6e 65 77 2d 31 5d 3b 0a | 58 09 72 65 74 75 72 6e |new-1];.|X.return|
|00004eb0| 20 28 30 29 3b 0a 58 7d | 0a 58 0a 58 2f 2a 0a 58 | (0);.X}|.X.X/*.X|
|00004ec0| 20 2a 20 55 73 65 20 74 | 68 65 20 70 69 70 65 20 | * Use t|he pipe |
|00004ed0| 66 69 6c 65 20 73 74 61 | 74 65 2e 0a 58 20 2a 2f |file sta|te..X */|
|00004ee0| 0a 58 09 70 75 62 6c 69 | 63 20 76 6f 69 64 0a 58 |.X.publi|c void.X|
|00004ef0| 63 68 5f 70 69 70 65 28 | 29 0a 58 7b 0a 58 09 74 |ch_pipe(|).X{.X.t|
|00004f00| 68 69 73 66 69 6c 65 20 | 3d 20 26 70 69 70 65 66 |hisfile |= &pipef|
|00004f10| 69 6c 65 3b 0a 58 7d 0a | 58 0a 58 2f 2a 0a 58 20 |ile;.X}.|X.X/*.X |
|00004f20| 2a 20 55 73 65 20 74 68 | 65 20 6e 6f 6e 2d 70 69 |* Use th|e non-pi|
|00004f30| 70 65 20 66 69 6c 65 20 | 73 74 61 74 65 2e 0a 58 |pe file |state..X|
|00004f40| 20 2a 2f 0a 58 09 70 75 | 62 6c 69 63 20 76 6f 69 | */.X.pu|blic voi|
|00004f50| 64 0a 58 63 68 5f 6e 6f | 6e 70 69 70 65 28 29 0a |d.Xch_no|npipe().|
|00004f60| 58 7b 0a 58 09 74 68 69 | 73 66 69 6c 65 20 3d 20 |X{.X.thi|sfile = |
|00004f70| 26 6e 6f 6e 70 69 70 65 | 66 69 6c 65 3b 0a 58 7d |&nonpipe|file;.X}|
|00004f80| 0a 45 4e 44 5f 4f 46 5f | 46 49 4c 45 0a 65 63 68 |.END_OF_|FILE.ech|
|00004f90| 6f 20 73 68 61 72 3a 20 | 45 78 74 72 61 63 74 69 |o shar: |Extracti|
|00004fa0| 6e 67 20 5c 22 63 6d 64 | 62 75 66 2e 63 5c 22 0a |ng \"cmd|buf.c\".|
|00004fb0| 73 65 64 20 22 73 2f 5e | 58 2f 2f 22 20 3e 27 63 |sed "s/^|X//" >'c|
|00004fc0| 6d 64 62 75 66 2e 63 27 | 20 3c 3c 27 45 4e 44 5f |mdbuf.c'| <<'END_|
|00004fd0| 4f 46 5f 46 49 4c 45 27 | 0a 58 2f 2a 0a 58 20 2a |OF_FILE'|.X/*.X *|
|00004fe0| 20 46 75 6e 63 74 69 6f | 6e 73 20 77 68 69 63 68 | Functio|ns which|
|00004ff0| 20 6d 61 6e 69 70 75 6c | 61 74 65 20 74 68 65 20 | manipul|ate the |
|00005000| 63 6f 6d 6d 61 6e 64 20 | 62 75 66 66 65 72 2e 0a |command |buffer..|
|00005010| 58 20 2a 20 55 73 65 64 | 20 6f 6e 6c 79 20 62 79 |X * Used| only by|
|00005020| 20 63 6f 6d 6d 61 6e 64 | 28 29 20 61 6e 64 20 72 | command|() and r|
|00005030| 65 6c 61 74 65 64 20 66 | 75 6e 63 74 69 6f 6e 73 |elated f|unctions|
|00005040| 2e 0a 58 20 2a 2f 0a 58 | 0a 58 23 69 6e 63 6c 75 |..X */.X|.X#inclu|
|00005050| 64 65 20 22 6c 65 73 73 | 2e 68 22 0a 58 0a 58 65 |de "less|.h".X.Xe|
|00005060| 78 74 65 72 6e 20 69 6e | 74 20 65 72 61 73 65 5f |xtern in|t erase_|
|00005070| 63 68 61 72 2c 20 6b 69 | 6c 6c 5f 63 68 61 72 3b |char, ki|ll_char;|
|00005080| 0a 58 65 78 74 65 72 6e | 20 69 6e 74 20 73 63 5f |.Xextern| int sc_|
|00005090| 77 69 64 74 68 3b 0a 58 | 0a 58 73 74 61 74 69 63 |width;.X|.Xstatic|
|000050a0| 20 63 68 61 72 20 63 6d | 64 62 75 66 5b 31 32 30 | char cm|dbuf[120|
|000050b0| 5d 3b 09 2f 2a 20 42 75 | 66 66 65 72 20 66 6f 72 |];./* Bu|ffer for|
|000050c0| 20 68 6f 6c 64 69 6e 67 | 20 61 20 6d 75 6c 74 69 | holding| a multi|
|000050d0| 2d 63 68 61 72 20 63 6f | 6d 6d 61 6e 64 20 2a 2f |-char co|mmand */|
|000050e0| 0a 58 73 74 61 74 69 63 | 20 69 6e 74 20 63 6d 64 |.Xstatic| int cmd|
|000050f0| 5f 63 6f 6c 3b 09 09 2f | 2a 20 43 75 72 72 65 6e |_col;../|* Curren|
|00005100| 74 20 63 6f 6c 75 6d 6e | 20 6f 66 20 74 68 65 20 |t column| of the |
|00005110| 6d 75 6c 74 69 2d 63 68 | 61 72 20 63 6f 6d 6d 61 |multi-ch|ar comma|
|00005120| 6e 64 20 2a 2f 0a 58 73 | 74 61 74 69 63 20 63 68 |nd */.Xs|tatic ch|
|00005130| 61 72 20 2a 63 70 3b 09 | 09 2f 2a 20 50 6f 69 6e |ar *cp;.|./* Poin|
|00005140| 74 65 72 20 69 6e 74 6f | 20 63 6d 64 62 75 66 20 |ter into| cmdbuf |
|00005150| 2a 2f 0a 58 0a 58 2f 2a | 0a 58 20 2a 20 52 65 73 |*/.X.X/*|.X * Res|
|00005160| 65 74 20 63 6f 6d 6d 61 | 6e 64 20 62 75 66 66 65 |et comma|nd buffe|
|00005170| 72 20 28 74 6f 20 65 6d | 70 74 79 29 2e 0a 58 20 |r (to em|pty)..X |
|00005180| 2a 2f 0a 58 09 70 75 62 | 6c 69 63 20 76 6f 69 64 |*/.X.pub|lic void|
|00005190| 0a 58 63 6d 64 5f 72 65 | 73 65 74 28 29 0a 58 7b |.Xcmd_re|set().X{|
|000051a0| 0a 58 09 63 70 20 3d 20 | 63 6d 64 62 75 66 3b 0a |.X.cp = |cmdbuf;.|
|000051b0| 58 09 2a 63 70 20 3d 20 | 27 5c 30 27 3b 0a 58 09 |X.*cp = |'\0';.X.|
|000051c0| 63 6d 64 5f 63 6f 6c 20 | 3d 20 30 3b 0a 58 7d 0a |cmd_col |= 0;.X}.|
|000051d0| 58 0a 58 2f 2a 0a 58 20 | 2a 20 48 6f 77 20 6d 61 |X.X/*.X |* How ma|
|000051e0| 6e 79 20 63 68 61 72 61 | 63 74 65 72 73 20 61 72 |ny chara|cters ar|
|000051f0| 65 20 69 6e 20 74 68 65 | 20 63 6f 6d 6d 61 6e 64 |e in the| command|
|00005200| 20 62 75 66 66 65 72 3f | 0a 58 20 2a 2f 0a 58 09 | buffer?|.X */.X.|
|00005210| 70 75 62 6c 69 63 20 69 | 6e 74 0a 58 6c 65 6e 5f |public i|nt.Xlen_|
|00005220| 63 6d 64 62 75 66 28 29 | 0a 58 7b 0a 58 09 72 65 |cmdbuf()|.X{.X.re|
|00005230| 74 75 72 6e 20 28 63 70 | 20 2d 20 63 6d 64 62 75 |turn (cp| - cmdbu|
|00005240| 66 29 3b 0a 58 7d 0a 58 | 0a 58 2f 2a 0a 58 20 2a |f);.X}.X|.X/*.X *|
|00005250| 20 42 61 63 6b 73 70 61 | 63 65 20 69 6e 20 74 68 | Backspa|ce in th|
|00005260| 65 20 63 6f 6d 6d 61 6e | 64 20 62 75 66 66 65 72 |e comman|d buffer|
|00005270| 2e 0a 58 20 2a 2f 0a 58 | 09 70 75 62 6c 69 63 20 |..X */.X|.public |
|00005280| 69 6e 74 0a 58 63 6d 64 | 5f 65 72 61 73 65 28 29 |int.Xcmd|_erase()|
|00005290| 0a 58 7b 0a 58 09 72 65 | 67 69 73 74 65 72 20 63 |.X{.X.re|gister c|
|000052a0| 68 61 72 20 2a 73 3b 0a | 58 0a 58 09 69 66 20 28 |har *s;.|X.X.if (|
|000052b0| 63 70 20 3d 3d 20 63 6d | 64 62 75 66 29 0a 58 09 |cp == cm|dbuf).X.|
|000052c0| 09 2f 2a 0a 58 09 09 20 | 2a 20 42 61 63 6b 73 70 |./*.X.. |* Backsp|
|000052d0| 61 63 65 20 70 61 73 74 | 20 62 65 67 69 6e 6e 69 |ace past| beginni|
|000052e0| 6e 67 20 6f 66 20 74 68 | 65 20 73 74 72 69 6e 67 |ng of th|e string|
|000052f0| 3a 0a 58 09 09 20 2a 20 | 74 68 69 73 20 75 73 75 |:.X.. * |this usu|
|00005300| 61 6c 6c 79 20 6d 65 61 | 6e 73 20 61 62 6f 72 74 |ally mea|ns abort|
|00005310| 20 74 68 65 20 63 6f 6d | 6d 61 6e 64 2e 0a 58 09 | the com|mand..X.|
|00005320| 09 20 2a 2f 0a 58 09 09 | 72 65 74 75 72 6e 20 28 |. */.X..|return (|
|00005330| 31 29 3b 0a 58 0a 58 09 | 2d 2d 63 70 3b 0a 58 09 |1);.X.X.|--cp;.X.|
|00005340| 69 66 20 28 2a 63 70 20 | 3d 3d 20 45 53 43 29 0a |if (*cp |== ESC).|
|00005350| 58 09 09 73 20 3d 20 22 | 45 53 43 22 3b 0a 58 09 |X..s = "|ESC";.X.|
|00005360| 65 6c 73 65 0a 58 09 09 | 73 20 3d 20 70 72 63 68 |else.X..|s = prch|
|00005370| 61 72 28 2a 63 70 29 3b | 0a 58 09 77 68 69 6c 65 |ar(*cp);|.X.while|
|00005380| 20 28 2a 73 2b 2b 20 21 | 3d 20 27 5c 30 27 29 0a | (*s++ !|= '\0').|
|00005390| 58 09 7b 0a 58 09 09 62 | 61 63 6b 73 70 61 63 65 |X.{.X..b|ackspace|
|000053a0| 28 29 3b 0a 58 09 09 63 | 6d 64 5f 63 6f 6c 2d 2d |();.X..c|md_col--|
|000053b0| 3b 0a 58 09 7d 0a 58 09 | 2a 63 70 20 3d 20 27 5c |;.X.}.X.|*cp = '\|
|000053c0| 30 27 3b 0a 58 09 72 65 | 74 75 72 6e 20 28 30 29 |0';.X.re|turn (0)|
|000053d0| 3b 0a 58 7d 0a 58 0a 58 | 2f 2a 0a 58 20 2a 20 50 |;.X}.X.X|/*.X * P|
|000053e0| 72 6f 63 65 73 73 20 61 | 20 73 69 6e 67 6c 65 20 |rocess a| single |
|000053f0| 63 68 61 72 61 63 74 65 | 72 20 6f 66 20 61 20 6d |characte|r of a m|
|00005400| 75 6c 74 69 2d 63 68 61 | 72 61 63 74 65 72 20 63 |ulti-cha|racter c|
|00005410| 6f 6d 6d 61 6e 64 2c 20 | 73 75 63 68 20 61 73 0a |ommand, |such as.|
|00005420| 58 20 2a 20 61 20 6e 75 | 6d 62 65 72 2c 20 6f 72 |X * a nu|mber, or|
|00005430| 20 74 68 65 20 70 61 74 | 74 65 72 6e 20 6f 66 20 | the pat|tern of |
|00005440| 61 20 73 65 61 72 63 68 | 20 63 6f 6d 6d 61 6e 64 |a search| command|
|00005450| 2e 0a 58 20 2a 2f 0a 58 | 09 70 75 62 6c 69 63 20 |..X */.X|.public |
|00005460| 69 6e 74 0a 58 63 6d 64 | 5f 63 68 61 72 28 63 29 |int.Xcmd|_char(c)|
|00005470| 0a 58 09 69 6e 74 20 63 | 3b 0a 58 7b 0a 58 09 63 |.X.int c|;.X{.X.c|
|00005480| 68 61 72 20 2a 73 3b 0a | 58 0a 58 09 69 66 20 28 |har *s;.|X.X.if (|
|00005490| 63 20 3d 3d 20 65 72 61 | 73 65 5f 63 68 61 72 29 |c == era|se_char)|
|000054a0| 0a 58 09 7b 0a 58 09 09 | 69 66 20 28 63 6d 64 5f |.X.{.X..|if (cmd_|
|000054b0| 65 72 61 73 65 28 29 29 | 0a 58 09 09 09 72 65 74 |erase())|.X...ret|
|000054c0| 75 72 6e 20 28 31 29 3b | 0a 58 09 7d 20 65 6c 73 |urn (1);|.X.} els|
|000054d0| 65 20 69 66 20 28 63 20 | 3d 3d 20 6b 69 6c 6c 5f |e if (c |== kill_|
|000054e0| 63 68 61 72 29 0a 58 09 | 7b 0a 58 09 09 2f 2a 20 |char).X.|{.X../* |
|000054f0| 7b 7b 20 43 6f 75 6c 64 | 20 64 6f 20 74 68 69 73 |{{ Could| do this|
|00005500| 20 66 61 73 74 65 72 2c | 20 62 75 74 20 77 68 6f | faster,| but who|
|00005510| 20 63 61 72 65 73 3f 20 | 7d 7d 20 2a 2f 0a 58 09 | cares? |}} */.X.|
|00005520| 09 77 68 69 6c 65 20 28 | 63 6d 64 5f 65 72 61 73 |.while (|cmd_eras|
|00005530| 65 28 29 20 3d 3d 20 30 | 29 0a 58 09 09 09 3b 0a |e() == 0|).X...;.|
|00005540| 58 09 7d 20 65 6c 73 65 | 20 69 66 20 28 63 70 20 |X.} else| if (cp |
|00005550| 3e 3d 20 26 63 6d 64 62 | 75 66 5b 73 69 7a 65 6f |>= &cmdb|uf[sizeo|
|00005560| 66 28 63 6d 64 62 75 66 | 29 2d 31 5d 29 0a 58 09 |f(cmdbuf|)-1]).X.|
|00005570| 7b 0a 58 09 09 2f 2a 0a | 58 09 09 20 2a 20 4e 6f |{.X../*.|X.. * No|
|00005580| 20 72 6f 6f 6d 20 69 6e | 20 74 68 65 20 63 6f 6d | room in| the com|
|00005590| 6d 61 6e 64 20 62 75 66 | 66 65 72 2e 0a 58 09 09 |mand buf|fer..X..|
|000055a0| 20 2a 2f 0a 58 09 09 62 | 65 6c 6c 28 29 3b 0a 58 | */.X..b|ell();.X|
|000055b0| 09 7d 20 65 6c 73 65 20 | 69 66 20 28 63 6d 64 5f |.} else |if (cmd_|
|000055c0| 63 6f 6c 20 3e 3d 20 73 | 63 5f 77 69 64 74 68 2d |col >= s|c_width-|
|000055d0| 34 29 0a 58 09 7b 0a 58 | 09 09 2f 2a 0a 58 09 09 |4).X.{.X|../*.X..|
|000055e0| 20 2a 20 4e 6f 20 72 6f | 6f 6d 20 6f 6e 20 74 68 | * No ro|om on th|
|000055f0| 65 20 73 63 72 65 65 6e | 2e 0a 58 09 09 20 2a 20 |e screen|..X.. * |
|00005600| 7b 7b 20 43 6f 75 6c 64 | 20 67 65 74 20 66 61 6e |{{ Could| get fan|
|00005610| 63 79 20 68 65 72 65 3b | 20 6d 61 79 62 65 20 73 |cy here;| maybe s|
|00005620| 68 69 66 74 20 74 68 65 | 20 64 69 73 70 6c 61 79 |hift the| display|
|00005630| 65 64 0a 58 09 09 20 2a | 20 20 20 20 6c 69 6e 65 |ed.X.. *| line|
|00005640| 20 61 6e 64 20 6d 61 6b | 65 20 72 6f 6f 6d 20 66 | and mak|e room f|
|00005650| 6f 72 20 6d 6f 72 65 20 | 63 68 61 72 73 2c 20 6c |or more |chars, l|
|00005660| 69 6b 65 20 6b 73 68 2e | 20 7d 7d 0a 58 09 09 20 |ike ksh.| }}.X.. |
|00005670| 2a 2f 0a 58 09 09 62 65 | 6c 6c 28 29 3b 0a 58 09 |*/.X..be|ll();.X.|
|00005680| 7d 20 65 6c 73 65 0a 58 | 09 7b 0a 58 09 09 2f 2a |} else.X|.{.X../*|
|00005690| 0a 58 09 09 20 2a 20 41 | 70 70 65 6e 64 20 74 68 |.X.. * A|ppend th|
|000056a0| 65 20 63 68 61 72 61 63 | 74 65 72 20 74 6f 20 74 |e charac|ter to t|
|000056b0| 68 65 20 73 74 72 69 6e | 67 2e 0a 58 09 09 20 2a |he strin|g..X.. *|
|000056c0| 2f 0a 58 09 09 2a 63 70 | 2b 2b 20 3d 20 63 3b 0a |/.X..*cp|++ = c;.|
|000056d0| 58 09 09 2a 63 70 20 3d | 20 27 5c 30 27 3b 0a 58 |X..*cp =| '\0';.X|
|000056e0| 09 09 69 66 20 28 63 20 | 3d 3d 20 45 53 43 29 0a |..if (c |== ESC).|
|000056f0| 58 09 09 09 73 20 3d 20 | 22 45 53 43 22 3b 0a 58 |X...s = |"ESC";.X|
|00005700| 09 09 65 6c 73 65 0a 58 | 09 09 09 73 20 3d 20 70 |..else.X|...s = p|
|00005710| 72 63 68 61 72 28 63 29 | 3b 0a 58 09 09 70 75 74 |rchar(c)|;.X..put|
|00005720| 73 74 72 28 73 29 3b 0a | 58 09 09 63 6d 64 5f 63 |str(s);.|X..cmd_c|
|00005730| 6f 6c 20 2b 3d 20 73 74 | 72 6c 65 6e 28 73 29 3b |ol += st|rlen(s);|
|00005740| 0a 58 09 7d 0a 58 09 72 | 65 74 75 72 6e 20 28 30 |.X.}.X.r|eturn (0|
|00005750| 29 3b 0a 58 7d 0a 58 0a | 58 2f 2a 0a 58 20 2a 20 |);.X}.X.|X/*.X * |
|00005760| 52 65 74 75 72 6e 20 74 | 68 65 20 6e 75 6d 62 65 |Return t|he numbe|
|00005770| 72 20 63 75 72 72 65 6e | 74 6c 79 20 69 6e 20 74 |r curren|tly in t|
|00005780| 68 65 20 63 6f 6d 6d 61 | 6e 64 20 62 75 66 66 65 |he comma|nd buffe|
|00005790| 72 2e 0a 58 20 2a 2f 0a | 58 09 70 75 62 6c 69 63 |r..X */.|X.public|
|000057a0| 20 69 6e 74 0a 58 63 6d | 64 5f 69 6e 74 28 29 0a | int.Xcm|d_int().|
|000057b0| 58 7b 0a 58 09 72 65 74 | 75 72 6e 20 28 61 74 6f |X{.X.ret|urn (ato|
|000057c0| 69 28 63 6d 64 62 75 66 | 29 29 3b 0a 58 7d 0a 58 |i(cmdbuf|));.X}.X|
|000057d0| 0a 58 2f 2a 0a 58 20 2a | 20 44 69 73 70 6c 61 79 |.X/*.X *| Display|
|000057e0| 20 61 20 73 74 72 69 6e | 67 2c 20 75 73 75 61 6c | a strin|g, usual|
|000057f0| 6c 79 20 61 73 20 61 20 | 70 72 6f 6d 70 74 20 66 |ly as a |prompt f|
|00005800| 6f 72 20 69 6e 70 75 74 | 20 69 6e 74 6f 20 74 68 |or input| into th|
|00005810| 65 20 63 6f 6d 6d 61 6e | 64 20 62 75 66 66 65 72 |e comman|d buffer|
|00005820| 2e 0a 58 20 2a 2f 0a 58 | 09 70 75 62 6c 69 63 20 |..X */.X|.public |
|00005830| 76 6f 69 64 0a 58 63 6d | 64 5f 70 75 74 73 74 72 |void.Xcm|d_putstr|
|00005840| 28 73 29 0a 58 09 63 68 | 61 72 20 2a 73 3b 0a 58 |(s).X.ch|ar *s;.X|
|00005850| 7b 0a 58 09 70 75 74 73 | 74 72 28 73 29 3b 0a 58 |{.X.puts|tr(s);.X|
|00005860| 09 63 6d 64 5f 63 6f 6c | 20 2b 3d 20 73 74 72 6c |.cmd_col| += strl|
|00005870| 65 6e 28 73 29 3b 0a 58 | 7d 0a 58 0a 58 2f 2a 0a |en(s);.X|}.X.X/*.|
|00005880| 58 20 2a 20 52 65 74 75 | 72 6e 20 61 20 70 6f 69 |X * Retu|rn a poi|
|00005890| 6e 74 65 72 20 74 6f 20 | 74 68 65 20 63 6f 6d 6d |nter to |the comm|
|000058a0| 61 6e 64 20 62 75 66 66 | 65 72 2e 0a 58 20 2a 2f |and buff|er..X */|
|000058b0| 0a 58 09 70 75 62 6c 69 | 63 20 63 68 61 72 20 2a |.X.publi|c char *|
|000058c0| 0a 58 67 65 74 5f 63 6d | 64 62 75 66 28 29 0a 58 |.Xget_cm|dbuf().X|
|000058d0| 7b 0a 58 09 72 65 74 75 | 72 6e 20 28 63 6d 64 62 |{.X.retu|rn (cmdb|
|000058e0| 75 66 29 3b 0a 58 7d 0a | 45 4e 44 5f 4f 46 5f 46 |uf);.X}.|END_OF_F|
|000058f0| 49 4c 45 0a 65 63 68 6f | 20 73 68 61 72 3a 20 45 |ILE.echo| shar: E|
|00005900| 78 74 72 61 63 74 69 6e | 67 20 5c 22 63 6f 6d 6d |xtractin|g \"comm|
|00005910| 61 6e 64 2e 63 5c 22 0a | 73 65 64 20 22 73 2f 5e |and.c\".|sed "s/^|
|00005920| 58 2f 2f 22 20 3e 27 63 | 6f 6d 6d 61 6e 64 2e 63 |X//" >'c|ommand.c|
|00005930| 27 20 3c 3c 27 45 4e 44 | 5f 4f 46 5f 46 49 4c 45 |' <<'END|_OF_FILE|
|00005940| 27 0a 58 2f 2a 0a 58 20 | 2a 20 55 73 65 72 2d 6c |'.X/*.X |* User-l|
|00005950| 65 76 65 6c 20 63 6f 6d | 6d 61 6e 64 20 70 72 6f |evel com|mand pro|
|00005960| 63 65 73 73 6f 72 2e 0a | 58 20 2a 2f 0a 58 0a 58 |cessor..|X */.X.X|
|00005970| 23 69 6e 63 6c 75 64 65 | 20 22 6c 65 73 73 2e 68 |#include| "less.h|
|00005980| 22 0a 58 23 69 6e 63 6c | 75 64 65 20 22 70 6f 73 |".X#incl|ude "pos|
|00005990| 69 74 69 6f 6e 2e 68 22 | 0a 58 23 69 6e 63 6c 75 |ition.h"|.X#inclu|
|000059a0| 64 65 20 22 6f 70 74 69 | 6f 6e 2e 68 22 0a 58 23 |de "opti|on.h".X#|
|000059b0| 69 6e 63 6c 75 64 65 20 | 22 63 6d 64 2e 68 22 0a |include |"cmd.h".|
|000059c0| 58 0a 58 23 64 65 66 69 | 6e 65 09 4e 4f 5f 4d 43 |X.X#defi|ne.NO_MC|
|000059d0| 41 09 09 30 0a 58 23 64 | 65 66 69 6e 65 09 4d 43 |A..0.X#d|efine.MC|
|000059e0| 41 5f 44 4f 4e 45 09 31 | 0a 58 23 64 65 66 69 6e |A_DONE.1|.X#defin|
|000059f0| 65 09 4d 43 41 5f 4d 4f | 52 45 09 32 0a 58 0a 58 |e.MCA_MO|RE.2.X.X|
|00005a00| 65 78 74 65 72 6e 20 69 | 6e 74 20 65 72 61 73 65 |extern i|nt erase|
|00005a10| 5f 63 68 61 72 2c 20 6b | 69 6c 6c 5f 63 68 61 72 |_char, k|ill_char|
|00005a20| 3b 0a 58 65 78 74 65 72 | 6e 20 69 6e 74 20 69 73 |;.Xexter|n int is|
|00005a30| 70 69 70 65 3b 0a 58 65 | 78 74 65 72 6e 20 69 6e |pipe;.Xe|xtern in|
|00005a40| 74 20 73 69 67 73 3b 0a | 58 65 78 74 65 72 6e 20 |t sigs;.|Xextern |
|00005a50| 69 6e 74 20 71 75 69 74 | 5f 61 74 5f 65 6f 66 3b |int quit|_at_eof;|
|00005a60| 0a 58 65 78 74 65 72 6e | 20 69 6e 74 20 68 69 74 |.Xextern| int hit|
|00005a70| 5f 65 6f 66 3b 0a 58 65 | 78 74 65 72 6e 20 69 6e |_eof;.Xe|xtern in|
|00005a80| 74 20 73 63 5f 77 69 64 | 74 68 3b 0a 58 65 78 74 |t sc_wid|th;.Xext|
|00005a90| 65 72 6e 20 69 6e 74 20 | 73 63 5f 68 65 69 67 68 |ern int |sc_heigh|
|00005aa0| 74 3b 0a 58 65 78 74 65 | 72 6e 20 69 6e 74 20 73 |t;.Xexte|rn int s|
|00005ab0| 77 69 6e 64 6f 77 3b 0a | 58 65 78 74 65 72 6e 20 |window;.|Xextern |
|00005ac0| 69 6e 74 20 6a 75 6d 70 | 5f 73 6c 69 6e 65 3b 0a |int jump|_sline;.|
|00005ad0| 58 65 78 74 65 72 6e 20 | 69 6e 74 20 71 75 69 74 |Xextern |int quit|
|00005ae0| 74 69 6e 67 3b 0a 58 65 | 78 74 65 72 6e 20 69 6e |ting;.Xe|xtern in|
|00005af0| 74 20 73 63 72 6f 6c 6c | 3b 0a 58 65 78 74 65 72 |t scroll|;.Xexter|
|00005b00| 6e 20 69 6e 74 20 6e 6f | 68 65 6c 70 3b 0a 58 65 |n int no|help;.Xe|
|00005b10| 78 74 65 72 6e 20 69 6e | 74 20 69 67 6e 6f 72 65 |xtern in|t ignore|
|00005b20| 5f 65 6f 69 3b 0a 58 65 | 78 74 65 72 6e 20 63 68 |_eoi;.Xe|xtern ch|
|00005b30| 61 72 20 2a 65 76 65 72 | 79 5f 66 69 72 73 74 5f |ar *ever|y_first_|
|00005b40| 63 6d 64 3b 0a 58 65 78 | 74 65 72 6e 20 63 68 61 |cmd;.Xex|tern cha|
|00005b50| 72 20 76 65 72 73 69 6f | 6e 5b 5d 3b 0a 58 65 78 |r versio|n[];.Xex|
|00005b60| 74 65 72 6e 20 73 74 72 | 75 63 74 20 73 63 72 70 |tern str|uct scrp|
|00005b70| 6f 73 20 69 6e 69 74 69 | 61 6c 5f 73 63 72 70 6f |os initi|al_scrpo|
|00005b80| 73 3b 0a 58 65 78 74 65 | 72 6e 20 49 46 49 4c 45 |s;.Xexte|rn IFILE|
|00005b90| 20 63 75 72 72 5f 69 66 | 69 6c 65 3b 0a 58 23 69 | curr_if|ile;.X#i|
|00005ba0| 66 20 45 44 49 54 4f 52 | 0a 58 65 78 74 65 72 6e |f EDITOR|.Xextern|
|00005bb0| 20 63 68 61 72 20 2a 65 | 64 69 74 6f 72 3b 0a 58 | char *e|ditor;.X|
|00005bc0| 65 78 74 65 72 6e 20 63 | 68 61 72 20 2a 65 64 69 |extern c|har *edi|
|00005bd0| 74 70 72 6f 74 6f 3b 0a | 58 23 65 6e 64 69 66 0a |tproto;.|X#endif.|
|00005be0| 58 65 78 74 65 72 6e 20 | 69 6e 74 20 73 63 72 65 |Xextern |int scre|
|00005bf0| 65 6e 5f 74 72 61 73 68 | 65 64 3b 09 2f 2a 20 54 |en_trash|ed;./* T|
|00005c00| 68 65 20 73 63 72 65 65 | 6e 20 68 61 73 20 62 65 |he scree|n has be|
|00005c10| 65 6e 20 6f 76 65 72 77 | 72 69 74 74 65 6e 20 2a |en overw|ritten *|
|00005c20| 2f 0a 58 0a 58 73 74 61 | 74 69 63 20 63 68 61 72 |/.X.Xsta|tic char|
|00005c30| 20 75 6e 67 6f 74 5b 31 | 30 30 5d 3b 0a 58 73 74 | ungot[1|00];.Xst|
|00005c40| 61 74 69 63 20 63 68 61 | 72 20 2a 75 6e 67 6f 74 |atic cha|r *ungot|
|00005c50| 70 20 3d 20 4e 55 4c 4c | 3b 0a 58 23 69 66 20 53 |p = NULL|;.X#if S|
|00005c60| 48 45 4c 4c 5f 45 53 43 | 41 50 45 0a 58 73 74 61 |HELL_ESC|APE.Xsta|
|00005c70| 74 69 63 20 63 68 61 72 | 20 2a 73 68 65 6c 6c 63 |tic char| *shellc|
|00005c80| 6d 64 20 3d 20 4e 55 4c | 4c 3b 09 2f 2a 20 46 6f |md = NUL|L;./* Fo|
|00005c90| 72 20 68 6f 6c 64 69 6e | 67 20 6c 61 73 74 20 73 |r holdin|g last s|
|00005ca0| 68 65 6c 6c 20 63 6f 6d | 6d 61 6e 64 20 66 6f 72 |hell com|mand for|
|00005cb0| 20 22 21 21 22 20 2a 2f | 0a 58 23 65 6e 64 69 66 | "!!" */|.X#endif|
|00005cc0| 0a 58 73 74 61 74 69 63 | 20 69 6e 74 20 6d 63 61 |.Xstatic| int mca|
|00005cd0| 3b 09 09 09 2f 2a 20 54 | 68 65 20 6d 75 6c 74 69 |;.../* T|he multi|
|00005ce0| 63 68 61 72 61 63 74 65 | 72 20 63 6f 6d 6d 61 6e |characte|r comman|
|00005cf0| 64 20 28 61 63 74 69 6f | 6e 29 20 2a 2f 0a 58 73 |d (actio|n) */.Xs|
|00005d00| 74 61 74 69 63 20 69 6e | 74 20 73 65 61 72 63 68 |tatic in|t search|
|00005d10| 5f 74 79 70 65 3b 09 09 | 2f 2a 20 54 68 65 20 70 |_type;..|/* The p|
|00005d20| 72 65 76 69 6f 75 73 20 | 74 79 70 65 20 6f 66 20 |revious |type of |
|00005d30| 73 65 61 72 63 68 20 2a | 2f 0a 58 73 74 61 74 69 |search *|/.Xstati|
|00005d40| 63 20 69 6e 74 20 6e 75 | 6d 62 65 72 3b 09 09 2f |c int nu|mber;../|
|00005d50| 2a 20 54 68 65 20 6e 75 | 6d 62 65 72 20 74 79 70 |* The nu|mber typ|
|00005d60| 65 64 20 62 79 20 74 68 | 65 20 75 73 65 72 20 2a |ed by th|e user *|
|00005d70| 2f 0a 58 73 74 61 74 69 | 63 20 63 68 61 72 20 6f |/.Xstati|c char o|
|00005d80| 70 74 63 68 61 72 3b 0a | 58 73 74 61 74 69 63 20 |ptchar;.|Xstatic |
|00005d90| 69 6e 74 20 6f 70 74 66 | 6c 61 67 3b 0a 58 23 69 |int optf|lag;.X#i|
|00005da0| 66 20 50 49 50 45 43 0a | 58 73 74 61 74 69 63 20 |f PIPEC.|Xstatic |
|00005db0| 63 68 61 72 20 70 69 70 | 65 63 3b 0a 58 23 65 6e |char pip|ec;.X#en|
|00005dc0| 64 69 66 0a 58 0a 58 73 | 74 61 74 69 63 20 76 6f |dif.X.Xs|tatic vo|
|00005dd0| 69 64 20 6d 75 6c 74 69 | 5f 73 65 61 72 63 68 28 |id multi|_search(|
|00005de0| 29 3b 0a 58 0a 58 2f 2a | 0a 58 20 2a 20 4d 6f 76 |);.X.X/*|.X * Mov|
|00005df0| 65 20 74 68 65 20 63 75 | 72 73 6f 72 20 74 6f 20 |e the cu|rsor to |
|00005e00| 6c 6f 77 65 72 20 6c 65 | 66 74 20 62 65 66 6f 72 |lower le|ft befor|
|00005e10| 65 20 65 78 65 63 75 74 | 69 6e 67 20 61 20 63 6f |e execut|ing a co|
|00005e20| 6d 6d 61 6e 64 2e 0a 58 | 20 2a 20 54 68 69 73 20 |mmand..X| * This |
|00005e30| 6c 6f 6f 6b 73 20 6e 69 | 63 65 72 20 69 66 20 74 |looks ni|cer if t|
|00005e40| 68 65 20 63 6f 6d 6d 61 | 6e 64 20 74 61 6b 65 73 |he comma|nd takes|
|00005e50| 20 61 20 6c 6f 6e 67 20 | 74 69 6d 65 20 62 65 66 | a long |time bef|
|00005e60| 6f 72 65 0a 58 20 2a 20 | 75 70 64 61 74 69 6e 67 |ore.X * |updating|
|00005e70| 20 74 68 65 20 73 63 72 | 65 65 6e 2e 0a 58 20 2a | the scr|een..X *|
|00005e80| 2f 0a 58 09 73 74 61 74 | 69 63 20 76 6f 69 64 0a |/.X.stat|ic void.|
|00005e90| 58 63 6d 64 5f 65 78 65 | 63 28 29 0a 58 7b 0a 58 |Xcmd_exe|c().X{.X|
|00005ea0| 09 6c 6f 77 65 72 5f 6c | 65 66 74 28 29 3b 0a 58 |.lower_l|eft();.X|
|00005eb0| 09 66 6c 75 73 68 28 29 | 3b 0a 58 7d 0a 58 0a 58 |.flush()|;.X}.X.X|
|00005ec0| 2f 2a 0a 58 20 2a 20 53 | 65 74 20 75 70 20 74 68 |/*.X * S|et up th|
|00005ed0| 65 20 64 69 73 70 6c 61 | 79 20 74 6f 20 73 74 61 |e displa|y to sta|
|00005ee0| 72 74 20 61 20 6e 65 77 | 20 6d 75 6c 74 69 2d 63 |rt a new| multi-c|
|00005ef0| 68 61 72 61 63 74 65 72 | 20 63 6f 6d 6d 61 6e 64 |haracter| command|
|00005f00| 2e 0a 58 20 2a 2f 0a 58 | 09 73 74 61 74 69 63 20 |..X */.X|.static |
|00005f10| 76 6f 69 64 0a 58 73 74 | 61 72 74 5f 6d 63 61 28 |void.Xst|art_mca(|
|00005f20| 61 63 74 69 6f 6e 2c 20 | 70 72 6f 6d 70 74 29 0a |action, |prompt).|
|00005f30| 58 09 69 6e 74 20 61 63 | 74 69 6f 6e 3b 0a 58 09 |X.int ac|tion;.X.|
|00005f40| 63 68 61 72 20 2a 70 72 | 6f 6d 70 74 3b 0a 58 7b |char *pr|ompt;.X{|
|00005f50| 0a 58 09 6d 63 61 20 3d | 20 61 63 74 69 6f 6e 3b |.X.mca =| action;|
|00005f60| 0a 58 09 6c 6f 77 65 72 | 5f 6c 65 66 74 28 29 3b |.X.lower|_left();|
|00005f70| 0a 58 09 63 6c 65 61 72 | 5f 65 6f 6c 28 29 3b 0a |.X.clear|_eol();.|
|00005f80| 58 09 63 6d 64 5f 70 75 | 74 73 74 72 28 70 72 6f |X.cmd_pu|tstr(pro|
|00005f90| 6d 70 74 29 3b 0a 58 7d | 0a 58 0a 58 2f 2a 0a 58 |mpt);.X}|.X.X/*.X|
|00005fa0| 20 2a 20 53 65 74 20 75 | 70 20 74 68 65 20 64 69 | * Set u|p the di|
|00005fb0| 73 70 6c 61 79 20 74 6f | 20 73 74 61 72 74 20 61 |splay to| start a|
|00005fc0| 20 6e 65 77 20 73 65 61 | 72 63 68 20 63 6f 6d 6d | new sea|rch comm|
|00005fd0| 61 6e 64 2e 0a 58 20 2a | 2f 0a 58 09 73 74 61 74 |and..X *|/.X.stat|
|00005fe0| 69 63 20 76 6f 69 64 0a | 58 73 65 61 72 63 68 5f |ic void.|Xsearch_|
|00005ff0| 6d 63 61 28 29 0a 58 7b | 0a 58 09 73 77 69 74 63 |mca().X{|.X.switc|
|00006000| 68 20 28 53 52 43 48 5f | 44 49 52 28 73 65 61 72 |h (SRCH_|DIR(sear|
|00006010| 63 68 5f 74 79 70 65 29 | 29 0a 58 09 7b 0a 58 09 |ch_type)|).X.{.X.|
|00006020| 63 61 73 65 20 53 52 43 | 48 5f 46 4f 52 57 3a 0a |case SRC|H_FORW:.|
|00006030| 58 09 09 6d 63 61 20 3d | 20 41 5f 46 5f 53 45 41 |X..mca =| A_F_SEA|
|00006040| 52 43 48 3b 0a 58 09 09 | 62 72 65 61 6b 3b 0a 58 |RCH;.X..|break;.X|
|00006050| 09 63 61 73 65 20 53 52 | 43 48 5f 42 41 43 4b 3a |.case SR|CH_BACK:|
|00006060| 0a 58 09 09 6d 63 61 20 | 3d 20 41 5f 42 5f 53 45 |.X..mca |= A_B_SE|
|00006070| 41 52 43 48 3b 0a 58 09 | 09 62 72 65 61 6b 3b 0a |ARCH;.X.|.break;.|
|00006080| 58 09 7d 0a 58 0a 58 09 | 6c 6f 77 65 72 5f 6c 65 |X.}.X.X.|lower_le|
|00006090| 66 74 28 29 3b 0a 58 09 | 63 6c 65 61 72 5f 65 6f |ft();.X.|clear_eo|
|000060a0| 6c 28 29 3b 0a 58 0a 58 | 09 69 66 20 28 73 65 61 |l();.X.X|.if (sea|
|000060b0| 72 63 68 5f 74 79 70 65 | 20 26 20 53 52 43 48 5f |rch_type| & SRCH_|
|000060c0| 46 49 52 53 54 5f 46 49 | 4c 45 29 0a 58 09 09 63 |FIRST_FI|LE).X..c|
|000060d0| 6d 64 5f 70 75 74 73 74 | 72 28 22 40 22 29 3b 0a |md_putst|r("@");.|
|000060e0| 58 09 65 6c 73 65 0a 58 | 09 09 63 6d 64 5f 70 75 |X.else.X|..cmd_pu|
|000060f0| 74 73 74 72 28 22 20 22 | 29 3b 0a 58 0a 58 09 69 |tstr(" "|);.X.X.i|
|00006100| 66 20 28 73 65 61 72 63 | 68 5f 74 79 70 65 20 26 |f (searc|h_type &|
|00006110| 20 53 52 43 48 5f 50 41 | 53 54 5f 45 4f 46 29 0a | SRCH_PA|ST_EOF).|
|00006120| 58 09 09 63 6d 64 5f 70 | 75 74 73 74 72 28 22 2a |X..cmd_p|utstr("*|
|00006130| 22 29 3b 0a 58 09 65 6c | 73 65 0a 58 09 09 63 6d |");.X.el|se.X..cm|
|00006140| 64 5f 70 75 74 73 74 72 | 28 22 20 22 29 3b 0a 58 |d_putstr|(" ");.X|
|00006150| 0a 58 09 63 6d 64 5f 70 | 75 74 73 74 72 28 22 20 |.X.cmd_p|utstr(" |
|00006160| 22 29 3b 0a 58 0a 58 09 | 69 66 20 28 73 65 61 72 |");.X.X.|if (sear|
|00006170| 63 68 5f 74 79 70 65 20 | 26 20 53 52 43 48 5f 4e |ch_type |& SRCH_N|
|00006180| 4f 4d 41 54 43 48 29 0a | 58 09 09 63 6d 64 5f 70 |OMATCH).|X..cmd_p|
|00006190| 75 74 73 74 72 28 22 21 | 22 29 3b 0a 58 09 65 6c |utstr("!|");.X.el|
|000061a0| 73 65 0a 58 09 09 63 6d | 64 5f 70 75 74 73 74 72 |se.X..cm|d_putstr|
|000061b0| 28 22 20 22 29 3b 0a 58 | 0a 58 09 73 77 69 74 63 |(" ");.X|.X.switc|
|000061c0| 68 20 28 53 52 43 48 5f | 44 49 52 28 73 65 61 72 |h (SRCH_|DIR(sear|
|000061d0| 63 68 5f 74 79 70 65 29 | 29 0a 58 09 7b 0a 58 09 |ch_type)|).X.{.X.|
|000061e0| 63 61 73 65 20 53 52 43 | 48 5f 46 4f 52 57 3a 0a |case SRC|H_FORW:.|
|000061f0| 58 09 09 63 6d 64 5f 70 | 75 74 73 74 72 28 22 2f |X..cmd_p|utstr("/|
|00006200| 22 29 3b 0a 58 09 09 62 | 72 65 61 6b 3b 0a 58 09 |");.X..b|reak;.X.|
|00006210| 63 61 73 65 20 53 52 43 | 48 5f 42 41 43 4b 3a 0a |case SRC|H_BACK:.|
|00006220| 58 09 09 63 6d 64 5f 70 | 75 74 73 74 72 28 22 3f |X..cmd_p|utstr("?|
|00006230| 22 29 3b 0a 58 09 09 62 | 72 65 61 6b 3b 0a 58 09 |");.X..b|reak;.X.|
|00006240| 7d 0a 58 7d 0a 58 0a 58 | 2f 2a 0a 58 20 2a 20 45 |}.X}.X.X|/*.X * E|
|00006250| 78 65 63 75 74 65 20 61 | 20 6d 75 6c 74 69 63 68 |xecute a| multich|
|00006260| 61 72 61 63 74 65 72 20 | 63 6f 6d 6d 61 6e 64 2e |aracter |command.|
|00006270| 0a 58 20 2a 2f 0a 58 09 | 73 74 61 74 69 63 20 76 |.X */.X.|static v|
|00006280| 6f 69 64 0a 58 65 78 65 | 63 5f 6d 63 61 28 29 0a |oid.Xexe|c_mca().|
|00006290| 58 7b 0a 58 09 72 65 67 | 69 73 74 65 72 20 63 68 |X{.X.reg|ister ch|
|000062a0| 61 72 20 2a 63 62 75 66 | 3b 0a 58 09 72 65 67 69 |ar *cbuf|;.X.regi|
|000062b0| 73 74 65 72 20 63 68 61 | 72 20 2a 73 3b 0a 58 0a |ster cha|r *s;.X.|
|000062c0| 58 09 63 6d 64 5f 65 78 | 65 63 28 29 3b 0a 58 09 |X.cmd_ex|ec();.X.|
|000062d0| 63 62 75 66 20 3d 20 67 | 65 74 5f 63 6d 64 62 75 |cbuf = g|et_cmdbu|
|000062e0| 66 28 29 3b 0a 58 0a 58 | 09 73 77 69 74 63 68 20 |f();.X.X|.switch |
|000062f0| 28 6d 63 61 29 0a 58 09 | 7b 0a 58 09 63 61 73 65 |(mca).X.|{.X.case|
|00006300| 20 41 5f 46 5f 53 45 41 | 52 43 48 3a 0a 58 09 63 | A_F_SEA|RCH:.X.c|
|00006310| 61 73 65 20 41 5f 42 5f | 53 45 41 52 43 48 3a 0a |ase A_B_|SEARCH:.|
|00006320| 58 09 09 6d 75 6c 74 69 | 5f 73 65 61 72 63 68 28 |X..multi|_search(|
|00006330| 63 62 75 66 2c 20 6e 75 | 6d 62 65 72 29 3b 0a 58 |cbuf, nu|mber);.X|
|00006340| 09 09 62 72 65 61 6b 3b | 0a 58 09 63 61 73 65 20 |..break;|.X.case |
|00006350| 41 5f 46 49 52 53 54 43 | 4d 44 3a 0a 58 09 09 2f |A_FIRSTC|MD:.X../|
|00006360| 2a 0a 58 09 09 20 2a 20 | 53 6b 69 70 20 6c 65 61 |*.X.. * |Skip lea|
|00006370| 64 69 6e 67 20 73 70 61 | 63 65 73 20 6f 72 20 2b |ding spa|ces or +|
|00006380| 20 73 69 67 6e 73 20 69 | 6e 20 74 68 65 20 73 74 | signs i|n the st|
|00006390| 72 69 6e 67 2e 0a 58 09 | 09 20 2a 2f 0a 58 09 09 |ring..X.|. */.X..|
|000063a0| 77 68 69 6c 65 20 28 2a | 63 62 75 66 20 3d 3d 20 |while (*|cbuf == |
|000063b0| 27 2b 27 20 7c 7c 20 2a | 63 62 75 66 20 3d 3d 20 |'+' || *|cbuf == |
|000063c0| 27 20 27 29 0a 58 09 09 | 09 63 62 75 66 2b 2b 3b |' ').X..|.cbuf++;|
|000063d0| 0a 58 09 09 69 66 20 28 | 65 76 65 72 79 5f 66 69 |.X..if (|every_fi|
|000063e0| 72 73 74 5f 63 6d 64 20 | 21 3d 20 4e 55 4c 4c 29 |rst_cmd |!= NULL)|
|000063f0| 0a 58 09 09 09 66 72 65 | 65 28 65 76 65 72 79 5f |.X...fre|e(every_|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
