/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / misc / volume17 / pl / patch01

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 46 72 6f 6d 3a 20 6d 61 | 6c 63 40 65 71 75 69 6e |From: ma|lc@equin|
|00000010| 6f 78 2e 75 6e 72 2e 65 | 64 75 20 28 4d 61 6c 63 |ox.unr.e|du (Malc|
|00000020| 6f 6c 6d 20 43 61 72 6c | 6f 63 6b 29 0a 4e 65 77 |olm Carl|ock).New|
|00000030| 73 67 72 6f 75 70 73 3a | 20 63 6f 6d 70 2e 73 6f |sgroups:| comp.so|
|00000040| 75 72 63 65 73 2e 6d 69 | 73 63 0a 53 75 62 6a 65 |urces.mi|sc.Subje|
|00000050| 63 74 3a 20 76 31 37 69 | 30 38 31 3a 20 20 70 6c |ct: v17i|081:  pl|
|00000060| 20 2d 20 57 72 69 74 65 | 20 74 6f 20 70 72 69 6e | - Write| to prin|
|00000070| 74 65 72 20 61 74 74 61 | 63 68 65 64 20 74 6f 20 |ter atta|ched to |
|00000080| 75 73 65 72 27 73 20 54 | 65 72 6d 69 6e 61 6c 20 |user's T|erminal |
|00000090| 6f 72 20 50 43 2c 20 50 | 61 74 63 68 30 31 0a 4d |or PC, P|atch01.M|
|000000a0| 65 73 73 61 67 65 2d 49 | 44 3a 20 3c 31 39 39 31 |essage-I|D: <1991|
|000000b0| 41 70 72 34 2e 30 34 32 | 37 31 31 2e 34 34 35 34 |Apr4.042|711.4454|
|000000c0| 40 73 70 61 72 6b 79 2e | 49 4d 44 2e 53 74 65 72 |@sparky.|IMD.Ster|
|000000d0| 6c 69 6e 67 2e 43 4f 4d | 3e 0a 44 61 74 65 3a 20 |ling.COM|>.Date: |
|000000e0| 34 20 41 70 72 20 39 31 | 20 30 34 3a 32 37 3a 31 |4 Apr 91| 04:27:1|
|000000f0| 31 20 47 4d 54 0a 41 70 | 70 72 6f 76 65 64 3a 20 |1 GMT.Ap|proved: |
|00000100| 6b 65 6e 74 40 73 70 61 | 72 6b 79 2e 69 6d 64 2e |kent@spa|rky.imd.|
|00000110| 73 74 65 72 6c 69 6e 67 | 2e 63 6f 6d 0a 58 2d 43 |sterling|.com.X-C|
|00000120| 68 65 63 6b 73 75 6d 2d | 53 6e 65 66 72 75 3a 20 |hecksum-|Snefru: |
|00000130| 65 30 35 31 37 30 64 65 | 20 30 34 38 61 36 63 31 |e05170de| 048a6c1|
|00000140| 65 20 33 39 32 61 65 31 | 37 63 20 30 36 63 35 66 |e 392ae1|7c 06c5f|
|00000150| 39 33 37 0a 0a 53 75 62 | 6d 69 74 74 65 64 2d 62 |937..Sub|mitted-b|
|00000160| 79 3a 20 4d 61 6c 63 6f | 6c 6d 20 43 61 72 6c 6f |y: Malco|lm Carlo|
|00000170| 63 6b 20 3c 6d 61 6c 63 | 40 65 71 75 69 6e 6f 78 |ck <malc|@equinox|
|00000180| 2e 75 6e 72 2e 65 64 75 | 3e 0a 50 6f 73 74 69 6e |.unr.edu|>.Postin|
|00000190| 67 2d 6e 75 6d 62 65 72 | 3a 20 56 6f 6c 75 6d 65 |g-number|: Volume|
|000001a0| 20 31 37 2c 20 49 73 73 | 75 65 20 38 31 0a 41 72 | 17, Iss|ue 81.Ar|
|000001b0| 63 68 69 76 65 2d 6e 61 | 6d 65 3a 20 70 6c 2f 70 |chive-na|me: pl/p|
|000001c0| 61 74 63 68 30 31 0a 50 | 61 74 63 68 2d 54 6f 3a |atch01.P|atch-To:|
|000001d0| 20 70 6c 3a 20 56 6f 6c | 75 6d 65 20 31 37 2c 20 | pl: Vol|ume 17, |
|000001e0| 49 73 73 75 65 20 37 32 | 0a 0a 54 68 65 20 22 74 |Issue 72|..The "t|
|000001f0| 63 70 75 74 2e 63 22 20 | 70 72 6f 67 72 61 6d 20 |cput.c" |program |
|00000200| 69 6e 63 6c 75 64 65 64 | 20 77 69 74 68 20 74 68 |included| with th|
|00000210| 65 20 72 65 63 65 6e 74 | 6c 79 20 70 6f 73 74 65 |e recent|ly poste|
|00000220| 64 20 50 4c 20 70 72 6f | 67 72 61 6d 20 77 61 73 |d PL pro|gram was|
|00000230| 0a 77 72 69 74 74 65 6e | 20 69 6e 20 41 4e 53 49 |.written| in ANSI|
|00000240| 20 43 2c 20 61 6e 64 20 | 68 65 6e 63 65 20 6f 6e | C, and |hence on|
|00000250| 20 6d 6f 73 74 20 73 79 | 73 74 65 6d 73 20 77 69 | most sy|stems wi|
|00000260| 6c 6c 20 66 61 69 6c 20 | 74 6f 20 63 6f 6d 70 69 |ll fail |to compi|
|00000270| 6c 65 20 69 66 20 22 63 | 63 22 0a 69 73 20 75 73 |le if "c|c".is us|
|00000280| 65 64 20 74 6f 20 62 75 | 69 6c 64 20 69 74 2e 20 |ed to bu|ild it. |
|00000290| 20 54 68 65 20 70 72 6f | 67 72 61 6d 2c 20 61 73 | The pro|gram, as|
|000002a0| 20 64 69 73 74 72 69 62 | 75 74 65 64 20 6f 6e 20 | distrib|uted on |
|000002b0| 75 6e 72 2e 65 64 75 20 | 28 31 33 34 2e 31 39 37 |unr.edu |(134.197|
|000002c0| 2e 31 2e 32 29 2c 0a 68 | 61 73 20 62 65 65 6e 20 |.1.2),.h|as been |
|000002d0| 63 68 61 6e 67 65 64 20 | 74 6f 20 66 69 74 20 74 |changed |to fit t|
|000002e0| 68 65 20 22 73 74 61 6e | 64 61 72 64 22 20 43 20 |he "stan|dard" C |
|000002f0| 6d 6f 64 65 6c 2e 20 20 | 54 68 65 20 61 63 74 75 |model.  |The actu|
|00000300| 61 6c 20 63 6f 64 65 20 | 66 6f 6c 6c 6f 77 73 2e |al code |follows.|
|00000310| 0a 53 6f 72 72 79 3b 20 | 20 74 68 69 73 20 73 68 |.Sorry; | this sh|
|00000320| 6f 75 6c 64 20 68 61 76 | 65 20 62 65 65 6e 20 64 |ould hav|e been d|
|00000330| 69 73 74 72 69 62 75 74 | 65 64 20 69 6e 20 22 73 |istribut|ed in "s|
|00000340| 74 61 6e 64 61 72 64 22 | 20 43 20 6f 72 69 67 69 |tandard"| C origi|
|00000350| 6e 61 6c 6c 79 2e 0a 0a | 54 68 65 72 65 20 68 61 |nally...|There ha|
|00000360| 76 65 20 61 6c 73 6f 20 | 62 65 65 6e 20 73 6f 6d |ve also |been som|
|00000370| 65 20 70 72 6f 62 6c 65 | 6d 73 20 72 65 70 6f 72 |e proble|ms repor|
|00000380| 74 69 6e 67 20 69 6e 20 | 67 65 74 74 69 6e 67 20 |ting in |getting |
|00000390| 6b 65 72 6d 69 74 20 74 | 6f 20 70 72 69 6e 74 0a |kermit t|o print.|
|000003a0| 77 69 74 68 20 50 4c 20 | 77 68 65 6e 20 69 6e 20 |with PL |when in |
|000003b0| 68 65 61 74 68 2d 31 39 | 20 6d 6f 64 65 2e 20 20 |heath-19| mode.  |
|000003c0| 49 74 20 77 6f 72 6b 73 | 20 66 6f 72 20 6d 65 20 |It works| for me |
|000003d0| 75 73 69 6e 67 20 4b 65 | 72 6d 69 74 20 76 65 72 |using Ke|rmit ver|
|000003e0| 73 69 6f 6e 20 32 2e 33 | 32 2c 0a 62 75 74 20 73 |sion 2.3|2,.but s|
|000003f0| 6f 6d 65 20 6f 74 68 65 | 72 20 6c 61 74 65 72 20 |ome othe|r later |
|00000400| 76 65 72 73 69 6f 6e 73 | 20 61 70 70 65 61 72 20 |versions| appear |
|00000410| 74 6f 20 68 61 76 65 20 | 61 20 70 72 6f 62 6c 65 |to have |a proble|
|00000420| 6d 2e 20 20 41 63 63 6f | 72 64 69 6e 67 20 74 6f |m.  Acco|rding to|
|00000430| 20 74 68 65 0a 6c 61 74 | 65 73 74 20 6f 6e 2d 6c | the.lat|est on-l|
|00000440| 69 6e 65 20 6b 65 72 6d | 69 74 20 64 6f 63 73 20 |ine kerm|it docs |
|00000450| 6e 6f 74 68 69 6e 67 20 | 68 61 73 20 63 68 61 6e |nothing |has chan|
|00000460| 67 65 64 20 69 6e 20 74 | 68 65 20 70 72 69 6e 74 |ged in t|he print|
|00000470| 65 72 20 63 6f 6e 74 72 | 6f 6c 0a 65 73 63 61 70 |er contr|ol.escap|
|00000480| 65 20 73 65 71 75 65 6e | 63 65 73 20 73 69 6e 63 |e sequen|ces sinc|
|00000490| 65 20 32 2e 33 32 2e 20 | 20 49 27 6d 20 77 6f 6e |e 2.32. | I'm won|
|000004a0| 64 65 72 69 6e 67 20 69 | 66 20 74 68 65 72 65 27 |dering i|f there'|
|000004b0| 73 20 61 20 62 75 67 3b | 20 20 49 27 6c 6c 20 62 |s a bug;|  I'll b|
|000004c0| 65 0a 64 6f 69 6e 67 20 | 73 6f 6d 65 20 6d 6f 72 |e.doing |some mor|
|000004d0| 65 20 63 68 65 63 6b 69 | 6e 67 2e 0a 0a 41 20 77 |e checki|ng...A w|
|000004e0| 61 79 20 61 72 6f 75 6e | 64 20 74 68 65 20 70 72 |ay aroun|d the pr|
|000004f0| 6f 62 6c 65 6d 20 77 69 | 74 68 20 68 65 61 74 68 |oblem wi|th heath|
|00000500| 2d 31 39 20 6d 6f 64 65 | 20 69 73 20 74 6f 20 75 |-19 mode| is to u|
|00000510| 73 65 20 4b 65 72 6d 69 | 74 27 73 20 76 74 31 30 |se Kermi|t's vt10|
|00000520| 32 0a 65 6d 75 6c 61 74 | 69 6f 6e 20 69 6e 73 74 |2.emulat|ion inst|
|00000530| 65 61 64 2e 20 20 54 68 | 69 73 20 61 70 70 65 61 |ead.  Th|is appea|
|00000540| 72 73 20 74 6f 20 77 6f | 72 6b 20 77 69 74 68 20 |rs to wo|rk with |
|00000550| 6d 6f 73 74 20 28 69 66 | 20 6e 6f 74 20 61 6c 6c |most (if| not all|
|00000560| 29 20 76 65 72 73 69 6f | 6e 73 0a 6f 66 20 4b 65 |) versio|ns.of Ke|
|00000570| 72 6d 69 74 2e 0a 0a 48 | 6f 70 65 20 74 68 69 73 |rmit...H|ope this|
|00000580| 20 68 65 6c 70 73 2e 0a | 0a 4d 61 6c 63 6f 6c 6d | helps..|.Malcolm|
|00000590| 20 4c 2e 20 43 61 72 6c | 6f 63 6b 20 20 20 20 20 | L. Carl|ock     |
|000005a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000005b0| 20 49 6e 74 65 72 6e 65 | 74 3a 20 20 6d 61 6c 63 | Interne|t:  malc|
|000005c0| 40 75 6e 72 2e 65 64 75 | 0a 20 20 20 20 20 20 20 |@unr.edu|.       |
|000005d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000005e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000005f0| 20 55 55 43 50 3a 20 20 | 20 20 20 20 75 6e 72 21 | UUCP:  |    unr!|
|00000600| 6d 61 6c 63 0a 20 20 20 | 20 20 20 20 20 20 20 20 |malc.   |        |
|00000610| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000620| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 42 49 54 |        |     BIT|
|00000630| 4e 45 54 3a 20 20 20 20 | 6d 61 6c 63 40 65 71 75 |NET:    |malc@equ|
|00000640| 69 6e 6f 78 0a 2d 2d 2d | 2d 0a 23 21 20 2f 62 69 |inox.---|-.#! /bi|
|00000650| 6e 2f 73 68 0a 23 20 54 | 68 69 73 20 69 73 20 61 |n/sh.# T|his is a|
|00000660| 20 73 68 65 6c 6c 20 61 | 72 63 68 69 76 65 2e 20 | shell a|rchive. |
|00000670| 20 52 65 6d 6f 76 65 20 | 61 6e 79 74 68 69 6e 67 | Remove |anything|
|00000680| 20 62 65 66 6f 72 65 20 | 74 68 69 73 20 6c 69 6e | before |this lin|
|00000690| 65 2c 20 74 68 65 6e 20 | 66 65 65 64 20 69 74 0a |e, then |feed it.|
|000006a0| 23 20 69 6e 74 6f 20 61 | 20 73 68 65 6c 6c 20 76 |# into a| shell v|
|000006b0| 69 61 20 22 73 68 20 66 | 69 6c 65 22 20 6f 72 20 |ia "sh f|ile" or |
|000006c0| 73 69 6d 69 6c 61 72 2e | 20 20 54 6f 20 6f 76 65 |similar.|  To ove|
|000006d0| 72 77 72 69 74 65 20 65 | 78 69 73 74 69 6e 67 20 |rwrite e|xisting |
|000006e0| 66 69 6c 65 73 2c 0a 23 | 20 74 79 70 65 20 22 73 |files,.#| type "s|
|000006f0| 68 20 66 69 6c 65 20 2d | 63 22 2e 0a 23 20 54 68 |h file -|c"..# Th|
|00000700| 65 20 74 6f 6f 6c 20 74 | 68 61 74 20 67 65 6e 65 |e tool t|hat gene|
|00000710| 72 61 74 65 64 20 74 68 | 69 73 20 61 70 70 65 61 |rated th|is appea|
|00000720| 72 65 64 20 69 6e 20 74 | 68 65 20 63 6f 6d 70 2e |red in t|he comp.|
|00000730| 73 6f 75 72 63 65 73 2e | 75 6e 69 78 20 6e 65 77 |sources.|unix new|
|00000740| 73 67 72 6f 75 70 3b 0a | 23 20 73 65 6e 64 20 6d |sgroup;.|# send m|
|00000750| 61 69 6c 20 74 6f 20 63 | 6f 6d 70 2d 73 6f 75 72 |ail to c|omp-sour|
|00000760| 63 65 73 2d 75 6e 69 78 | 40 75 75 6e 65 74 2e 75 |ces-unix|@uunet.u|
|00000770| 75 2e 6e 65 74 20 69 66 | 20 79 6f 75 20 77 61 6e |u.net if| you wan|
|00000780| 74 20 74 68 61 74 20 74 | 6f 6f 6c 2e 0a 23 20 43 |t that t|ool..# C|
|00000790| 6f 6e 74 65 6e 74 73 3a | 20 20 50 41 54 43 48 30 |ontents:|  PATCH0|
|000007a0| 31 0a 23 20 57 72 61 70 | 70 65 64 20 62 79 20 6b |1.# Wrap|ped by k|
|000007b0| 65 6e 74 40 73 70 61 72 | 6b 79 20 6f 6e 20 57 65 |ent@spar|ky on We|
|000007c0| 64 20 41 70 72 20 20 33 | 20 32 32 3a 32 33 3a 34 |d Apr  3| 22:23:4|
|000007d0| 32 20 31 39 39 31 0a 50 | 41 54 48 3d 2f 62 69 6e |2 1991.P|ATH=/bin|
|000007e0| 3a 2f 75 73 72 2f 62 69 | 6e 3a 2f 75 73 72 2f 75 |:/usr/bi|n:/usr/u|
|000007f0| 63 62 20 3b 20 65 78 70 | 6f 72 74 20 50 41 54 48 |cb ; exp|ort PATH|
|00000800| 0a 65 63 68 6f 20 49 66 | 20 74 68 69 73 20 61 72 |.echo If| this ar|
|00000810| 63 68 69 76 65 20 69 73 | 20 63 6f 6d 70 6c 65 74 |chive is| complet|
|00000820| 65 2c 20 79 6f 75 20 77 | 69 6c 6c 20 73 65 65 20 |e, you w|ill see |
|00000830| 74 68 65 20 66 6f 6c 6c | 6f 77 69 6e 67 20 6d 65 |the foll|owing me|
|00000840| 73 73 61 67 65 3a 0a 65 | 63 68 6f 20 27 20 20 20 |ssage:.e|cho '   |
|00000850| 20 20 20 20 20 20 20 22 | 73 68 61 72 3a 20 45 6e |       "|shar: En|
|00000860| 64 20 6f 66 20 61 72 63 | 68 69 76 65 2e 22 27 0a |d of arc|hive."'.|
|00000870| 69 66 20 74 65 73 74 20 | 2d 66 20 27 50 41 54 43 |if test |-f 'PATC|
|00000880| 48 30 31 27 20 2d 61 20 | 22 24 7b 31 7d 22 20 21 |H01' -a |"${1}" !|
|00000890| 3d 20 22 2d 63 22 20 3b | 20 74 68 65 6e 20 0a 20 |= "-c" ;| then . |
|000008a0| 20 65 63 68 6f 20 73 68 | 61 72 3a 20 57 69 6c 6c | echo sh|ar: Will|
|000008b0| 20 6e 6f 74 20 63 6c 6f | 62 62 65 72 20 65 78 69 | not clo|bber exi|
|000008c0| 73 74 69 6e 67 20 66 69 | 6c 65 20 5c 22 27 50 41 |sting fi|le \"'PA|
|000008d0| 54 43 48 30 31 27 5c 22 | 0a 65 6c 73 65 0a 20 20 |TCH01'\"|.else.  |
|000008e0| 65 63 68 6f 20 73 68 61 | 72 3a 20 45 78 74 72 61 |echo sha|r: Extra|
|000008f0| 63 74 69 6e 67 20 5c 22 | 27 50 41 54 43 48 30 31 |cting \"|'PATCH01|
|00000900| 27 5c 22 20 5c 28 33 30 | 34 39 20 63 68 61 72 61 |'\" \(30|49 chara|
|00000910| 63 74 65 72 73 5c 29 0a | 20 20 73 65 64 20 22 73 |cters\).|  sed "s|
|00000920| 2f 5e 58 2f 2f 22 20 3e | 27 50 41 54 43 48 30 31 |/^X//" >|'PATCH01|
|00000930| 27 20 3c 3c 27 45 4e 44 | 5f 4f 46 5f 46 49 4c 45 |' <<'END|_OF_FILE|
|00000940| 27 0a 58 2a 2a 2a 20 74 | 63 70 75 74 2e 63 2e 61 |'.X*** t|cput.c.a|
|00000950| 6e 73 69 09 57 65 64 20 | 41 70 72 20 20 33 20 32 |nsi.Wed |Apr  3 2|
|00000960| 32 3a 31 31 3a 35 37 20 | 31 39 39 31 0a 58 2d 2d |2:11:57 |1991.X--|
|00000970| 2d 20 74 63 70 75 74 2e | 63 09 57 65 64 20 41 70 |- tcput.|c.Wed Ap|
|00000980| 72 20 20 33 20 32 32 3a | 31 30 3a 33 34 20 31 39 |r  3 22:|10:34 19|
|00000990| 39 31 0a 58 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |91.X****|********|
|000009a0| 2a 2a 2a 0a 58 2a 2a 2a | 20 31 2c 37 20 2a 2a 2a |***.X***| 1,7 ***|
|000009b0| 2a 0a 58 20 20 2f 2a 0a | 58 20 20 20 2a 20 74 63 |*.X  /*.|X   * tc|
|000009c0| 70 75 74 2e 63 09 46 69 | 6e 64 20 74 68 65 20 67 |put.c.Fi|nd the g|
|000009d0| 69 76 65 6e 20 74 65 72 | 6d 69 6e 61 6c 20 63 61 |iven ter|minal ca|
|000009e0| 70 61 62 69 6c 69 74 79 | 20 69 6e 20 74 68 65 20 |pability| in the |
|000009f0| 74 65 72 6d 63 61 70 20 | 64 61 74 61 62 61 73 65 |termcap |database|
|00000a00| 2c 0a 58 20 20 20 2a 09 | 09 69 6e 74 65 72 70 65 |,.X   *.|.interpe|
|00000a10| 74 20 69 74 2c 20 61 6e | 64 20 70 72 69 6e 74 20 |t it, an|d print |
|00000a20| 69 74 20 74 6f 20 74 68 | 65 20 74 65 72 6d 69 6e |it to th|e termin|
|00000a30| 61 6c 2e 20 20 52 61 77 | 20 6d 6f 64 65 20 69 73 |al.  Raw| mode is|
|00000a40| 20 75 73 65 64 0a 58 21 | 20 20 2a 09 09 77 68 65 | used.X!|  *..whe|
|00000a50| 6e 20 70 72 69 6e 74 69 | 6e 67 20 74 6f 20 61 76 |n printi|ng to av|
|00000a60| 6f 69 64 20 73 79 73 74 | 65 6d 2d 6c 65 76 65 6c |oid syst|em-level|
|00000a70| 20 6d 61 70 70 69 6e 67 | 73 2e 0a 58 20 20 20 2a | mapping|s..X   *|
|00000a80| 0a 58 20 20 20 2a 09 09 | 53 69 6d 69 6c 61 72 20 |.X   *..|Similar |
|00000a90| 74 6f 20 74 70 75 74 20 | 6f 6e 20 53 59 53 56 20 |to tput |on SYSV |
|00000aa0| 75 6e 69 78 2c 20 62 75 | 74 20 64 6f 65 73 6e 27 |unix, bu|t doesn'|
|00000ab0| 74 20 61 6c 6c 6f 77 20 | 69 6e 73 74 61 6e 74 69 |t allow |instanti|
|00000ac0| 61 74 69 6f 6e 0a 58 20 | 20 20 2a 09 09 6f 66 20 |ation.X |  *..of |
|00000ad0| 70 61 72 61 6d 65 74 65 | 72 20 73 74 72 69 6e 67 |paramete|r string|
|00000ae0| 73 20 66 72 6f 6d 20 74 | 68 65 20 63 6f 6d 6d 61 |s from t|he comma|
|00000af0| 6e 64 20 6c 69 6e 65 2e | 0a 58 2d 2d 2d 20 31 2c |nd line.|.X--- 1,|
|00000b00| 38 20 2d 2d 2d 2d 0a 58 | 20 20 2f 2a 0a 58 20 20 |8 ----.X|  /*.X  |
|00000b10| 20 2a 20 74 63 70 75 74 | 2e 63 09 46 69 6e 64 20 | * tcput|.c.Find |
|00000b20| 74 68 65 20 67 69 76 65 | 6e 20 74 65 72 6d 69 6e |the give|n termin|
|00000b30| 61 6c 20 63 61 70 61 62 | 69 6c 69 74 79 20 69 6e |al capab|ility in|
|00000b40| 20 74 68 65 20 74 65 72 | 6d 63 61 70 20 64 61 74 | the ter|mcap dat|
|00000b50| 61 62 61 73 65 2c 0a 58 | 20 20 20 2a 09 09 69 6e |abase,.X|   *..in|
|00000b60| 74 65 72 70 65 74 20 69 | 74 2c 20 61 6e 64 20 70 |terpet i|t, and p|
|00000b70| 72 69 6e 74 20 69 74 20 | 74 6f 20 74 68 65 20 74 |rint it |to the t|
|00000b80| 65 72 6d 69 6e 61 6c 2e | 20 20 52 61 77 20 6d 6f |erminal.|  Raw mo|
|00000b90| 64 65 20 69 73 20 75 73 | 65 64 0a 58 21 20 20 2a |de is us|ed.X!  *|
|00000ba0| 09 09 77 68 65 6e 20 70 | 72 69 6e 74 69 6e 67 20 |..when p|rinting |
|00000bb0| 74 6f 20 61 76 6f 69 64 | 20 73 79 73 74 65 6d 2d |to avoid| system-|
|00000bc0| 6c 65 76 65 6c 20 6d 61 | 70 70 69 6e 67 73 2c 20 |level ma|ppings, |
|00000bd0| 75 6e 6c 65 73 73 20 73 | 75 63 68 0a 58 21 20 20 |unless s|uch.X!  |
|00000be0| 2a 09 09 61 20 63 68 61 | 6e 67 65 20 69 73 6e 27 |*..a cha|nge isn'|
|00000bf0| 74 20 73 75 70 70 6f 72 | 74 65 64 20 28 69 2e 65 |t suppor|ted (i.e|
|00000c00| 2e 2c 20 61 20 73 6f 63 | 6b 65 74 20 69 73 20 69 |., a soc|ket is i|
|00000c10| 6e 20 75 73 65 2e 29 0a | 58 20 20 20 2a 0a 58 20 |n use.).|X   *.X |
|00000c20| 20 20 2a 09 09 53 69 6d | 69 6c 61 72 20 74 6f 20 |  *..Sim|ilar to |
|00000c30| 74 70 75 74 20 6f 6e 20 | 53 59 53 56 20 75 6e 69 |tput on |SYSV uni|
|00000c40| 78 2c 20 62 75 74 20 64 | 6f 65 73 6e 27 74 20 61 |x, but d|oesn't a|
|00000c50| 6c 6c 6f 77 20 69 6e 73 | 74 61 6e 74 69 61 74 69 |llow ins|tantiati|
|00000c60| 6f 6e 0a 58 20 20 20 2a | 09 09 6f 66 20 70 61 72 |on.X   *|..of par|
|00000c70| 61 6d 65 74 65 72 20 73 | 74 72 69 6e 67 73 20 66 |ameter s|trings f|
|00000c80| 72 6f 6d 20 74 68 65 20 | 63 6f 6d 6d 61 6e 64 20 |rom the |command |
|00000c90| 6c 69 6e 65 2e 0a 58 2a | 2a 2a 2a 2a 2a 2a 2a 2a |line..X*|********|
|00000ca0| 2a 2a 2a 2a 2a 2a 0a 58 | 2a 2a 2a 20 31 32 2c 32 |******.X|*** 12,2|
|00000cb0| 31 20 2a 2a 2a 2a 0a 58 | 20 20 23 69 6e 63 6c 75 |1 ****.X|  #inclu|
|00000cc0| 64 65 09 3c 73 74 64 69 | 6f 2e 68 3e 0a 58 20 20 |de.<stdi|o.h>.X  |
|00000cd0| 23 69 6e 63 6c 75 64 65 | 09 3c 73 67 74 74 79 2e |#include|.<sgtty.|
|00000ce0| 68 3e 0a 58 20 20 23 69 | 6e 63 6c 75 64 65 09 3c |h>.X  #i|nclude.<|
|00000cf0| 73 79 73 2f 69 6f 63 74 | 6c 2e 68 3e 0a 58 20 20 |sys/ioct|l.h>.X  |
|00000d00| 0a 58 20 20 23 64 65 66 | 69 6e 65 09 09 50 52 4f |.X  #def|ine..PRO|
|00000d10| 47 09 09 22 74 63 70 75 | 74 22 0a 58 20 20 0a 58 |G.."tcpu|t".X  .X|
|00000d20| 21 20 76 6f 69 64 09 09 | 64 6f 5f 61 72 67 73 28 |! void..|do_args(|
|00000d30| 63 68 61 72 20 2a 2a 29 | 3b 0a 58 20 20 76 6f 69 |char **)|;.X  voi|
|00000d40| 64 09 09 75 73 61 67 65 | 28 29 3b 0a 58 20 20 63 |d..usage|();.X  c|
|00000d50| 68 61 72 09 09 2a 67 65 | 74 65 6e 76 28 29 3b 0a |har..*ge|tenv();.|
|00000d60| 58 20 20 0a 58 2d 2d 2d | 20 31 33 2c 32 35 20 2d |X  .X---| 13,25 -|
|00000d70| 2d 2d 2d 0a 58 20 20 23 | 69 6e 63 6c 75 64 65 09 |---.X  #|include.|
|00000d80| 3c 73 74 64 69 6f 2e 68 | 3e 0a 58 20 20 23 69 6e |<stdio.h|>.X  #in|
|00000d90| 63 6c 75 64 65 09 3c 73 | 67 74 74 79 2e 68 3e 0a |clude.<s|gtty.h>.|
|00000da0| 58 20 20 23 69 6e 63 6c | 75 64 65 09 3c 73 79 73 |X  #incl|ude.<sys|
|00000db0| 2f 69 6f 63 74 6c 2e 68 | 3e 0a 58 2b 20 23 69 6e |/ioctl.h|>.X+ #in|
|00000dc0| 63 6c 75 64 65 09 3c 65 | 72 72 6e 6f 2e 68 3e 0a |clude.<e|rrno.h>.|
|00000dd0| 58 20 20 0a 58 2b 20 65 | 78 74 65 72 6e 09 09 65 |X  .X+ e|xtern..e|
|00000de0| 72 72 6e 6f 3b 0a 58 2b | 20 0a 58 20 20 23 64 65 |rrno;.X+| .X  #de|
|00000df0| 66 69 6e 65 09 09 50 52 | 4f 47 09 09 22 74 63 70 |fine..PR|OG.."tcp|
|00000e00| 75 74 22 0a 58 20 20 0a | 58 21 20 76 6f 69 64 09 |ut".X  .|X! void.|
|00000e10| 09 64 6f 5f 61 72 67 73 | 28 29 3b 0a 58 20 20 76 |.do_args|();.X  v|
|00000e20| 6f 69 64 09 09 75 73 61 | 67 65 28 29 3b 0a 58 20 |oid..usa|ge();.X |
|00000e30| 20 63 68 61 72 09 09 2a | 67 65 74 65 6e 76 28 29 | char..*|getenv()|
|00000e40| 3b 0a 58 20 20 0a 58 2a | 2a 2a 2a 2a 2a 2a 2a 2a |;.X  .X*|********|
|00000e50| 2a 2a 2a 2a 2a 2a 0a 58 | 2a 2a 2a 20 32 35 2c 33 |******.X|*** 25,3|
|00000e60| 31 20 2a 2a 2a 2a 0a 58 | 20 20 0a 58 20 20 69 6e |1 ****.X|  .X  in|
|00000e70| 74 09 09 6d 70 75 74 63 | 28 29 3b 0a 58 20 20 0a |t..mputc|();.X  .|
|00000e80| 58 21 20 6d 61 69 6e 28 | 69 6e 74 20 61 72 67 63 |X! main(|int argc|
|00000e90| 2c 20 63 68 61 72 20 2a | 2a 61 72 67 76 29 0a 58 |, char *|*argv).X|
|00000ea0| 20 20 7b 0a 58 20 20 09 | 69 6e 74 09 76 61 6c 3b |  {.X  .|int.val;|
|00000eb0| 0a 58 20 20 09 63 68 61 | 72 09 2a 63 70 20 3d 20 |.X  .cha|r.*cp = |
|00000ec0| 62 70 3b 0a 58 2d 2d 2d | 20 32 39 2c 33 37 20 2d |bp;.X---| 29,37 -|
|00000ed0| 2d 2d 2d 0a 58 20 20 0a | 58 20 20 69 6e 74 09 09 |---.X  .|X  int..|
|00000ee0| 6d 70 75 74 63 28 29 3b | 0a 58 20 20 0a 58 21 20 |mputc();|.X  .X! |
|00000ef0| 6d 61 69 6e 28 61 72 67 | 63 2c 20 61 72 67 76 29 |main(arg|c, argv)|
|00000f00| 0a 58 21 20 69 6e 74 20 | 61 72 67 63 3b 0a 58 21 |.X! int |argc;.X!|
|00000f10| 20 63 68 61 72 20 2a 2a | 61 72 67 76 3b 0a 58 20 | char **|argv;.X |
|00000f20| 20 7b 0a 58 20 20 09 69 | 6e 74 09 76 61 6c 3b 0a | {.X  .i|nt.val;.|
|00000f30| 58 20 20 09 63 68 61 72 | 09 2a 63 70 20 3d 20 62 |X  .char|.*cp = b|
|00000f40| 70 3b 0a 58 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |p;.X****|********|
|00000f50| 2a 2a 2a 0a 58 2a 2a 2a | 20 35 30 2c 35 36 20 2a |***.X***| 50,56 *|
|00000f60| 2a 2a 2a 0a 58 20 20 7d | 0a 58 20 20 0a 58 20 20 |***.X  }|.X  .X  |
|00000f70| 76 6f 69 64 0a 58 21 20 | 64 6f 5f 61 72 67 73 28 |void.X! |do_args(|
|00000f80| 63 68 61 72 20 2a 2a 61 | 72 67 76 29 0a 58 20 20 |char **a|rgv).X  |
|00000f90| 7b 0a 58 20 20 09 66 6f | 72 20 28 2b 2b 61 72 67 |{.X  .fo|r (++arg|
|00000fa0| 76 3b 20 2a 61 72 67 76 | 20 21 3d 20 4e 55 4c 4c |v; *argv| != NULL|
|00000fb0| 20 26 26 20 2a 2a 61 72 | 67 76 20 3d 3d 20 27 2d | && **ar|gv == '-|
|00000fc0| 27 3b 20 2b 2b 61 72 67 | 76 29 20 73 77 69 74 63 |'; ++arg|v) switc|
|00000fd0| 68 28 2a 2b 2b 2a 61 72 | 67 76 29 20 7b 0a 58 20 |h(*++*ar|gv) {.X |
|00000fe0| 20 09 63 61 73 65 20 27 | 54 27 3a 0a 58 2d 2d 2d | .case '|T':.X---|
|00000ff0| 20 35 36 2c 36 33 20 2d | 2d 2d 2d 0a 58 20 20 7d | 56,63 -|---.X  }|
|00001000| 0a 58 20 20 0a 58 20 20 | 76 6f 69 64 0a 58 21 20 |.X  .X  |void.X! |
|00001010| 64 6f 5f 61 72 67 73 28 | 61 72 67 76 29 0a 58 21 |do_args(|argv).X!|
|00001020| 20 63 68 61 72 20 2a 2a | 61 72 67 76 3b 0a 58 20 | char **|argv;.X |
|00001030| 20 7b 0a 58 20 20 09 66 | 6f 72 20 28 2b 2b 61 72 | {.X  .f|or (++ar|
|00001040| 67 76 3b 20 2a 61 72 67 | 76 20 21 3d 20 4e 55 4c |gv; *arg|v != NUL|
|00001050| 4c 20 26 26 20 2a 2a 61 | 72 67 76 20 3d 3d 20 27 |L && **a|rgv == '|
|00001060| 2d 27 3b 20 2b 2b 61 72 | 67 76 29 20 73 77 69 74 |-'; ++ar|gv) swit|
|00001070| 63 68 28 2a 2b 2b 2a 61 | 72 67 76 29 20 7b 0a 58 |ch(*++*a|rgv) {.X|
|00001080| 20 20 09 63 61 73 65 20 | 27 54 27 3a 0a 58 2a 2a |  .case |'T':.X**|
|00001090| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 0a 58 2a |********|*****.X*|
|000010a0| 2a 2a 20 37 36 2c 38 32 | 20 2a 2a 2a 2a 0a 58 20 |** 76,82| ****.X |
|000010b0| 20 09 65 78 69 74 28 31 | 29 3b 0a 58 20 20 7d 0a | .exit(1|);.X  }.|
|000010c0| 58 20 20 0a 58 21 20 6d | 70 75 74 63 28 69 6e 74 |X  .X! m|putc(int|
|000010d0| 20 63 29 0a 58 20 20 7b | 0a 58 20 20 09 70 75 74 | c).X  {|.X  .put|
|000010e0| 63 68 61 72 28 63 29 3b | 0a 58 20 20 09 72 65 74 |char(c);|.X  .ret|
|000010f0| 75 72 6e 20 30 3b 0a 58 | 2d 2d 2d 20 38 33 2c 38 |urn 0;.X|--- 83,8|
|00001100| 39 20 2d 2d 2d 2d 0a 58 | 20 20 09 65 78 69 74 28 |9 ----.X|  .exit(|
|00001110| 31 29 3b 0a 58 20 20 7d | 0a 58 20 20 0a 58 21 20 |1);.X  }|.X  .X! |
|00001120| 6d 70 75 74 63 28 63 29 | 0a 58 20 20 7b 0a 58 20 |mputc(c)|.X  {.X |
|00001130| 20 09 70 75 74 63 68 61 | 72 28 63 29 3b 0a 58 20 | .putcha|r(c);.X |
|00001140| 20 09 72 65 74 75 72 6e | 20 30 3b 0a 58 2a 2a 2a | .return| 0;.X***|
|00001150| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 0a 58 2a 2a |********|****.X**|
|00001160| 2a 20 38 36 2c 39 37 20 | 2a 2a 2a 2a 0a 58 20 20 |* 86,97 |****.X  |
|00001170| 7b 0a 58 20 20 09 73 74 | 72 75 63 74 20 73 67 74 |{.X  .st|ruct sgt|
|00001180| 74 79 62 09 70 6f 72 74 | 3b 0a 58 20 20 0a 58 21 |tyb.port|;.X  .X!|
|00001190| 20 09 69 66 20 28 69 6f | 63 74 6c 28 30 2c 20 54 | .if (io|ctl(0, T|
|000011a0| 49 4f 43 47 45 54 50 2c | 20 26 70 6f 72 74 29 20 |IOCGETP,| &port) |
|000011b0| 3c 20 30 29 20 7b 0a 58 | 20 20 09 09 70 65 72 72 |< 0) {.X|  ..perr|
|000011c0| 6f 72 28 22 72 61 77 3a | 20 73 74 64 69 6e 22 29 |or("raw:| stdin")|
|000011d0| 3b 0a 58 20 20 09 09 65 | 78 69 74 28 31 29 3b 0a |;.X  ..e|xit(1);.|
|000011e0| 58 20 20 09 7d 0a 58 20 | 20 09 70 6f 72 74 2e 73 |X  .}.X | .port.s|
|000011f0| 67 5f 66 6c 61 67 73 20 | 7c 3d 20 52 41 57 3b 0a |g_flags ||= RAW;.|
|00001200| 58 21 20 09 69 66 20 28 | 69 6f 63 74 6c 28 30 2c |X! .if (|ioctl(0,|
|00001210| 20 54 49 4f 43 53 45 54 | 50 2c 20 26 70 6f 72 74 | TIOCSET|P, &port|
|00001220| 29 20 3c 20 30 29 20 7b | 0a 58 20 20 09 09 70 65 |) < 0) {|.X  ..pe|
|00001230| 72 72 6f 72 28 22 72 61 | 77 3a 20 73 74 64 69 6e |rror("ra|w: stdin|
|00001240| 22 29 3b 0a 58 20 20 09 | 09 65 78 69 74 28 31 29 |");.X  .|.exit(1)|
|00001250| 3b 0a 58 20 20 09 7d 0a | 58 2d 2d 2d 20 39 33 2c |;.X  .}.|X--- 93,|
|00001260| 31 30 34 20 2d 2d 2d 2d | 0a 58 20 20 7b 0a 58 20 |104 ----|.X  {.X |
|00001270| 20 09 73 74 72 75 63 74 | 20 73 67 74 74 79 62 09 | .struct| sgttyb.|
|00001280| 70 6f 72 74 3b 0a 58 20 | 20 0a 58 21 20 09 69 66 |port;.X | .X! .if|
|00001290| 20 28 69 6f 63 74 6c 28 | 30 2c 20 54 49 4f 43 47 | (ioctl(|0, TIOCG|
|000012a0| 45 54 50 2c 20 26 70 6f | 72 74 29 20 3c 20 30 20 |ETP, &po|rt) < 0 |
|000012b0| 26 26 20 65 72 72 6e 6f | 20 21 3d 20 45 4f 50 4e |&& errno| != EOPN|
|000012c0| 4f 54 53 55 50 50 29 20 | 7b 0a 58 20 20 09 09 70 |OTSUPP) |{.X  ..p|
|000012d0| 65 72 72 6f 72 28 22 72 | 61 77 3a 20 73 74 64 69 |error("r|aw: stdi|
|000012e0| 6e 22 29 3b 0a 58 20 20 | 09 09 65 78 69 74 28 31 |n");.X  |..exit(1|
|000012f0| 29 3b 0a 58 20 20 09 7d | 0a 58 20 20 09 70 6f 72 |);.X  .}|.X  .por|
|00001300| 74 2e 73 67 5f 66 6c 61 | 67 73 20 7c 3d 20 52 41 |t.sg_fla|gs |= RA|
|00001310| 57 3b 0a 58 21 20 09 69 | 66 20 28 69 6f 63 74 6c |W;.X! .i|f (ioctl|
|00001320| 28 30 2c 20 54 49 4f 43 | 53 45 54 50 2c 20 26 70 |(0, TIOC|SETP, &p|
|00001330| 6f 72 74 29 20 3c 20 30 | 20 26 26 20 65 72 72 6e |ort) < 0| && errn|
|00001340| 6f 20 21 3d 20 45 4f 50 | 4e 4f 54 53 55 50 50 29 |o != EOP|NOTSUPP)|
|00001350| 20 7b 0a 58 20 20 09 09 | 70 65 72 72 6f 72 28 22 | {.X  ..|perror("|
|00001360| 72 61 77 3a 20 73 74 64 | 69 6e 22 29 3b 0a 58 20 |raw: std|in");.X |
|00001370| 20 09 09 65 78 69 74 28 | 31 29 3b 0a 58 20 20 09 | ..exit(|1);.X  .|
|00001380| 7d 0a 58 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |}.X*****|********|
|00001390| 2a 2a 0a 58 2a 2a 2a 20 | 31 30 31 2c 31 31 32 20 |**.X*** |101,112 |
|000013a0| 2a 2a 2a 2a 0a 58 20 20 | 7b 0a 58 20 20 09 73 74 |****.X  |{.X  .st|
|000013b0| 72 75 63 74 20 73 67 74 | 74 79 62 09 70 6f 72 74 |ruct sgt|tyb.port|
|000013c0| 3b 0a 58 20 20 0a 58 21 | 20 09 69 66 20 28 69 6f |;.X  .X!| .if (io|
|000013d0| 63 74 6c 28 30 2c 20 54 | 49 4f 43 47 45 54 50 2c |ctl(0, T|IOCGETP,|
|000013e0| 20 26 70 6f 72 74 29 20 | 3c 20 30 29 20 7b 0a 58 | &port) |< 0) {.X|
|000013f0| 20 20 09 09 70 65 72 72 | 6f 72 28 22 6e 6f 72 61 |  ..perr|or("nora|
|00001400| 77 3a 20 73 74 64 69 6e | 22 29 3b 0a 58 20 20 09 |w: stdin|");.X  .|
|00001410| 09 65 78 69 74 28 31 29 | 3b 0a 58 20 20 09 7d 0a |.exit(1)|;.X  .}.|
|00001420| 58 20 20 09 70 6f 72 74 | 2e 73 67 5f 66 6c 61 67 |X  .port|.sg_flag|
|00001430| 73 20 26 3d 20 7e 52 41 | 57 3b 0a 58 21 20 09 69 |s &= ~RA|W;.X! .i|
|00001440| 66 20 28 69 6f 63 74 6c | 28 30 2c 20 54 49 4f 43 |f (ioctl|(0, TIOC|
|00001450| 53 45 54 50 2c 20 26 70 | 6f 72 74 29 20 3c 20 30 |SETP, &p|ort) < 0|
|00001460| 29 20 7b 0a 58 20 20 09 | 09 70 65 72 72 6f 72 28 |) {.X  .|.perror(|
|00001470| 22 6e 6f 72 61 77 3a 20 | 73 74 64 69 6e 22 29 3b |"noraw: |stdin");|
|00001480| 0a 58 20 20 09 09 65 78 | 69 74 28 31 29 3b 0a 58 |.X  ..ex|it(1);.X|
|00001490| 20 20 09 7d 0a 58 2d 2d | 2d 20 31 30 38 2c 31 31 |  .}.X--|- 108,11|
|000014a0| 39 20 2d 2d 2d 2d 0a 58 | 20 20 7b 0a 58 20 20 09 |9 ----.X|  {.X  .|
|000014b0| 73 74 72 75 63 74 20 73 | 67 74 74 79 62 09 70 6f |struct s|gttyb.po|
|000014c0| 72 74 3b 0a 58 20 20 0a | 58 21 20 09 69 66 20 28 |rt;.X  .|X! .if (|
|000014d0| 69 6f 63 74 6c 28 30 2c | 20 54 49 4f 43 47 45 54 |ioctl(0,| TIOCGET|
|000014e0| 50 2c 20 26 70 6f 72 74 | 29 20 3c 20 30 20 26 26 |P, &port|) < 0 &&|
|000014f0| 20 65 72 72 6e 6f 20 21 | 3d 20 45 4f 50 4e 4f 54 | errno !|= EOPNOT|
|00001500| 53 55 50 50 29 20 7b 0a | 58 20 20 09 09 70 65 72 |SUPP) {.|X  ..per|
|00001510| 72 6f 72 28 22 6e 6f 72 | 61 77 3a 20 73 74 64 69 |ror("nor|aw: stdi|
|00001520| 6e 22 29 3b 0a 58 20 20 | 09 09 65 78 69 74 28 31 |n");.X  |..exit(1|
|00001530| 29 3b 0a 58 20 20 09 7d | 0a 58 20 20 09 70 6f 72 |);.X  .}|.X  .por|
|00001540| 74 2e 73 67 5f 66 6c 61 | 67 73 20 26 3d 20 7e 52 |t.sg_fla|gs &= ~R|
|00001550| 41 57 3b 0a 58 21 20 09 | 69 66 20 28 69 6f 63 74 |AW;.X! .|if (ioct|
|00001560| 6c 28 30 2c 20 54 49 4f | 43 53 45 54 50 2c 20 26 |l(0, TIO|CSETP, &|
|00001570| 70 6f 72 74 29 20 3c 20 | 30 20 26 26 20 65 72 72 |port) < |0 && err|
|00001580| 6e 6f 20 21 3d 20 45 4f | 50 4e 4f 54 53 55 50 50 |no != EO|PNOTSUPP|
|00001590| 29 20 7b 0a 58 20 20 09 | 09 70 65 72 72 6f 72 28 |) {.X  .|.perror(|
|000015a0| 22 6e 6f 72 61 77 3a 20 | 73 74 64 69 6e 22 29 3b |"noraw: |stdin");|
|000015b0| 0a 58 20 20 09 09 65 78 | 69 74 28 31 29 3b 0a 58 |.X  ..ex|it(1);.X|
|000015c0| 20 20 09 7d 0a 45 4e 44 | 5f 4f 46 5f 46 49 4c 45 |  .}.END|_OF_FILE|
|000015d0| 0a 20 20 69 66 20 74 65 | 73 74 20 33 30 34 39 20 |.  if te|st 3049 |
|000015e0| 2d 6e 65 20 60 77 63 20 | 2d 63 20 3c 27 50 41 54 |-ne `wc |-c <'PAT|
|000015f0| 43 48 30 31 27 60 3b 20 | 74 68 65 6e 0a 20 20 20 |CH01'`; |then.   |
|00001600| 20 65 63 68 6f 20 73 68 | 61 72 3a 20 5c 22 27 50 | echo sh|ar: \"'P|
|00001610| 41 54 43 48 30 31 27 5c | 22 20 75 6e 70 61 63 6b |ATCH01'\|" unpack|
|00001620| 65 64 20 77 69 74 68 20 | 77 72 6f 6e 67 20 73 69 |ed with |wrong si|
|00001630| 7a 65 21 0a 20 20 66 69 | 0a 20 20 23 20 65 6e 64 |ze!.  fi|.  # end|
|00001640| 20 6f 66 20 27 50 41 54 | 43 48 30 31 27 0a 66 69 | of 'PAT|CH01'.fi|
|00001650| 0a 65 63 68 6f 20 73 68 | 61 72 3a 20 45 6e 64 20 |.echo sh|ar: End |
|00001660| 6f 66 20 61 72 63 68 69 | 76 65 2e 0a 65 78 69 74 |of archi|ve..exit|
|00001670| 20 30 0a 65 78 69 74 20 | 30 20 23 20 4a 75 73 74 | 0.exit |0 # Just|
|00001680| 20 69 6e 20 63 61 73 65 | 2e 2e 2e 0a 2d 2d 20 0a | in case|....-- .|
|00001690| 4b 65 6e 74 20 4c 61 6e | 64 66 69 65 6c 64 20 20 |Kent Lan|dfield  |
|000016a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000016b0| 20 49 4e 54 45 52 4e 45 | 54 3a 20 6b 65 6e 74 40 | INTERNE|T: kent@|
|000016c0| 73 70 61 72 6b 79 2e 49 | 4d 44 2e 53 74 65 72 6c |sparky.I|MD.Sterl|
|000016d0| 69 6e 67 2e 43 4f 4d 0a | 53 74 65 72 6c 69 6e 67 |ing.COM.|Sterling|
|000016e0| 20 53 6f 66 74 77 61 72 | 65 2c 20 49 4d 44 20 20 | Softwar|e, IMD  |
|000016f0| 20 20 20 20 20 20 20 20 | 20 55 55 43 50 3a 20 20 |        | UUCP:  |
|00001700| 20 20 20 75 75 6e 65 74 | 21 73 70 61 72 6b 79 21 |   uunet|!sparky!|
|00001710| 6b 65 6e 74 0a 50 68 6f | 6e 65 3a 20 20 20 20 28 |kent.Pho|ne:    (|
|00001720| 34 30 32 29 20 32 39 31 | 2d 38 33 30 30 20 20 20 |402) 291|-8300   |
|00001730| 20 20 20 20 20 20 46 41 | 58 3a 20 20 20 20 20 20 |      FA|X:      |
|00001740| 28 34 30 32 29 20 32 39 | 31 2d 34 33 36 32 0a 50 |(402) 29|1-4362.P|
|00001750| 6c 65 61 73 65 20 73 65 | 6e 64 20 63 6f 6d 70 2e |lease se|nd comp.|
|00001760| 73 6f 75 72 63 65 73 2e | 6d 69 73 63 2d 72 65 6c |sources.|misc-rel|
|00001770| 61 74 65 64 20 6d 61 69 | 6c 20 74 6f 20 6b 65 6e |ated mai|l to ken|
|00001780| 74 40 75 75 6e 65 74 2e | 75 75 2e 6e 65 74 2e 0a |t@uunet.|uu.net..|
+--------+-------------------------+-------------------------+--------+--------+