home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / unix / volume3 / ff / part02 < prev    next >
SHell self-extracting ARchive  |  1986-11-30  |  31.6 KB

open in: MacOS 8.1     |     Win98     |     DOS

browse contents    |     view JSON data     |     view as text


This file was processed as: SHell self-extracting ARchive (archive/shar).

ConfidenceProgramDetectionMatch TypeSupport
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% 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 64 65 | 63 76 61 78 21 77 61 6e |From: de|cvax!wan|
|00000010| 67 69 6e 73 74 21 70 65 | 72 6c 6d 61 6e 0a 53 75 |ginst!pe|rlman.Su|
|00000020| 62 6a 65 63 74 3a 20 66 | 66 3a 20 66 61 73 74 20 |bject: f|f: fast |
|00000030| 74 65 73 74 20 66 6f 72 | 6d 61 74 74 65 72 20 28 |test for|matter (|
|00000040| 70 61 72 74 20 32 20 6f | 66 20 32 29 0a 4e 65 77 |part 2 o|f 2).New|
|00000050| 73 67 72 6f 75 70 73 3a | 20 6d 6f 64 2e 73 6f 75 |sgroups:| mod.sou|
|00000060| 72 63 65 73 0a 41 70 70 | 72 6f 76 65 64 3a 20 6a |rces.App|roved: j|
|00000070| 70 6e 40 70 61 6e 64 61 | 2e 55 55 43 50 0a 0a 4d |pn@panda|.UUCP..M|
|00000080| 6f 64 2e 73 6f 75 72 63 | 65 73 3a 20 20 56 6f 6c |od.sourc|es: Vol|
|00000090| 75 6d 65 20 33 2c 20 49 | 73 73 75 65 20 35 32 0a |ume 3, I|ssue 52.|
|000000a0| 53 75 62 6d 69 74 74 65 | 64 20 62 79 3a 20 64 65 |Submitte|d by: de|
|000000b0| 63 76 61 78 21 77 61 6e | 67 69 6e 73 74 21 70 65 |cvax!wan|ginst!pe|
|000000c0| 72 6c 6d 61 6e 0a 0a 23 | 21 20 2f 62 69 6e 2f 73 |rlman..#|! /bin/s|
|000000d0| 68 0a 23 20 54 68 69 73 | 20 69 73 20 61 20 73 68 |h.# This| is a sh|
|000000e0| 65 6c 6c 20 61 72 63 68 | 69 76 65 2c 20 6d 65 61 |ell arch|ive, mea|
|000000f0| 6e 69 6e 67 3a 0a 23 20 | 31 2e 20 52 65 6d 6f 76 |ning:.# |1. Remov|
|00000100| 65 20 65 76 65 72 79 74 | 68 69 6e 67 20 61 62 6f |e everyt|hing abo|
|00000110| 76 65 20 74 68 65 20 23 | 21 20 2f 62 69 6e 2f 73 |ve the #|! /bin/s|
|00000120| 68 20 6c 69 6e 65 2e 0a | 23 20 32 2e 20 53 61 76 |h line..|# 2. Sav|
|00000130| 65 20 74 68 65 20 72 65 | 73 75 6c 74 69 6e 67 20 |e the re|sulting |
|00000140| 74 65 78 74 20 69 6e 20 | 61 20 66 69 6c 65 2e 0a |text in |a file..|
|00000150| 23 20 33 2e 20 45 78 65 | 63 75 74 65 20 74 68 65 |# 3. Exe|cute the|
|00000160| 20 66 69 6c 65 20 77 69 | 74 68 20 2f 62 69 6e 2f | file wi|th /bin/|
|00000170| 73 68 20 28 6e 6f 74 20 | 63 73 68 29 20 74 6f 20 |sh (not |csh) to |
|00000180| 63 72 65 61 74 65 20 74 | 68 65 20 66 69 6c 65 73 |create t|he files|
|00000190| 3a 0a 23 09 66 66 2e 63 | 0a 23 20 54 68 69 73 20 |:.#.ff.c|.# This |
|000001a0| 61 72 63 68 69 76 65 20 | 63 72 65 61 74 65 64 3a |archive |created:|
|000001b0| 20 57 65 64 20 4e 6f 76 | 20 31 33 20 31 39 3a 32 | Wed Nov| 13 19:2|
|000001c0| 38 3a 30 31 20 31 39 38 | 35 0a 23 20 42 79 3a 09 |8:01 198|5.# By:.|
|000001d0| 47 61 72 79 20 50 65 72 | 6c 6d 61 6e 20 28 57 61 |Gary Per|lman (Wa|
|000001e0| 6e 67 20 49 6e 73 74 69 | 74 75 74 65 2c 20 54 79 |ng Insti|tute, Ty|
|000001f0| 6e 67 73 62 6f 72 6f 2c | 20 4d 41 20 30 31 38 37 |ngsboro,| MA 0187|
|00000200| 39 20 55 53 41 29 0a 65 | 78 70 6f 72 74 20 50 41 |9 USA).e|xport PA|
|00000210| 54 48 3b 20 50 41 54 48 | 3d 2f 62 69 6e 3a 2f 75 |TH; PATH|=/bin:/u|
|00000220| 73 72 2f 62 69 6e 3a 24 | 50 41 54 48 0a 65 63 68 |sr/bin:$|PATH.ech|
|00000230| 6f 20 73 68 61 72 3a 20 | 22 65 78 74 72 61 63 74 |o shar: |"extract|
|00000240| 69 6e 67 20 27 66 66 2e | 63 27 22 20 27 28 32 39 |ing 'ff.|c'" '(29|
|00000250| 33 32 36 20 63 68 61 72 | 61 63 74 65 72 73 29 27 |326 char|acters)'|
|00000260| 0a 69 66 20 74 65 73 74 | 20 2d 66 20 27 66 66 2e |.if test| -f 'ff.|
|00000270| 63 27 0a 74 68 65 6e 0a | 09 65 63 68 6f 20 73 68 |c'.then.|.echo sh|
|00000280| 61 72 3a 20 22 77 69 6c | 6c 20 6e 6f 74 20 6f 76 |ar: "wil|l not ov|
|00000290| 65 72 2d 77 72 69 74 65 | 20 65 78 69 73 74 69 6e |er-write| existin|
|000002a0| 67 20 66 69 6c 65 20 27 | 66 66 2e 63 27 22 0a 65 |g file '|ff.c'".e|
|000002b0| 6c 73 65 0a 73 65 64 20 | 27 73 2f 5e 09 58 2f 2f |lse.sed |'s/^.X//|
|000002c0| 27 20 3c 3c 20 5c 53 48 | 41 52 5f 45 4f 46 20 3e |' << \SH|AR_EOF >|
|000002d0| 20 27 66 66 2e 63 27 0a | 09 58 2f 2a 43 4f 50 59 | 'ff.c'.|.X/*COPY|
|000002e0| 52 49 47 48 54 20 28 63 | 29 20 31 39 38 35 20 57 |RIGHT (c|) 1985 W|
|000002f0| 61 6e 67 20 49 6e 73 74 | 69 74 75 74 65 2c 20 54 |ang Inst|itute, T|
|00000300| 79 6e 67 73 62 6f 72 6f | 2c 20 4d 41 20 30 31 38 |yngsboro|, MA 018|
|00000310| 37 39 20 55 53 41 20 2a | 2f 0a 09 58 2f 2a 44 49 |79 USA *|/..X/*DI|
|00000320| 53 43 4c 41 49 4d 45 52 | 3a 09 4e 6f 20 67 75 61 |SCLAIMER|:.No gua|
|00000330| 72 61 6e 74 65 65 73 20 | 6f 66 20 70 65 72 66 6f |rantees |of perfo|
|00000340| 72 6d 61 6e 63 65 20 61 | 72 65 20 6d 61 64 65 2e |rmance a|re made.|
|00000350| 20 2a 2f 0a 09 58 2f 2a | 4d 4f 44 55 4c 45 09 66 | */..X/*|MODULE.f|
|00000360| 66 3a 20 22 66 61 73 74 | 20 66 6f 72 6d 61 74 74 |f: "fast| formatt|
|00000370| 65 72 22 20 22 53 75 6e | 20 30 31 20 53 65 70 20 |er" "Sun| 01 Sep |
|00000380| 31 39 38 35 22 20 2a 2f | 0a 09 58 2f 2a 50 47 4d |1985" */|..X/*PGM|
|00000390| 52 20 20 09 66 66 3a 20 | 22 47 61 72 79 20 50 65 |R .ff: |"Gary Pe|
|000003a0| 72 6c 6d 61 6e 22 20 22 | 57 61 6e 67 20 49 6e 73 |rlman" "|Wang Ins|
|000003b0| 74 69 74 75 74 65 2c 20 | 54 79 6e 67 73 62 6f 72 |titute, |Tyngsbor|
|000003c0| 6f 2c 20 4d 41 20 30 31 | 38 37 39 20 55 53 41 22 |o, MA 01|879 USA"|
|000003d0| 20 2a 2f 0a 09 58 2f 2a | 56 45 52 20 20 20 09 24 | */..X/*|VER .$|
|000003e0| 48 65 61 64 65 72 3a 20 | 66 66 2e 63 2c 76 20 31 |Header: |ff.c,v 1|
|000003f0| 2e 33 20 38 35 2f 30 39 | 2f 30 31 20 32 31 3a 32 |.3 85/09|/01 21:2|
|00000400| 33 3a 33 38 20 70 65 72 | 6c 6d 61 6e 20 45 78 70 |3:38 per|lman Exp|
|00000410| 20 24 20 2a 2f 0a 09 58 | 2f 2a 43 4f 4d 50 20 20 | $ */..X|/*COMP |
|00000420| 09 66 66 3a 20 73 65 65 | 20 6d 61 6b 65 66 69 6c |.ff: see| makefil|
|00000430| 65 20 2a 2f 0a 09 58 0a | 09 58 2f 2a 4d 41 4e 55 |e */..X.|.X/*MANU|
|00000440| 41 4c 2e 54 48 20 46 46 | 20 31 20 22 41 75 67 75 |AL.TH FF| 1 "Augu|
|00000450| 73 74 20 31 30 2c 20 31 | 39 38 35 22 20 22 57 61 |st 10, 1|985" "Wa|
|00000460| 6e 67 20 49 6e 73 74 69 | 74 75 74 65 22 20 22 55 |ng Insti|tute" "U|
|00000470| 4e 49 58 20 55 73 65 72 | 27 73 20 4d 61 6e 75 61 |NIX User|'s Manua|
|00000480| 6c 22 0a 09 58 2e 5c 22 | 20 24 43 6f 6d 70 69 6c |l"..X.\"| $Compil|
|00000490| 65 3a 20 69 72 6f 66 66 | 20 2d 6d 61 6e 2e 6e 65 |e: iroff| -man.ne|
|000004a0| 77 20 25 66 0a 09 58 2e | 53 48 20 4e 41 4d 45 0a |w %f..X.|SH NAME.|
|000004b0| 09 58 66 66 20 5c 2d 20 | 66 61 73 74 20 74 65 78 |.Xff \- |fast tex|
|000004c0| 74 20 66 6f 72 6d 61 74 | 74 65 72 0a 09 58 2e 53 |t format|ter..X.S|
|000004d0| 48 20 55 53 41 47 45 0a | 09 58 2e 42 20 66 66 0a |H USAGE.|.X.B ff.|
|000004e0| 09 58 5b 6f 70 74 69 6f | 6e 73 5d 20 5b 2d 5d 20 |.X[optio|ns] [-] |
|000004f0| 5b 66 69 6c 65 73 5d 0a | 09 58 2e 53 48 20 44 45 |[files].|.X.SH DE|
|00000500| 53 43 52 49 50 54 49 4f | 4e 0a 09 58 2e 49 20 66 |SCRIPTIO|N..X.I f|
|00000510| 66 0a 09 58 69 73 20 61 | 20 73 69 6d 70 6c 65 20 |f..Xis a| simple |
|00000520| 74 65 78 74 20 66 6f 72 | 6d 61 74 74 65 72 20 66 |text for|matter f|
|00000530| 6f 72 20 66 6c 65 78 69 | 62 6c 65 20 75 6e 69 66 |or flexi|ble unif|
|00000540| 6f 72 6d 20 66 6f 72 6d | 61 74 74 69 6e 67 20 6f |orm form|atting o|
|00000550| 66 0a 09 58 69 6e 70 75 | 74 20 66 69 6c 65 73 2e |f..Xinpu|t files.|
|00000560| 0a 09 58 50 72 6f 67 72 | 61 6d 20 6f 70 74 69 6f |..XProgr|am optio|
|00000570| 6e 73 20 61 72 65 20 75 | 73 65 64 20 74 6f 20 63 |ns are u|sed to c|
|00000580| 6f 6e 74 72 6f 6c 20 66 | 6f 72 6d 61 74 74 69 6e |ontrol f|ormattin|
|00000590| 67 2e 0a 09 58 54 68 69 | 73 20 69 73 20 69 6e 20 |g...XThi|s is in |
|000005a0| 63 6f 6e 74 72 61 73 74 | 20 74 6f 20 74 65 78 74 |contrast| to text|
|000005b0| 20 66 6f 72 6d 61 74 74 | 65 72 73 20 6c 69 6b 65 | formatt|ers like|
|000005c0| 0a 09 58 2e 49 20 6e 72 | 6f 66 66 20 28 31 29 0a |..X.I nr|off (1).|
|000005d0| 09 58 74 68 61 74 20 72 | 65 71 75 69 72 65 20 73 |.Xthat r|equire s|
|000005e0| 70 65 63 69 61 6c 20 66 | 6f 72 6d 61 74 20 72 65 |pecial f|ormat re|
|000005f0| 71 75 65 73 74 73 20 74 | 6f 20 62 65 20 70 61 72 |quests t|o be par|
|00000600| 74 20 6f 66 20 74 68 65 | 69 72 20 69 6e 70 75 74 |t of the|ir input|
|00000610| 20 66 69 6c 65 73 2e 0a | 09 58 42 65 73 69 64 65 | files..|.XBeside|
|00000620| 73 20 61 76 6f 69 64 69 | 6e 67 20 63 72 79 70 74 |s avoidi|ng crypt|
|00000630| 69 63 20 66 6f 72 6d 61 | 74 20 72 65 71 75 65 73 |ic forma|t reques|
|00000640| 74 73 20 69 6e 20 74 65 | 78 74 2c 0a 09 58 2e 49 |ts in te|xt,..X.I|
|00000650| 20 66 66 0a 09 58 69 73 | 20 63 6f 6e 73 69 64 65 | ff..Xis| conside|
|00000660| 72 61 62 6c 79 20 66 61 | 73 74 65 72 20 74 68 61 |rably fa|ster tha|
|00000670| 6e 20 74 72 61 64 69 74 | 69 6f 6e 61 6c 20 66 6f |n tradit|ional fo|
|00000680| 72 6d 61 74 74 65 72 73 | 20 6c 69 6b 65 0a 09 58 |rmatters| like..X|
|00000690| 2e 49 20 6e 72 6f 66 66 | 20 28 31 29 0a 09 58 61 |.I nroff| (1)..Xa|
|000006a0| 6e 64 20 65 76 65 6e 20 | 73 69 6d 70 6c 65 20 66 |nd even |simple f|
|000006b0| 6f 72 6d 61 74 74 65 72 | 73 20 6c 69 6b 65 0a 09 |ormatter|s like..|
|000006c0| 58 2e 49 20 66 6d 74 20 | 28 31 29 2e 0a 09 58 2e |X.I fmt |(1)...X.|
|000006d0| 50 50 0a 09 58 54 68 65 | 20 6d 6f 73 74 20 63 6f |PP..XThe| most co|
|000006e0| 6d 70 6c 69 63 61 74 65 | 64 20 63 6f 6e 63 65 70 |mplicate|d concep|
|000006f0| 74 20 77 69 74 68 0a 09 | 58 2e 49 20 66 66 0a 09 |t with..|X.I ff..|
|00000700| 58 69 73 20 74 68 61 74 | 20 6f 66 20 61 20 6c 69 |Xis that| of a li|
|00000710| 6e 65 20 62 72 65 61 6b | 2e 0a 09 58 41 20 6c 69 |ne break|...XA li|
|00000720| 6e 65 20 62 72 65 61 6b | 20 63 61 75 73 65 73 20 |ne break| causes |
|00000730| 61 6e 20 69 6e 74 65 72 | 72 75 70 74 69 6f 6e 20 |an inter|ruption |
|00000740| 69 6e 20 74 68 65 20 66 | 69 6c 6c 69 6e 67 0a 09 |in the f|illing..|
|00000750| 58 28 65 76 65 6e 69 6e | 67 20 6f 75 74 20 6f 66 |X(evenin|g out of|
|00000760| 20 74 68 65 20 74 65 78 | 74 20 6c 69 6e 65 73 29 | the tex|t lines)|
|00000770| 2e 0a 09 58 4c 69 6e 65 | 20 62 72 65 61 6b 73 20 |...XLine| breaks |
|00000780| 6f 63 63 75 72 20 77 68 | 65 6e 20 73 70 65 63 69 |occur wh|en speci|
|00000790| 61 6c 20 63 68 61 72 61 | 63 74 65 72 73 20 61 72 |al chara|cters ar|
|000007a0| 65 20 73 65 65 6e 20 61 | 74 20 74 68 65 20 62 65 |e seen a|t the be|
|000007b0| 67 69 6e 6e 69 6e 67 73 | 0a 09 58 6f 66 20 6c 69 |ginnings|..Xof li|
|000007c0| 6e 65 73 2c 20 6f 72 20 | 77 68 65 6e 20 61 6c 6c |nes, or |when all|
|000007d0| 20 6c 69 6e 65 73 20 61 | 72 65 20 62 72 6f 6b 65 | lines a|re broke|
|000007e0| 6e 2e 0a 09 58 42 79 20 | 64 65 66 61 75 6c 74 2c |n...XBy |default,|
|000007f0| 20 61 6e 79 20 6e 6f 6e | 2d 61 6c 70 68 61 6e 75 | any non|-alphanu|
|00000800| 6d 65 72 69 63 20 63 68 | 61 72 61 63 74 65 72 20 |meric ch|aracter |
|00000810| 77 69 6c 6c 20 63 61 75 | 73 65 20 61 20 62 72 65 |will cau|se a bre|
|00000820| 61 6b 2c 0a 09 58 62 75 | 74 20 74 68 69 73 20 63 |ak,..Xbu|t this c|
|00000830| 61 6e 20 62 65 20 63 6f | 6e 74 72 6f 6c 6c 65 64 |an be co|ntrolled|
|00000840| 20 77 69 74 68 20 74 68 | 65 0a 09 58 2e 42 20 2d | with th|e..X.B -|
|00000850| 42 0a 09 58 6f 70 74 69 | 6f 6e 2e 0a 09 58 41 20 |B..Xopti|on...XA |
|00000860| 62 6c 61 6e 6b 20 6c 69 | 6e 65 20 61 6c 77 61 79 |blank li|ne alway|
|00000870| 73 20 63 61 75 73 65 73 | 20 61 20 62 72 65 61 6b |s causes| a break|
|00000880| 2e 0a 09 58 2a 2f 0a 09 | 58 0a 09 58 0c 0a 09 58 |...X*/..|X..X...X|
|00000890| 23 69 6e 63 6c 75 64 65 | 20 3c 73 74 64 69 6f 2e |#include| <stdio.|
|000008a0| 68 3e 0a 09 58 23 69 6e | 63 6c 75 64 65 20 3c 63 |h>..X#in|clude <c|
|000008b0| 74 79 70 65 2e 68 3e 0a | 09 58 23 69 6e 63 6c 75 |type.h>.|.X#inclu|
|000008c0| 64 65 20 3c 73 74 72 69 | 6e 67 73 2e 68 3e 0a 09 |de <stri|ngs.h>..|
|000008d0| 58 0a 09 58 74 79 70 65 | 64 65 66 09 69 6e 74 20 |X..Xtype|def.int |
|000008e0| 09 53 74 61 74 75 73 3b | 0a 09 58 23 64 65 66 69 |.Status;|..X#defi|
|000008f0| 6e 65 09 53 55 43 43 45 | 53 53 20 20 20 28 28 53 |ne.SUCCE|SS ((S|
|00000900| 74 61 74 75 73 29 20 30 | 29 0a 09 58 23 64 65 66 |tatus) 0|)..X#def|
|00000910| 69 6e 65 09 46 41 49 4c | 55 52 45 20 20 20 28 28 |ine.FAIL|URE ((|
|00000920| 53 74 61 74 75 73 29 20 | 31 29 0a 09 58 74 79 70 |Status) |1)..Xtyp|
|00000930| 65 64 65 66 09 69 6e 74 | 20 09 42 6f 6f 6c 65 3b |edef.int| .Boole;|
|00000940| 0a 09 58 23 64 65 66 69 | 6e 65 09 54 52 55 45 20 |..X#defi|ne.TRUE |
|00000950| 20 20 20 20 20 28 28 42 | 6f 6f 6c 65 29 20 31 29 | ((B|oole) 1)|
|00000960| 0a 09 58 23 64 65 66 69 | 6e 65 09 46 41 4c 53 45 |..X#defi|ne.FALSE|
|00000970| 20 20 20 20 20 28 28 42 | 6f 6f 6c 65 29 20 30 29 | ((B|oole) 0)|
|00000980| 0a 09 58 0a 09 58 23 64 | 65 66 69 6e 65 09 54 41 |..X..X#d|efine.TA|
|00000990| 42 20 20 20 20 20 20 20 | 27 5c 74 27 0a 09 58 23 |B |'\t'..X#|
|000009a0| 64 65 66 69 6e 65 09 45 | 4f 4c 20 20 20 20 20 20 |define.E|OL |
|000009b0| 20 27 5c 6e 27 0a 09 58 | 23 64 65 66 69 6e 65 09 | '\n'..X|#define.|
|000009c0| 46 46 20 20 20 20 20 20 | 20 20 27 5c 66 27 0a 09 |FF | '\f'..|
|000009d0| 58 23 64 65 66 69 6e 65 | 09 45 4f 53 20 20 20 20 |X#define|.EOS |
|000009e0| 20 20 20 27 5c 30 27 0a | 09 58 23 64 65 66 69 6e | '\0'.|.X#defin|
|000009f0| 65 09 53 50 20 20 20 20 | 20 20 20 20 27 20 27 0a |e.SP | ' '.|
|00000a00| 09 58 23 64 65 66 69 6e | 65 09 4d 41 58 4c 45 4e |.X#defin|e.MAXLEN|
|00000a10| 20 20 20 20 31 32 38 20 | 20 20 20 20 20 20 20 20 | 128 | |
|00000a20| 20 20 20 20 20 20 20 20 | 20 2f 2a 20 6d 61 78 20 | | /* max |
|00000a30| 6c 65 6e 67 74 68 20 6f | 66 20 6c 69 6e 65 73 20 |length o|f lines |
|00000a40| 2a 2f 0a 09 58 23 64 65 | 66 69 6e 65 09 4d 41 58 |*/..X#de|fine.MAX|
|00000a50| 4c 49 4e 45 53 20 20 32 | 30 30 20 20 20 20 20 20 |LINES 2|00 |
|00000a60| 20 20 20 20 20 20 20 20 | 20 20 20 20 2f 2a 20 6d | | /* m|
|00000a70| 61 78 20 23 20 6c 69 6e | 65 73 20 6f 6e 20 70 61 |ax # lin|es on pa|
|00000a80| 67 65 73 20 2a 2f 0a 09 | 58 0a 09 58 2f 2a 20 41 |ges */..|X..X/* A|
|00000a90| 6c 70 68 61 62 65 74 69 | 63 61 6c 20 6c 69 73 74 |lphabeti|cal list|
|00000aa0| 69 6e 67 20 6f 66 20 74 | 68 69 73 20 66 69 6c 65 |ing of t|his file|
|00000ab0| 27 73 20 66 75 6e 63 74 | 69 6f 6e 73 20 2a 2f 0a |'s funct|ions */.|
|00000ac0| 09 58 76 6f 69 64 09 62 | 65 67 69 6e 6c 69 6e 65 |.Xvoid.b|eginline|
|00000ad0| 20 28 29 3b 20 20 2f 2a | 20 70 72 6f 63 65 73 73 | (); /*| process|
|00000ae0| 20 74 65 78 74 20 61 74 | 20 74 68 65 20 62 65 67 | text at| the beg|
|00000af0| 69 6e 6e 69 6e 67 20 6f | 66 20 6c 69 6e 65 73 20 |inning o|f lines |
|00000b00| 2a 2f 0a 09 58 76 6f 69 | 64 09 62 65 67 69 6e 70 |*/..Xvoi|d.beginp|
|00000b10| 61 67 65 20 28 29 3b 20 | 20 2f 2a 20 68 61 6e 64 |age (); | /* hand|
|00000b20| 6c 65 20 70 61 67 69 6e | 61 74 69 6f 6e 20 61 74 |le pagin|ation at|
|00000b30| 20 70 61 67 65 20 62 72 | 65 61 6b 73 20 2a 2f 0a | page br|eaks */.|
|00000b40| 09 58 53 74 61 74 75 73 | 09 64 6f 62 72 65 61 6b |.XStatus|.dobreak|
|00000b50| 20 28 29 3b 20 20 20 20 | 2f 2a 20 68 61 6e 64 6c | (); |/* handl|
|00000b60| 65 20 62 72 6f 6b 65 6e | 20 6c 69 6e 65 73 2c 20 |e broken| lines, |
|00000b70| 69 66 20 61 70 70 72 6f | 70 72 69 61 74 65 20 2a |if appro|priate *|
|00000b80| 2f 0a 09 58 76 6f 69 64 | 09 64 6f 66 69 6c 6c 20 |/..Xvoid|.dofill |
|00000b90| 28 29 3b 20 20 20 20 20 | 2f 2a 20 64 6f 20 74 68 |(); |/* do th|
|00000ba0| 65 20 74 65 78 74 20 66 | 69 6c 6c 69 6e 67 20 2a |e text f|illing *|
|00000bb0| 2f 0a 09 58 63 68 61 72 | 09 2a 64 6f 74 61 62 20 |/..Xchar|.*dotab |
|00000bc0| 28 29 3b 20 20 20 20 20 | 2f 2a 20 72 65 74 75 72 |(); |/* retur|
|00000bd0| 6e 20 65 78 70 61 6e 64 | 65 64 20 74 61 62 73 20 |n expand|ed tabs |
|00000be0| 69 6e 20 6c 69 6e 65 20 | 2a 2f 0a 09 58 76 6f 69 |in line |*/..Xvoi|
|00000bf0| 64 09 65 6e 64 70 61 67 | 65 20 28 29 3b 20 20 20 |d.endpag|e (); |
|00000c00| 20 2f 2a 20 68 61 6e 64 | 6c 65 20 70 61 67 69 6e | /* hand|le pagin|
|00000c10| 61 74 69 6f 6e 20 61 74 | 20 70 61 67 65 20 65 6e |ation at| page en|
|00000c20| 64 73 20 2a 2f 0a 09 58 | 63 68 61 72 09 2a 65 78 |ds */..X|char.*ex|
|00000c30| 70 61 6e 64 20 28 29 3b | 20 20 20 20 2f 2a 20 65 |pand ();| /* e|
|00000c40| 78 70 61 6e 64 20 73 74 | 72 69 6e 67 73 20 69 6e |xpand st|rings in|
|00000c50| 20 74 68 72 65 65 20 70 | 61 72 74 20 74 69 74 6c | three p|art titl|
|00000c60| 65 73 20 2a 2f 0a 09 58 | 53 74 61 74 75 73 09 66 |es */..X|Status.f|
|00000c70| 66 20 28 29 3b 20 20 20 | 20 20 20 20 20 20 2f 2a |f (); | /*|
|00000c80| 20 6d 61 69 6e 20 66 6f | 72 6d 61 74 74 69 6e 67 | main fo|rmatting|
|00000c90| 20 72 6f 75 74 69 6e 65 | 20 2a 2f 0a 09 58 69 6e | routine| */..Xin|
|00000ca0| 74 20 09 69 6e 69 74 69 | 61 6c 20 28 29 3b 20 20 |t .initi|al (); |
|00000cb0| 20 20 2f 2a 20 73 65 74 | 20 6f 70 74 69 6f 6e 73 | /* set| options|
|00000cc0| 20 61 6e 64 20 63 68 65 | 63 6b 20 63 6f 6e 73 69 | and che|ck consi|
|00000cd0| 73 74 65 6e 63 79 20 2a | 2f 0a 09 58 63 68 61 72 |stency *|/..Xchar|
|00000ce0| 09 2a 69 74 6f 61 20 28 | 29 3b 20 20 20 20 20 20 |.*itoa (|); |
|00000cf0| 2f 2a 20 63 6f 6e 76 65 | 72 74 20 69 6e 74 65 67 |/* conve|rt integ|
|00000d00| 65 72 20 74 6f 20 61 73 | 63 69 69 20 66 6f 72 6d |er to as|cii form|
|00000d10| 61 74 2c 20 77 69 74 68 | 20 70 61 64 64 69 6e 67 |at, with| padding|
|00000d20| 20 2a 2f 0a 09 58 76 6f | 69 64 09 64 6f 6a 75 73 | */..Xvo|id.dojus|
|00000d30| 74 69 66 79 20 28 29 3b | 20 20 2f 2a 20 65 76 65 |tify ();| /* eve|
|00000d40| 6e 20 6f 75 74 20 28 6a | 75 73 74 69 66 79 29 20 |n out (j|ustify) |
|00000d50| 74 68 65 20 72 69 67 68 | 74 20 6d 61 72 67 69 6e |the righ|t margin|
|00000d60| 20 6f 66 20 66 69 6c 6c | 65 64 20 6c 69 6e 65 73 | of fill|ed lines|
|00000d70| 20 2a 2f 0a 09 58 63 68 | 61 72 09 2a 70 72 65 70 | */..Xch|ar.*prep|
|00000d80| 72 6f 63 65 73 73 20 28 | 29 3b 2f 2a 20 68 61 6e |rocess (|);/* han|
|00000d90| 64 6c 65 20 62 6c 61 6e | 6b 20 74 72 69 6d 6d 69 |dle blan|k trimmi|
|00000da0| 6e 67 20 61 6e 64 20 74 | 69 74 6c 69 6e 67 20 2a |ng and t|itling *|
|00000db0| 2f 0a 09 58 76 6f 69 64 | 09 70 72 69 6e 74 6c 6e |/..Xvoid|.println|
|00000dc0| 20 28 29 3b 20 20 20 20 | 2f 2a 20 70 72 69 6e 74 | (); |/* print|
|00000dd0| 20 61 20 6c 69 6e 65 2c | 20 77 61 74 63 68 69 6e | a line,| watchin|
|00000de0| 67 20 66 6f 72 20 70 61 | 67 65 20 62 6f 75 6e 64 |g for pa|ge bound|
|00000df0| 61 72 69 65 73 20 2a 2f | 0a 09 58 76 6f 69 64 09 |aries */|..Xvoid.|
|00000e00| 72 65 70 65 61 74 20 28 | 29 3b 20 20 20 20 20 2f |repeat (|); /|
|00000e10| 2a 20 72 65 70 65 61 74 | 65 64 6c 79 20 70 72 69 |* repeat|edly pri|
|00000e20| 6e 74 20 61 20 63 68 61 | 72 61 63 74 65 72 20 2a |nt a cha|racter *|
|00000e30| 2f 0a 09 58 53 74 61 74 | 75 73 09 73 65 74 69 6e |/..XStat|us.setin|
|00000e40| 74 20 28 29 3b 20 20 20 | 20 20 2f 2a 20 63 68 65 |t (); | /* che|
|00000e50| 63 6b 20 74 79 70 65 20 | 26 20 63 6f 6e 76 65 72 |ck type |& conver|
|00000e60| 74 20 61 20 73 74 72 69 | 6e 67 20 74 6f 20 61 6e |t a stri|ng to an|
|00000e70| 20 69 6e 74 65 67 65 72 | 20 2a 2f 0a 09 58 63 68 | integer| */..Xch|
|00000e80| 61 72 09 2a 74 68 72 65 | 65 70 61 72 74 20 28 29 |ar.*thre|epart ()|
|00000e90| 3b 20 2f 2a 20 62 75 69 | 6c 64 20 74 68 72 65 65 |; /* bui|ld three|
|00000ea0| 20 70 61 72 74 20 74 69 | 74 6c 65 73 20 2a 2f 0a | part ti|tles */.|
|00000eb0| 09 58 76 6f 69 64 09 75 | 73 61 67 65 20 28 29 3b |.Xvoid.u|sage ();|
|00000ec0| 20 20 20 20 20 20 2f 2a | 20 70 72 69 6e 74 20 75 | /*| print u|
|00000ed0| 73 61 67 65 20 73 75 6d | 6d 61 72 79 20 2a 2f 0a |sage sum|mary */.|
|00000ee0| 09 58 0a 09 58 2f 2a 20 | 47 4c 4f 42 41 4c 53 20 |.X..X/* |GLOBALS |
|00000ef0| 2a 2f 0a 09 58 63 68 61 | 72 09 2a 41 72 67 76 30 |*/..Xcha|r.*Argv0|
|00000f00| 3b 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 2f |; | /|
|00000f10| 2a 20 77 69 6c 6c 20 62 | 65 20 6e 61 6d 65 20 6f |* will b|e name o|
|00000f20| 66 20 70 72 6f 67 72 61 | 6d 20 2a 2f 0a 09 58 69 |f progra|m */..Xi|
|00000f30| 6e 74 20 09 43 75 72 70 | 6f 73 3b 20 20 20 20 20 |nt .Curp|os; |
|00000f40| 20 20 20 20 20 20 20 20 | 20 2f 2a 20 63 75 72 72 | | /* curr|
|00000f50| 65 6e 74 20 70 6f 73 69 | 74 69 6f 6e 20 6f 6e 20 |ent posi|tion on |
|00000f60| 6f 75 74 70 75 74 20 6c | 69 6e 65 20 2a 2f 0a 09 |output l|ine */..|
|00000f70| 58 63 68 61 72 09 2a 46 | 69 6c 65 6e 61 6d 65 3b |Xchar.*F|ilename;|
|00000f80| 20 20 20 20 20 20 20 20 | 20 20 20 2f 2a 20 63 75 | | /* cu|
|00000f90| 72 72 65 6e 74 20 69 6e | 70 75 74 20 66 69 6c 65 |rrent in|put file|
|00000fa0| 20 6e 61 6d 65 20 2a 2f | 0a 09 58 42 6f 6f 6c 65 | name */|..XBoole|
|00000fb0| 09 46 69 6c 6c 69 6e 67 | 3b 20 20 20 20 20 20 20 |.Filling|; |
|00000fc0| 20 20 20 20 20 20 2f 2a | 20 69 73 20 74 65 78 74 | /*| is text|
|00000fd0| 20 62 65 69 6e 67 20 66 | 69 6c 6c 65 64 20 72 69 | being f|illed ri|
|00000fe0| 67 68 74 20 6e 6f 77 20 | 2a 2f 0a 09 58 63 68 61 |ght now |*/..Xcha|
|00000ff0| 72 09 4a 75 73 74 62 75 | 66 5b 4d 41 58 4c 45 4e |r.Justbu|f[MAXLEN|
|00001000| 5d 3b 20 20 20 20 20 2f | 2a 20 62 75 66 66 65 72 |]; /|* buffer|
|00001010| 20 66 6f 72 20 6a 75 73 | 74 69 66 69 65 64 20 74 | for jus|tified t|
|00001020| 65 78 74 20 2a 2f 0a 09 | 58 69 6e 74 20 09 4a 75 |ext */..|Xint .Ju|
|00001030| 73 74 70 6f 73 3b 20 20 | 20 20 20 20 20 20 20 20 |stpos; | |
|00001040| 20 20 20 2f 2a 20 63 75 | 72 72 65 6e 74 20 70 6f | /* cu|rrent po|
|00001050| 73 69 74 69 6f 6e 20 69 | 6e 20 6a 75 73 74 69 66 |sition i|n justif|
|00001060| 69 63 61 74 69 6f 6e 20 | 62 75 66 66 65 72 20 2a |ication |buffer *|
|00001070| 2f 0a 09 58 69 6e 74 20 | 09 4f 75 74 6c 69 6e 65 |/..Xint |.Outline|
|00001080| 3b 20 20 20 20 20 20 20 | 20 20 20 20 20 20 2f 2a |; | /*|
|00001090| 20 6f 75 74 70 75 74 20 | 6c 69 6e 65 20 6e 75 6d | output |line num|
|000010a0| 62 65 72 20 2a 2f 0a 09 | 58 69 6e 74 20 09 50 61 |ber */..|Xint .Pa|
|000010b0| 67 65 6c 69 6e 65 3b 20 | 20 20 20 20 20 20 20 20 |geline; | |
|000010c0| 20 20 20 2f 2a 20 6c 69 | 6e 65 20 6e 75 6d 62 65 | /* li|ne numbe|
|000010d0| 72 20 6f 6e 20 63 75 72 | 72 65 6e 74 20 6f 75 74 |r on cur|rent out|
|000010e0| 70 75 74 20 70 61 67 65 | 20 2a 2f 0a 09 58 69 6e |put page| */..Xin|
|000010f0| 74 20 09 50 61 67 65 6e | 75 6d 3b 20 20 20 20 20 |t .Pagen|um; |
|00001100| 20 20 20 20 20 20 20 20 | 2f 2a 20 63 75 72 72 65 | |/* curre|
|00001110| 6e 74 20 70 61 67 65 20 | 6e 75 6d 62 65 72 20 2a |nt page |number *|
|00001120| 2f 0a 09 58 0a 09 58 0c | 2f 2a 20 44 65 66 61 75 |/..X..X.|/* Defau|
|00001130| 6c 74 20 76 61 6c 75 65 | 73 20 6f 66 20 6f 70 74 |lt value|s of opt|
|00001140| 69 6f 6e 73 20 2a 2f 0a | 09 58 23 64 65 66 69 6e |ions */.|.X#defin|
|00001150| 65 09 4d 41 58 54 41 42 | 20 20 20 20 20 32 30 20 |e.MAXTAB| 20 |
|00001160| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001170| 20 2f 2a 20 6d 61 78 20 | 23 20 6f 66 20 74 61 62 | /* max |# of tab|
|00001180| 20 73 74 6f 70 73 20 2a | 2f 0a 09 58 23 64 65 66 | stops *|/..X#def|
|00001190| 69 6e 65 09 46 4f 4f 54 | 53 49 5a 45 20 20 20 20 |ine.FOOT|SIZE |
|000011a0| 35 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |5 | |
|000011b0| 20 20 20 2f 2a 20 64 65 | 66 61 75 6c 74 20 66 6f | /* de|fault fo|
|000011c0| 6f 74 65 72 20 73 69 7a | 65 20 2a 2f 0a 09 58 23 |oter siz|e */..X#|
|000011d0| 64 65 66 69 6e 65 09 48 | 45 41 44 53 49 5a 45 20 |define.H|EADSIZE |
|000011e0| 20 20 20 35 20 20 20 20 | 20 20 20 20 20 20 20 20 | 5 | |
|000011f0| 20 20 20 20 20 20 2f 2a | 20 64 65 66 61 75 6c 74 | /*| default|
|00001200| 20 68 65 61 64 65 72 20 | 73 69 7a 65 20 2a 2f 0a | header |size */.|
|00001210| 09 58 23 64 65 66 69 6e | 65 09 4e 55 4d 57 49 44 |.X#defin|e.NUMWID|
|00001220| 54 48 20 20 20 20 34 20 | 20 20 20 20 20 20 20 20 |TH 4 | |
|00001230| 20 20 20 20 20 20 20 20 | 20 2f 2a 20 64 65 66 61 | | /* defa|
|00001240| 75 6c 74 20 77 69 64 74 | 68 20 6f 66 20 6c 69 6e |ult widt|h of lin|
|00001250| 65 20 6e 75 6d 62 65 72 | 73 20 2a 2f 0a 09 58 23 |e number|s */..X#|
|00001260| 64 65 66 69 6e 65 09 50 | 41 47 45 53 49 5a 45 20 |define.P|AGESIZE |
|00001270| 20 20 36 36 20 20 20 20 | 20 20 20 20 20 20 20 20 | 66 | |
|00001280| 20 20 20 20 20 20 2f 2a | 20 64 65 66 61 75 6c 74 | /*| default|
|00001290| 20 6c 65 6e 67 74 68 20 | 6f 66 20 70 61 67 65 20 | length |of page |
|000012a0| 2a 2f 0a 09 58 23 64 65 | 66 69 6e 65 09 57 49 44 |*/..X#de|fine.WID|
|000012b0| 54 48 20 20 20 20 20 20 | 37 32 20 20 20 20 20 20 |TH |72 |
|000012c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 2f 2a 20 64 | | /* d|
|000012d0| 65 66 61 75 6c 74 20 77 | 69 64 74 68 20 6f 66 20 |efault w|idth of |
|000012e0| 70 61 67 65 20 2a 2f 0a | 09 58 23 64 65 66 69 6e |page */.|.X#defin|
|000012f0| 65 09 50 41 47 45 4e 55 | 4d 20 20 20 27 25 27 20 |e.PAGENU|M '%' |
|00001300| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001310| 20 2f 2a 20 65 78 70 61 | 6e 64 73 20 74 6f 20 70 | /* expa|nds to p|
|00001320| 61 67 65 20 6e 75 6d 62 | 65 72 20 69 6e 20 74 69 |age numb|er in ti|
|00001330| 74 6c 65 73 20 2a 2f 0a | 09 58 23 64 65 66 69 6e |tles */.|.X#defin|
|00001340| 65 09 46 49 4c 45 4e 41 | 4d 45 20 20 27 2a 27 20 |e.FILENA|ME '*' |
|00001350| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001360| 20 2f 2a 20 65 78 70 61 | 6e 64 73 20 74 6f 20 66 | /* expa|nds to f|
|00001370| 69 6c 65 20 6e 61 6d 65 | 20 69 6e 20 74 69 74 6c |ile name| in titl|
|00001380| 65 20 2a 2f 0a 09 58 23 | 64 65 66 69 6e 65 09 48 |e */..X#|define.H|
|00001390| 45 41 44 45 52 09 20 20 | 22 7c 46 69 6c 65 3a 20 |EADER. |"|File: |
|000013a0| 2a 7c 7c 50 61 67 65 3a | 20 25 7c 22 20 2f 2a 20 |*||Page:| %|" /* |
|000013b0| 64 65 66 61 75 6c 74 20 | 70 61 67 65 20 68 65 61 |default |page hea|
|000013c0| 64 65 72 20 2a 2f 0a 09 | 58 0a 09 58 2f 2a 4d 41 |der */..|X..X/*MA|
|000013d0| 4e 55 41 4c 2e 53 48 20 | 4f 50 54 49 4f 4e 53 0a |NUAL.SH |OPTIONS.|
|000013e0| 09 58 54 68 65 72 65 20 | 61 72 65 20 6d 61 6e 79 |.XThere |are many|
|000013f0| 2c 20 6d 61 6e 79 20 6f | 70 74 69 6f 6e 73 20 74 |, many o|ptions t|
|00001400| 6f 20 61 6c 6c 6f 77 20 | 63 6f 6e 74 72 6f 6c 20 |o allow |control |
|00001410| 6f 66 0a 09 58 69 6e 64 | 65 6e 74 61 74 69 6f 6e |of..Xind|entation|
|00001420| 2c 20 6c 69 6e 65 20 77 | 69 64 74 68 2c 20 6c 69 |, line w|idth, li|
|00001430| 6e 65 20 73 70 61 63 69 | 6e 67 2c 20 66 69 6c 6c |ne spaci|ng, fill|
|00001440| 69 6e 67 2c 0a 09 58 70 | 61 67 69 6e 61 74 69 6f |ing,..Xp|aginatio|
|00001450| 6e 20 77 69 74 68 20 68 | 65 61 64 65 72 73 20 61 |n with h|eaders a|
|00001460| 6e 64 20 66 6f 6f 74 65 | 72 73 2c 0a 09 58 6c 69 |nd foote|rs,..Xli|
|00001470| 6e 65 20 6e 75 6d 62 65 | 72 69 6e 67 2c 20 72 69 |ne numbe|ring, ri|
|00001480| 67 68 74 20 6a 75 73 74 | 69 66 69 63 61 74 69 6f |ght just|ificatio|
|00001490| 6e 2c 0a 09 58 61 6e 64 | 20 70 65 72 68 61 70 73 |n,..Xand| perhaps|
|000014a0| 20 73 6f 6d 65 20 6f 74 | 68 65 72 20 74 68 69 6e | some ot|her thin|
|000014b0| 67 73 2e 0a 09 58 54 68 | 65 79 20 68 61 76 65 20 |gs...XTh|ey have |
|000014c0| 65 78 74 65 6e 73 69 76 | 65 20 74 79 70 65 20 61 |extensiv|e type a|
|000014d0| 6e 64 20 72 61 6e 67 65 | 20 63 68 65 63 6b 69 6e |nd range| checkin|
|000014e0| 67 0a 09 58 74 68 61 74 | 20 70 72 6f 64 75 63 65 |g..Xthat| produce|
|000014f0| 73 20 64 69 61 67 6e 6f | 73 74 69 63 20 65 72 72 |s diagno|stic err|
|00001500| 6f 72 20 6d 65 73 73 61 | 67 65 73 2c 0a 09 58 73 |or messa|ges,..Xs|
|00001510| 6f 20 77 61 72 6e 69 6e | 67 73 20 6f 66 20 6f 62 |o warnin|gs of ob|
|00001520| 76 69 6f 75 73 6c 79 20 | 77 72 6f 6e 67 20 6f 70 |viously |wrong op|
|00001530| 74 69 6f 6e 73 20 77 69 | 6c 6c 20 6e 6f 74 20 62 |tions wi|ll not b|
|00001540| 65 20 64 69 73 63 75 73 | 73 65 64 20 68 65 72 65 |e discus|sed here|
|00001550| 2e 0a 09 58 49 6e 20 67 | 65 6e 65 72 61 6c 2c 20 |...XIn g|eneral, |
|00001560| 6f 70 74 69 6f 6e 73 20 | 74 68 61 74 20 69 6d 70 |options |that imp|
|00001570| 6c 79 20 74 68 65 20 75 | 73 65 20 6f 66 20 6f 74 |ly the u|se of ot|
|00001580| 68 65 72 73 0a 09 58 77 | 6f 72 6b 20 74 68 65 20 |hers..Xw|ork the |
|00001590| 77 61 79 20 74 68 65 79 | 20 73 68 6f 75 6c 64 3b |way they| should;|
|000015a0| 20 69 66 20 74 68 65 20 | 70 61 67 65 20 73 69 7a | if the |page siz|
|000015b0| 65 20 69 73 20 73 65 74 | 2c 0a 09 58 74 68 65 6e |e is set|,..Xthen|
|000015c0| 20 70 61 67 69 6e 61 74 | 69 6f 6e 20 69 73 20 61 | paginat|ion is a|
|000015d0| 75 74 6f 6d 61 74 69 63 | 61 6c 6c 79 20 61 73 73 |utomatic|ally ass|
|000015e0| 75 6d 65 64 2e 0a 09 58 | 53 6f 6d 65 20 63 6f 6d |umed...X|Some com|
|000015f0| 62 69 6e 61 74 69 6f 6e | 73 20 6f 66 20 6f 70 74 |bination|s of opt|
|00001600| 69 6f 6e 73 20 67 69 76 | 65 20 69 6d 70 72 65 73 |ions giv|e impres|
|00001610| 73 69 76 65 2c 20 65 76 | 65 6e 20 61 72 74 69 73 |sive, ev|en artis|
|00001620| 74 69 63 2c 20 65 66 66 | 65 63 74 73 2e 0a 09 58 |tic, eff|ects...X|
|00001630| 4d 61 6b 69 6e 67 20 61 | 20 73 6d 61 6c 6c 20 74 |Making a| small t|
|00001640| 65 78 74 20 66 69 6c 65 | 20 61 6e 64 20 70 6c 61 |ext file| and pla|
|00001650| 79 69 6e 67 20 77 69 74 | 68 20 69 74 20 69 73 20 |ying wit|h it is |
|00001660| 74 68 65 20 65 61 73 69 | 65 73 74 0a 09 58 77 61 |the easi|est..Xwa|
|00001670| 79 20 74 6f 20 6c 65 61 | 72 6e 20 68 6f 77 20 74 |y to lea|rn how t|
|00001680| 68 65 20 6f 70 74 69 6f | 6e 73 20 69 6e 74 65 72 |he optio|ns inter|
|00001690| 61 63 74 2e 0a 09 58 2e | 64 65 20 4f 50 0a 09 58 |act...X.|de OP..X|
|000016a0| 2e 54 50 0a 09 58 2e 42 | 20 2d 5c 5c 24 31 20 5c |.TP..X.B| -\\$1 \|
|000016b0| 5c 24 32 0a 09 58 2e 2e | 0a 09 58 2a 2f 0a 09 58 |\$2..X..|..X*/..X|
|000016c0| 0a 09 58 09 42 6f 6f 6c | 65 09 42 72 65 61 6b 6c |..X.Bool|e.Breakl|
|000016d0| 69 6e 65 73 20 3d 20 46 | 41 4c 53 45 3b 20 2f 2a |ines = F|ALSE; /*|
|000016e0| 4d 41 4e 55 41 4c 2e 4f | 50 20 62 0a 09 58 42 72 |MANUAL.O|P b..XBr|
|000016f0| 65 61 6b 20 61 6c 6c 20 | 6c 69 6e 65 73 20 6f 66 |eak all |lines of|
|00001700| 20 74 65 78 74 2e 0a 09 | 58 54 68 61 74 20 69 73 | text...|XThat is|
|00001710| 2c 20 64 6f 6e 27 74 20 | 65 76 65 6e 2d 6f 75 74 |, don't |even-out|
|00001720| 20 6c 69 6e 65 73 20 62 | 79 20 66 69 6c 6c 69 6e | lines b|y fillin|
|00001730| 67 2e 0a 09 58 42 79 20 | 64 65 66 61 75 6c 74 2c |g...XBy |default,|
|00001740| 20 74 65 78 74 20 6c 69 | 6e 65 73 20 61 72 65 20 | text li|nes are |
|00001750| 66 69 6c 6c 65 64 2e 0a | 09 58 2a 2f 0a 09 58 0a |filled..|.X*/..X.|
|00001760| 09 58 09 63 68 61 72 09 | 2a 42 72 65 61 6b 63 68 |.X.char.|*Breakch|
|00001770| 61 72 73 20 3d 20 4e 55 | 4c 4c 3b 20 2f 2a 4d 41 |ars = NU|LL; /*MA|
|00001780| 4e 55 41 4c 2e 4f 50 20 | 42 20 62 72 65 61 6b 63 |NUAL.OP |B breakc|
|00001790| 68 61 72 73 0a 09 58 43 | 68 61 6e 67 65 20 74 68 |hars..XC|hange th|
|000017a0| 65 20 73 65 74 20 6f 66 | 20 63 68 61 72 61 63 74 |e set of| charact|
|000017b0| 65 72 73 20 74 68 61 74 | 20 63 61 75 73 65 20 6c |ers that| cause l|
|000017c0| 69 6e 65 20 62 72 65 61 | 6b 73 20 61 74 20 74 68 |ine brea|ks at th|
|000017d0| 65 20 73 74 61 72 74 20 | 6f 66 20 6c 69 6e 65 73 |e start |of lines|
|000017e0| 20 74 6f 0a 09 58 2e 49 | 20 62 72 65 61 6b 63 68 | to..X.I| breakch|
|000017f0| 61 72 73 2e 0a 09 58 42 | 79 20 64 65 66 61 75 6c |ars...XB|y defaul|
|00001800| 74 2c 20 61 6e 79 20 63 | 68 61 72 61 63 74 65 72 |t, any c|haracter|
|00001810| 73 20 62 75 74 20 6c 65 | 74 74 65 72 73 20 61 6e |s but le|tters an|
|00001820| 64 20 6e 75 6d 62 65 72 | 73 20 63 61 75 73 65 20 |d number|s cause |
|00001830| 61 20 62 72 65 61 6b 2e | 0a 09 58 41 20 67 6f 6f |a break.|..XA goo|
|00001840| 64 20 63 68 6f 69 63 65 | 20 66 6f 72 20 62 72 65 |d choice| for bre|
|00001850| 61 6b 20 63 68 61 72 61 | 63 74 65 72 73 20 6d 69 |ak chara|cters mi|
|00001860| 67 68 74 20 62 65 20 22 | 2a 2d 2b 22 20 61 6e 64 |ght be "|*-+" and|
|00001870| 20 54 41 42 53 0a 09 58 | 74 68 61 74 20 6d 69 67 | TABS..X|that mig|
|00001880| 68 74 20 62 65 20 75 73 | 65 64 20 66 6f 72 20 6c |ht be us|ed for l|
|00001890| 69 73 74 73 2e 0a 09 58 | 2a 2f 0a 09 58 0a 09 58 |ists...X|*/..X..X|
|000018a0| 09 42 6f 6f 6c 65 09 43 | 65 6e 74 65 72 20 3d 20 |.Boole.C|enter = |
|000018b0| 46 41 4c 53 45 3b 20 2f | 2a 4d 41 4e 55 41 4c 2e |FALSE; /|*MANUAL.|
|000018c0| 4f 50 20 63 0a 09 58 43 | 65 6e 74 65 72 20 61 6c |OP c..XC|enter al|
|000018d0| 6c 20 6c 69 6e 65 73 20 | 6f 66 20 74 65 78 74 2e |l lines |of text.|
|000018e0| 0a 09 58 54 68 69 73 20 | 6f 70 74 69 6f 6e 20 73 |..XThis |option s|
|000018f0| 74 6f 70 73 20 61 6c 6c | 20 66 69 6c 6c 69 6e 67 |tops all| filling|
|00001900| 20 6f 66 20 74 65 78 74 | 2e 0a 09 58 2a 2f 0a 09 | of text|...X*/..|
|00001910| 58 0a 09 58 09 42 6f 6f | 6c 65 09 44 65 6c 73 70 |X..X.Boo|le.Delsp|
|00001920| 61 63 65 20 3d 20 46 41 | 4c 53 45 3b 20 2f 2a 4d |ace = FA|LSE; /*M|
|00001930| 41 4e 55 41 4c 2e 4f 50 | 20 64 0a 09 58 44 65 6c |ANUAL.OP| d..XDel|
|00001940| 65 74 65 20 77 68 69 74 | 65 20 73 70 61 63 65 20 |ete whit|e space |
|00001950| 61 74 20 74 68 65 20 62 | 65 67 69 6e 6e 69 6e 67 |at the b|eginning|
|00001960| 20 61 6e 64 20 65 6e 64 | 20 6f 66 20 6c 69 6e 65 | and end| of line|
|00001970| 73 2e 0a 09 58 54 68 69 | 73 20 6f 70 74 69 6f 6e |s...XThi|s option|
|00001980| 20 69 73 20 75 73 65 66 | 75 6c 20 74 6f 20 68 65 | is usef|ul to he|
|00001990| 6c 70 20 75 6e 2d 66 6f | 72 6d 61 74 20 74 65 78 |lp un-fo|rmat tex|
|000019a0| 74 20 74 6f 20 62 65 20 | 72 65 2d 66 6f 72 6d 61 |t to be |re-forma|
|000019b0| 74 74 65 64 2e 0a 09 58 | 2a 2f 0a 09 58 0a 09 58 |tted...X|*/..X..X|
|000019c0| 09 42 6f 6f 6c 65 09 44 | 65 6c 6c 69 6e 65 20 3d |.Boole.D|elline =|
|000019d0| 20 46 41 4c 53 45 3b 20 | 2f 2a 4d 41 4e 55 41 4c | FALSE; |/*MANUAL|
|000019e0| 2e 4f 50 20 44 0a 09 58 | 44 65 6c 65 74 65 20 65 |.OP D..X|Delete e|
|000019f0| 6d 70 74 79 20 69 6e 70 | 75 74 20 6c 69 6e 65 73 |mpty inp|ut lines|
|00001a00| 2e 0a 09 58 41 6e 20 69 | 6e 70 75 74 20 6c 69 6e |...XAn i|nput lin|
|00001a10| 65 20 69 73 20 65 6d 70 | 74 79 20 69 66 20 69 74 |e is emp|ty if it|
|00001a20| 20 68 61 73 20 6e 6f 20 | 63 68 61 72 61 63 74 65 | has no |characte|
|00001a30| 72 73 2c 0a 09 58 6e 6f | 74 20 65 76 65 6e 20 69 |rs,..Xno|t even i|
|00001a40| 6e 76 69 73 69 62 6c 65 | 20 63 68 61 72 61 63 74 |nvisible| charact|
|00001a50| 65 72 20 6c 69 6b 65 20 | 74 61 62 73 20 6f 72 20 |er like |tabs or |
|00001a60| 73 70 61 63 65 73 2e 0a | 09 58 54 68 69 73 20 6f |spaces..|.XThis o|
|00001a70| 70 74 69 6f 6e 20 63 61 | 6e 20 62 65 20 63 6f 6d |ption ca|n be com|
|00001a80| 62 69 6e 65 64 20 77 69 | 74 68 20 74 68 65 20 6f |bined wi|th the o|
|00001a90| 70 74 69 6f 6e 20 74 6f | 20 72 65 6d 6f 76 65 20 |ption to| remove |
|00001aa0| 77 68 69 74 65 20 73 70 | 61 63 65 0a 09 58 74 6f |white sp|ace..Xto|
|00001ab0| 20 64 65 6c 65 74 65 20 | 76 69 73 69 62 6c 79 20 | delete |visibly |
|00001ac0| 62 6c 61 6e 6b 20 6c 69 | 6e 65 73 2e 0a 09 58 2a |blank li|nes...X*|
|00001ad0| 2f 0a 09 58 0a 09 58 09 | 63 68 61 72 09 2a 46 6f |/..X..X.|char.*Fo|
|00001ae0| 6f 74 65 72 20 3d 20 4e | 55 4c 4c 3b 20 2f 2a 4d |oter = N|ULL; /*M|
|00001af0| 41 4e 55 41 4c 2e 4f 50 | 20 66 20 66 6f 6f 74 65 |ANUAL.OP| f foote|
|00001b00| 72 0a 09 58 53 65 74 20 | 74 68 65 20 70 61 67 65 |r..XSet |the page|
|00001b10| 20 66 6f 6f 74 65 72 20 | 74 6f 20 74 68 65 20 73 | footer |to the s|
|00001b20| 74 72 69 6e 67 0a 09 58 | 2e 49 20 66 6f 6f 74 65 |tring..X|.I foote|
|00001b30| 72 2e 0a 09 58 54 68 69 | 73 20 63 61 6e 20 62 65 |r...XThi|s can be|
|00001b40| 20 61 6e 79 20 73 74 72 | 69 6e 67 2c 0a 09 58 62 | any str|ing,..Xb|
|00001b50| 75 74 20 69 66 20 74 68 | 65 20 66 69 72 73 74 20 |ut if th|e first |
|00001b60| 63 68 61 72 61 63 74 65 | 72 20 69 73 20 6e 6f 74 |characte|r is not|
|00001b70| 20 61 20 6c 65 74 74 65 | 72 20 6f 72 20 61 20 64 | a lette|r or a d|
|00001b80| 69 67 69 74 2c 0a 09 58 | 62 75 74 20 61 20 70 75 |igit,..X|but a pu|
|00001b90| 6e 63 74 75 61 74 69 6f | 6e 20 63 68 61 72 61 63 |nctuatio|n charac|
|00001ba0| 74 65 72 20 6c 69 6b 65 | 20 2f 2c 0a 09 58 74 68 |ter like| /,..Xth|
|00001bb0| 65 6e 20 74 68 61 74 20 | 63 68 61 72 61 63 74 65 |en that |characte|
|00001bc0| 72 20 73 65 70 61 72 61 | 74 65 73 20 74 68 65 20 |r separa|tes the |
|00001bd0| 6c 65 66 74 2c 0a 09 58 | 63 65 6e 74 65 72 2c 20 |left,..X|center, |
|00001be0| 61 6e 64 20 72 69 67 68 | 74 20 66 69 65 6c 64 73 |and righ|t fields|
|00001bf0| 20 6f 66 20 61 20 74 69 | 74 6c 65 2e 0a 09 58 46 | of a ti|tle...XF|
|00001c00| 6f 72 20 65 78 61 6d 70 | 6c 65 2c 20 74 68 65 20 |or examp|le, the |
|00001c10| 74 69 74 6c 65 0a 09 58 | 2e 63 65 0a 09 58 22 2f |title..X|.ce..X"/|
|00001c20| 66 66 3a 20 66 61 73 74 | 20 66 6f 72 6d 61 74 74 |ff: fast| formatt|
|00001c30| 65 72 2f 2f 31 39 38 35 | 2f 22 0a 09 58 77 6f 75 |er//1985|/"..Xwou|
|00001c40| 6c 64 20 68 61 76 65 20 | 22 66 66 3a 20 66 61 73 |ld have |"ff: fas|
|00001c50| 74 20 66 6f 72 6d 61 74 | 74 65 72 22 20 61 73 20 |t format|ter" as |
|00001c60| 61 20 6c 65 66 74 20 6a | 75 73 74 69 66 69 65 64 |a left j|ustified|
|00001c70| 20 66 69 65 6c 64 0a 09 | 58 61 6e 64 20 31 39 38 | field..|Xand 198|
|00001c80| 35 20 61 73 20 61 20 72 | 69 67 68 74 20 6a 75 73 |5 as a r|ight jus|
|00001c90| 74 69 66 69 65 64 20 66 | 69 65 6c 64 20 6f 6e 20 |tified f|ield on |
|00001ca0| 65 61 63 68 20 70 61 67 | 65 2e 0a 09 58 4e 6f 74 |each pag|e...XNot|
|00001cb0| 65 20 74 68 61 74 20 74 | 68 65 72 65 20 69 73 20 |e that t|here is |
|00001cc0| 6e 6f 20 6d 69 64 64 6c | 65 20 66 69 65 6c 64 20 |no middl|e field |
|00001cd0| 69 6e 20 74 68 69 73 20 | 65 78 61 6d 70 6c 65 2c |in this |example,|
|00001ce0| 0a 09 58 62 75 74 20 74 | 68 65 72 65 20 63 6f 75 |..Xbut t|here cou|
|00001cf0| 6c 64 20 68 61 76 65 20 | 62 65 65 6e 2c 20 62 65 |ld have |been, be|
|00001d00| 74 77 65 65 6e 20 74 68 | 65 20 74 77 6f 20 63 6f |tween th|e two co|
|00001d10| 6e 73 65 63 75 74 69 76 | 65 20 2f 27 73 2e 0a 09 |nsecutiv|e /'s...|
|00001d20| 58 54 68 65 72 65 20 61 | 72 65 20 74 77 6f 20 73 |XThere a|re two s|
|00001d30| 70 65 63 69 61 6c 20 63 | 68 61 72 61 63 74 65 72 |pecial c|haracter|
|00001d40| 73 2c 20 25 20 61 6e 64 | 20 2a 2c 0a 09 58 74 68 |s, % and| *,..Xth|
|00001d50| 61 74 20 72 65 73 70 65 | 63 74 69 76 65 6c 79 20 |at respe|ctively |
|00001d60| 61 72 65 20 76 61 72 69 | 61 62 6c 65 73 20 66 6f |are vari|ables fo|
|00001d70| 72 20 74 68 65 20 70 61 | 67 65 20 6e 75 6d 62 65 |r the pa|ge numbe|
|00001d80| 72 0a 09 58 61 6e 64 20 | 74 68 65 20 69 6e 70 75 |r..Xand |the inpu|
|00001d90| 74 20 66 69 6c 65 20 6e | 61 6d 65 2e 0a 09 58 54 |t file n|ame...XT|
|00001da0| 68 65 20 64 65 66 61 75 | 6c 74 20 70 61 67 65 20 |he defau|lt page |
|00001db0| 66 6f 6f 74 65 72 20 69 | 73 20 62 6c 61 6e 6b 2e |footer i|s blank.|
|00001dc0| 0a 09 58 2a 2f 0a 09 58 | 0a 09 58 09 69 6e 74 20 |..X*/..X|..X.int |
|00001dd0| 09 46 6f 6f 74 73 69 7a | 65 20 3d 20 46 4f 4f 54 |.Footsiz|e = FOOT|
|00001de0| 53 49 5a 45 3b 20 2f 2a | 4d 41 4e 55 41 4c 2e 4f |SIZE; /*|MANUAL.O|
|00001df0| 50 20 46 20 66 6f 6f 74 | 65 72 73 69 7a 65 0a 09 |P F foot|ersize..|
|00001e00| 58 53 65 74 20 74 68 65 | 20 6e 75 6d 62 65 72 20 |XSet the| number |
|00001e10| 6f 66 20 62 6c 61 6e 6b | 20 6c 69 6e 65 73 20 61 |of blank| lines a|
|00001e20| 74 20 74 68 65 20 62 6f | 74 74 6f 6d 20 6f 66 20 |t the bo|ttom of |
|00001e30| 74 68 65 20 70 61 67 65 | 2e 0a 09 58 54 68 65 20 |the page|...XThe |
|00001e40| 66 6f 6f 74 65 72 2c 20 | 69 66 20 61 6e 79 2c 20 |footer, |if any, |
|00001e50| 69 73 20 70 6c 61 63 65 | 64 20 69 6e 20 74 68 65 |is place|d in the|
|00001e60| 20 6d 69 64 64 6c 65 20 | 6f 66 20 74 68 65 20 73 | middle |of the s|
|00001e70| 70 61 63 65 2c 0a 09 58 | 77 68 69 63 68 20 62 79 |pace,..X|which by|
|00001e80| 20 64 65 66 61 75 6c 74 | 2c 20 69 73 20 66 69 76 | default|, is fiv|
|00001e90| 65 20 6c 69 6e 65 73 2e | 0a 09 58 49 66 0a 09 58 |e lines.|..XIf..X|
|00001ea0| 2e 49 20 66 6f 6f 74 65 | 72 73 69 7a 65 0a 09 58 |.I foote|rsize..X|
|00001eb0| 69 73 20 30 2c 20 6e 6f | 20 66 6f 6f 74 65 72 20 |is 0, no| footer |
|00001ec0| 77 69 6c 6c 20 62 65 20 | 70 72 69 6e 74 65 64 2e |will be |printed.|
|00001ed0| 0a 09 58 2a 2f 0a 09 58 | 0a 09 58 09 63 68 61 72 |..X*/..X|..X.char|
|00001ee0| 09 2a 48 65 61 64 65 72 | 20 3d 20 48 45 41 44 45 |.*Header| = HEADE|
|00001ef0| 52 3b 20 2f 2a 4d 41 4e | 55 41 4c 2e 4f 50 20 68 |R; /*MAN|UAL.OP h|
|00001f00| 20 68 65 61 64 65 72 0a | 09 58 53 65 74 20 74 68 | header.|.XSet th|
|00001f10| 65 20 70 61 67 65 20 68 | 65 61 64 65 72 2e 0a 09 |e page h|eader...|
|00001f20| 58 53 65 65 20 74 68 65 | 20 64 65 73 63 72 69 70 |XSee the| descrip|
|00001f30| 74 69 6f 6e 20 6f 66 20 | 74 68 72 65 65 2d 70 61 |tion of |three-pa|
|00001f40| 72 74 20 74 69 74 6c 65 | 73 20 66 6f 72 20 74 68 |rt title|s for th|
|00001f50| 65 0a 09 58 2e 42 20 2d | 66 20 66 6f 6f 74 65 72 |e..X.B -|f footer|
|00001f60| 0a 09 58 6f 70 74 69 6f | 6e 2e 0a 09 58 54 68 65 |..Xoptio|n...XThe|
|00001f70| 20 64 65 66 61 75 6c 74 | 20 70 61 67 65 20 68 65 | default| page he|
|00001f80| 61 64 65 72 20 69 73 0a | 09 58 2e 63 65 0a 09 58 |ader is.|.X.ce..X|
|00001f90| 22 7c 46 69 6c 65 3a 20 | 2a 7c 7c 50 61 67 65 3a |"|File: |*||Page:|
|00001fa0| 20 25 7c 22 2e 0a 09 58 | 2a 2f 0a 09 58 0a 09 58 | %|"...X|*/..X..X|
|00001fb0| 09 69 6e 74 20 09 48 65 | 61 64 73 69 7a 65 20 3d |.int .He|adsize =|
|00001fc0| 20 48 45 41 44 53 49 5a | 45 3b 20 2f 2a 4d 41 4e | HEADSIZ|E; /*MAN|
|00001fd0| 55 41 4c 2e 4f 50 20 48 | 20 68 65 61 64 65 72 73 |UAL.OP H| headers|
|00001fe0| 69 7a 65 0a 09 58 53 65 | 65 20 74 68 65 20 64 65 |ize..XSe|e the de|
|00001ff0| 73 63 72 69 70 74 69 6f | 6e 20 6f 66 20 74 68 65 |scriptio|n of the|
|00002000| 20 66 6f 6f 74 65 72 20 | 73 69 7a 65 2e 0a 09 58 | footer |size...X|
|00002010| 2a 2f 0a 09 58 0a 09 58 | 09 69 6e 74 20 09 49 6e |*/..X..X|.int .In|
|00002020| 64 65 6e 74 20 3d 20 30 | 3b 20 2f 2a 4d 41 4e 55 |dent = 0|; /*MANU|
|00002030| 41 4c 2e 4f 50 20 69 20 | 69 6e 64 65 6e 74 0a 09 |AL.OP i |indent..|
|00002040| 58 53 65 74 20 74 68 65 | 20 69 6e 64 65 6e 74 61 |XSet the| indenta|
|00002050| 74 69 6f 6e 20 6f 66 20 | 74 68 65 20 74 65 78 74 |tion of |the text|
|00002060| 20 74 6f 0a 09 58 2e 49 | 20 69 6e 64 65 6e 74 0a | to..X.I| indent.|
|00002070| 09 58 73 70 61 63 65 73 | 2e 0a 09 58 4e 6f 74 65 |.Xspaces|...XNote|
|00002080| 20 74 68 61 74 20 74 68 | 69 73 20 65 66 66 65 63 | that th|is effec|
|00002090| 74 69 76 65 6c 79 20 72 | 65 64 75 63 65 73 20 74 |tively r|educes t|
|000020a0| 68 65 20 75 73 61 62 6c | 65 20 77 69 64 74 68 20 |he usabl|e width |
|000020b0| 6f 66 20 74 68 65 20 70 | 61 67 65 2e 0a 09 58 2a |of the p|age...X*|
|000020c0| 2f 0a 09 58 0a 09 58 09 | 69 6e 74 20 09 54 69 6e |/..X..X.|int .Tin|
|000020d0| 64 65 6e 74 20 3d 20 30 | 3b 20 2f 2a 4d 41 4e 55 |dent = 0|; /*MANU|
|000020e0| 41 4c 2e 4f 50 20 49 20 | 74 65 6d 70 69 6e 64 65 |AL.OP I |tempinde|
|000020f0| 6e 74 0a 09 58 53 65 74 | 20 74 68 65 20 74 65 6d |nt..XSet| the tem|
|00002100| 70 6f 72 61 72 79 20 69 | 6e 64 65 6e 74 2e 0a 09 |porary i|ndent...|
|00002110| 58 54 68 69 73 20 63 61 | 75 73 65 73 20 66 69 6c |XThis ca|uses fil|
|00002120| 6c 65 64 20 74 65 78 74 | 20 66 6f 75 6e 64 20 69 |led text| found i|
|00002130| 6d 6d 65 64 69 61 74 65 | 6c 79 20 61 66 74 65 72 |mmediate|ly after|
|00002140| 20 61 20 62 72 65 61 6b | 20 74 6f 0a 09 58 62 65 | a break| to..Xbe|
|00002150| 20 69 6e 64 65 6e 74 65 | 64 20 66 6f 72 20 6f 6e | indente|d for on|
|00002160| 65 20 6c 69 6e 65 2e 0a | 09 58 49 74 20 69 73 20 |e line..|.XIt is |
|00002170| 75 73 65 66 75 6c 20 66 | 6f 72 20 69 6e 64 65 6e |useful f|or inden|
|00002180| 74 69 6e 67 20 74 68 65 | 20 66 69 72 73 74 20 6c |ting the| first l|
|00002190| 69 6e 65 73 20 6f 66 20 | 70 61 72 61 67 72 61 70 |ines of |paragrap|
|000021a0| 68 73 2e 0a 09 58 49 66 | 0a 09 58 2e 49 20 74 65 |hs...XIf|..X.I te|
|000021b0| 6d 70 69 6e 64 65 6e 74 | 0a 09 58 69 73 20 6e 65 |mpindent|..Xis ne|
|000021c0| 67 61 74 69 76 65 2c 0a | 09 58 74 68 65 20 74 68 |gative,.|.Xthe th|
|000021d0| 65 20 74 65 6d 70 6f 72 | 61 72 79 20 69 6e 64 65 |e tempor|ary inde|
|000021e0| 6e 74 20 77 69 6c 6c 20 | 62 65 20 72 65 6c 61 74 |nt will |be relat|
|000021f0| 69 76 65 20 74 6f 20 74 | 68 65 20 63 75 72 72 65 |ive to t|he curre|
|00002200| 6e 74 0a 09 58 2e 49 20 | 69 6e 64 65 6e 74 0a 09 |nt..X.I |indent..|
|00002210| 58 76 61 6c 75 65 2e 0a | 09 58 49 66 20 74 68 65 |Xvalue..|.XIf the|
|00002220| 0a 09 58 2e 49 20 74 65 | 6d 70 69 6e 64 65 6e 74 |..X.I te|mpindent|
|00002230| 0a 09 58 76 61 6c 75 65 | 20 69 73 20 6d 6f 72 65 |..Xvalue| is more|
|00002240| 20 6e 65 67 61 74 69 76 | 65 20 74 68 61 6e 20 74 | negativ|e than t|
|00002250| 68 65 0a 09 58 2e 49 20 | 69 6e 64 65 6e 74 0a 09 |he..X.I |indent..|
|00002260| 58 76 61 6c 75 65 20 69 | 73 20 70 6f 73 69 74 69 |Xvalue i|s positi|
|00002270| 76 65 2c 0a 09 58 2e 49 | 20 66 66 0a 09 58 77 69 |ve,..X.I| ff..Xwi|
|00002280| 6c 6c 20 61 75 74 6f 6d | 61 74 69 63 61 6c 6c 79 |ll autom|atically|
|00002290| 20 69 6e 63 72 65 61 73 | 65 0a 09 58 2e 49 20 69 | increas|e..X.I i|
|000022a0| 6e 64 65 6e 74 2e 0a 09 | 58 2a 2f 0a 09 58 0a 09 |ndent...|X*/..X..|
|000022b0| 58 09 42 6f 6f 6c 65 09 | 4a 75 73 74 69 66 79 20 |X.Boole.|Justify |
|000022c0| 3d 20 46 41 4c 53 45 3b | 20 2f 2a 4d 41 4e 55 41 |= FALSE;| /*MANUA|
|000022d0| 4c 2e 4f 50 20 6a 0a 09 | 58 4a 75 73 74 69 66 79 |L.OP j..|XJustify|
|000022e0| 20 74 68 65 20 74 65 78 | 74 2e 0a 09 58 54 68 61 | the tex|t...XTha|
|000022f0| 74 20 69 73 2c 20 65 76 | 65 6e 20 74 68 65 20 72 |t is, ev|en the r|
|00002300| 69 67 68 74 20 6d 61 72 | 67 69 6e 20 62 79 20 69 |ight mar|gin by i|
|00002310| 6e 73 65 72 74 69 6e 67 | 20 73 70 61 63 65 73 20 |nserting| spaces |
|00002320| 69 6e 20 74 68 65 20 6c | 69 6e 65 2e 0a 09 58 4f |in the l|ine...XO|
|00002330| 6e 6c 79 20 66 69 6c 6c | 65 64 20 74 65 78 74 20 |nly fill|ed text |
|00002340| 63 61 6e 20 62 65 20 6a | 75 73 74 69 66 69 65 64 |can be j|ustified|
|00002350| 2e 0a 09 58 2a 2f 0a 09 | 58 0a 09 58 09 42 6f 6f |...X*/..|X..X.Boo|
|00002360| 6c 65 09 4e 75 6d 6c 69 | 6e 65 73 20 3d 20 46 41 |le.Numli|nes = FA|
|00002370| 4c 53 45 3b 20 2f 2a 4d | 41 4e 55 41 4c 2e 4f 50 |LSE; /*M|ANUAL.OP|
|00002380| 20 6e 0a 09 58 4e 75 6d | 62 65 72 20 61 6c 6c 20 | n..XNum|ber all |
|00002390| 6f 75 74 70 75 74 20 6c | 69 6e 65 73 20 70 72 6f |output l|ines pro|
|000023a0| 64 75 63 65 64 20 62 79 | 20 74 68 65 20 69 6e 70 |duced by| the inp|
|000023b0| 75 74 20 74 65 78 74 2e | 0a 09 58 4c 69 6e 65 73 |ut text.|..XLines|
|000023c0| 20 66 72 6f 6d 20 6d 75 | 6c 74 69 70 6c 65 20 6c | from mu|ltiple l|
|000023d0| 69 6e 65 20 73 70 61 63 | 69 6e 67 20 6f 72 20 70 |ine spac|ing or p|
|000023e0| 61 67 69 6e 61 74 69 6f | 6e 20 77 69 6c 6c 20 6e |aginatio|n will n|
|000023f0| 6f 74 0a 09 58 62 65 20 | 6e 75 6d 62 65 72 65 64 |ot..Xbe |numbered|
|00002400| 2e 0a 09 58 2a 2f 0a 09 | 58 0a 09 58 09 69 6e 74 |...X*/..|X..X.int|
|00002410| 20 09 4e 75 6d 77 69 64 | 74 68 20 3d 20 4e 55 4d | .Numwid|th = NUM|
|00002420| 57 49 44 54 48 3b 20 2f | 2a 4d 41 4e 55 41 4c 2e |WIDTH; /|*MANUAL.|
|00002430| 4f 50 20 4e 20 6e 75 6d | 62 65 72 77 69 64 74 68 |OP N num|berwidth|
|00002440| 0a 09 58 53 65 74 20 74 | 68 65 20 77 69 64 74 68 |..XSet t|he width|
|00002450| 20 6f 66 20 74 68 65 20 | 6c 69 6e 65 20 6e 75 6d | of the |line num|
|00002460| 62 65 72 73 2e 0a 09 58 | 54 68 65 20 64 65 66 61 |bers...X|The defa|
|00002470| 75 6c 74 20 69 73 20 74 | 6f 20 74 61 6b 65 20 75 |ult is t|o take u|
|00002480| 70 20 34 20 73 70 61 63 | 65 73 2e 0a 09 58 4e 6f |p 4 spac|es...XNo|
|00002490| 74 65 20 74 68 61 74 20 | 74 68 69 73 20 65 66 66 |te that |this eff|
|000024a0| 65 63 74 69 76 65 6c 79 | 20 72 65 64 75 63 65 73 |ectively| reduces|
|000024b0| 20 74 68 65 20 75 73 61 | 62 6c 65 20 70 61 72 74 | the usa|ble part|
|000024c0| 20 6f 66 20 74 68 65 20 | 70 61 67 65 2e 0a 09 58 | of the |page...X|
|000024d0| 2a 2f 0a 09 58 0a 09 58 | 09 42 6f 6f 6c 65 09 50 |*/..X..X|.Boole.P|
|000024e0| 61 67 69 6e 61 74 65 20 | 3d 20 46 41 4c 53 45 3b |aginate |= FALSE;|
|000024f0| 20 2f 2a 4d 41 4e 55 41 | 4c 2e 4f 50 20 70 0a 09 | /*MANUA|L.OP p..|
|00002500| 58 50 61 67 69 6e 61 74 | 65 20 74 68 65 20 6f 75 |XPaginat|e the ou|
|00002510| 74 70 75 74 2e 0a 09 58 | 53 65 65 20 74 68 65 20 |tput...X|See the |
|00002520| 6f 70 74 69 6f 6e 73 20 | 66 6f 72 20 70 61 67 65 |options |for page|
|00002530| 20 68 65 61 64 65 72 20 | 61 6e 64 20 66 6f 6f 74 | header |and foot|
|00002540| 65 72 20 63 6f 6e 74 72 | 6f 6c 2e 0a 09 58 2a 2f |er contr|ol...X*/|
|00002550| 0a 09 58 0a 09 58 09 69 | 6e 74 20 09 50 61 67 65 |..X..X.i|nt .Page|
|00002560| 73 69 7a 65 20 3d 20 50 | 41 47 45 53 49 5a 45 3b |size = P|AGESIZE;|
|00002570| 20 2f 2a 4d 41 4e 55 41 | 4c 2e 4f 50 20 50 20 70 | /*MANUA|L.OP P p|
|00002580| 61 67 65 73 69 7a 65 0a | 09 58 53 65 74 20 74 68 |agesize.|.XSet th|
|00002590| 65 20 6e 75 6d 62 65 72 | 20 6f 66 20 6c 69 6e 65 |e number| of line|
|000025a0| 73 20 69 6e 20 61 20 70 | 61 67 65 20 74 6f 0a 09 |s in a p|age to..|
|000025b0| 58 2e 49 20 70 61 67 65 | 73 69 7a 65 2e 0a 09 58 |X.I page|size...X|
|000025c0| 42 79 20 64 65 66 61 75 | 6c 74 2c 20 74 68 65 20 |By defau|lt, the |
|000025d0| 73 74 61 6e 64 61 72 64 | 20 36 36 20 6c 69 6e 65 |standard| 66 line|
|000025e0| 20 70 61 67 65 20 69 73 | 20 61 73 73 75 6d 65 64 | page is| assumed|
|000025f0| 2e 0a 09 58 2a 2f 0a 09 | 58 0a 09 58 09 69 6e 74 |...X*/..|X..X.int|
|00002600| 20 09 53 70 61 63 69 6e | 67 20 3d 20 31 3b 20 2f | .Spacin|g = 1; /|
|00002610| 2a 4d 41 4e 55 41 4c 2e | 4f 50 20 73 20 73 70 61 |*MANUAL.|OP s spa|
|00002620| 63 69 6e 67 0a 09 58 53 | 65 74 20 74 68 65 20 6c |cing..XS|et the l|
|00002630| 69 6e 65 20 73 70 61 63 | 69 6e 67 2e 0a 09 58 42 |ine spac|ing...XB|
|00002640| 79 20 64 65 66 61 75 6c | 74 2c 20 74 65 78 74 20 |y defaul|t, text |
|00002650| 69 73 20 73 69 6e 67 6c | 65 20 73 70 61 63 65 64 |is singl|e spaced|
|00002660| 20 28 5c 66 49 73 70 61 | 63 69 6e 67 5c 66 52 20 | (\fIspa|cing\fR |
|00002670| 65 71 75 61 6c 73 20 31 | 29 2e 0a 09 58 2a 2f 0a |equals 1|)...X*/.|
|00002680| 09 58 0a 09 58 09 69 6e | 74 20 09 54 61 62 5b 4d |.X..X.in|t .Tab[M|
|00002690| 41 58 54 41 42 5d 3b 0a | 09 58 09 69 6e 74 20 09 |AXTAB];.|.X.int .|
|000026a0| 4e 74 61 62 73 20 3d 20 | 30 3b 20 2f 2a 4d 41 4e |Ntabs = |0; /*MAN|
|000026b0| 55 41 4c 2e 4f 50 20 74 | 20 74 61 62 0a 09 58 53 |UAL.OP t| tab..XS|
|000026c0| 65 74 20 69 6e 64 69 76 | 69 64 75 61 6c 20 61 62 |et indiv|idual ab|
|000026d0| 73 6f 6c 75 74 65 20 61 | 6e 64 20 72 65 6c 61 74 |solute a|nd relat|
|000026e0| 69 76 65 20 74 61 62 20 | 73 74 6f 70 73 2e 0a 09 |ive tab |stops...|
|000026f0| 58 54 68 65 73 65 20 76 | 61 6c 75 65 73 20 74 65 |XThese v|alues te|
|00002700| 6c 6c 20 74 68 65 20 66 | 6f 72 6d 61 74 74 65 72 |ll the f|ormatter|
|00002710| 0a 09 58 77 68 65 72 65 | 20 74 6f 20 70 75 74 20 |..Xwhere| to put |
|00002720| 74 68 65 20 74 65 78 74 | 20 28 66 72 6f 6d 20 61 |the text| (from a|
|00002730| 6e 20 75 6e 66 69 6c 6c | 65 64 20 6c 69 6e 65 29 |n unfill|ed line)|
|00002740| 0a 09 58 74 68 61 74 20 | 66 6f 6c 6c 6f 77 73 20 |..Xthat |follows |
|00002750| 61 20 74 61 62 20 63 68 | 61 72 61 63 74 65 72 2e |a tab ch|aracter.|
|00002760| 0a 09 58 45 61 63 68 20 | 74 61 62 20 73 74 6f 70 |..XEach |tab stop|
|00002770| 20 69 73 20 73 75 70 70 | 6c 69 65 64 20 77 69 74 | is supp|lied wit|
|00002780| 68 20 69 74 73 20 6f 77 | 6e 0a 09 58 2e 42 20 2d |h its ow|n..X.B -|
|00002790| 74 0a 09 58 6f 70 74 69 | 6f 6e 3b 20 74 68 65 72 |t..Xopti|on; ther|
|000027a0| 65 20 69 73 20 6e 6f 20 | 77 61 79 20 74 6f 20 62 |e is no |way to b|
|000027b0| 75 6e 64 6c 65 20 74 68 | 65 6d 2e 0a 09 58 2e 49 |undle th|em...X.I|
|000027c0| 20 74 61 62 0a 09 58 76 | 61 6c 75 65 73 20 63 61 | tab..Xv|alues ca|
|000027d0| 6e 20 62 65 20 69 6e 74 | 65 67 65 72 73 20 77 69 |n be int|egers wi|
|000027e0| 74 68 6f 75 74 20 61 20 | 70 6c 75 73 20 73 69 67 |thout a |plus sig|
|000027f0| 6e 2e 0a 09 58 54 68 65 | 73 65 20 61 72 65 20 5c |n...XThe|se are \|
|00002800| 66 49 61 62 73 6f 6c 75 | 74 65 5c 66 52 20 74 61 |fIabsolu|te\fR ta|
|00002810| 62 20 73 65 74 74 69 6e | 67 73 3b 0a 09 58 74 68 |b settin|gs;..Xth|
|00002820| 65 20 74 61 62 73 20 67 | 6f 20 74 6f 20 74 68 61 |e tabs g|o to tha|
|00002830| 74 20 70 6f 73 69 74 69 | 6f 6e 2e 0a 09 58 54 68 |t positi|on...XTh|
|00002840| 65 20 76 61 6c 75 65 73 | 20 6d 75 73 74 20 69 6e |e values| must in|
|00002850| 63 72 65 61 73 65 20 6d | 6f 6e 6f 74 6f 6e 69 63 |crease m|onotonic|
|00002860| 61 6c 6c 79 2e 0a 09 58 | 49 66 20 61 0a 09 58 2e |ally...X|If a..X.|
|00002870| 49 20 74 61 62 0a 09 58 | 76 61 6c 75 65 20 69 73 |I tab..X|value is|
|00002880| 20 70 72 65 63 65 64 65 | 64 20 62 79 20 61 20 70 | precede|d by a p|
|00002890| 6c 75 73 20 73 69 67 6e | 2c 0a 09 58 74 68 65 6e |lus sign|,..Xthen|
|000028a0| 20 69 74 20 69 73 20 69 | 6e 74 65 72 70 72 65 74 | it is i|nterpret|
|000028b0| 65 64 20 5c 66 49 72 65 | 6c 61 74 69 76 65 5c 66 |ed \fIre|lative\f|
|000028c0| 52 20 74 6f 20 74 68 65 | 20 70 72 65 76 69 6f 75 |R to the| previou|
|000028d0| 73 20 74 61 62 20 73 65 | 74 74 69 6e 67 2e 0a 09 |s tab se|tting...|
|000028e0| 58 46 6f 72 20 65 78 61 | 6d 70 6c 65 2c 20 61 20 |XFor exa|mple, a |
|000028f0| 74 61 62 20 73 65 74 74 | 69 6e 67 20 6f 66 20 34 |tab sett|ing of 4|
|00002900| 30 20 66 6f 6c 6c 6f 77 | 65 64 20 62 79 20 6f 6e |0 follow|ed by on|
|00002910| 65 20 6f 66 20 2b 32 30 | 0a 09 58 77 69 6c 6c 20 |e of +20|..Xwill |
|00002920| 73 65 74 20 74 68 65 20 | 73 65 63 6f 6e 64 20 74 |set the |second t|
|00002930| 61 62 20 73 74 6f 70 20 | 74 6f 20 36 30 2e 0a 09 |ab stop |to 60...|
|00002940| 58 2a 2f 0a 09 58 0a 09 | 58 09 69 6e 74 20 09 41 |X*/..X..|X.int .A|
|00002950| 6c 6c 74 61 62 73 20 3d | 20 30 3b 20 2f 2a 4d 41 |lltabs =| 0; /*MA|
|00002960| 4e 55 41 4c 2e 4f 50 20 | 54 20 74 61 62 73 0a 09 |NUAL.OP |T tabs..|
|00002970| 58 53 65 74 20 74 61 62 | 20 73 74 6f 70 73 20 74 |XSet tab| stops t|
|00002980| 6f 20 65 76 65 72 79 0a | 09 58 2e 49 20 74 61 62 |o every.|.X.I tab|
|00002990| 73 0a 09 58 73 70 61 63 | 65 73 2e 0a 09 58 49 74 |s..Xspac|es...XIt|
|000029a0| 20 69 73 20 75 73 65 66 | 75 6c 20 74 6f 20 67 65 | is usef|ul to ge|
|000029b0| 74 20 65 71 75 61 6c 6c | 79 20 73 70 61 63 65 64 |t equall|y spaced|
|000029c0| 20 74 61 62 73 2e 0a 09 | 58 54 68 69 73 20 6f 70 | tabs...|XThis op|
|000029d0| 74 69 6f 6e 20 63 61 6e | 6e 6f 74 20 62 65 20 75 |tion can|not be u|
|000029e0| 73 65 64 20 77 69 74 68 | 20 74 68 65 20 6f 74 68 |sed with| the oth|
|000029f0| 65 72 20 74 61 62 20 73 | 65 74 74 69 6e 67 20 6f |er tab s|etting o|
|00002a00| 70 74 69 6f 6e 2e 0a 09 | 58 2a 2f 0a 09 58 0a 09 |ption...|X*/..X..|
|00002a10| 58 09 42 6f 6f 6c 65 09 | 55 70 70 65 72 63 61 73 |X.Boole.|Uppercas|
|00002a20| 65 20 3d 20 46 41 4c 53 | 45 3b 20 2f 2a 4d 41 4e |e = FALS|E; /*MAN|
|00002a30| 55 41 4c 2e 4f 50 20 75 | 0a 09 58 50 72 69 6e 74 |UAL.OP u|..XPrint|
|00002a40| 20 41 6c 6c 20 49 6e 70 | 75 74 20 54 65 78 74 20 | All Inp|ut Text |
|00002a50| 41 73 20 49 6e 69 74 69 | 61 6c 20 55 70 70 65 72 |As Initi|al Upper|
|00002a60| 2d 43 61 73 65 20 54 69 | 74 6c 65 73 2c 0a 09 58 |-Case Ti|tles,..X|
|00002a70| 4c 69 6b 65 20 54 68 69 | 73 20 53 65 6e 74 65 6e |Like Thi|s Senten|
|00002a80| 63 65 2e 0a 09 58 54 68 | 69 73 20 6f 70 74 69 6f |ce...XTh|is optio|
|00002a90| 6e 20 67 6f 65 73 20 77 | 65 6c 6c 20 77 69 74 68 |n goes w|ell with|
|00002aa0| 20 74 68 65 20 6f 6e 65 | 20 66 6f 72 20 63 65 6e | the one| for cen|
|00002ab0| 74 65 72 69 6e 67 20 6c | 69 6e 65 73 2e 0a 09 58 |tering l|ines...X|
|00002ac0| 2a 2f 0a 09 58 0a 09 58 | 09 2f 2a 4d 41 4e 55 41 |*/..X..X|./*MANUA|
|00002ad0| 4c 2e 4f 50 20 55 0a 09 | 58 50 72 69 6e 74 20 61 |L.OP U..|XPrint a|
|00002ae0| 20 75 73 61 67 65 20 73 | 75 6d 6d 61 72 79 20 6f | usage s|ummary o|
|00002af0| 66 20 61 6c 6c 20 74 68 | 65 20 6f 70 74 69 6f 6e |f all th|e option|
|00002b00| 73 20 61 6e 64 20 73 74 | 6f 70 2e 0a 09 58 2a 2f |s and st|op...X*/|
|00002b10| 0a 09 58 0a 09 58 09 69 | 6e 74 20 09 57 69 64 74 |..X..X.i|nt .Widt|
|00002b20| 68 20 3d 20 57 49 44 54 | 48 3b 20 2f 2a 4d 41 4e |h = WIDT|H; /*MAN|
|00002b30| 55 41 4c 2e 4f 50 20 77 | 20 77 69 64 74 68 0a 09 |UAL.OP w| width..|
|00002b40| 58 53 65 74 20 74 68 65 | 20 70 61 67 65 20 77 69 |XSet the| page wi|
|00002b50| 64 74 68 2e 0a 09 58 42 | 79 20 64 65 66 61 75 6c |dth...XB|y defaul|
|00002b60| 74 2c 20 74 68 65 20 70 | 61 67 65 20 77 69 64 74 |t, the p|age widt|
|00002b70| 68 20 69 73 20 37 32 20 | 63 68 61 72 61 63 74 65 |h is 72 |characte|
|00002b80| 72 73 2e 0a 09 58 4e 6f | 74 65 20 74 68 61 74 20 |rs...XNo|te that |
|00002b90| 74 68 65 20 75 73 61 62 | 6c 65 20 6c 69 6e 65 20 |the usab|le line |
|00002ba0| 6c 65 6e 67 74 68 20 69 | 73 20 73 6f 6d 65 74 69 |length i|s someti|
|00002bb0| 6d 65 73 20 6c 65 73 73 | 0a 09 58 74 68 61 6e 20 |mes less|..Xthan |
|00002bc0| 74 68 65 20 70 61 67 65 | 20 77 69 64 74 68 2e 0a |the page| width..|
|00002bd0| 09 58 49 66 20 6c 69 6e | 65 20 6e 75 6d 62 65 72 |.XIf lin|e number|
|00002be0| 69 6e 67 20 6f 72 20 69 | 6e 64 65 6e 74 61 74 69 |ing or i|ndentati|
|00002bf0| 6f 6e 20 69 73 20 72 65 | 71 75 65 73 74 65 64 2c |on is re|quested,|
|00002c00| 0a 09 58 74 68 65 73 65 | 20 73 75 62 74 72 61 63 |..Xthese| subtrac|
|00002c10| 74 20 66 72 6f 6d 20 74 | 68 65 20 6c 69 6e 65 20 |t from t|he line |
|00002c20| 6c 65 6e 67 74 68 2e 0a | 09 58 2a 2f 0a 09 58 0a |length..|.X*/..X.|
|00002c30| 09 58 0c 2f 2a 4d 41 4e | 55 41 4c 2e 53 48 20 45 |.X./*MAN|UAL.SH E|
|00002c40| 58 41 4d 50 4c 45 53 0a | 09 58 53 6f 6d 65 20 6f |XAMPLES.|.XSome o|
|00002c50| 66 20 74 68 65 73 65 20 | 65 78 61 6d 70 6c 65 73 |f these |examples|
|00002c60| 20 63 61 6e 20 6d 61 6b | 65 20 73 68 65 6c 6c 20 | can mak|e shell |
|00002c70| 73 63 72 69 70 74 73 20 | 6f 72 20 61 6c 69 61 73 |scripts |or alias|
|00002c80| 65 73 2e 0a 09 58 2e 6e | 66 0a 09 58 2e 74 61 20 |es...X.n|f..X.ta |
|00002c90| 2e 35 69 0a 09 58 2e 73 | 70 0a 09 58 43 65 6e 74 |.5i..X.s|p..XCent|
|00002ca0| 65 72 65 64 20 54 69 74 | 6c 65 73 3a 20 74 69 74 |ered Tit|les: tit|
|00002cb0| 6c 65 0a 09 58 09 66 66 | 20 2d 64 63 75 20 24 2a |le..X.ff| -dcu $*|
|00002cc0| 0a 09 58 44 6f 75 62 6c | 65 20 53 70 61 63 65 64 |..XDoubl|e Spaced|
|00002cd0| 20 55 6e 66 69 6c 6c 65 | 64 20 50 61 67 69 6e 61 | Unfille|d Pagina|
|00002ce0| 74 65 64 20 69 6e 64 65 | 6e 74 65 64 20 28 66 6f |ted inde|nted (fo|
|00002cf0| 72 20 65 64 69 74 69 6e | 67 29 3a 20 64 72 61 66 |r editin|g): draf|
|00002d00| 74 0a 09 58 09 66 66 20 | 2d 73 20 32 20 2d 62 20 |t..X.ff |-s 2 -b |
|00002d10| 2d 70 20 2d 66 20 22 60 | 64 61 74 65 60 22 20 2d |-p -f "`|date`" -|
|00002d20| 69 20 38 20 24 2a 0a 09 | 58 50 72 6f 67 72 61 6d |i 8 $*..|XProgram|
|00002d30| 20 4c 69 73 74 69 6e 67 | 3a 20 63 70 72 0a 09 58 | Listing|: cpr..X|
|00002d40| 09 48 3d 22 40 20 20 20 | 20 20 20 20 20 44 69 72 |.H="@ | Dir|
|00002d50| 3a 20 60 70 77 64 60 40 | 40 46 69 6c 65 3a 20 2a |: `pwd`@|@File: *|
|00002d60| 40 22 0a 09 58 09 46 3d | 22 40 20 20 20 20 20 20 |@"..X.F=|"@ |
|00002d70| 20 20 24 4e 41 4d 45 40 | 60 64 61 74 65 60 40 50 | $NAME@|`date`@P|
|00002d80| 61 67 65 20 25 40 22 0a | 09 58 09 66 66 20 2d 62 |age %@".|.X.ff -b|
|00002d90| 20 2d 4e 20 38 20 2d 48 | 20 33 20 2d 68 20 22 24 | -N 8 -H| 3 -h "$|
|00002da0| 48 22 20 2d 46 20 33 20 | 2d 66 20 22 24 46 22 20 |H" -F 3 |-f "$F" |
|00002db0| 2d 54 20 34 20 2d 77 20 | 37 39 20 2d 69 20 32 20 |-T 4 -w |79 -i 2 |
|00002dc0| 24 2a 0a 09 58 52 65 66 | 6f 72 6d 61 74 20 50 61 |$*..XRef|ormat Pa|
|00002dd0| 72 61 67 72 61 70 68 65 | 64 20 54 65 78 74 3a 20 |ragraphe|d Text: |
|00002de0| 6e 72 0a 09 58 09 66 66 | 20 2d 6a 64 20 2d 49 20 |nr..X.ff| -jd -I |
|00002df0| 35 20 2d 69 20 31 30 20 | 2d 77 20 36 35 20 2d 42 |5 -i 10 |-w 65 -B|
|00002e00| 20 22 54 41 42 20 53 50 | 27 2a 2e 40 22 20 24 2a | "TAB SP|'*.@" $*|
|00002e10| 0a 09 58 2e 66 69 0a 09 | 58 2a 2f 0a 09 58 2f 2a |..X.fi..|X*/..X/*|
|00002e20| 4d 41 4e 55 41 4c 2e 53 | 48 20 44 49 41 47 4e 4f |MANUAL.S|H DIAGNO|
|00002e30| 53 54 49 43 53 0a 09 58 | 53 6f 6d 65 20 6f 70 74 |STICS..X|Some opt|
|00002e40| 69 6f 6e 73 20 61 72 65 | 20 69 6e 63 6f 6d 70 61 |ions are| incompa|
|00002e50| 74 69 62 6c 65 20 77 69 | 74 68 20 6f 74 68 65 72 |tible wi|th other|
|00002e60| 73 2e 0a 09 58 46 6f 72 | 20 65 78 61 6d 70 6c 65 |s...XFor| example|
|00002e70| 2c 20 63 65 6e 74 65 72 | 65 64 20 74 65 78 74 20 |, center|ed text |
|00002e80| 63 61 6e 6e 6f 74 20 62 | 65 20 72 69 67 68 74 2d |cannot b|e right-|
|00002e90| 6a 75 73 74 69 66 69 65 | 64 2e 0a 09 58 2e 49 20 |justifie|d...X.I |
|00002ea0| 66 66 0a 09 58 77 69 6c | 6c 20 6e 6f 74 20 61 6c |ff..Xwil|l not al|
|00002eb0| 6c 6f 77 20 69 6e 63 6f | 6e 73 69 73 74 65 6e 74 |low inco|nsistent|
|00002ec0| 20 63 6f 6d 62 69 6e 61 | 74 69 6f 6e 73 20 6f 66 | combina|tions of|
|00002ed0| 20 6f 70 74 69 6f 6e 73 | 2e 0a 09 58 2a 2f 0a 09 | options|...X*/..|
|00002ee0| 58 2f 2a 4d 41 4e 55 41 | 4c 2e 53 48 20 22 53 45 |X/*MANUA|L.SH "SE|
|00002ef0| 45 20 41 4c 53 4f 22 0a | 09 58 66 6d 74 28 31 29 |E ALSO".|.Xfmt(1)|
|00002f00| 2c 20 6e 72 6f 66 66 28 | 31 29 2c 20 73 63 72 69 |, nroff(|1), scri|
|00002f10| 62 65 28 31 77 29 0a 09 | 58 2a 2f 0a 09 58 2f 2a |be(1w)..|X*/..X/*|
|00002f20| 4d 41 4e 55 41 4c 2e 53 | 48 20 41 55 54 48 4f 52 |MANUAL.S|H AUTHOR|
|00002f30| 0a 09 58 47 61 72 79 20 | 50 65 72 6c 6d 61 6e 20 |..XGary |Perlman |
|00002f40| 28 77 69 74 68 20 68 65 | 6c 70 20 66 72 6f 6d 20 |(with he|lp from |
|00002f50| 6d 61 6e 79 20 73 74 75 | 64 65 6e 74 73 29 0a 09 |many stu|dents)..|
|00002f60| 58 2a 2f 0a 09 58 2f 2a | 4d 41 4e 55 41 4c 2e 53 |X*/..X/*|MANUAL.S|
|00002f70| 48 20 53 54 41 54 55 53 | 0a 09 58 50 72 65 74 74 |H STATUS|..XPrett|
|00002f80| 79 20 77 65 6c 6c 20 74 | 65 73 74 65 64 2e 0a 09 |y well t|ested...|
|00002f90| 58 2a 2f 0a 09 58 0a 09 | 58 0c 2f 2a 20 4d 61 63 |X*/..X..|X./* Mac|
|00002fa0| 72 6f 20 46 75 6e 63 74 | 69 6f 6e 73 20 2a 2f 0a |ro Funct|ions */.|
|00002fb0| 09 58 2f 2a 4d 41 43 52 | 4f 20 69 73 65 6e 64 73 |.X/*MACR|O isends|
|00002fc0| 65 6e 74 3a 20 69 73 20 | 74 68 65 20 63 68 61 72 |ent: is |the char|
|00002fd0| 61 63 74 65 72 20 6f 6e | 65 20 74 68 61 74 20 65 |acter on|e that e|
|00002fe0| 6e 64 73 20 61 20 73 65 | 6e 74 65 6e 63 65 3f 20 |nds a se|ntence? |
|00002ff0| 2a 2f 0a 09 58 23 64 65 | 66 69 6e 65 09 69 73 65 |*/..X#de|fine.ise|
|00003000| 6e 64 73 65 6e 74 28 63 | 29 20 28 28 63 29 20 3d |ndsent(c|) ((c) =|
|00003010| 3d 20 27 2e 27 20 7c 7c | 20 28 63 29 20 3d 3d 20 |= '.' ||| (c) == |
|00003020| 27 3f 27 20 7c 7c 20 28 | 63 29 20 3d 3d 20 27 21 |'?' || (|c) == '!|
|00003030| 27 29 0a 09 58 0a 09 58 | 2f 2a 4d 41 43 52 4f 20 |')..X..X|/*MACRO |
|00003040| 6a 75 73 74 63 68 61 72 | 3a 20 61 64 64 20 63 68 |justchar|: add ch|
|00003050| 61 72 20 74 6f 20 61 20 | 62 75 66 66 65 72 20 74 |ar to a |buffer t|
|00003060| 68 61 74 20 77 69 6c 6c | 20 6c 61 74 65 72 20 62 |hat will| later b|
|00003070| 65 20 66 6c 75 73 68 65 | 64 20 2a 2f 0a 09 58 23 |e flushe|d */..X#|
|00003080| 64 65 66 69 6e 65 09 6a | 75 73 74 63 68 61 72 28 |define.j|ustchar(|
|00003090| 63 29 20 28 4a 75 73 74 | 62 75 66 5b 4a 75 73 74 |c) (Just|buf[Just|
|000030a0| 70 6f 73 2b 2b 5d 20 3d | 20 28 63 29 29 0a 09 58 |pos++] =| (c))..X|
|000030b0| 0a 09 58 2f 2a 4d 41 43 | 52 4f 20 66 69 6c 6c 63 |..X/*MAC|RO fillc|
|000030c0| 68 61 72 3a 20 73 61 76 | 65 20 74 6f 20 6a 75 73 |har: sav|e to jus|
|000030d0| 74 69 66 79 20 69 66 20 | 6e 65 63 65 73 73 61 72 |tify if |necessar|
|000030e0| 79 2c 20 65 6c 73 65 20 | 6f 75 74 70 75 74 20 2a |y, else |output *|
|000030f0| 2f 0a 09 58 23 64 65 66 | 69 6e 65 20 66 69 6c 6c |/..X#def|ine fill|
|00003100| 63 68 61 72 28 63 29 20 | 5c 0a 09 58 09 7b 20 5c |char(c) |\..X.{ \|
|00003110| 0a 09 58 09 69 66 20 28 | 4a 75 73 74 69 66 79 20 |..X.if (|Justify |
|00003120| 3d 3d 20 54 52 55 45 29 | 20 6a 75 73 74 63 68 61 |== TRUE)| justcha|
|00003130| 72 20 28 63 29 3b 20 5c | 0a 09 58 09 65 6c 73 65 |r (c); \|..X.else|
|00003140| 20 70 75 74 63 20 28 63 | 2c 20 73 74 64 6f 75 74 | putc (c|, stdout|
|00003150| 29 3b 20 5c 0a 09 58 09 | 7d 0a 09 58 0a 09 58 0c |); \..X.|}..X..X.|
|00003160| 2f 2a 46 55 4e 43 54 49 | 4f 4e 20 6d 61 69 6e 3a |/*FUNCTI|ON main:|
|00003170| 20 6c 6f 6f 70 20 74 68 | 72 6f 75 67 68 20 66 69 | loop th|rough fi|
|00003180| 6c 65 73 20 69 6e 20 63 | 6c 61 73 73 69 63 20 55 |les in c|lassic U|
|00003190| 4e 49 58 20 66 69 6c 74 | 65 72 20 73 74 79 6c 65 |NIX filt|er style|
|000031a0| 20 2a 2f 0a 09 58 6d 61 | 69 6e 20 28 61 72 67 63 | */..Xma|in (argc|
|000031b0| 2c 20 61 72 67 76 29 0a | 09 58 69 6e 74 20 09 61 |, argv).|.Xint .a|
|000031c0| 72 67 63 3b 20 20 20 20 | 20 2f 2a 20 61 72 67 75 |rgc; | /* argu|
|000031d0| 6d 65 6e 74 20 63 6f 75 | 6e 74 20 2a 2f 0a 09 58 |ment cou|nt */..X|
|000031e0| 63 68 61 72 09 2a 2a 61 | 72 67 76 3b 20 20 20 2f |char.**a|rgv; /|
|000031f0| 2a 20 61 72 67 75 6d 65 | 6e 74 20 76 65 63 74 6f |* argume|nt vecto|
|00003200| 72 20 2a 2f 0a 09 58 09 | 7b 0a 09 58 09 53 74 61 |r */..X.|{..X.Sta|
|00003210| 74 75 73 20 09 66 66 20 | 28 29 3b 20 20 20 20 20 |tus .ff |(); |
|00003220| 20 2f 2a 20 66 66 20 28 | 66 69 6c 65 2c 20 69 6f | /* ff (|file, io|
|00003230| 70 74 72 29 20 77 69 6c | 6c 20 66 69 6c 74 65 72 |ptr) wil|l filter|
|00003240| 20 66 69 6c 65 73 20 2a | 2f 0a 09 58 09 53 74 61 | files *|/..X.Sta|
|00003250| 74 75 73 09 73 74 61 74 | 75 73 3b 20 20 20 20 20 |tus.stat|us; |
|00003260| 2f 2a 20 72 65 74 75 72 | 6e 20 73 74 61 74 75 73 |/* retur|n status|
|00003270| 20 6f 66 20 66 69 6c 74 | 65 72 20 28 29 20 2a 2f | of filt|er () */|
|00003280| 0a 09 58 09 69 6e 74 20 | 09 66 69 72 73 74 66 69 |..X.int |.firstfi|
|00003290| 6c 65 3b 20 20 2f 2a 20 | 66 69 72 73 74 20 66 69 |le; /* |first fi|
|000032a0| 6c 65 20 6e 61 6d 65 20 | 69 6e 64 65 78 20 72 65 |le name |index re|
|000032b0| 74 75 72 6e 65 64 20 62 | 79 20 69 6e 69 74 69 61 |turned b|y initia|
|000032c0| 6c 20 2a 2f 0a 09 58 0a | 09 58 09 66 69 72 73 74 |l */..X.|.X.first|
|000032d0| 66 69 6c 65 20 3d 20 69 | 6e 69 74 69 61 6c 20 28 |file = i|nitial (|
|000032e0| 61 72 67 63 2c 20 61 72 | 67 76 29 3b 0a 09 58 09 |argc, ar|gv);..X.|
|000032f0| 73 74 61 74 75 73 20 3d | 20 66 69 6c 74 65 72 20 |status =| filter |
|00003300| 28 61 72 67 63 2c 20 61 | 72 67 76 2c 20 66 69 72 |(argc, a|rgv, fir|
|00003310| 73 74 66 69 6c 65 2c 20 | 66 66 29 3b 0a 09 58 09 |stfile, |ff);..X.|
|00003320| 65 78 69 74 20 28 73 74 | 61 74 75 73 29 3b 0a 09 |exit (st|atus);..|
|00003330| 58 09 7d 0a 09 58 0a 09 | 58 0c 2f 2a 46 55 4e 43 |X.}..X..|X./*FUNC|
|00003340| 54 49 4f 4e 20 73 65 74 | 69 6e 74 3a 20 63 68 65 |TION set|int: che|
|00003350| 63 6b 20 74 79 70 65 2c | 20 63 6f 6e 76 65 72 74 |ck type,| convert|
|00003360| 20 73 74 72 69 6e 67 2c | 20 61 6e 64 20 73 65 74 | string,| and set|
|00003370| 20 69 6e 74 65 67 65 72 | 20 6f 70 74 69 6f 6e 20 | integer| option |
|00003380| 2a 2f 0a 09 58 53 74 61 | 74 75 73 0a 09 58 73 65 |*/..XSta|tus..Xse|
|00003390| 74 69 6e 74 20 28 66 6c | 61 67 2c 20 76 61 6c 75 |tint (fl|ag, valu|
|000033a0| 65 2c 20 76 61 72 2c 20 | 6d 69 6e 2c 20 6d 61 78 |e, var, |min, max|
|000033b0| 29 0a 09 58 69 6e 74 20 | 09 66 6c 61 67 3b 20 20 |)..Xint |.flag; |
|000033c0| 20 20 2f 2a 20 74 68 65 | 20 73 69 6e 67 6c 65 20 | /* the| single |
|000033d0| 63 68 61 72 61 63 74 65 | 72 20 6f 70 74 69 6f 6e |characte|r option|
|000033e0| 20 6e 61 6d 65 20 2a 2f | 0a 09 58 63 68 61 72 09 | name */|..Xchar.|
|000033f0| 2a 76 61 6c 75 65 3b 20 | 20 2f 2a 20 74 68 65 20 |*value; | /* the |
|00003400| 63 61 6e 64 69 64 61 74 | 65 20 76 61 6c 75 65 2c |candidat|e value,|
|00003410| 20 69 6e 20 73 74 72 69 | 6e 67 20 66 6f 72 6d 61 | in stri|ng forma|
|00003420| 74 20 2a 2f 0a 09 58 69 | 6e 74 20 09 2a 76 61 72 |t */..Xi|nt .*var|
|00003430| 3b 20 20 20 20 2f 2a 20 | 70 74 72 20 74 6f 20 76 |; /* |ptr to v|
|00003440| 61 72 69 61 62 6c 65 20 | 74 6f 20 73 74 75 66 66 |ariable |to stuff|
|00003450| 20 69 6e 20 61 6e 73 77 | 65 72 20 2a 2f 0a 09 58 | in answ|er */..X|
|00003460| 69 6e 74 20 09 6d 69 6e | 3b 20 20 20 20 20 2f 2a |int .min|; /*|
|00003470| 20 6d 69 6e 69 6d 75 6d | 20 61 6c 6c 6f 77 65 64 | minimum| allowed|
|00003480| 20 76 61 6c 75 65 20 2a | 2f 0a 09 58 69 6e 74 20 | value *|/..Xint |
|00003490| 09 6d 61 78 3b 20 20 20 | 20 20 2f 2a 20 6d 61 78 |.max; | /* max|
|000034a0| 69 6d 75 6d 20 61 6c 6c | 6f 77 65 64 20 76 61 6c |imum all|owed val|
|000034b0| 75 65 20 2a 2f 0a 09 58 | 09 7b 0a 09 58 09 69 6e |ue */..X|.{..X.in|
|000034c0| 74 20 09 74 6d 70 76 61 | 72 3b 0a 09 58 09 69 66 |t .tmpva|r;..X.if|
|000034d0| 20 28 6e 75 6d 62 65 72 | 20 28 76 61 6c 75 65 29 | (number| (value)|
|000034e0| 20 3d 3d 20 31 29 20 2f | 2a 20 6e 75 6d 62 65 72 | == 1) /|* number|
|000034f0| 20 72 65 74 75 72 6e 73 | 20 31 20 66 6f 72 20 69 | returns| 1 for i|
|00003500| 6e 74 65 67 65 72 73 2c | 20 32 20 66 6f 72 20 72 |ntegers,| 2 for r|
|00003510| 65 61 6c 73 20 2a 2f 0a | 09 58 09 09 7b 0a 09 58 |eals */.|.X..{..X|
|00003520| 09 09 74 6d 70 76 61 72 | 20 3d 20 61 74 6f 69 20 |..tmpvar| = atoi |
|00003530| 28 76 61 6c 75 65 29 3b | 0a 09 58 09 09 69 66 20 |(value);|..X..if |
|00003540| 28 74 6d 70 76 61 72 20 | 3e 3d 20 6d 69 6e 20 26 |(tmpvar |>= min &|
|00003550| 26 20 74 6d 70 76 61 72 | 20 3c 3d 20 6d 61 78 29 |& tmpvar| <= max)|
|00003560| 0a 09 58 09 09 09 7b 0a | 09 58 09 09 09 2a 76 61 |..X...{.|.X...*va|
|00003570| 72 20 3d 20 74 6d 70 76 | 61 72 3b 0a 09 58 09 09 |r = tmpv|ar;..X..|
|00003580| 09 72 65 74 75 72 6e 20 | 28 53 55 43 43 45 53 53 |.return |(SUCCESS|
|00003590| 29 3b 0a 09 58 09 09 09 | 7d 0a 09 58 09 09 66 70 |);..X...|}..X..fp|
|000035a0| 72 69 6e 74 66 20 28 73 | 74 64 65 72 72 2c 20 22 |rintf (s|tderr, "|
|000035b0| 25 73 3a 20 2d 25 63 20 | 6f 70 74 69 6f 6e 20 76 |%s: -%c |option v|
|000035c0| 61 6c 75 65 20 6d 75 73 | 74 20 62 65 20 62 65 74 |alue mus|t be bet|
|000035d0| 77 65 65 6e 20 25 64 20 | 61 6e 64 20 25 64 5c 6e |ween %d |and %d\n|
|000035e0| 22 2c 0a 09 58 09 09 09 | 41 72 67 76 30 2c 20 66 |",..X...|Argv0, f|
|000035f0| 6c 61 67 2c 20 6d 69 6e | 2c 20 6d 61 78 29 3b 0a |lag, min|, max);.|
|00003600| 09 58 09 09 72 65 74 75 | 72 6e 20 28 46 41 49 4c |.X..retu|rn (FAIL|
|00003610| 55 52 45 29 3b 0a 09 58 | 09 09 7d 0a 09 58 09 66 |URE);..X|..}..X.f|
|00003620| 70 72 69 6e 74 66 20 28 | 73 74 64 65 72 72 2c 20 |printf (|stderr, |
|00003630| 22 25 73 3a 20 2d 25 63 | 20 6f 70 74 69 6f 6e 20 |"%s: -%c| option |
|00003640| 72 65 71 75 69 72 65 73 | 20 61 6e 20 69 6e 74 65 |requires| an inte|
|00003650| 67 65 72 20 76 61 6c 75 | 65 5c 6e 22 2c 20 41 72 |ger valu|e\n", Ar|
|00003660| 67 76 30 2c 20 66 6c 61 | 67 29 3b 0a 09 58 09 72 |gv0, fla|g);..X.r|
|00003670| 65 74 75 72 6e 20 28 46 | 41 49 4c 55 52 45 29 3b |eturn (F|AILURE);|
|00003680| 0a 09 58 09 7d 0a 09 58 | 0a 09 58 0c 2f 2a 46 55 |..X.}..X|..X./*FU|
|00003690| 4e 43 54 49 4f 4e 20 75 | 73 61 67 65 3a 20 70 72 |NCTION u|sage: pr|
|000036a0| 69 6e 74 20 68 65 6c 70 | 20 6d 65 6e 75 20 2a 2f |int help| menu */|
|000036b0| 0a 09 58 76 6f 69 64 0a | 09 58 75 73 61 67 65 20 |..Xvoid.|.Xusage |
|000036c0| 28 69 6f 70 74 72 29 0a | 09 58 46 49 4c 45 09 2a |(ioptr).|.XFILE.*|
|000036d0| 69 6f 70 74 72 3b 0a 09 | 58 09 7b 0a 09 58 09 66 |ioptr;..|X.{..X.f|
|000036e0| 70 72 69 6e 74 66 20 28 | 69 6f 70 74 72 2c 20 22 |printf (|ioptr, "|
|000036f0| 25 73 3a 20 66 61 73 74 | 20 74 65 78 74 20 66 6f |%s: fast| text fo|
|00003700| 72 6d 61 74 74 65 72 20 | 6f 70 74 69 6f 6e 73 3a |rmatter |options:|
|00003710| 5c 6e 22 2c 20 41 72 67 | 76 30 29 3b 0a 09 58 09 |\n", Arg|v0);..X.|
|00003720| 66 70 72 69 6e 74 66 20 | 28 69 6f 70 74 72 2c 20 |fprintf |(ioptr, |
|00003730| 22 2d 62 20 20 09 62 72 | 65 61 6b 20 61 6c 6c 20 |"-b .br|eak all |
|00003740| 6c 69 6e 65 73 20 6f 66 | 20 74 65 78 74 2d 2d 64 |lines of| text--d|
|00003750| 6f 20 6e 6f 20 66 69 6c | 6c 69 6e 67 5c 6e 22 29 |o no fil|ling\n")|
|00003760| 3b 0a 09 58 09 66 70 72 | 69 6e 74 66 20 28 69 6f |;..X.fpr|intf (io|
|00003770| 70 74 72 2c 20 22 2d 42 | 20 73 09 6c 69 6e 65 20 |ptr, "-B| s.line |
|00003780| 62 72 65 61 6b 20 63 68 | 61 72 61 63 74 65 72 73 |break ch|aracters|
|00003790| 5c 6e 22 29 3b 0a 09 58 | 09 66 70 72 69 6e 74 66 |\n");..X|.fprintf|
|000037a0| 20 28 69 6f 70 74 72 2c | 20 22 2d 63 20 20 09 63 | (ioptr,| "-c .c|
|000037b0| 65 6e 74 65 72 20 61 6c | 6c 20 74 65 78 74 20 6c |enter al|l text l|
|000037c0| 69 6e 65 73 5c 6e 22 29 | 3b 0a 09 58 09 66 70 72 |ines\n")|;..X.fpr|
|000037d0| 69 6e 74 66 20 28 69 6f | 70 74 72 2c 20 22 2d 64 |intf (io|ptr, "-d|
|000037e0| 20 20 09 64 65 6c 65 74 | 65 20 62 6c 61 6e 6b 20 | .delet|e blank |
|000037f0| 73 70 61 63 65 20 61 72 | 6f 75 6e 64 20 69 6e 70 |space ar|ound inp|
|00003800| 75 74 20 6c 69 6e 65 73 | 5c 6e 22 29 3b 0a 09 58 |ut lines|\n");..X|
|00003810| 09 66 70 72 69 6e 74 66 | 20 28 69 6f 70 74 72 2c |.fprintf| (ioptr,|
|00003820| 20 22 2d 44 20 20 09 64 | 65 6c 65 74 65 20 62 6c | "-D .d|elete bl|
|00003830| 61 6e 6b 20 69 6e 70 75 | 74 20 6c 69 6e 65 73 5c |ank inpu|t lines\|
|00003840| 6e 22 29 3b 0a 09 58 09 | 66 70 72 69 6e 74 66 20 |n");..X.|fprintf |
|00003850| 28 69 6f 70 74 72 2c 20 | 22 2d 66 20 73 09 70 61 |(ioptr, |"-f s.pa|
|00003860| 67 65 20 66 6f 6f 74 65 | 72 20 74 68 72 65 65 2d |ge foote|r three-|
|00003870| 70 61 72 74 20 74 69 74 | 6c 65 5c 6e 22 29 3b 0a |part tit|le\n");.|
|00003880| 09 58 09 66 70 72 69 6e | 74 66 20 28 69 6f 70 74 |.X.fprin|tf (iopt|
|00003890| 72 2c 20 22 2d 46 20 69 | 09 70 61 67 65 20 66 6f |r, "-F i|.page fo|
|000038a0| 6f 74 65 72 20 73 69 7a | 65 20 28 25 64 20 6c 69 |oter siz|e (%d li|
|000038b0| 6e 65 73 29 5c 6e 22 2c | 20 46 6f 6f 74 73 69 7a |nes)\n",| Footsiz|
|000038c0| 65 29 3b 0a 09 58 09 66 | 70 72 69 6e 74 66 20 28 |e);..X.f|printf (|
|000038d0| 69 6f 70 74 72 2c 20 22 | 2d 68 20 73 09 70 61 67 |ioptr, "|-h s.pag|
|000038e0| 65 20 68 65 61 64 65 72 | 20 74 68 72 65 65 2d 70 |e header| three-p|
|000038f0| 61 72 74 20 74 69 74 6c | 65 20 28 25 73 29 5c 6e |art titl|e (%s)\n|
|00003900| 22 2c 20 48 65 61 64 65 | 72 29 3b 0a 09 58 09 66 |", Heade|r);..X.f|
|00003910| 70 72 69 6e 74 66 20 28 | 69 6f 70 74 72 2c 20 22 |printf (|ioptr, "|
|00003920| 2d 48 20 69 09 70 61 67 | 65 20 68 65 61 64 65 72 |-H i.pag|e header|
|00003930| 20 73 69 7a 65 20 28 25 | 64 20 6c 69 6e 65 73 29 | size (%|d lines)|
|00003940| 5c 6e 22 2c 20 48 65 61 | 64 73 69 7a 65 29 3b 0a |\n", Hea|dsize);.|
|00003950| 09 58 09 66 70 72 69 6e | 74 66 20 28 69 6f 70 74 |.X.fprin|tf (iopt|
|00003960| 72 2c 20 22 2d 69 20 69 | 09 74 65 78 74 20 69 6e |r, "-i i|.text in|
|00003970| 64 65 6e 74 61 74 69 6f | 6e 20 28 25 64 20 73 70 |dentatio|n (%d sp|
|00003980| 61 63 65 73 29 5c 6e 22 | 2c 20 49 6e 64 65 6e 74 |aces)\n"|, Indent|
|00003990| 29 3b 0a 09 58 09 66 70 | 72 69 6e 74 66 20 28 69 |);..X.fp|rintf (i|
|000039a0| 6f 70 74 72 2c 20 22 2d | 49 20 69 09 69 6e 64 65 |optr, "-|I i.inde|
|000039b0| 6e 74 20 61 66 74 65 72 | 20 6c 69 6e 65 20 62 72 |nt after| line br|
|000039c0| 65 61 6b 73 20 28 25 64 | 20 73 70 61 63 65 73 29 |eaks (%d| spaces)|
|000039d0| 5c 6e 22 2c 20 54 69 6e | 64 65 6e 74 29 3b 0a 09 |\n", Tin|dent);..|
|000039e0| 58 09 66 70 72 69 6e 74 | 66 20 28 69 6f 70 74 72 |X.fprint|f (ioptr|
|000039f0| 2c 20 22 2d 6a 20 20 09 | 6a 75 73 74 69 66 79 20 |, "-j .|justify |
|00003a00| 74 68 65 20 72 69 67 68 | 74 20 6d 61 72 67 69 6e |the righ|t margin|
|00003a10| 20 6f 66 20 74 68 65 20 | 74 65 78 74 5c 6e 22 29 | of the |text\n")|
|00003a20| 3b 0a 09 58 09 66 70 72 | 69 6e 74 66 20 28 69 6f |;..X.fpr|intf (io|
|00003a30| 70 74 72 2c 20 22 2d 6e | 20 20 09 6e 75 6d 62 65 |ptr, "-n| .numbe|
|00003a40| 72 20 6f 75 74 70 75 74 | 20 74 65 78 74 20 6c 69 |r output| text li|
|00003a50| 6e 65 73 5c 6e 22 29 3b | 0a 09 58 09 66 70 72 69 |nes\n");|..X.fpri|
|00003a60| 6e 74 66 20 28 69 6f 70 | 74 72 2c 20 22 2d 4e 20 |ntf (iop|tr, "-N |
|00003a70| 69 09 77 69 64 74 68 20 | 6f 66 20 6c 69 6e 65 20 |i.width |of line |
|00003a80| 6e 75 6d 62 65 72 73 20 | 28 25 64 20 73 70 61 63 |numbers |(%d spac|
|00003a90| 65 73 29 5c 6e 22 2c 20 | 4e 75 6d 77 69 64 74 68 |es)\n", |Numwidth|
|00003aa0| 29 3b 0a 09 58 09 66 70 | 72 69 6e 74 66 20 28 69 |);..X.fp|rintf (i|
|00003ab0| 6f 70 74 72 2c 20 22 2d | 70 20 20 09 70 61 67 69 |optr, "-|p .pagi|
|00003ac0| 6e 61 74 65 20 6f 75 74 | 70 75 74 5c 6e 22 29 3b |nate out|put\n");|
|00003ad0| 0a 09 58 09 66 70 72 69 | 6e 74 66 20 28 69 6f 70 |..X.fpri|ntf (iop|
|00003ae0| 74 72 2c 20 22 2d 50 20 | 69 09 70 61 67 65 20 73 |tr, "-P |i.page s|
|00003af0| 69 7a 65 20 28 25 64 20 | 6c 69 6e 65 73 29 5c 6e |ize (%d |lines)\n|
|00003b00| 22 2c 20 50 61 67 65 73 | 69 7a 65 29 3b 0a 09 58 |", Pages|ize);..X|
|00003b10| 09 66 70 72 69 6e 74 66 | 20 28 69 6f 70 74 72 2c |.fprintf| (ioptr,|
|00003b20| 20 22 2d 73 20 69 09 6c | 69 6e 65 20 73 70 61 63 | "-s i.l|ine spac|
|00003b30| 69 6e 67 20 28 25 64 20 | 6c 69 6e 65 29 5c 6e 22 |ing (%d |line)\n"|
|00003b40| 2c 20 53 70 61 63 69 6e | 67 29 3b 0a 09 58 09 66 |, Spacin|g);..X.f|
|00003b50| 70 72 69 6e 74 66 20 28 | 69 6f 70 74 72 2c 20 22 |printf (|ioptr, "|
|00003b60| 2d 74 20 69 09 61 62 73 | 6f 6c 75 74 65 20 6f 72 |-t i.abs|olute or|
|00003b70| 20 72 65 6c 61 74 69 76 | 65 20 74 61 62 20 73 74 | relativ|e tab st|
|00003b80| 6f 70 5c 6e 22 29 3b 0a | 09 58 09 66 70 72 69 6e |op\n");.|.X.fprin|
|00003b90| 74 66 20 28 69 6f 70 74 | 72 2c 20 22 2d 54 20 69 |tf (iopt|r, "-T i|
|00003ba0| 09 75 6e 69 66 6f 72 6d | 20 74 61 62 20 73 74 6f |.uniform| tab sto|
|00003bb0| 70 73 5c 6e 22 29 3b 0a | 09 58 09 66 70 72 69 6e |ps\n");.|.X.fprin|
|00003bc0| 74 66 20 28 69 6f 70 74 | 72 2c 20 22 2d 75 20 20 |tf (iopt|r, "-u |
|00003bd0| 09 73 68 6f 77 20 74 65 | 78 74 20 77 69 74 68 20 |.show te|xt with |
|00003be0| 75 70 70 65 72 2d 63 61 | 73 65 20 69 6e 69 74 69 |upper-ca|se initi|
|00003bf0| 61 6c 20 6c 65 74 74 65 | 72 73 5c 6e 22 29 3b 0a |al lette|rs\n");.|
|00003c00| 09 58 09 66 70 72 69 6e | 74 66 20 28 69 6f 70 74 |.X.fprin|tf (iopt|
|00003c10| 72 2c 20 22 2d 55 20 20 | 09 70 72 69 6e 74 20 6c |r, "-U |.print l|
|00003c20| 6f 6e 67 20 75 73 61 67 | 65 20 73 79 6e 6f 70 73 |ong usag|e synops|
|00003c30| 69 73 20 66 6f 72 20 74 | 68 69 73 20 63 6f 6d 6d |is for t|his comm|
|00003c40| 61 6e 64 5c 6e 22 29 3b | 0a 09 58 09 66 70 72 69 |and\n");|..X.fpri|
|00003c50| 6e 74 66 20 28 69 6f 70 | 74 72 2c 20 22 2d 77 20 |ntf (iop|tr, "-w |
|00003c60| 69 09 70 61 67 65 20 6c | 69 6e 65 20 77 69 64 74 |i.page l|ine widt|
|00003c70| 68 20 28 25 64 20 73 70 | 61 63 65 73 29 5c 6e 22 |h (%d sp|aces)\n"|
|00003c80| 2c 20 57 69 64 74 68 29 | 3b 0a 09 58 09 7d 0a 09 |, Width)|;..X.}..|
|00003c90| 58 0a 09 58 0c 2f 2a 46 | 55 4e 43 54 49 4f 4e 20 |X..X./*F|UNCTION |
|00003ca0| 69 6e 69 74 69 61 6c 3a | 20 73 65 74 20 6f 70 74 |initial:| set opt|
|00003cb0| 69 6f 6e 73 20 2a 2f 0a | 09 58 69 6e 74 0a 09 58 |ions */.|.Xint..X|
|00003cc0| 69 6e 69 74 69 61 6c 20 | 28 61 72 67 63 2c 20 61 |initial |(argc, a|
|00003cd0| 72 67 76 29 20 63 68 61 | 72 20 2a 2a 61 72 67 76 |rgv) cha|r **argv|
|00003ce0| 3b 0a 09 58 09 7b 0a 09 | 58 09 65 78 74 65 72 6e |;..X.{..|X.extern|
|00003cf0| 09 63 68 61 72 09 2a 6f | 70 74 61 72 67 3b 20 20 |.char.*o|ptarg; |
|00003d00| 20 2f 2a 20 73 74 72 69 | 6e 67 20 76 61 6c 75 65 | /* stri|ng value|
|00003d10| 20 74 6f 20 6f 70 74 69 | 6f 6e 20 73 65 74 20 62 | to opti|on set b|
|00003d20| 79 20 67 65 74 6f 70 74 | 20 2a 2f 0a 09 58 09 65 |y getopt| */..X.e|
|00003d30| 78 74 65 72 6e 09 69 6e | 74 20 09 6f 70 74 69 6e |xtern.in|t .optin|
|00003d40| 64 3b 20 20 20 20 2f 2a | 20 77 69 6c 6c 20 62 65 |d; /*| will be|
|00003d50| 20 69 6e 64 65 78 20 6f | 66 20 66 69 72 73 74 20 | index o|f first |
|00003d60| 63 6f 6d 6d 61 6e 64 20 | 6f 70 65 72 61 6e 64 20 |command |operand |
|00003d70| 2a 2f 0a 09 58 09 69 6e | 74 20 09 65 72 72 63 6f |*/..X.in|t .errco|
|00003d80| 75 6e 74 20 3d 20 30 3b | 20 20 20 20 20 20 20 20 |unt = 0;| |
|00003d90| 2f 2a 20 63 6f 75 6e 74 | 20 6f 66 20 6e 75 6d 62 |/* count| of numb|
|00003da0| 65 72 20 6f 66 20 65 72 | 72 6f 72 73 20 2a 2f 0a |er of er|rors */.|
|00003db0| 09 58 09 69 6e 74 20 09 | 66 6c 61 67 3b 20 20 20 |.X.int .|flag; |
|00003dc0| 20 20 20 20 20 20 20 20 | 20 20 20 2f 2a 20 6f 70 | | /* op|
|00003dd0| 74 69 6f 6e 73 20 66 6c | 61 67 20 6e 61 6d 65 73 |tions fl|ag names|
|00003de0| 20 72 65 61 64 20 69 6e | 20 68 65 72 65 20 2a 2f | read in| here */|
|00003df0| 0a 09 58 09 63 68 61 72 | 09 2a 6f 70 74 73 74 72 |..X.char|.*optstr|
|00003e00| 69 6e 67 20 3d 20 20 20 | 20 20 20 20 2f 2a 20 42 |ing = | /* B|
|00003e10| 6f 6f 6c 65 61 6e 20 66 | 6c 61 67 73 20 61 6e 64 |oolean f|lags and|
|00003e20| 20 69 6e 74 65 67 65 72 | 20 6f 70 74 69 6f 6e 73 | integer| options|
|00003e30| 20 77 69 74 68 20 3a 20 | 2a 2f 0a 09 58 09 09 22 | with : |*/..X.."|
|00003e40| 62 63 64 44 6a 6e 70 75 | 55 42 3a 66 3a 46 3a 68 |bcdDjnpu|UB:f:F:h|
|00003e50| 3a 48 3a 69 3a 49 3a 4e | 3a 50 3a 73 3a 74 3a 54 |:H:i:I:N|:P:s:t:T|
|00003e60| 3a 77 3a 22 3b 0a 09 58 | 0a 09 58 09 41 72 67 76 |:w:";..X|..X.Argv|
|00003e70| 30 20 3d 20 61 72 67 76 | 5b 30 5d 3b 0a 09 58 09 |0 = argv|[0];..X.|
|00003e80| 77 68 69 6c 65 20 28 28 | 66 6c 61 67 20 3d 20 67 |while ((|flag = g|
|00003e90| 65 74 6f 70 74 20 28 61 | 72 67 63 2c 20 61 72 67 |etopt (a|rgc, arg|
|00003ea0| 76 2c 20 6f 70 74 73 74 | 72 69 6e 67 29 29 20 21 |v, optst|ring)) !|
|00003eb0| 3d 20 45 4f 46 29 0a 09 | 58 09 09 73 77 69 74 63 |= EOF)..|X..switc|
|00003ec0| 68 20 28 66 6c 61 67 29 | 0a 09 58 09 09 7b 0a 09 |h (flag)|..X..{..|
|00003ed0| 58 09 09 64 65 66 61 75 | 6c 74 3a 0a 09 58 09 09 |X..defau|lt:..X..|
|00003ee0| 09 65 72 72 63 6f 75 6e | 74 2b 2b 3b 0a 09 58 09 |.errcoun|t++;..X.|
|00003ef0| 09 09 62 72 65 61 6b 3b | 0a 09 58 0a 09 58 09 09 |..break;|..X..X..|
|00003f00| 63 61 73 65 20 27 62 27 | 3a 0a 09 58 09 09 09 42 |case 'b'|:..X...B|
|00003f10| 72 65 61 6b 6c 69 6e 65 | 73 20 3d 20 54 52 55 45 |reakline|s = TRUE|
|00003f20| 3b 0a 09 58 09 09 09 62 | 72 65 61 6b 3b 0a 09 58 |;..X...b|reak;..X|
|00003f30| 0a 09 58 09 09 63 61 73 | 65 20 27 42 27 3a 0a 09 |..X..cas|e 'B':..|
|00003f40| 58 09 09 09 42 72 65 61 | 6b 63 68 61 72 73 20 3d |X...Brea|kchars =|
|00003f50| 20 6f 70 74 61 72 67 3b | 0a 09 58 09 09 09 62 72 | optarg;|..X...br|
|00003f60| 65 61 6b 3b 0a 09 58 0a | 09 58 09 09 63 61 73 65 |eak;..X.|.X..case|
|00003f70| 20 27 63 27 3a 0a 09 58 | 09 09 09 43 65 6e 74 65 | 'c':..X|...Cente|
|00003f80| 72 20 3d 20 54 52 55 45 | 3b 0a 09 58 09 09 09 42 |r = TRUE|;..X...B|
|00003f90| 72 65 61 6b 6c 69 6e 65 | 73 20 3d 20 54 52 55 45 |reakline|s = TRUE|
|00003fa0| 3b 0a 09 58 09 09 09 62 | 72 65 61 6b 3b 0a 09 58 |;..X...b|reak;..X|
|00003fb0| 0a 09 58 09 09 63 61 73 | 65 20 27 64 27 3a 0a 09 |..X..cas|e 'd':..|
|00003fc0| 58 09 09 09 44 65 6c 73 | 70 61 63 65 20 3d 20 54 |X...Dels|pace = T|
|00003fd0| 52 55 45 3b 0a 09 58 09 | 09 09 62 72 65 61 6b 3b |RUE;..X.|..break;|
|00003fe0| 0a 09 58 0a 09 58 09 09 | 63 61 73 65 20 27 44 27 |..X..X..|case 'D'|
|00003ff0| 3a 0a 09 58 09 09 09 44 | 65 6c 6c 69 6e 65 20 3d |:..X...D|elline =|
|00004000| 20 54 52 55 45 3b 0a 09 | 58 09 09 09 62 72 65 61 | TRUE;..|X...brea|
|00004010| 6b 3b 0a 09 58 0a 09 58 | 09 09 63 61 73 65 20 27 |k;..X..X|..case '|
|00004020| 66 27 3a 0a 09 58 09 09 | 09 46 6f 6f 74 65 72 20 |f':..X..|.Footer |
|00004030| 3d 20 6f 70 74 61 72 67 | 3b 0a 09 58 09 09 09 50 |= optarg|;..X...P|
|00004040| 61 67 69 6e 61 74 65 20 | 3d 20 54 52 55 45 3b 0a |aginate |= TRUE;.|
|00004050| 09 58 09 09 09 62 72 65 | 61 6b 3b 0a 09 58 0a 09 |.X...bre|ak;..X..|
|00004060| 58 09 09 63 61 73 65 20 | 27 46 27 3a 0a 09 58 09 |X..case |'F':..X.|
|00004070| 09 09 69 66 20 28 73 65 | 74 69 6e 74 20 28 66 6c |..if (se|tint (fl|
|00004080| 61 67 2c 20 6f 70 74 61 | 72 67 2c 20 26 46 6f 6f |ag, opta|rg, &Foo|
|00004090| 74 73 69 7a 65 2c 20 30 | 2c 20 4d 41 58 4c 49 4e |tsize, 0|, MAXLIN|
|000040a0| 45 53 29 20 3d 3d 20 46 | 41 49 4c 55 52 45 29 0a |ES) == F|AILURE).|
|000040b0| 09 58 09 09 09 09 65 72 | 72 63 6f 75 6e 74 2b 2b |.X....er|rcount++|
|000040c0| 3b 0a 09 58 09 09 09 50 | 61 67 69 6e 61 74 65 20 |;..X...P|aginate |
|000040d0| 3d 20 54 52 55 45 3b 0a | 09 58 09 09 09 62 72 65 |= TRUE;.|.X...bre|
|000040e0| 61 6b 3b 0a 09 58 0a 09 | 58 09 09 63 61 73 65 20 |ak;..X..|X..case |
|000040f0| 27 68 27 3a 0a 09 58 09 | 09 09 48 65 61 64 65 72 |'h':..X.|..Header|
|00004100| 20 3d 20 6f 70 74 61 72 | 67 3b 0a 09 58 09 09 09 | = optar|g;..X...|
|00004110| 50 61 67 69 6e 61 74 65 | 20 3d 20 54 52 55 45 3b |Paginate| = TRUE;|
|00004120| 0a 09 58 09 09 09 62 72 | 65 61 6b 3b 0a 09 58 0a |..X...br|eak;..X.|
|00004130| 09 58 09 09 63 61 73 65 | 20 27 48 27 3a 0a 09 58 |.X..case| 'H':..X|
|00004140| 09 09 09 69 66 20 28 73 | 65 74 69 6e 74 20 28 66 |...if (s|etint (f|
|00004150| 6c 61 67 2c 20 6f 70 74 | 61 72 67 2c 20 26 48 65 |lag, opt|arg, &He|
|00004160| 61 64 73 69 7a 65 2c 20 | 30 2c 20 4d 41 58 4c 49 |adsize, |0, MAXLI|
|00004170| 4e 45 53 29 20 3d 3d 20 | 46 41 49 4c 55 52 45 29 |NES) == |FAILURE)|
|00004180| 0a 09 58 09 09 09 09 65 | 72 72 63 6f 75 6e 74 2b |..X....e|rrcount+|
|00004190| 2b 3b 0a 09 58 09 09 09 | 50 61 67 69 6e 61 74 65 |+;..X...|Paginate|
|000041a0| 20 3d 20 54 52 55 45 3b | 0a 09 58 09 09 09 62 72 | = TRUE;|..X...br|
|000041b0| 65 61 6b 3b 0a 09 58 0a | 09 58 09 09 63 61 73 65 |eak;..X.|.X..case|
|000041c0| 20 27 69 27 3a 0a 09 58 | 09 09 09 69 66 20 28 73 | 'i':..X|...if (s|
|000041d0| 65 74 69 6e 74 20 28 66 | 6c 61 67 2c 20 6f 70 74 |etint (f|lag, opt|
|000041e0| 61 72 67 2c 20 26 49 6e | 64 65 6e 74 2c 20 30 2c |arg, &In|dent, 0,|
|000041f0| 20 4d 41 58 4c 45 4e 29 | 20 3d 3d 20 46 41 49 4c | MAXLEN)| == FAIL|
|00004200| 55 52 45 29 0a 09 58 09 | 09 09 09 65 72 72 63 6f |URE)..X.|...errco|
|00004210| 75 6e 74 2b 2b 3b 0a 09 | 58 09 09 09 62 72 65 61 |unt++;..|X...brea|
|00004220| 6b 3b 0a 09 58 0a 09 58 | 09 09 63 61 73 65 20 27 |k;..X..X|..case '|
|00004230| 49 27 3a 0a 09 58 09 09 | 09 69 66 20 28 73 65 74 |I':..X..|.if (set|
|00004240| 69 6e 74 20 28 66 6c 61 | 67 2c 20 6f 70 74 61 72 |int (fla|g, optar|
|00004250| 67 2c 20 26 54 69 6e 64 | 65 6e 74 2c 20 2d 4d 41 |g, &Tind|ent, -MA|
|00004260| 58 4c 45 4e 2c 20 4d 41 | 58 4c 45 4e 29 20 3d 3d |XLEN, MA|XLEN) ==|
|00004270| 20 46 41 49 4c 55 52 45 | 29 0a 09 58 09 09 09 09 | FAILURE|)..X....|
|00004280| 65 72 72 63 6f 75 6e 74 | 2b 2b 3b 0a 09 58 09 09 |errcount|++;..X..|
|00004290| 09 62 72 65 61 6b 3b 0a | 09 58 0a 09 58 09 09 63 |.break;.|.X..X..c|
|000042a0| 61 73 65 20 27 6a 27 3a | 0a 09 58 09 09 09 4a 75 |ase 'j':|..X...Ju|
|000042b0| 73 74 69 66 79 20 3d 20 | 54 52 55 45 3b 0a 09 58 |stify = |TRUE;..X|
|000042c0| 09 09 09 62 72 65 61 6b | 3b 0a 09 58 0a 09 58 09 |...break|;..X..X.|
|000042d0| 09 63 61 73 65 20 27 4e | 27 3a 0a 09 58 09 09 09 |.case 'N|':..X...|
|000042e0| 69 66 20 28 73 65 74 69 | 6e 74 20 28 66 6c 61 67 |if (seti|nt (flag|
|000042f0| 2c 20 6f 70 74 61 72 67 | 2c 20 26 4e 75 6d 77 69 |, optarg|, &Numwi|
|00004300| 64 74 68 2c 20 31 2c 20 | 4d 41 58 4c 45 4e 29 20 |dth, 1, |MAXLEN) |
|00004310| 3d 3d 20 46 41 49 4c 55 | 52 45 29 0a 09 58 09 09 |== FAILU|RE)..X..|
|00004320| 09 09 65 72 72 63 6f 75 | 6e 74 2b 2b 3b 0a 09 58 |..errcou|nt++;..X|
|00004330| 09 09 09 2f 2a 20 46 41 | 4c 4c 54 48 52 4f 55 47 |.../* FA|LLTHROUG|
|00004340| 48 20 2a 2f 0a 09 58 0a | 09 58 09 09 63 61 73 65 |H */..X.|.X..case|
|00004350| 20 27 6e 27 3a 0a 09 58 | 09 09 09 4e 75 6d 6c 69 | 'n':..X|...Numli|
|00004360| 6e 65 73 20 3d 20 54 52 | 55 45 3b 0a 09 58 09 09 |nes = TR|UE;..X..|
|00004370| 09 62 72 65 61 6b 3b 0a | 09 58 0a 09 58 09 09 63 |.break;.|.X..X..c|
|00004380| 61 73 65 20 27 50 27 3a | 0a 09 58 09 09 09 69 66 |ase 'P':|..X...if|
|00004390| 20 28 73 65 74 69 6e 74 | 20 28 66 6c 61 67 2c 20 | (setint| (flag, |
|000043a0| 6f 70 74 61 72 67 2c 20 | 26 50 61 67 65 73 69 7a |optarg, |&Pagesiz|
|000043b0| 65 2c 20 31 2c 20 4d 41 | 58 4c 49 4e 45 53 29 20 |e, 1, MA|XLINES) |
|000043c0| 3d 3d 20 46 41 49 4c 55 | 52 45 29 0a 09 58 09 09 |== FAILU|RE)..X..|
|000043d0| 09 09 65 72 72 63 6f 75 | 6e 74 2b 2b 3b 0a 09 58 |..errcou|nt++;..X|
|000043e0| 09 09 09 2f 2a 20 46 41 | 4c 4c 54 48 52 4f 55 47 |.../* FA|LLTHROUG|
|000043f0| 48 20 2a 2f 0a 09 58 0a | 09 58 09 09 63 61 73 65 |H */..X.|.X..case|
|00004400| 20 27 70 27 3a 0a 09 58 | 09 09 09 50 61 67 69 6e | 'p':..X|...Pagin|
|00004410| 61 74 65 20 3d 20 54 52 | 55 45 3b 0a 09 58 09 09 |ate = TR|UE;..X..|
|00004420| 09 62 72 65 61 6b 3b 0a | 09 58 0a 09 58 09 09 63 |.break;.|.X..X..c|
|00004430| 61 73 65 20 27 73 27 3a | 0a 09 58 09 09 09 69 66 |ase 's':|..X...if|
|00004440| 20 28 73 65 74 69 6e 74 | 20 28 66 6c 61 67 2c 20 | (setint| (flag, |
|00004450| 6f 70 74 61 72 67 2c 20 | 26 53 70 61 63 69 6e 67 |optarg, |&Spacing|
|00004460| 2c 20 31 2c 20 4d 41 58 | 4c 49 4e 45 53 29 20 3d |, 1, MAX|LINES) =|
|00004470| 3d 20 46 41 49 4c 55 52 | 45 29 0a 09 58 09 09 09 |= FAILUR|E)..X...|
|00004480| 09 65 72 72 63 6f 75 6e | 74 2b 2b 3b 0a 09 58 09 |.errcoun|t++;..X.|
|00004490| 09 09 62 72 65 61 6b 3b | 0a 09 58 0a 09 58 09 09 |..break;|..X..X..|
|000044a0| 63 61 73 65 20 27 74 27 | 3a 0a 09 58 09 09 09 69 |case 't'|:..X...i|
|000044b0| 66 20 28 4e 74 61 62 73 | 20 3e 3d 20 4d 41 58 54 |f (Ntabs| >= MAXT|
|000044c0| 41 42 29 0a 09 58 09 09 | 09 09 7b 0a 09 58 09 09 |AB)..X..|..{..X..|
|000044d0| 09 09 66 70 72 69 6e 74 | 66 20 28 73 74 64 65 72 |..fprint|f (stder|
|000044e0| 72 2c 20 22 25 73 3a 20 | 61 74 20 6d 6f 73 74 20 |r, "%s: |at most |
|000044f0| 25 64 20 2d 25 63 20 6f | 70 74 69 6f 6e 73 20 61 |%d -%c o|ptions a|
|00004500| 6c 6c 6f 77 65 64 5c 6e | 22 2c 0a 09 58 09 09 09 |llowed\n|",..X...|
|00004510| 09 09 41 72 67 76 30 2c | 20 4d 41 58 54 41 42 2c |..Argv0,| MAXTAB,|
|00004520| 20 66 6c 61 67 29 3b 0a | 09 58 09 09 09 09 65 72 | flag);.|.X....er|
|00004530| 72 63 6f 75 6e 74 2b 2b | 3b 0a 09 58 09 09 09 09 |rcount++|;..X....|
|00004540| 7d 0a 09 58 09 09 09 65 | 6c 73 65 20 69 66 20 28 |}..X...e|lse if (|
|00004550| 73 65 74 69 6e 74 20 28 | 66 6c 61 67 2c 20 6f 70 |setint (|flag, op|
|00004560| 74 61 72 67 2c 20 26 54 | 61 62 5b 4e 74 61 62 73 |targ, &T|ab[Ntabs|
|00004570| 5d 2c 20 30 2c 20 4d 41 | 58 4c 45 4e 29 20 3d 3d |], 0, MA|XLEN) ==|
|00004580| 20 46 41 49 4c 55 52 45 | 29 0a 09 58 09 09 09 09 | FAILURE|)..X....|
|00004590| 65 72 72 63 6f 75 6e 74 | 2b 2b 3b 0a 09 58 09 09 |errcount|++;..X..|
|000045a0| 09 65 6c 73 65 20 69 66 | 20 28 4e 74 61 62 73 20 |.else if| (Ntabs |
|000045b0| 3e 20 30 29 0a 09 58 09 | 09 09 09 7b 0a 09 58 09 |> 0)..X.|...{..X.|
|000045c0| 09 09 09 69 66 20 28 2a | 6f 70 74 61 72 67 20 3d |...if (*|optarg =|
|000045d0| 3d 20 27 2b 27 29 0a 09 | 58 09 09 09 09 09 54 61 |= '+')..|X.....Ta|
|000045e0| 62 5b 4e 74 61 62 73 5d | 20 2b 3d 20 54 61 62 5b |b[Ntabs]| += Tab[|
|000045f0| 4e 74 61 62 73 2d 31 5d | 3b 0a 09 58 09 09 09 09 |Ntabs-1]|;..X....|
|00004600| 65 6c 73 65 20 69 66 20 | 28 54 61 62 5b 4e 74 61 |else if |(Tab[Nta|
|00004610| 62 73 5d 20 3c 3d 20 54 | 61 62 5b 4e 74 61 62 73 |bs] <= T|ab[Ntabs|
|00004620| 2d 31 5d 29 0a 09 58 09 | 09 09 09 09 7b 0a 09 58 |-1])..X.|....{..X|
|00004630| 09 09 09 09 09 66 70 72 | 69 6e 74 66 20 28 73 74 |.....fpr|intf (st|
|00004640| 64 65 72 72 2c 20 22 25 | 73 3a 20 2d 25 63 20 76 |derr, "%|s: -%c v|
|00004650| 61 6c 75 65 73 20 6d 75 | 73 74 20 69 6e 63 72 65 |alues mu|st incre|
|00004660| 61 73 65 5c 6e 22 2c 0a | 09 58 09 09 09 09 09 09 |ase\n",.|.X......|
|00004670| 41 72 67 76 30 2c 20 66 | 6c 61 67 29 3b 0a 09 58 |Argv0, f|lag);..X|
|00004680| 09 09 09 09 09 65 72 72 | 63 6f 75 6e 74 2b 2b 3b |.....err|count++;|
|00004690| 0a 09 58 09 09 09 09 09 | 7d 0a 09 58 09 09 09 09 |..X.....|}..X....|
|000046a0| 7d 0a 09 58 09 09 09 69 | 66 20 28 54 61 62 5b 4e |}..X...i|f (Tab[N|
|000046b0| 74 61 62 73 5d 20 3e 3d | 20 4d 41 58 4c 45 4e 29 |tabs] >=| MAXLEN)|
|000046c0| 0a 09 58 09 09 09 09 7b | 0a 09 58 09 09 09 09 66 |..X....{|..X....f|
|000046d0| 70 72 69 6e 74 66 20 28 | 73 74 64 65 72 72 2c 20 |printf (|stderr, |
|000046e0| 22 25 73 3a 20 2d 25 63 | 20 76 61 6c 75 65 73 20 |"%s: -%c| values |
|000046f0| 6d 75 73 74 20 62 65 20 | 3c 20 25 64 5c 6e 22 2c |must be |< %d\n",|
|00004700| 0a 09 58 09 09 09 09 09 | 41 72 67 76 30 2c 20 66 |..X.....|Argv0, f|
|00004710| 6c 61 67 2c 20 4d 41 58 | 4c 45 4e 29 3b 0a 09 58 |lag, MAX|LEN);..X|
|00004720| 09 09 09 09 65 72 72 63 | 6f 75 6e 74 2b 2b 3b 0a |....errc|ount++;.|
|00004730| 09 58 09 09 09 09 7d 0a | 09 58 09 09 09 4e 74 61 |.X....}.|.X...Nta|
|00004740| 62 73 2b 2b 3b 0a 09 58 | 09 09 09 62 72 65 61 6b |bs++;..X|...break|
|00004750| 3b 0a 09 58 0a 09 58 09 | 09 63 61 73 65 20 27 54 |;..X..X.|.case 'T|
|00004760| 27 3a 0a 09 58 09 09 09 | 69 66 20 28 73 65 74 69 |':..X...|if (seti|
|00004770| 6e 74 20 28 66 6c 61 67 | 2c 20 6f 70 74 61 72 67 |nt (flag|, optarg|
|00004780| 2c 20 26 41 6c 6c 74 61 | 62 73 2c 20 31 2c 20 4d |, &Allta|bs, 1, M|
|00004790| 41 58 4c 45 4e 29 20 3d | 3d 20 46 41 49 4c 55 52 |AXLEN) =|= FAILUR|
|000047a0| 45 29 0a 09 58 09 09 09 | 09 65 72 72 63 6f 75 6e |E)..X...|.errcoun|
|000047b0| 74 2b 2b 3b 0a 09 58 09 | 09 09 62 72 65 61 6b 3b |t++;..X.|..break;|
|000047c0| 0a 09 58 0a 09 58 09 09 | 63 61 73 65 20 27 75 27 |..X..X..|case 'u'|
|000047d0| 3a 0a 09 58 09 09 09 55 | 70 70 65 72 63 61 73 65 |:..X...U|ppercase|
|000047e0| 20 3d 20 54 52 55 45 3b | 0a 09 58 09 09 09 62 72 | = TRUE;|..X...br|
|000047f0| 65 61 6b 3b 0a 09 58 0a | 09 58 09 09 63 61 73 65 |eak;..X.|.X..case|
|00004800| 20 27 55 27 3a 0a 09 58 | 09 09 09 75 73 61 67 65 | 'U':..X|...usage|
|00004810| 20 28 73 74 64 6f 75 74 | 29 3b 0a 09 58 09 09 09 | (stdout|);..X...|
|00004820| 65 78 69 74 20 28 30 29 | 3b 0a 09 58 0a 09 58 09 |exit (0)|;..X..X.|
|00004830| 09 63 61 73 65 20 27 77 | 27 3a 0a 09 58 09 09 09 |.case 'w|':..X...|
|00004840| 69 66 20 28 73 65 74 69 | 6e 74 20 28 66 6c 61 67 |if (seti|nt (flag|
|00004850| 2c 20 6f 70 74 61 72 67 | 2c 20 26 57 69 64 74 68 |, optarg|, &Width|
|00004860| 2c 20 31 2c 20 4d 41 58 | 4c 45 4e 29 20 3d 3d 20 |, 1, MAX|LEN) == |
|00004870| 46 41 49 4c 55 52 45 29 | 0a 09 58 09 09 09 09 65 |FAILURE)|..X....e|
|00004880| 72 72 63 6f 75 6e 74 2b | 2b 3b 0a 09 58 09 09 09 |rrcount+|+;..X...|
|00004890| 62 72 65 61 6b 3b 0a 09 | 58 09 09 7d 0a 09 58 0a |break;..|X..}..X.|
|000048a0| 09 58 09 2f 2a 20 4e 6f | 77 20 63 68 65 63 6b 20 |.X./* No|w check |
|000048b0| 76 61 6c 69 64 69 74 79 | 20 6f 66 20 6f 70 74 69 |validity| of opti|
|000048c0| 6f 6e 20 73 65 74 74 69 | 6e 67 73 20 2a 2f 0a 09 |on setti|ngs */..|
|000048d0| 58 09 69 66 20 28 54 69 | 6e 64 65 6e 74 20 3c 20 |X.if (Ti|ndent < |
|000048e0| 30 20 26 26 20 49 6e 64 | 65 6e 74 20 3c 20 28 2d |0 && Ind|ent < (-|
|000048f0| 54 69 6e 64 65 6e 74 29 | 29 0a 09 58 09 09 49 6e |Tindent)|)..X..In|
|00004900| 64 65 6e 74 20 3d 20 28 | 2d 54 69 6e 64 65 6e 74 |dent = (|-Tindent|
|00004910| 29 3b 0a 09 58 09 69 66 | 20 28 4e 74 61 62 73 20 |);..X.if| (Ntabs |
|00004920| 3e 20 30 20 26 26 20 41 | 6c 6c 74 61 62 73 20 3e |> 0 && A|lltabs >|
|00004930| 20 30 29 0a 09 58 09 09 | 7b 0a 09 58 09 09 66 70 | 0)..X..|{..X..fp|
|00004940| 72 69 6e 74 66 20 28 73 | 74 64 65 72 72 2c 20 22 |rintf (s|tderr, "|
|00004950| 25 73 3a 20 63 61 6e 27 | 74 20 73 65 74 20 69 6e |%s: can'|t set in|
|00004960| 64 69 76 69 64 75 61 6c | 20 61 6e 64 20 61 6c 6c |dividual| and all|
|00004970| 20 74 61 62 73 5c 6e 22 | 2c 20 41 72 67 76 30 29 | tabs\n"|, Argv0)|
|00004980| 3b 0a 09 58 09 09 65 72 | 72 63 6f 75 6e 74 2b 2b |;..X..er|rcount++|
|00004990| 3b 0a 09 58 09 09 7d 0a | 09 58 09 69 66 20 28 43 |;..X..}.|.X.if (C|
|000049a0| 65 6e 74 65 72 20 3d 3d | 20 54 52 55 45 20 26 26 |enter ==| TRUE &&|
|000049b0| 20 4a 75 73 74 69 66 79 | 20 3d 3d 20 54 52 55 45 | Justify| == TRUE|
|000049c0| 29 0a 09 58 09 09 7b 0a | 09 58 09 09 66 70 72 69 |)..X..{.|.X..fpri|
|000049d0| 6e 74 66 20 28 73 74 64 | 65 72 72 2c 20 22 25 73 |ntf (std|err, "%s|
|000049e0| 3a 20 63 65 6e 74 65 72 | 69 6e 67 20 61 6e 64 20 |: center|ing and |
|000049f0| 6a 75 73 74 69 66 79 69 | 6e 67 20 69 6e 63 6f 6d |justifyi|ng incom|
|00004a00| 70 61 74 69 62 6c 65 5c | 6e 22 2c 20 41 72 67 76 |patible\|n", Argv|
|00004a10| 30 29 3b 0a 09 58 09 09 | 65 72 72 63 6f 75 6e 74 |0);..X..|errcount|
|00004a20| 2b 2b 3b 0a 09 58 09 09 | 7d 0a 09 58 09 65 6c 73 |++;..X..|}..X.els|
|00004a30| 65 20 69 66 20 28 42 72 | 65 61 6b 6c 69 6e 65 73 |e if (Br|eaklines|
|00004a40| 20 3d 3d 20 54 52 55 45 | 20 26 26 20 4a 75 73 74 | == TRUE| && Just|
|00004a50| 69 66 79 20 3d 3d 20 54 | 52 55 45 29 0a 09 58 09 |ify == T|RUE)..X.|
|00004a60| 09 7b 0a 09 58 09 09 66 | 70 72 69 6e 74 66 20 28 |.{..X..f|printf (|
|00004a70| 73 74 64 65 72 72 2c 20 | 22 25 73 3a 20 62 72 65 |stderr, |"%s: bre|
|00004a80| 61 6b 69 6e 67 20 61 6e | 64 20 6a 75 73 74 69 66 |aking an|d justif|
|00004a90| 79 69 6e 67 20 69 6e 63 | 6f 6d 70 61 74 69 62 6c |ying inc|ompatibl|
|00004aa0| 65 5c 6e 22 2c 20 41 72 | 67 76 30 29 3b 0a 09 58 |e\n", Ar|gv0);..X|
|00004ab0| 09 09 65 72 72 63 6f 75 | 6e 74 2b 2b 3b 0a 09 58 |..errcou|nt++;..X|
|00004ac0| 09 09 7d 0a 09 58 09 69 | 66 20 28 4e 74 61 62 73 |..}..X.i|f (Ntabs|
|00004ad0| 20 3e 20 30 20 26 26 20 | 43 65 6e 74 65 72 20 3d | > 0 && |Center =|
|00004ae0| 3d 20 54 52 55 45 29 0a | 09 58 09 09 7b 0a 09 58 |= TRUE).|.X..{..X|
|00004af0| 09 09 66 70 72 69 6e 74 | 66 20 28 73 74 64 65 72 |..fprint|f (stder|
|00004b00| 72 2c 22 25 73 3a 20 63 | 65 6e 74 65 72 69 6e 67 |r,"%s: c|entering|
|00004b10| 20 61 6e 64 20 73 65 74 | 74 69 6e 67 20 74 61 62 | and set|ting tab|
|00004b20| 73 20 69 6e 63 6f 6d 70 | 61 74 69 62 6c 65 5c 6e |s incomp|atible\n|
|00004b30| 22 2c 20 41 72 67 76 30 | 29 3b 0a 09 58 09 09 65 |", Argv0|);..X..e|
|00004b40| 72 72 63 6f 75 6e 74 2b | 2b 3b 0a 09 58 09 09 7d |rrcount+|+;..X..}|
|00004b50| 0a 09 58 09 69 66 20 28 | 28 4e 74 61 62 73 20 3e |..X.if (|(Ntabs >|
|00004b60| 20 30 20 7c 7c 20 41 6c | 6c 74 61 62 73 20 3e 20 | 0 || Al|ltabs > |
|00004b70| 30 29 20 26 26 20 28 4a | 75 73 74 69 66 79 20 3d |0) && (J|ustify =|
|00004b80| 3d 20 54 52 55 45 29 29 | 0a 09 58 09 09 7b 0a 09 |= TRUE))|..X..{..|
|00004b90| 58 09 09 66 70 72 69 6e | 74 66 20 28 73 74 64 65 |X..fprin|tf (stde|
|00004ba0| 72 72 2c 20 22 25 73 3a | 20 74 61 62 73 74 6f 70 |rr, "%s:| tabstop|
|00004bb0| 73 20 61 6e 64 20 6a 75 | 73 74 69 66 79 69 6e 67 |s and ju|stifying|
|00004bc0| 20 69 6e 63 6f 6d 70 61 | 74 69 62 6c 65 5c 6e 22 | incompa|tible\n"|
|00004bd0| 2c 20 41 72 67 76 30 29 | 3b 0a 09 58 09 09 65 72 |, Argv0)|;..X..er|
|00004be0| 72 63 6f 75 6e 74 2b 2b | 3b 0a 09 58 09 09 7d 0a |rcount++|;..X..}.|
|00004bf0| 09 58 0a 09 58 09 2f 2a | 20 50 72 69 6e 74 20 61 |.X..X./*| Print a|
|00004c00| 6e 20 65 72 72 6f 72 20 | 6d 65 73 73 61 67 65 20 |n error |message |
|00004c10| 61 6e 64 20 65 78 69 74 | 20 6f 72 20 72 65 74 75 |and exit| or retu|
|00004c20| 72 6e 20 69 6e 64 65 78 | 20 74 6f 20 66 69 72 73 |rn index| to firs|
|00004c30| 74 20 66 69 6c 65 20 6e | 61 6d 65 20 2a 2f 0a 09 |t file n|ame */..|
|00004c40| 58 09 69 66 20 28 65 72 | 72 63 6f 75 6e 74 20 3e |X.if (er|rcount >|
|00004c50| 20 30 29 0a 09 58 09 09 | 7b 0a 09 58 09 09 66 70 | 0)..X..|{..X..fp|
|00004c60| 72 69 6e 74 66 20 28 73 | 74 64 65 72 72 2c 20 22 |rintf (s|tderr, "|
|00004c70| 55 73 61 67 65 3a 20 25 | 73 20 5b 6f 70 74 69 6f |Usage: %|s [optio|
|00004c80| 6e 73 5d 20 5b 2d 5d 20 | 5b 66 69 6c 65 73 5d 5c |ns] [-] |[files]\|
|00004c90| 6e 22 2c 20 41 72 67 76 | 30 29 3b 0a 09 58 09 09 |n", Argv|0);..X..|
|00004ca0| 65 78 69 74 20 28 46 41 | 49 4c 55 52 45 29 3b 0a |exit (FA|ILURE);.|
|00004cb0| 09 58 09 09 7d 0a 09 58 | 09 72 65 74 75 72 6e 20 |.X..}..X|.return |
|00004cc0| 28 6f 70 74 69 6e 64 29 | 3b 0a 09 58 09 7d 0a 09 |(optind)|;..X.}..|
|00004cd0| 58 0a 09 58 2f 2a 46 55 | 4e 43 54 49 4f 4e 20 72 |X..X/*FU|NCTION r|
|00004ce0| 65 70 65 61 74 3a 20 72 | 65 70 65 61 74 20 61 20 |epeat: r|epeat a |
|00004cf0| 63 68 61 72 61 63 74 65 | 72 20 73 6f 6d 65 20 6e |characte|r some n|
|00004d00| 75 6d 62 65 72 20 6f 66 | 20 74 69 6d 65 73 20 2a |umber of| times *|
|00004d10| 2f 0a 09 58 76 6f 69 64 | 0a 09 58 72 65 70 65 61 |/..Xvoid|..Xrepea|
|00004d20| 74 20 28 63 2c 20 6e 29 | 0a 09 58 69 6e 74 20 09 |t (c, n)|..Xint .|
|00004d30| 63 3b 20 20 20 20 20 2f | 2a 20 63 68 61 72 61 63 |c; /|* charac|
|00004d40| 74 65 72 20 74 6f 20 70 | 72 69 6e 74 20 2a 2f 0a |ter to p|rint */.|
|00004d50| 09 58 69 6e 74 20 09 6e | 3b 20 20 20 20 20 2f 2a |.Xint .n|; /*|
|00004d60| 20 6e 75 6d 62 65 72 20 | 6f 66 20 74 69 6d 65 73 | number |of times|
|00004d70| 20 74 6f 20 70 72 69 6e | 74 20 63 20 2a 2f 0a 09 | to prin|t c */..|
|00004d80| 58 09 7b 0a 09 58 09 77 | 68 69 6c 65 20 28 6e 2d |X.{..X.w|hile (n-|
|00004d90| 2d 20 3e 20 30 29 0a 09 | 58 09 09 70 75 74 63 20 |- > 0)..|X..putc |
|00004da0| 28 63 2c 20 73 74 64 6f | 75 74 29 3b 0a 09 58 09 |(c, stdo|ut);..X.|
|00004db0| 7d 0a 09 58 0a 09 58 0c | 2f 2a 46 55 4e 43 54 49 |}..X..X.|/*FUNCTI|
|00004dc0| 4f 4e 20 64 6f 74 61 62 | 3a 20 65 78 70 61 6e 64 |ON dotab|: expand|
|00004dd0| 20 74 61 62 73 20 74 6f | 20 73 70 61 63 65 73 20 | tabs to| spaces |
|00004de0| 74 6f 20 74 61 62 20 73 | 74 6f 70 73 2c 20 72 65 |to tab s|tops, re|
|00004df0| 74 75 72 6e 73 20 73 74 | 61 74 69 63 20 62 75 66 |turns st|atic buf|
|00004e00| 66 65 72 20 2a 2f 0a 09 | 58 2f 2a 41 4c 47 4f 52 |fer */..|X/*ALGOR|
|00004e10| 49 54 48 4d 0a 09 58 09 | 69 66 20 61 6c 6c 20 74 |ITHM..X.|if all t|
|00004e20| 61 62 73 20 61 72 65 20 | 73 65 74 20 74 6f 20 74 |abs are |set to t|
|00004e30| 68 65 20 73 61 6d 65 20 | 76 61 6c 75 65 20 28 41 |he same |value (A|
|00004e40| 6c 6c 74 61 62 73 20 3e | 20 30 29 0a 09 58 09 09 |lltabs >| 0)..X..|
|00004e50| 74 68 65 6e 20 61 64 76 | 61 6e 63 65 20 6f 6e 20 |then adv|ance on |
|00004e60| 61 20 74 61 62 20 74 6f | 20 74 68 65 20 6e 65 78 |a tab to| the nex|
|00004e70| 74 20 74 61 62 20 73 74 | 6f 70 0a 09 58 09 65 6c |t tab st|op..X.el|
|00004e80| 73 65 20 69 66 20 74 68 | 65 72 65 20 61 72 65 20 |se if th|ere are |
|00004e90| 69 6e 64 69 76 69 64 75 | 61 6c 20 74 61 62 73 20 |individu|al tabs |
|00004ea0| 73 65 74 20 28 4e 74 61 | 62 73 20 3e 20 74 61 62 |set (Nta|bs > tab|
|00004eb0| 6e 6f 29 0a 09 58 09 09 | 74 68 65 6e 20 61 64 76 |no)..X..|then adv|
|00004ec0| 61 6e 63 65 20 28 70 6f | 73 73 69 62 6c 79 20 72 |ance (po|ssibly r|
|00004ed0| 65 74 72 65 61 74 21 29 | 20 74 6f 20 6e 65 78 74 |etreat!)| to next|
|00004ee0| 20 73 65 74 20 74 61 62 | 0a 09 58 09 65 6c 73 65 | set tab|..X.else|
|00004ef0| 20 6a 75 73 74 20 74 72 | 65 61 74 20 74 68 65 20 | just tr|eat the |
|00004f00| 74 61 62 20 6c 69 6b 65 | 20 61 20 73 70 61 63 65 |tab like| a space|
|00004f10| 20 63 68 61 72 61 63 74 | 65 72 0a 09 58 2a 2f 0a | charact|er..X*/.|
|00004f20| 09 58 63 68 61 72 20 2a | 0a 09 58 64 6f 74 61 62 |.Xchar *|..Xdotab|
|00004f30| 20 28 6c 69 6e 65 29 0a | 09 58 72 65 67 69 73 74 | (line).|.Xregist|
|00004f40| 65 72 09 63 68 61 72 09 | 2a 6c 69 6e 65 3b 0a 09 |er.char.|*line;..|
|00004f50| 58 09 7b 0a 09 58 09 73 | 74 61 74 69 63 09 63 68 |X.{..X.s|tatic.ch|
|00004f60| 61 72 20 6f 75 74 6c 69 | 6e 65 5b 4d 41 58 4c 45 |ar outli|ne[MAXLE|
|00004f70| 4e 5d 3b 20 20 20 2f 2a | 20 6e 65 77 20 6c 69 6e |N]; /*| new lin|
|00004f80| 65 20 77 69 6c 6c 20 62 | 65 20 62 75 69 6c 74 20 |e will b|e built |
|00004f90| 68 65 72 65 20 2a 2f 0a | 09 58 09 72 65 67 69 73 |here */.|.X.regis|
|00004fa0| 74 65 72 20 63 68 61 72 | 20 2a 6c 70 74 72 3b 20 |ter char| *lptr; |
|00004fb0| 20 20 20 20 20 20 20 20 | 20 20 20 2f 2a 20 70 6f | | /* po|
|00004fc0| 69 6e 74 65 72 20 74 6f | 20 63 75 72 72 65 6e 74 |inter to| current|
|00004fd0| 20 70 6f 73 69 74 69 6f | 6e 20 69 6e 20 6f 75 74 | positio|n in out|
|00004fe0| 6c 69 6e 65 20 2a 2f 0a | 09 58 09 72 65 67 69 73 |line */.|.X.regis|
|00004ff0| 74 65 72 20 63 68 61 72 | 20 2a 6e 65 78 74 70 74 |ter char| *nextpt|
|00005000| 72 3b 20 20 20 20 20 20 | 20 20 20 2f 2a 20 70 6f |r; | /* po|
|00005010| 73 69 74 69 6f 6e 20 6f | 66 20 6e 65 78 74 20 74 |sition o|f next t|
|00005020| 61 62 20 73 74 6f 70 20 | 2a 2f 0a 09 58 09 69 6e |ab stop |*/..X.in|
|00005030| 74 20 09 74 61 62 6e 6f | 20 3d 20 30 3b 20 20 20 |t .tabno| = 0; |
|00005040| 20 20 20 20 20 20 20 20 | 20 20 20 2f 2a 20 68 6f | | /* ho|
|00005050| 77 20 6d 61 6e 79 20 74 | 61 62 73 20 68 61 76 65 |w many t|abs have|
|00005060| 20 62 65 65 6e 20 70 72 | 6f 63 65 73 73 65 64 20 | been pr|ocessed |
|00005070| 2a 2f 0a 09 58 0a 09 58 | 09 66 6f 72 20 28 6c 70 |*/..X..X|.for (lp|
|00005080| 74 72 20 3d 20 6f 75 74 | 6c 69 6e 65 3b 20 2a 6c |tr = out|line; *l|
|00005090| 69 6e 65 20 21 3d 20 45 | 4f 53 20 26 26 20 2a 6c |ine != E|OS && *l|
|000050a0| 69 6e 65 20 21 3d 20 45 | 4f 4c 3b 20 6c 69 6e 65 |ine != E|OL; line|
|000050b0| 2b 2b 29 0a 09 58 09 09 | 7b 0a 09 58 09 09 69 66 |++)..X..|{..X..if|
|000050c0| 20 28 2a 6c 69 6e 65 20 | 3d 3d 20 54 41 42 29 0a | (*line |== TAB).|
|000050d0| 09 58 09 09 09 7b 0a 09 | 58 09 09 09 69 66 20 28 |.X...{..|X...if (|
|000050e0| 41 6c 6c 74 61 62 73 20 | 3e 20 30 29 0a 09 58 09 |Alltabs |> 0)..X.|
|000050f0| 09 09 09 6e 65 78 74 70 | 74 72 20 3d 20 6c 70 74 |...nextp|tr = lpt|
|00005100| 72 20 2b 20 41 6c 6c 74 | 61 62 73 20 2d 20 28 28 |r + Allt|abs - ((|
|00005110| 6c 70 74 72 20 2d 20 6f | 75 74 6c 69 6e 65 29 20 |lptr - o|utline) |
|00005120| 25 20 41 6c 6c 74 61 62 | 73 29 3b 0a 09 58 09 09 |% Alltab|s);..X..|
|00005130| 09 65 6c 73 65 20 69 66 | 20 28 4e 74 61 62 73 20 |.else if| (Ntabs |
|00005140| 3e 20 74 61 62 6e 6f 29 | 20 2f 2a 20 6d 6f 76 65 |> tabno)| /* move|
|00005150| 20 74 6f 20 6e 65 78 74 | 20 73 65 74 20 74 61 62 | to next| set tab|
|00005160| 20 2a 2f 0a 09 58 09 09 | 09 09 6e 65 78 74 70 74 | */..X..|..nextpt|
|00005170| 72 20 3d 20 6f 75 74 6c | 69 6e 65 20 2b 20 54 61 |r = outl|ine + Ta|
|00005180| 62 5b 74 61 62 6e 6f 2b | 2b 5d 3b 0a 09 58 09 09 |b[tabno+|+];..X..|
|00005190| 09 65 6c 73 65 0a 09 58 | 09 09 09 09 6e 65 78 74 |.else..X|....next|
|000051a0| 70 74 72 20 3d 20 6c 70 | 74 72 20 2b 20 31 3b 0a |ptr = lp|tr + 1;.|
|000051b0| 09 58 09 09 09 69 66 20 | 28 6c 70 74 72 20 3c 20 |.X...if |(lptr < |
|000051c0| 6e 65 78 74 70 74 72 29 | 0a 09 58 09 09 09 09 64 |nextptr)|..X....d|
|000051d0| 6f 09 7b 0a 09 58 09 09 | 09 09 09 2a 6c 70 74 72 |o.{..X..|...*lptr|
|000051e0| 2b 2b 20 3d 20 53 50 3b | 0a 09 58 09 09 09 09 7d |++ = SP;|..X....}|
|000051f0| 20 77 68 69 6c 65 20 28 | 6c 70 74 72 20 3c 20 6e | while (|lptr < n|
|00005200| 65 78 74 70 74 72 29 3b | 0a 09 58 09 09 09 65 6c |extptr);|..X...el|
|00005210| 73 65 20 6c 70 74 72 20 | 3d 20 6e 65 78 74 70 74 |se lptr |= nextpt|
|00005220| 72 3b 0a 09 58 09 09 09 | 7d 0a 09 58 09 09 65 6c |r;..X...|}..X..el|
|00005230| 73 65 0a 09 58 09 09 09 | 2a 6c 70 74 72 2b 2b 20 |se..X...|*lptr++ |
|00005240| 3d 20 2a 6c 69 6e 65 3b | 0a 09 58 0a 09 58 09 09 |= *line;|..X..X..|
|00005250| 2f 2a 20 63 68 65 63 6b | 20 66 6f 72 20 6c 69 6e |/* check| for lin|
|00005260| 65 20 6f 76 65 72 66 6c | 6f 77 20 2a 2f 0a 09 58 |e overfl|ow */..X|
|00005270| 09 09 69 66 20 28 6c 70 | 74 72 20 3e 3d 20 28 6f |..if (lp|tr >= (o|
|00005280| 75 74 6c 69 6e 65 20 2b | 20 4d 41 58 4c 45 4e 29 |utline +| MAXLEN)|
|00005290| 29 0a 09 58 09 09 09 72 | 65 74 75 72 6e 20 28 4e |)..X...r|eturn (N|
|000052a0| 55 4c 4c 29 3b 0a 09 58 | 09 09 7d 0a 09 58 0a 09 |ULL);..X|..}..X..|
|000052b0| 58 09 2f 2a 20 65 6e 64 | 20 74 68 65 20 65 78 70 |X./* end| the exp|
|000052c0| 61 6e 64 65 64 20 74 61 | 62 20 73 74 72 69 6e 67 |anded ta|b string|
|000052d0| 20 61 6e 64 20 72 65 74 | 75 72 6e 20 2a 2f 0a 09 | and ret|urn */..|
|000052e0| 58 09 2a 6c 70 74 72 20 | 3d 20 45 4f 53 3b 0a 09 |X.*lptr |= EOS;..|
|000052f0| 58 09 72 65 74 75 72 6e | 20 28 6f 75 74 6c 69 6e |X.return| (outlin|
|00005300| 65 29 3b 0a 09 58 09 7d | 0a 09 58 0a 09 58 0c 2f |e);..X.}|..X..X./|
|00005310| 2a 46 55 4e 43 54 49 4f | 4e 20 64 6f 6a 75 73 74 |*FUNCTIO|N dojust|
|00005320| 69 66 79 3a 20 65 76 65 | 6e 20 74 68 65 20 72 69 |ify: eve|n the ri|
|00005330| 67 68 74 20 6d 61 72 67 | 69 6e 20 66 6f 72 20 61 |ght marg|in for a|
|00005340| 6c 6c 20 6c 69 6e 65 73 | 20 2a 2f 0a 09 58 2f 2a |ll lines| */..X/*|
|00005350| 41 4c 47 4f 52 49 54 48 | 4d 0a 09 58 09 09 64 69 |ALGORITH|M..X..di|
|00005360| 72 65 63 74 6c 79 20 6f | 75 74 70 75 74 20 61 6e |rectly o|utput an|
|00005370| 79 20 69 6e 64 65 6e 74 | 69 6e 67 20 73 70 61 63 |y indent|ing spac|
|00005380| 65 73 20 28 74 68 69 73 | 20 69 73 20 6e 6f 74 20 |es (this| is not |
|00005390| 65 78 70 61 6e 64 65 64 | 29 0a 09 58 09 09 74 72 |expanded|)..X..tr|
|000053a0| 69 6d 20 74 72 61 69 6c | 69 6e 67 20 73 70 61 63 |im trail|ing spac|
|000053b0| 65 73 20 28 64 6f 6e 27 | 74 20 77 61 6e 74 20 74 |es (don'|t want t|
|000053c0| 6f 20 70 61 64 20 61 74 | 20 65 6e 64 29 0a 09 58 |o pad at| end)..X|
|000053d0| 09 09 63 6f 75 6e 74 20 | 6e 75 6d 62 65 72 20 6f |..count |number o|
|000053e0| 66 20 73 70 61 63 65 73 | 20 69 6e 73 69 64 65 20 |f spaces| inside |
|000053f0| 6c 69 6e 65 20 28 77 68 | 65 72 65 20 65 78 74 72 |line (wh|ere extr|
|00005400| 61 20 73 70 61 63 65 73 | 20 77 69 6c 6c 20 62 65 |a spaces| will be|
|00005410| 20 69 6e 73 65 72 74 65 | 64 29 0a 09 58 09 09 64 | inserte|d)..X..d|
|00005420| 69 73 74 72 69 62 75 74 | 65 20 74 68 65 20 65 78 |istribut|e the ex|
|00005430| 74 72 61 20 73 70 61 63 | 65 73 20 6e 65 65 64 65 |tra spac|es neede|
|00005440| 64 20 61 6d 6f 6e 67 20 | 74 68 65 20 73 70 61 63 |d among |the spac|
|00005450| 65 73 20 74 68 65 72 65 | 0a 09 58 09 4e 6f 74 65 |es there|..X.Note|
|00005460| 3a 20 69 66 20 77 65 20 | 61 72 65 20 6e 6f 74 20 |: if we |are not |
|00005470| 66 69 6c 6c 69 6e 67 20 | 28 65 2e 67 2e 2c 20 6c |filling |(e.g., l|
|00005480| 61 73 74 20 6c 69 6e 65 | 20 6f 66 20 6f 75 74 70 |ast line| of outp|
|00005490| 75 74 20 62 65 66 6f 72 | 65 20 61 20 62 72 65 61 |ut befor|e a brea|
|000054a0| 6b 29 0a 09 58 09 09 74 | 68 65 6e 20 77 65 20 64 |k)..X..t|hen we d|
|000054b0| 6f 20 6e 6f 74 20 6a 75 | 73 74 66 79 20 74 68 65 |o not ju|stfy the|
|000054c0| 20 72 69 67 68 74 20 6d | 61 72 67 69 6e 2e 0a 09 | right m|argin...|
|000054d0| 58 2a 2f 0a 09 58 76 6f | 69 64 0a 09 58 64 6f 6a |X*/..Xvo|id..Xdoj|
|000054e0| 75 73 74 69 66 79 20 28 | 29 0a 09 58 09 7b 0a 09 |ustify (|)..X.{..|
|000054f0| 58 09 72 65 67 69 73 74 | 65 72 20 63 68 61 72 20 |X.regist|er char |
|00005500| 2a 6c 69 6e 65 3b 20 20 | 20 20 20 20 20 2f 2a 20 |*line; | /* |
|00005510| 77 69 6c 6c 20 70 6f 69 | 6e 74 20 74 6f 20 66 69 |will poi|nt to fi|
|00005520| 72 73 74 20 6e 6f 6e 2d | 73 70 61 63 65 20 63 68 |rst non-|space ch|
|00005530| 61 72 20 6f 6e 20 6c 69 | 6e 65 20 2a 2f 0a 09 58 |ar on li|ne */..X|
|00005540| 09 69 6e 74 20 09 77 69 | 64 74 68 3b 20 20 20 20 |.int .wi|dth; |
|00005550| 20 20 20 20 20 20 20 20 | 20 2f 2a 20 77 69 64 74 | | /* widt|
|00005560| 68 20 6f 66 20 6c 69 6e | 65 20 74 6f 20 70 61 64 |h of lin|e to pad|
|00005570| 20 2d 20 23 27 73 20 61 | 6e 64 20 69 6e 64 65 6e | - #'s a|nd inden|
|00005580| 74 20 2a 2f 0a 09 58 09 | 72 65 67 69 73 74 65 72 |t */..X.|register|
|00005590| 20 63 68 61 72 20 2a 6c | 70 74 72 3b 20 20 20 20 | char *l|ptr; |
|000055a0| 20 20 20 2f 2a 20 7a 69 | 70 73 20 74 68 72 6f 75 | /* zi|ps throu|
|000055b0| 67 68 20 74 68 65 20 6c | 69 6e 65 20 2a 2f 0a 09 |gh the l|ine */..|
|000055c0| 58 09 69 6e 74 20 20 20 | 20 20 70 61 64 3b 20 20 |X.int | pad; |
|000055d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 2f 2a 20 | | /* |
|000055e0| 77 69 6c 6c 20 6e 65 65 | 64 20 74 6f 20 70 61 64 |will nee|d to pad|
|000055f0| 20 77 69 74 68 20 74 68 | 69 73 20 6d 61 6e 79 20 | with th|is many |
|00005600| 73 70 61 63 65 73 20 2a | 2f 0a 09 58 09 69 6e 74 |spaces *|/..X.int|
|00005610| 20 20 20 20 20 73 70 61 | 63 65 73 20 3d 20 30 3b | spa|ces = 0;|
|00005620| 20 20 20 20 20 20 20 20 | 2f 2a 20 77 69 6c 6c 20 | |/* will |
|00005630| 62 65 20 6e 75 6d 62 65 | 72 20 6f 66 20 65 6d 62 |be numbe|r of emb|
|00005640| 65 64 64 65 64 20 73 70 | 61 63 65 73 20 69 6e 20 |edded sp|aces in |
|00005650| 6c 69 6e 65 20 2a 2f 0a | 09 58 09 72 65 67 69 73 |line */.|.X.regis|
|00005660| 74 65 72 20 69 6e 74 20 | 69 3b 20 20 20 20 20 20 |ter int |i; |
|00005670| 20 20 20 20 20 20 2f 2a | 20 75 73 65 64 20 69 6e | /*| used in|
|00005680| 73 69 64 65 20 69 6e 6e | 65 72 20 6c 6f 6f 70 20 |side inn|er loop |
|00005690| 2a 2f 0a 09 58 09 69 6e | 74 20 09 6e 20 3d 20 30 |*/..X.in|t .n = 0|
|000056a0| 3b 0a 09 58 0a 09 58 09 | 69 66 20 28 4a 75 73 74 |;..X..X.|if (Just|
|000056b0| 70 6f 73 20 3d 3d 20 30 | 29 20 20 20 20 20 20 20 |pos == 0|) |
|000056c0| 20 20 20 2f 2a 20 6e 6f | 74 68 69 6e 67 20 74 6f | /* no|thing to|
|000056d0| 20 6a 75 73 74 69 66 79 | 2c 20 73 6f 20 62 61 69 | justify|, so bai|
|000056e0| 6c 20 6f 75 74 20 2a 2f | 0a 09 58 09 09 72 65 74 |l out */|..X..ret|
|000056f0| 75 72 6e 3b 0a 09 58 0a | 09 58 09 2f 2a 20 73 74 |urn;..X.|.X./* st|
|00005700| 72 69 70 20 73 70 61 63 | 65 73 20 66 72 6f 6d 20 |rip spac|es from |
|00005710| 65 6e 64 20 6f 66 20 6c | 69 6e 65 20 61 6e 64 20 |end of l|ine and |
|00005720| 65 6e 64 20 77 69 74 68 | 20 45 4f 53 20 2a 2f 0a |end with| EOS */.|
|00005730| 09 58 09 66 6f 72 20 28 | 6c 70 74 72 20 3d 20 4a |.X.for (|lptr = J|
|00005740| 75 73 74 62 75 66 2b 4a | 75 73 74 70 6f 73 3b 20 |ustbuf+J|ustpos; |
|00005750| 6c 70 74 72 3e 4a 75 73 | 74 62 75 66 20 26 26 20 |lptr>Jus|tbuf && |
|00005760| 69 73 73 70 61 63 65 28 | 6c 70 74 72 5b 2d 31 5d |isspace(|lptr[-1]|
|00005770| 29 3b 20 6c 70 74 72 2d | 2d 29 3b 0a 09 58 09 2a |); lptr-|-);..X.*|
|00005780| 6c 70 74 72 20 3d 20 45 | 4f 53 3b 0a 09 58 0a 09 |lptr = E|OS;..X..|
|00005790| 58 09 77 69 64 74 68 20 | 3d 20 57 69 64 74 68 20 |X.width |= Width |
|000057a0| 2d 20 28 4e 75 6d 6c 69 | 6e 65 73 20 3d 3d 20 54 |- (Numli|nes == T|
|000057b0| 52 55 45 20 3f 20 4e 75 | 6d 77 69 64 74 68 20 3a |RUE ? Nu|mwidth :|
|000057c0| 20 30 29 3b 0a 09 58 09 | 70 61 64 20 3d 20 77 69 | 0);..X.|pad = wi|
|000057d0| 64 74 68 20 2d 20 28 6c | 70 74 72 20 2d 20 4a 75 |dth - (l|ptr - Ju|
|000057e0| 73 74 62 75 66 29 3b 0a | 09 58 0a 09 58 09 66 6f |stbuf);.|.X..X.fo|
|000057f0| 72 20 28 6c 69 6e 65 20 | 3d 20 4a 75 73 74 62 75 |r (line |= Justbu|
|00005800| 66 3b 20 2a 6c 69 6e 65 | 20 3d 3d 20 53 50 3b 20 |f; *line| == SP; |
|00005810| 6c 69 6e 65 2b 2b 29 0a | 09 58 09 09 70 75 74 63 |line++).|.X..putc|
|00005820| 20 28 2a 6c 69 6e 65 2c | 20 73 74 64 6f 75 74 29 | (*line,| stdout)|
|00005830| 3b 0a 09 58 0a 09 58 09 | 69 66 20 28 46 69 6c 6c |;..X..X.|if (Fill|
|00005840| 69 6e 67 20 3d 3d 20 54 | 52 55 45 20 26 26 20 70 |ing == T|RUE && p|
|00005850| 61 64 20 3e 20 30 29 20 | 2f 2a 20 6d 69 67 68 74 |ad > 0) |/* might|
|00005860| 20 6e 6f 74 20 66 69 6c | 6c 20 6c 61 73 74 20 6c | not fil|l last l|
|00005870| 69 6e 65 20 6f 66 20 6f | 75 74 70 75 74 20 2a 2f |ine of o|utput */|
|00005880| 0a 09 58 09 09 66 6f 72 | 20 28 6c 70 74 72 20 3d |..X..for| (lptr =|
|00005890| 20 6c 69 6e 65 3b 20 2a | 6c 70 74 72 20 21 3d 20 | line; *|lptr != |
|000058a0| 45 4f 53 3b 20 6c 70 74 | 72 2b 2b 29 0a 09 58 09 |EOS; lpt|r++)..X.|
|000058b0| 09 09 69 66 20 28 2a 6c | 70 74 72 20 3d 3d 20 53 |..if (*l|ptr == S|
|000058c0| 50 29 0a 09 58 09 09 09 | 09 73 70 61 63 65 73 2b |P)..X...|.spaces+|
|000058d0| 2b 3b 0a 09 58 0a 09 58 | 09 69 66 20 28 73 70 61 |+;..X..X|.if (spa|
|000058e0| 63 65 73 20 3e 20 30 29 | 20 2f 2a 20 77 65 20 68 |ces > 0)| /* we h|
|000058f0| 61 76 65 20 70 6c 61 63 | 65 73 20 74 6f 20 69 6e |ave plac|es to in|
|00005900| 73 65 72 74 20 73 70 61 | 63 65 73 20 2a 2f 0a 09 |sert spa|ces */..|
|00005910| 58 09 09 7b 0a 09 58 09 | 09 66 6f 72 20 28 6c 70 |X..{..X.|.for (lp|
|00005920| 74 72 20 3d 20 6c 69 6e | 65 3b 20 2a 6c 70 74 72 |tr = lin|e; *lptr|
|00005930| 20 21 3d 20 45 4f 53 3b | 20 6c 70 74 72 2b 2b 29 | != EOS;| lptr++)|
|00005940| 0a 09 58 09 09 09 7b 0a | 09 58 09 09 09 69 66 20 |..X...{.|.X...if |
|00005950| 28 2a 6c 70 74 72 20 3d | 3d 20 53 50 29 0a 09 58 |(*lptr =|= SP)..X|
|00005960| 09 09 09 09 66 6f 72 20 | 28 69 20 3d 20 30 3b 20 |....for |(i = 0; |
|00005970| 69 20 3c 20 70 61 64 3b | 20 69 2b 2b 29 0a 09 58 |i < pad;| i++)..X|
|00005980| 09 09 09 09 09 69 66 20 | 28 2b 2b 6e 20 3d 3d 20 |.....if |(++n == |
|00005990| 73 70 61 63 65 73 29 0a | 09 58 09 09 09 09 09 09 |spaces).|.X......|
|000059a0| 7b 0a 09 58 09 09 09 09 | 09 09 70 75 74 63 20 28 |{..X....|..putc (|
|000059b0| 53 50 2c 20 73 74 64 6f | 75 74 29 3b 0a 09 58 09 |SP, stdo|ut);..X.|
|000059c0| 09 09 09 09 09 6e 20 3d | 20 30 3b 0a 09 58 09 09 |.....n =| 0;..X..|
|000059d0| 09 09 09 09 7d 0a 09 58 | 09 09 09 70 75 74 63 20 |....}..X|...putc |
|000059e0| 28 2a 6c 70 74 72 2c 20 | 73 74 64 6f 75 74 29 3b |(*lptr, |stdout);|
|000059f0| 0a 09 58 09 09 09 7d 0a | 09 58 09 09 7d 0a 09 58 |..X...}.|.X..}..X|
|00005a00| 09 65 6c 73 65 20 2f 2a | 20 6a 75 73 74 20 6f 75 |.else /*| just ou|
|00005a10| 74 70 75 74 20 74 68 65 | 20 6c 69 6e 65 20 2a 2f |tput the| line */|
|00005a20| 0a 09 58 09 09 66 6f 72 | 20 28 6c 70 74 72 20 3d |..X..for| (lptr =|
|00005a30| 20 6c 69 6e 65 3b 20 2a | 6c 70 74 72 20 21 3d 20 | line; *|lptr != |
|00005a40| 45 4f 53 3b 20 6c 70 74 | 72 2b 2b 29 0a 09 58 09 |EOS; lpt|r++)..X.|
|00005a50| 09 09 70 75 74 63 20 28 | 2a 6c 70 74 72 2c 20 73 |..putc (|*lptr, s|
|00005a60| 74 64 6f 75 74 29 3b 0a | 09 58 0a 09 58 09 4a 75 |tdout);.|.X..X.Ju|
|00005a70| 73 74 70 6f 73 20 3d 20 | 30 3b 20 2f 2a 20 72 65 |stpos = |0; /* re|
|00005a80| 73 65 74 20 62 75 66 66 | 65 72 20 70 6f 73 69 74 |set buff|er posit|
|00005a90| 69 6f 6e 20 66 6f 72 20 | 6e 65 78 74 20 6c 69 6e |ion for |next lin|
|00005aa0| 65 20 2a 2f 0a 09 58 09 | 7d 0a 09 58 0a 09 58 0c |e */..X.|}..X..X.|
|00005ab0| 2f 2a 46 55 4e 43 54 49 | 4f 4e 20 70 72 69 6e 74 |/*FUNCTI|ON print|
|00005ac0| 6c 6e 3a 20 70 72 69 6e | 74 20 6c 69 6e 65 73 20 |ln: prin|t lines |
|00005ad0| 77 68 69 6c 65 20 77 61 | 74 63 68 69 6e 67 20 66 |while wa|tching f|
|00005ae0| 6f 72 20 70 61 67 65 20 | 62 6f 75 6e 64 61 72 69 |or page |boundari|
|00005af0| 65 73 20 2a 2f 0a 09 58 | 76 6f 69 64 0a 09 58 70 |es */..X|void..Xp|
|00005b00| 72 69 6e 74 6c 6e 20 28 | 63 6f 75 6e 74 29 0a 09 |rintln (|count)..|
|00005b10| 58 69 6e 74 20 09 63 6f | 75 6e 74 3b 20 20 20 20 |Xint .co|unt; |
|00005b20| 2f 2a 20 68 6f 77 20 6d | 61 6e 79 20 6c 69 6e 65 |/* how m|any line|
|00005b30| 73 20 74 6f 20 70 72 69 | 6e 74 20 28 3d 3d 20 53 |s to pri|nt (== S|
|00005b40| 70 61 63 69 6e 67 29 20 | 2a 2f 0a 09 58 09 7b 0a |pacing) |*/..X.{.|
|00005b50| 09 58 09 43 75 72 70 6f | 73 20 3d 20 30 3b 0a 09 |.X.Curpo|s = 0;..|
|00005b60| 58 09 77 68 69 6c 65 20 | 28 63 6f 75 6e 74 2d 2d |X.while |(count--|
|00005b70| 20 3e 20 30 29 0a 09 58 | 09 09 7b 0a 09 58 09 09 | > 0)..X|..{..X..|
|00005b80| 70 75 74 63 20 28 45 4f | 4c 2c 20 73 74 64 6f 75 |putc (EO|L, stdou|
|00005b90| 74 29 3b 0a 09 58 09 09 | 50 61 67 65 6c 69 6e 65 |t);..X..|Pageline|
|00005ba0| 2b 2b 3b 0a 09 58 09 09 | 69 66 20 28 50 61 67 69 |++;..X..|if (Pagi|
|00005bb0| 6e 61 74 65 20 3d 3d 20 | 54 52 55 45 20 26 26 20 |nate == |TRUE && |
|00005bc0| 28 28 50 61 67 65 73 69 | 7a 65 20 2d 20 50 61 67 |((Pagesi|ze - Pag|
|00005bd0| 65 6c 69 6e 65 29 20 3d | 3d 20 46 6f 6f 74 73 69 |eline) =|= Footsi|
|00005be0| 7a 65 29 29 0a 09 58 09 | 09 09 7b 0a 09 58 09 09 |ze))..X.|..{..X..|
|00005bf0| 09 65 6e 64 70 61 67 65 | 20 28 54 52 55 45 29 3b |.endpage| (TRUE);|
|00005c00| 0a 09 58 09 09 09 72 65 | 74 75 72 6e 3b 0a 09 58 |..X...re|turn;..X|
|00005c10| 09 09 09 7d 0a 09 58 09 | 09 7d 0a 09 58 09 7d 0a |...}..X.|.}..X.}.|
|00005c20| 09 58 0a 09 58 2f 2a 46 | 55 4e 43 54 49 4f 4e 20 |.X..X/*F|UNCTION |
|00005c30| 62 65 67 69 6e 6c 69 6e | 65 3a 20 64 6f 20 61 6e |beginlin|e: do an|
|00005c40| 79 20 6e 65 65 64 65 64 | 20 6a 75 73 74 69 66 69 |y needed| justifi|
|00005c50| 63 61 74 69 6f 6e 2c 20 | 70 61 67 69 6e 61 74 65 |cation, |paginate|
|00005c60| 20 69 66 20 72 65 71 75 | 65 73 74 65 64 2c 20 2a | if requ|ested, *|
|00005c70| 2f 0a 09 58 2f 2a 20 20 | 68 61 6e 64 6c 65 20 6c |/..X/* |handle l|
|00005c80| 69 6e 65 20 6e 75 6d 62 | 65 72 69 6e 67 2c 20 74 |ine numb|ering, t|
|00005c90| 65 6d 70 20 61 6e 64 20 | 72 65 67 75 6c 61 72 20 |emp and |regular |
|00005ca0| 69 6e 64 65 6e 74 73 20 | 62 61 73 65 64 20 6f 6e |indents |based on|
|00005cb0| 20 70 72 65 76 2e 20 66 | 69 6c 6c 69 6e 67 20 2a | prev. f|illing *|
|00005cc0| 2f 0a 09 58 76 6f 69 64 | 0a 09 58 62 65 67 69 6e |/..Xvoid|..Xbegin|
|00005cd0| 6c 69 6e 65 20 28 66 69 | 6c 6c 69 6e 67 29 0a 09 |line (fi|lling)..|
|00005ce0| 58 42 6f 6f 6c 65 09 66 | 69 6c 6c 69 6e 67 3b 20 |XBoole.f|illing; |
|00005cf0| 20 20 20 20 2f 2a 20 61 | 72 65 20 77 65 20 66 69 | /* a|re we fi|
|00005d00| 6c 6c 69 6e 67 20 6e 6f | 77 3f 20 2a 2f 0a 09 58 |lling no|w? */..X|
|00005d10| 09 7b 0a 09 58 09 69 6e | 74 20 09 63 6f 75 6e 74 |.{..X.in|t .count|
|00005d20| 3b 0a 09 58 09 42 6f 6f | 6c 65 09 6e 65 77 66 69 |;..X.Boo|le.newfi|
|00005d30| 6c 6c 20 3d 20 28 46 69 | 6c 6c 69 6e 67 20 3d 3d |ll = (Fi|lling ==|
|00005d40| 20 46 41 4c 53 45 20 26 | 26 20 66 69 6c 6c 69 6e | FALSE &|& fillin|
|00005d50| 67 20 3d 3d 20 54 52 55 | 45 29 3b 0a 09 58 0a 09 |g == TRU|E);..X..|
|00005d60| 58 09 46 69 6c 6c 69 6e | 67 20 3d 20 66 69 6c 6c |X.Fillin|g = fill|
|00005d70| 69 6e 67 3b 0a 09 58 09 | 69 66 20 28 4a 75 73 74 |ing;..X.|if (Just|
|00005d80| 69 66 79 20 3d 3d 20 54 | 52 55 45 29 0a 09 58 09 |ify == T|RUE)..X.|
|00005d90| 09 64 6f 6a 75 73 74 69 | 66 79 20 28 29 3b 0a 09 |.dojusti|fy ();..|
|00005da0| 58 09 4f 75 74 6c 69 6e | 65 2b 2b 3b 0a 09 58 09 |X.Outlin|e++;..X.|
|00005db0| 43 75 72 70 6f 73 20 3d | 20 30 3b 0a 09 58 0a 09 |Curpos =| 0;..X..|
|00005dc0| 58 09 69 66 20 28 50 61 | 67 69 6e 61 74 65 20 3d |X.if (Pa|ginate =|
|00005dd0| 3d 20 54 52 55 45 20 26 | 26 20 50 61 67 65 6c 69 |= TRUE &|& Pageli|
|00005de0| 6e 65 20 3d 3d 20 30 29 | 0a 09 58 09 09 62 65 67 |ne == 0)|..X..beg|
|00005df0| 69 6e 70 61 67 65 20 28 | 29 3b 0a 09 58 09 65 6c |inpage (|);..X.el|
|00005e00| 73 65 20 69 66 20 28 4f | 75 74 6c 69 6e 65 20 3e |se if (O|utline >|
|00005e10| 20 31 29 0a 09 58 09 09 | 70 72 69 6e 74 6c 6e 20 | 1)..X..|println |
|00005e20| 28 53 70 61 63 69 6e 67 | 29 3b 0a 09 58 0a 09 58 |(Spacing|);..X..X|
|00005e30| 09 69 66 20 28 4e 75 6d | 6c 69 6e 65 73 20 3d 3d |.if (Num|lines ==|
|00005e40| 20 54 52 55 45 29 0a 09 | 58 09 09 7b 0a 09 58 09 | TRUE)..|X..{..X.|
|00005e50| 09 63 68 61 72 09 2a 70 | 74 72 20 3d 20 69 74 6f |.char.*p|tr = ito|
|00005e60| 61 20 28 4f 75 74 6c 69 | 6e 65 2c 20 4e 75 6d 77 |a (Outli|ne, Numw|
|00005e70| 69 64 74 68 20 2d 20 31 | 29 3b 0a 09 58 09 09 43 |idth - 1|);..X..C|
|00005e80| 75 72 70 6f 73 20 2b 3d | 20 4e 75 6d 77 69 64 74 |urpos +=| Numwidt|
|00005e90| 68 3b 0a 09 58 09 09 77 | 68 69 6c 65 20 28 2a 70 |h;..X..w|hile (*p|
|00005ea0| 74 72 29 0a 09 58 09 09 | 09 70 75 74 63 20 28 2a |tr)..X..|.putc (*|
|00005eb0| 70 74 72 2b 2b 2c 20 73 | 74 64 6f 75 74 29 3b 0a |ptr++, s|tdout);.|
|00005ec0| 09 58 09 09 70 75 74 63 | 20 28 53 50 2c 20 73 74 |.X..putc| (SP, st|
|00005ed0| 64 6f 75 74 29 3b 0a 09 | 58 09 09 7d 0a 09 58 0a |dout);..|X..}..X.|
|00005ee0| 09 58 09 63 6f 75 6e 74 | 20 3d 20 49 6e 64 65 6e |.X.count| = Inden|
|00005ef0| 74 3b 0a 09 58 09 69 66 | 20 28 6e 65 77 66 69 6c |t;..X.if| (newfil|
|00005f00| 6c 20 3d 3d 20 54 52 55 | 45 29 0a 09 58 09 09 63 |l == TRU|E)..X..c|
|00005f10| 6f 75 6e 74 20 2b 3d 20 | 54 69 6e 64 65 6e 74 3b |ount += |Tindent;|
|00005f20| 0a 09 58 09 43 75 72 70 | 6f 73 20 2b 3d 20 63 6f |..X.Curp|os += co|
|00005f30| 75 6e 74 3b 0a 09 58 0a | 09 58 09 69 66 20 28 4a |unt;..X.|.X.if (J|
|00005f40| 75 73 74 69 66 79 20 3d | 3d 20 54 52 55 45 29 0a |ustify =|= TRUE).|
|00005f50| 09 58 09 09 77 68 69 6c | 65 20 28 63 6f 75 6e 74 |.X..whil|e (count|
|00005f60| 2d 2d 20 3e 20 30 29 0a | 09 58 09 09 09 6a 75 73 |-- > 0).|.X...jus|
|00005f70| 74 63 68 61 72 20 28 53 | 50 29 3b 0a 09 58 09 65 |tchar (S|P);..X.e|
|00005f80| 6c 73 65 0a 09 58 09 09 | 72 65 70 65 61 74 20 28 |lse..X..|repeat (|
|00005f90| 53 50 2c 20 63 6f 75 6e | 74 29 3b 0a 09 58 09 7d |SP, coun|t);..X.}|
|00005fa0| 0a 09 58 0a 09 58 0c 2f | 2a 46 55 4e 43 54 49 4f |..X..X./|*FUNCTIO|
|00005fb0| 4e 20 69 74 6f 61 3a 20 | 69 6e 74 65 67 65 72 20 |N itoa: |integer |
|00005fc0| 74 6f 20 61 73 63 69 69 | 20 63 6f 6e 76 65 72 73 |to ascii| convers|
|00005fd0| 69 6f 6e 20 2a 2f 0a 09 | 58 63 68 61 72 20 2a 0a |ion */..|Xchar *.|
|00005fe0| 09 58 69 74 6f 61 20 28 | 6e 2c 20 70 61 64 29 0a |.Xitoa (|n, pad).|
|00005ff0| 09 58 72 65 67 69 73 74 | 65 72 20 69 6e 74 20 6e |.Xregist|er int n|
|00006000| 3b 20 20 20 20 2f 2a 20 | 74 68 65 20 69 6e 74 65 |; /* |the inte|
|00006010| 67 65 72 20 74 6f 20 62 | 65 20 70 72 69 6e 74 65 |ger to b|e printe|
|00006020| 64 20 61 73 20 61 20 73 | 74 72 69 6e 67 20 2a 2f |d as a s|tring */|
|00006030| 0a 09 58 69 6e 74 20 09 | 70 61 64 3b 20 20 20 20 |..Xint .|pad; |
|00006040| 20 20 20 2f 2a 20 61 6d | 6f 75 6e 74 20 6f 66 20 | /* am|ount of |
|00006050| 73 70 61 63 65 20 74 6f | 20 70 61 64 20 6e 75 6d |space to| pad num|
|00006060| 62 65 72 20 74 6f 20 2a | 2f 0a 09 58 09 7b 0a 09 |ber to *|/..X.{..|
|00006070| 58 09 73 74 61 74 69 63 | 20 63 68 61 72 20 6e 75 |X.static| char nu|
|00006080| 6d 62 75 66 5b 4d 41 58 | 4c 45 4e 5d 3b 20 2f 2a |mbuf[MAX|LEN]; /*|
|00006090| 20 61 6e 73 77 65 72 20 | 62 75 69 6c 74 20 69 6e | answer |built in|
|000060a0| 20 68 65 72 65 20 2a 2f | 0a 09 58 09 72 65 67 69 | here */|..X.regi|
|000060b0| 73 74 65 72 20 63 68 61 | 72 20 2a 6e 70 74 72 3b |ster cha|r *nptr;|
|000060c0| 20 20 20 20 20 20 20 20 | 2f 2a 20 77 69 6c 6c 20 | |/* will |
|000060d0| 62 65 20 70 6f 69 6e 74 | 65 72 20 74 6f 20 62 65 |be point|er to be|
|000060e0| 67 69 6e 6e 69 6e 67 20 | 6f 66 20 6e 75 6d 62 65 |ginning |of numbe|
|000060f0| 72 20 2a 2f 0a 09 58 09 | 42 6f 6f 6c 65 09 6e 65 |r */..X.|Boole.ne|
|00006100| 67 66 6c 67 20 3d 20 46 | 41 4c 53 45 3b 20 20 20 |gflg = F|ALSE; |
|00006110| 20 20 2f 2a 20 69 73 20 | 74 68 65 20 6e 75 6d 62 | /* is |the numb|
|00006120| 65 72 20 61 20 6e 65 67 | 61 74 69 76 65 20 76 61 |er a neg|ative va|
|00006130| 6c 75 65 3f 20 2a 2f 0a | 09 58 0a 09 58 09 2f 2a |lue? */.|.X..X./*|
|00006140| 20 73 74 61 74 69 63 20 | 6e 75 6d 62 75 66 20 69 | static |numbuf i|
|00006150| 73 20 69 6e 69 74 69 61 | 6c 69 7a 65 64 20 74 6f |s initia|lized to|
|00006160| 20 30 27 73 2c 20 73 6f | 20 6e 75 6d 62 75 66 5b | 0's, so| numbuf[|
|00006170| 4d 41 58 4c 45 4e 2d 31 | 5d 20 3d 3d 20 45 4f 53 |MAXLEN-1|] == EOS|
|00006180| 20 2a 2f 0a 09 58 09 69 | 66 20 28 6e 20 3d 3d 20 | */..X.i|f (n == |
|00006190| 30 29 0a 09 58 09 09 7b | 0a 09 58 09 09 6e 70 74 |0)..X..{|..X..npt|
|000061a0| 72 20 3d 20 26 6e 75 6d | 62 75 66 5b 4d 41 58 4c |r = &num|buf[MAXL|
|000061b0| 45 4e 2d 31 5d 3b 0a 09 | 58 09 09 2a 2d 2d 6e 70 |EN-1];..|X..*--np|
|000061c0| 74 72 20 3d 20 27 30 27 | 3b 0a 09 58 09 09 7d 0a |tr = '0'|;..X..}.|
|000061d0| 09 58 09 65 6c 73 65 0a | 09 58 09 09 7b 0a 09 58 |.X.else.|.X..{..X|
|000061e0| 09 09 69 66 20 28 6e 20 | 3c 20 30 29 0a 09 58 09 |..if (n |< 0)..X.|
|000061f0| 09 09 7b 0a 09 58 09 09 | 09 6e 20 3d 20 28 2d 6e |..{..X..|.n = (-n|
|00006200| 29 3b 0a 09 58 09 09 09 | 6e 65 67 66 6c 67 20 3d |);..X...|negflg =|
|00006210| 20 54 52 55 45 3b 0a 09 | 58 09 09 09 7d 0a 09 58 | TRUE;..|X...}..X|
|00006220| 09 09 66 6f 72 20 28 6e | 70 74 72 20 3d 20 26 6e |..for (n|ptr = &n|
|00006230| 75 6d 62 75 66 5b 4d 41 | 58 4c 45 4e 2d 31 5d 3b |umbuf[MA|XLEN-1];|
|00006240| 20 6e 20 21 3d 20 30 3b | 20 6e 20 2f 3d 20 31 30 | n != 0;| n /= 10|
|00006250| 29 0a 09 58 09 09 09 2a | 2d 2d 6e 70 74 72 20 3d |)..X...*|--nptr =|
|00006260| 20 28 6e 20 25 20 31 30 | 29 20 2b 20 27 30 27 3b | (n % 10|) + '0';|
|00006270| 0a 09 58 09 09 69 66 20 | 28 6e 65 67 66 6c 67 20 |..X..if |(negflg |
|00006280| 3d 3d 20 54 52 55 45 29 | 0a 09 58 09 09 09 2a 2d |== TRUE)|..X...*-|
|00006290| 2d 6e 70 74 72 20 3d 20 | 27 2d 27 3b 0a 09 58 09 |-nptr = |'-';..X.|
|000062a0| 09 7d 0a 09 58 0a 09 58 | 09 77 68 69 6c 65 20 28 |.}..X..X|.while (|
|000062b0| 70 61 64 20 3e 20 6e 75 | 6d 62 75 66 2b 4d 41 58 |pad > nu|mbuf+MAX|
|000062c0| 4c 45 4e 2d 31 2d 6e 70 | 74 72 29 0a 09 58 09 09 |LEN-1-np|tr)..X..|
|000062d0| 2a 2d 2d 6e 70 74 72 20 | 3d 20 53 50 3b 0a 09 58 |*--nptr |= SP;..X|
|000062e0| 0a 09 58 09 72 65 74 75 | 72 6e 20 28 6e 70 74 72 |..X.retu|rn (nptr|
|000062f0| 29 3b 0a 09 58 09 7d 0a | 09 58 0a 09 58 0c 2f 2a |);..X.}.|.X..X./*|
|00006300| 46 55 4e 43 54 49 4f 4e | 20 65 78 70 61 6e 64 3a |FUNCTION| expand:|
|00006310| 20 69 6e 73 65 72 74 20 | 66 69 6c 65 2f 70 61 67 | insert |file/pag|
|00006320| 65 20 66 6f 72 20 63 68 | 61 72 61 63 74 65 72 73 |e for ch|aracters|
|00006330| 20 69 6e 20 66 69 65 6c | 64 20 6f 66 20 33 70 61 | in fiel|d of 3pa|
|00006340| 72 74 20 74 69 74 6c 65 | 20 2a 2f 0a 09 58 63 68 |rt title| */..Xch|
|00006350| 61 72 20 2a 0a 09 58 65 | 78 70 61 6e 64 20 28 74 |ar *..Xe|xpand (t|
|00006360| 69 74 6c 65 2c 20 70 61 | 67 65 2c 20 66 69 6c 65 |itle, pa|ge, file|
|00006370| 29 0a 09 58 72 65 67 69 | 73 74 65 72 09 63 68 61 |)..Xregi|ster.cha|
|00006380| 72 09 2a 74 69 74 6c 65 | 3b 20 20 20 2f 2a 20 74 |r.*title|; /* t|
|00006390| 68 65 20 74 69 74 6c 65 | 20 74 6f 20 62 65 20 65 |he title| to be e|
|000063a0| 78 70 61 6e 64 65 64 20 | 2a 2f 0a 09 58 69 6e 74 |xpanded |*/..Xint|
|000063b0| 20 09 70 61 67 65 3b 20 | 20 20 20 20 20 20 20 20 | .page; | |
|000063c0| 20 20 20 20 20 20 20 20 | 2f 2a 20 74 68 65 20 63 | |/* the c|
|000063d0| 75 72 72 65 6e 74 20 70 | 61 67 65 20 6e 75 6d 62 |urrent p|age numb|
|000063e0| 65 72 20 2a 2f 0a 09 58 | 63 68 61 72 09 2a 66 69 |er */..X|char.*fi|
|000063f0| 6c 65 3b 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |le; | |
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.