/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / usenet / altsrcs / 2 / 2024

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 46 72 6f 6d 3a 20 62 72 | 6e 73 74 6e 64 40 6b 72 |From: br|nstnd@kr|
|00000010| 61 6d 64 65 6e 2e 61 63 | 66 2e 6e 79 75 2e 65 64 |amden.ac|f.nyu.ed|
|00000020| 75 20 28 44 61 6e 20 42 | 65 72 6e 73 74 65 69 6e |u (Dan B|ernstein|
|00000030| 29 0a 4e 65 77 73 67 72 | 6f 75 70 73 3a 20 61 6c |).Newsgr|oups: al|
|00000040| 74 2e 73 6f 75 72 63 65 | 73 0a 53 75 62 6a 65 63 |t.source|s.Subjec|
|00000050| 74 3a 20 70 6d 6c 69 6e | 65 64 20 31 2e 35 20 2d |t: pmlin|ed 1.5 -|
|00000060| 20 74 68 65 20 70 6f 6f | 72 20 6d 61 6e 27 73 20 | the poo|r man's |
|00000070| 6c 69 6e 65 20 64 69 73 | 63 69 70 6c 69 6e 65 0a |line dis|cipline.|
|00000080| 4d 65 73 73 61 67 65 2d | 49 44 3a 20 3c 32 34 30 |Message-|ID: <240|
|00000090| 37 33 3a 4e 6f 76 34 31 | 34 3a 34 33 3a 34 39 39 |73:Nov41|4:43:499|
|000000a0| 30 40 6b 72 61 6d 64 65 | 6e 2e 61 63 66 2e 6e 79 |0@kramde|n.acf.ny|
|000000b0| 75 2e 65 64 75 3e 0a 44 | 61 74 65 3a 20 34 20 4e |u.edu>.D|ate: 4 N|
|000000c0| 6f 76 20 39 30 20 31 34 | 3a 34 33 3a 34 39 20 47 |ov 90 14|:43:49 G|
|000000d0| 4d 54 0a 0a 54 68 69 73 | 20 69 73 20 70 6d 6c 69 |MT..This| is pmli|
|000000e0| 6e 65 64 20 31 2e 35 2c | 20 74 68 65 20 70 6f 6f |ned 1.5,| the poo|
|000000f0| 72 20 6d 61 6e 27 73 20 | 6c 69 6e 65 20 64 69 73 |r man's |line dis|
|00000100| 63 69 70 6c 69 6e 65 2e | 20 4c 69 6b 65 20 65 76 |cipline.| Like ev|
|00000110| 65 72 79 20 75 74 69 6c | 69 74 79 0a 69 6e 20 74 |ery util|ity.in t|
|00000120| 68 65 20 70 6f 6f 72 20 | 6d 61 6e 27 73 20 73 65 |he poor |man's se|
|00000130| 72 69 65 73 2c 20 70 6d | 6c 69 6e 65 64 20 68 61 |ries, pm|lined ha|
|00000140| 73 20 73 6f 6d 65 20 66 | 65 61 74 75 72 65 20 6d |s some f|eature m|
|00000150| 69 73 73 69 6e 67 20 66 | 72 6f 6d 20 61 6c 6d 6f |issing f|rom almo|
|00000160| 73 74 0a 61 6c 6c 20 74 | 68 65 20 63 6f 6d 70 65 |st.all t|he compe|
|00000170| 74 69 74 69 6f 6e 3a 20 | 69 6e 20 74 68 69 73 20 |tition: |in this |
|00000180| 63 61 73 65 2c 20 74 68 | 65 20 61 62 69 6c 69 74 |case, th|e abilit|
|00000190| 79 20 74 6f 20 6d 61 6b | 65 20 79 6f 75 72 20 42 |y to mak|e your B|
|000001a0| 53 44 20 73 79 73 74 65 | 6d 0a 66 65 65 6c 20 6c |SD syste|m.feel l|
|000001b0| 69 6b 65 20 61 20 67 6f | 6f 64 20 6f 6c 64 20 49 |ike a go|od old I|
|000001c0| 42 4d 20 56 4d 2f 43 4d | 53 20 62 6f 78 2e 0a 0a |BM VM/CM|S box...|
|000001d0| 70 6d 6c 69 6e 65 64 20 | 6c 65 74 73 20 79 6f 75 |pmlined |lets you|
|000001e0| 20 65 64 69 74 20 69 6e | 70 75 74 20 6c 69 6e 65 | edit in|put line|
|000001f0| 73 20 6f 6e 20 74 68 65 | 20 73 74 61 74 75 73 20 |s on the| status |
|00000200| 6c 69 6e 65 20 6f 66 20 | 79 6f 75 72 20 74 65 72 |line of |your ter|
|00000210| 6d 69 6e 61 6c 2e 0a 59 | 6f 75 20 63 61 6e 20 73 |minal..Y|ou can s|
|00000220| 77 69 74 63 68 20 62 65 | 74 77 65 65 6e 20 74 68 |witch be|tween th|
|00000230| 69 73 20 61 6e 64 20 74 | 68 65 20 6e 61 74 69 76 |is and t|he nativ|
|00000240| 65 20 74 74 79 20 6d 6f | 64 65 20 77 69 74 68 20 |e tty mo|de with |
|00000250| 5e 41 2e 20 70 6d 6c 69 | 6e 65 64 0a 73 68 6f 75 |^A. pmli|ned.shou|
|00000260| 6c 64 20 62 65 20 65 61 | 73 79 20 74 6f 20 70 6c |ld be ea|sy to pl|
|00000270| 61 79 20 77 69 74 68 2c | 20 75 6e 6c 69 6b 65 20 |ay with,| unlike |
|00000280| 6d 6f 73 74 20 6c 69 6e | 65 20 64 69 73 63 69 70 |most lin|e discip|
|00000290| 6c 69 6e 65 20 69 6d 70 | 6c 65 6d 65 6e 74 61 74 |line imp|lementat|
|000002a0| 69 6f 6e 73 0a 72 75 6e | 6e 69 6e 67 20 61 72 6f |ions.run|ning aro|
|000002b0| 75 6e 64 2e 20 46 65 65 | 6c 20 66 72 65 65 20 74 |und. Fee|l free t|
|000002c0| 6f 20 61 64 64 20 66 65 | 61 74 75 72 65 73 2e 0a |o add fe|atures..|
|000002d0| 0a 4e 65 77 20 74 6f 20 | 74 68 69 73 20 76 65 72 |.New to |this ver|
|000002e0| 73 69 6f 6e 20 6f 66 20 | 70 6d 6c 69 6e 65 64 20 |sion of |pmlined |
|000002f0| 61 72 65 20 63 75 72 73 | 6f 72 20 6d 6f 74 69 6f |are curs|or motio|
|00000300| 6e 20 77 69 74 68 69 6e | 20 74 68 65 20 6c 69 6e |n within| the lin|
|00000310| 65 20 61 6e 64 20 61 6e | 0a 65 61 73 79 2d 74 6f |e and an|.easy-to|
|00000320| 2d 75 73 65 20 63 6f 6d | 6d 61 6e 64 20 68 69 73 |-use com|mand his|
|00000330| 74 6f 72 79 2e 0a 0a 53 | 65 6e 64 20 63 6f 6d 6d |tory...S|end comm|
|00000340| 65 6e 74 73 20 74 6f 20 | 6d 65 20 6f 72 20 74 6f |ents to |me or to|
|00000350| 20 61 6c 74 2e 73 6f 75 | 72 63 65 73 2e 64 2e 0a | alt.sou|rces.d..|
|00000360| 0a 2d 2d 2d 44 61 6e 0a | 0a 23 21 20 2f 62 69 6e |.---Dan.|.#! /bin|
|00000370| 2f 73 68 0a 23 20 54 68 | 69 73 20 69 73 20 61 20 |/sh.# Th|is is a |
|00000380| 73 68 65 6c 6c 20 61 72 | 63 68 69 76 65 2e 20 20 |shell ar|chive.  |
|00000390| 52 65 6d 6f 76 65 20 61 | 6e 79 74 68 69 6e 67 20 |Remove a|nything |
|000003a0| 62 65 66 6f 72 65 20 74 | 68 69 73 20 6c 69 6e 65 |before t|his line|
|000003b0| 2c 20 74 68 65 6e 20 75 | 6e 70 61 63 6b 0a 23 20 |, then u|npack.# |
|000003c0| 69 74 20 62 79 20 73 61 | 76 69 6e 67 20 69 74 20 |it by sa|ving it |
|000003d0| 69 6e 74 6f 20 61 20 66 | 69 6c 65 20 61 6e 64 20 |into a f|ile and |
|000003e0| 74 79 70 69 6e 67 20 22 | 73 68 20 66 69 6c 65 22 |typing "|sh file"|
|000003f0| 2e 20 20 54 6f 20 6f 76 | 65 72 77 72 69 74 65 20 |.  To ov|erwrite |
|00000400| 65 78 69 73 74 69 6e 67 | 0a 23 20 66 69 6c 65 73 |existing|.# files|
|00000410| 2c 20 74 79 70 65 20 22 | 73 68 20 66 69 6c 65 20 |, type "|sh file |
|00000420| 2d 63 22 2e 20 20 59 6f | 75 20 63 61 6e 20 61 6c |-c".  Yo|u can al|
|00000430| 73 6f 20 66 65 65 64 20 | 74 68 69 73 20 61 73 20 |so feed |this as |
|00000440| 73 74 61 6e 64 61 72 64 | 20 69 6e 70 75 74 20 76 |standard| input v|
|00000450| 69 61 0a 23 20 75 6e 73 | 68 61 72 2c 20 6f 72 20 |ia.# uns|har, or |
|00000460| 62 79 20 74 79 70 69 6e | 67 20 22 73 68 20 3c 66 |by typin|g "sh <f|
|00000470| 69 6c 65 22 2c 20 65 2e | 67 2e 2e 20 20 49 66 20 |ile", e.|g..  If |
|00000480| 74 68 69 73 20 61 72 63 | 68 69 76 65 20 69 73 20 |this arc|hive is |
|00000490| 63 6f 6d 70 6c 65 74 65 | 2c 20 79 6f 75 0a 23 20 |complete|, you.# |
|000004a0| 77 69 6c 6c 20 73 65 65 | 20 74 68 65 20 66 6f 6c |will see| the fol|
|000004b0| 6c 6f 77 69 6e 67 20 6d | 65 73 73 61 67 65 20 61 |lowing m|essage a|
|000004c0| 74 20 74 68 65 20 65 6e | 64 3a 0a 23 09 09 22 45 |t the en|d:.#.."E|
|000004d0| 6e 64 20 6f 66 20 73 68 | 65 6c 6c 20 61 72 63 68 |nd of sh|ell arch|
|000004e0| 69 76 65 2e 22 0a 23 20 | 43 6f 6e 74 65 6e 74 73 |ive.".# |Contents|
|000004f0| 3a 20 20 52 45 41 44 4d | 45 20 70 6d 6c 69 6e 65 |:  READM|E pmline|
|00000500| 64 2e 63 20 74 65 72 6d | 63 61 70 0a 23 20 57 72 |d.c term|cap.# Wr|
|00000510| 61 70 70 65 64 20 62 79 | 20 62 72 6e 73 74 6e 64 |apped by| brnstnd|
|00000520| 40 6b 72 61 6d 64 65 6e | 20 6f 6e 20 53 75 6e 20 |@kramden| on Sun |
|00000530| 4e 6f 76 20 20 34 20 30 | 39 3a 33 37 3a 35 36 20 |Nov  4 0|9:37:56 |
|00000540| 31 39 39 30 0a 50 41 54 | 48 3d 2f 62 69 6e 3a 2f |1990.PAT|H=/bin:/|
|00000550| 75 73 72 2f 62 69 6e 3a | 2f 75 73 72 2f 75 63 62 |usr/bin:|/usr/ucb|
|00000560| 20 3b 20 65 78 70 6f 72 | 74 20 50 41 54 48 0a 69 | ; expor|t PATH.i|
|00000570| 66 20 74 65 73 74 20 2d | 66 20 27 52 45 41 44 4d |f test -|f 'READM|
|00000580| 45 27 20 2d 61 20 22 24 | 7b 31 7d 22 20 21 3d 20 |E' -a "$|{1}" != |
|00000590| 22 2d 63 22 20 3b 20 74 | 68 65 6e 20 0a 20 20 65 |"-c" ; t|hen .  e|
|000005a0| 63 68 6f 20 73 68 61 72 | 3a 20 57 69 6c 6c 20 6e |cho shar|: Will n|
|000005b0| 6f 74 20 63 6c 6f 62 62 | 65 72 20 65 78 69 73 74 |ot clobb|er exist|
|000005c0| 69 6e 67 20 66 69 6c 65 | 20 5c 22 27 52 45 41 44 |ing file| \"'READ|
|000005d0| 4d 45 27 5c 22 0a 65 6c | 73 65 0a 65 63 68 6f 20 |ME'\".el|se.echo |
|000005e0| 73 68 61 72 3a 20 45 78 | 74 72 61 63 74 69 6e 67 |shar: Ex|tracting|
|000005f0| 20 5c 22 27 52 45 41 44 | 4d 45 27 5c 22 20 5c 28 | \"'READ|ME'\" \(|
|00000600| 32 36 39 32 20 63 68 61 | 72 61 63 74 65 72 73 5c |2692 cha|racters\|
|00000610| 29 0a 73 65 64 20 22 73 | 2f 5e 58 2f 2f 22 20 3e |).sed "s|/^X//" >|
|00000620| 27 52 45 41 44 4d 45 27 | 20 3c 3c 27 45 4e 44 5f |'README'| <<'END_|
|00000630| 4f 46 5f 46 49 4c 45 27 | 0a 58 70 6d 6c 69 6e 65 |OF_FILE'|.Xpmline|
|00000640| 64 20 31 2e 35 2c 20 31 | 31 2f 34 2f 39 30 2e 0a |d 1.5, 1|1/4/90..|
|00000650| 58 50 6c 61 63 65 64 20 | 69 6e 74 6f 20 74 68 65 |XPlaced |into the|
|00000660| 20 70 75 62 6c 69 63 20 | 64 6f 6d 61 69 6e 20 62 | public |domain b|
|00000670| 79 20 44 61 6e 69 65 6c | 20 4a 2e 20 42 65 72 6e |y Daniel| J. Bern|
|00000680| 73 74 65 69 6e 2e 0a 58 | 43 6f 6d 6d 65 6e 74 73 |stein..X|Comments|
|00000690| 20 74 6f 20 68 69 6d 20 | 61 74 20 62 72 6e 73 74 | to him |at brnst|
|000006a0| 6e 64 40 6e 79 75 2e 65 | 64 75 2e 0a 58 0a 58 0a |nd@nyu.e|du..X.X.|
|000006b0| 58 54 68 69 73 20 69 73 | 20 70 6d 6c 69 6e 65 64 |XThis is| pmlined|
|000006c0| 2c 20 74 68 65 20 70 6f | 6f 72 20 6d 61 6e 27 73 |, the po|or man's|
|000006d0| 20 6c 69 6e 65 20 64 69 | 73 63 69 70 6c 69 6e 65 | line di|scipline|
|000006e0| 2e 0a 58 0a 58 70 6d 6c | 69 6e 65 64 20 70 72 6f |..X.Xpml|ined pro|
|000006f0| 76 69 64 65 73 20 61 20 | 74 74 79 20 65 64 69 74 |vides a |tty edit|
|00000700| 69 6e 67 20 6d 6f 64 65 | 20 74 68 61 74 20 73 68 |ing mode| that sh|
|00000710| 6f 75 6c 64 20 6d 61 6b | 65 20 66 6f 72 6d 65 72 |ould mak|e former|
|00000720| 20 49 42 4d 20 75 73 65 | 72 73 0a 58 66 65 65 6c | IBM use|rs.Xfeel|
|00000730| 20 72 69 67 68 74 20 61 | 74 20 68 6f 6d 65 2e 20 | right a|t home. |
|00000740| 59 6f 75 20 65 64 69 74 | 20 74 68 65 20 63 75 72 |You edit| the cur|
|00000750| 72 65 6e 74 20 6c 69 6e | 65 20 6f 6e 20 74 68 65 |rent lin|e on the|
|00000760| 20 73 74 61 74 75 73 20 | 6c 69 6e 65 0a 58 28 74 | status |line.X(t|
|00000770| 68 72 6f 75 67 68 20 73 | 74 64 65 72 72 29 2e 20 |hrough s|tderr). |
|00000780| 4c 6f 6e 67 20 6c 69 6e | 65 73 20 73 63 72 6f 6c |Long lin|es scrol|
|00000790| 6c 20 68 6f 72 69 7a 6f | 6e 74 61 6c 6c 79 2e 20 |l horizo|ntally. |
|000007a0| 57 68 65 6e 20 79 6f 75 | 20 70 72 65 73 73 20 72 |When you| press r|
|000007b0| 65 74 75 72 6e 2c 0a 58 | 70 6d 6c 69 6e 65 64 20 |eturn,.X|pmlined |
|000007c0| 73 65 6e 64 73 20 74 68 | 65 20 6c 69 6e 65 20 74 |sends th|e line t|
|000007d0| 6f 20 73 74 64 6f 75 74 | 2e 20 41 6c 6c 20 74 68 |o stdout|. All th|
|000007e0| 65 20 75 73 75 61 6c 20 | 65 64 69 74 69 6e 67 20 |e usual |editing |
|000007f0| 63 68 61 72 61 63 74 65 | 72 73 2c 0a 58 69 6e 63 |characte|rs,.Xinc|
|00000800| 6c 75 64 69 6e 67 20 5e | 55 2c 20 5e 57 2c 20 62 |luding ^|U, ^W, b|
|00000810| 61 63 6b 73 70 61 63 65 | 2c 20 64 65 6c 65 74 65 |ackspace|, delete|
|00000820| 2c 20 61 6e 64 20 5e 56 | 2c 20 77 6f 72 6b 20 6e |, and ^V|, work n|
|00000830| 6f 72 6d 61 6c 6c 79 2e | 20 5e 41 20 73 77 69 74 |ormally.| ^A swit|
|00000840| 63 68 65 73 0a 58 62 65 | 74 77 65 65 6e 20 74 68 |ches.Xbe|tween th|
|00000850| 69 73 20 65 64 69 74 69 | 6e 67 20 6d 6f 64 65 20 |is editi|ng mode |
|00000860| 61 6e 64 20 74 68 65 20 | 75 73 75 61 6c 20 74 74 |and the |usual tt|
|00000870| 79 20 6d 6f 64 65 2e 20 | 49 6e 20 74 68 69 73 20 |y mode. |In this |
|00000880| 76 65 72 73 69 6f 6e 2c | 20 79 6f 75 0a 58 61 6c |version,| you.Xal|
|00000890| 73 6f 20 67 65 74 20 5e | 48 20 61 6e 64 20 5e 4c |so get ^|H and ^L|
|000008a0| 20 74 6f 20 6d 6f 76 65 | 20 74 68 65 20 63 75 72 | to move| the cur|
|000008b0| 73 6f 72 20 62 61 63 6b | 20 61 6e 64 20 66 6f 72 |sor back| and for|
|000008c0| 74 68 20 77 69 74 68 69 | 6e 20 74 68 65 20 6c 69 |th withi|n the li|
|000008d0| 6e 65 2c 0a 58 61 6e 64 | 20 61 20 32 30 2d 6c 69 |ne,.Xand| a 20-li|
|000008e0| 6e 65 20 65 64 69 74 61 | 62 6c 65 20 68 69 73 74 |ne edita|ble hist|
|000008f0| 6f 72 79 20 77 69 74 68 | 20 5e 42 20 61 6e 64 20 |ory with| ^B and |
|00000900| 5e 46 2e 0a 58 0a 58 4f | 66 20 63 6f 75 72 73 65 |^F..X.XO|f course|
|00000910| 2c 20 70 6d 6c 69 6e 65 | 64 20 69 73 20 61 6c 73 |, pmline|d is als|
|00000920| 6f 20 74 68 65 20 73 6d | 61 6c 6c 65 73 74 20 6c |o the sm|allest l|
|00000930| 69 6e 65 20 64 69 73 63 | 69 70 6c 69 6e 65 20 69 |ine disc|ipline i|
|00000940| 6d 70 6c 65 6d 65 6e 74 | 61 74 69 6f 6e 0a 58 6b |mplement|ation.Xk|
|00000950| 6e 6f 77 6e 20 74 6f 20 | 6d 61 6e 2e 0a 58 0a 58 |nown to |man..X.X|
|00000960| 4f 74 68 65 72 20 74 68 | 61 6e 20 74 68 61 74 2c |Other th|an that,|
|00000970| 20 69 74 27 73 20 70 72 | 65 74 74 79 20 70 6f 6f | it's pr|etty poo|
|00000980| 72 2e 20 54 68 69 73 20 | 76 65 72 73 69 6f 6e 20 |r. This |version |
|00000990| 69 73 20 6a 75 73 74 20 | 61 20 70 72 6f 74 6f 74 |is just |a protot|
|000009a0| 79 70 65 2e 20 49 74 0a | 58 63 6f 75 6c 64 20 62 |ype. It.|Xcould b|
|000009b0| 65 20 6d 61 64 65 20 6d | 75 63 68 20 6d 6f 72 65 |e made m|uch more|
|000009c0| 20 65 66 66 69 63 69 65 | 6e 74 3b 20 74 68 65 72 | efficie|nt; ther|
|000009d0| 65 20 61 72 65 20 61 20 | 6c 6f 74 20 6f 66 20 66 |e are a |lot of f|
|000009e0| 65 61 74 75 72 65 73 20 | 6d 69 73 73 69 6e 67 2e |eatures |missing.|
|000009f0| 0a 58 46 65 65 6c 20 66 | 72 65 65 20 74 6f 20 70 |.XFeel f|ree to p|
|00000a00| 6c 61 79 20 77 69 74 68 | 20 69 74 2c 20 74 68 6f |lay with| it, tho|
|00000a10| 75 67 68 2e 20 54 68 65 | 20 63 6f 64 65 20 69 73 |ugh. The| code is|
|00000a20| 20 73 68 6f 72 74 20 61 | 6e 64 20 28 49 20 68 6f | short a|nd (I ho|
|00000a30| 70 65 29 20 65 61 73 79 | 0a 58 74 6f 20 75 6e 64 |pe) easy|.Xto und|
|00000a40| 65 72 73 74 61 6e 64 2e | 0a 58 0a 58 70 6d 6c 69 |erstand.|.X.Xpmli|
|00000a50| 6e 65 64 20 77 61 73 20 | 6f 72 69 67 69 6e 61 6c |ned was |original|
|00000a60| 6c 79 20 63 61 6c 6c 65 | 64 20 62 6f 74 77 61 6e |ly calle|d botwan|
|00000a70| 61 2e 20 49 74 20 77 61 | 73 20 6e 6f 74 20 6e 61 |a. It wa|s not na|
|00000a80| 6d 65 64 20 61 66 74 65 | 72 20 61 20 73 6d 61 6c |med afte|r a smal|
|00000a90| 6c 0a 58 41 66 72 69 63 | 61 6e 20 63 6f 75 6e 74 |l.XAfric|an count|
|00000aa0| 72 79 20 72 75 6d 6f 72 | 65 64 20 74 6f 20 6d 61 |ry rumor|ed to ma|
|00000ab0| 6e 75 66 61 63 74 75 72 | 65 20 63 6c 6f 6e 65 20 |nufactur|e clone |
|00000ac0| 49 42 4d 20 33 32 37 30 | 20 74 65 72 6d 69 6e 61 |IBM 3270| termina|
|00000ad0| 6c 73 2e 0a 58 0a 58 0a | 58 52 65 71 75 69 72 65 |ls..X.X.|XRequire|
|00000ae0| 6d 65 6e 74 73 3a 0a 58 | 0a 58 20 20 41 20 74 65 |ments:.X|.X  A te|
|00000af0| 72 6d 63 61 70 20 65 6e | 74 72 79 20 77 69 74 68 |rmcap en|try with|
|00000b00| 20 60 60 74 73 27 27 2c | 20 60 60 66 73 27 27 2c | ``ts'',| ``fs'',|
|00000b10| 20 61 6e 64 20 60 60 63 | 65 27 27 2e 20 45 6e 63 | and ``c|e''. Enc|
|00000b20| 6c 6f 73 65 64 20 69 73 | 20 61 20 67 65 6e 65 72 |losed is| a gener|
|00000b30| 69 63 0a 58 20 20 56 54 | 20 74 65 72 6d 63 61 70 |ic.X  VT| termcap|
|00000b40| 20 73 75 70 70 6f 72 74 | 69 6e 67 20 74 68 65 20 | support|ing the |
|00000b50| 73 74 61 74 75 73 20 6c | 69 6e 65 3b 20 79 6f 75 |status l|ine; you|
|00000b60| 20 6d 61 79 20 68 61 76 | 65 20 74 6f 20 72 65 77 | may hav|e to rew|
|00000b70| 72 69 74 65 20 79 6f 75 | 72 0a 58 20 20 74 65 72 |rite you|r.X  ter|
|00000b80| 6d 63 61 70 20 65 6e 74 | 72 79 20 61 6e 61 6c 6f |mcap ent|ry analo|
|00000b90| 67 6f 75 73 6c 79 2e 20 | 49 6e 20 74 68 69 73 20 |gously. |In this |
|00000ba0| 76 65 72 73 69 6f 6e 2c | 20 74 68 65 20 65 6e 74 |version,| the ent|
|00000bb0| 72 79 20 6d 75 73 74 20 | 61 6c 73 6f 20 68 61 76 |ry must |also hav|
|00000bc0| 65 0a 58 20 20 60 60 75 | 73 27 27 20 61 6e 64 20 |e.X  ``u|s'' and |
|00000bd0| 60 60 75 65 27 27 20 66 | 6f 72 20 74 68 65 20 63 |``ue'' f|or the c|
|00000be0| 75 72 73 6f 72 2e 0a 58 | 0a 58 20 20 54 68 65 20 |ursor..X|.X  The |
|00000bf0| 70 74 79 20 70 72 6f 67 | 72 61 6d 2c 20 66 6f 72 |pty prog|ram, for|
|00000c00| 20 75 73 65 20 61 73 20 | 64 65 73 63 72 69 62 65 | use as |describe|
|00000c10| 64 20 62 65 6c 6f 77 2e | 0a 58 0a 58 0a 58 54 6f |d below.|.X.X.XTo|
|00000c20| 20 75 73 65 20 70 6d 6c | 69 6e 65 64 2c 20 74 79 | use pml|ined, ty|
|00000c30| 70 65 20 74 68 65 20 66 | 6f 6c 6c 6f 77 69 6e 67 |pe the f|ollowing|
|00000c40| 3a 0a 58 0a 58 20 20 70 | 6d 6c 69 6e 65 64 20 7c |:.X.X  p|mlined ||
|00000c50| 20 70 74 79 20 24 53 48 | 45 4c 4c 0a 58 0a 58 49 | pty $SH|ELL.X.XI|
|00000c60| 74 20 73 68 6f 75 6c 64 | 20 66 65 65 6c 20 6a 75 |t should| feel ju|
|00000c70| 73 74 20 6c 69 6b 65 20 | 61 20 6e 6f 72 6d 61 6c |st like |a normal|
|00000c80| 20 73 68 65 6c 6c 2c 20 | 65 78 63 65 70 74 20 74 | shell, |except t|
|00000c90| 68 61 74 20 79 6f 75 20 | 65 64 69 74 20 6c 69 6e |hat you |edit lin|
|00000ca0| 65 73 20 6f 6e 0a 58 74 | 68 65 20 62 6f 74 74 6f |es on.Xt|he botto|
|00000cb0| 6d 20 6f 66 20 79 6f 75 | 72 20 73 63 72 65 65 6e |m of you|r screen|
|00000cc0| 20 62 65 66 6f 72 65 20 | 65 6e 74 65 72 69 6e 67 | before |entering|
|00000cd0| 20 74 68 65 6d 2e 20 49 | 66 20 79 6f 75 20 72 65 | them. I|f you re|
|00000ce0| 61 6c 6c 79 20 61 72 65 | 20 61 6e 20 49 42 4d 0a |ally are| an IBM.|
|00000cf0| 58 70 72 6f 67 72 61 6d | 6d 65 72 2c 20 79 6f 75 |Xprogram|mer, you|
|00000d00| 20 6d 69 67 68 74 20 66 | 65 65 6c 20 6d 6f 72 65 | might f|eel more|
|00000d10| 20 63 6f 6d 66 6f 72 74 | 61 62 6c 65 20 77 69 74 | comfort|able wit|
|00000d20| 68 20 61 20 73 68 65 6c | 6c 20 70 72 6f 6d 70 74 |h a shel|l prompt|
|00000d30| 20 6f 66 20 52 3b 0a 58 | 66 6f 6c 6c 6f 77 65 64 | of R;.X|followed|
|00000d40| 20 62 79 20 61 20 6e 65 | 77 6c 69 6e 65 2e 20 59 | by a ne|wline. Y|
|00000d50| 6f 75 20 6d 61 79 20 77 | 61 6e 74 20 74 6f 20 25 |ou may w|ant to %|
|00000d60| 20 61 6c 69 61 73 20 69 | 62 6d 20 27 70 6d 6c 69 | alias i|bm 'pmli|
|00000d70| 6e 65 64 20 7c 20 70 74 | 79 27 2e 0a 58 0a 58 41 |ned | pt|y'..X.XA|
|00000d80| 20 64 69 66 66 65 72 65 | 6e 74 20 75 73 65 20 6f | differe|nt use o|
|00000d90| 66 20 70 6d 6c 69 6e 65 | 64 20 69 73 20 74 6f 20 |f pmline|d is to |
|00000da0| 6d 61 6b 65 20 63 6c 65 | 61 6e 20 74 79 70 65 73 |make cle|an types|
|00000db0| 63 72 69 70 74 73 2e 20 | 49 66 20 79 6f 75 20 68 |cripts. |If you h|
|00000dc0| 61 76 65 20 74 68 65 0a | 58 73 63 72 69 70 74 20 |ave the.|Xscript |
|00000dd0| 63 6c 6f 6e 65 20 69 6e | 20 74 68 65 20 70 74 79 |clone in| the pty|
|00000de0| 20 70 61 63 6b 61 67 65 | 2c 0a 58 0a 58 20 20 70 | package|,.X.X  p|
|00000df0| 6d 6c 69 6e 65 64 20 7c | 20 73 63 72 69 70 74 0a |mlined || script.|
|00000e00| 58 0a 58 77 69 6c 6c 20 | 6c 65 74 20 79 6f 75 20 |X.Xwill |let you |
|00000e10| 63 6f 72 72 65 63 74 20 | 65 64 69 74 69 6e 67 20 |correct |editing |
|00000e20| 65 72 72 6f 72 73 20 62 | 65 66 6f 72 65 20 74 68 |errors b|efore th|
|00000e30| 65 79 20 65 6e 74 65 72 | 20 74 68 65 20 73 63 72 |ey enter| the scr|
|00000e40| 69 70 74 2e 0a 58 20 20 | 0a 58 0a 58 43 61 76 65 |ipt..X  |.X.XCave|
|00000e50| 61 74 73 3a 0a 58 0a 58 | 20 20 59 6f 75 20 68 61 |ats:.X.X|  You ha|
|00000e60| 76 65 20 74 6f 20 74 79 | 70 65 20 73 6f 6d 65 74 |ve to ty|pe somet|
|00000e70| 68 69 6e 67 20 61 66 74 | 65 72 20 74 68 65 20 66 |hing aft|er the f|
|00000e80| 69 6e 61 6c 20 5e 44 2c | 20 6f 72 20 70 6d 6c 69 |inal ^D,| or pmli|
|00000e90| 6e 65 64 20 77 69 6c 6c | 20 6e 6f 74 0a 58 20 20 |ned will| not.X  |
|00000ea0| 72 65 61 6c 69 7a 65 20 | 74 68 61 74 20 74 68 65 |realize |that the|
|00000eb0| 20 6f 75 74 70 75 74 20 | 68 61 73 20 65 6e 64 65 | output |has ende|
|00000ec0| 64 2e 0a 58 0a 58 20 20 | 70 6d 6c 69 6e 65 64 20 |d..X.X  |pmlined |
|00000ed0| 64 6f 65 73 20 6e 6f 74 | 20 72 65 61 63 74 20 61 |does not| react a|
|00000ee0| 75 74 6f 6d 61 74 69 63 | 61 6c 6c 79 20 74 6f 20 |utomatic|ally to |
|00000ef0| 63 68 61 6e 67 65 73 20 | 69 6e 20 74 68 65 20 74 |changes |in the t|
|00000f00| 74 79 20 6d 6f 64 65 2e | 20 57 68 65 6e 0a 58 20 |ty mode.| When.X |
|00000f10| 20 79 6f 75 20 72 75 6e | 20 76 69 2c 20 66 6f 72 | you run| vi, for|
|00000f20| 20 69 6e 73 74 61 6e 63 | 65 2c 20 79 6f 75 20 68 | instanc|e, you h|
|00000f30| 61 76 65 20 74 6f 20 72 | 65 6d 65 6d 62 65 72 20 |ave to r|emember |
|00000f40| 74 6f 20 74 79 70 65 20 | 5e 41 20 74 6f 20 75 73 |to type |^A to us|
|00000f50| 65 0a 58 20 20 63 68 61 | 72 61 63 74 65 72 2d 61 |e.X  cha|racter-a|
|00000f60| 74 2d 61 2d 74 69 6d 65 | 20 6d 6f 64 65 2e 20 41 |t-a-time| mode. A|
|00000f70| 20 73 6f 6d 65 77 68 61 | 74 20 6c 65 73 73 20 70 | somewha|t less p|
|00000f80| 75 72 65 20 64 65 73 69 | 67 6e 20 63 6f 75 6c 64 |ure desi|gn could|
|00000f90| 20 64 65 61 6c 20 77 69 | 74 68 0a 58 20 20 74 68 | deal wi|th.X  th|
|00000fa0| 69 73 20 61 75 74 6f 6d | 61 74 69 63 61 6c 6c 79 |is autom|atically|
|00000fb0| 2e 0a 58 0a 58 20 20 70 | 6d 6c 69 6e 65 64 20 64 |..X.X  p|mlined d|
|00000fc0| 6f 65 73 6e 27 74 20 75 | 6e 64 65 72 73 74 61 6e |oesn't u|nderstan|
|00000fd0| 64 20 74 61 62 73 2e 0a | 58 0a 58 20 20 70 6d 6c |d tabs..|X.X  pml|
|00000fe0| 69 6e 65 64 27 73 20 6b | 65 79 20 62 69 6e 64 69 |ined's k|ey bindi|
|00000ff0| 6e 67 73 20 61 72 65 20 | 68 61 72 64 77 69 72 65 |ngs are |hardwire|
|00001000| 64 2e 0a 58 0a 58 20 20 | 70 6d 6c 69 6e 65 64 20 |d..X.X  |pmlined |
|00001010| 64 6f 65 73 6e 27 74 20 | 68 61 76 65 20 6d 61 63 |doesn't |have mac|
|00001020| 72 6f 73 2c 20 6f 72 20 | 68 65 6c 70 2c 20 6f 72 |ros, or |help, or|
|00001030| 20 76 61 72 69 61 62 6c | 65 73 2c 20 6f 72 20 66 | variabl|es, or f|
|00001040| 69 6c 65 0a 58 20 20 63 | 6f 6d 70 6c 65 74 69 6f |ile.X  c|ompletio|
|00001050| 6e 2c 20 6f 72 20 73 69 | 67 6e 61 6c 20 63 68 61 |n, or si|gnal cha|
|00001060| 72 61 63 74 65 72 73 2c | 20 6f 72 20 61 6e 79 74 |racters,| or anyt|
|00001070| 68 69 6e 67 20 65 6c 73 | 65 20 79 6f 75 27 64 20 |hing els|e you'd |
|00001080| 65 78 70 65 63 74 20 6f | 75 74 20 6f 66 0a 58 20 |expect o|ut of.X |
|00001090| 20 61 20 66 61 6e 63 79 | 20 6c 69 6e 65 20 64 69 | a fancy| line di|
|000010a0| 73 63 69 70 6c 69 6e 65 | 2e 20 42 75 74 20 69 74 |scipline|. But it|
|000010b0| 27 73 20 65 61 73 79 20 | 74 6f 20 65 78 74 65 6e |'s easy |to exten|
|000010c0| 64 2e 20 28 54 68 65 20 | 66 69 72 73 74 20 76 65 |d. (The |first ve|
|000010d0| 72 73 69 6f 6e 0a 58 20 | 20 64 69 64 6e 27 74 20 |rsion.X | didn't |
|000010e0| 68 61 76 65 20 61 20 63 | 6f 6d 6d 61 6e 64 20 68 |have a c|ommand h|
|000010f0| 69 73 74 6f 72 79 2e 29 | 0a 58 0a 58 0a 58 47 6f |istory.)|.X.X.XGo|
|00001100| 6f 64 20 6c 75 63 6b 21 | 0a 45 4e 44 5f 4f 46 5f |od luck!|.END_OF_|
|00001110| 46 49 4c 45 0a 69 66 20 | 74 65 73 74 20 32 36 39 |FILE.if |test 269|
|00001120| 32 20 2d 6e 65 20 60 77 | 63 20 2d 63 20 3c 27 52 |2 -ne `w|c -c <'R|
|00001130| 45 41 44 4d 45 27 60 3b | 20 74 68 65 6e 0a 20 20 |EADME'`;| then.  |
|00001140| 20 20 65 63 68 6f 20 73 | 68 61 72 3a 20 5c 22 27 |  echo s|har: \"'|
|00001150| 52 45 41 44 4d 45 27 5c | 22 20 75 6e 70 61 63 6b |README'\|" unpack|
|00001160| 65 64 20 77 69 74 68 20 | 77 72 6f 6e 67 20 73 69 |ed with |wrong si|
|00001170| 7a 65 21 0a 66 69 0a 23 | 20 65 6e 64 20 6f 66 20 |ze!.fi.#| end of |
|00001180| 27 52 45 41 44 4d 45 27 | 0a 66 69 0a 69 66 20 74 |'README'|.fi.if t|
|00001190| 65 73 74 20 2d 66 20 27 | 70 6d 6c 69 6e 65 64 2e |est -f '|pmlined.|
|000011a0| 63 27 20 2d 61 20 22 24 | 7b 31 7d 22 20 21 3d 20 |c' -a "$|{1}" != |
|000011b0| 22 2d 63 22 20 3b 20 74 | 68 65 6e 20 0a 20 20 65 |"-c" ; t|hen .  e|
|000011c0| 63 68 6f 20 73 68 61 72 | 3a 20 57 69 6c 6c 20 6e |cho shar|: Will n|
|000011d0| 6f 74 20 63 6c 6f 62 62 | 65 72 20 65 78 69 73 74 |ot clobb|er exist|
|000011e0| 69 6e 67 20 66 69 6c 65 | 20 5c 22 27 70 6d 6c 69 |ing file| \"'pmli|
|000011f0| 6e 65 64 2e 63 27 5c 22 | 0a 65 6c 73 65 0a 65 63 |ned.c'\"|.else.ec|
|00001200| 68 6f 20 73 68 61 72 3a | 20 45 78 74 72 61 63 74 |ho shar:| Extract|
|00001210| 69 6e 67 20 5c 22 27 70 | 6d 6c 69 6e 65 64 2e 63 |ing \"'p|mlined.c|
|00001220| 27 5c 22 20 5c 28 36 34 | 37 37 20 63 68 61 72 61 |'\" \(64|77 chara|
|00001230| 63 74 65 72 73 5c 29 0a | 73 65 64 20 22 73 2f 5e |cters\).|sed "s/^|
|00001240| 58 2f 2f 22 20 3e 27 70 | 6d 6c 69 6e 65 64 2e 63 |X//" >'p|mlined.c|
|00001250| 27 20 3c 3c 27 45 4e 44 | 5f 4f 46 5f 46 49 4c 45 |' <<'END|_OF_FILE|
|00001260| 27 0a 58 23 69 6e 63 6c | 75 64 65 20 3c 73 74 64 |'.X#incl|ude <std|
|00001270| 69 6f 2e 68 3e 0a 58 23 | 69 6e 63 6c 75 64 65 20 |io.h>.X#|include |
|00001280| 3c 73 69 67 6e 61 6c 2e | 68 3e 0a 58 23 69 6e 63 |<signal.|h>.X#inc|
|00001290| 6c 75 64 65 20 3c 63 75 | 72 73 65 73 2e 68 3e 0a |lude <cu|rses.h>.|
|000012a0| 58 23 69 6e 63 6c 75 64 | 65 20 3c 73 74 72 69 6e |X#includ|e <strin|
|000012b0| 67 73 2e 68 3e 0a 58 0a | 58 23 64 65 66 69 6e 65 |gs.h>.X.|X#define|
|000012c0| 20 48 49 53 54 4c 45 4e | 20 32 30 0a 58 23 64 65 | HISTLEN| 20.X#de|
|000012d0| 66 69 6e 65 20 4c 49 4e | 45 4c 45 4e 20 35 30 30 |fine LIN|ELEN 500|
|000012e0| 0a 58 23 64 65 66 69 6e | 65 20 50 52 4c 49 4e 45 |.X#defin|e PRLINE|
|000012f0| 4c 45 4e 20 31 30 30 30 | 0a 58 0a 58 6f 75 74 63 |LEN 1000|.X.Xoutc|
|00001300| 28 63 68 29 0a 58 63 68 | 61 72 20 63 68 3b 0a 58 |(ch).Xch|ar ch;.X|
|00001310| 7b 0a 58 20 70 75 74 63 | 28 63 68 2c 73 74 64 65 |{.X putc|(ch,stde|
|00001320| 72 72 29 3b 0a 58 7d 0a | 58 0a 58 73 69 67 70 69 |rr);.X}.|X.Xsigpi|
|00001330| 70 65 28 29 0a 58 7b 0a | 58 20 63 6c 6f 73 65 28 |pe().X{.|X close(|
|00001340| 30 29 3b 20 2f 2a 20 67 | 75 61 72 61 6e 74 65 65 |0); /* g|uarantee|
|00001350| 69 6e 67 20 74 68 61 74 | 20 74 68 65 20 6e 65 78 |ing that| the nex|
|00001360| 74 20 63 68 61 72 61 63 | 74 65 72 20 77 65 20 72 |t charac|ter we r|
|00001370| 65 61 64 20 77 69 6c 6c | 20 62 65 20 61 6e 20 45 |ead will| be an E|
|00001380| 4f 46 20 2a 2f 0a 58 7d | 0a 58 0a 58 6d 61 69 6e |OF */.X}|.X.Xmain|
|00001390| 28 61 72 67 63 2c 61 72 | 67 76 29 0a 58 69 6e 74 |(argc,ar|gv).Xint|
|000013a0| 20 61 72 67 63 3b 0a 58 | 63 68 61 72 20 2a 61 72 | argc;.X|char *ar|
|000013b0| 67 76 5b 5d 3b 0a 58 7b | 0a 58 20 63 68 61 72 20 |gv[];.X{|.X char |
|000013c0| 62 70 5b 31 30 32 34 5d | 3b 0a 58 20 63 68 61 72 |bp[1024]|;.X char|
|000013d0| 20 74 73 5b 32 35 36 5d | 3b 0a 58 20 63 68 61 72 | ts[256]|;.X char|
|000013e0| 20 66 73 5b 32 35 36 5d | 3b 0a 58 20 63 68 61 72 | fs[256]|;.X char|
|000013f0| 20 63 65 5b 32 35 36 5d | 3b 0a 58 20 63 68 61 72 | ce[256]|;.X char|
|00001400| 20 75 73 5b 32 35 36 5d | 3b 0a 58 20 63 68 61 72 | us[256]|;.X char|
|00001410| 20 75 65 5b 32 35 36 5d | 3b 0a 58 20 63 68 61 72 | ue[256]|;.X char|
|00001420| 20 2a 63 70 74 72 3b 0a | 58 20 63 68 61 72 20 65 | *cptr;.|X char e|
|00001430| 72 72 62 75 66 5b 42 55 | 46 53 49 5a 5d 3b 0a 58 |rrbuf[BU|FSIZ];.X|
|00001440| 20 63 68 61 72 20 68 69 | 73 74 6f 72 79 5b 48 49 | char hi|story[HI|
|00001450| 53 54 4c 45 4e 5d 5b 4c | 49 4e 45 4c 45 4e 5d 3b |STLEN][L|INELEN];|
|00001460| 0a 58 20 63 68 61 72 20 | 70 72 68 69 73 74 6f 72 |.X char |prhistor|
|00001470| 79 5b 48 49 53 54 4c 45 | 4e 5d 5b 50 52 4c 49 4e |y[HISTLE|N][PRLIN|
|00001480| 45 4c 45 4e 5d 3b 0a 58 | 20 63 68 61 72 20 61 68 |ELEN];.X| char ah|
|00001490| 69 73 74 6f 72 79 5b 48 | 49 53 54 4c 45 4e 5d 5b |istory[H|ISTLEN][|
|000014a0| 4c 49 4e 45 4c 45 4e 5d | 3b 0a 58 20 63 68 61 72 |LINELEN]|;.X char|
|000014b0| 20 61 70 72 68 69 73 74 | 6f 72 79 5b 48 49 53 54 | aprhist|ory[HIST|
|000014c0| 4c 45 4e 5d 5b 50 52 4c | 49 4e 45 4c 45 4e 5d 3b |LEN][PRL|INELEN];|
|000014d0| 0a 58 20 69 6e 74 20 68 | 69 73 74 70 6f 73 20 3d |.X int h|istpos =|
|000014e0| 20 30 3b 0a 58 20 69 6e | 74 20 6d 69 6e 68 69 73 | 0;.X in|t minhis|
|000014f0| 74 70 6f 73 20 3d 20 30 | 3b 0a 58 20 69 6e 74 20 |tpos = 0|;.X int |
|00001500| 74 65 6d 70 68 69 73 74 | 70 6f 73 3b 0a 58 20 63 |temphist|pos;.X c|
|00001510| 68 61 72 20 2a 6c 69 6e | 65 3b 0a 58 20 63 68 61 |har *lin|e;.X cha|
|00001520| 72 20 2a 6c 69 6e 65 70 | 72 3b 0a 58 20 63 68 61 |r *linep|r;.X cha|
|00001530| 72 20 2a 61 6c 69 6e 65 | 3b 0a 58 20 63 68 61 72 |r *aline|;.X char|
|00001540| 20 2a 61 6c 69 6e 65 70 | 72 3b 0a 58 20 69 6e 74 | *alinep|r;.X int|
|00001550| 20 63 68 3b 0a 58 20 63 | 68 61 72 20 2a 63 68 70 | ch;.X c|har *chp|
|00001560| 72 3b 0a 58 20 69 6e 74 | 20 78 3b 0a 58 20 69 6e |r;.X int| x;.X in|
|00001570| 74 20 78 70 72 3b 0a 58 | 20 69 6e 74 20 79 3b 0a |t xpr;.X| int y;.|
|00001580| 58 20 69 6e 74 20 79 70 | 72 3b 0a 58 20 69 6e 74 |X int yp|r;.X int|
|00001590| 20 66 6c 61 67 63 68 61 | 72 6d 6f 64 65 20 3d 20 | flagcha|rmode = |
|000015a0| 30 3b 0a 58 20 69 6e 74 | 20 63 6f 3b 0a 58 20 69 |0;.X int| co;.X i|
|000015b0| 6e 74 20 69 3b 0a 58 0a | 58 20 73 69 67 6e 61 6c |nt i;.X.|X signal|
|000015c0| 28 53 49 47 50 49 50 45 | 2c 73 69 67 70 69 70 65 |(SIGPIPE|,sigpipe|
|000015d0| 29 3b 0a 58 20 73 65 74 | 62 75 66 28 73 74 64 65 |);.X set|buf(stde|
|000015e0| 72 72 2c 65 72 72 62 75 | 66 29 3b 0a 58 0a 58 20 |rr,errbu|f);.X.X |
|000015f0| 74 67 65 74 65 6e 74 28 | 62 70 2c 67 65 74 65 6e |tgetent(|bp,geten|
|00001600| 76 28 22 54 45 52 4d 22 | 29 29 3b 0a 58 20 63 70 |v("TERM"|));.X cp|
|00001610| 74 72 20 3d 20 74 73 3b | 0a 58 20 69 66 20 28 21 |tr = ts;|.X if (!|
|00001620| 74 67 65 74 73 74 72 28 | 22 74 73 22 2c 26 63 70 |tgetstr(|"ts",&cp|
|00001630| 74 72 29 29 0a 58 20 20 | 20 3b 20 2f 2a 58 58 58 |tr)).X  | ; /*XXX|
|00001640| 2a 2f 0a 58 20 63 70 74 | 72 20 3d 20 66 73 3b 0a |*/.X cpt|r = fs;.|
|00001650| 58 20 69 66 20 28 21 74 | 67 65 74 73 74 72 28 22 |X if (!t|getstr("|
|00001660| 66 73 22 2c 26 63 70 74 | 72 29 29 0a 58 20 20 20 |fs",&cpt|r)).X   |
|00001670| 3b 20 2f 2a 58 58 58 2a | 2f 0a 58 20 63 70 74 72 |; /*XXX*|/.X cptr|
|00001680| 20 3d 20 63 65 3b 0a 58 | 20 69 66 20 28 21 74 67 | = ce;.X| if (!tg|
|00001690| 65 74 73 74 72 28 22 63 | 65 22 2c 26 63 70 74 72 |etstr("c|e",&cptr|
|000016a0| 29 29 0a 58 20 20 20 3b | 20 2f 2a 58 58 58 2a 2f |)).X   ;| /*XXX*/|
|000016b0| 0a 58 20 63 70 74 72 20 | 3d 20 75 73 3b 0a 58 20 |.X cptr |= us;.X |
|000016c0| 69 66 20 28 21 74 67 65 | 74 73 74 72 28 22 75 73 |if (!tge|tstr("us|
|000016d0| 22 2c 26 63 70 74 72 29 | 29 0a 58 20 20 20 3b 20 |",&cptr)|).X   ; |
|000016e0| 2f 2a 58 58 58 2a 2f 0a | 58 20 63 70 74 72 20 3d |/*XXX*/.|X cptr =|
|000016f0| 20 75 65 3b 0a 58 20 69 | 66 20 28 21 74 67 65 74 | ue;.X i|f (!tget|
|00001700| 73 74 72 28 22 75 65 22 | 2c 26 63 70 74 72 29 29 |str("ue"|,&cptr))|
|00001710| 0a 58 20 20 20 3b 20 2f | 2a 58 58 58 2a 2f 0a 58 |.X   ; /|*XXX*/.X|
|00001720| 20 63 6f 20 3d 20 74 67 | 65 74 6e 75 6d 28 22 63 | co = tg|etnum("c|
|00001730| 6f 22 29 3b 0a 58 23 64 | 65 66 69 6e 65 20 54 53 |o");.X#d|efine TS|
|00001740| 20 74 70 75 74 73 28 74 | 73 2c 31 2c 6f 75 74 63 | tputs(t|s,1,outc|
|00001750| 29 0a 58 23 64 65 66 69 | 6e 65 20 43 45 20 74 70 |).X#defi|ne CE tp|
|00001760| 75 74 73 28 63 65 2c 31 | 2c 6f 75 74 63 29 0a 58 |uts(ce,1|,outc).X|
|00001770| 23 64 65 66 69 6e 65 20 | 46 53 20 74 70 75 74 73 |#define |FS tputs|
|00001780| 28 66 73 2c 31 2c 6f 75 | 74 63 29 0a 58 23 64 65 |(fs,1,ou|tc).X#de|
|00001790| 66 69 6e 65 20 55 53 20 | 74 70 75 74 73 28 75 73 |fine US |tputs(us|
|000017a0| 2c 31 2c 6f 75 74 63 29 | 0a 58 23 64 65 66 69 6e |,1,outc)|.X#defin|
|000017b0| 65 20 55 45 20 74 70 75 | 74 73 28 75 65 2c 31 2c |e UE tpu|ts(ue,1,|
|000017c0| 6f 75 74 63 29 0a 58 0a | 58 20 66 6f 72 20 28 3b |outc).X.|X for (;|
|000017d0| 3b 29 0a 58 20 20 20 69 | 66 20 28 66 6c 61 67 63 |;).X   i|f (flagc|
|000017e0| 68 61 72 6d 6f 64 65 29 | 0a 58 20 20 20 20 7b 0a |harmode)|.X    {.|
|000017f0| 58 20 20 20 20 20 69 66 | 20 28 28 63 68 20 3d 20 |X     if| ((ch = |
|00001800| 67 65 74 63 68 61 72 28 | 29 29 20 3d 3d 20 45 4f |getchar(|)) == EO|
|00001810| 46 29 0a 58 20 20 20 20 | 20 20 20 62 72 65 61 6b |F).X    |   break|
|00001820| 3b 0a 58 20 20 20 20 20 | 69 66 20 28 63 68 20 3d |;.X     |if (ch =|
|00001830| 3d 20 30 30 30 31 29 0a | 58 20 20 20 20 20 20 20 |= 0001).|X       |
|00001840| 66 6c 61 67 63 68 61 72 | 6d 6f 64 65 20 3d 20 30 |flagchar|mode = 0|
|00001850| 3b 0a 58 20 20 20 20 20 | 65 6c 73 65 0a 58 20 20 |;.X     |else.X  |
|00001860| 20 20 20 20 7b 0a 58 20 | 20 20 20 20 20 20 70 75 |    {.X |      pu|
|00001870| 74 63 68 61 72 28 63 68 | 29 3b 0a 58 20 20 20 20 |tchar(ch|);.X    |
|00001880| 20 20 20 66 66 6c 75 73 | 68 28 73 74 64 6f 75 74 |   fflus|h(stdout|
|00001890| 29 3b 0a 58 20 20 20 20 | 20 20 7d 0a 58 20 20 20 |);.X    |  }.X   |
|000018a0| 20 7d 0a 58 20 20 20 65 | 6c 73 65 0a 58 20 20 20 | }.X   e|lse.X   |
|000018b0| 20 7b 0a 58 20 20 20 20 | 20 6c 69 6e 65 20 3d 20 | {.X    | line = |
|000018c0| 68 69 73 74 6f 72 79 5b | 68 69 73 74 70 6f 73 5d |history[|histpos]|
|000018d0| 3b 0a 58 20 20 20 20 20 | 61 6c 69 6e 65 20 3d 20 |;.X     |aline = |
|000018e0| 61 68 69 73 74 6f 72 79 | 5b 68 69 73 74 70 6f 73 |ahistory|[histpos|
|000018f0| 5d 3b 0a 58 20 20 20 20 | 20 6c 69 6e 65 70 72 20 |];.X    | linepr |
|00001900| 3d 20 70 72 68 69 73 74 | 6f 72 79 5b 68 69 73 74 |= prhist|ory[hist|
|00001910| 70 6f 73 5d 3b 0a 58 20 | 20 20 20 20 61 6c 69 6e |pos];.X |    alin|
|00001920| 65 70 72 20 3d 20 61 70 | 72 68 69 73 74 6f 72 79 |epr = ap|rhistory|
|00001930| 5b 68 69 73 74 70 6f 73 | 5d 3b 0a 58 20 20 20 20 |[histpos|];.X    |
|00001940| 20 74 65 6d 70 68 69 73 | 74 70 6f 73 20 3d 20 68 | temphis|tpos = h|
|00001950| 69 73 74 70 6f 73 3b 0a | 58 20 20 20 20 20 54 53 |istpos;.|X     TS|
|00001960| 3b 20 43 45 3b 20 55 53 | 3b 20 70 75 74 63 28 27 |; CE; US|; putc('|
|00001970| 20 27 2c 73 74 64 65 72 | 72 29 3b 20 55 45 3b 20 | ',stder|r); UE; |
|00001980| 46 53 3b 20 66 66 6c 75 | 73 68 28 73 74 64 65 72 |FS; fflu|sh(stder|
|00001990| 72 29 3b 0a 58 20 20 20 | 20 20 78 20 3d 20 78 70 |r);.X   |  x = xp|
|000019a0| 72 20 3d 20 30 3b 0a 58 | 20 20 20 20 20 6c 69 6e |r = 0;.X|     lin|
|000019b0| 65 5b 78 5d 20 3d 20 6c | 69 6e 65 70 72 5b 78 70 |e[x] = l|inepr[xp|
|000019c0| 72 5d 20 3d 20 27 5c 30 | 27 3b 0a 58 20 20 20 20 |r] = '\0|';.X    |
|000019d0| 20 79 20 3d 20 79 70 72 | 20 3d 20 30 3b 0a 58 20 | y = ypr| = 0;.X |
|000019e0| 20 20 20 20 61 6c 69 6e | 65 5b 79 5d 20 3d 20 61 |    alin|e[y] = a|
|000019f0| 6c 69 6e 65 70 72 5b 79 | 70 72 5d 20 3d 20 27 5c |linepr[y|pr] = '\|
|00001a00| 30 27 3b 0a 58 20 20 20 | 20 20 77 68 69 6c 65 20 |0';.X   |  while |
|00001a10| 28 28 63 68 20 3d 20 67 | 65 74 63 68 61 72 28 29 |((ch = g|etchar()|
|00001a20| 29 20 21 3d 20 27 5c 6e | 27 29 0a 58 20 20 20 20 |) != '\n|').X    |
|00001a30| 20 20 7b 0a 58 20 20 20 | 20 20 20 20 69 66 20 28 |  {.X   |    if (|
|00001a40| 28 74 65 6d 70 68 69 73 | 74 70 6f 73 20 21 3d 20 |(temphis|tpos != |
|00001a50| 68 69 73 74 70 6f 73 29 | 20 26 26 20 28 63 68 20 |histpos)| && (ch |
|00001a60| 21 3d 20 32 29 20 26 26 | 20 28 63 68 20 21 3d 20 |!= 2) &&| (ch != |
|00001a70| 36 29 29 0a 58 09 7b 0a | 58 09 20 73 74 72 63 70 |6)).X.{.|X. strcp|
|00001a80| 79 28 68 69 73 74 6f 72 | 79 5b 68 69 73 74 70 6f |y(histor|y[histpo|
|00001a90| 73 5d 2c 6c 69 6e 65 29 | 3b 20 6c 69 6e 65 20 3d |s],line)|; line =|
|00001aa0| 20 68 69 73 74 6f 72 79 | 5b 68 69 73 74 70 6f 73 | history|[histpos|
|00001ab0| 5d 3b 0a 58 09 20 73 74 | 72 63 70 79 28 61 68 69 |];.X. st|rcpy(ahi|
|00001ac0| 73 74 6f 72 79 5b 68 69 | 73 74 70 6f 73 5d 2c 61 |story[hi|stpos],a|
|00001ad0| 6c 69 6e 65 29 3b 20 61 | 6c 69 6e 65 20 3d 20 61 |line); a|line = a|
|00001ae0| 68 69 73 74 6f 72 79 5b | 68 69 73 74 70 6f 73 5d |history[|histpos]|
|00001af0| 3b 0a 58 09 20 73 74 72 | 63 70 79 28 70 72 68 69 |;.X. str|cpy(prhi|
|00001b00| 73 74 6f 72 79 5b 68 69 | 73 74 70 6f 73 5d 2c 6c |story[hi|stpos],l|
|00001b10| 69 6e 65 70 72 29 3b 20 | 6c 69 6e 65 70 72 20 3d |inepr); |linepr =|
|00001b20| 20 70 72 68 69 73 74 6f | 72 79 5b 68 69 73 74 70 | prhisto|ry[histp|
|00001b30| 6f 73 5d 3b 0a 58 09 20 | 73 74 72 63 70 79 28 61 |os];.X. |strcpy(a|
|00001b40| 70 72 68 69 73 74 6f 72 | 79 5b 68 69 73 74 70 6f |prhistor|y[histpo|
|00001b50| 73 5d 2c 61 6c 69 6e 65 | 70 72 29 3b 20 61 6c 69 |s],aline|pr); ali|
|00001b60| 6e 65 70 72 20 3d 20 61 | 70 72 68 69 73 74 6f 72 |nepr = a|prhistor|
|00001b70| 79 5b 68 69 73 74 70 6f | 73 5d 3b 0a 58 09 20 74 |y[histpo|s];.X. t|
|00001b80| 65 6d 70 68 69 73 74 70 | 6f 73 20 3d 20 68 69 73 |emphistp|os = his|
|00001b90| 74 70 6f 73 3b 0a 58 09 | 7d 0a 58 20 20 20 20 20 |tpos;.X.|}.X     |
|00001ba0| 20 20 69 66 20 28 63 68 | 20 3d 3d 20 34 29 0a 58 |  if (ch| == 4).X|
|00001bb0| 09 20 62 72 65 61 6b 3b | 0a 58 20 20 20 20 20 20 |. break;|.X      |
|00001bc0| 20 69 66 20 28 63 68 20 | 3d 3d 20 45 4f 46 29 0a | if (ch |== EOF).|
|00001bd0| 58 09 20 62 72 65 61 6b | 3b 0a 58 20 20 20 20 20 |X. break|;.X     |
|00001be0| 20 20 69 66 20 28 63 68 | 20 3d 3d 20 27 5c 72 27 |  if (ch| == '\r'|
|00001bf0| 29 0a 58 09 7b 0a 58 09 | 20 63 68 20 3d 20 27 5c |).X.{.X.| ch = '\|
|00001c00| 6e 27 3b 0a 58 09 20 62 | 72 65 61 6b 3b 0a 58 09 |n';.X. b|reak;.X.|
|00001c10| 7d 0a 58 20 20 20 20 20 | 20 20 69 66 20 28 63 68 |}.X     |  if (ch|
|00001c20| 20 3d 3d 20 31 29 0a 58 | 09 7b 0a 58 09 20 66 6c | == 1).X|.{.X. fl|
|00001c30| 61 67 63 68 61 72 6d 6f | 64 65 20 3d 20 31 3b 0a |agcharmo|de = 1;.|
|00001c40| 58 09 20 62 72 65 61 6b | 3b 0a 58 09 7d 0a 58 20 |X. break|;.X.}.X |
|00001c50| 20 20 20 20 20 20 73 77 | 69 74 63 68 28 63 68 29 |      sw|itch(ch)|
|00001c60| 0a 58 20 20 20 20 20 20 | 20 20 7b 0a 58 09 20 63 |.X      |  {.X. c|
|00001c70| 61 73 65 20 36 3a 20 69 | 66 20 28 74 65 6d 70 68 |ase 6: i|f (temph|
|00001c80| 69 73 74 70 6f 73 20 21 | 3d 20 68 69 73 74 70 6f |istpos !|= histpo|
|00001c90| 73 29 0a 58 09 09 20 20 | 7b 0a 58 09 09 20 20 20 |s).X..  |{.X..   |
|00001ca0| 74 65 6d 70 68 69 73 74 | 70 6f 73 2b 2b 3b 0a 58 |temphist|pos++;.X|
|00001cb0| 09 09 20 20 20 69 66 20 | 28 74 65 6d 70 68 69 73 |..   if |(temphis|
|00001cc0| 74 70 6f 73 20 3d 3d 20 | 48 49 53 54 4c 45 4e 29 |tpos == |HISTLEN)|
|00001cd0| 0a 58 09 09 20 20 20 20 | 20 74 65 6d 70 68 69 73 |.X..    | temphis|
|00001ce0| 74 70 6f 73 20 3d 20 30 | 3b 0a 58 09 09 20 20 7d |tpos = 0|;.X..  }|
|00001cf0| 0a 58 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.X      |        |
|00001d00| 20 20 20 6c 69 6e 65 20 | 3d 20 68 69 73 74 6f 72 |   line |= histor|
|00001d10| 79 5b 74 65 6d 70 68 69 | 73 74 70 6f 73 5d 3b 0a |y[temphi|stpos];.|
|00001d20| 58 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |X       |        |
|00001d30| 20 20 61 6c 69 6e 65 20 | 3d 20 61 68 69 73 74 6f |  aline |= ahisto|
|00001d40| 72 79 5b 74 65 6d 70 68 | 69 73 74 70 6f 73 5d 3b |ry[temph|istpos];|
|00001d50| 0a 58 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.X      |        |
|00001d60| 20 20 20 6c 69 6e 65 70 | 72 20 3d 20 70 72 68 69 |   linep|r = prhi|
|00001d70| 73 74 6f 72 79 5b 74 65 | 6d 70 68 69 73 74 70 6f |story[te|mphistpo|
|00001d80| 73 5d 3b 0a 58 20 20 20 | 20 20 20 20 20 20 20 20 |s];.X   |        |
|00001d90| 20 20 20 20 20 20 61 6c | 69 6e 65 70 72 20 3d 20 |      al|inepr = |
|00001da0| 61 70 72 68 69 73 74 6f | 72 79 5b 74 65 6d 70 68 |aprhisto|ry[temph|
|00001db0| 69 73 74 70 6f 73 5d 3b | 0a 58 09 09 20 78 20 3d |istpos];|.X.. x =|
|00001dc0| 20 73 74 72 6c 65 6e 28 | 6c 69 6e 65 29 3b 0a 58 | strlen(|line);.X|
|00001dd0| 09 09 20 79 20 3d 20 73 | 74 72 6c 65 6e 28 61 6c |.. y = s|trlen(al|
|00001de0| 69 6e 65 29 3b 0a 58 09 | 09 20 78 70 72 20 3d 20 |ine);.X.|. xpr = |
|00001df0| 73 74 72 6c 65 6e 28 6c | 69 6e 65 70 72 29 3b 0a |strlen(l|inepr);.|
|00001e00| 58 09 09 20 79 70 72 20 | 3d 20 73 74 72 6c 65 6e |X.. ypr |= strlen|
|00001e10| 28 61 6c 69 6e 65 70 72 | 29 3b 0a 58 09 09 20 62 |(alinepr|);.X.. b|
|00001e20| 72 65 61 6b 3b 0a 58 09 | 20 63 61 73 65 20 32 3a |reak;.X.| case 2:|
|00001e30| 20 69 66 20 28 74 65 6d | 70 68 69 73 74 70 6f 73 | if (tem|phistpos|
|00001e40| 20 21 3d 20 6d 69 6e 68 | 69 73 74 70 6f 73 29 0a | != minh|istpos).|
|00001e50| 58 09 09 20 20 7b 0a 58 | 09 09 20 20 20 69 66 20 |X..  {.X|..   if |
|00001e60| 28 74 65 6d 70 68 69 73 | 74 70 6f 73 20 3d 3d 20 |(temphis|tpos == |
|00001e70| 30 29 0a 58 09 09 20 20 | 20 20 20 74 65 6d 70 68 |0).X..  |   temph|
|00001e80| 69 73 74 70 6f 73 20 3d | 20 48 49 53 54 4c 45 4e |istpos =| HISTLEN|
|00001e90| 3b 0a 58 09 09 20 20 20 | 74 65 6d 70 68 69 73 74 |;.X..   |temphist|
|00001ea0| 70 6f 73 2d 2d 3b 0a 58 | 09 09 20 20 7d 0a 58 20 |pos--;.X|..  }.X |
|00001eb0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001ec0| 6c 69 6e 65 20 3d 20 68 | 69 73 74 6f 72 79 5b 74 |line = h|istory[t|
|00001ed0| 65 6d 70 68 69 73 74 70 | 6f 73 5d 3b 0a 58 20 20 |emphistp|os];.X  |
|00001ee0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 61 |        |       a|
|00001ef0| 6c 69 6e 65 20 3d 20 61 | 68 69 73 74 6f 72 79 5b |line = a|history[|
|00001f00| 74 65 6d 70 68 69 73 74 | 70 6f 73 5d 3b 0a 58 20 |temphist|pos];.X |
|00001f10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001f20| 6c 69 6e 65 70 72 20 3d | 20 70 72 68 69 73 74 6f |linepr =| prhisto|
|00001f30| 72 79 5b 74 65 6d 70 68 | 69 73 74 70 6f 73 5d 3b |ry[temph|istpos];|
|00001f40| 0a 58 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.X      |        |
|00001f50| 20 20 20 61 6c 69 6e 65 | 70 72 20 3d 20 61 70 72 |   aline|pr = apr|
|00001f60| 68 69 73 74 6f 72 79 5b | 74 65 6d 70 68 69 73 74 |history[|temphist|
|00001f70| 70 6f 73 5d 3b 0a 58 09 | 09 20 78 20 3d 20 73 74 |pos];.X.|. x = st|
|00001f80| 72 6c 65 6e 28 6c 69 6e | 65 29 3b 0a 58 09 09 20 |rlen(lin|e);.X.. |
|00001f90| 79 20 3d 20 73 74 72 6c | 65 6e 28 61 6c 69 6e 65 |y = strl|en(aline|
|00001fa0| 29 3b 0a 58 09 09 20 78 | 70 72 20 3d 20 73 74 72 |);.X.. x|pr = str|
|00001fb0| 6c 65 6e 28 6c 69 6e 65 | 70 72 29 3b 0a 58 09 09 |len(line|pr);.X..|
|00001fc0| 20 79 70 72 20 3d 20 73 | 74 72 6c 65 6e 28 61 6c | ypr = s|trlen(al|
|00001fd0| 69 6e 65 70 72 29 3b 0a | 58 09 09 20 62 72 65 61 |inepr);.|X.. brea|
|00001fe0| 6b 3b 0a 58 09 20 63 61 | 73 65 20 32 31 3a 20 78 |k;.X. ca|se 21: x|
|00001ff0| 20 3d 20 78 70 72 20 3d | 20 30 3b 0a 58 20 20 20 | = xpr =| 0;.X   |
|00002000| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 6c |        |       l|
|00002010| 69 6e 65 5b 78 5d 20 3d | 20 6c 69 6e 65 70 72 5b |ine[x] =| linepr[|
|00002020| 78 70 72 5d 20 3d 20 27 | 5c 30 27 3b 0a 58 09 09 |xpr] = '|\0';.X..|
|00002030| 20 20 62 72 65 61 6b 3b | 0a 58 09 20 63 61 73 65 |  break;|.X. case|
|00002040| 20 32 33 3a 20 77 68 69 | 6c 65 20 28 78 20 26 26 | 23: whi|le (x &&|
|00002050| 20 28 6c 69 6e 65 5b 78 | 20 2d 20 31 5d 20 3d 3d | (line[x| - 1] ==|
|00002060| 20 27 20 27 29 29 0a 58 | 09 09 20 20 20 7b 0a 58 | ' ')).X|..   {.X|
|00002070| 09 09 20 20 20 20 78 2d | 2d 3b 0a 58 09 09 20 20 |..    x-|-;.X..  |
|00002080| 20 20 78 70 72 2d 2d 3b | 0a 58 09 09 20 20 20 7d |  xpr--;|.X..   }|
|00002090| 0a 58 09 20 20 20 20 20 | 20 20 20 20 20 77 68 69 |.X.     |     whi|
|000020a0| 6c 65 20 28 78 20 26 26 | 20 28 6c 69 6e 65 5b 78 |le (x &&| (line[x|
|000020b0| 20 2d 20 31 5d 20 21 3d | 20 27 20 27 29 29 0a 58 | - 1] !=| ' ')).X|
|000020c0| 09 09 20 20 20 7b 0a 58 | 09 09 20 20 20 20 78 2d |..   {.X|..    x-|
|000020d0| 2d 3b 0a 58 09 09 20 20 | 20 20 63 68 70 72 20 3d |-;.X..  |  chpr =|
|000020e0| 20 75 6e 63 74 72 6c 28 | 6c 69 6e 65 5b 78 5d 29 | unctrl(|line[x])|
|000020f0| 3b 0a 58 09 09 20 20 20 | 20 77 68 69 6c 65 20 28 |;.X..   | while (|
|00002100| 2a 28 63 68 70 72 2b 2b | 29 29 0a 58 09 09 20 20 |*(chpr++|)).X..  |
|00002110| 20 20 20 20 78 70 72 2d | 2d 3b 0a 58 09 09 20 20 |    xpr-|-;.X..  |
|00002120| 20 7d 0a 58 20 20 09 09 | 20 20 6c 69 6e 65 70 72 | }.X  ..|  linepr|
|00002130| 5b 78 70 72 5d 20 3d 20 | 27 5c 30 27 3b 0a 58 20 |[xpr] = |'\0';.X |
|00002140| 20 09 09 20 20 6c 69 6e | 65 5b 78 5d 20 3d 20 27 | ..  lin|e[x] = '|
|00002150| 5c 30 27 3b 0a 58 20 20 | 09 09 20 20 62 72 65 61 |\0';.X  |..  brea|
|00002160| 6b 3b 0a 58 20 20 20 20 | 20 20 20 20 20 63 61 73 |k;.X    |     cas|
|00002170| 65 20 27 5c 62 27 3a 20 | 69 66 20 28 21 78 29 0a |e '\b': |if (!x).|
|00002180| 58 09 09 20 20 20 20 20 | 20 62 72 65 61 6b 3b 0a |X..     | break;.|
|00002190| 58 09 09 20 20 20 20 78 | 2d 2d 3b 0a 58 09 09 20 |X..    x|--;.X.. |
|000021a0| 20 20 20 61 6c 69 6e 65 | 5b 79 5d 20 3d 20 6c 69 |   aline|[y] = li|
|000021b0| 6e 65 5b 78 5d 3b 0a 58 | 09 09 20 20 20 20 79 2b |ne[x];.X|..    y+|
|000021c0| 2b 3b 0a 58 09 09 20 20 | 20 20 63 68 70 72 20 3d |+;.X..  |  chpr =|
|000021d0| 20 75 6e 63 74 72 6c 28 | 6c 69 6e 65 5b 78 5d 29 | unctrl(|line[x])|
|000021e0| 3b 0a 58 09 09 20 20 20 | 20 77 68 69 6c 65 20 28 |;.X..   | while (|
|000021f0| 2a 28 63 68 70 72 2b 2b | 29 29 0a 58 09 09 20 20 |*(chpr++|)).X..  |
|00002200| 20 20 20 7b 0a 58 09 09 | 20 20 20 20 20 20 78 70 |   {.X..|      xp|
|00002210| 72 2d 2d 3b 0a 58 09 09 | 20 20 20 20 20 20 61 6c |r--;.X..|      al|
|00002220| 69 6e 65 70 72 5b 79 70 | 72 5d 20 3d 20 6c 69 6e |inepr[yp|r] = lin|
|00002230| 65 70 72 5b 78 70 72 5d | 3b 0a 58 09 09 20 20 20 |epr[xpr]|;.X..   |
|00002240| 20 20 20 79 70 72 2b 2b | 3b 0a 58 09 09 20 20 20 |   ypr++|;.X..   |
|00002250| 20 20 7d 0a 58 09 09 20 | 20 20 20 6c 69 6e 65 70 |  }.X.. |   linep|
|00002260| 72 5b 78 70 72 5d 20 3d | 20 27 5c 30 27 3b 0a 58 |r[xpr] =| '\0';.X|
|00002270| 09 09 20 20 20 20 6c 69 | 6e 65 5b 78 5d 20 3d 20 |..    li|ne[x] = |
|00002280| 27 5c 30 27 3b 0a 58 09 | 09 20 20 20 20 61 6c 69 |'\0';.X.|.    ali|
|00002290| 6e 65 70 72 5b 79 70 72 | 5d 20 3d 20 27 5c 30 27 |nepr[ypr|] = '\0'|
|000022a0| 3b 0a 58 09 09 20 20 20 | 20 61 6c 69 6e 65 5b 79 |;.X..   | aline[y|
|000022b0| 5d 20 3d 20 27 5c 30 27 | 3b 0a 58 09 09 20 20 20 |] = '\0'|;.X..   |
|000022c0| 20 62 72 65 61 6b 3b 0a | 58 09 20 63 61 73 65 20 | break;.|X. case |
|000022d0| 31 32 3a 20 69 66 20 28 | 21 79 29 0a 58 09 09 20 |12: if (|!y).X.. |
|000022e0| 20 20 20 62 72 65 61 6b | 3b 0a 58 09 09 20 20 79 |   break|;.X..  y|
|000022f0| 2d 2d 3b 0a 58 09 09 20 | 20 6c 69 6e 65 5b 78 5d |--;.X.. | line[x]|
|00002300| 20 3d 20 61 6c 69 6e 65 | 5b 79 5d 3b 0a 58 09 09 | = aline|[y];.X..|
|00002310| 20 20 78 2b 2b 3b 0a 58 | 09 09 20 20 63 68 70 72 |  x++;.X|..  chpr|
|00002320| 20 3d 20 75 6e 63 74 72 | 6c 28 61 6c 69 6e 65 5b | = unctr|l(aline[|
|00002330| 79 5d 29 3b 0a 58 09 09 | 20 20 77 68 69 6c 65 20 |y]);.X..|  while |
|00002340| 28 2a 28 63 68 70 72 2b | 2b 29 29 0a 58 09 09 20 |(*(chpr+|+)).X.. |
|00002350| 20 20 7b 0a 58 09 09 20 | 20 20 20 79 70 72 2d 2d |  {.X.. |   ypr--|
|00002360| 3b 0a 58 09 09 20 20 20 | 20 6c 69 6e 65 70 72 5b |;.X..   | linepr[|
|00002370| 78 70 72 5d 20 3d 20 61 | 6c 69 6e 65 70 72 5b 79 |xpr] = a|linepr[y|
|00002380| 70 72 5d 3b 0a 58 09 09 | 20 20 20 20 78 70 72 2b |pr];.X..|    xpr+|
|00002390| 2b 3b 0a 58 09 09 20 20 | 20 7d 0a 58 09 09 20 20 |+;.X..  | }.X..  |
|000023a0| 6c 69 6e 65 70 72 5b 78 | 70 72 5d 20 3d 20 27 5c |linepr[x|pr] = '\|
|000023b0| 30 27 3b 0a 58 09 09 20 | 20 6c 69 6e 65 5b 78 5d |0';.X.. | line[x]|
|000023c0| 20 3d 20 27 5c 30 27 3b | 0a 58 09 09 20 20 61 6c | = '\0';|.X..  al|
|000023d0| 69 6e 65 70 72 5b 79 70 | 72 5d 20 3d 20 27 5c 30 |inepr[yp|r] = '\0|
|000023e0| 27 3b 0a 58 09 09 20 20 | 61 6c 69 6e 65 5b 79 5d |';.X..  |aline[y]|
|000023f0| 20 3d 20 27 5c 30 27 3b | 0a 58 09 09 20 20 62 72 | = '\0';|.X..  br|
|00002400| 65 61 6b 3b 0a 58 20 20 | 20 20 20 20 20 20 20 63 |eak;.X  |       c|
|00002410| 61 73 65 20 31 32 37 3a | 20 69 66 20 28 21 78 29 |ase 127:| if (!x)|
|00002420| 0a 58 09 09 20 20 20 20 | 20 62 72 65 61 6b 3b 0a |.X..    | break;.|
|00002430| 58 09 09 20 20 20 78 2d | 2d 3b 0a 58 20 20 09 09 |X..   x-|-;.X  ..|
|00002440| 20 20 20 63 68 70 72 20 | 3d 20 75 6e 63 74 72 6c |   chpr |= unctrl|
|00002450| 28 6c 69 6e 65 5b 78 5d | 29 3b 0a 58 20 20 09 09 |(line[x]|);.X  ..|
|00002460| 20 20 20 77 68 69 6c 65 | 20 28 2a 28 63 68 70 72 |   while| (*(chpr|
|00002470| 2b 2b 29 29 0a 58 20 20 | 09 09 20 20 20 20 20 78 |++)).X  |..     x|
|00002480| 70 72 2d 2d 3b 0a 58 20 | 20 09 09 20 20 20 6c 69 |pr--;.X | ..   li|
|00002490| 6e 65 70 72 5b 78 70 72 | 5d 20 3d 20 27 5c 30 27 |nepr[xpr|] = '\0'|
|000024a0| 3b 0a 58 20 20 09 09 20 | 20 20 6c 69 6e 65 5b 78 |;.X  .. |  line[x|
|000024b0| 5d 20 3d 20 27 5c 30 27 | 3b 0a 58 20 20 09 09 20 |] = '\0'|;.X  .. |
|000024c0| 20 20 62 72 65 61 6b 3b | 0a 58 09 20 63 61 73 65 |  break;|.X. case|
|000024d0| 20 32 32 3a 20 63 68 20 | 3d 20 67 65 74 63 68 61 | 22: ch |= getcha|
|000024e0| 72 28 29 3b 0a 58 09 20 | 63 61 73 65 20 30 3a 20 |r();.X. |case 0: |
|000024f0| 3b 20 2f 2a 58 58 58 2a | 2f 0a 58 20 20 20 20 20 |; /*XXX*|/.X     |
|00002500| 20 20 20 20 64 65 66 61 | 75 6c 74 3a 20 69 66 20 |    defa|ult: if |
|00002510| 28 28 78 20 3d 3d 20 4c | 49 4e 45 4c 45 4e 20 2d |((x == L|INELEN -|
|00002520| 20 31 29 20 7c 7c 20 28 | 78 70 72 20 3d 3d 20 50 | 1) || (|xpr == P|
|00002530| 52 4c 49 4e 45 4c 45 4e | 20 2d 20 31 29 29 0a 58 |RLINELEN| - 1)).X|
|00002540| 09 09 20 20 20 7b 0a 58 | 09 09 20 20 20 20 70 75 |..   {.X|..    pu|
|00002550| 74 63 68 61 72 28 37 29 | 3b 0a 58 09 09 20 20 20 |tchar(7)|;.X..   |
|00002560| 20 62 72 65 61 6b 3b 0a | 58 09 09 20 20 20 7d 0a | break;.|X..   }.|
|00002570| 58 09 09 20 20 6c 69 6e | 65 5b 78 2b 2b 5d 20 3d |X..  lin|e[x++] =|
|00002580| 20 63 68 3b 0a 58 20 20 | 09 09 20 20 6c 69 6e 65 | ch;.X  |..  line|
|00002590| 5b 78 5d 20 3d 20 27 5c | 30 27 3b 0a 58 20 20 09 |[x] = '\|0';.X  .|
|000025a0| 09 20 20 63 68 70 72 20 | 3d 20 75 6e 63 74 72 6c |.  chpr |= unctrl|
|000025b0| 28 63 68 29 3b 0a 58 20 | 20 09 09 20 20 77 68 69 |(ch);.X | ..  whi|
|000025c0| 6c 65 28 2a 63 68 70 72 | 29 0a 58 20 20 09 09 20 |le(*chpr|).X  .. |
|000025d0| 20 20 20 6c 69 6e 65 70 | 72 5b 78 70 72 2b 2b 5d |   linep|r[xpr++]|
|000025e0| 20 3d 20 2a 28 63 68 70 | 72 2b 2b 29 3b 0a 58 20 | = *(chp|r++);.X |
|000025f0| 20 09 09 20 20 6c 69 6e | 65 70 72 5b 78 70 72 5d | ..  lin|epr[xpr]|
|00002600| 20 3d 20 27 5c 30 27 3b | 0a 58 20 20 20 20 20 20 | = '\0';|.X      |
|00002610| 20 20 7d 0a 58 20 20 20 | 20 20 20 20 54 53 3b 0a |  }.X   |    TS;.|
|00002620| 58 20 20 20 20 20 20 20 | 69 66 20 28 79 70 72 29 |X       |if (ypr)|
|00002630| 0a 58 09 7b 0a 58 09 20 | 69 66 20 28 78 70 72 20 |.X.{.X. |if (xpr |
|00002640| 3e 20 63 6f 20 2d 20 37 | 29 0a 58 09 20 20 7b 0a |> co - 7|).X.  {.|
|00002650| 58 09 20 20 20 66 70 75 | 74 73 28 22 3c 2d 20 22 |X.   fpu|ts("<- "|
|00002660| 2c 73 74 64 65 72 72 29 | 3b 20 66 70 75 74 73 28 |,stderr)|; fputs(|
|00002670| 6c 69 6e 65 70 72 20 2b | 20 78 70 72 20 2d 20 63 |linepr +| xpr - c|
|00002680| 6f 20 2b 20 31 30 2c 73 | 74 64 65 72 72 29 3b 0a |o + 10,s|tderr);.|
|00002690| 58 09 20 20 20 55 53 3b | 20 70 75 74 63 28 61 6c |X.   US;| putc(al|
|000026a0| 69 6e 65 5b 79 70 72 20 | 2d 20 31 5d 2c 73 74 64 |ine[ypr |- 1],std|
|000026b0| 65 72 72 29 3b 20 55 45 | 3b 0a 58 09 20 20 20 69 |err); UE|;.X.   i|
|000026c0| 66 20 28 79 70 72 20 21 | 3d 20 31 29 0a 58 09 20 |f (ypr !|= 1).X. |
|000026d0| 20 20 20 7b 0a 58 09 20 | 20 20 20 20 70 75 74 63 |   {.X. |    putc|
|000026e0| 28 27 20 27 2c 73 74 64 | 65 72 72 29 3b 20 70 75 |(' ',std|err); pu|
|000026f0| 74 63 28 27 2d 27 2c 73 | 74 64 65 72 72 29 3b 20 |tc('-',s|tderr); |
|00002700| 70 75 74 63 28 27 3e 27 | 2c 73 74 64 65 72 72 29 |putc('>'|,stderr)|
|00002710| 3b 0a 58 09 20 20 20 20 | 7d 0a 58 20 20 20 20 20 |;.X.    |}.X     |
|00002720| 20 20 20 20 20 7d 0a 58 | 09 20 65 6c 73 65 0a 58 |     }.X|. else.X|
|00002730| 09 20 20 7b 0a 58 09 20 | 20 20 66 70 75 74 73 28 |.  {.X. |  fputs(|
|00002740| 6c 69 6e 65 70 72 2c 73 | 74 64 65 72 72 29 3b 0a |linepr,s|tderr);.|
|00002750| 58 09 20 20 20 55 53 3b | 20 70 75 74 63 28 61 6c |X.   US;| putc(al|
|00002760| 69 6e 65 5b 79 70 72 20 | 2d 20 31 5d 2c 73 74 64 |ine[ypr |- 1],std|
|00002770| 65 72 72 29 3b 20 55 45 | 3b 0a 58 20 20 20 20 20 |err); UE|;.X     |
|00002780| 20 20 20 20 20 20 66 6f | 72 20 28 69 20 3d 20 79 |      fo|r (i = y|
|00002790| 70 72 20 2d 20 32 3b 28 | 69 20 3e 3d 20 30 29 20 |pr - 2;(|i >= 0) |
|000027a0| 26 26 20 28 69 20 3e 3d | 20 78 70 72 20 2b 20 79 |&& (i >=| xpr + y|
|000027b0| 70 72 20 2d 20 63 6f 20 | 2b 20 36 29 3b 69 2d 2d |pr - co |+ 6);i--|
|000027c0| 29 0a 58 09 20 20 20 20 | 20 70 75 74 63 28 61 6c |).X.    | putc(al|
|000027d0| 69 6e 65 5b 69 5d 2c 73 | 74 64 65 72 72 29 3b 0a |ine[i],s|tderr);.|
|000027e0| 58 09 20 20 20 69 66 20 | 28 69 20 21 3d 20 2d 31 |X.   if |(i != -1|
|000027f0| 29 0a 58 09 20 20 20 20 | 7b 0a 58 09 20 20 20 20 |).X.    |{.X.    |
|00002800| 20 70 75 74 63 28 27 20 | 27 2c 73 74 64 65 72 72 | putc(' |',stderr|
|00002810| 29 3b 20 70 75 74 63 28 | 27 2d 27 2c 73 74 64 65 |); putc(|'-',stde|
|00002820| 72 72 29 3b 20 70 75 74 | 63 28 27 3e 27 2c 73 74 |rr); put|c('>',st|
|00002830| 64 65 72 72 29 3b 0a 58 | 09 20 20 20 20 7d 0a 58 |derr);.X|.    }.X|
|00002840| 09 20 20 7d 0a 58 09 7d | 0a 58 20 20 20 20 20 20 |.  }.X.}|.X      |
|00002850| 20 65 6c 73 65 0a 58 09 | 7b 0a 58 20 20 20 20 20 | else.X.|{.X     |
|00002860| 20 20 20 20 69 66 20 28 | 78 70 72 20 3e 20 63 6f |    if (|xpr > co|
|00002870| 20 2d 20 36 29 0a 58 09 | 20 20 7b 20 66 70 75 74 | - 6).X.|  { fput|
|00002880| 73 28 22 3c 2d 20 22 2c | 73 74 64 65 72 72 29 3b |s("<- ",|stderr);|
|00002890| 20 66 70 75 74 73 28 6c | 69 6e 65 70 72 20 2b 20 | fputs(l|inepr + |
|000028a0| 78 70 72 20 2d 20 63 6f | 20 2b 20 39 2c 73 74 64 |xpr - co| + 9,std|
|000028b0| 65 72 72 29 3b 20 7d 0a | 58 20 20 20 20 20 20 20 |err); }.|X       |
|000028c0| 20 20 65 6c 73 65 0a 58 | 09 20 20 7b 20 66 70 75 |  else.X|.  { fpu|
|000028d0| 74 73 28 6c 69 6e 65 70 | 72 2c 73 74 64 65 72 72 |ts(linep|r,stderr|
|000028e0| 29 3b 20 7d 20 0a 58 09 | 20 55 53 3b 20 70 75 74 |); } .X.| US; put|
|000028f0| 63 28 27 20 27 2c 73 74 | 64 65 72 72 29 3b 20 55 |c(' ',st|derr); U|
|00002900| 45 3b 0a 58 09 7d 0a 58 | 20 20 20 20 20 20 20 43 |E;.X.}.X|       C|
|00002910| 45 3b 20 46 53 3b 20 66 | 66 6c 75 73 68 28 73 74 |E; FS; f|flush(st|
|00002920| 64 65 72 72 29 3b 0a 58 | 20 20 20 20 20 20 7d 0a |derr);.X|      }.|
|00002930| 58 20 20 20 20 20 69 66 | 20 28 28 63 68 20 3d 3d |X     if| ((ch ==|
|00002940| 20 45 4f 46 29 20 7c 7c | 20 28 63 68 20 3d 3d 20 | EOF) ||| (ch == |
|00002950| 34 29 29 0a 58 20 20 20 | 20 20 20 7b 0a 58 20 20 |4)).X   |   {.X  |
|00002960| 20 20 20 20 20 66 6f 72 | 20 28 69 20 3d 20 30 3b |     for| (i = 0;|
|00002970| 69 20 3c 20 78 3b 69 2b | 2b 29 0a 58 09 20 70 75 |i < x;i+|+).X. pu|
|00002980| 74 63 68 61 72 28 6c 69 | 6e 65 5b 69 5d 29 3b 0a |tchar(li|ne[i]);.|
|00002990| 58 20 20 20 20 20 20 20 | 66 6f 72 20 28 69 20 3d |X       |for (i =|
|000029a0| 20 79 20 2d 20 31 3b 69 | 20 3e 3d 20 30 3b 69 2d | y - 1;i| >= 0;i-|
|000029b0| 2d 29 0a 58 09 20 70 75 | 74 63 68 61 72 28 61 6c |-).X. pu|tchar(al|
|000029c0| 69 6e 65 5b 69 5d 29 3b | 0a 58 20 20 20 20 20 20 |ine[i]);|.X      |
|000029d0| 20 70 75 74 63 68 61 72 | 28 34 29 3b 0a 58 20 20 | putchar|(4);.X  |
|000029e0| 20 20 20 20 20 66 66 6c | 75 73 68 28 73 74 64 6f |     ffl|ush(stdo|
|000029f0| 75 74 29 3b 0a 58 20 20 | 20 20 20 20 20 69 66 20 |ut);.X  |     if |
|00002a00| 28 63 68 20 3d 3d 20 45 | 4f 46 29 0a 58 09 20 62 |(ch == E|OF).X. b|
|00002a10| 72 65 61 6b 3b 0a 58 20 | 20 20 20 20 20 20 2f 2a |reak;.X |      /*|
|00002a20| 20 4f 6e 20 61 20 6e 6f | 72 6d 61 6c 20 5e 44 2c | On a no|rmal ^D,|
|00002a30| 20 77 65 20 77 6f 6e 27 | 74 20 64 69 65 20 75 6e | we won'|t die un|
|00002a40| 74 69 6c 20 61 66 74 65 | 72 20 6f 75 72 20 6f 75 |til afte|r our ou|
|00002a50| 74 70 75 74 20 64 6f 65 | 73 2e 20 2a 2f 0a 58 20 |tput doe|s. */.X |
|00002a60| 20 20 20 20 20 7d 0a 58 | 20 20 20 20 20 65 6c 73 |     }.X|     els|
|00002a70| 65 20 69 66 20 28 63 68 | 20 3d 3d 20 31 29 0a 58 |e if (ch| == 1).X|
|00002a80| 20 20 20 20 20 20 7b 0a | 58 20 20 20 20 20 20 20 |      {.|X       |
|00002a90| 66 6f 72 20 28 69 20 3d | 20 30 3b 69 20 3c 20 78 |for (i =| 0;i < x|
|00002aa0| 3b 69 2b 2b 29 0a 58 09 | 20 70 75 74 63 68 61 72 |;i++).X.| putchar|
|00002ab0| 28 6c 69 6e 65 5b 69 5d | 29 3b 0a 58 20 20 20 20 |(line[i]|);.X    |
|00002ac0| 20 20 20 66 6f 72 20 28 | 69 20 3d 20 79 20 2d 20 |   for (|i = y - |
|00002ad0| 31 3b 69 20 3e 3d 20 30 | 3b 69 2d 2d 29 0a 58 09 |1;i >= 0|;i--).X.|
|00002ae0| 20 70 75 74 63 68 61 72 | 28 61 6c 69 6e 65 5b 69 | putchar|(aline[i|
|00002af0| 5d 29 3b 0a 58 20 20 20 | 20 20 20 20 66 66 6c 75 |]);.X   |    fflu|
|00002b00| 73 68 28 73 74 64 6f 75 | 74 29 3b 0a 58 20 20 20 |sh(stdou|t);.X   |
|00002b10| 20 20 20 20 54 53 3b 20 | 43 45 3b 20 46 53 3b 20 |    TS; |CE; FS; |
|00002b20| 66 66 6c 75 73 68 28 73 | 74 64 65 72 72 29 3b 0a |fflush(s|tderr);.|
|00002b30| 58 20 20 20 20 20 20 7d | 0a 58 20 20 20 20 20 65 |X      }|.X     e|
|00002b40| 6c 73 65 0a 58 20 20 20 | 20 20 20 7b 0a 58 20 20 |lse.X   |   {.X  |
|00002b50| 20 20 20 20 20 66 6f 72 | 20 28 69 20 3d 20 30 3b |     for| (i = 0;|
|00002b60| 69 20 3c 20 78 3b 69 2b | 2b 29 0a 58 09 20 70 75 |i < x;i+|+).X. pu|
|00002b70| 74 63 68 61 72 28 6c 69 | 6e 65 5b 69 5d 29 3b 0a |tchar(li|ne[i]);.|
|00002b80| 58 20 20 20 20 20 20 20 | 66 6f 72 20 28 69 20 3d |X       |for (i =|
|00002b90| 20 79 20 2d 20 31 3b 69 | 20 3e 3d 20 30 3b 69 2d | y - 1;i| >= 0;i-|
|00002ba0| 2d 29 0a 58 09 20 70 75 | 74 63 68 61 72 28 61 6c |-).X. pu|tchar(al|
|00002bb0| 69 6e 65 5b 69 5d 29 3b | 0a 58 20 20 20 20 20 20 |ine[i]);|.X      |
|00002bc0| 20 70 75 74 63 68 61 72 | 28 27 5c 6e 27 29 3b 0a | putchar|('\n');.|
|00002bd0| 58 20 20 20 20 20 20 20 | 66 66 6c 75 73 68 28 73 |X       |fflush(s|
|00002be0| 74 64 6f 75 74 29 3b 0a | 58 20 20 20 20 20 20 7d |tdout);.|X      }|
|00002bf0| 0a 58 20 20 20 20 20 68 | 69 73 74 70 6f 73 2b 2b |.X     h|istpos++|
|00002c00| 3b 0a 58 20 20 20 20 20 | 69 66 20 28 68 69 73 74 |;.X     |if (hist|
|00002c10| 70 6f 73 20 3d 3d 20 48 | 49 53 54 4c 45 4e 29 0a |pos == H|ISTLEN).|
|00002c20| 58 20 20 20 20 20 20 20 | 68 69 73 74 70 6f 73 20 |X       |histpos |
|00002c30| 3d 20 30 3b 0a 58 20 20 | 20 20 20 69 66 20 28 68 |= 0;.X  |   if (h|
|00002c40| 69 73 74 70 6f 73 20 3d | 3d 20 6d 69 6e 68 69 73 |istpos =|= minhis|
|00002c50| 74 70 6f 73 29 0a 58 20 | 20 20 20 20 20 7b 0a 58 |tpos).X |     {.X|
|00002c60| 20 20 20 20 20 20 20 6d | 69 6e 68 69 73 74 70 6f |       m|inhistpo|
|00002c70| 73 2b 2b 3b 0a 58 20 20 | 20 20 20 20 20 69 66 20 |s++;.X  |     if |
|00002c80| 28 6d 69 6e 68 69 73 74 | 70 6f 73 20 3d 3d 20 48 |(minhist|pos == H|
|00002c90| 49 53 54 4c 45 4e 29 0a | 58 09 20 6d 69 6e 68 69 |ISTLEN).|X. minhi|
|00002ca0| 73 74 70 6f 73 20 3d 20 | 30 3b 0a 58 20 20 20 20 |stpos = |0;.X    |
|00002cb0| 20 20 7d 0a 58 20 20 20 | 20 7d 0a 58 20 54 53 3b |  }.X   | }.X TS;|
|00002cc0| 20 43 45 3b 20 46 53 3b | 20 66 66 6c 75 73 68 28 | CE; FS;| fflush(|
|00002cd0| 73 74 64 65 72 72 29 3b | 0a 58 20 65 78 69 74 28 |stderr);|.X exit(|
|00002ce0| 30 29 3b 0a 58 7d 0a 45 | 4e 44 5f 4f 46 5f 46 49 |0);.X}.E|ND_OF_FI|
|00002cf0| 4c 45 0a 69 66 20 74 65 | 73 74 20 36 34 37 37 20 |LE.if te|st 6477 |
|00002d00| 2d 6e 65 20 60 77 63 20 | 2d 63 20 3c 27 70 6d 6c |-ne `wc |-c <'pml|
|00002d10| 69 6e 65 64 2e 63 27 60 | 3b 20 74 68 65 6e 0a 20 |ined.c'`|; then. |
|00002d20| 20 20 20 65 63 68 6f 20 | 73 68 61 72 3a 20 5c 22 |   echo |shar: \"|
|00002d30| 27 70 6d 6c 69 6e 65 64 | 2e 63 27 5c 22 20 75 6e |'pmlined|.c'\" un|
|00002d40| 70 61 63 6b 65 64 20 77 | 69 74 68 20 77 72 6f 6e |packed w|ith wron|
|00002d50| 67 20 73 69 7a 65 21 0a | 66 69 0a 23 20 65 6e 64 |g size!.|fi.# end|
|00002d60| 20 6f 66 20 27 70 6d 6c | 69 6e 65 64 2e 63 27 0a | of 'pml|ined.c'.|
|00002d70| 66 69 0a 69 66 20 74 65 | 73 74 20 2d 66 20 27 74 |fi.if te|st -f 't|
|00002d80| 65 72 6d 63 61 70 27 20 | 2d 61 20 22 24 7b 31 7d |ermcap' |-a "${1}|
|00002d90| 22 20 21 3d 20 22 2d 63 | 22 20 3b 20 74 68 65 6e |" != "-c|" ; then|
|00002da0| 20 0a 20 20 65 63 68 6f | 20 73 68 61 72 3a 20 57 | .  echo| shar: W|
|00002db0| 69 6c 6c 20 6e 6f 74 20 | 63 6c 6f 62 62 65 72 20 |ill not |clobber |
|00002dc0| 65 78 69 73 74 69 6e 67 | 20 66 69 6c 65 20 5c 22 |existing| file \"|
|00002dd0| 27 74 65 72 6d 63 61 70 | 27 5c 22 0a 65 6c 73 65 |'termcap|'\".else|
|00002de0| 0a 65 63 68 6f 20 73 68 | 61 72 3a 20 45 78 74 72 |.echo sh|ar: Extr|
|00002df0| 61 63 74 69 6e 67 20 5c | 22 27 74 65 72 6d 63 61 |acting \|"'termca|
|00002e00| 70 27 5c 22 20 5c 28 34 | 36 36 20 63 68 61 72 61 |p'\" \(4|66 chara|
|00002e10| 63 74 65 72 73 5c 29 0a | 73 65 64 20 22 73 2f 5e |cters\).|sed "s/^|
|00002e20| 58 2f 2f 22 20 3e 27 74 | 65 72 6d 63 61 70 27 20 |X//" >'t|ermcap' |
|00002e30| 3c 3c 27 45 4e 44 5f 4f | 46 5f 46 49 4c 45 27 0a |<<'END_O|F_FILE'.|
|00002e40| 58 76 34 7c 76 74 31 30 | 32 2d 32 34 7c 44 45 43 |Xv4|vt10|2-24|DEC|
|00002e50| 20 76 74 31 30 32 20 77 | 69 74 68 20 32 34 20 6c | vt102 w|ith 24 l|
|00002e60| 69 6e 65 73 3a 2e 61 6c | 3d 5c 45 5b 4c 3a 2e 61 |ines:.al|=\E[L:.a|
|00002e70| 6d 3a 62 6c 3d 5e 47 3a | 62 73 3a 63 64 3d 35 30 |m:bl=^G:|bs:cd=50|
|00002e80| 5c 45 5b 4a 3a 63 65 3d | 33 5c 45 5b 4b 3a 63 6c |\E[J:ce=|3\E[K:cl|
|00002e90| 3d 35 30 5c 45 5b 3b 48 | 5c 45 5b 32 4a 3a 63 6d |=50\E[;H|\E[2J:cm|
|00002ea0| 3d 35 5c 45 5b 25 69 25 | 32 3b 25 32 48 3a 63 6f |=5\E[%i%|2;%2H:co|
|00002eb0| 23 38 30 3a 63 73 3d 35 | 5c 45 5b 25 69 25 64 3b |#80:cs=5|\E[%i%d;|
|00002ec0| 25 64 72 3a 64 63 3d 32 | 5c 45 5b 50 3a 2e 64 6c |%dr:dc=2|\E[P:.dl|
|00002ed0| 3d 5c 45 5b 4d 3a 64 6f | 3d 33 5c 45 5b 42 3a 64 |=\E[M:do|=3\E[B:d|
|00002ee0| 73 3d 33 5c 45 5b 4b 3a | 65 73 3a 66 73 3d 5c 45 |s=3\E[K:|es:fs=\E|
|00002ef0| 38 3a 68 73 3a 6c 65 3d | 32 5c 45 5b 44 3a 6c 69 |8:hs:le=|2\E[D:li|
|00002f00| 23 32 33 3a 6d 65 3d 32 | 5c 45 5b 6d 3a 6e 64 3d |#23:me=2|\E[m:nd=|
|00002f10| 32 5c 45 5b 43 3a 70 74 | 3a 52 63 3d 5c 45 38 3a |2\E[C:pt|:Rc=\E8:|
|00002f20| 53 63 3d 5c 45 37 3a 73 | 65 3d 32 5c 45 5b 6d 3a |Sc=\E7:s|e=2\E[m:|
|00002f30| 73 66 3d 32 5e 4a 3a 73 | 67 3d 30 3a 73 6f 3d 32 |sf=2^J:s|g=0:so=2|
|00002f40| 5c 45 5b 31 6d 3a 73 72 | 3d 35 5c 45 4d 3a 74 61 |\E[1m:sr|=5\EM:ta|
|00002f50| 3d 5e 49 3a 74 73 3d 35 | 5c 45 37 5c 45 5b 3f 36 |=^I:ts=5|\E7\E[?6|
|00002f60| 68 5c 45 5b 32 34 3b 30 | 48 3a 75 65 3d 32 5c 45 |h\E[24;0|H:ue=2\E|
|00002f70| 5b 6d 3a 75 67 3d 30 3a | 75 70 3d 32 5c 45 5b 41 |[m:ug=0:|up=2\E[A|
|00002f80| 3a 75 73 3d 32 5c 45 5b | 34 6d 3a 69 73 3d 5c 45 |:us=2\E[|4m:is=\E|
|00002f90| 37 5c 45 5b 31 3b 32 33 | 72 5c 45 3e 5c 45 5b 3f |7\E[1;23|r\E>\E[?|
|00002fa0| 31 3b 33 3b 34 3b 35 6c | 5c 45 5b 3f 36 3b 37 3b |1;3;4;5l|\E[?6;7;|
|00002fb0| 38 68 5c 45 38 3a 69 66 | 3d 2f 75 73 72 2f 6c 69 |8h\E8:if|=/usr/li|
|00002fc0| 62 2f 74 61 62 73 65 74 | 2f 76 74 31 30 30 3a 72 |b/tabset|/vt100:r|
|00002fd0| 73 3d 5c 45 37 5c 45 5b | 31 3b 32 33 72 5c 45 3e |s=\E7\E[|1;23r\E>|
|00002fe0| 5c 45 5b 3f 31 3b 33 3b | 34 3b 35 6c 5c 45 5b 3f |\E[?1;3;|4;5l\E[?|
|00002ff0| 36 3b 37 3b 38 68 5c 45 | 38 3a 68 6f 3d 35 5c 45 |6;7;8h\E|8:ho=5\E|
|00003000| 5b 3b 48 3a 63 72 3d 5e | 4d 3a 69 63 3d 5c 45 5b |[;H:cr=^|M:ic=\E[|
|00003010| 40 3a 0a 45 4e 44 5f 4f | 46 5f 46 49 4c 45 0a 69 |@:.END_O|F_FILE.i|
|00003020| 66 20 74 65 73 74 20 34 | 36 36 20 2d 6e 65 20 60 |f test 4|66 -ne `|
|00003030| 77 63 20 2d 63 20 3c 27 | 74 65 72 6d 63 61 70 27 |wc -c <'|termcap'|
|00003040| 60 3b 20 74 68 65 6e 0a | 20 20 20 20 65 63 68 6f |`; then.|    echo|
|00003050| 20 73 68 61 72 3a 20 5c | 22 27 74 65 72 6d 63 61 | shar: \|"'termca|
|00003060| 70 27 5c 22 20 75 6e 70 | 61 63 6b 65 64 20 77 69 |p'\" unp|acked wi|
|00003070| 74 68 20 77 72 6f 6e 67 | 20 73 69 7a 65 21 0a 66 |th wrong| size!.f|
|00003080| 69 0a 23 20 65 6e 64 20 | 6f 66 20 27 74 65 72 6d |i.# end |of 'term|
|00003090| 63 61 70 27 0a 66 69 0a | 65 63 68 6f 20 73 68 61 |cap'.fi.|echo sha|
|000030a0| 72 3a 20 45 6e 64 20 6f | 66 20 73 68 65 6c 6c 20 |r: End o|f shell |
|000030b0| 61 72 63 68 69 76 65 2e | 0a 65 78 69 74 20 30 0a |archive.|.exit 0.|
+--------+-------------------------+-------------------------+--------+--------+