/ Source Code 1994 March / Source_Code_CD-ROM_Walnut_Creek_March_1994.iso / unix_c / telecom / modemctl.tar

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 6d 6f 64 65 6d 63 74 6c | 2f 00 00 00 00 00 00 00 |modemctl|/.......|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 00 00 00 00 20 20 20 37 | 35 35 20 00 20 20 20 32 |....   7|55 .   2|
|00000070| 34 33 20 00 20 20 20 20 | 31 32 20 00 20 20 20 20 |43 .    |12 .    |
|00000080| 20 20 20 20 20 20 30 20 | 20 34 34 30 34 30 36 35 |      0 | 4404065|
|00000090| 33 30 36 20 20 20 35 36 | 32 31 00 20 00 00 00 00 |306   56|21. ....|
|000000a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 6d 6f 64 65 6d 63 74 6c | 2f 53 68 61 72 46 69 6c |modemctl|/SharFil|
|00000210| 65 2e 48 65 61 64 65 72 | 73 00 00 00 00 00 00 00 |e.Header|s.......|
|00000220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000230| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000250| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000260| 00 00 00 00 20 20 20 36 | 34 34 20 00 20 20 20 32 |....   6|44 .   2|
|00000270| 34 33 20 00 20 20 20 20 | 31 32 20 00 20 20 20 20 |43 .    |12 .    |
|00000280| 20 20 20 31 33 37 30 20 | 20 34 34 30 34 30 36 35 |   1370 | 4404065|
|00000290| 33 30 37 20 20 31 30 37 | 30 32 00 20 00 00 00 00 |307  107|02. ....|
|000002a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000300| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000310| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000350| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000360| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000370| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000380| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000390| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000400| 3d 3d 3d 20 6d 6f 64 65 | 6d 63 74 6c 2e 73 68 61 |=== mode|mctl.sha|
|00000410| 72 20 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |r ======|========|
|00000420| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 0a 46 72 6f 6d |========|===.From|
|00000430| 20 70 75 72 2d 65 65 21 | 6a 2e 63 63 2e 70 75 72 | pur-ee!|j.cc.pur|
|00000440| 64 75 65 2e 65 64 75 21 | 69 2e 63 63 2e 70 75 72 |due.edu!|i.cc.pur|
|00000450| 64 75 65 2e 65 64 75 21 | 70 75 72 64 75 65 21 62 |due.edu!|purdue!b|
|00000460| 75 2d 63 73 21 68 75 73 | 63 36 21 62 62 6e 21 62 |u-cs!hus|c6!bbn!b|
|00000470| 62 6e 2e 63 6f 6d 21 72 | 73 61 6c 7a 20 54 68 75 |bn.com!r|salz Thu|
|00000480| 20 4d 61 79 20 32 36 20 | 31 31 3a 35 32 3a 34 36 | May 26 |11:52:46|
|00000490| 20 45 53 54 20 31 39 38 | 38 0a 0a 53 75 62 6d 69 | EST 198|8..Submi|
|000004a0| 74 74 65 64 2d 62 79 3a | 20 44 61 76 65 20 53 65 |tted-by:| Dave Se|
|000004b0| 74 74 6c 65 20 3c 4e 6f | 20 6e 65 74 20 61 64 64 |ttle <No| net add|
|000004c0| 72 65 73 73 3e 0a 50 6f | 73 74 69 6e 67 2d 6e 75 |ress>.Po|sting-nu|
|000004d0| 6d 62 65 72 3a 20 56 6f | 6c 75 6d 65 20 31 35 2c |mber: Vo|lume 15,|
|000004e0| 20 49 73 73 75 65 20 31 | 30 0a 41 72 63 68 69 76 | Issue 1|0.Archiv|
|000004f0| 65 2d 6e 61 6d 65 3a 20 | 6d 6f 64 65 6d 2d 63 74 |e-name: |modem-ct|
|00000500| 6c 0a 0a 5b 20 20 53 65 | 65 6d 73 20 6f 72 69 65 |l..[  Se|ems orie|
|00000510| 6e 74 65 64 20 74 6f 77 | 61 72 64 20 53 79 73 74 |nted tow|ard Syst|
|00000520| 65 6d 20 56 2d 6f 69 64 | 20 6d 61 63 68 69 6e 65 |em V-oid| machine|
|00000530| 73 2e 2e 2e 20 20 2d 2d | 72 24 20 20 5d 0a 0a 09 |s...  --|r$  ]...|
|00000540| 49 27 6d 20 73 75 62 6d | 69 74 74 69 6e 67 20 74 |I'm subm|itting t|
|00000550| 68 65 20 6e 65 77 20 76 | 65 72 73 69 6f 6e 20 6f |he new v|ersion o|
|00000560| 66 20 27 6d 6f 64 65 6d | 27 2c 20 61 20 70 72 6f |f 'modem|', a pro|
|00000570| 67 72 61 6d 0a 74 6f 20 | 61 6c 6c 6f 77 20 61 20 |gram.to |allow a |
|00000580| 6c 69 6e 65 20 63 6f 6e | 6e 65 63 74 65 64 20 74 |line con|nected t|
|00000590| 6f 20 61 20 6d 6f 64 65 | 6d 20 74 6f 20 62 65 20 |o a mode|m to be |
|000005a0| 75 73 65 64 20 66 6f 72 | 20 62 69 2d 64 69 72 65 |used for| bi-dire|
|000005b0| 63 74 69 6f 6e 61 6c 0a | 75 75 63 70 2f 63 75 20 |ctional.|uucp/cu |
|000005c0| 61 63 63 65 73 73 65 73 | 2e 0a 0a 09 49 74 20 66 |accesses|....It f|
|000005d0| 75 6e 63 74 69 6f 6e 61 | 6c 6c 79 20 72 65 70 6c |unctiona|lly repl|
|000005e0| 61 63 65 73 20 27 75 75 | 67 65 74 74 79 27 2c 20 |aces 'uu|getty', |
|000005f0| 62 75 74 20 70 72 6f 76 | 69 64 65 73 20 61 20 6d |but prov|ides a m|
|00000600| 6f 72 65 20 73 6f 70 68 | 69 73 74 69 63 61 74 65 |ore soph|isticate|
|00000610| 64 0a 6d 65 74 68 6f 64 | 20 6f 66 20 74 61 6c 6b |d.method| of talk|
|00000620| 69 6e 67 20 74 6f 20 69 | 6e 74 65 6c 6c 69 67 65 |ing to i|ntellige|
|00000630| 6e 74 20 6d 6f 64 65 6d | 73 2c 20 77 68 69 63 68 |nt modem|s, which|
|00000640| 20 63 61 6e 20 73 63 72 | 65 77 20 75 70 20 75 75 | can scr|ew up uu|
|00000650| 67 65 74 74 79 20 62 79 | 0a 74 61 6c 6b 69 6e 67 |getty by|.talking|
|00000660| 20 74 6f 6f 20 6d 75 63 | 68 2e 0a 0a 09 54 68 65 | too muc|h....The|
|00000670| 20 6e 65 77 20 76 65 72 | 73 69 6f 6e 20 6e 6f 77 | new ver|sion now|
|00000680| 20 68 61 73 20 73 75 70 | 70 6f 72 74 20 66 6f 72 | has sup|port for|
|00000690| 20 68 61 72 64 77 61 72 | 65 20 44 43 44 20 64 65 | hardwar|e DCD de|
|000006a0| 74 65 63 74 69 6f 6e 2c | 20 77 68 69 63 68 0a 61 |tection,| which.a|
|000006b0| 6c 6c 6f 77 73 20 74 68 | 65 20 73 68 65 6c 6c 20 |llows th|e shell |
|000006c0| 74 6f 20 62 65 20 68 75 | 6e 67 75 70 20 77 68 65 |to be hu|ngup whe|
|000006d0| 6e 20 74 68 65 20 6c 69 | 6e 65 20 69 73 20 64 72 |n the li|ne is dr|
|000006e0| 6f 70 70 65 64 2e 0a 0a | 43 68 65 65 72 73 2c 0a |opped...|Cheers,.|
|000006f0| 09 44 61 76 65 2e 0a 0a | 00 00 00 00 00 00 00 00 |.Dave...|........|
|00000700| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000710| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000720| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000730| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000740| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000750| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000760| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000770| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000780| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000790| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000800| 6d 6f 64 65 6d 63 74 6c | 2f 52 45 41 44 4d 45 00 |modemctl|/README.|
|00000810| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000820| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000830| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000840| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000850| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000860| 00 00 00 00 20 20 20 36 | 34 34 20 00 20 20 20 32 |....   6|44 .   2|
|00000870| 34 33 20 00 20 20 20 20 | 31 32 20 00 20 20 20 20 |43 .    |12 .    |
|00000880| 20 20 20 34 33 34 34 20 | 20 34 34 30 34 30 36 35 |   4344 | 4404065|
|00000890| 32 36 31 20 20 20 36 35 | 37 33 00 20 00 00 00 00 |261   65|73. ....|
|000008a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000900| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000910| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000920| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000930| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000940| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000950| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000960| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000970| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000980| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000990| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a00| 4d 6f 64 65 6d 3a 20 41 | 20 62 69 2d 64 69 72 65 |Modem: A| bi-dire|
|00000a10| 63 74 69 6f 6e 61 6c 20 | 75 75 67 65 74 74 79 20 |ctional |uugetty |
|00000a20| 72 65 70 6c 61 63 65 6d | 65 6e 74 2e 0a 0a 22 4d |replacem|ent..."M|
|00000a30| 6f 64 65 6d 22 20 77 6f | 72 6b 73 20 6a 75 73 74 |odem" wo|rks just|
|00000a40| 20 6c 69 6b 65 20 22 75 | 75 67 65 74 74 79 22 2c | like "u|ugetty",|
|00000a50| 20 61 6e 64 20 61 6c 6c | 6f 77 73 20 69 6e 63 6f | and all|ows inco|
|00000a60| 6d 69 6e 67 20 61 6e 64 | 20 6f 75 74 67 6f 69 6e |ming and| outgoin|
|00000a70| 67 20 63 61 6c 6c 73 20 | 0a 74 68 72 6f 75 67 68 |g calls |.through|
|00000a80| 20 74 68 65 20 73 61 6d | 65 20 70 6f 72 74 2e 0a | the sam|e port..|
|00000a90| 0a 49 6e 20 61 64 64 69 | 74 69 6f 6e 2c 20 69 74 |.In addi|tion, it|
|00000aa0| 20 61 6c 6c 6f 77 73 20 | 70 72 6f 76 69 64 65 73 | allows |provides|
|00000ab0| 20 61 64 64 69 74 69 6f | 6e 61 6c 20 66 61 63 69 | additio|nal faci|
|00000ac0| 6c 69 74 69 65 73 3a 0a | 0a 31 2f 2e 09 4f 70 74 |lities:.|.1/..Opt|
|00000ad0| 69 6f 6e 20 74 6f 20 69 | 6e 73 65 72 74 20 61 20 |ion to i|nsert a |
|00000ae0| 75 75 63 70 2d 73 74 79 | 6c 65 20 73 65 6e 64 2d |uucp-sty|le send-|
|00000af0| 65 78 70 65 63 74 20 63 | 6f 6e 76 65 72 73 61 74 |expect c|onversat|
|00000b00| 69 6f 6e 20 74 6f 0a 69 | 6e 69 74 69 61 6c 69 73 |ion to.i|nitialis|
|00000b10| 65 20 74 68 65 20 6d 6f | 64 65 6d 2e 0a 0a 32 2f |e the mo|dem...2/|
|00000b20| 2e 09 43 6f 64 65 20 74 | 6f 20 73 70 61 77 6e 20 |..Code t|o spawn |
|00000b30| 67 65 74 74 79 20 61 74 | 20 74 68 65 20 63 6f 72 |getty at| the cor|
|00000b40| 72 65 63 74 20 73 70 65 | 65 64 2c 20 69 66 20 79 |rect spe|ed, if y|
|00000b50| 6f 75 20 68 61 76 65 20 | 61 20 6d 6f 64 65 6d 20 |ou have |a modem |
|00000b60| 74 68 61 74 0a 63 61 6e | 20 73 65 6e 73 65 20 74 |that.can| sense t|
|00000b70| 68 65 20 73 70 65 65 64 | 20 6f 66 20 69 6e 63 6f |he speed| of inco|
|00000b80| 6d 69 6e 67 20 63 61 6c | 6c 73 2e 0a 0a 33 2f 2e |ming cal|ls...3/.|
|00000b90| 09 41 75 74 6f 6c 6f 67 | 6f 75 74 20 66 61 63 69 |.Autolog|out faci|
|00000ba0| 6c 69 74 79 2c 20 69 66 | 20 74 68 65 72 65 20 69 |lity, if| there i|
|00000bb0| 73 20 6e 6f 20 61 63 74 | 69 76 69 74 79 20 6f 6e |s no act|ivity on|
|00000bc0| 20 74 68 65 20 6d 6f 64 | 65 6d 20 66 6f 72 0a 61 | the mod|em for.a|
|00000bd0| 20 73 70 65 63 69 66 69 | 65 64 20 70 65 72 69 6f | specifi|ed perio|
|00000be0| 64 20 6f 66 20 74 69 6d | 65 2e 0a 0a 34 2f 2e 09 |d of tim|e...4/..|
|00000bf0| 4c 6f 67 20 6f 66 20 61 | 6c 6c 20 63 6f 6e 6e 65 |Log of a|ll conne|
|00000c00| 63 74 65 64 20 63 61 6c | 6c 73 2e 0a 0a 35 2f 2e |cted cal|ls...5/.|
|00000c10| 09 4f 70 74 69 6f 6e 20 | 74 6f 20 72 75 6e 20 22 |.Option |to run "|
|00000c20| 77 68 6f 22 20 61 6e 64 | 20 22 70 73 22 20 6f 6e |who" and| "ps" on|
|00000c30| 20 74 68 65 20 70 6f 72 | 74 2c 20 77 68 65 6e 20 | the por|t, when |
|00000c40| 63 6f 6e 6e 65 63 74 65 | 64 2c 0a 69 66 20 79 6f |connecte|d,.if yo|
|00000c50| 75 27 72 65 20 72 65 61 | 6c 6c 79 20 73 65 63 75 |u're rea|lly secu|
|00000c60| 72 69 74 79 2d 63 6f 6e | 63 69 6f 75 73 2e 0a 0a |rity-con|cious...|
|00000c70| 36 2f 2e 09 43 6f 72 72 | 65 63 74 20 68 61 6e 64 |6/..Corr|ect hand|
|00000c80| 6c 69 6e 67 20 6f 66 20 | 44 43 44 20 28 63 61 72 |ling of |DCD (car|
|00000c90| 72 69 65 72 20 64 65 74 | 65 63 74 29 20 73 69 67 |rier det|ect) sig|
|00000ca0| 6e 61 6c 73 20 66 72 6f | 6d 20 74 68 65 20 6d 6f |nals fro|m the mo|
|00000cb0| 64 65 6d 2e 0a 0a 37 2f | 2e 09 57 6f 72 6b 73 20 |dem...7/|..Works |
|00000cc0| 68 61 70 70 69 6c 79 20 | 77 69 74 68 20 22 75 75 |happily |with "uu|
|00000cd0| 63 70 22 2c 20 22 63 75 | 22 2c 20 61 6e 64 20 22 |cp", "cu|", and "|
|00000ce0| 6b 65 72 6d 69 74 22 2c | 20 77 68 69 63 68 20 61 |kermit",| which a|
|00000cf0| 72 65 20 6e 6f 74 20 61 | 77 61 72 65 0a 74 68 61 |re not a|ware.tha|
|00000d00| 74 20 22 6d 6f 64 65 6d | 22 20 69 73 20 72 75 6e |t "modem|" is run|
|00000d10| 6e 69 6e 67 2e 20 5b 4e | 42 20 53 6c 69 67 68 74 |ning. [N|B Slight|
|00000d20| 20 63 68 61 6e 67 65 20 | 6e 65 63 65 73 73 61 72 | change |necessar|
|00000d30| 79 20 74 6f 20 75 75 63 | 70 20 64 69 61 6c 65 72 |y to uuc|p dialer|
|00000d40| 20 73 63 72 69 70 74 0a | 72 65 71 75 69 72 65 64 | script.|required|
|00000d50| 5d 0a 0a 38 2f 2e 09 53 | 74 61 74 65 2d 63 68 61 |]..8/..S|tate-cha|
|00000d60| 6e 67 69 6e 67 20 63 6f | 64 65 2c 20 77 68 69 63 |nging co|de, whic|
|00000d70| 68 20 61 6c 6c 6f 77 73 | 20 79 6f 75 20 74 6f 20 |h allows| you to |
|00000d80| 73 65 74 20 74 68 65 20 | 6d 6f 64 65 6d 20 69 6e |set the |modem in|
|00000d90| 20 61 20 73 74 61 74 65 | 0a 72 65 6c 61 74 65 64 | a state|.related|
|00000da0| 20 74 6f 20 74 68 65 20 | 74 69 6d 65 20 6f 66 20 | to the |time of |
|00000db0| 64 61 79 2e 20 55 73 65 | 66 75 6c 20 69 66 20 79 |day. Use|ful if y|
|00000dc0| 6f 75 20 77 61 6e 74 20 | 69 74 20 6f 6e 6c 79 20 |ou want |it only |
|00000dd0| 74 6f 20 61 75 74 6f 2d | 61 6e 73 77 65 72 0a 77 |to auto-|answer.w|
|00000de0| 68 65 6e 20 79 6f 75 27 | 72 65 20 6e 6f 74 20 74 |hen you'|re not t|
|00000df0| 68 65 72 65 2c 20 61 6e | 64 20 77 61 6e 74 20 74 |here, an|d want t|
|00000e00| 6f 20 75 73 65 20 69 74 | 20 61 73 20 61 20 74 65 |o use it| as a te|
|00000e10| 6c 65 70 68 6f 6e 65 20 | 6f 74 68 65 72 77 69 73 |lephone |otherwis|
|00000e20| 65 2e 0a 5b 54 68 61 6e | 6b 73 20 74 6f 20 6a 61 |e..[Than|ks to ja|
|00000e30| 63 6b 40 73 77 6c 61 62 | 73 2e 75 75 63 70 20 66 |ck@swlab|s.uucp f|
|00000e40| 6f 72 20 74 68 69 73 20 | 63 6f 64 65 2e 5d 0a 0a |or this |code.]..|
|00000e50| 0a 49 74 20 77 6f 72 6b | 73 20 66 69 6e 65 20 6f |.It work|s fine o|
|00000e60| 6e 20 6d 79 20 6d 6f 64 | 65 6d 2c 20 77 68 69 63 |n my mod|em, whic|
|00000e70| 68 20 74 61 6c 6b 73 20 | 74 6f 6f 20 6d 75 63 68 |h talks |too much|
|00000e80| 20 66 6f 72 20 75 75 67 | 65 74 74 79 20 74 6f 20 | for uug|etty to |
|00000e90| 62 65 20 61 62 6c 65 20 | 74 6f 0a 68 61 6e 64 6c |be able |to.handl|
|00000ea0| 65 20 69 74 21 0a 0a 0a | 46 6f 72 20 79 6f 75 72 |e it!...|For your|
|00000eb0| 20 6c 6f 63 61 6c 20 73 | 69 74 65 2c 20 79 6f 75 | local s|ite, you|
|00000ec0| 20 68 61 76 65 20 74 6f | 20 64 6f 20 74 68 65 20 | have to| do the |
|00000ed0| 66 6f 6c 6c 6f 77 69 6e | 67 3a 0a 0a 50 75 74 20 |followin|g:..Put |
|00000ee0| 74 68 69 73 20 6c 69 6e | 65 20 69 6e 20 2f 65 74 |this lin|e in /et|
|00000ef0| 63 2f 69 6e 69 74 74 61 | 62 0a 58 58 3a 32 3a 72 |c/initta|b.XX:2:r|
|00000f00| 65 73 70 61 77 6e 3a 2f | 75 73 72 2f 6c 69 62 2f |espawn:/|usr/lib/|
|00000f10| 6d 6f 64 65 6d 20 74 74 | 79 58 58 09 09 77 68 65 |modem tt|yXX..whe|
|00000f20| 72 65 20 74 74 79 58 58 | 20 69 73 20 79 6f 75 72 |re ttyXX| is your|
|00000f30| 20 6d 6f 64 65 6d 20 6c | 69 6e 65 0a 0a 4d 61 6b | modem l|ine..Mak|
|00000f40| 65 20 73 75 72 65 20 74 | 68 61 74 20 79 6f 75 72 |e sure t|hat your|
|00000f50| 20 64 69 61 6c 65 72 20 | 73 63 72 69 70 74 20 69 | dialer |script i|
|00000f60| 73 20 70 72 65 70 61 72 | 65 64 20 74 6f 3a 0a 0a |s prepar|ed to:..|
|00000f70| 09 61 29 20 73 6c 65 65 | 70 20 66 6f 72 20 3e 20 |.a) slee|p for > |
|00000f80| 31 20 73 65 63 20 42 45 | 46 4f 52 45 20 72 65 61 |1 sec BE|FORE rea|
|00000f90| 64 69 6e 67 20 74 68 65 | 20 66 69 72 73 74 20 72 |ding the| first r|
|00000fa0| 65 70 6c 79 20 66 72 6f | 6d 20 74 68 65 20 6d 6f |eply fro|m the mo|
|00000fb0| 64 65 6d 0a 09 62 29 20 | 61 63 63 65 70 74 20 74 |dem..b) |accept t|
|00000fc0| 68 61 74 20 74 68 65 20 | 66 69 72 73 74 20 63 68 |hat the |first ch|
|00000fd0| 61 72 61 63 74 65 72 20 | 73 65 6e 74 20 62 79 20 |aracter |sent by |
|00000fe0| 74 68 65 20 6d 6f 64 65 | 6d 20 77 69 6c 6c 20 4e |the mode|m will N|
|00000ff0| 4f 54 20 67 65 74 20 74 | 68 65 72 65 0a 0a 65 2e |OT get t|here..e.|
|00001000| 67 2e 20 4d 79 20 48 61 | 79 65 73 20 64 69 61 6c |g. My Ha|yes dial|
|00001010| 65 72 20 73 63 72 69 70 | 74 20 69 73 20 4e 4f 52 |er scrip|t is NOR|
|00001020| 4d 41 4c 4c 59 0a 0a 09 | 2e 2e 2e 20 41 54 20 4f |MALLY...|... AT O|
|00001030| 4b 20 41 54 44 50 5c 54 | 20 43 4f 4e 4e 45 43 54 |K ATDP\T| CONNECT|
|00001040| 0a 0a 62 75 74 20 4d 55 | 53 54 20 62 65 20 6d 6f |..but MU|ST be mo|
|00001050| 64 69 66 69 65 64 20 74 | 6f 0a 0a 09 2e 2e 2e 20 |dified t|o...... |
|00001060| 41 54 5c 72 5c 44 20 4f | 4b 20 41 54 44 50 5c 54 |AT\r\D O|K ATDP\T|
|00001070| 20 43 4f 4e 4e 45 43 54 | 20 20 09 09 23 28 20 5c | CONNECT|  ..#( \|
|00001080| 44 20 69 73 20 61 20 32 | 2d 73 65 63 20 70 61 75 |D is a 2|-sec pau|
|00001090| 73 65 20 29 0a 0a 0a 4d | 6f 64 69 66 79 20 74 68 |se )...M|odify th|
|000010a0| 65 20 69 6e 63 6c 75 64 | 65 64 20 64 69 61 6c 65 |e includ|ed diale|
|000010b0| 72 20 73 63 72 69 70 74 | 20 74 6f 20 74 61 6c 6b |r script| to talk|
|000010c0| 20 74 6f 20 59 4f 55 52 | 20 6d 6f 64 65 6d 2c 20 | to YOUR| modem, |
|000010d0| 69 66 20 79 6f 75 20 68 | 61 76 65 20 61 20 6e 6f |if you h|ave a no|
|000010e0| 6e 2d 0a 73 75 70 70 6f | 72 74 65 64 20 6d 6f 64 |n-.suppo|rted mod|
|000010f0| 65 6d 20 74 79 70 65 2e | 20 50 6c 65 61 73 65 20 |em type.| Please |
|00001100| 6c 65 74 20 6d 65 20 68 | 61 76 65 20 79 6f 75 72 |let me h|ave your|
|00001110| 20 73 63 72 69 70 74 73 | 2c 20 73 6f 20 74 68 61 | scripts|, so tha|
|00001120| 74 20 49 20 63 61 6e 20 | 69 6e 63 6c 75 64 65 0a |t I can |include.|
|00001130| 74 68 65 6d 20 69 6e 20 | 66 75 74 75 72 65 20 72 |them in |future r|
|00001140| 65 6c 65 61 73 65 73 2e | 0a 0a 4d 6f 64 69 66 79 |eleases.|..Modify|
|00001150| 20 74 68 65 20 73 70 65 | 65 64 2d 64 65 74 65 63 | the spe|ed-detec|
|00001160| 74 69 6f 6e 20 72 6f 75 | 74 69 6e 65 2c 20 69 66 |tion rou|tine, if|
|00001170| 20 79 6f 75 72 20 6d 6f | 64 65 6d 20 69 73 20 6e | your mo|dem is n|
|00001180| 6f 74 20 61 20 68 61 79 | 65 73 2d 63 6f 6d 70 61 |ot a hay|es-compa|
|00001190| 74 69 62 6c 65 0a 0a 4d | 6f 64 69 66 79 20 22 6c |tible..M|odify "l|
|000011a0| 6f 63 6b 65 64 28 29 22 | 20 74 6f 20 72 65 61 64 |ocked()"| to read|
|000011b0| 20 59 4f 55 52 20 6c 6f | 63 6b 20 64 69 72 65 63 | YOUR lo|ck direc|
|000011c0| 74 6f 72 79 20 2d 20 62 | 75 74 20 73 65 65 20 74 |tory - b|ut see t|
|000011d0| 68 65 20 6d 61 6b 65 66 | 69 6c 65 20 6f 70 74 69 |he makef|ile opti|
|000011e0| 6f 6e 73 0a 66 6f 72 20 | 76 61 72 69 6f 75 73 20 |ons.for |various |
|000011f0| 6c 6f 63 6b 66 69 6c 65 | 20 70 72 6f 74 6f 63 6f |lockfile| protoco|
|00001200| 6c 73 2e 0a 0a 49 66 20 | 6e 65 63 65 73 73 61 72 |ls...If |necessar|
|00001210| 79 2c 20 6d 6f 64 69 66 | 79 20 74 68 65 20 77 69 |y, modif|y the wi|
|00001220| 72 69 6e 67 20 74 6f 20 | 74 68 65 20 6d 6f 64 65 |ring to |the mode|
|00001230| 6d 20 73 6f 20 74 68 61 | 74 20 44 43 44 20 69 73 |m so tha|t DCD is|
|00001240| 20 61 73 73 65 72 74 65 | 64 0a 77 68 65 6e 20 74 | asserte|d.when t|
|00001250| 68 65 20 6d 6f 64 65 6d | 20 69 73 20 6f 6e 6c 69 |he modem| is onli|
|00001260| 6e 65 2c 20 62 75 74 20 | 6e 6f 74 20 61 73 73 65 |ne, but |not asse|
|00001270| 72 74 65 64 20 61 74 20 | 6f 74 68 65 72 20 74 69 |rted at |other ti|
|00001280| 6d 65 73 2e 20 20 54 68 | 69 73 20 69 73 0a 6e 65 |mes.  Th|is is.ne|
|00001290| 63 65 73 73 61 72 79 20 | 66 6f 72 20 74 68 65 20 |cessary |for the |
|000012a0| 6d 6f 64 65 6d 20 74 6f | 20 67 65 6e 65 72 61 74 |modem to| generat|
|000012b0| 65 20 61 20 68 61 6e 67 | 75 70 20 73 69 67 6e 61 |e a hang|up signa|
|000012c0| 6c 20 77 68 65 6e 20 61 | 20 72 65 6d 6f 74 65 20 |l when a| remote |
|000012d0| 73 69 74 65 0a 64 69 73 | 63 6f 6e 6e 65 63 74 73 |site.dis|connects|
|000012e0| 2e 20 0a 0a 00 00 00 00 | 00 00 00 00 00 00 00 00 |. ......|........|
|000012f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001300| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001310| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001350| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001360| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001370| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001380| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001390| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000013a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000013b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000013c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000013d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000013e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000013f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001400| 6d 6f 64 65 6d 63 74 6c | 2f 6d 6f 64 65 6d 2e 31 |modemctl|/modem.1|
|00001410| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001420| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001430| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001440| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001450| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001460| 00 00 00 00 20 20 20 36 | 34 34 20 00 20 20 20 32 |....   6|44 .   2|
|00001470| 34 33 20 00 20 20 20 20 | 31 32 20 00 20 20 20 20 |43 .    |12 .    |
|00001480| 20 20 20 34 30 32 31 20 | 20 34 34 30 34 30 36 35 |   4021 | 4404065|
|00001490| 32 36 33 20 20 20 37 30 | 37 30 00 20 00 00 00 00 |263   70|70. ....|
|000014a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001500| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001510| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001520| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001530| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001540| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001550| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001580| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001590| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001600| 2e 54 48 20 6d 6f 64 65 | 6d 20 31 20 6c 6f 63 61 |.TH mode|m 1 loca|
|00001610| 6c 0a 2e 53 48 20 4e 41 | 4d 45 0a 6d 6f 64 65 6d |l..SH NA|ME.modem|
|00001620| 0a 2e 53 48 20 53 59 4e | 4f 50 53 49 53 0a 2e 42 |..SH SYN|OPSIS..B|
|00001630| 20 22 6d 6f 64 65 6d 20 | 5b 73 70 65 65 64 5d 20 | "modem |[speed] |
|00001640| 74 74 79 22 0a 2e 50 50 | 0a 2e 53 48 20 44 45 53 |tty"..PP|..SH DES|
|00001650| 43 52 49 50 54 49 4f 4e | 0a 2e 49 20 6d 6f 64 65 |CRIPTION|..I mode|
|00001660| 6d 0a 69 73 20 61 20 66 | 75 6e 63 74 69 6f 6e 61 |m.is a f|unctiona|
|00001670| 6c 20 72 65 70 6c 61 63 | 65 6d 65 6e 74 20 66 6f |l replac|ement fo|
|00001680| 72 20 5c 66 49 75 75 67 | 65 74 74 79 5c 66 52 2c |r \fIuug|etty\fR,|
|00001690| 20 61 6e 64 20 61 6c 6c | 6f 77 73 20 61 20 6c 69 | and all|ows a li|
|000016a0| 6e 65 20 63 6f 6e 6e 65 | 63 74 65 64 0a 74 6f 20 |ne conne|cted.to |
|000016b0| 61 20 6d 6f 64 65 6d 20 | 74 6f 20 62 65 20 75 73 |a modem |to be us|
|000016c0| 65 64 20 66 6f 72 20 62 | 6f 74 68 20 69 6e 63 6f |ed for b|oth inco|
|000016d0| 6d 69 6e 67 20 61 6e 64 | 20 6f 75 74 67 6f 69 6e |ming and| outgoin|
|000016e0| 67 20 75 75 63 70 2f 63 | 75 20 63 61 6c 6c 73 2e |g uucp/c|u calls.|
|000016f0| 0a 2e 50 50 0a 49 74 20 | 68 61 73 20 61 6e 20 69 |..PP.It |has an i|
|00001700| 6e 69 74 69 61 6c 20 63 | 6f 6e 76 65 72 73 61 74 |nitial c|onversat|
|00001710| 69 6f 6e 20 77 69 74 68 | 20 74 68 65 20 6d 6f 64 |ion with| the mod|
|00001720| 65 6d 2c 20 73 6f 20 74 | 68 61 74 20 69 74 20 63 |em, so t|hat it c|
|00001730| 61 6e 20 62 65 20 73 65 | 74 0a 69 6e 20 74 68 65 |an be se|t.in the|
|00001740| 20 63 6f 72 72 65 63 74 | 20 6d 6f 64 65 2c 20 61 | correct| mode, a|
|00001750| 6e 64 20 74 68 65 6e 20 | 77 61 69 74 73 20 66 6f |nd then |waits fo|
|00001760| 72 20 74 68 65 20 6d 6f | 64 65 6d 20 74 6f 20 64 |r the mo|dem to d|
|00001770| 65 74 65 63 74 20 61 6e | 20 69 6e 63 6f 6d 69 6e |etect an| incomin|
|00001780| 67 0a 63 61 6c 6c 2e 20 | 49 74 20 74 68 65 6e 20 |g.call. |It then |
|00001790| 73 70 61 77 6e 73 20 5c | 66 49 67 65 74 74 79 28 |spawns \|fIgetty(|
|000017a0| 38 29 5c 66 52 20 74 6f | 20 6c 6f 67 69 6e 20 74 |8)\fR to| login t|
|000017b0| 68 65 20 75 73 65 72 2c | 20 61 66 74 65 72 20 6d |he user,| after m|
|000017c0| 61 6b 69 6e 67 20 61 6e | 0a 61 6c 74 65 72 61 74 |aking an|.alterat|
|000017d0| 69 6f 6e 20 69 6e 20 74 | 68 65 20 66 69 6c 65 20 |ion in t|he file |
|000017e0| 2f 65 74 63 2f 75 74 6d | 70 2c 20 73 6f 20 74 68 |/etc/utm|p, so th|
|000017f0| 61 74 20 67 65 74 74 79 | 20 74 68 69 6e 6b 73 20 |at getty| thinks |
|00001800| 69 74 20 77 61 73 20 73 | 70 61 77 6e 65 64 20 62 |it was s|pawned b|
|00001810| 79 0a 5c 66 49 69 6e 69 | 74 28 38 29 5c 66 52 2e |y.\fIini|t(8)\fR.|
|00001820| 0a 2e 50 50 0a 57 68 69 | 6c 65 20 74 68 65 20 75 |..PP.Whi|le the u|
|00001830| 73 65 72 20 72 65 6d 61 | 69 6e 73 20 6c 6f 67 67 |ser rema|ins logg|
|00001840| 65 64 20 6f 6e 2c 20 5c | 66 49 6d 6f 64 65 6d 5c |ed on, \|fImodem\|
|00001850| 72 42 20 77 69 6c 6c 20 | 70 65 72 69 6f 64 69 63 |rB will |periodic|
|00001860| 61 6c 6c 79 20 72 75 6e | 0a 5c 66 49 70 73 5c 66 |ally run|.\fIps\f|
|00001870| 52 20 6f 6e 20 74 68 65 | 20 6c 69 6e 65 2c 20 73 |R on the| line, s|
|00001880| 6f 20 74 68 61 74 20 69 | 74 20 63 61 6e 20 72 65 |o that i|t can re|
|00001890| 63 6f 72 64 20 77 68 61 | 74 20 74 68 65 20 75 73 |cord wha|t the us|
|000018a0| 65 72 20 69 73 20 64 6f | 69 6e 67 2e 0a 54 68 69 |er is do|ing..Thi|
|000018b0| 73 20 66 61 63 69 6c 69 | 74 79 20 63 61 6e 20 62 |s facili|ty can b|
|000018c0| 65 20 74 75 72 6e 65 64 | 20 6f 66 66 20 28 73 65 |e turned| off (se|
|000018d0| 65 20 57 41 54 43 48 49 | 54 29 20 6f 70 74 69 6f |e WATCHI|T) optio|
|000018e0| 6e 2c 20 69 66 20 6e 6f | 74 20 72 65 71 75 69 72 |n, if no|t requir|
|000018f0| 65 64 2e 0a 2e 50 50 0a | 49 66 2c 20 61 74 20 61 |ed...PP.|If, at a|
|00001900| 6e 79 20 70 6f 69 6e 74 | 20 70 72 69 6f 72 20 74 |ny point| prior t|
|00001910| 6f 20 74 68 65 20 69 6e | 63 6f 6d 69 6e 67 20 63 |o the in|coming c|
|00001920| 61 6c 6c 2c 20 5c 66 49 | 6d 6f 64 65 6d 5c 66 52 |all, \fI|modem\fR|
|00001930| 20 64 65 74 65 63 74 73 | 20 61 6e 0a 5c 66 42 6f | detects| an.\fBo|
|00001940| 75 74 67 6f 69 6e 67 5c | 66 52 20 63 61 6c 6c 2c |utgoing\|fR call,|
|00001950| 20 74 68 65 6e 20 69 74 | 20 65 78 69 74 73 2e 20 | then it| exits. |
|00001960| 4a 75 73 74 20 62 65 66 | 6f 72 65 20 74 68 65 20 |Just bef|ore the |
|00001970| 65 78 69 74 2c 20 69 74 | 20 61 74 74 65 6d 70 74 |exit, it| attempt|
|00001980| 73 0a 74 6f 20 73 65 74 | 20 74 68 65 20 6c 69 6e |s.to set| the lin|
|00001990| 65 20 73 6f 20 74 68 61 | 74 20 69 74 20 63 61 6e |e so tha|t it can|
|000019a0| 20 62 65 20 75 73 65 64 | 20 62 79 20 6f 75 74 67 | be used| by outg|
|000019b0| 6f 69 6e 67 20 63 61 6c | 6c 65 72 73 2e 0a 2e 50 |oing cal|lers...P|
|000019c0| 50 0a 49 66 20 5c 66 49 | 6d 6f 64 65 6d 5c 66 52 |P.If \fI|modem\fR|
|000019d0| 20 64 65 74 65 63 74 73 | 20 61 20 4c 4f 43 4b 20 | detects| a LOCK |
|000019e0| 66 69 6c 65 20 77 68 65 | 6e 20 69 74 20 69 73 20 |file whe|n it is |
|000019f0| 69 6e 76 6f 6b 65 64 2c | 20 74 68 65 6e 20 69 74 |invoked,| then it|
|00001a00| 20 77 69 6c 6c 0a 77 61 | 69 74 20 75 6e 74 69 6c | will.wa|it until|
|00001a10| 20 74 68 69 73 20 66 69 | 6c 65 20 69 73 20 72 65 | this fi|le is re|
|00001a20| 6d 6f 76 65 64 20 62 65 | 66 6f 72 65 20 70 72 6f |moved be|fore pro|
|00001a30| 63 65 65 64 69 6e 67 2e | 0a 2e 50 50 0a 5c 66 49 |ceeding.|..PP.\fI|
|00001a40| 6d 6f 64 65 6d 5c 66 52 | 20 61 6c 73 6f 20 65 6e |modem\fR| also en|
|00001a50| 66 6f 72 63 65 73 20 61 | 6e 20 69 64 6c 65 20 74 |forces a|n idle t|
|00001a60| 69 6d 65 6f 75 74 2c 20 | 73 6f 20 74 68 61 74 20 |imeout, |so that |
|00001a70| 69 74 20 74 68 65 20 6c | 69 6e 65 20 61 70 70 65 |it the l|ine appe|
|00001a80| 61 72 73 0a 74 6f 20 62 | 65 20 69 64 6c 65 20 66 |ars.to b|e idle f|
|00001a90| 6f 72 20 74 6f 6f 20 6c | 6f 6e 67 2c 20 74 68 65 |or too l|ong, the|
|00001aa0| 20 75 73 65 72 20 69 73 | 20 6c 6f 67 67 65 64 20 | user is| logged |
|00001ab0| 6f 75 74 2e 20 54 68 69 | 73 20 6d 61 79 20 63 61 |out. Thi|s may ca|
|00001ac0| 75 73 65 20 70 72 6f 62 | 6c 65 6d 73 0a 77 69 74 |use prob|lems.wit|
|00001ad0| 68 20 6b 65 72 6d 69 74 | 2c 20 77 68 69 63 68 20 |h kermit|, which |
|00001ae0| 64 6f 65 73 6e 27 74 20 | 75 70 64 61 74 65 20 74 |doesn't |update t|
|00001af0| 68 65 20 74 69 6d 65 73 | 20 6f 6e 20 74 68 65 20 |he times| on the |
|00001b00| 64 65 76 69 63 65 2c 20 | 62 75 74 20 75 73 65 73 |device, |but uses|
|00001b10| 0a 5c 66 49 2f 64 65 76 | 2f 74 74 79 5c 66 52 20 |.\fI/dev|/tty\fR |
|00001b20| 69 6e 73 74 65 61 64 2e | 0a 2e 50 50 0a 54 68 65 |instead.|..PP.The|
|00001b30| 20 6f 70 74 69 6f 6e 61 | 6c 20 5c 66 42 73 70 65 | optiona|l \fBspe|
|00001b40| 65 64 5c 66 52 20 61 72 | 67 75 6d 65 6e 74 20 63 |ed\fR ar|gument c|
|00001b50| 61 6e 20 62 65 20 75 73 | 65 64 20 74 6f 20 66 6f |an be us|ed to fo|
|00001b60| 72 63 65 20 5c 66 49 6d | 6f 64 65 6d 5c 66 52 20 |rce \fIm|odem\fR |
|00001b70| 74 6f 20 74 61 6c 6b 0a | 74 6f 20 74 68 65 20 6d |to talk.|to the m|
|00001b80| 6f 64 65 6d 20 61 74 20 | 74 68 65 20 73 70 65 63 |odem at |the spec|
|00001b90| 69 66 69 65 64 20 73 70 | 65 65 64 2c 20 6f 74 68 |ified sp|eed, oth|
|00001ba0| 65 72 77 69 73 65 20 69 | 74 20 77 69 6c 6c 20 74 |erwise i|t will t|
|00001bb0| 61 6c 6b 20 61 74 20 31 | 32 30 30 20 62 61 75 64 |alk at 1|200 baud|
|00001bc0| 2e 0a 2e 50 50 0a 54 68 | 65 20 74 74 79 20 6e 61 |...PP.Th|e tty na|
|00001bd0| 6d 65 20 73 68 6f 75 6c | 64 20 62 65 20 6f 66 20 |me shoul|d be of |
|00001be0| 74 68 65 20 66 6f 72 6d | 20 5c 66 42 74 74 79 34 |the form| \fBtty4|
|00001bf0| 34 5c 66 52 2e 0a 2e 53 | 48 20 45 58 41 4d 50 4c |4\fR...S|H EXAMPL|
|00001c00| 45 53 0a 2e 50 50 0a 34 | 34 3a 32 3a 72 65 73 70 |ES..PP.4|4:2:resp|
|00001c10| 61 77 6e 3a 2f 75 73 72 | 2f 6c 69 62 2f 6d 6f 64 |awn:/usr|/lib/mod|
|00001c20| 65 6d 20 74 74 79 34 34 | 0a 2e 50 50 0a 31 61 3a |em tty44|..PP.1a:|
|00001c30| 32 33 34 3a 72 65 73 70 | 61 77 6e 3a 2f 75 73 72 |234:resp|awn:/usr|
|00001c40| 2f 6c 69 62 2f 6d 6f 64 | 65 6d 20 32 34 30 30 20 |/lib/mod|em 2400 |
|00001c50| 74 74 79 31 61 0a 2e 50 | 50 0a 2e 53 48 20 46 49 |tty1a..P|P..SH FI|
|00001c60| 4c 45 53 0a 2f 64 65 76 | 2f 5c 66 49 3c 74 74 79 |LES./dev|/\fI<tty|
|00001c70| 3e 5c 66 42 0a 2e 50 50 | 0a 2f 75 73 72 2f 73 70 |>\fB..PP|./usr/sp|
|00001c80| 6f 6f 6c 2f 75 75 63 70 | 2f 6d 6f 64 65 6d 2e 6c |ool/uucp|/modem.l|
|00001c90| 6f 67 0a 2e 53 48 20 53 | 45 45 20 41 4c 53 4f 0a |og..SH S|EE ALSO.|
|00001ca0| 67 65 74 74 79 28 38 29 | 2c 20 75 75 67 65 74 74 |getty(8)|, uugett|
|00001cb0| 79 28 38 29 2c 20 73 68 | 28 31 29 2c 20 70 73 28 |y(8), sh|(1), ps(|
|00001cc0| 31 29 2c 20 77 68 6f 28 | 31 29 2c 20 75 74 6d 70 |1), who(|1), utmp|
|00001cd0| 28 34 29 0a 2e 53 48 20 | 42 55 47 53 0a 54 68 65 |(4)..SH |BUGS.The|
|00001ce0| 20 63 6f 64 65 20 66 6f | 72 20 68 61 72 64 77 61 | code fo|r hardwa|
|00001cf0| 72 65 20 44 43 44 20 64 | 65 74 65 63 74 69 6f 6e |re DCD d|etection|
|00001d00| 20 73 75 70 70 6f 72 74 | 20 69 73 20 6e 65 77 2e | support| is new.|
|00001d10| 0a 2e 50 50 0a 54 68 65 | 72 65 20 61 72 65 20 73 |..PP.The|re are s|
|00001d20| 74 69 6c 6c 20 73 6f 6d | 65 20 75 6e 65 78 70 6c |till som|e unexpl|
|00001d30| 61 69 6e 65 64 20 64 69 | 61 67 6e 6f 73 74 69 63 |ained di|agnostic|
|00001d40| 73 20 69 6e 20 6d 79 20 | 6c 6f 67 20 66 69 6c 65 |s in my |log file|
|00001d50| 2c 20 6d 61 69 6e 6c 79 | 20 61 62 6f 75 74 0a 77 |, mainly| about.w|
|00001d60| 72 69 74 65 28 31 29 20 | 63 61 6c 6c 73 20 66 61 |rite(1) |calls fa|
|00001d70| 69 6c 69 6e 67 20 74 6f | 20 77 72 69 74 65 20 63 |iling to| write c|
|00001d80| 68 61 72 61 63 74 65 72 | 73 2e 0a 2e 50 50 0a 59 |haracter|s...PP.Y|
|00001d90| 6f 75 20 77 69 6c 6c 20 | 68 61 76 65 20 74 6f 20 |ou will |have to |
|00001da0| 6d 6f 64 69 66 79 20 73 | 6f 6d 65 20 73 6f 75 72 |modify s|ome sour|
|00001db0| 63 65 20 63 6f 64 65 20 | 69 66 20 79 6f 75 72 20 |ce code |if your |
|00001dc0| 6d 6f 64 65 6d 20 61 6e | 64 2f 6f 72 20 73 79 73 |modem an|d/or sys|
|00001dd0| 74 65 6d 20 69 73 0a 64 | 69 66 66 65 72 65 6e 74 |tem is.d|ifferent|
|00001de0| 20 66 72 6f 6d 20 6d 69 | 6e 65 20 28 73 70 65 65 | from mi|ne (spee|
|00001df0| 64 20 63 6f 6e 66 69 67 | 75 72 61 74 69 6f 6e 20 |d config|uration |
|00001e00| 61 6e 64 20 6c 6f 63 6b | 20 66 69 6c 65 73 29 2e |and lock| files).|
|00001e10| 0a 2c 20 6d 6f 64 69 66 | 79 20 74 68 65 20 77 69 |., modif|y the wi|
|00001e20| 72 69 6e 67 20 74 6f 20 | 74 68 65 20 6d 6f 64 65 |ring to |the mode|
|00001e30| 6d 20 73 6f 20 74 68 61 | 74 20 44 43 44 20 69 73 |m so tha|t DCD is|
|00001e40| 20 61 73 73 65 72 74 65 | 64 0a 77 68 65 6e 20 74 | asserte|d.when t|
|00001e50| 68 65 20 6d 6f 64 65 6d | 20 69 73 20 6f 6e 6c 69 |he modem| is onli|
|00001e60| 6e 65 2c 20 62 75 74 20 | 6e 6f 74 20 61 73 73 65 |ne, but |not asse|
|00001e70| 72 74 65 64 20 61 74 20 | 6f 74 68 65 72 20 74 69 |rted at |other ti|
|00001e80| 6d 65 73 2e 20 20 54 68 | 69 73 20 69 73 0a 6e 65 |mes.  Th|is is.ne|
|00001e90| 63 65 73 73 61 72 79 20 | 66 6f 72 20 74 68 65 20 |cessary |for the |
|00001ea0| 6d 6f 64 65 6d 20 74 6f | 20 67 65 6e 65 72 61 74 |modem to| generat|
|00001eb0| 65 20 61 20 68 61 6e 67 | 75 70 20 73 69 67 6e 61 |e a hang|up signa|
|00001ec0| 6c 20 77 68 65 6e 20 61 | 20 72 65 6d 6f 74 65 20 |l when a| remote |
|00001ed0| 73 69 74 65 0a 64 69 73 | 63 6f 6e 6e 65 63 74 73 |site.dis|connects|
|00001ee0| 2e 20 0a 0a 00 00 00 00 | 00 00 00 00 00 00 00 00 |. ......|........|
|00001ef0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001f00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001f10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001f20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001f30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001f40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001f50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001f60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001f70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001f80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001f90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001fa0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001fb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001fc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001fd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001fe0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ff0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002000| 6d 6f 64 65 6d 63 74 6c | 2f 4d 61 6b 65 66 69 6c |modemctl|/Makefil|
|00002010| 65 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |e.......|........|
|00002020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002060| 00 00 00 00 20 20 20 36 | 34 34 20 00 20 20 20 32 |....   6|44 .   2|
|00002070| 34 33 20 00 20 20 20 20 | 31 32 20 00 20 20 20 20 |43 .    |12 .    |
|00002080| 20 20 20 32 34 36 30 20 | 20 34 34 30 34 30 36 35 |   2460 | 4404065|
|00002090| 32 36 35 20 20 20 37 33 | 35 34 00 20 00 00 00 00 |265   73|54. ....|
|000020a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000020b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000020c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000020d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000020e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000020f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000021a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000021b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000021c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000021d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000021e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000021f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002200| 23 0a 23 20 6e 65 77 20 | 6d 61 6b 65 66 69 6c 65 |#.# new |makefile|
|00002210| 20 66 6f 72 20 6d 6f 64 | 65 6d 2e 0a 23 0a 23 20 | for mod|em..#.# |
|00002220| 69 66 20 79 6f 75 72 20 | 6c 6f 63 6b 66 69 6c 65 |if your |lockfile|
|00002230| 20 69 73 3a 0a 23 20 2f | 75 73 72 2f 73 70 6f 6f | is:.# /|usr/spoo|
|00002240| 6c 2f 75 75 63 70 2f 4c | 43 4b 2e 2e 3c 73 79 73 |l/uucp/L|CK..<sys|
|00002250| 74 65 6d 3e 09 09 4e 6f | 20 64 65 66 69 6e 65 73 |tem>..No| defines|
|00002260| 20 6e 65 65 64 65 64 2e | 0a 23 20 2f 75 73 72 2f | needed.|.# /usr/|
|00002270| 73 70 6f 6f 6c 2f 6c 6f | 63 6b 73 2f 4c 43 4b 2e |spool/lo|cks/LCK.|
|00002280| 2e 3c 73 79 73 74 65 6d | 3e 09 2d 44 4f 4c 33 42 |.<system|>.-DOL3B|
|00002290| 32 0a 23 20 2f 75 73 72 | 2f 73 70 6f 6f 6c 2f 6c |2.# /usr|/spool/l|
|000022a0| 6f 63 6b 73 2f 4c 43 4b | 2e 4c 2e 3c 73 79 73 74 |ocks/LCK|.L.<syst|
|000022b0| 65 6d 3e 09 2d 44 48 44 | 42 0a 23 0a 23 20 4e 65 |em>.-DHD|B.#.# Ne|
|000022c0| 77 20 64 65 66 69 6e 69 | 74 69 6f 6e 73 3a 0a 23 |w defini|tions:.#|
|000022d0| 09 48 44 42 3a 09 09 49 | 66 20 79 6f 75 20 68 61 |.HDB:..I|f you ha|
|000022e0| 76 65 20 48 6f 6e 65 79 | 2d 44 61 6e 62 65 72 20 |ve Honey|-Danber |
|000022f0| 55 55 43 50 20 28 54 68 | 61 6e 6b 73 20 52 69 63 |UUCP (Th|anks Ric|
|00002300| 6b 29 0a 23 09 4f 4c 33 | 42 32 3a 09 09 49 66 20 |k).#.OL3|B2:..If |
|00002310| 79 6f 75 20 68 61 76 65 | 20 61 6e 20 4f 6c 69 76 |you have| an Oliv|
|00002320| 65 74 74 69 20 33 42 32 | 0a 23 09 53 50 45 45 44 |etti 3B2|.#.SPEED|
|00002330| 43 4f 4e 46 49 47 3a 09 | 49 66 20 79 6f 75 20 68 |CONFIG:.|If you h|
|00002340| 61 76 65 20 61 20 6d 6f | 64 65 6d 20 74 68 61 74 |ave a mo|dem that|
|00002350| 20 74 65 6c 6c 73 20 79 | 6f 75 20 74 68 65 20 73 | tells y|ou the s|
|00002360| 70 65 65 64 20 6f 66 20 | 69 6e 63 6f 6d 69 6e 67 |peed of |incoming|
|00002370| 0a 23 09 09 09 63 61 6c | 6c 73 20 28 49 6e 20 41 |.#...cal|ls (In A|
|00002380| 53 43 49 49 20 2d 20 33 | 30 30 28 6f 72 20 5c 72 |SCII - 3|00(or \r|
|00002390| 29 2c 20 31 32 30 30 2c | 20 32 34 30 30 2c 20 31 |), 1200,| 2400, 1|
|000023a0| 32 37 35 2c 20 37 35 31 | 32 29 0a 23 09 09 09 49 |275, 751|2).#...I|
|000023b0| 66 20 79 6f 75 72 20 6d | 6f 64 65 6d 20 73 61 79 |f your m|odem say|
|000023c0| 73 20 64 69 66 66 65 72 | 65 6e 74 20 74 68 69 6e |s differ|ent thin|
|000023d0| 67 73 2c 20 68 61 63 6b | 20 74 68 65 20 63 6f 64 |gs, hack| the cod|
|000023e0| 65 0a 23 09 57 41 54 43 | 48 49 54 3a 09 49 66 20 |e.#.WATC|HIT:.If |
|000023f0| 79 6f 75 20 77 61 6e 74 | 20 22 77 68 6f 22 20 61 |you want| "who" a|
|00002400| 6e 64 20 22 70 73 22 20 | 72 75 6e 20 70 65 72 69 |nd "ps" |run peri|
|00002410| 6f 64 69 63 61 6c 6c 79 | 20 74 6f 20 63 68 65 63 |odically| to chec|
|00002420| 6b 0a 23 09 09 09 77 68 | 61 74 27 73 20 67 6f 69 |k.#...wh|at's goi|
|00002430| 6e 67 20 6f 6e 2e 0a 23 | 09 48 41 59 45 53 09 09 |ng on..#|.HAYES..|
|00002440| 49 66 20 79 6f 75 20 68 | 61 76 65 20 61 20 48 61 |If you h|ave a Ha|
|00002450| 79 65 73 2d 74 79 70 65 | 20 6d 6f 64 65 6d 2e 0a |yes-type| modem..|
|00002460| 23 09 4a 53 45 54 3a 09 | 09 49 66 20 79 6f 75 20 |#.JSET:.|.If you |
|00002470| 68 61 76 65 20 61 6e 20 | 41 54 26 54 20 41 7a 74 |have an |AT&T Azt|
|00002480| 65 63 20 6d 6f 64 65 6d | 20 28 54 68 61 6e 6b 73 |ec modem| (Thanks|
|00002490| 20 52 69 63 6b 29 2e 0a | 23 09 44 45 42 55 47 3a | Rick)..|#.DEBUG:|
|000024a0| 09 09 53 65 65 20 77 68 | 61 74 27 73 20 67 6f 69 |..See wh|at's goi|
|000024b0| 6e 67 20 6f 6e 2e 0a 23 | 09 53 4c 4f 57 3a 09 09 |ng on..#|.SLOW:..|
|000024c0| 57 61 69 74 20 31 20 73 | 65 63 20 62 65 74 77 65 |Wait 1 s|ec betwe|
|000024d0| 65 6e 20 65 61 63 68 20 | 63 68 61 72 61 63 74 65 |en each |characte|
|000024e0| 72 20 77 72 69 74 74 65 | 6e 20 74 6f 20 74 68 65 |r writte|n to the|
|000024f0| 20 6d 6f 64 65 6d 2e 20 | 0a 23 09 53 54 41 54 45 | modem. |.#.STATE|
|00002500| 53 09 09 49 66 20 79 6f | 75 20 77 61 6e 74 20 74 |S..If yo|u want t|
|00002510| 6f 20 75 73 65 20 4a 61 | 63 6b 27 73 20 73 74 61 |o use Ja|ck's sta|
|00002520| 74 65 2d 63 68 61 6e 67 | 69 6e 67 20 73 74 75 66 |te-chang|ing stuf|
|00002530| 66 2e 0a 23 0a 23 20 63 | 68 65 63 6b 20 22 6d 6f |f..#.# c|heck "mo|
|00002540| 64 65 6d 2e 68 22 20 66 | 6f 72 20 61 64 64 69 74 |dem.h" f|or addit|
|00002550| 69 6f 6e 61 6c 20 6f 70 | 74 69 6f 6e 73 20 6f 6e |ional op|tions on|
|00002560| 20 64 65 66 61 75 6c 74 | 20 6d 6f 64 65 6d 20 73 | default| modem s|
|00002570| 70 65 65 64 20 61 6e 64 | 20 74 69 6d 65 7a 6f 6e |peed and| timezon|
|00002580| 65 2e 0a 23 0a 43 46 4c | 41 47 53 20 3d 20 2d 44 |e..#.CFL|AGS = -D|
|00002590| 4f 4c 33 42 32 20 2d 44 | 53 50 45 45 44 43 4f 4e |OL3B2 -D|SPEEDCON|
|000025a0| 46 49 47 20 2d 44 57 41 | 54 43 48 49 54 20 2d 44 |FIG -DWA|TCHIT -D|
|000025b0| 48 41 59 45 53 20 0a 50 | 41 52 54 53 20 3d 20 6d |HAYES .P|ARTS = m|
|000025c0| 6f 64 65 6d 2e 6f 20 75 | 63 68 61 6e 67 65 2e 6f |odem.o u|change.o|
|000025d0| 20 73 65 6e 64 65 78 2e | 6f 20 69 6f 2e 6f 20 6c | sendex.|o io.o l|
|000025e0| 69 6e 65 2e 6f 20 73 74 | 61 74 65 6c 6f 6f 6b 2e |ine.o st|atelook.|
|000025f0| 6f 0a 23 20 4c 49 42 53 | 20 3d 20 2d 6c 67 0a 0a |o.# LIBS| = -lg..|
|00002600| 6d 6f 64 65 6d 3a 20 24 | 7b 50 41 52 54 53 7d 0a |modem: $|{PARTS}.|
|00002610| 09 72 6d 20 2d 66 20 6d | 6f 64 65 6d 0a 09 63 63 |.rm -f m|odem..cc|
|00002620| 20 24 7b 50 41 52 54 53 | 7d 20 2d 6f 20 6d 6f 64 | ${PARTS|} -o mod|
|00002630| 65 6d 20 24 7b 4c 49 42 | 53 7d 0a 0a 69 6e 73 74 |em ${LIB|S}..inst|
|00002640| 61 6c 6c 3a 20 6d 6f 64 | 65 6d 0a 09 6d 76 20 2f |all: mod|em..mv /|
|00002650| 65 74 63 2f 6d 6f 64 65 | 6d 20 2f 65 74 63 2f 6d |etc/mode|m /etc/m|
|00002660| 6f 64 65 6d 2e 6f 6c 64 | 0a 09 63 70 20 6d 6f 64 |odem.old|..cp mod|
|00002670| 65 6d 20 2f 65 74 63 0a | 09 0a 6c 69 6e 74 3a 0a |em /etc.|..lint:.|
|00002680| 09 6c 69 6e 74 20 24 7b | 43 46 4c 41 47 53 7d 20 |.lint ${|CFLAGS} |
|00002690| 24 7b 50 41 52 54 53 3a | 2e 6f 3d 2e 63 7d 0a 09 |${PARTS:|.o=.c}..|
|000026a0| 0a 24 7b 50 41 52 54 53 | 7d 3a 20 6d 6f 64 65 6d |.${PARTS|}: modem|
|000026b0| 2e 68 20 4d 61 6b 65 66 | 69 6c 65 0a 0a 73 68 61 |.h Makef|ile..sha|
|000026c0| 72 3a 0a 09 73 68 61 72 | 20 2d 63 76 20 52 45 41 |r:..shar| -cv REA|
|000026d0| 44 4d 45 20 6d 6f 64 65 | 6d 2e 31 20 4d 61 6b 65 |DME mode|m.1 Make|
|000026e0| 66 69 6c 65 20 6d 6f 64 | 65 6d 2e 68 20 24 7b 50 |file mod|em.h ${P|
|000026f0| 41 52 54 53 3a 2e 6f 3d | 2e 63 7d 20 3e 20 6d 6f |ARTS:.o=|.c} > mo|
|00002700| 64 65 6d 2e 73 68 61 72 | 0a 0a 0a 6d 61 6e 3a 0a |dem.shar|...man:.|
|00002710| 09 6e 72 6f 66 66 20 2d | 6d 61 6e 20 6d 6f 64 65 |.nroff -|man mode|
|00002720| 6d 2e 31 20 3e 20 6d 6f | 64 65 6d 2e 6d 61 6e 0a |m.1 > mo|dem.man.|
|00002730| 20 6f 70 74 69 6f 6e 61 | 6c 20 5c 66 42 73 70 65 | optiona|l \fBspe|
|00002740| 65 64 5c 66 52 20 61 72 | 67 75 6d 65 6e 74 20 63 |ed\fR ar|gument c|
|00002750| 61 6e 20 62 65 20 75 73 | 65 64 20 74 6f 20 66 6f |an be us|ed to fo|
|00002760| 72 63 65 20 5c 66 49 6d | 6f 64 65 6d 5c 66 52 20 |rce \fIm|odem\fR |
|00002770| 74 6f 20 74 61 6c 6b 0a | 74 6f 20 74 68 65 20 6d |to talk.|to the m|
|00002780| 6f 64 65 6d 20 61 74 20 | 74 68 65 20 73 70 65 63 |odem at |the spec|
|00002790| 69 66 69 65 64 20 73 70 | 65 65 64 2c 20 6f 74 68 |ified sp|eed, oth|
|000027a0| 65 72 77 69 73 65 20 69 | 74 20 77 69 6c 6c 20 74 |erwise i|t will t|
|000027b0| 61 6c 6b 20 61 74 20 31 | 32 30 30 20 62 61 75 64 |alk at 1|200 baud|
|000027c0| 2e 0a 2e 50 50 0a 54 68 | 65 20 74 74 79 20 6e 61 |...PP.Th|e tty na|
|000027d0| 6d 65 20 73 68 6f 75 6c | 64 20 62 65 20 6f 66 20 |me shoul|d be of |
|000027e0| 74 68 65 20 66 6f 72 6d | 20 5c 66 42 74 74 79 34 |the form| \fBtty4|
|000027f0| 34 5c 66 52 2e 0a 2e 53 | 48 20 45 58 41 4d 50 4c |4\fR...S|H EXAMPL|
|00002800| 6d 6f 64 65 6d 63 74 6c | 2f 6d 6f 64 65 6d 2e 68 |modemctl|/modem.h|
|00002810| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002820| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002830| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002840| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002850| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002860| 00 00 00 00 20 20 20 36 | 34 34 20 00 20 20 20 32 |....   6|44 .   2|
|00002870| 34 33 20 00 20 20 20 20 | 31 32 20 00 20 20 20 20 |43 .    |12 .    |
|00002880| 20 20 20 35 35 32 32 20 | 20 34 34 30 34 30 36 35 |   5522 | 4404065|
|00002890| 32 36 37 20 20 20 37 31 | 37 32 00 20 00 00 00 00 |267   71|72. ....|
|000028a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000028b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000028c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000028d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000028e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000028f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002900| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002910| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002920| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002930| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002940| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002950| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002960| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002970| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002980| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002990| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000029a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000029b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000029c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000029d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000029e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000029f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002a00| 2f 2a 0a 20 2a 20 73 6f | 6d 65 20 63 6f 6e 73 74 |/*. * so|me const|
|00002a10| 61 6e 74 73 20 66 6f 72 | 20 79 6f 75 72 20 6d 6f |ants for| your mo|
|00002a20| 64 65 6d 0a 20 2a 2f 0a | 20 0a 23 64 65 66 69 6e |dem. */.| .#defin|
|00002a30| 65 20 54 49 4d 45 5a 4f | 4e 45 20 22 54 5a 3d 47 |e TIMEZO|NE "TZ=G|
|00002a40| 4d 54 30 42 53 54 22 09 | 09 2f 2a 20 74 69 6d 65 |MT0BST".|./* time|
|00002a50| 20 7a 6f 6e 65 20 79 6f | 75 20 6f 70 65 72 61 74 | zone yo|u operat|
|00002a60| 65 20 69 6e 09 2a 2f 0a | 23 64 65 66 69 6e 65 20 |e in.*/.|#define |
|00002a70| 44 45 46 53 50 45 45 44 | 20 22 31 32 30 30 22 09 |DEFSPEED| "1200".|
|00002a80| 09 09 2f 2a 20 73 70 65 | 65 64 20 79 6f 75 72 20 |../* spe|ed your |
|00002a90| 6d 6f 64 65 6d 20 6c 69 | 6b 65 73 20 6d 6f 73 74 |modem li|kes most|
|00002aa0| 09 2a 2f 0a 0a 23 64 65 | 66 69 6e 65 20 57 54 49 |.*/..#de|fine WTI|
|00002ab0| 4d 45 20 35 09 09 09 09 | 2f 2a 20 64 65 66 61 75 |ME 5....|/* defau|
|00002ac0| 6c 74 20 77 61 69 74 20 | 74 69 6d 65 20 09 09 2a |lt wait |time ..*|
|00002ad0| 2f 0a 0a 23 64 65 66 69 | 6e 65 20 4c 4f 47 46 49 |/..#defi|ne LOGFI|
|00002ae0| 4c 45 20 22 2f 75 73 72 | 2f 73 70 6f 6f 6c 2f 75 |LE "/usr|/spool/u|
|00002af0| 75 63 70 2f 6d 6f 64 65 | 6d 2e 6c 6f 67 22 09 09 |ucp/mode|m.log"..|
|00002b00| 2f 2a 20 6c 6f 67 20 66 | 69 6c 65 20 2a 2f 0a 0a |/* log f|ile */..|
|00002b10| 23 64 65 66 69 6e 65 20 | 6d 61 78 28 61 2c 62 29 |#define |max(a,b)|
|00002b20| 20 28 28 61 29 20 3e 20 | 28 62 29 20 3f 20 28 61 | ((a) > |(b) ? (a|
|00002b30| 29 20 3a 20 28 62 29 29 | 0a 23 64 65 66 69 6e 65 |) : (b))|.#define|
|00002b40| 20 6d 69 6e 28 61 2c 62 | 29 20 28 28 61 29 20 3c | min(a,b|) ((a) <|
|00002b50| 20 28 62 29 20 3f 20 28 | 61 29 20 3a 20 28 62 29 | (b) ? (|a) : (b)|
|00002b60| 29 0a 0a 23 64 65 66 69 | 6e 65 20 4d 49 4e 55 54 |)..#defi|ne MINUT|
|00002b70| 45 53 09 36 30 0a 23 64 | 65 66 69 6e 65 20 49 44 |ES.60.#d|efine ID|
|00002b80| 4c 45 54 49 4d 45 20 35 | 2a 4d 49 4e 55 54 45 53 |LETIME 5|*MINUTES|
|00002b90| 09 09 09 09 2f 2a 20 61 | 75 74 6f 6c 6f 67 6f 75 |..../* a|utologou|
|00002ba0| 74 20 74 69 6d 65 20 2a | 2f 0a 23 69 66 64 65 66 |t time *|/.#ifdef|
|00002bb0| 20 57 41 54 43 48 49 54 | 0a 23 64 65 66 69 6e 65 | WATCHIT|.#define|
|00002bc0| 20 53 50 59 54 49 4d 45 | 20 31 2a 4d 49 4e 55 54 | SPYTIME| 1*MINUT|
|00002bd0| 45 53 0a 23 65 6c 73 65 | 0a 23 64 65 66 69 6e 65 |ES.#else|.#define|
|00002be0| 20 53 50 59 54 49 4d 45 | 20 49 44 4c 45 54 49 4d | SPYTIME| IDLETIM|
|00002bf0| 45 0a 23 65 6e 64 69 66 | 0a 0a 23 64 65 66 69 6e |E.#endif|..#defin|
|00002c00| 65 20 47 52 41 43 45 54 | 49 4d 45 09 35 09 2f 2a |e GRACET|IME.5./*|
|00002c10| 20 74 69 6d 65 20 74 6f | 20 77 61 69 74 20 66 6f | time to| wait fo|
|00002c20| 72 20 73 69 67 6e 61 6c | 20 74 6f 20 74 61 6b 65 |r signal| to take|
|00002c30| 20 65 66 66 65 63 74 20 | 2a 2f 0a 0a 65 78 74 65 | effect |*/..exte|
|00002c40| 72 6e 20 69 6e 74 20 65 | 72 72 6e 6f 3b 0a 0a 23 |rn int e|rrno;..#|
|00002c50| 69 66 64 65 66 20 4d 41 | 49 4e 44 45 46 0a 23 64 |ifdef MA|INDEF.#d|
|00002c60| 65 66 69 6e 65 20 45 58 | 54 45 52 4e 0a 23 65 6c |efine EX|TERN.#el|
|00002c70| 73 65 0a 23 64 65 66 69 | 6e 65 20 45 58 54 45 52 |se.#defi|ne EXTER|
|00002c80| 4e 20 65 78 74 65 72 6e | 0a 23 65 6e 64 69 66 0a |N extern|.#endif.|
|00002c90| 0a 6c 6f 6e 67 20 74 69 | 6d 65 28 29 3b 0a 69 6e |.long ti|me();.in|
|00002ca0| 74 20 64 72 65 61 64 28 | 29 2c 20 64 77 72 69 74 |t dread(|), dwrit|
|00002cb0| 65 28 29 2c 20 6d 79 72 | 65 61 64 28 29 3b 0a 76 |e(), myr|ead();.v|
|00002cc0| 6f 69 64 20 6d 79 77 72 | 69 74 65 28 29 3b 0a 0a |oid mywr|ite();..|
|00002cd0| 45 58 54 45 52 4e 20 63 | 68 61 72 20 6c 6f 63 6b |EXTERN c|har lock|
|00002ce0| 66 5b 35 30 5d 3b 09 09 | 09 09 2f 2a 20 61 72 67 |f[50];..|../* arg|
|00002cf0| 75 6d 65 6e 74 20 6c 6f | 63 6b 20 66 69 6c 65 20 |ument lo|ck file |
|00002d00| 2a 2f 0a 45 58 54 45 52 | 4e 20 63 68 61 72 20 64 |*/.EXTER|N char d|
|00002d10| 6e 61 6d 65 5b 33 30 5d | 3b 09 09 09 09 2f 2a 20 |name[30]|;..../* |
|00002d20| 64 65 76 69 63 65 20 6e | 61 6d 65 20 69 6e 20 66 |device n|ame in f|
|00002d30| 75 6c 6c 20 2d 20 2f 64 | 65 76 2f 2e 2e 2e 2e 20 |ull - /d|ev/.... |
|00002d40| 2a 2f 0a 0a 45 58 54 45 | 52 4e 20 69 6e 74 20 73 |*/..EXTE|RN int s|
|00002d50| 68 65 6c 6c 2c 20 73 74 | 61 74 75 73 3b 09 09 09 |hell, st|atus;...|
|00002d60| 2f 2a 20 70 69 64 20 6f | 66 20 73 68 65 6c 6c 2c |/* pid o|f shell,|
|00002d70| 20 61 6e 64 20 65 78 69 | 74 20 73 74 61 74 75 73 | and exi|t status|
|00002d80| 20 2a 2f 0a 0a 45 58 54 | 45 52 4e 20 69 6e 74 20 | */..EXT|ERN int |
|00002d90| 64 65 76 3b 09 09 09 09 | 09 2f 2a 20 64 65 76 69 |dev;....|./* devi|
|00002da0| 63 65 20 75 73 65 64 20 | 28 6f 70 65 6e 20 66 69 |ce used |(open fi|
|00002db0| 6c 64 65 73 29 20 2a 2f | 0a 2f 2a 0a 20 2a 20 54 |ldes) */|./*. * T|
|00002dc0| 68 65 20 27 72 65 73 65 | 74 27 20 73 65 71 75 65 |he 'rese|t' seque|
|00002dd0| 6e 63 65 2c 20 69 66 20 | 74 68 65 20 6d 6f 64 65 |nce, if |the mode|
|00002de0| 6d 20 64 6f 65 73 6e 27 | 74 20 62 65 68 61 76 65 |m doesn'|t behave|
|00002df0| 20 61 73 20 65 78 70 65 | 63 74 65 64 2e 0a 20 2a | as expe|cted.. *|
|00002e00| 20 49 20 73 74 69 6c 6c | 20 67 65 74 20 70 72 6f | I still| get pro|
|00002e10| 62 6c 65 6d 73 20 77 69 | 74 68 20 74 68 65 20 6d |blems wi|th the m|
|00002e20| 6f 64 65 6d 20 6e 6f 74 | 20 72 65 73 70 6f 6e 64 |odem not| respond|
|00002e30| 69 6e 67 20 74 6f 20 27 | 41 54 27 2e 0a 20 2a 2f |ing to '|AT'.. */|
|00002e40| 0a 23 69 66 20 64 65 66 | 69 6e 65 64 28 48 41 59 |.#if def|ined(HAY|
|00002e50| 45 53 29 0a 23 64 65 66 | 69 6e 65 20 52 45 53 45 |ES).#def|ine RESE|
|00002e60| 54 20 22 5c 6e 5c 72 41 | 54 5c 72 5c 72 41 54 5c |T "\n\rA|T\r\rAT\|
|00002e70| 72 5c 72 41 54 5c 72 5c | 72 22 0a 23 65 6c 73 65 |r\rAT\r\|r".#else|
|00002e80| 0a 23 64 65 66 69 6e 65 | 20 52 45 53 45 54 20 22 |.#define| RESET "|
|00002e90| 22 0a 23 65 6e 64 69 66 | 0a 2f 2a 0a 20 2a 20 54 |".#endif|./*. * T|
|00002ea0| 68 65 20 27 63 6f 6e 76 | 65 72 73 61 74 69 6f 6e |he 'conv|ersation|
|00002eb0| 27 20 6e 65 63 65 73 73 | 61 72 79 20 74 6f 20 67 |' necess|ary to g|
|00002ec0| 65 74 20 79 6f 75 72 20 | 6d 6f 64 65 6d 20 69 6e |et your |modem in|
|00002ed0| 74 6f 20 61 20 27 6c 69 | 73 74 65 6e 69 6e 67 27 |to a 'li|stening'|
|00002ee0| 20 73 74 61 74 65 2e 0a | 20 2a 20 54 68 65 20 63 | state..| * The c|
|00002ef0| 6f 6e 76 65 72 61 73 61 | 74 69 6f 6e 20 73 68 6f |onverasa|tion sho|
|00002f00| 75 6c 64 20 63 6f 6d 70 | 6c 65 74 65 20 69 66 66 |uld comp|lete iff|
|00002f10| 20 61 6e 20 69 6e 63 6f | 6d 69 6e 67 20 63 61 6c | an inco|ming cal|
|00002f20| 6c 20 69 73 20 63 6f 6e | 6e 65 63 74 65 64 2e 0a |l is con|nected..|
|00002f30| 20 2a 20 49 66 20 75 73 | 69 6e 67 20 4a 61 63 6b | * If us|ing Jack|
|00002f40| 27 73 20 73 74 61 74 65 | 73 2c 20 73 65 74 20 75 |'s state|s, set u|
|00002f50| 70 20 79 6f 75 72 20 73 | 74 61 74 65 73 20 62 65 |p your s|tates be|
|00002f60| 6c 6f 77 2e 20 45 61 63 | 68 20 6d 6f 64 65 6d 20 |low. Eac|h modem |
|00002f70| 6c 69 6e 65 0a 20 2a 20 | 6d 75 73 74 20 68 61 76 |line. * |must hav|
|00002f80| 65 20 66 6c 61 67 73 20 | 73 65 74 20 74 6f 20 69 |e flags |set to i|
|00002f90| 6e 64 69 63 61 74 65 20 | 69 6e 20 77 68 69 63 68 |ndicate |in which|
|00002fa0| 20 73 74 61 74 65 28 73 | 29 20 69 74 20 63 61 6e | state(s|) it can|
|00002fb0| 20 62 65 20 65 78 65 63 | 75 74 65 64 2e 0a 20 2a | be exec|uted.. *|
|00002fc0| 20 49 66 20 79 6f 75 27 | 72 65 20 6e 6f 74 20 75 | If you'|re not u|
|00002fd0| 73 69 6e 67 20 74 68 65 | 20 53 54 41 54 45 53 20 |sing the| STATES |
|00002fe0| 73 74 75 66 66 2c 20 6c | 65 61 76 65 20 74 68 65 |stuff, l|eave the|
|00002ff0| 6d 20 61 74 20 7a 65 72 | 6f 2e 0a 20 2a 2f 0a 23 |m at zer|o.. */.#|
|00003000| 64 65 66 69 6e 65 20 53 | 50 4b 09 09 09 30 78 30 |define S|PK...0x0|
|00003010| 30 30 31 09 2f 2a 20 53 | 70 65 61 6b 65 72 20 63 |001./* S|peaker c|
|00003020| 6f 6e 74 72 6f 6c 20 2a | 2f 0a 23 64 65 66 69 6e |ontrol *|/.#defin|
|00003030| 65 09 41 41 09 09 09 30 | 78 30 30 30 32 09 2f 2a |e.AA...0|x0002./*|
|00003040| 20 41 75 74 6f 20 41 6e | 73 77 65 72 20 43 6f 6e | Auto An|swer Con|
|00003050| 74 72 6f 6c 20 2a 2f 0a | 0a 73 74 72 75 63 74 20 |trol */.|.struct |
|00003060| 63 6f 6e 76 20 7b 0a 09 | 63 68 61 72 20 2a 63 5f |conv {..|char *c_|
|00003070| 73 65 6e 64 3b 0a 09 63 | 68 61 72 20 2a 63 5f 65 |send;..c|har *c_e|
|00003080| 78 70 65 63 74 3b 0a 09 | 69 6e 74 20 63 5f 77 61 |xpect;..|int c_wa|
|00003090| 69 74 3b 09 09 2f 2a 20 | 74 69 6d 65 20 74 6f 20 |it;../* |time to |
|000030a0| 77 61 69 74 20 66 6f 72 | 20 63 5f 65 78 70 65 63 |wait for| c_expec|
|000030b0| 74 20 2a 2f 0a 09 69 6e | 74 20 63 5f 66 6c 61 67 |t */..in|t c_flag|
|000030c0| 73 3b 09 09 2f 2a 20 66 | 6c 61 67 73 20 66 6f 72 |s;../* f|lags for|
|000030d0| 20 6d 61 74 63 68 69 6e | 67 20 77 69 74 68 20 74 | matchin|g with t|
|000030e0| 68 65 20 73 74 61 74 65 | 2e 20 2a 2f 0a 7d 3b 0a |he state|. */.};.|
|000030f0| 0a 23 69 66 64 65 66 20 | 4d 41 49 4e 44 45 46 0a |.#ifdef |MAINDEF.|
|00003100| 0a 73 74 72 75 63 74 20 | 63 6f 6e 76 20 72 69 6e |.struct |conv rin|
|00003110| 67 5b 5d 20 3d 20 7b 0a | 0a 23 69 66 20 64 65 66 |g[] = {.|.#if def|
|00003120| 69 6e 65 64 28 48 41 59 | 45 53 29 0a 09 7b 22 41 |ined(HAY|ES)..{"A|
|00003130| 54 5c 72 22 2c 20 22 4f | 4b 22 2c 20 57 54 49 4d |T\r", "O|K", WTIM|
|00003140| 45 2c 20 41 41 20 7c 20 | 53 50 4b 20 7d 2c 09 2f |E, AA | |SPK },./|
|00003150| 2a 20 61 6e 79 6f 6e 65 | 20 74 68 65 72 65 3f 20 |* anyone| there? |
|00003160| 2a 2f 0a 09 7b 22 41 54 | 4d 30 5c 72 22 2c 20 22 |*/..{"AT|M0\r", "|
|00003170| 4f 4b 22 2c 20 57 54 49 | 4d 45 2c 20 41 41 20 7c |OK", WTI|ME, AA ||
|00003180| 20 53 50 4b 20 7d 2c 09 | 2f 2a 20 74 75 72 6e 20 | SPK },.|/* turn |
|00003190| 4f 46 46 20 73 70 65 61 | 6b 65 72 20 2a 2f 0a 09 |OFF spea|ker */..|
|000031a0| 7b 22 41 54 53 30 3d 30 | 5c 72 22 2c 20 22 4f 4b |{"ATS0=0|\r", "OK|
|000031b0| 22 2c 20 57 54 49 4d 45 | 2c 20 41 41 20 7c 20 53 |", WTIME|, AA | S|
|000031c0| 50 4b 7d 2c 09 2f 2a 20 | 44 49 53 41 42 4c 45 20 |PK},./* |DISABLE |
|000031d0| 61 75 74 6f 2d 61 6e 73 | 77 65 72 20 2a 2f 0a 09 |auto-ans|wer */..|
|000031e0| 7b 22 41 54 53 30 3d 31 | 5c 72 22 2c 20 22 4f 4b |{"ATS0=1|\r", "OK|
|000031f0| 22 2c 20 57 54 49 4d 45 | 2c 20 41 41 7d 2c 09 09 |", WTIME|, AA},..|
|00003200| 2f 2a 20 6d 61 79 62 65 | 20 65 6e 61 62 6c 65 20 |/* maybe| enable |
|00003210| 61 75 74 6f 20 61 6e 73 | 77 65 72 20 2a 2f 0a 09 |auto ans|wer */..|
|00003220| 7b 22 41 54 4d 31 5c 72 | 22 2c 20 22 4f 4b 22 2c |{"ATM1\r|", "OK",|
|00003230| 20 57 54 49 4d 45 2c 20 | 53 50 4b 7d 2c 09 09 2f | WTIME, |SPK},../|
|00003240| 2a 20 6d 61 79 62 65 20 | 74 75 72 6e 20 73 70 65 |* maybe |turn spe|
|00003250| 61 6b 65 72 20 6f 6e 20 | 2a 2f 0a 09 7b 22 41 54 |aker on |*/..{"AT|
|00003260| 58 31 56 31 5c 72 22 2c | 20 22 4f 4b 22 2c 20 57 |X1V1\r",| "OK", W|
|00003270| 54 49 4d 45 2c 20 41 41 | 20 7c 20 53 50 4b 20 7d |TIME, AA| | SPK }|
|00003280| 2c 09 2f 2a 20 74 75 72 | 6e 20 6f 6e 20 72 65 73 |,./* tur|n on res|
|00003290| 70 6f 6e 73 65 73 20 2a | 2f 20 0a 09 7b 22 41 54 |ponses *|/ ..{"AT|
|000032a0| 53 32 34 3d 33 5c 72 22 | 2c 20 22 4f 4b 22 2c 20 |S24=3\r"|, "OK", |
|000032b0| 57 54 49 4d 45 2c 20 41 | 41 20 7c 20 53 50 4b 7d |WTIME, A|A | SPK}|
|000032c0| 2c 09 2f 2a 20 65 6e 61 | 62 6c 65 20 73 70 65 65 |,./* ena|ble spee|
|000032d0| 64 2d 73 65 65 6b 69 6e | 67 20 2a 2f 0a 09 7b 22 |d-seekin|g */..{"|
|000032e0| 22 2c 20 22 52 49 4e 47 | 22 2c 20 30 2c 20 41 41 |", "RING|", 0, AA|
|000032f0| 20 7c 20 53 50 4b 7d 2c | 09 09 2f 2a 20 77 61 69 | | SPK},|../* wai|
|00003300| 74 20 28 69 6e 64 65 66 | 69 6e 61 74 65 6c 79 29 |t (indef|inately)|
|00003310| 20 66 6f 72 20 52 49 4e | 47 20 69 6e 20 2a 2f 0a | for RIN|G in */.|
|00003320| 09 7b 22 22 2c 20 22 43 | 4f 4e 4e 45 43 54 22 2c |.{"", "C|ONNECT",|
|00003330| 20 32 30 2c 20 41 41 20 | 7c 20 53 50 4b 7d 2c 09 | 20, AA || SPK},.|
|00003340| 09 2f 2a 20 77 61 69 74 | 20 66 6f 72 20 63 61 6c |./* wait| for cal|
|00003350| 6c 20 74 6f 20 62 65 20 | 63 6f 6e 6e 65 63 74 65 |l to be |connecte|
|00003360| 64 20 2a 2f 0a 09 7b 4e | 55 4c 4c 2c 20 4e 55 4c |d */..{N|ULL, NUL|
|00003370| 4c 2c 20 30 2c 20 30 7d | 09 09 09 2f 2a 20 66 69 |L, 0, 0}|.../* fi|
|00003380| 6e 69 73 68 65 64 20 2a | 2f 0a 0a 23 65 6c 73 65 |nished *|/..#else|
|00003390| 20 2f 2a 20 64 65 66 69 | 6e 65 64 20 28 48 41 59 | /* defi|ned (HAY|
|000033a0| 45 53 29 20 2a 2f 0a 23 | 69 66 20 64 65 66 69 6e |ES) */.#|if defin|
|000033b0| 65 64 28 4a 53 45 54 29 | 09 2f 2a 20 41 54 26 54 |ed(JSET)|./* AT&T|
|000033c0| 20 41 7a 74 65 63 20 50 | 72 6f 74 6f 63 6f 6c 20 | Aztec P|rotocol |
|000033d0| 2a 2f 0a 09 7b 22 5c 5c | 64 5c 72 5c 5c 64 22 2c |*/..{"\\|d\r\\d",|
|000033e0| 20 22 4d 4f 44 45 4d 3a | 20 22 2c 20 57 54 49 4d | "MODEM:| ", WTIM|
|000033f0| 45 2c 20 30 20 7d 2c 09 | 2f 2a 20 61 6e 79 6f 6e |E, 0 },.|/* anyon|
|00003400| 65 20 74 68 65 72 65 3f | 20 2a 2f 0a 09 7b 22 22 |e there?| */..{""|
|00003410| 2c 20 22 44 41 54 41 22 | 2c 20 33 36 30 30 2c 20 |, "DATA"|, 3600, |
|00003420| 30 7d 2c 09 09 2f 2a 20 | 77 61 69 74 20 28 31 20 |0},../* |wait (1 |
|00003430| 68 6f 75 72 29 20 66 6f | 72 20 52 49 4e 47 20 69 |hour) fo|r RING i|
|00003440| 6e 20 2a 2f 0a 09 7b 4e | 55 4c 4c 2c 20 4e 55 4c |n */..{N|ULL, NUL|
|00003450| 4c 2c 20 30 2c 20 30 7d | 09 09 09 2f 2a 20 53 68 |L, 0, 0}|.../* Sh|
|00003460| 6f 75 6c 64 20 62 65 20 | 69 6e 64 65 66 69 6e 69 |ould be |indefini|
|00003470| 74 65 2c 20 62 75 74 20 | 70 72 65 76 65 6e 74 0a |te, but |prevent.|
|00003480| 09 09 09 09 09 20 20 20 | 70 72 6f 62 6c 65 6d 73 |.....   |problems|
|00003490| 20 69 66 20 6d 6f 64 65 | 6d 20 67 65 74 73 20 77 | if mode|m gets w|
|000034a0| 65 64 67 65 64 20 2a 2f | 0a 0a 23 65 6c 73 65 20 |edged */|..#else |
|000034b0| 2f 2a 20 64 65 66 69 6e | 65 64 20 28 4a 53 45 54 |/* defin|ed (JSET|
|000034c0| 29 20 2a 2f 0a 09 7b 4e | 55 4c 4c 2c 20 4e 55 4c |) */..{N|ULL, NUL|
|000034d0| 4c 2c 20 30 2c 20 30 7d | 09 09 09 2f 2a 20 6e 6f |L, 0, 0}|.../* no|
|000034e0| 20 69 6e 69 74 20 63 6f | 6e 76 65 72 73 61 74 69 | init co|nversati|
|000034f0| 6f 6e 20 2a 2f 0a 0a 23 | 65 6e 64 69 66 20 2f 2a |on */..#|endif /*|
|00003500| 20 64 65 66 69 6e 65 64 | 20 28 4a 53 45 54 29 20 | defined| (JSET) |
|00003510| 2a 2f 0a 23 65 6e 64 69 | 66 20 2f 2a 20 64 65 66 |*/.#endi|f /* def|
|00003520| 69 6e 65 64 20 28 48 41 | 59 45 53 29 20 2a 2f 0a |ined (HA|YES) */.|
|00003530| 7d 3b 0a 23 65 6e 64 69 | 66 20 2f 2a 20 64 65 66 |};.#endi|f /* def|
|00003540| 69 6e 65 64 20 28 4d 41 | 49 4e 44 45 46 29 20 2a |ined (MA|INDEF) *|
|00003550| 2f 0a 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |/.......|........|
|00003560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003580| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003590| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000035a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000035b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000035c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000035d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000035e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000035f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003600| 6d 6f 64 65 6d 63 74 6c | 2f 6d 6f 64 65 6d 2e 63 |modemctl|/modem.c|
|00003610| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003620| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003630| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003640| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003650| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003660| 00 00 00 00 20 20 20 36 | 34 34 20 00 20 20 20 32 |....   6|44 .   2|
|00003670| 34 33 20 00 20 20 20 20 | 31 32 20 00 20 20 20 20 |43 .    |12 .    |
|00003680| 20 20 32 33 37 32 32 20 | 20 34 34 30 34 30 36 35 |  23722 | 4404065|
|00003690| 32 37 33 20 20 20 37 32 | 30 34 00 20 00 00 00 00 |273   72|04. ....|
|000036a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000036b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000036c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000036d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000036e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000036f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003700| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003710| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003720| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003730| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003740| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003750| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003760| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003770| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003780| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003790| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000037a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000037b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000037c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000037d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000037e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000037f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003800| 2f 2a 0a 20 2a 20 43 6f | 70 79 72 69 67 68 74 20 |/*. * Co|pyright |
|00003810| 28 63 29 20 44 61 76 65 | 20 53 65 74 74 6c 65 20 |(c) Dave| Settle |
|00003820| 31 39 38 37 0a 20 2a 20 | 41 6c 6c 20 72 69 67 68 |1987. * |All righ|
|00003830| 74 73 20 72 65 73 65 72 | 76 65 64 2e 0a 20 2a 20 |ts reser|ved.. * |
|00003840| 50 65 72 6d 69 73 73 69 | 6f 6e 20 69 73 20 67 72 |Permissi|on is gr|
|00003850| 61 6e 74 65 64 20 74 6f | 20 64 6f 20 61 6e 79 74 |anted to| do anyt|
|00003860| 68 69 6e 67 20 77 69 74 | 68 20 74 68 69 73 20 70 |hing wit|h this p|
|00003870| 72 6f 67 72 61 6d 2c 20 | 65 78 63 65 70 74 20 72 |rogram, |except r|
|00003880| 65 6d 6f 76 65 0a 20 2a | 20 74 68 69 73 20 63 6f |emove. *| this co|
|00003890| 70 79 72 69 67 68 74 20 | 6e 6f 74 69 63 65 2c 20 |pyright |notice, |
|000038a0| 6f 72 20 73 65 6c 6c 20 | 69 74 20 66 6f 72 20 70 |or sell |it for p|
|000038b0| 72 6f 66 69 74 2e 0a 20 | 2a 0a 20 2a 20 50 72 6f |rofit.. |*. * Pro|
|000038c0| 62 6c 65 6d 73 2c 20 73 | 75 67 67 65 73 74 69 6f |blems, s|uggestio|
|000038d0| 6e 73 2c 20 62 75 67 20 | 66 69 78 65 73 20 65 74 |ns, bug |fixes et|
|000038e0| 63 2c 20 74 6f 3a 0a 20 | 2a 0a 20 2a 20 44 61 76 |c, to:. |*. * Dav|
|000038f0| 65 20 53 65 74 74 6c 65 | 2c 20 53 4d 42 20 42 75 |e Settle|, SMB Bu|
|00003900| 73 69 6e 65 73 73 20 53 | 6f 66 74 77 61 72 65 2c |siness S|oftware,|
|00003910| 20 54 68 6f 72 6e 20 45 | 4d 49 20 44 61 74 61 73 | Thorn E|MI Datas|
|00003920| 6f 6c 76 65 0a 20 2a 20 | 0a 20 2a 20 55 55 43 50 |olve. * |. * UUCP|
|00003930| 3a 0a 20 2a 20 09 64 61 | 76 65 40 73 6d 62 2e 63 |:. * .da|ve@smb.c|
|00003940| 6f 2e 75 6b 0a 20 2a 20 | 09 2e 2e 2e 21 6d 63 76 |o.uk. * |....!mcv|
|00003950| 61 78 21 75 6b 63 21 6e | 6f 74 74 2d 63 73 21 73 |ax!ukc!n|ott-cs!s|
|00003960| 6d 62 21 64 61 76 65 09 | 0a 20 2a 20 0a 20 2a 20 |mb!dave.|. * . * |
|00003970| 53 4d 41 49 4c 3a 09 09 | 09 09 09 56 6f 69 63 65 |SMAIL:..|...Voice|
|00003980| 3a 0a 20 2a 20 09 53 4d | 42 20 42 75 73 69 6e 65 |:. * .SM|B Busine|
|00003990| 73 73 20 53 6f 66 74 77 | 61 72 65 09 09 20 20 20 |ss Softw|are..   |
|000039a0| 20 20 2b 34 34 20 36 32 | 33 20 36 35 31 36 35 31 |  +44 62|3 651651|
|000039b0| 0a 20 2a 20 09 48 69 67 | 68 20 53 74 72 65 65 74 |. * .Hig|h Street|
|000039c0| 0a 20 2a 20 09 4d 61 6e | 73 66 69 65 6c 64 09 09 |. * .Man|sfield..|
|000039d0| 09 54 65 6c 65 78 3a 0a | 20 2a 20 09 4e 6f 74 74 |.Telex:.| * .Nott|
|000039e0| 69 6e 67 68 61 6d 20 4e | 47 31 38 20 31 45 53 09 |ingham N|G18 1ES.|
|000039f0| 09 20 20 20 20 20 33 37 | 33 39 32 20 54 45 43 53 |.     37|392 TECS|
|00003a00| 4d 47 0a 20 2a 20 09 45 | 6e 67 6c 61 6e 64 09 0a |MG. * .E|ngland..|
|00003a10| 20 2a 20 09 09 09 09 09 | 46 61 78 3a 0a 20 2a 20 | * .....|Fax:. * |
|00003a20| 09 09 09 09 09 20 20 20 | 20 20 2b 34 34 20 36 32 |.....   |  +44 62|
|00003a30| 33 20 36 35 39 39 34 37 | 0a 20 2a 20 0a 20 2a 20 |3 659947|. * . * |
|00003a40| 6d 6f 64 65 6d 2e 63 3a | 20 61 20 62 69 2d 64 69 |modem.c:| a bi-di|
|00003a50| 72 65 63 74 69 6f 6e 61 | 6c 20 22 67 65 74 74 79 |rectiona|l "getty|
|00003a60| 22 20 74 6f 20 61 6c 6c | 6f 77 20 69 6e 63 6f 6d |" to all|ow incom|
|00003a70| 69 6e 67 20 63 61 6c 6c | 73 20 41 4e 44 20 6f 75 |ing call|s AND ou|
|00003a80| 74 67 6f 69 6e 67 20 0a | 20 2a 20 75 75 63 69 63 |tgoing .| * uucic|
|00003a90| 6f 27 73 0a 20 2a 0a 20 | 2a 20 4d 6f 64 69 66 69 |o's. *. |* Modifi|
|00003aa0| 65 64 20 62 79 20 52 69 | 63 6b 20 52 69 63 68 61 |ed by Ri|ck Richa|
|00003ab0| 72 64 73 6f 6e 20 66 6f | 72 20 48 44 42 20 75 75 |rdson fo|r HDB uu|
|00003ac0| 63 70 20 61 6e 64 20 41 | 54 26 54 20 41 7a 74 65 |cp and A|T&T Azte|
|00003ad0| 63 20 70 72 6f 74 6f 63 | 6f 6c 0a 20 2a 0a 20 2a |c protoc|ol. *. *|
|00003ae0| 20 4d 6f 64 69 66 69 65 | 64 20 62 79 20 4a 61 63 | Modifie|d by Jac|
|00003af0| 6b 20 42 6f 6e 6e 20 66 | 6f 72 20 73 74 61 74 65 |k Bonn f|or state|
|00003b00| 20 6c 6f 67 69 63 20 28 | 61 6c 6c 6f 77 73 20 61 | logic (|allows a|
|00003b10| 75 74 6f 61 6e 73 77 65 | 72 20 6f 6e 2f 6f 66 66 |utoanswe|r on/off|
|00003b20| 20 61 74 0a 20 2a 20 20 | 20 20 20 20 20 20 20 20 | at. *  |        |
|00003b30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 61 20 67 |        |     a g|
|00003b40| 69 76 65 6e 20 74 69 6d | 65 20 66 6f 72 20 65 61 |iven tim|e for ea|
|00003b50| 63 68 20 64 61 79 20 6f | 66 20 74 68 65 20 77 65 |ch day o|f the we|
|00003b60| 65 6b 29 0a 20 2a 0a 20 | 2a 20 4d 6f 64 69 66 69 |ek). *. |* Modifi|
|00003b70| 65 64 20 62 79 20 44 61 | 76 65 20 53 65 74 74 6c |ed by Da|ve Settl|
|00003b80| 65 3a 0a 20 2a 0a 20 2a | 20 43 6f 64 65 20 66 69 |e:. *. *| Code fi|
|00003b90| 78 65 73 3a 0a 20 2a 09 | 68 61 6e 67 75 70 20 72 |xes:. *.|hangup r|
|00003ba0| 6f 75 74 69 6e 65 20 61 | 64 64 65 64 2c 20 74 6f |outine a|dded, to|
|00003bb0| 20 6d 61 6b 65 20 73 75 | 72 65 20 70 68 6f 6e 65 | make su|re phone|
|00003bc0| 20 69 73 20 64 6f 77 6e | 20 62 65 66 6f 72 65 20 | is down| before |
|00003bd0| 73 63 72 69 70 74 2c 20 | 61 6e 64 0a 20 2a 09 09 |script, |and. *..|
|00003be0| 61 66 74 65 72 20 75 73 | 65 72 20 64 69 73 63 6f |after us|er disco|
|00003bf0| 6e 6e 65 63 74 73 2e 0a | 20 2a 09 50 61 72 61 6d |nnects..| *.Param|
|00003c00| 65 74 65 72 69 73 65 64 | 20 73 65 6e 64 2d 65 78 |eterised| send-ex|
|00003c10| 70 65 63 74 20 72 6f 75 | 74 69 6e 65 73 2e 0a 20 |pect rou|tines.. |
|00003c20| 2a 09 4d 69 6e 6f 72 20 | 62 75 67 20 66 69 78 20 |*.Minor |bug fix |
|00003c30| 74 6f 20 64 72 65 61 64 | 28 29 0a 20 2a 09 52 65 |to dread|(). *.Re|
|00003c40| 2d 65 6e 61 62 6c 65 20 | 53 49 47 41 4c 52 4d 20 |-enable |SIGALRM |
|00003c50| 69 6e 20 77 61 6b 65 75 | 70 28 29 0a 20 2a 09 43 |in wakeu|p(). *.C|
|00003c60| 61 74 63 68 20 61 6c 6c | 20 73 69 67 6e 61 6c 73 |atch all| signals|
|00003c70| 2c 20 74 6f 20 65 6e 61 | 62 6c 65 20 63 72 61 73 |, to ena|ble cras|
|00003c80| 68 65 73 20 74 6f 20 62 | 65 20 64 65 74 65 63 74 |hes to b|e detect|
|00003c90| 65 64 2e 0a 20 2a 09 43 | 68 6d 6f 64 20 64 65 76 |ed.. *.C|hmod dev|
|00003ca0| 69 63 65 20 62 61 63 6b | 20 74 6f 20 36 36 36 2c |ice back| to 666,|
|00003cb0| 20 73 6f 20 74 68 61 74 | 20 77 65 20 63 61 6e 20 | so that| we can |
|00003cc0| 75 73 65 20 69 74 20 61 | 66 74 65 72 77 61 72 64 |use it a|fterward|
|00003cd0| 73 2e 0a 20 2a 20 20 20 | 20 20 20 4f 63 74 20 38 |s.. *   |   Oct 8|
|00003ce0| 37 3a 20 66 69 78 75 70 | 20 6d 6f 64 65 6d 20 63 |7: fixup| modem c|
|00003cf0| 6f 6e 74 72 6f 6c 20 77 | 69 74 68 20 43 4c 4f 43 |ontrol w|ith CLOC|
|00003d00| 41 4c 2c 20 73 6f 20 74 | 68 61 74 20 72 65 6d 6f |AL, so t|hat remo|
|00003d10| 74 65 20 64 69 73 63 6f | 6e 6e 65 63 74 0a 20 2a |te disco|nnect. *|
|00003d20| 09 09 63 61 6e 20 62 65 | 20 64 65 74 65 63 74 65 |..can be| detecte|
|00003d30| 64 20 61 6e 64 20 64 65 | 61 6c 74 20 77 69 74 68 |d and de|alt with|
|00003d40| 2e 0a 20 2a 09 4f 63 74 | 20 38 37 3a 20 66 69 78 |.. *.Oct| 87: fix|
|00003d50| 20 61 75 74 6f 6c 6f 67 | 6f 75 74 20 74 6f 20 73 | autolog|out to s|
|00003d60| 65 6e 64 20 73 65 72 69 | 65 73 20 6f 66 20 73 69 |end seri|es of si|
|00003d70| 67 6e 61 6c 73 2c 20 6e | 6f 74 20 6a 75 73 74 20 |gnals, n|ot just |
|00003d80| 53 49 47 48 55 50 0a 20 | 2a 09 4f 63 74 20 38 37 |SIGHUP. |*.Oct 87|
|00003d90| 3a 20 43 6c 65 61 6e 20 | 75 70 20 63 6f 64 65 2c |: Clean |up code,|
|00003da0| 20 61 6e 64 20 64 69 73 | 74 72 69 62 75 74 65 20 | and dis|tribute |
|00003db0| 74 6f 20 6f 74 68 65 72 | 20 73 6f 75 72 63 65 20 |to other| source |
|00003dc0| 66 69 6c 65 73 2e 0a 20 | 2a 09 4e 6f 76 20 38 37 |files.. |*.Nov 87|
|00003dd0| 3a 20 46 69 78 20 6c 75 | 72 6b 69 6e 67 20 62 75 |: Fix lu|rking bu|
|00003de0| 67 20 69 6e 20 27 65 78 | 70 65 63 74 27 2e 20 43 |g in 'ex|pect'. C|
|00003df0| 6c 65 61 6e 20 63 6f 64 | 65 20 66 6f 72 20 27 6c |lean cod|e for 'l|
|00003e00| 69 6e 74 27 2e 0a 20 2a | 09 4e 6f 76 20 38 37 3a |int'.. *|.Nov 87:|
|00003e10| 20 49 67 6e 6f 72 65 20 | 53 49 48 47 55 50 27 73 | Ignore |SIHGUP's|
|00003e20| 20 67 65 6e 65 72 61 74 | 65 64 20 62 79 20 27 68 | generat|ed by 'h|
|00003e30| 61 6e 67 75 70 27 2e 0a | 20 2a 09 44 65 63 20 38 |angup'..| *.Dec 8|
|00003e40| 37 3a 20 46 6f 72 63 65 | 20 67 65 74 74 79 20 4e |7: Force| getty N|
|00003e50| 4f 54 20 74 6f 20 68 61 | 6e 67 75 70 20 74 68 65 |OT to ha|ngup the|
|00003e60| 20 6c 69 6e 65 20 62 65 | 66 6f 72 65 20 6c 6f 67 | line be|fore log|
|00003e70| 69 6e 2e 0a 20 2a 09 4a | 61 6e 20 38 37 3a 20 4f |in.. *.J|an 87: O|
|00003e80| 70 65 6e 20 73 74 64 69 | 6f 20 66 69 6c 65 20 64 |pen stdi|o file d|
|00003e90| 65 73 63 72 69 70 74 6f | 72 73 2e 0a 20 2a 0a 20 |escripto|rs.. *. |
|00003ea0| 2a 0a 20 2a 2f 0a 23 69 | 6e 63 6c 75 64 65 20 3c |*. */.#i|nclude <|
|00003eb0| 73 79 73 2f 74 79 70 65 | 73 2e 68 3e 0a 23 69 6e |sys/type|s.h>.#in|
|00003ec0| 63 6c 75 64 65 20 3c 73 | 74 64 69 6f 2e 68 3e 0a |clude <s|tdio.h>.|
|00003ed0| 23 69 6e 63 6c 75 64 65 | 20 3c 73 69 67 6e 61 6c |#include| <signal|
|00003ee0| 2e 68 3e 0a 23 69 6e 63 | 6c 75 64 65 20 3c 65 72 |.h>.#inc|lude <er|
|00003ef0| 72 6e 6f 2e 68 3e 0a 23 | 69 6e 63 6c 75 64 65 20 |rno.h>.#|include |
|00003f00| 3c 66 63 6e 74 6c 2e 68 | 3e 0a 23 69 6e 63 6c 75 |<fcntl.h|>.#inclu|
|00003f10| 64 65 20 3c 74 65 72 6d | 69 6f 2e 68 3e 0a 23 69 |de <term|io.h>.#i|
|00003f20| 6e 63 6c 75 64 65 20 3c | 73 79 73 2f 73 74 61 74 |nclude <|sys/stat|
|00003f30| 2e 68 3e 0a 23 69 6e 63 | 6c 75 64 65 20 3c 74 69 |.h>.#inc|lude <ti|
|00003f40| 6d 65 2e 68 3e 0a 0a 23 | 69 66 64 65 66 20 57 41 |me.h>..#|ifdef WA|
|00003f50| 54 43 48 49 54 0a 23 69 | 6e 63 6c 75 64 65 20 3c |TCHIT.#i|nclude <|
|00003f60| 70 77 64 2e 68 3e 0a 73 | 74 72 75 63 74 20 70 61 |pwd.h>.s|truct pa|
|00003f70| 73 73 77 64 20 2a 67 65 | 74 70 77 75 69 64 28 29 |sswd *ge|tpwuid()|
|00003f80| 3b 0a 23 65 6e 64 69 66 | 0a 0a 23 64 65 66 69 6e |;.#endif|..#defin|
|00003f90| 65 20 4d 41 49 4e 44 45 | 46 0a 23 69 6e 63 6c 75 |e MAINDE|F.#inclu|
|00003fa0| 64 65 20 22 6d 6f 64 65 | 6d 2e 68 22 09 09 2f 2a |de "mode|m.h"../*|
|00003fb0| 20 76 61 72 69 61 62 6c | 65 20 64 65 66 69 6e 69 | variabl|e defini|
|00003fc0| 74 69 6f 6e 73 20 2a 2f | 0a 2f 2a 20 0a 20 2a 20 |tions */|./* . * |
|00003fd0| 77 61 6b 65 75 70 20 67 | 65 74 73 20 63 61 6c 6c |wakeup g|ets call|
|00003fe0| 65 64 20 77 68 65 6e 20 | 74 68 65 20 61 6c 61 72 |ed when |the alar|
|00003ff0| 6d 20 67 6f 65 73 20 6f | 66 66 20 0a 20 2a 2f 0a |m goes o|ff . */.|
|00004000| 77 61 6b 65 75 70 28 29 | 7b 0a 09 73 69 67 6e 61 |wakeup()|{..signa|
|00004010| 6c 28 53 49 47 41 4c 52 | 4d 2c 20 77 61 6b 65 75 |l(SIGALR|M, wakeu|
|00004020| 70 29 3b 0a 7d 0a 0a 66 | 61 75 6c 74 28 73 69 67 |p);.}..f|ault(sig|
|00004030| 29 7b 0a 09 70 72 69 6e | 74 66 28 22 43 72 61 73 |){..prin|tf("Cras|
|00004040| 68 65 64 20 77 69 74 68 | 20 73 69 67 6e 61 6c 20 |hed with| signal |
|00004050| 25 64 5c 6e 22 2c 20 73 | 69 67 29 3b 0a 09 63 6c |%d\n", s|ig);..cl|
|00004060| 6f 73 65 64 6f 77 6e 28 | 73 69 67 29 3b 0a 7d 0a |osedown(|sig);.}.|
|00004070| 0a 63 6c 6f 73 65 64 6f | 77 6e 28 73 69 67 29 7b |.closedo|wn(sig){|
|00004080| 0a 09 74 69 6d 65 5f 74 | 20 6e 6f 77 3b 0a 09 6e |..time_t| now;..n|
|00004090| 6f 77 20 3d 20 74 69 6d | 65 28 28 6c 6f 6e 67 20 |ow = tim|e((long |
|000040a0| 2a 29 20 30 29 3b 0a 2f | 2a 0a 20 2a 20 5b 4e 6f |*) 0);./|*. * [No|
|000040b0| 76 20 38 37 5d 3a 20 53 | 69 6e 63 65 20 77 65 27 |v 87]: S|ince we'|
|000040c0| 72 65 20 61 62 6f 75 74 | 20 74 6f 20 68 61 6e 67 |re about| to hang|
|000040d0| 20 75 70 20 74 68 65 20 | 70 68 6f 6e 65 2c 20 0a | up the |phone, .|
|000040e0| 20 2a 20 69 67 6e 6f 72 | 65 20 74 68 65 20 73 69 | * ignor|e the si|
|000040f0| 67 6e 61 6c 20 74 68 61 | 74 20 74 68 69 73 20 69 |gnal tha|t this i|
|00004100| 73 20 67 6f 69 6e 67 20 | 74 6f 20 67 65 6e 65 72 |s going |to gener|
|00004110| 61 74 65 2e 0a 20 2a 2f | 0a 09 73 69 67 6e 61 6c |ate.. */|..signal|
|00004120| 28 53 49 47 48 55 50 2c | 20 53 49 47 5f 49 47 4e |(SIGHUP,| SIG_IGN|
|00004130| 29 3b 0a 09 69 66 28 73 | 69 67 29 20 70 72 69 6e |);..if(s|ig) prin|
|00004140| 74 66 28 22 43 61 75 67 | 68 74 20 73 69 67 6e 61 |tf("Caug|ht signa|
|00004150| 6c 20 25 64 5c 6e 22 2c | 20 73 69 67 29 3b 0a 09 |l %d\n",| sig);..|
|00004160| 70 72 69 6e 74 66 28 22 | 43 6c 6f 73 65 64 6f 77 |printf("|Closedow|
|00004170| 6e 20 61 74 20 25 73 22 | 2c 20 61 73 63 74 69 6d |n at %s"|, asctim|
|00004180| 65 28 6c 6f 63 61 6c 74 | 69 6d 65 28 26 6e 6f 77 |e(localt|ime(&now|
|00004190| 29 29 29 3b 0a 2f 2a 0a | 20 2a 20 4f 63 74 20 38 |)));./*.| * Oct 8|
|000041a0| 37 3a 20 6e 65 77 20 61 | 64 64 69 74 69 6f 6e 20 |7: new a|ddition |
|000041b0| 66 6f 72 20 53 49 47 48 | 55 50 2e 20 57 65 20 72 |for SIGH|UP. We r|
|000041c0| 65 63 65 69 76 65 20 74 | 68 69 73 20 73 69 67 6e |eceive t|his sign|
|000041d0| 61 6c 20 77 68 65 6e 09 | 74 68 65 20 6c 69 6e 65 |al when.|the line|
|000041e0| 0a 20 2a 20 69 73 20 64 | 69 73 63 6f 6e 6e 65 63 |. * is d|isconnec|
|000041f0| 74 65 64 20 62 79 20 61 | 20 72 65 6d 6f 74 65 20 |ted by a| remote |
|00004200| 63 61 6c 6c 65 72 2e 20 | 53 69 6e 63 65 20 74 68 |caller. |Since th|
|00004210| 65 20 6c 69 6e 65 20 69 | 73 20 64 65 61 64 2c 20 |e line i|s dead, |
|00004220| 73 6f 20 73 68 6f 75 6c | 64 0a 20 2a 20 74 68 65 |so shoul|d. * the|
|00004230| 20 73 68 65 6c 6c 20 62 | 65 20 28 69 74 20 67 6f | shell b|e (it go|
|00004240| 74 20 53 49 47 48 55 50 | 20 73 61 6d 65 20 61 73 |t SIGHUP| same as|
|00004250| 20 75 73 29 3b 20 6c 6f | 67 20 69 74 20 6f 75 74 | us); lo|g it out|
|00004260| 20 61 6e 79 77 61 79 2c | 20 65 76 65 6e 20 69 66 | anyway,| even if|
|00004270| 20 69 74 27 73 0a 20 2a | 20 74 72 79 69 6e 67 20 | it's. *| trying |
|00004280| 74 6f 20 69 67 6e 6f 72 | 65 20 69 74 2e 0a 20 2a |to ignor|e it.. *|
|00004290| 2f 0a 09 69 66 28 28 73 | 69 67 20 3d 3d 20 53 49 |/..if((s|ig == SI|
|000042a0| 47 48 55 50 29 20 26 26 | 20 73 68 65 6c 6c 29 20 |GHUP) &&| shell) |
|000042b0| 61 75 74 6f 6c 6f 67 6f | 75 74 28 73 68 65 6c 6c |autologo|ut(shell|
|000042c0| 29 3b 0a 2f 2a 0a 20 2a | 20 63 68 61 6e 67 65 20 |);./*. *| change |
|000042d0| 74 68 65 20 76 61 6c 75 | 65 20 69 6e 20 75 74 6d |the valu|e in utm|
|000042e0| 70 20 62 61 63 6b 20 74 | 6f 20 6f 75 72 20 70 69 |p back t|o our pi|
|000042f0| 64 2e 0a 20 2a 2f 09 09 | 0a 09 69 66 28 73 68 65 |d.. */..|..if(she|
|00004300| 6c 6c 29 20 75 63 68 61 | 6e 67 65 28 73 68 65 6c |ll) ucha|nge(shel|
|00004310| 6c 2c 20 67 65 74 70 69 | 64 28 29 29 3b 09 2f 2a |l, getpi|d());./*|
|00004320| 20 62 61 63 6b 20 74 6f | 20 6e 6f 72 6d 61 6c 20 | back to| normal |
|00004330| 2a 2f 0a 2f 2a 0a 20 2a | 20 63 6c 65 61 72 20 6d |*/./*. *| clear m|
|00004340| 6f 64 65 6d 20 6c 69 6e | 65 2c 20 77 68 69 63 68 |odem lin|e, which|
|00004350| 20 73 68 6f 75 6c 64 20 | 61 6c 73 6f 20 68 61 6e | should |also han|
|00004360| 67 75 70 20 74 68 65 20 | 70 68 6f 6e 65 20 28 69 |gup the |phone (i|
|00004370| 66 20 69 74 20 77 61 73 | 6e 27 74 20 61 6c 72 65 |f it was|n't alre|
|00004380| 61 64 79 29 2e 0a 20 2a | 2f 09 0a 09 68 61 6e 67 |ady).. *|/...hang|
|00004390| 75 70 28 64 65 76 29 3b | 0a 09 63 6c 6f 73 65 28 |up(dev);|..close(|
|000043a0| 64 65 76 29 3b 0a 2f 2a | 0a 20 2a 20 63 68 6d 6f |dev);./*|. * chmo|
|000043b0| 64 20 74 68 65 20 64 65 | 76 69 63 65 20 62 61 63 |d the de|vice bac|
|000043c0| 6b 20 74 6f 20 36 36 36 | 2c 20 73 6f 20 74 68 61 |k to 666|, so tha|
|000043d0| 74 20 75 75 63 69 63 6f | 20 61 6e 64 20 63 75 20 |t uucico| and cu |
|000043e0| 63 61 6e 20 61 63 63 65 | 73 73 20 69 74 2e 0a 20 |can acce|ss it.. |
|000043f0| 2a 20 4e 4f 54 45 3a 20 | 49 20 70 72 65 66 65 72 |* NOTE: |I prefer|
|00004400| 20 74 68 69 73 20 74 6f | 20 63 68 6f 77 6e 28 75 | this to| chown(u|
|00004410| 75 63 70 29 2c 20 77 68 | 69 63 68 20 64 6f 65 73 |ucp), wh|ich does|
|00004420| 20 6e 6f 74 20 61 6c 6c | 6f 77 20 22 63 75 22 20 | not all|ow "cu" |
|00004430| 61 63 63 65 73 73 2e 0a | 20 2a 2f 0a 09 63 68 6d |access..| */..chm|
|00004440| 6f 64 28 64 6e 61 6d 65 | 2c 30 36 36 36 29 3b 09 |od(dname|,0666);.|
|00004450| 2f 2a 20 75 75 63 70 20 | 61 63 63 65 73 73 20 2a |/* uucp |access *|
|00004460| 2f 0a 09 75 6e 6c 69 6e | 6b 28 6c 6f 63 6b 66 29 |/..unlin|k(lockf)|
|00004470| 3b 0a 09 69 66 28 73 74 | 61 74 75 73 29 20 70 72 |;..if(st|atus) pr|
|00004480| 69 6e 74 66 28 22 4c 6f | 67 6f 75 74 20 73 74 61 |intf("Lo|gout sta|
|00004490| 74 75 73 20 30 78 25 78 | 5c 6e 22 2c 20 73 74 61 |tus 0x%x|\n", sta|
|000044a0| 74 75 73 29 3b 0a 09 66 | 63 6c 6f 73 65 28 73 74 |tus);..f|close(st|
|000044b0| 64 6f 75 74 29 3b 0a 09 | 65 78 69 74 28 30 29 3b |dout);..|exit(0);|
|000044c0| 0a 7d 0a 09 09 0a 6d 61 | 69 6e 28 61 72 67 63 2c |.}....ma|in(argc,|
|000044d0| 20 61 72 67 76 2c 20 65 | 6e 76 70 29 0a 63 68 61 | argv, e|nvp).cha|
|000044e0| 72 20 2a 2a 61 72 67 76 | 2c 20 2a 2a 65 6e 76 70 |r **argv|, **envp|
|000044f0| 3b 0a 7b 0a 09 6c 6f 6e | 67 20 74 3b 0a 09 63 68 |;.{..lon|g t;..ch|
|00004500| 61 72 20 2a 61 72 67 5b | 35 5d 2c 20 2a 73 70 65 |ar *arg[|5], *spe|
|00004510| 65 64 3b 0a 09 69 6e 74 | 20 62 61 75 64 2c 20 69 |ed;..int| baud, i|
|00004520| 3b 0a 09 73 74 72 75 63 | 74 20 63 6f 6e 76 20 2a |;..struc|t conv *|
|00004530| 70 3b 0a 09 73 74 72 75 | 63 74 20 73 74 61 74 20 |p;..stru|ct stat |
|00004540| 73 62 75 66 3b 0a 09 74 | 69 6d 65 5f 74 20 6e 6f |sbuf;..t|ime_t no|
|00004550| 77 2c 20 6d 74 69 6d 65 | 3b 0a 23 69 66 64 65 66 |w, mtime|;.#ifdef|
|00004560| 20 57 41 54 43 48 49 54 | 0a 09 46 49 4c 45 20 2a | WATCHIT|..FILE *|
|00004570| 70 72 6f 63 73 3b 0a 09 | 73 74 72 75 63 74 20 70 |procs;..|struct p|
|00004580| 61 73 73 77 64 20 2a 70 | 77 3b 0a 09 63 68 61 72 |asswd *p|w;..char|
|00004590| 20 70 73 62 75 66 66 5b | 31 32 38 5d 3b 0a 23 65 | psbuff[|128];.#e|
|000045a0| 6e 64 69 66 0a 23 69 66 | 64 65 66 20 53 50 45 45 |ndif.#if|def SPEE|
|000045b0| 44 43 4f 4e 46 49 47 0a | 09 63 68 61 72 20 63 2c |DCONFIG.|.char c,|
|000045c0| 20 62 75 66 66 5b 38 5d | 3b 0a 23 65 6e 64 69 66 | buff[8]|;.#endif|
|000045d0| 0a 23 69 66 64 65 66 20 | 53 54 41 54 45 53 0a 09 |.#ifdef |STATES..|
|000045e0| 74 69 6d 65 5f 74 20 64 | 65 6c 74 61 2c 20 73 75 |time_t d|elta, su|
|000045f0| 69 63 69 64 65 3b 0a 09 | 69 6e 74 20 73 74 61 74 |icide;..|int stat|
|00004600| 65 3b 0a 23 65 6e 64 69 | 66 0a 09 46 49 4c 45 20 |e;.#endi|f..FILE |
|00004610| 2a 6c 6f 63 6b 3b 0a 2f | 2a 0a 20 2a 20 63 61 74 |*lock;./|*. * cat|
|00004620| 63 68 20 61 6e 64 20 72 | 65 70 6f 72 74 20 61 6c |ch and r|eport al|
|00004630| 6c 20 73 69 67 6e 61 6c | 73 2c 20 62 75 74 20 61 |l signal|s, but a|
|00004640| 70 70 6c 79 20 73 70 65 | 63 69 61 6c 20 74 72 65 |pply spe|cial tre|
|00004650| 61 74 6d 65 6e 74 20 74 | 6f 20 6c 65 67 61 6c 20 |atment t|o legal |
|00004660| 73 69 67 6e 61 6c 73 0a | 20 2a 20 41 6e 79 20 70 |signals.| * Any p|
|00004670| 72 6f 67 72 61 6d 20 62 | 75 67 73 20 67 65 74 20 |rogram b|ugs get |
|00004680| 72 65 70 6f 72 74 65 64 | 20 74 68 69 73 20 77 61 |reported| this wa|
|00004690| 79 2e 20 59 6f 75 20 63 | 61 6e 20 67 65 74 20 61 |y. You c|an get a|
|000046a0| 20 63 6f 72 65 20 64 75 | 6d 70 20 62 79 20 73 65 | core du|mp by se|
|000046b0| 6e 64 69 6e 67 0a 20 2a | 20 69 74 20 53 49 47 46 |nding. *| it SIGF|
|000046c0| 50 45 2e 0a 20 2a 2f 0a | 20 09 66 6f 72 28 69 3d |PE.. */.| .for(i=|
|000046d0| 31 3b 69 3c 53 49 47 55 | 53 52 31 3b 69 2b 2b 29 |1;i<SIGU|SR1;i++)|
|000046e0| 20 73 69 67 6e 61 6c 28 | 69 2c 20 66 61 75 6c 74 | signal(|i, fault|
|000046f0| 29 3b 0a 20 09 0a 20 09 | 73 69 67 6e 61 6c 28 53 |);. .. .|signal(S|
|00004700| 49 47 48 55 50 2c 20 53 | 49 47 5f 49 47 4e 29 3b |IGHUP, S|IG_IGN);|
|00004710| 0a 20 09 73 69 67 6e 61 | 6c 28 53 49 47 49 4e 54 |. .signa|l(SIGINT|
|00004720| 2c 20 53 49 47 5f 49 47 | 4e 29 3b 0a 20 09 73 69 |, SIG_IG|N);. .si|
|00004730| 67 6e 61 6c 28 53 49 47 | 51 55 49 54 2c 20 53 49 |gnal(SIG|QUIT, SI|
|00004740| 47 5f 49 47 4e 29 3b 0a | 20 09 73 69 67 6e 61 6c |G_IGN);.| .signal|
|00004750| 28 53 49 47 46 50 45 2c | 20 53 49 47 5f 44 46 4c |(SIGFPE,| SIG_DFL|
|00004760| 29 3b 09 2f 2a 20 79 6f | 75 20 63 61 6e 20 67 65 |);./* yo|u can ge|
|00004770| 74 20 61 20 63 6f 72 65 | 20 64 75 6d 70 20 68 65 |t a core| dump he|
|00004780| 72 65 20 2a 2f 0a 20 09 | 73 69 67 6e 61 6c 28 53 |re */. .|signal(S|
|00004790| 49 47 41 4c 52 4d 2c 20 | 77 61 6b 65 75 70 29 3b |IGALRM, |wakeup);|
|000047a0| 0a 20 09 73 69 67 6e 61 | 6c 28 53 49 47 54 45 52 |. .signa|l(SIGTER|
|000047b0| 4d 2c 20 63 6c 6f 73 65 | 64 6f 77 6e 29 3b 0a 2f |M, close|down);./|
|000047c0| 2a 0a 20 2a 20 4f 70 65 | 6e 20 74 68 65 20 73 74 |*. * Ope|n the st|
|000047d0| 61 6e 64 61 72 64 20 49 | 2f 4f 20 66 69 6c 65 20 |andard I|/O file |
|000047e0| 64 65 73 63 72 69 70 74 | 6f 72 73 2c 20 69 66 20 |descript|ors, if |
|000047f0| 6e 6f 74 20 61 6c 72 65 | 61 64 79 20 6f 70 65 6e |not alre|ady open|
|00004800| 2e 0a 20 2a 20 52 75 6e | 6e 69 6e 67 20 66 72 6f |.. * Run|ning fro|
|00004810| 6d 20 69 6e 69 74 2c 20 | 77 65 20 64 6f 6e 27 74 |m init, |we don't|
|00004820| 20 68 61 76 65 20 61 20 | 74 65 72 6d 69 6e 61 6c | have a |terminal|
|00004830| 2c 20 73 6f 20 6f 75 74 | 70 75 74 20 74 6f 20 4c |, so out|put to L|
|00004840| 4f 47 46 49 4c 45 2e 0a | 20 2a 2f 0a 20 09 69 66 |OGFILE..| */. .if|
|00004850| 28 28 69 20 3d 20 6f 70 | 65 6e 28 22 2f 64 65 76 |((i = op|en("/dev|
|00004860| 2f 6e 75 6c 6c 22 2c 20 | 30 29 29 20 3d 3d 20 30 |/null", |0)) == 0|
|00004870| 29 20 7b 0a 20 09 09 6f | 70 65 6e 28 22 2f 64 65 |) {. ..o|pen("/de|
|00004880| 76 2f 6e 75 6c 6c 22 2c | 20 31 29 3b 0a 20 09 09 |v/null",| 1);. ..|
|00004890| 6f 70 65 6e 28 22 2f 64 | 65 76 2f 6e 75 6c 6c 22 |open("/d|ev/null"|
|000048a0| 2c 20 31 29 3b 0a 20 09 | 7d 0a 20 09 65 6c 73 65 |, 1);. .|}. .else|
|000048b0| 20 63 6c 6f 73 65 28 69 | 29 3b 0a 20 09 66 72 65 | close(i|);. .fre|
|000048c0| 6f 70 65 6e 28 4c 4f 47 | 46 49 4c 45 2c 20 22 61 |open(LOG|FILE, "a|
|000048d0| 22 2c 20 73 74 64 6f 75 | 74 29 3b 0a 23 69 66 64 |", stdou|t);.#ifd|
|000048e0| 65 66 20 53 45 54 42 55 | 46 0a 09 73 65 74 62 75 |ef SETBU|F..setbu|
|000048f0| 66 28 73 74 64 6f 75 74 | 2c 20 4e 55 4c 4c 29 3b |f(stdout|, NULL);|
|00004900| 09 09 09 2f 2a 20 69 66 | 20 73 65 74 76 62 75 66 |.../* if| setvbuf|
|00004910| 20 62 72 6f 6b 65 6e 20 | 2a 2f 0a 23 65 6c 73 65 | broken |*/.#else|
|00004920| 0a 20 09 73 65 74 76 62 | 75 66 28 73 74 64 6f 75 |. .setvb|uf(stdou|
|00004930| 74 2c 20 4e 55 4c 4c 2c | 20 5f 49 4f 4c 42 46 2c |t, NULL,| _IOLBF,|
|00004940| 20 30 29 3b 0a 23 65 6e | 64 69 66 0a 0a 09 69 66 | 0);.#en|dif...if|
|00004950| 20 28 61 72 67 63 20 3c | 20 32 29 0a 09 7b 0a 09 | (argc <| 2)..{..|
|00004960| 09 70 72 69 6e 74 66 28 | 22 55 73 61 67 65 3a 20 |.printf(|"Usage: |
|00004970| 25 73 20 3c 74 74 79 3e | 20 5b 3c 73 70 65 65 64 |%s <tty>| [<speed|
|00004980| 3e 5d 5c 6e 22 2c 20 61 | 72 67 76 5b 30 5d 29 3b |>]\n", a|rgv[0]);|
|00004990| 0a 09 09 73 6c 65 65 70 | 28 35 29 3b 0a 09 09 65 |...sleep|(5);...e|
|000049a0| 78 69 74 28 35 29 3b 0a | 09 7d 0a 20 09 20 09 0a |xit(5);.|.}. . ..|
|000049b0| 09 73 70 72 69 6e 74 66 | 28 64 6e 61 6d 65 2c 20 |.sprintf|(dname, |
|000049c0| 22 2f 64 65 76 2f 25 73 | 22 2c 20 61 72 67 76 5b |"/dev/%s|", argv[|
|000049d0| 31 5d 29 3b 0a 23 69 66 | 20 64 65 66 69 6e 65 64 |1]);.#if| defined|
|000049e0| 28 4f 4c 33 42 32 29 0a | 09 73 70 72 69 6e 74 66 |(OL3B2).|.sprintf|
|000049f0| 28 6c 6f 63 6b 66 2c 20 | 22 2f 75 73 72 2f 73 70 |(lockf, |"/usr/sp|
|00004a00| 6f 6f 6c 2f 6c 6f 63 6b | 73 2f 4c 43 4b 2e 2e 25 |ool/lock|s/LCK..%|
|00004a10| 73 22 2c 20 61 72 67 76 | 5b 31 5d 29 3b 0a 23 65 |s", argv|[1]);.#e|
|00004a20| 6c 73 65 0a 23 69 66 20 | 20 64 65 66 69 6e 65 64 |lse.#if | defined|
|00004a30| 28 48 44 42 29 0a 09 73 | 70 72 69 6e 74 66 28 6c |(HDB)..s|printf(l|
|00004a40| 6f 63 6b 66 2c 20 22 2f | 75 73 72 2f 73 70 6f 6f |ockf, "/|usr/spoo|
|00004a50| 6c 2f 6c 6f 63 6b 73 2f | 4c 43 4b 2e 4c 2e 25 73 |l/locks/|LCK.L.%s|
|00004a60| 22 2c 20 61 72 67 76 5b | 31 5d 29 3b 0a 23 65 6c |", argv[|1]);.#el|
|00004a70| 73 65 0a 09 73 70 72 69 | 6e 74 66 28 6c 6f 63 6b |se..spri|ntf(lock|
|00004a80| 66 2c 20 22 2f 75 73 72 | 2f 73 70 6f 6f 6c 2f 75 |f, "/usr|/spool/u|
|00004a90| 75 63 70 2f 4c 43 4b 2e | 2e 25 73 22 2c 20 61 72 |ucp/LCK.|.%s", ar|
|00004aa0| 67 76 5b 31 5d 29 3b 0a | 23 65 6e 64 69 66 0a 23 |gv[1]);.|#endif.#|
|00004ab0| 65 6e 64 69 66 0a 2f 2a | 0a 20 2a 20 64 6f 20 6e |endif./*|. * do n|
|00004ac0| 6f 74 20 73 74 61 72 74 | 20 77 68 69 6c 65 20 64 |ot start| while d|
|00004ad0| 65 76 69 63 65 20 69 73 | 20 6c 6f 63 6b 65 64 0a |evice is| locked.|
|00004ae0| 20 2a 2f 0a 20 09 77 68 | 69 6c 65 28 6c 6f 63 6b | */. .wh|ile(lock|
|00004af0| 65 64 28 29 29 20 73 6c | 65 65 70 28 33 30 29 3b |ed()) sl|eep(30);|
|00004b00| 0a 09 69 66 28 28 64 65 | 76 20 3d 20 6f 70 65 6e |..if((de|v = open|
|00004b10| 28 64 6e 61 6d 65 2c 20 | 4f 5f 52 44 57 52 20 7c |(dname, |O_RDWR ||
|00004b20| 20 4f 5f 4e 44 45 4c 41 | 59 29 29 20 3d 3d 20 2d | O_NDELA|Y)) == -|
|00004b30| 31 29 20 7b 0a 09 09 09 | 70 65 72 72 6f 72 28 64 |1) {....|perror(d|
|00004b40| 6e 61 6d 65 29 3b 0a 09 | 09 09 73 6c 65 65 70 28 |name);..|..sleep(|
|00004b50| 35 29 3b 09 2f 2a 20 64 | 6f 6e 27 74 20 67 6f 20 |5);./* d|on't go |
|00004b60| 63 72 61 7a 79 20 77 69 | 74 68 20 72 65 73 70 61 |crazy wi|th respa|
|00004b70| 77 6e 73 20 2a 2f 0a 09 | 09 09 65 78 69 74 28 34 |wns */..|..exit(4|
|00004b80| 29 3b 0a 09 7d 0a 0a 20 | 2f 2a 0a 20 20 2a 20 73 |);..}.. |/*.  * s|
|00004b90| 65 74 75 70 20 63 6f 72 | 72 65 63 74 20 74 69 6d |etup cor|rect tim|
|00004ba0| 65 20 7a 6f 6e 65 0a 20 | 20 2a 2f 0a 09 70 75 74 |e zone. | */..put|
|00004bb0| 65 6e 76 28 54 49 4d 45 | 5a 4f 4e 45 29 3b 0a 20 |env(TIME|ZONE);. |
|00004bc0| 2f 2a 0a 20 20 2a 20 73 | 65 74 20 74 65 72 6d 69 |/*.  * s|et termi|
|00004bd0| 6e 61 6c 20 70 61 72 61 | 6d 65 74 65 72 73 0a 20 |nal para|meters. |
|00004be0| 20 2a 20 41 64 64 69 74 | 69 6f 6e 61 6c 20 61 72 | * Addit|ional ar|
|00004bf0| 67 75 6d 65 6e 74 20 28 | 69 66 20 70 72 65 73 65 |gument (|if prese|
|00004c00| 6e 74 29 20 63 61 6e 20 | 62 65 20 75 73 65 64 20 |nt) can |be used |
|00004c10| 74 6f 20 66 6f 72 63 65 | 20 61 6e 20 69 6e 69 74 |to force| an init|
|00004c20| 69 61 6c 20 73 70 65 65 | 64 0a 20 20 2a 20 28 54 |ial spee|d.  * (T|
|00004c30| 68 61 6e 6b 73 20 72 69 | 63 6b 29 0a 20 20 2a 2f |hanks ri|ck).  */|
|00004c40| 0a 09 69 66 28 61 72 67 | 63 20 3e 20 32 29 20 73 |..if(arg|c > 2) s|
|00004c50| 70 65 65 64 20 3d 20 61 | 72 67 76 5b 32 5d 3b 0a |peed = a|rgv[2];.|
|00004c60| 09 65 6c 73 65 20 73 70 | 65 65 64 20 3d 20 44 45 |.else sp|eed = DE|
|00004c70| 46 53 50 45 45 44 3b 0a | 09 62 61 75 64 20 3d 20 |FSPEED;.|.baud = |
|00004c80| 66 69 6e 64 73 70 65 65 | 64 28 73 70 65 65 64 29 |findspee|d(speed)|
|00004c90| 3b 0a 09 69 6e 69 74 5f | 74 65 72 6d 28 64 65 76 |;..init_|term(dev|
|00004ca0| 2c 20 62 61 75 64 29 3b | 0a 2f 2a 0a 20 2a 20 73 |, baud);|./*. * s|
|00004cb0| 65 6e 64 2d 65 78 70 65 | 63 74 20 73 74 72 69 6e |end-expe|ct strin|
|00004cc0| 67 73 20 2d 20 61 74 20 | 74 68 65 20 65 6e 64 2c |gs - at |the end,|
|00004cd0| 20 73 6f 6d 65 6f 6e 65 | 20 68 61 73 20 63 6f 6e | someone| has con|
|00004ce0| 6e 65 63 74 65 64 20 74 | 6f 20 74 68 65 20 6d 6f |nected t|o the mo|
|00004cf0| 64 65 6d 0a 20 2a 2f 0a | 23 69 66 64 65 66 20 53 |dem. */.|#ifdef S|
|00004d00| 54 41 54 45 53 0a 2f 2a | 0a 20 2a 20 66 69 6e 64 |TATES./*|. * find|
|00004d10| 20 6f 75 74 20 77 68 65 | 6e 20 74 68 65 20 6e 65 | out whe|n the ne|
|00004d20| 78 74 20 73 74 61 74 65 | 20 63 68 61 6e 67 65 20 |xt state| change |
|00004d30| 69 73 20 64 75 65 20 74 | 6f 20 6f 63 63 75 72 2e |is due t|o occur.|
|00004d40| 20 41 74 20 74 68 69 73 | 20 70 6f 69 6e 74 2c 20 | At this| point, |
|00004d50| 77 65 20 65 78 69 74 2e | 0a 20 2a 20 54 68 65 20 |we exit.|. * The |
|00004d60| 6e 65 78 74 20 69 6e 69 | 74 69 61 74 69 6f 6e 20 |next ini|tiation |
|00004d70| 77 69 6c 6c 20 73 65 74 | 20 74 68 65 20 6d 6f 64 |will set| the mod|
|00004d80| 65 6d 20 75 70 20 64 69 | 66 66 65 72 65 6e 74 6c |em up di|fferentl|
|00004d90| 79 2e 0a 20 2a 2f 0a 09 | 64 65 6c 74 61 20 3d 20 |y.. */..|delta = |
|00004da0| 64 75 72 61 74 69 6f 6e | 28 26 73 74 61 74 65 29 |duration|(&state)|
|00004db0| 3b 0a 09 73 75 69 63 69 | 64 65 20 3d 20 74 69 6d |;..suici|de = tim|
|00004dc0| 65 28 28 6c 6f 6e 67 20 | 2a 29 20 30 29 20 2b 20 |e((long |*) 0) + |
|00004dd0| 64 65 6c 74 61 3b 0a 23 | 65 6e 64 69 66 0a 09 66 |delta;.#|endif..f|
|00004de0| 6f 72 28 70 20 3d 20 72 | 69 6e 67 3b 20 70 2d 3e |or(p = r|ing; p->|
|00004df0| 63 5f 73 65 6e 64 3b 20 | 70 2b 2b 29 20 7b 0a 23 |c_send; |p++) {.#|
|00004e00| 69 66 64 65 66 20 53 54 | 41 54 45 53 0a 09 09 69 |ifdef ST|ATES...i|
|00004e10| 66 28 21 61 70 70 6c 69 | 63 61 62 6c 65 28 70 2c |f(!appli|cable(p,|
|00004e20| 20 73 74 61 74 65 29 29 | 20 63 6f 6e 74 69 6e 75 | state))| continu|
|00004e30| 65 3b 0a 23 65 6e 64 69 | 66 0a 09 09 73 65 6e 64 |e;.#endi|f...send|
|00004e40| 28 70 2d 3e 63 5f 73 65 | 6e 64 2c 20 6d 79 77 72 |(p->c_se|nd, mywr|
|00004e50| 69 74 65 29 3b 0a 23 69 | 66 64 65 66 20 53 54 41 |ite);.#i|fdef STA|
|00004e60| 54 45 53 0a 09 09 69 66 | 28 65 78 70 65 63 74 28 |TES...if|(expect(|
|00004e70| 70 2d 3e 63 5f 65 78 70 | 65 63 74 2c 20 28 69 6e |p->c_exp|ect, (in|
|00004e80| 74 29 28 70 2d 3e 63 5f | 77 61 69 74 20 3f 20 6d |t)(p->c_|wait ? m|
|00004e90| 69 6e 28 70 2d 3e 63 5f | 77 61 69 74 2c 20 64 65 |in(p->c_|wait, de|
|00004ea0| 6c 74 61 29 20 3a 20 64 | 65 6c 74 61 29 2c 20 6d |lta) : d|elta), m|
|00004eb0| 79 72 65 61 64 29 29 20 | 7b 0a 23 65 6c 73 65 0a |yread)) |{.#else.|
|00004ec0| 09 09 69 66 28 65 78 70 | 65 63 74 28 70 2d 3e 63 |..if(exp|ect(p->c|
|00004ed0| 5f 65 78 70 65 63 74 2c | 20 70 2d 3e 63 5f 77 61 |_expect,| p->c_wa|
|00004ee0| 69 74 2c 20 6d 79 72 65 | 61 64 29 29 20 7b 0a 23 |it, myre|ad)) {.#|
|00004ef0| 65 6e 64 69 66 0a 09 09 | 09 74 20 3d 20 74 69 6d |endif...|.t = tim|
|00004f00| 65 28 28 6c 6f 6e 67 20 | 2a 29 20 30 29 3b 0a 23 |e((long |*) 0);.#|
|00004f10| 69 66 64 65 66 20 53 54 | 41 54 45 53 0a 09 09 09 |ifdef ST|ATES....|
|00004f20| 69 66 28 74 20 3e 3d 20 | 73 75 69 63 69 64 65 29 |if(t >= |suicide)|
|00004f30| 20 7b 0a 09 09 09 09 70 | 72 69 6e 74 66 28 22 45 | {.....p|rintf("E|
|00004f40| 78 69 74 20 64 75 65 20 | 74 6f 20 73 74 61 74 65 |xit due |to state|
|00004f50| 20 63 68 61 6e 67 65 5c | 6e 22 29 3b 0a 09 09 09 | change\|n");....|
|00004f60| 09 65 78 69 74 28 30 29 | 3b 0a 09 09 09 7d 0a 23 |.exit(0)|;....}.#|
|00004f70| 65 6e 64 69 66 0a 09 09 | 09 70 72 69 6e 74 66 28 |endif...|.printf(|
|00004f80| 22 49 6e 63 6f 6d 69 6e | 67 20 63 61 6c 6c 20 66 |"Incomin|g call f|
|00004f90| 61 69 6c 65 64 20 74 6f | 20 63 6f 6e 6e 65 63 74 |ailed to| connect|
|00004fa0| 20 6f 6e 20 25 73 22 2c | 20 61 73 63 74 69 6d 65 | on %s",| asctime|
|00004fb0| 28 6c 6f 63 61 6c 74 69 | 6d 65 28 26 74 29 29 29 |(localti|me(&t)))|
|00004fc0| 3b 0a 2f 2a 0a 20 2a 20 | 77 65 20 64 6f 6e 27 74 |;./*. * |we don't|
|00004fd0| 20 68 61 76 65 20 74 6f | 20 64 6f 20 61 6e 79 74 | have to| do anyt|
|00004fe0| 68 69 6e 67 20 73 70 65 | 63 69 61 6c 20 68 65 72 |hing spe|cial her|
|00004ff0| 65 2c 20 73 69 6e 63 65 | 20 6e 6f 20 6c 6f 63 6b |e, since| no lock|
|00005000| 73 20 68 61 76 65 20 62 | 65 65 6e 20 73 65 74 75 |s have b|een setu|
|00005010| 70 2e 0a 20 2a 20 48 6f | 77 65 76 65 72 2c 20 73 |p.. * Ho|wever, s|
|00005020| 69 6e 63 65 20 74 68 65 | 20 6d 61 69 6e 20 70 72 |ince the| main pr|
|00005030| 6f 62 6c 65 6d 73 20 61 | 70 70 65 61 72 20 74 6f |oblems a|ppear to|
|00005040| 20 62 65 20 6e 6f 6e 2d | 72 65 73 70 6f 6e 64 69 | be non-|respondi|
|00005050| 6e 67 20 6d 6f 64 65 6d | 73 2c 20 73 65 6e 64 0a |ng modem|s, send.|
|00005060| 20 2a 20 69 74 20 73 6f | 6d 65 20 73 6f 72 74 20 | * it so|me sort |
|00005070| 6f 66 20 27 75 6e 2d 77 | 65 64 67 69 6e 67 27 20 |of 'un-w|edging' |
|00005080| 73 65 71 75 65 6e 63 65 | 0a 20 2a 2f 0a 20 09 09 |sequence|. */. ..|
|00005090| 09 73 65 6e 64 28 52 45 | 53 45 54 2c 20 6d 79 77 |.send(RE|SET, myw|
|000050a0| 72 69 74 65 29 3b 0a 20 | 09 09 09 73 6c 65 65 70 |rite);. |...sleep|
|000050b0| 28 33 29 3b 0a 09 09 09 | 68 61 6e 67 75 70 28 64 |(3);....|hangup(d|
|000050c0| 65 76 29 3b 0a 09 09 09 | 73 6c 65 65 70 28 31 30 |ev);....|sleep(10|
|000050d0| 29 3b 0a 09 09 09 69 6f | 63 74 6c 28 64 65 76 2c |);....io|ctl(dev,|
|000050e0| 20 54 43 46 4c 53 48 2c | 20 32 29 3b 09 2f 2a 20 | TCFLSH,| 2);./* |
|000050f0| 46 6c 75 73 68 20 62 6f | 74 68 20 71 75 65 75 65 |Flush bo|th queue|
|00005100| 73 20 2a 2f 0a 09 09 09 | 65 78 69 74 28 33 29 3b |s */....|exit(3);|
|00005110| 0a 09 09 09 2f 2a 4e 4f | 54 52 45 41 43 48 45 44 |..../*NO|TREACHED|
|00005120| 2a 2f 0a 09 09 7d 0a 09 | 7d 0a 09 73 69 67 6e 61 |*/...}..|}..signa|
|00005130| 6c 28 53 49 47 41 4c 52 | 4d 2c 20 77 61 6b 65 75 |l(SIGALR|M, wakeu|
|00005140| 70 29 3b 0a 2f 2a 0a 20 | 2a 20 4f 4b 20 2d 20 69 |p);./*. |* OK - i|
|00005150| 6e 63 6f 6d 69 6e 67 20 | 63 61 6c 6c 20 63 6f 6e |ncoming |call con|
|00005160| 6e 65 63 74 65 64 2e 20 | 46 69 6e 64 20 73 70 65 |nected. |Find spe|
|00005170| 65 64 20 28 69 66 20 70 | 6f 73 73 69 62 6c 65 29 |ed (if p|ossible)|
|00005180| 2c 20 63 72 65 61 74 65 | 20 6c 6f 63 6b 20 66 69 |, create| lock fi|
|00005190| 6c 65 2c 0a 20 2a 20 74 | 68 65 6e 20 73 70 61 77 |le,. * t|hen spaw|
|000051a0| 6e 20 67 65 74 74 79 2e | 0a 20 2a 20 41 74 20 74 |n getty.|. * At t|
|000051b0| 68 69 73 20 70 6f 69 6e | 74 2c 20 77 65 20 61 6c |his poin|t, we al|
|000051c0| 73 6f 20 74 72 61 70 20 | 68 61 6e 67 75 70 73 2c |so trap |hangups,|
|000051d0| 20 73 6f 20 74 68 61 74 | 20 77 65 20 63 61 6e 20 | so that| we can |
|000051e0| 63 6c 65 61 6e 20 75 70 | 20 61 66 74 65 72 0a 20 |clean up| after. |
|000051f0| 2a 20 61 6e 79 20 69 6e | 63 6f 6d 69 6e 67 20 63 |* any in|coming c|
|00005200| 61 6c 6c 73 2e 20 28 48 | 61 6e 67 75 70 73 20 61 |alls. (H|angups a|
|00005210| 72 65 20 6e 6f 77 20 64 | 65 74 65 63 74 65 64 20 |re now d|etected |
|00005220| 62 79 20 74 68 65 20 68 | 61 72 64 77 61 72 65 29 |by the h|ardware)|
|00005230| 2e 0a 20 2a 2f 0a 20 09 | 73 69 67 6e 61 6c 28 53 |.. */. .|signal(S|
|00005240| 49 47 48 55 50 2c 20 63 | 6c 6f 73 65 64 6f 77 6e |IGHUP, c|losedown|
|00005250| 29 3b 0a 23 69 66 64 65 | 66 20 53 50 45 45 44 43 |);.#ifde|f SPEEDC|
|00005260| 4f 4e 46 49 47 0a 20 09 | 64 72 65 61 64 28 64 65 |ONFIG. .|dread(de|
|00005270| 76 2c 20 26 63 2c 20 31 | 29 3b 0a 20 09 69 66 28 |v, &c, 1|);. .if(|
|00005280| 63 20 3d 3d 20 27 5c 72 | 27 29 20 73 70 65 65 64 |c == '\r|') speed|
|00005290| 20 3d 20 22 33 30 30 22 | 3b 0a 20 09 65 6c 73 65 | = "300"|;. .else|
|000052a0| 20 7b 0a 20 09 09 64 72 | 65 61 64 28 64 65 76 2c | {. ..dr|ead(dev,|
|000052b0| 20 62 75 66 66 2c 20 34 | 29 3b 0a 20 09 09 69 66 | buff, 4|);. ..if|
|000052c0| 28 21 73 74 72 63 6d 70 | 28 62 75 66 66 2c 20 22 |(!strcmp|(buff, "|
|000052d0| 31 32 30 30 22 29 29 20 | 73 70 65 65 64 20 3d 20 |1200")) |speed = |
|000052e0| 22 31 32 30 30 22 3b 0a | 20 09 09 69 66 28 21 73 |"1200";.| ..if(!s|
|000052f0| 74 72 63 6d 70 28 62 75 | 66 66 2c 20 22 32 34 30 |trcmp(bu|ff, "240|
|00005300| 30 22 29 29 20 73 70 65 | 65 64 20 3d 20 22 32 34 |0")) spe|ed = "24|
|00005310| 30 30 22 3b 0a 20 09 09 | 69 66 28 21 73 74 72 63 |00";. ..|if(!strc|
|00005320| 6d 70 28 62 75 66 66 2c | 20 22 31 32 37 35 22 29 |mp(buff,| "1275")|
|00005330| 29 20 73 70 65 65 64 20 | 3d 20 22 31 32 30 30 22 |) speed |= "1200"|
|00005340| 3b 0a 20 09 09 69 66 28 | 21 73 74 72 63 6d 70 28 |;. ..if(|!strcmp(|
|00005350| 62 75 66 66 2c 20 22 37 | 35 31 32 22 29 29 20 73 |buff, "7|512")) s|
|00005360| 70 65 65 64 20 3d 20 22 | 31 32 30 30 22 3b 0a 20 |peed = "|1200";. |
|00005370| 09 7d 0a 20 09 62 61 75 | 64 20 3d 20 66 69 6e 64 |.}. .bau|d = find|
|00005380| 73 70 65 65 64 28 73 70 | 65 65 64 29 3b 0a 23 65 |speed(sp|eed);.#e|
|00005390| 6e 64 69 66 0a 09 0a 20 | 09 74 20 3d 20 74 69 6d |ndif... |.t = tim|
|000053a0| 65 28 28 6c 6f 6e 67 20 | 2a 29 30 29 3b 0a 20 09 |e((long |*)0);. .|
|000053b0| 70 72 69 6e 74 66 28 22 | 43 61 6c 6c 20 63 6f 6e |printf("|Call con|
|000053c0| 6e 65 63 74 65 64 20 61 | 74 20 25 73 20 6f 6e 20 |nected a|t %s on |
|000053d0| 25 73 22 2c 20 73 70 65 | 65 64 2c 20 61 73 63 74 |%s", spe|ed, asct|
|000053e0| 69 6d 65 28 6c 6f 63 61 | 6c 74 69 6d 65 28 26 74 |ime(loca|ltime(&t|
|000053f0| 29 29 29 3b 0a 2f 2a 0a | 20 2a 20 53 6f 6d 65 6f |)));./*.| * Someo|
|00005400| 6e 65 20 68 61 73 20 72 | 75 6e 67 20 69 6e 20 2d |ne has r|ung in -|
|00005410| 20 6c 6f 63 6b 20 74 68 | 65 20 64 65 76 69 63 65 | lock th|e device|
|00005420| 2e 0a 20 2a 2f 0a 20 09 | 6c 6f 63 6b 20 3d 20 66 |.. */. .|lock = f|
|00005430| 6f 70 65 6e 28 6c 6f 63 | 6b 66 2c 20 22 77 22 29 |open(loc|kf, "w")|
|00005440| 3b 0a 20 2f 2a 0a 20 20 | 2a 20 68 61 6e 64 20 6f |;. /*.  |* hand o|
|00005450| 76 65 72 20 74 6f 20 22 | 67 65 74 74 79 22 0a 20 |ver to "|getty". |
|00005460| 20 2a 2f 0a 20 09 61 72 | 67 5b 30 5d 20 3d 20 22 | */. .ar|g[0] = "|
|00005470| 67 65 74 74 79 22 3b 0a | 20 09 61 72 67 5b 31 5d |getty";.| .arg[1]|
|00005480| 20 3d 20 22 2d 68 22 3b | 0a 20 09 61 72 67 5b 32 | = "-h";|. .arg[2|
|00005490| 5d 20 3d 20 61 72 67 76 | 5b 31 5d 3b 0a 20 09 61 |] = argv|[1];. .a|
|000054a0| 72 67 5b 33 5d 20 3d 20 | 73 70 65 65 64 3b 0a 09 |rg[3] = |speed;..|
|000054b0| 61 72 67 5b 34 5d 20 3d | 20 4e 55 4c 4c 3b 0a 09 |arg[4] =| NULL;..|
|000054c0| 0a 09 69 66 28 73 68 65 | 6c 6c 20 3d 20 66 6f 72 |..if(she|ll = for|
|000054d0| 6b 28 29 29 20 7b 0a 2f | 2a 0a 20 2a 20 63 68 61 |k()) {./|*. * cha|
|000054e0| 6e 67 65 20 74 68 65 20 | 75 74 6d 70 20 70 69 64 |nge the |utmp pid|
|000054f0| 20 74 6f 20 74 68 65 20 | 22 67 65 74 74 79 22 20 | to the |"getty" |
|00005500| 70 72 6f 63 65 73 73 2c | 20 73 6f 20 74 68 61 74 |process,| so that|
|00005510| 20 69 74 20 63 61 6e 20 | 6c 6f 67 69 6e 0a 20 2a | it can |login. *|
|00005520| 2f 0a 09 09 75 63 68 61 | 6e 67 65 28 67 65 74 70 |/...ucha|nge(getp|
|00005530| 69 64 28 29 2c 20 73 68 | 65 6c 6c 29 3b 09 2f 2a |id(), sh|ell);./*|
|00005540| 20 63 68 61 6e 67 65 20 | 75 74 6d 70 20 65 6e 74 | change |utmp ent|
|00005550| 72 79 20 2a 2f 0a 23 69 | 66 20 64 65 66 69 6e 65 |ry */.#i|f define|
|00005560| 64 28 4f 4c 33 42 32 29 | 0a 09 20 09 66 70 72 69 |d(OL3B2)|.. .fpri|
|00005570| 6e 74 66 28 6c 6f 63 6b | 2c 22 20 20 20 20 20 20 |ntf(lock|,"      |
|00005580| 20 25 64 5c 6e 22 2c 20 | 73 68 65 6c 6c 29 3b 0a | %d\n", |shell);.|
|00005590| 23 65 6c 73 65 0a 23 69 | 66 20 20 64 65 66 69 6e |#else.#i|f  defin|
|000055a0| 65 64 28 48 44 42 29 0a | 09 20 09 66 70 72 69 6e |ed(HDB).|. .fprin|
|000055b0| 74 66 28 6c 6f 63 6b 2c | 22 25 64 5c 6e 22 2c 20 |tf(lock,|"%d\n", |
|000055c0| 73 68 65 6c 6c 29 3b 0a | 23 65 6c 73 65 0a 09 09 |shell);.|#else...|
|000055d0| 66 77 72 69 74 65 28 28 | 63 68 61 72 20 2a 29 20 |fwrite((|char *) |
|000055e0| 26 73 68 65 6c 6c 2c 20 | 73 69 7a 65 6f 66 20 73 |&shell, |sizeof s|
|000055f0| 68 65 6c 6c 2c 20 31 2c | 20 6c 6f 63 6b 29 3b 0a |hell, 1,| lock);.|
|00005600| 23 65 6e 64 69 66 0a 23 | 65 6e 64 69 66 0a 09 20 |#endif.#|endif.. |
|00005610| 09 66 63 6c 6f 73 65 28 | 6c 6f 63 6b 29 3b 0a 2f |.fclose(|lock);./|
|00005620| 2a 0a 20 2a 20 77 61 69 | 74 20 66 6f 72 20 6c 6f |*. * wai|t for lo|
|00005630| 67 6f 75 74 20 66 72 6f | 6d 20 73 68 65 6c 6c 2e |gout fro|m shell.|
|00005640| 20 0a 20 2a 20 69 66 20 | 74 65 72 6d 69 6e 61 6c | . * if |terminal|
|00005650| 20 69 73 20 69 64 6c 65 | 20 66 6f 72 20 49 44 4c | is idle| for IDL|
|00005660| 45 54 49 4d 45 2c 20 66 | 6f 72 63 65 20 61 20 6c |ETIME, f|orce a l|
|00005670| 6f 67 6f 75 74 20 61 6e | 79 77 61 79 0a 20 2a 2f |ogout an|yway. */|
|00005680| 0a 20 09 09 61 6c 61 72 | 6d 28 53 50 59 54 49 4d |. ..alar|m(SPYTIM|
|00005690| 45 29 3b 0a 09 09 77 68 | 69 6c 65 28 28 77 61 69 |E);...wh|ile((wai|
|000056a0| 74 28 26 73 74 61 74 75 | 73 29 20 3d 3d 20 2d 31 |t(&statu|s) == -1|
|000056b0| 29 20 26 26 20 28 65 72 | 72 6e 6f 20 3d 3d 20 45 |) && (er|rno == E|
|000056c0| 49 4e 54 52 29 29 20 7b | 0a 09 09 09 69 66 28 73 |INTR)) {|....if(s|
|000056d0| 74 61 74 28 64 6e 61 6d | 65 2c 20 26 73 62 75 66 |tat(dnam|e, &sbuf|
|000056e0| 29 20 3d 3d 20 2d 31 29 | 20 7b 0a 09 09 09 09 70 |) == -1)| {.....p|
|000056f0| 65 72 72 6f 72 28 64 6e | 61 6d 65 29 3b 0a 09 09 |error(dn|ame);...|
|00005700| 09 09 63 6f 6e 74 69 6e | 75 65 3b 0a 09 09 09 7d |..contin|ue;....}|
|00005710| 0a 09 09 09 6e 6f 77 20 | 3d 20 74 69 6d 65 28 28 |....now |= time((|
|00005720| 6c 6f 6e 67 20 2a 29 30 | 29 3b 0a 09 09 09 6d 74 |long *)0|);....mt|
|00005730| 69 6d 65 20 3d 20 6d 61 | 78 28 73 62 75 66 2e 73 |ime = ma|x(sbuf.s|
|00005740| 74 5f 61 74 69 6d 65 2c | 20 73 62 75 66 2e 73 74 |t_atime,| sbuf.st|
|00005750| 5f 6d 74 69 6d 65 29 3b | 0a 0a 09 09 09 69 66 28 |_mtime);|.....if(|
|00005760| 28 6e 6f 77 20 2d 20 6d | 74 69 6d 65 29 20 3e 3d |(now - m|time) >=|
|00005770| 20 49 44 4c 45 54 49 4d | 45 29 20 7b 0a 09 09 09 | IDLETIM|E) {....|
|00005780| 09 77 72 69 74 65 28 64 | 65 76 2c 20 22 61 75 74 |.write(d|ev, "aut|
|00005790| 6f 6c 6f 67 6f 75 74 5c | 72 5c 6e 22 2c 20 31 32 |ologout\|r\n", 12|
|000057a0| 29 3b 0a 09 09 09 09 70 | 72 69 6e 74 66 28 22 44 |);.....p|rintf("D|
|000057b0| 65 76 69 63 65 20 69 64 | 6c 65 20 2d 20 61 75 74 |evice id|le - aut|
|000057c0| 6f 6c 6f 67 6f 75 74 20 | 61 74 20 25 73 5c 6e 22 |ologout |at %s\n"|
|000057d0| 2c 0a 09 09 09 09 09 61 | 73 63 74 69 6d 65 28 6c |,......a|sctime(l|
|000057e0| 6f 63 61 6c 74 69 6d 65 | 28 26 6e 6f 77 29 29 29 |ocaltime|(&now)))|
|000057f0| 3b 0a 09 09 09 09 75 63 | 68 61 6e 67 65 28 73 68 |;.....uc|hange(sh|
|00005800| 65 6c 6c 2c 20 67 65 74 | 70 69 64 28 29 29 3b 0a |ell, get|pid());.|
|00005810| 09 09 09 09 61 75 74 6f | 6c 6f 67 6f 75 74 28 73 |....auto|logout(s|
|00005820| 68 65 6c 6c 29 3b 0a 09 | 09 09 09 62 72 65 61 6b |hell);..|...break|
|00005830| 3b 0a 09 09 09 7d 0a 0a | 23 69 66 64 65 66 20 57 |;....}..|#ifdef W|
|00005840| 41 54 43 48 49 54 0a 09 | 09 09 74 20 3d 20 74 69 |ATCHIT..|..t = ti|
|00005850| 6d 65 28 28 6c 6f 6e 67 | 20 2a 29 20 30 29 3b 0a |me((long| *) 0);.|
|00005860| 09 09 09 70 77 20 3d 20 | 67 65 74 70 77 75 69 64 |...pw = |getpwuid|
|00005870| 28 28 69 6e 74 29 20 73 | 62 75 66 2e 73 74 5f 75 |((int) s|buf.st_u|
|00005880| 69 64 29 3b 0a 09 09 09 | 70 72 69 6e 74 66 28 22 |id);....|printf("|
|00005890| 4c 6f 67 6f 6e 20 75 73 | 65 72 20 69 73 20 25 73 |Logon us|er is %s|
|000058a0| 20 6f 6e 20 25 73 22 2c | 20 70 77 2d 3e 70 77 5f | on %s",| pw->pw_|
|000058b0| 6e 61 6d 65 2c 0a 09 09 | 09 09 61 73 63 74 69 6d |name,...|..asctim|
|000058c0| 65 28 6c 6f 63 61 6c 74 | 69 6d 65 28 26 74 29 29 |e(localt|ime(&t))|
|000058d0| 29 3b 0a 09 09 09 70 72 | 6f 63 73 20 3d 20 70 6f |);....pr|ocs = po|
|000058e0| 70 65 6e 28 22 70 73 20 | 2d 65 66 22 2c 20 22 72 |pen("ps |-ef", "r|
|000058f0| 22 29 3b 0a 09 09 09 77 | 68 69 6c 65 28 66 67 65 |");....w|hile(fge|
|00005900| 74 73 28 70 73 62 75 66 | 66 2c 20 73 69 7a 65 6f |ts(psbuf|f, sizeo|
|00005910| 66 20 70 73 62 75 66 66 | 2c 20 70 72 6f 63 73 29 |f psbuff|, procs)|
|00005920| 29 20 0a 09 09 09 09 69 | 66 28 70 61 72 74 6f 66 |) .....i|f(partof|
|00005930| 28 70 73 62 75 66 66 2c | 20 61 72 67 76 5b 31 5d |(psbuff,| argv[1]|
|00005940| 29 20 26 26 20 70 61 72 | 74 6f 66 28 70 73 62 75 |) && par|tof(psbu|
|00005950| 66 66 2c 20 70 77 2d 3e | 70 77 5f 6e 61 6d 65 29 |ff, pw->|pw_name)|
|00005960| 29 0a 09 09 09 09 09 70 | 72 69 6e 74 66 28 22 25 |)......p|rintf("%|
|00005970| 73 22 2c 20 70 73 62 75 | 66 66 29 3b 0a 09 09 09 |s", psbu|ff);....|
|00005980| 70 63 6c 6f 73 65 28 70 | 72 6f 63 73 29 3b 0a 23 |pclose(p|rocs);.#|
|00005990| 65 6e 64 69 66 0a 09 09 | 09 61 6c 61 72 6d 28 53 |endif...|.alarm(S|
|000059a0| 50 59 54 49 4d 45 29 3b | 0a 09 09 7d 0a 20 09 09 |PYTIME);|...}. ..|
|000059b0| 74 20 3d 20 74 69 6d 65 | 28 28 6c 6f 6e 67 20 2a |t = time|((long *|
|000059c0| 29 20 30 29 3b 0a 09 09 | 70 72 69 6e 74 66 28 22 |) 0);...|printf("|
|000059d0| 43 61 6c 6c 20 64 69 73 | 63 6f 6e 6e 65 63 74 65 |Call dis|connecte|
|000059e0| 64 20 6f 6e 20 25 73 22 | 2c 20 61 73 63 74 69 6d |d on %s"|, asctim|
|000059f0| 65 28 6c 6f 63 61 6c 74 | 69 6d 65 28 26 74 29 29 |e(localt|ime(&t))|
|00005a00| 29 3b 0a 09 09 63 6c 6f | 73 65 64 6f 77 6e 28 30 |);...clo|sedown(0|
|00005a10| 29 3b 09 09 2f 2a 20 72 | 65 6d 6f 76 65 20 6c 6f |);../* r|emove lo|
|00005a20| 63 6b 73 20 65 74 63 20 | 2a 2f 0a 09 09 2f 2a 4e |cks etc |*/.../*N|
|00005a30| 4f 54 52 45 41 43 48 45 | 44 2a 2f 0a 09 7d 0a 09 |OTREACHE|D*/..}..|
|00005a40| 65 6c 73 65 20 7b 0a 09 | 09 73 6c 65 65 70 28 31 |else {..|.sleep(1|
|00005a50| 29 3b 09 09 09 2f 2a 20 | 61 6c 6c 6f 77 20 63 68 |);.../* |allow ch|
|00005a60| 61 6e 67 65 73 20 74 6f | 20 75 74 6d 70 20 2a 2f |anges to| utmp */|
|00005a70| 0a 2f 2a 0a 20 2a 20 52 | 65 2d 64 6f 20 74 68 65 |./*. * R|e-do the|
|00005a80| 20 74 65 72 6d 69 6f 20 | 73 65 74 74 69 6e 67 73 | termio |settings|
|00005a90| 2c 20 73 6f 20 74 68 61 | 74 20 77 65 20 63 61 6e |, so tha|t we can|
|00005aa0| 20 6c 6f 67 69 6e 2e 0a | 20 2a 20 43 4c 4f 43 41 | login..| * CLOCA|
|00005ab0| 4c 20 69 73 20 72 65 6d | 6f 76 65 64 20 61 74 20 |L is rem|oved at |
|00005ac0| 74 68 69 73 20 70 6f 69 | 6e 74 2c 20 73 6f 20 74 |this poi|nt, so t|
|00005ad0| 68 61 74 20 61 20 68 61 | 6e 67 75 70 20 77 69 6c |hat a ha|ngup wil|
|00005ae0| 6c 20 67 65 6e 65 72 61 | 74 65 20 53 49 47 48 55 |l genera|te SIGHU|
|00005af0| 50 2e 0a 20 2a 20 43 6c | 6f 73 65 20 61 6c 6c 20 |P.. * Cl|ose all |
|00005b00| 74 68 65 20 66 69 6c 65 | 73 20 77 68 69 63 68 20 |the file|s which |
|00005b10| 77 65 20 68 61 76 65 20 | 6f 70 65 6e 20 2d 20 67 |we have |open - g|
|00005b20| 65 74 74 79 20 65 78 70 | 65 63 74 73 20 6e 6f 6e |etty exp|ects non|
|00005b30| 65 2e 0a 20 2a 2f 0a 20 | 09 09 6c 6f 67 69 6e 5f |e.. */. |..login_|
|00005b40| 74 65 72 6d 28 64 65 76 | 2c 20 62 61 75 64 29 3b |term(dev|, baud);|
|00005b50| 0a 20 09 09 66 6f 72 28 | 69 3d 30 3b 69 3c 32 30 |. ..for(|i=0;i<20|
|00005b60| 3b 69 2b 2b 29 20 63 6c | 6f 73 65 28 69 29 3b 0a |;i++) cl|ose(i);.|
|00005b70| 23 69 66 64 65 66 09 44 | 45 42 55 47 09 20 0a 09 |#ifdef.D|EBUG. ..|
|00005b80| 20 09 70 72 69 6e 74 66 | 28 22 25 64 3a 20 2f 65 | .printf|("%d: /e|
|00005b90| 74 63 2f 67 65 74 74 79 | 20 25 73 20 25 73 5c 6e |tc/getty| %s %s\n|
|00005ba0| 22 2c 20 67 65 74 70 69 | 64 28 29 2c 20 61 72 67 |", getpi|d(), arg|
|00005bb0| 5b 31 5d 2c 20 61 72 67 | 5b 32 5d 29 3b 0a 23 65 |[1], arg|[2]);.#e|
|00005bc0| 6e 64 69 66 0a 09 09 65 | 78 65 63 76 65 28 22 2f |ndif...e|xecve("/|
|00005bd0| 65 74 63 2f 67 65 74 74 | 79 22 2c 20 61 72 67 2c |etc/gett|y", arg,|
|00005be0| 20 65 6e 76 70 29 3b 0a | 09 09 70 72 69 6e 74 66 | envp);.|..printf|
|00005bf0| 28 22 63 61 6e 27 74 20 | 65 78 65 63 20 67 65 74 |("can't |exec get|
|00005c00| 74 79 5c 6e 22 29 3b 0a | 09 09 65 78 69 74 28 31 |ty\n");.|..exit(1|
|00005c10| 29 3b 0a 09 09 2f 2a 20 | 4e 4f 54 52 45 41 43 48 |);.../* |NOTREACH|
|00005c20| 45 44 20 2a 2f 0a 09 7d | 0a 7d 0a 2f 2a 0a 20 2a |ED */..}|.}./*. *|
|00005c30| 20 63 68 65 63 6b 20 66 | 6f 72 20 70 72 65 73 65 | check f|or prese|
|00005c40| 6e 63 65 20 6f 66 20 6c | 6f 63 6b 20 66 69 6c 65 |nce of l|ock file|
|00005c50| 0a 20 2a 20 72 65 74 75 | 72 6e 20 31 20 69 66 20 |. * retu|rn 1 if |
|00005c60| 6c 6f 63 6b 65 64 2e 0a | 20 2a 2f 0a 6c 6f 63 6b |locked..| */.lock|
|00005c70| 65 64 28 29 7b 0a 09 73 | 74 72 75 63 74 20 73 74 |ed(){..s|truct st|
|00005c80| 61 74 20 73 62 3b 0a 09 | 69 66 28 73 74 61 74 28 |at sb;..|if(stat(|
|00005c90| 6c 6f 63 6b 66 2c 20 26 | 73 62 29 20 3d 3d 20 2d |lockf, &|sb) == -|
|00005ca0| 31 29 20 72 65 74 75 72 | 6e 28 30 29 3b 0a 23 69 |1) retur|n(0);.#i|
|00005cb0| 66 64 65 66 09 44 45 42 | 55 47 0a 09 70 72 69 6e |fdef.DEB|UG..prin|
|00005cc0| 74 66 28 22 25 73 20 6c | 6f 63 6b 65 64 5c 6e 22 |tf("%s l|ocked\n"|
|00005cd0| 2c 20 6c 6f 63 6b 66 29 | 3b 0a 23 65 6e 64 69 66 |, lockf)|;.#endif|
|00005ce0| 0a 09 72 65 74 75 72 6e | 28 31 29 3b 0a 7d 0a 23 |..return|(1);.}.#|
|00005cf0| 69 66 64 65 66 20 57 41 | 54 43 48 49 54 0a 2f 2a |ifdef WA|TCHIT./*|
|00005d00| 0a 20 2a 20 70 61 72 74 | 6f 66 3a 20 6c 6f 6f 6b |. * part|of: look|
|00005d10| 20 66 6f 72 20 73 74 72 | 20 69 6e 20 74 65 78 74 | for str| in text|
|00005d20| 2e 20 48 61 73 20 61 20 | 62 75 67 20 69 66 20 79 |. Has a |bug if y|
|00005d30| 6f 75 20 6c 6f 6f 6b 20 | 66 6f 72 20 2e 2e 2e 78 |ou look |for ...x|
|00005d40| 78 78 2e 2e 2e 0a 20 2a | 2f 0a 70 61 72 74 6f 66 |xx.... *|/.partof|
|00005d50| 28 74 65 78 74 2c 20 73 | 74 72 29 0a 63 68 61 72 |(text, s|tr).char|
|00005d60| 20 2a 74 65 78 74 2c 20 | 2a 73 74 72 3b 0a 7b 0a | *text, |*str;.{.|
|00005d70| 09 63 68 61 72 20 2a 6e | 65 65 64 6c 65 2c 20 2a |.char *n|eedle, *|
|00005d80| 70 3b 0a 09 66 6f 72 28 | 70 20 3d 20 74 65 78 74 |p;..for(|p = text|
|00005d90| 2c 20 6e 65 65 64 6c 65 | 20 3d 20 73 74 72 3b 20 |, needle| = str; |
|00005da0| 2a 70 20 3b 20 70 2b 2b | 29 20 7b 0a 09 09 69 66 |*p ; p++|) {...if|
|00005db0| 28 2a 70 20 21 3d 20 2a | 6e 65 65 64 6c 65 29 20 |(*p != *|needle) |
|00005dc0| 6e 65 65 64 6c 65 20 3d | 20 73 74 72 3b 0a 09 09 |needle =| str;...|
|00005dd0| 69 66 28 2a 70 20 3d 3d | 20 2a 6e 65 65 64 6c 65 |if(*p ==| *needle|
|00005de0| 29 20 6e 65 65 64 6c 65 | 2b 2b 3b 0a 09 09 69 66 |) needle|++;...if|
|00005df0| 28 2a 6e 65 65 64 6c 65 | 20 3d 3d 20 27 5c 30 27 |(*needle| == '\0'|
|00005e00| 29 20 72 65 74 75 72 6e | 28 31 29 3b 0a 09 7d 0a |) return|(1);..}.|
|00005e10| 09 72 65 74 75 72 6e 28 | 30 29 3b 0a 7d 0a 23 65 |.return(|0);.}.#e|
|00005e20| 6e 64 69 66 0a 2f 2a 0a | 20 2a 20 61 75 74 6f 6c |ndif./*.| * autol|
|00005e30| 6f 67 6f 75 74 3a 20 6c | 6f 67 20 6f 75 74 20 74 |ogout: l|og out t|
|00005e40| 68 65 20 63 68 69 6c 64 | 20 73 68 65 6c 6c 2e 20 |he child| shell. |
|00005e50| 53 65 6e 64 73 20 53 49 | 47 48 55 50 2c 20 53 49 |Sends SI|GHUP, SI|
|00005e60| 47 54 45 52 4d 2c 20 53 | 49 47 4b 49 4c 4c 0a 20 |GTERM, S|IGKILL. |
|00005e70| 2a 20 75 6e 74 69 6c 20 | 74 68 65 20 63 68 69 6c |* until |the chil|
|00005e80| 64 20 65 78 69 74 73 2e | 0a 20 2a 2f 0a 61 75 74 |d exits.|. */.aut|
|00005e90| 6f 6c 6f 67 6f 75 74 28 | 63 68 69 6c 64 29 0a 7b |ologout(|child).{|
|00005ea0| 0a 09 6b 69 6c 6c 28 63 | 68 69 6c 64 2c 20 53 49 |..kill(c|hild, SI|
|00005eb0| 47 48 55 50 29 3b 0a 09 | 61 6c 61 72 6d 28 47 52 |GHUP);..|alarm(GR|
|00005ec0| 41 43 45 54 49 4d 45 29 | 3b 0a 09 69 66 28 77 61 |ACETIME)|;..if(wa|
|00005ed0| 69 74 28 26 73 74 61 74 | 75 73 29 20 3d 3d 20 2d |it(&stat|us) == -|
|00005ee0| 31 29 20 7b 0a 09 09 6b | 69 6c 6c 28 63 68 69 6c |1) {...k|ill(chil|
|00005ef0| 64 2c 20 53 49 47 54 45 | 52 4d 29 3b 0a 09 09 61 |d, SIGTE|RM);...a|
|00005f00| 6c 61 72 6d 28 47 52 41 | 43 45 54 49 4d 45 29 3b |larm(GRA|CETIME);|
|00005f10| 0a 09 09 69 66 28 77 61 | 69 74 28 26 73 74 61 74 |...if(wa|it(&stat|
|00005f20| 75 73 29 20 3d 3d 20 2d | 31 29 20 7b 0a 09 09 09 |us) == -|1) {....|
|00005f30| 6b 69 6c 6c 28 63 68 69 | 6c 64 2c 20 53 49 47 4b |kill(chi|ld, SIGK|
|00005f40| 49 4c 4c 29 3b 0a 09 09 | 09 61 6c 61 72 6d 28 47 |ILL);...|.alarm(G|
|00005f50| 52 41 43 45 54 49 4d 45 | 29 3b 0a 09 09 09 69 66 |RACETIME|);....if|
|00005f60| 28 77 61 69 74 28 26 73 | 74 61 74 75 73 29 20 3d |(wait(&s|tatus) =|
|00005f70| 3d 20 2d 31 29 20 7b 0a | 09 09 09 09 70 72 69 6e |= -1) {.|....prin|
|00005f80| 74 66 28 22 43 61 6e 6e | 6f 74 20 6b 69 6c 6c 20 |tf("Cann|ot kill |
|00005f90| 63 68 69 6c 64 20 70 69 | 64 20 25 64 5c 6e 22 2c |child pi|d %d\n",|
|00005fa0| 20 63 68 69 6c 64 29 3b | 0a 09 09 09 09 73 74 61 | child);|.....sta|
|00005fb0| 74 75 73 20 3d 20 30 3b | 0a 09 09 09 7d 0a 09 09 |tus = 0;|....}...|
|00005fc0| 7d 0a 09 7d 0a 09 61 6c | 61 72 6d 28 30 29 3b 0a |}..}..al|arm(0);.|
|00005fd0| 7d 0a 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |}.......|........|
|00005fe0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005ff0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00006000| 6d 6f 64 65 6d 63 74 6c | 2f 75 63 68 61 6e 67 65 |modemctl|/uchange|
|00006010| 2e 63 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.c......|........|
|00006020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00006030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00006040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00006050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00006060| 00 00 00 00 20 20 20 36 | 34 34 20 00 20 20 20 32 |....   6|44 .   2|
|00006070| 34 33 20 00 20 20 20 20 | 31 32 20 00 20 20 20 20 |43 .    |12 .    |
|00006080| 20 20 20 31 33 30 37 20 | 20 34 34 30 34 30 36 35 |   1307 | 4404065|
|00006090| 32 37 35 20 20 20 37 34 | 37 32 00 20 00 00 00 00 |275   74|72. ....|
|000060a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000060b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000060c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000060d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000060e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000060f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00006100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00006110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00006120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00006130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00006140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00006150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00006160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00006170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00006180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00006190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000061a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000061b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000061c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000061d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000061e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000061f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00006200| 2f 2a 0a 20 2a 20 43 6f | 70 79 72 69 67 68 74 20 |/*. * Co|pyright |
|00006210| 28 63 29 20 44 61 76 65 | 20 53 65 74 74 6c 65 2c |(c) Dave| Settle,|
|00006220| 20 4d 61 72 20 31 39 38 | 37 0a 20 2a 20 50 65 72 | Mar 198|7. * Per|
|00006230| 6d 69 73 73 69 6f 6e 20 | 69 73 20 67 72 61 6e 74 |mission |is grant|
|00006240| 65 64 20 74 6f 20 64 6f | 20 61 6e 79 74 68 69 6e |ed to do| anythin|
|00006250| 67 20 77 69 74 68 20 74 | 68 69 73 20 70 72 6f 67 |g with t|his prog|
|00006260| 72 61 6d 2c 20 65 78 63 | 65 70 74 20 72 65 6d 6f |ram, exc|ept remo|
|00006270| 76 65 0a 20 2a 20 74 68 | 69 73 20 63 6f 70 79 72 |ve. * th|is copyr|
|00006280| 69 67 68 74 20 6e 6f 74 | 69 63 65 2c 20 6f 72 20 |ight not|ice, or |
|00006290| 73 65 6c 6c 20 69 74 20 | 66 6f 72 20 70 72 6f 66 |sell it |for prof|
|000062a0| 69 74 2e 0a 20 2a 0a 20 | 2a 0a 20 2a 20 63 68 61 |it.. *. |*. * cha|
|000062b0| 6e 67 65 20 74 68 65 20 | 75 74 5f 70 69 64 20 76 |nge the |ut_pid v|
|000062c0| 61 6c 75 65 20 66 72 6f | 6d 20 22 6f 6c 64 22 20 |alue fro|m "old" |
|000062d0| 74 6f 20 22 6e 65 77 22 | 2e 0a 20 2a 20 41 74 74 |to "new"|.. * Att|
|000062e0| 65 6d 70 74 73 20 74 6f | 20 64 6f 20 61 6c 6c 20 |empts to| do all |
|000062f0| 74 68 65 20 74 68 69 6e | 67 73 20 74 68 61 74 20 |the thin|gs that |
|00006300| 22 67 65 74 74 79 22 20 | 61 70 70 65 61 72 73 20 |"getty" |appears |
|00006310| 74 6f 20 64 6f 2e 0a 20 | 2a 2f 0a 20 0a 23 69 6e |to do.. |*/. .#in|
|00006320| 63 6c 75 64 65 20 3c 73 | 79 73 2f 74 79 70 65 73 |clude <s|ys/types|
|00006330| 2e 68 3e 0a 23 69 6e 63 | 6c 75 64 65 20 3c 75 74 |.h>.#inc|lude <ut|
|00006340| 6d 70 2e 68 3e 0a 0a 73 | 74 72 75 63 74 20 75 74 |mp.h>..s|truct ut|
|00006350| 6d 70 20 2a 75 74 6d 70 | 2c 20 2a 67 65 74 75 74 |mp *utmp|, *getut|
|00006360| 65 6e 74 28 29 3b 0a 0a | 75 63 68 61 6e 67 65 28 |ent();..|uchange(|
|00006370| 6f 6c 64 2c 20 6e 65 77 | 29 0a 7b 0a 09 73 65 74 |old, new|).{..set|
|00006380| 75 74 65 6e 74 28 29 3b | 0a 09 77 68 69 6c 65 28 |utent();|..while(|
|00006390| 75 74 6d 70 20 3d 20 67 | 65 74 75 74 65 6e 74 28 |utmp = g|etutent(|
|000063a0| 29 29 20 7b 0a 09 09 69 | 66 28 75 74 6d 70 2d 3e |)) {...i|f(utmp->|
|000063b0| 75 74 5f 70 69 64 20 3d | 3d 20 6f 6c 64 29 20 7b |ut_pid =|= old) {|
|000063c0| 0a 09 09 09 75 74 6d 70 | 2d 3e 75 74 5f 70 69 64 |....utmp|->ut_pid|
|000063d0| 20 3d 20 6e 65 77 3b 0a | 09 09 09 69 66 28 73 74 | = new;.|...if(st|
|000063e0| 72 63 6d 70 28 75 74 6d | 70 2d 3e 75 74 5f 75 73 |rcmp(utm|p->ut_us|
|000063f0| 65 72 2c 20 22 67 65 74 | 74 79 22 29 29 20 0a 09 |er, "get|ty")) ..|
+--------+-------------------------+-------------------------+--------+--------+