/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / misc / volume1 / 8709 / 9

< prev

next >

view JSON data

view as text

open on a Mac

open on a PC

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 50 61 74 68 3a 20 75 75 | 6e 65 74 21 68 75 73 63 |Path: uu|net!husc|
|00000010| 36 21 6e 65 63 6e 74 63 | 21 6e 63 6f 61 73 74 21 |6!necntc|!ncoast!|
|00000020| 61 6c 6c 62 65 72 79 0a | 46 72 6f 6d 3a 20 70 6b |allbery.|From: pk|
|00000030| 65 72 6e 40 75 74 63 73 | 72 69 2e 55 55 43 50 20 |ern@utcs|ri.UUCP |
|00000040| 28 70 6b 65 72 6e 29 0a | 4e 65 77 73 67 72 6f 75 |(pkern).|Newsgrou|
|00000050| 70 73 3a 20 63 6f 6d 70 | 2e 73 6f 75 72 63 65 73 |ps: comp|.sources|
|00000060| 2e 6d 69 73 63 0a 53 75 | 62 6a 65 63 74 3a 20 52 |.misc.Su|bject: R|
|00000070| 65 3a 20 72 75 73 65 72 | 73 20 2d 2d 20 75 73 65 |e: ruser|s -- use|
|00000080| 72 73 28 31 29 20 66 6f | 72 20 72 77 68 6f 0a 4d |rs(1) fo|r rwho.M|
|00000090| 65 73 73 61 67 65 2d 49 | 44 3a 20 3c 34 35 33 37 |essage-I|D: <4537|
|000000a0| 40 6e 63 6f 61 73 74 2e | 55 55 43 50 3e 0a 44 61 |@ncoast.|UUCP>.Da|
|000000b0| 74 65 3a 20 31 37 20 53 | 65 70 20 38 37 20 32 33 |te: 17 S|ep 87 23|
|000000c0| 3a 33 30 3a 31 30 20 47 | 4d 54 0a 53 65 6e 64 65 |:30:10 G|MT.Sende|
|000000d0| 72 3a 20 61 6c 6c 62 65 | 72 79 40 6e 63 6f 61 73 |r: allbe|ry@ncoas|
|000000e0| 74 2e 55 55 43 50 0a 4c | 69 6e 65 73 3a 20 33 32 |t.UUCP.L|ines: 32|
|000000f0| 39 0a 41 70 70 72 6f 76 | 65 64 3a 20 61 6c 6c 62 |9.Approv|ed: allb|
|00000100| 65 72 79 40 6e 63 6f 61 | 73 74 2e 55 55 43 50 0a |ery@ncoa|st.UUCP.|
|00000110| 58 2d 41 72 63 68 69 76 | 65 3a 20 63 6f 6d 70 2e |X-Archiv|e: comp.|
|00000120| 73 6f 75 72 63 65 73 2e | 6d 69 73 63 2f 38 37 30 |sources.|misc/870|
|00000130| 39 2f 39 0a 0a 3e 20 7c | 20 49 66 20 74 68 69 73 |9/9..> || If this|
|00000140| 20 77 65 72 65 20 70 6f | 73 74 65 64 2c 20 77 6f | were po|sted, wo|
|00000150| 75 6c 64 20 74 68 65 72 | 65 20 62 65 20 61 6e 79 |uld ther|e be any|
|00000160| 20 63 6f 70 79 72 69 67 | 68 74 20 70 72 6f 62 6c | copyrig|ht probl|
|00000170| 65 6d 73 3f 0a 3e 20 7c | 20 49 66 20 73 6f 2c 20 |ems?.> || If so, |
|00000180| 77 6f 75 6c 64 20 79 6f | 75 20 72 61 74 68 65 72 |would yo|u rather|
|00000190| 20 68 61 76 65 20 61 20 | 63 6f 6d 70 6c 65 74 65 | have a |complete|
|000001a0| 6c 79 20 72 65 2d 77 72 | 69 74 74 65 6e 20 76 65 |ly re-wr|itten ve|
|000001b0| 72 73 69 6f 6e 3f 0a 3e | 20 2b 2d 2d 2d 2d 2d 2d |rsion?.>| +------|
|000001c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0a 3e 20 0a 3e 20 54 |--------|-.> .> T|
|000001d0| 68 65 72 65 20 70 72 6f | 62 61 62 6c 79 20 57 49 |here pro|bably WI|
|000001e0| 4c 4c 20 62 65 20 70 72 | 6f 62 6c 65 6d 73 20 28 |LL be pr|oblems (|
|000001f0| 72 77 68 6f 20 70 72 6f | 62 61 62 6c 79 20 68 61 |rwho pro|bably ha|
|00000200| 73 20 73 6f 6d 65 20 41 | 54 26 54 20 73 6f 75 72 |s some A|T&T sour|
|00000210| 63 65 20 69 6e 20 69 74 | 29 2e 0a 3e 20 49 20 77 |ce in it|)..> I w|
|00000220| 6f 75 6c 64 20 73 75 67 | 67 65 73 74 20 61 6c 6c |ould sug|gest all|
|00000230| 20 6e 65 77 20 63 6f 64 | 65 2c 20 6a 75 73 74 20 | new cod|e, just |
|00000240| 74 6f 20 6b 65 65 70 20 | 74 68 69 73 20 6e 65 77 |to keep |this new|
|00000250| 73 67 72 6f 75 70 20 66 | 72 6f 6d 20 62 65 69 6e |sgroup f|rom bein|
|00000260| 67 20 73 68 75 74 0a 3e | 20 64 6f 77 6e 20 62 79 |g shut.>| down by|
|00000270| 20 74 68 65 20 4c 6f 72 | 64 73 20 6f 66 20 55 4e | the Lor|ds of UN|
|00000280| 49 58 2e 2e 2e 0a 0a 4f | 6b 2e 20 48 65 72 65 27 |IX.....O|k. Here'|
|00000290| 73 20 61 20 72 65 77 72 | 69 74 74 65 6e 20 76 65 |s a rewr|itten ve|
|000002a0| 72 73 69 6f 6e 2e 0a 0a | 2d 2d 2d 2d 2d 2d 2d 2d |rsion...|--------|
|000002b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000002c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000002d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000002e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000002f0| 2d 2d 2d 2d 2d 2d 2d 2d | 0a 23 21 20 2f 62 69 6e |--------|.#! /bin|
|00000300| 2f 73 68 0a 23 20 54 68 | 69 73 20 69 73 20 61 20 |/sh.# Th|is is a |
|00000310| 73 68 65 6c 6c 20 61 72 | 63 68 69 76 65 2c 20 6d |shell ar|chive, m|
|00000320| 65 61 6e 69 6e 67 3a 0a | 23 20 31 2e 20 52 65 6d |eaning:.|# 1. Rem|
|00000330| 6f 76 65 20 65 76 65 72 | 79 74 68 69 6e 67 20 61 |ove ever|ything a|
|00000340| 62 6f 76 65 20 74 68 65 | 20 23 21 20 2f 62 69 6e |bove the| #! /bin|
|00000350| 2f 73 68 20 6c 69 6e 65 | 2e 0a 23 20 32 2e 20 53 |/sh line|..# 2. S|
|00000360| 61 76 65 20 74 68 65 20 | 72 65 73 75 6c 74 69 6e |ave the |resultin|
|00000370| 67 20 74 65 78 74 20 69 | 6e 20 61 20 66 69 6c 65 |g text i|n a file|
|00000380| 2e 0a 23 20 33 2e 20 45 | 78 65 63 75 74 65 20 74 |..# 3. E|xecute t|
|00000390| 68 65 20 66 69 6c 65 20 | 77 69 74 68 20 2f 62 69 |he file |with /bi|
|000003a0| 6e 2f 73 68 20 28 6e 6f | 74 20 63 73 68 29 20 74 |n/sh (no|t csh) t|
|000003b0| 6f 20 63 72 65 61 74 65 | 20 74 68 65 20 66 69 6c |o create| the fil|
|000003c0| 65 73 3a 0a 23 09 6d 61 | 6b 65 66 69 6c 65 0a 23 |es:.#.ma|kefile.#|
|000003d0| 09 72 75 2e 63 0a 23 09 | 72 75 2e 6c 0a 23 20 54 |.ru.c.#.|ru.l.# T|
|000003e0| 68 69 73 20 61 72 63 68 | 69 76 65 20 63 72 65 61 |his arch|ive crea|
|000003f0| 74 65 64 3a 20 57 65 64 | 20 53 65 70 20 31 36 20 |ted: Wed| Sep 16 |
|00000400| 31 31 3a 32 36 3a 35 35 | 20 31 39 38 37 0a 23 20 |11:26:55| 1987.# |
|00000410| 42 79 3a 09 70 6b 65 72 | 6e 20 28 29 0a 65 78 70 |By:.pker|n ().exp|
|00000420| 6f 72 74 20 50 41 54 48 | 3b 20 50 41 54 48 3d 2f |ort PATH|; PATH=/|
|00000430| 62 69 6e 3a 24 50 41 54 | 48 0a 65 63 68 6f 20 73 |bin:$PAT|H.echo s|
|00000440| 68 61 72 3a 20 65 78 74 | 72 61 63 74 69 6e 67 20 |har: ext|racting |
|00000450| 22 27 6d 61 6b 65 66 69 | 6c 65 27 22 20 27 28 33 |"'makefi|le'" '(3|
|00000460| 37 37 20 63 68 61 72 61 | 63 74 65 72 73 29 27 0a |77 chara|cters)'.|
|00000470| 69 66 20 74 65 73 74 20 | 2d 66 20 27 6d 61 6b 65 |if test |-f 'make|
|00000480| 66 69 6c 65 27 0a 74 68 | 65 6e 0a 09 65 63 68 6f |file'.th|en..echo|
|00000490| 20 73 68 61 72 3a 20 77 | 69 6c 6c 20 6e 6f 74 20 | shar: w|ill not |
|000004a0| 6f 76 65 72 2d 77 72 69 | 74 65 20 65 78 69 73 74 |over-wri|te exist|
|000004b0| 69 6e 67 20 66 69 6c 65 | 20 22 27 6d 61 6b 65 66 |ing file| "'makef|
|000004c0| 69 6c 65 27 22 0a 65 6c | 73 65 0a 73 65 64 20 27 |ile'".el|se.sed '|
|000004d0| 73 2f 5e 09 58 2f 2f 27 | 20 3c 3c 20 5c 53 48 41 |s/^.X//'| << \SHA|
|000004e0| 52 5f 45 4f 46 20 3e 20 | 27 6d 61 6b 65 66 69 6c |R_EOF > |'makefil|
|000004f0| 65 27 0a 09 58 23 0a 09 | 58 44 45 53 54 44 49 52 |e'..X#..|XDESTDIR|
|00000500| 3d 20 2f 75 73 72 2f 6c | 6f 63 61 6c 0a 09 58 4d |= /usr/l|ocal..XM|
|00000510| 41 4e 44 49 52 3d 09 2f | 75 73 72 2f 6d 61 6e 0a |ANDIR=./|usr/man.|
|00000520| 09 58 4d 53 45 43 3d 09 | 6c 0a 09 58 43 46 4c 41 |.XMSEC=.|l..XCFLA|
|00000530| 47 53 3d 09 2d 4f 20 2d | 73 0a 09 58 0a 09 58 72 |GS=.-O -|s..X..Xr|
|00000540| 75 3a 20 72 75 2e 6f 0a | 09 58 09 24 28 43 43 29 |u: ru.o.|.X.$(CC)|
|00000550| 20 24 28 43 46 4c 41 47 | 53 29 20 24 2a 2e 6f 20 | $(CFLAG|S) $*.o |
|00000560| 2d 6f 20 24 40 0a 09 58 | 0a 09 58 6d 61 6e 3a 20 |-o $@..X|..Xman: |
|00000570| 72 75 2e 6c 0a 09 58 09 | 6e 72 6f 66 66 20 2d 6d |ru.l..X.|nroff -m|
|00000580| 61 6e 20 72 75 2e 6c 20 | 3e 20 72 75 2e 6e 72 0a |an ru.l |> ru.nr.|
|00000590| 09 58 09 6d 6f 72 65 20 | 2d 73 20 72 75 2e 6e 72 |.X.more |-s ru.nr|
|000005a0| 0a 09 58 0a 09 58 69 6e | 73 74 61 6c 6c 3a 20 72 |..X..Xin|stall: r|
|000005b0| 75 0a 09 58 09 69 6e 73 | 74 61 6c 6c 20 2d 63 20 |u..X.ins|tall -c |
|000005c0| 72 75 20 24 28 44 45 53 | 54 44 49 52 29 0a 09 58 |ru $(DES|TDIR)..X|
|000005d0| 09 69 6e 73 74 61 6c 6c | 20 2d 63 20 72 75 2e 6c |.install| -c ru.l|
|000005e0| 20 24 28 4d 41 4e 44 49 | 52 29 2f 6d 61 6e 24 28 | $(MANDI|R)/man$(|
|000005f0| 4d 53 45 43 29 2f 72 75 | 2e 24 28 4d 53 45 43 29 |MSEC)/ru|.$(MSEC)|
|00000600| 0a 09 58 09 6c 6e 20 24 | 28 44 45 53 54 44 49 52 |..X.ln $|(DESTDIR|
|00000610| 29 2f 72 75 20 24 28 44 | 45 53 54 44 49 52 29 2f |)/ru $(D|ESTDIR)/|
|00000620| 72 75 73 65 72 73 0a 09 | 58 09 6c 6e 20 24 28 4d |rusers..|X.ln $(M|
|00000630| 41 4e 44 49 52 29 2f 6d | 61 6e 24 28 4d 53 45 43 |ANDIR)/m|an$(MSEC|
|00000640| 29 2f 72 75 2e 24 28 4d | 53 45 43 29 20 24 28 4d |)/ru.$(M|SEC) $(M|
|00000650| 41 4e 44 49 52 29 2f 6d | 61 6e 24 28 4d 53 45 43 |ANDIR)/m|an$(MSEC|
|00000660| 29 2f 72 75 73 65 72 73 | 2e 24 28 4d 53 45 43 29 |)/rusers|.$(MSEC)|
|00000670| 0a 09 58 0a 09 58 63 6c | 65 61 6e 3a 0a 09 58 09 |..X..Xcl|ean:..X.|
|00000680| 2d 72 6d 20 2d 66 20 2a | 2e 6f 20 61 2e 6f 75 74 |-rm -f *|.o a.out|
|00000690| 20 2a 2e 6e 72 0a 53 48 | 41 52 5f 45 4f 46 0a 69 | *.nr.SH|AR_EOF.i|
|000006a0| 66 20 74 65 73 74 20 33 | 37 37 20 2d 6e 65 20 22 |f test 3|77 -ne "|
|000006b0| 60 77 63 20 2d 63 20 3c | 20 27 6d 61 6b 65 66 69 |`wc -c <| 'makefi|
|000006c0| 6c 65 27 60 22 0a 74 68 | 65 6e 0a 09 65 63 68 6f |le'`".th|en..echo|
|000006d0| 20 73 68 61 72 3a 20 65 | 72 72 6f 72 20 74 72 61 | shar: e|rror tra|
|000006e0| 6e 73 6d 69 74 74 69 6e | 67 20 22 27 6d 61 6b 65 |nsmittin|g "'make|
|000006f0| 66 69 6c 65 27 22 20 27 | 28 73 68 6f 75 6c 64 20 |file'" '|(should |
|00000700| 68 61 76 65 20 62 65 65 | 6e 20 33 37 37 20 63 68 |have bee|n 377 ch|
|00000710| 61 72 61 63 74 65 72 73 | 29 27 0a 66 69 0a 66 69 |aracters|)'.fi.fi|
|00000720| 20 23 20 65 6e 64 20 6f | 66 20 6f 76 65 72 77 72 | # end o|f overwr|
|00000730| 69 74 69 6e 67 20 63 68 | 65 63 6b 0a 65 63 68 6f |iting ch|eck.echo|
|00000740| 20 73 68 61 72 3a 20 65 | 78 74 72 61 63 74 69 6e | shar: e|xtractin|
|00000750| 67 20 22 27 72 75 2e 63 | 27 22 20 27 28 34 33 31 |g "'ru.c|'" '(431|
|00000760| 37 20 63 68 61 72 61 63 | 74 65 72 73 29 27 0a 69 |7 charac|ters)'.i|
|00000770| 66 20 74 65 73 74 20 2d | 66 20 27 72 75 2e 63 27 |f test -|f 'ru.c'|
|00000780| 0a 74 68 65 6e 0a 09 65 | 63 68 6f 20 73 68 61 72 |.then..e|cho shar|
|00000790| 3a 20 77 69 6c 6c 20 6e | 6f 74 20 6f 76 65 72 2d |: will n|ot over-|
|000007a0| 77 72 69 74 65 20 65 78 | 69 73 74 69 6e 67 20 66 |write ex|isting f|
|000007b0| 69 6c 65 20 22 27 72 75 | 2e 63 27 22 0a 65 6c 73 |ile "'ru|.c'".els|
|000007c0| 65 0a 73 65 64 20 27 73 | 2f 5e 09 58 2f 2f 27 20 |e.sed 's|/^.X//' |
|000007d0| 3c 3c 20 5c 53 48 41 52 | 5f 45 4f 46 20 3e 20 27 |<< \SHAR|_EOF > '|
|000007e0| 72 75 2e 63 27 0a 09 58 | 2f 2a 0a 09 58 20 2a 20 |ru.c'..X|/*..X * |
|000007f0| 72 75 20 2d 20 72 65 6d | 6f 74 65 20 75 73 65 72 |ru - rem|ote user|
|00000800| 73 28 31 29 0a 09 58 20 | 2a 09 75 73 61 67 65 3a |s(1)..X |*.usage:|
|00000810| 20 72 75 20 5b 2d 64 20 | 64 6f 6d 61 69 6e 5d 20 | ru [-d |domain] |
|00000820| 5b 2d 68 20 68 6f 73 74 | 5d 0a 09 58 20 2a 0a 09 |[-h host|]..X *..|
|00000830| 58 20 2a 09 50 2e 20 4b | 65 72 6e 20 28 70 6b 65 |X *.P. K|ern (pke|
|00000840| 72 6e 40 75 74 63 73 72 | 69 29 0a 09 58 20 2a 09 |rn@utcsr|i)..X *.|
|00000850| 54 75 65 20 53 65 70 20 | 31 35 20 31 39 38 37 0a |Tue Sep |15 1987.|
|00000860| 09 58 20 2a 2f 0a 09 58 | 0a 09 58 23 69 6e 63 6c |.X */..X|..X#incl|
|00000870| 75 64 65 20 3c 73 74 64 | 69 6f 2e 68 3e 0a 09 58 |ude <std|io.h>..X|
|00000880| 23 69 6e 63 6c 75 64 65 | 20 3c 73 79 73 2f 74 79 |#include| <sys/ty|
|00000890| 70 65 73 2e 68 3e 0a 09 | 58 23 69 6e 63 6c 75 64 |pes.h>..|X#includ|
|000008a0| 65 20 3c 73 79 73 2f 73 | 74 61 74 2e 68 3e 0a 09 |e <sys/s|tat.h>..|
|000008b0| 58 23 69 6e 63 6c 75 64 | 65 20 3c 73 79 73 2f 64 |X#includ|e <sys/d|
|000008c0| 69 72 2e 68 3e 0a 09 58 | 23 69 6e 63 6c 75 64 65 |ir.h>..X|#include|
|000008d0| 20 3c 73 79 73 2f 66 69 | 6c 65 2e 68 3e 0a 09 58 | <sys/fi|le.h>..X|
|000008e0| 23 69 6e 63 6c 75 64 65 | 20 3c 6e 65 74 64 62 2e |#include| <netdb.|
|000008f0| 68 3e 0a 09 58 0a 09 58 | 23 64 65 66 69 6e 65 20 |h>..X..X|#define |
|00000900| 4d 49 4e 53 54 52 09 38 | 09 09 2f 2a 20 6d 69 6e |MINSTR.8|../* min|
|00000910| 69 6d 75 6d 20 73 74 72 | 69 6e 67 20 6c 65 6e 67 |imum str|ing leng|
|00000920| 74 68 20 2a 2f 0a 09 58 | 23 64 65 66 69 6e 65 20 |th */..X|#define |
|00000930| 48 4e 53 5a 09 33 32 09 | 09 2f 2a 20 68 6f 73 74 |HNSZ.32.|./* host|
|00000940| 6e 61 6d 65 20 6c 65 6e | 67 74 68 20 2a 2f 0a 09 |name len|gth */..|
|00000950| 58 23 64 65 66 69 6e 65 | 20 52 57 46 53 5a 09 48 |X#define| RWFSZ.H|
|00000960| 4e 53 5a 2b 35 09 09 2f | 2a 20 73 70 6f 6f 6c 2d |NSZ+5../|* spool-|
|00000970| 66 69 6c 65 20 6e 61 6d | 65 20 6c 65 6e 67 74 68 |file nam|e length|
|00000980| 20 2a 2f 0a 09 58 23 64 | 65 66 69 6e 65 20 4d 52 | */..X#d|efine MR|
|00000990| 47 4e 09 31 32 09 09 2f | 2a 20 31 32 20 73 70 61 |GN.12../|* 12 spa|
|000009a0| 63 65 20 22 74 61 62 22 | 20 2a 2f 0a 09 58 23 64 |ce "tab"| */..X#d|
|000009b0| 65 66 69 6e 65 20 52 57 | 50 45 52 49 4f 44 09 33 |efine RW|PERIOD.3|
|000009c0| 30 30 09 2f 2a 20 35 20 | 6d 69 6e 75 74 65 20 72 |00./* 5 |minute r|
|000009d0| 77 68 6f 20 72 65 66 72 | 65 73 68 20 70 65 72 69 |who refr|esh peri|
|000009e0| 6f 64 20 2a 2f 0a 09 58 | 0a 09 58 73 74 72 75 63 |od */..X|..Xstruc|
|000009f0| 74 20 72 77 5f 75 74 6d | 70 20 7b 0a 09 58 09 63 |t rw_utm|p {..X.c|
|00000a00| 68 61 72 20 74 74 79 5b | 4d 49 4e 53 54 52 5d 3b |har tty[|MINSTR];|
|00000a10| 09 2f 2a 20 75 73 65 72 | 27 73 20 74 74 79 20 2a |./* user|'s tty *|
|00000a20| 2f 0a 09 58 09 63 68 61 | 72 20 6e 61 6d 65 5b 4d |/..X.cha|r name[M|
|00000a30| 49 4e 53 54 52 5d 3b 09 | 2f 2a 20 75 73 65 72 27 |INSTR];.|/* user'|
|00000a40| 73 20 6c 6f 67 69 6e 20 | 2a 2f 0a 09 58 09 6c 6f |s login |*/..X.lo|
|00000a50| 6e 67 20 74 69 6d 65 3b | 09 09 2f 2a 20 6c 6f 67 |ng time;|../* log|
|00000a60| 69 6e 20 74 69 6d 65 20 | 2a 2f 0a 09 58 09 69 6e |in time |*/..X.in|
|00000a70| 74 20 69 64 6c 65 3b 09 | 09 2f 2a 20 69 64 6c 65 |t idle;.|./* idle|
|00000a80| 20 74 69 6d 65 20 2a 2f | 0a 09 58 7d 20 72 75 74 | time */|..X} rut|
|00000a90| 3b 0a 09 58 0a 09 58 73 | 74 72 75 63 74 20 72 77 |;..X..Xs|truct rw|
|00000aa0| 5f 68 64 72 20 7b 0a 09 | 58 09 63 68 61 72 20 70 |_hdr {..|X.char p|
|00000ab0| 61 64 5b 34 5d 3b 09 09 | 2f 2a 20 69 67 6e 6f 72 |ad[4];..|/* ignor|
|00000ac0| 65 20 66 69 72 73 74 20 | 34 20 62 79 74 65 73 20 |e first |4 bytes |
|00000ad0| 2a 2f 0a 09 58 09 69 6e | 74 20 73 65 6e 74 2c 20 |*/..X.in|t sent, |
|00000ae0| 72 63 76 64 3b 09 09 2f | 2a 20 74 69 6d 65 20 73 |rcvd;../|* time s|
|00000af0| 65 6e 74 2c 20 20 74 69 | 6d 65 20 72 65 63 27 76 |ent,  ti|me rec'v|
|00000b00| 64 20 2a 2f 0a 09 58 09 | 63 68 61 72 20 68 6f 73 |d */..X.|char hos|
|00000b10| 74 5b 48 4e 53 5a 5d 3b | 09 2f 2a 20 68 6f 73 74 |t[HNSZ];|./* host|
|00000b20| 27 73 20 6e 61 6d 65 20 | 2a 2f 0a 09 58 09 69 6e |'s name |*/..X.in|
|00000b30| 74 20 6c 6f 61 64 61 76 | 5b 33 5d 3b 09 09 2f 2a |t loadav|[3];../*|
|00000b40| 20 6c 6f 61 64 20 61 76 | 65 72 61 67 65 73 20 2a | load av|erages *|
|00000b50| 2f 0a 09 58 09 69 6e 74 | 20 62 6f 6f 74 3b 09 09 |/..X.int| boot;..|
|00000b60| 2f 2a 20 62 6f 6f 74 20 | 64 61 74 65 20 2a 2f 0a |/* boot |date */.|
|00000b70| 09 58 7d 20 68 64 72 3b | 0a 09 58 0a 09 58 23 64 |.X} hdr;|..X..X#d|
|00000b80| 65 66 69 6e 65 20 48 44 | 52 53 49 5a 45 09 73 69 |efine HD|RSIZE.si|
|00000b90| 7a 65 6f 66 28 68 64 72 | 29 0a 09 58 23 64 65 66 |zeof(hdr|)..X#def|
|00000ba0| 69 6e 65 20 52 55 54 53 | 49 5a 45 20 73 69 7a 65 |ine RUTS|IZE size|
|00000bb0| 6f 66 28 72 75 74 29 0a | 09 58 23 64 65 66 69 6e |of(rut).|.X#defin|
|00000bc0| 65 20 52 57 48 4f 44 49 | 52 20 22 2f 75 73 72 2f |e RWHODI|R "/usr/|
|00000bd0| 73 70 6f 6f 6c 2f 72 77 | 68 6f 22 0a 09 58 0a 09 |spool/rw|ho"..X..|
|00000be0| 58 63 68 61 72 20 2a 70 | 72 6f 67 2c 20 2a 64 6f |Xchar *p|rog, *do|
|00000bf0| 6d 61 69 6e 2c 20 2a 68 | 6f 73 74 3b 0a 09 58 69 |main, *h|ost;..Xi|
|00000c00| 6e 74 20 64 66 6c 67 2c | 20 68 66 6c 67 2c 20 65 |nt dflg,| hflg, e|
|00000c10| 72 72 66 6c 67 3b 0a 09 | 58 6c 6f 6e 67 20 6e 6f |rrflg;..|Xlong no|
|00000c20| 77 3b 0a 09 58 0a 09 58 | 6d 61 69 6e 28 61 72 67 |w;..X..X|main(arg|
|00000c30| 63 2c 20 61 72 67 76 29 | 0a 09 58 69 6e 74 20 61 |c, argv)|..Xint a|
|00000c40| 72 67 63 3b 0a 09 58 63 | 68 61 72 20 2a 61 72 67 |rgc;..Xc|har *arg|
|00000c50| 76 5b 5d 3b 0a 09 58 7b | 0a 09 58 09 69 6e 74 20 |v[];..X{|..X.int |
|00000c60| 6e 2c 20 66 64 3b 0a 09 | 58 09 63 68 61 72 20 2a |n, fd;..|X.char *|
|00000c70| 70 2c 20 2a 6e 62 75 66 | 2c 20 2a 72 62 75 66 2c |p, *nbuf|, *rbuf,|
|00000c80| 20 2a 73 3b 0a 09 58 09 | 44 49 52 20 2a 64 69 72 | *s;..X.|DIR *dir|
|00000c90| 70 3b 0a 09 58 09 73 74 | 72 75 63 74 20 64 69 72 |p;..X.st|ruct dir|
|00000ca0| 65 63 74 20 2a 64 70 3b | 0a 09 58 09 73 74 72 75 |ect *dp;|..X.stru|
|00000cb0| 63 74 20 73 74 61 74 20 | 73 62 75 66 3b 0a 09 58 |ct stat |sbuf;..X|
|00000cc0| 09 65 78 74 65 72 6e 20 | 63 68 61 72 20 2a 6d 61 |.extern |char *ma|
|00000cd0| 6c 6c 6f 63 28 29 3b 0a | 09 58 09 65 78 74 65 72 |lloc();.|.X.exter|
|00000ce0| 6e 20 72 77 66 63 6d 70 | 28 29 2c 20 72 75 74 63 |n rwfcmp|(), rutc|
|00000cf0| 6d 70 28 29 3b 0a 09 58 | 09 65 78 74 65 72 6e 20 |mp();..X|.extern |
|00000d00| 69 6e 74 20 6f 70 74 69 | 6e 64 3b 0a 09 58 09 65 |int opti|nd;..X.e|
|00000d10| 78 74 65 72 6e 20 63 68 | 61 72 20 2a 6f 70 74 61 |xtern ch|ar *opta|
|00000d20| 72 67 3b 0a 09 58 0a 09 | 58 09 70 72 6f 67 20 3d |rg;..X..|X.prog =|
|00000d30| 20 61 72 67 76 5b 30 5d | 3b 0a 09 58 09 6e 6f 77 | argv[0]|;..X.now|
|00000d40| 20 3d 20 74 69 6d 65 28 | 30 29 3b 0a 09 58 0a 09 | = time(|0);..X..|
|00000d50| 58 09 77 68 69 6c 65 20 | 28 28 6e 20 3d 20 67 65 |X.while |((n = ge|
|00000d60| 74 6f 70 74 28 61 72 67 | 63 2c 20 61 72 67 76 2c |topt(arg|c, argv,|
|00000d70| 20 22 64 3a 68 3a 22 29 | 29 20 21 3d 20 45 4f 46 | "d:h:")|) != EOF|
|00000d80| 29 0a 09 58 09 09 73 77 | 69 74 63 68 28 6e 29 20 |)..X..sw|itch(n) |
|00000d90| 7b 0a 09 58 09 09 63 61 | 73 65 20 27 64 27 3a 0a |{..X..ca|se 'd':.|
|00000da0| 09 58 09 09 09 64 66 6c | 67 2b 2b 3b 0a 09 58 09 |.X...dfl|g++;..X.|
|00000db0| 09 09 64 6f 6d 61 69 6e | 20 3d 20 6f 70 74 61 72 |..domain| = optar|
|00000dc0| 67 3b 0a 09 58 09 09 09 | 62 72 65 61 6b 3b 0a 09 |g;..X...|break;..|
|00000dd0| 58 09 09 63 61 73 65 20 | 27 68 27 3a 0a 09 58 09 |X..case |'h':..X.|
|00000de0| 09 09 68 66 6c 67 2b 2b | 3b 0a 09 58 09 09 09 68 |..hflg++|;..X...h|
|00000df0| 6f 73 74 20 3d 20 6f 70 | 74 61 72 67 3b 0a 09 58 |ost = op|targ;..X|
|00000e00| 09 09 09 62 72 65 61 6b | 3b 0a 09 58 09 09 64 65 |...break|;..X..de|
|00000e10| 66 61 75 6c 74 3a 0a 09 | 58 09 09 09 65 72 72 66 |fault:..|X...errf|
|00000e20| 6c 67 2b 2b 3b 0a 09 58 | 09 09 7d 0a 09 58 09 69 |lg++;..X|..}..X.i|
|00000e30| 66 20 28 65 72 72 66 6c | 67 29 20 7b 0a 09 58 09 |f (errfl|g) {..X.|
|00000e40| 09 66 70 72 69 6e 74 66 | 28 73 74 64 65 72 72 2c |.fprintf|(stderr,|
|00000e50| 20 22 55 73 61 67 65 3a | 20 25 73 20 5b 2d 64 20 | "Usage:| %s [-d |
|00000e60| 3c 64 6f 6d 61 69 6e 3e | 5d 20 5b 2d 68 20 3c 68 |<domain>|] [-h <h|
|00000e70| 6f 73 74 3e 5d 5c 6e 22 | 2c 20 70 72 6f 67 29 3b |ost>]\n"|, prog);|
|00000e80| 0a 09 58 09 09 65 78 69 | 74 28 31 29 3b 0a 09 58 |..X..exi|t(1);..X|
|00000e90| 09 7d 0a 09 58 09 09 2f | 2a 20 63 64 20 52 57 48 |.}..X../|* cd RWH|
|00000ea0| 4f 44 49 52 20 2a 2f 0a | 09 58 09 69 66 20 28 63 |ODIR */.|.X.if (c|
|00000eb0| 68 64 69 72 28 52 57 48 | 4f 44 49 52 29 20 3c 20 |hdir(RWH|ODIR) < |
|00000ec0| 30 29 20 7b 0a 09 58 09 | 09 77 72 69 74 65 28 32 |0) {..X.|.write(2|
|00000ed0| 2c 20 22 63 68 64 69 72 | 3a 20 22 2c 20 37 29 3b |, "chdir|: ", 7);|
|00000ee0| 0a 09 58 09 09 70 65 72 | 72 6f 72 28 52 57 48 4f |..X..per|ror(RWHO|
|00000ef0| 44 49 52 29 3b 0a 09 58 | 09 09 65 78 69 74 28 31 |DIR);..X|..exit(1|
|00000f00| 29 3b 0a 09 58 09 7d 0a | 09 58 09 69 66 20 28 68 |);..X.}.|.X.if (h|
|00000f10| 66 6c 67 29 20 7b 0a 09 | 58 09 09 73 74 72 75 63 |flg) {..|X..struc|
|00000f20| 74 20 68 6f 73 74 65 6e | 74 20 2a 68 2c 20 2a 67 |t hosten|t *h, *g|
|00000f30| 65 74 68 6f 73 74 62 79 | 6e 61 6d 65 28 29 3b 0a |ethostby|name();.|
|00000f40| 09 58 0a 09 58 09 09 2f | 2a 0a 09 58 09 09 20 2a |.X..X../|*..X.. *|
|00000f50| 20 74 72 79 20 74 6f 20 | 67 65 74 20 68 6f 73 74 | try to |get host|
|00000f60| 27 73 20 70 72 6f 70 65 | 72 20 6e 61 6d 65 0a 09 |'s prope|r name..|
|00000f70| 58 09 09 20 2a 20 61 6e | 64 20 74 72 79 20 74 6f |X.. * an|d try to|
|00000f80| 20 66 69 6e 64 20 74 68 | 65 20 70 72 6f 70 65 72 | find th|e proper|
|00000f90| 20 73 70 6f 6f 6c 20 66 | 69 6c 65 0a 09 58 09 09 | spool f|ile..X..|
|00000fa0| 20 2a 2f 0a 09 58 09 09 | 69 66 28 28 68 20 3d 20 | */..X..|if((h = |
|00000fb0| 67 65 74 68 6f 73 74 62 | 79 6e 61 6d 65 28 68 6f |gethostb|yname(ho|
|00000fc0| 73 74 29 29 20 3d 3d 20 | 4e 55 4c 4c 29 20 7b 0a |st)) == |NULL) {.|
|00000fd0| 09 58 09 09 09 70 65 72 | 72 6f 72 28 68 6f 73 74 |.X...per|ror(host|
|00000fe0| 29 3b 0a 09 58 09 09 09 | 65 78 69 74 28 31 29 3b |);..X...|exit(1);|
|00000ff0| 0a 09 58 09 09 7d 0a 09 | 58 09 09 6e 62 75 66 20 |..X..}..|X..nbuf |
|00001000| 3d 20 6d 61 6c 6c 6f 63 | 28 73 74 72 6c 65 6e 28 |= malloc|(strlen(|
|00001010| 68 2d 3e 68 5f 6e 61 6d | 65 29 2b 35 29 3b 0a 09 |h->h_nam|e)+5);..|
|00001020| 58 09 09 73 70 72 69 6e | 74 66 28 6e 62 75 66 2c |X..sprin|tf(nbuf,|
|00001030| 20 22 77 68 6f 64 2e 25 | 73 22 2c 20 68 2d 3e 68 | "whod.%|s", h->h|
|00001040| 5f 6e 61 6d 65 29 3b 0a | 09 58 09 09 69 66 20 28 |_name);.|.X..if (|
|00001050| 28 66 64 20 3d 20 6f 70 | 65 6e 28 6e 62 75 66 2c |(fd = op|en(nbuf,|
|00001060| 20 4f 5f 52 44 4f 4e 4c | 59 29 29 20 3c 20 30 29 | O_RDONL|Y)) < 0)|
|00001070| 20 7b 0a 09 58 09 09 09 | 63 68 61 72 20 2a 2a 73 | {..X...|char **s|
|00001080| 3b 0a 09 58 09 09 09 2f | 2a 0a 09 58 09 09 09 20 |;..X.../|*..X... |
|00001090| 2a 20 63 61 6e 27 74 20 | 66 69 6e 64 20 66 69 6c |* can't |find fil|
|000010a0| 65 20 72 65 6c 61 74 65 | 64 20 74 6f 20 68 5f 6e |e relate|d to h_n|
|000010b0| 61 6d 65 0a 09 58 09 09 | 09 20 2a 20 74 72 79 20 |ame..X..|. * try |
|000010c0| 74 68 65 20 61 6c 69 61 | 73 65 73 20 69 6e 73 74 |the alia|ses inst|
|000010d0| 65 61 64 2e 0a 09 58 09 | 09 09 20 2a 2f 0a 09 58 |ead...X.|.. */..X|
|000010e0| 09 09 09 73 20 3d 20 68 | 2d 3e 68 5f 61 6c 69 61 |...s = h|->h_alia|
|000010f0| 73 65 73 3b 0a 09 58 09 | 09 09 77 68 69 6c 65 28 |ses;..X.|..while(|
|00001100| 2a 73 29 20 7b 0a 09 58 | 09 09 09 09 66 72 65 65 |*s) {..X|....free|
|00001110| 28 6e 62 75 66 29 3b 0a | 09 58 09 09 09 09 6e 62 |(nbuf);.|.X....nb|
|00001120| 75 66 20 3d 20 6d 61 6c | 6c 6f 63 28 73 74 72 6c |uf = mal|loc(strl|
|00001130| 65 6e 28 2a 73 29 2b 35 | 29 3b 0a 09 58 09 09 09 |en(*s)+5|);..X...|
|00001140| 09 73 70 72 69 6e 74 66 | 28 6e 62 75 66 2c 20 22 |.sprintf|(nbuf, "|
|00001150| 77 68 6f 64 2e 25 73 22 | 2c 20 2a 73 29 3b 0a 09 |whod.%s"|, *s);..|
|00001160| 58 09 09 09 09 69 66 20 | 28 28 66 64 20 3d 20 6f |X....if |((fd = o|
|00001170| 70 65 6e 28 6e 62 75 66 | 2c 20 4f 5f 52 44 4f 4e |pen(nbuf|, O_RDON|
|00001180| 4c 59 29 29 20 3c 20 30 | 29 0a 09 58 09 09 09 09 |LY)) < 0|)..X....|
|00001190| 09 62 72 65 61 6b 3b 0a | 09 58 09 09 09 09 73 2b |.break;.|.X....s+|
|000011a0| 2b 3b 0a 09 58 09 09 09 | 7d 0a 09 58 09 09 09 69 |+;..X...|}..X...i|
|000011b0| 66 20 28 2a 73 20 3d 3d | 20 4e 55 4c 4c 29 20 7b |f (*s ==| NULL) {|
|000011c0| 0a 09 58 09 09 09 09 66 | 70 72 69 6e 74 66 28 73 |..X....f|printf(s|
|000011d0| 74 64 65 72 72 2c 20 20 | 22 25 73 3a 20 6e 6f 20 |tderr,  |"%s: no |
|000011e0| 64 61 74 61 5c 6e 22 2c | 20 20 68 6f 73 74 29 3b |data\n",|  host);|
|000011f0| 0a 09 58 09 09 09 09 65 | 78 69 74 28 31 29 3b 0a |..X....e|xit(1);.|
|00001200| 09 58 09 09 09 7d 0a 09 | 58 09 09 7d 0a 09 58 09 |.X...}..|X..}..X.|
|00001210| 09 69 66 20 28 66 73 74 | 61 74 28 66 64 2c 20 26 |.if (fst|at(fd, &|
|00001220| 73 62 75 66 29 20 3c 20 | 30 29 20 7b 0a 09 58 09 |sbuf) < |0) {..X.|
|00001230| 09 09 77 72 69 74 65 28 | 32 2c 20 22 66 73 74 61 |..write(|2, "fsta|
|00001240| 74 3a 20 22 2c 20 37 29 | 3b 0a 09 58 09 09 09 70 |t: ", 7)|;..X...p|
|00001250| 65 72 72 6f 72 28 6e 62 | 75 66 29 3b 0a 09 58 09 |error(nb|uf);..X.|
|00001260| 09 09 65 78 69 74 28 31 | 29 3b 0a 09 58 09 09 7d |..exit(1|);..X..}|
|00001270| 0a 09 58 09 09 6e 20 3d | 20 73 62 75 66 2e 73 74 |..X..n =| sbuf.st|
|00001280| 5f 73 69 7a 65 20 2d 20 | 48 44 52 53 49 5a 45 3b |_size - |HDRSIZE;|
|00001290| 0a 09 58 09 09 67 6f 74 | 6f 20 64 6f 69 74 3b 09 |..X..got|o doit;.|
|000012a0| 2f 2a 20 73 6b 69 70 20 | 64 69 72 20 73 65 61 72 |/* skip |dir sear|
|000012b0| 63 68 69 6e 67 20 2a 2f | 0a 09 58 09 7d 0a 09 58 |ching */|..X.}..X|
|000012c0| 0a 09 58 09 2f 2a 0a 09 | 58 09 20 2a 20 72 65 61 |..X./*..|X. * rea|
|000012d0| 64 20 22 2e 22 20 64 69 | 72 65 63 74 6f 72 79 20 |d "." di|rectory |
|000012e0| 28 61 73 73 75 6d 69 6e | 67 20 63 68 64 69 72 28 |(assumin|g chdir(|
|000012f0| 29 20 77 6f 72 6b 65 64 | 29 2c 20 0a 09 58 09 20 |) worked|), ..X. |
|00001300| 2a 20 67 65 74 20 61 6e | 64 20 73 6f 72 74 20 61 |* get an|d sort a|
|00001310| 6c 6c 20 66 69 6c 65 73 | 20 77 69 74 68 20 74 68 |ll files| with th|
|00001320| 65 20 22 77 68 6f 64 2e | 22 20 70 72 65 66 69 78 |e "whod.|" prefix|
|00001330| 2e 0a 09 58 09 20 2a 2f | 0a 09 58 09 69 66 20 28 |...X. */|..X.if (|
|00001340| 28 64 69 72 70 20 3d 20 | 6f 70 65 6e 64 69 72 28 |(dirp = |opendir(|
|00001350| 22 2e 22 29 29 20 3d 3d | 20 4e 55 4c 4c 29 20 7b |".")) ==| NULL) {|
|00001360| 0a 09 58 09 09 70 65 72 | 72 6f 72 28 52 57 48 4f |..X..per|ror(RWHO|
|00001370| 44 49 52 29 3b 0a 09 58 | 09 09 65 78 69 74 28 31 |DIR);..X|..exit(1|
|00001380| 29 3b 0a 09 58 09 7d 0a | 09 58 09 69 66 20 28 73 |);..X.}.|.X.if (s|
|00001390| 74 61 74 28 22 2e 22 2c | 20 26 73 62 75 66 29 20 |tat(".",| &sbuf) |
|000013a0| 3c 20 30 29 20 7b 20 0a | 09 58 09 09 77 72 69 74 |< 0) { .|.X..writ|
|000013b0| 65 28 32 2c 20 22 73 74 | 61 74 3a 20 22 2c 20 36 |e(2, "st|at: ", 6|
|000013c0| 29 3b 0a 09 58 09 09 70 | 65 72 72 6f 72 28 52 57 |);..X..p|error(RW|
|000013d0| 48 4f 44 49 52 29 3b 0a | 09 58 09 09 65 78 69 74 |HODIR);.|.X..exit|
|000013e0| 28 31 29 3b 0a 09 58 09 | 7d 0a 09 58 09 70 20 3d |(1);..X.|}..X.p =|
|000013f0| 20 6e 62 75 66 20 3d 20 | 6d 61 6c 6c 6f 63 28 28 | nbuf = |malloc((|
|00001400| 75 6e 73 69 67 6e 65 64 | 29 73 62 75 66 2e 73 74 |unsigned|)sbuf.st|
|00001410| 5f 73 69 7a 65 29 3b 0a | 09 58 09 6e 20 3d 20 30 |_size);.|.X.n = 0|
|00001420| 3b 0a 09 58 09 77 68 69 | 6c 65 20 28 64 70 20 3d |;..X.whi|le (dp =|
|00001430| 20 72 65 61 64 64 69 72 | 28 64 69 72 70 29 29 20 | readdir|(dirp)) |
|00001440| 7b 0a 09 58 09 09 73 74 | 72 6e 63 70 79 28 70 2c |{..X..st|rncpy(p,|
|00001450| 20 64 70 2d 3e 64 5f 6e | 61 6d 65 2c 20 64 70 2d | dp->d_n|ame, dp-|
|00001460| 3e 64 5f 6e 61 6d 6c 65 | 6e 29 3b 0a 09 58 09 09 |>d_namle|n);..X..|
|00001470| 2a 28 70 2b 64 70 2d 3e | 64 5f 6e 61 6d 6c 65 6e |*(p+dp->|d_namlen|
|00001480| 29 20 3d 20 27 5c 30 27 | 3b 0a 09 58 09 09 69 66 |) = '\0'|;..X..if|
|00001490| 20 28 73 74 72 6e 63 6d | 70 28 70 2c 20 22 77 68 | (strncm|p(p, "wh|
|000014a0| 6f 64 2e 22 2c 20 35 29 | 20 3d 3d 20 30 20 26 26 |od.", 5)| == 0 &&|
|000014b0| 0a 09 58 09 09 20 20 20 | 28 21 64 66 6c 67 20 7c |..X..   |(!dflg ||
|000014c0| 7c 20 73 74 72 63 6d 70 | 28 72 69 6e 64 65 78 28 || strcmp|(rindex(|
|000014d0| 70 2c 27 2e 27 29 2b 31 | 2c 64 6f 6d 61 69 6e 29 |p,'.')+1|,domain)|
|000014e0| 20 3d 3d 20 30 29 29 20 | 7b 0a 09 58 09 09 09 70 | == 0)) |{..X...p|
|000014f0| 20 2b 3d 20 52 57 46 53 | 5a 2c 20 20 6e 2b 2b 3b | += RWFS|Z,  n++;|
|00001500| 0a 09 58 09 09 7d 0a 09 | 58 09 7d 0a 09 58 09 2a |..X..}..|X.}..X.*|
|00001510| 70 20 3d 20 27 5c 30 27 | 3b 0a 09 58 09 63 6c 6f |p = '\0'|;..X.clo|
|00001520| 73 65 64 69 72 28 64 69 | 72 70 29 3b 0a 09 58 09 |sedir(di|rp);..X.|
|00001530| 71 73 6f 72 74 28 6e 62 | 75 66 2c 20 6e 2c 20 52 |qsort(nb|uf, n, R|
|00001540| 57 46 53 5a 2c 20 72 77 | 66 63 6d 70 29 3b 0a 09 |WFSZ, rw|fcmp);..|
|00001550| 58 09 2f 2a 0a 09 58 09 | 20 2a 20 70 72 6f 63 65 |X./*..X.| * proce|
|00001560| 73 73 20 65 61 63 68 20 | 22 77 68 6f 64 2e 22 20 |ss each |"whod." |
|00001570| 66 69 6c 65 20 69 6e 20 | 6e 62 75 66 20 6c 69 73 |file in |nbuf lis|
|00001580| 74 2e 0a 09 58 09 20 2a | 2f 0a 09 58 09 77 68 69 |t...X. *|/..X.whi|
|00001590| 6c 65 20 28 6e 62 75 66 | 20 3c 20 70 29 20 7b 0a |le (nbuf| < p) {.|
|000015a0| 09 58 09 09 69 66 20 28 | 28 66 64 20 3d 20 6f 70 |.X..if (|(fd = op|
|000015b0| 65 6e 28 6e 62 75 66 2c | 20 4f 5f 52 44 4f 4e 4c |en(nbuf,| O_RDONL|
|000015c0| 59 29 29 20 3c 20 30 29 | 20 7b 0a 09 58 09 09 09 |Y)) < 0)| {..X...|
|000015d0| 70 65 72 72 6f 72 28 6e | 62 75 66 29 3b 0a 09 58 |perror(n|buf);..X|
|000015e0| 09 09 09 65 78 69 74 28 | 31 29 3b 0a 09 58 09 09 |...exit(|1);..X..|
|000015f0| 7d 0a 09 58 09 09 69 66 | 20 28 66 73 74 61 74 28 |}..X..if| (fstat(|
|00001600| 66 64 2c 20 26 73 62 75 | 66 29 20 3c 20 30 29 20 |fd, &sbu|f) < 0) |
|00001610| 7b 0a 09 58 09 09 09 77 | 72 69 74 65 28 32 2c 20 |{..X...w|rite(2, |
|00001620| 22 66 73 74 61 74 3a 20 | 22 2c 20 37 29 3b 0a 09 |"fstat: |", 7);..|
|00001630| 58 09 09 09 70 65 72 72 | 6f 72 28 6e 62 75 66 29 |X...perr|or(nbuf)|
|00001640| 3b 0a 09 58 09 09 09 65 | 78 69 74 28 31 29 3b 0a |;..X...e|xit(1);.|
|00001650| 09 58 09 09 7d 0a 09 58 | 09 09 69 66 20 28 6e 20 |.X..}..X|..if (n |
|00001660| 3d 20 73 62 75 66 2e 73 | 74 5f 73 69 7a 65 2d 48 |= sbuf.s|t_size-H|
|00001670| 44 52 53 49 5a 45 29 20 | 7b 0a 09 58 64 6f 69 74 |DRSIZE) |{..Xdoit|
|00001680| 3a 09 09 09 69 66 20 28 | 28 72 62 75 66 20 3d 20 |:...if (|(rbuf = |
|00001690| 6d 61 6c 6c 6f 63 28 28 | 75 6e 73 69 67 6e 65 64 |malloc((|unsigned|
|000016a0| 29 6e 29 29 20 3d 3d 20 | 30 29 20 7b 0a 09 58 09 |)n)) == |0) {..X.|
|000016b0| 09 09 09 70 65 72 72 6f | 72 28 70 72 6f 67 29 3b |...perro|r(prog);|
|000016c0| 0a 09 58 09 09 09 09 65 | 78 69 74 28 31 29 3b 0a |..X....e|xit(1);.|
|000016d0| 09 58 09 09 09 7d 0a 09 | 58 09 09 09 6e 20 3d 20 |.X...}..|X...n = |
|000016e0| 72 65 61 64 28 66 64 2c | 20 28 63 68 61 72 20 2a |read(fd,| (char *|
|000016f0| 29 26 68 64 72 2c 20 48 | 44 52 53 49 5a 45 29 3b |)&hdr, H|DRSIZE);|
|00001700| 0a 09 58 09 09 09 69 66 | 20 28 68 66 6c 67 20 7c |..X...if| (hflg ||
|00001710| 7c 20 6e 6f 77 2d 68 64 | 72 2e 72 63 76 64 20 3c || now-hd|r.rcvd <|
|00001720| 3d 20 52 57 50 45 52 49 | 4f 44 29 20 7b 0a 09 58 |= RWPERI|OD) {..X|
|00001730| 09 09 09 09 6e 20 3d 20 | 72 65 61 64 28 66 64 2c |....n = |read(fd,|
|00001740| 72 62 75 66 2c 73 62 75 | 66 2e 73 74 5f 73 69 7a |rbuf,sbu|f.st_siz|
|00001750| 65 2d 48 44 52 53 49 5a | 45 29 3b 0a 09 58 09 09 |e-HDRSIZ|E);..X..|
|00001760| 09 09 71 73 6f 72 74 28 | 72 62 75 66 2c 20 6e 2f |..qsort(|rbuf, n/|
|00001770| 52 55 54 53 49 5a 45 2c | 20 52 55 54 53 49 5a 45 |RUTSIZE,| RUTSIZE|
|00001780| 2c 20 72 75 74 63 6d 70 | 29 3b 0a 09 58 09 09 09 |, rutcmp|);..X...|
|00001790| 09 62 75 72 70 28 6e 62 | 75 66 2c 20 72 62 75 66 |.burp(nb|uf, rbuf|
|000017a0| 2c 20 6e 29 3b 0a 09 58 | 09 09 09 7d 0a 09 58 09 |, n);..X|...}..X.|
|000017b0| 09 7d 0a 09 58 09 09 66 | 72 65 65 28 72 62 75 66 |.}..X..f|ree(rbuf|
|000017c0| 29 3b 0a 09 58 09 09 63 | 6c 6f 73 65 28 66 64 29 |);..X..c|lose(fd)|
|000017d0| 3b 0a 09 58 09 09 69 66 | 20 28 68 66 6c 67 29 0a |;..X..if| (hflg).|
|000017e0| 09 58 09 09 09 65 78 69 | 74 28 30 29 3b 0a 09 58 |.X...exi|t(0);..X|
|000017f0| 09 09 6e 62 75 66 20 2b | 3d 20 52 57 46 53 5a 3b |..nbuf +|= RWFSZ;|
|00001800| 0a 09 58 09 7d 0a 09 58 | 7d 0a 09 58 0a 09 58 72 |..X.}..X|}..X..Xr|
|00001810| 77 66 63 6d 70 28 70 2c | 20 71 29 0a 09 58 63 68 |wfcmp(p,| q)..Xch|
|00001820| 61 72 20 2a 70 2c 20 2a | 71 3b 0a 09 58 7b 0a 09 |ar *p, *|q;..X{..|
|00001830| 58 09 72 65 74 75 72 6e | 28 73 74 72 6e 63 6d 70 |X.return|(strncmp|
|00001840| 28 70 2c 20 71 2c 20 52 | 57 46 53 5a 29 29 3b 0a |(p, q, R|WFSZ));.|
|00001850| 09 58 7d 0a 09 58 0a 09 | 58 72 75 74 63 6d 70 28 |.X}..X..|Xrutcmp(|
|00001860| 70 2c 20 71 29 0a 09 58 | 72 65 67 69 73 74 65 72 |p, q)..X|register|
|00001870| 20 73 74 72 75 63 74 20 | 72 77 5f 75 74 6d 70 20 | struct |rw_utmp |
|00001880| 2a 70 2c 20 2a 71 3b 0a | 09 58 7b 0a 09 58 09 72 |*p, *q;.|.X{..X.r|
|00001890| 65 74 75 72 6e 28 73 74 | 72 6e 63 6d 70 28 70 2d |eturn(st|rncmp(p-|
|000018a0| 3e 6e 61 6d 65 2c 20 71 | 2d 3e 6e 61 6d 65 2c 20 |>name, q|->name, |
|000018b0| 4d 49 4e 53 54 52 29 29 | 3b 0a 09 58 7d 20 0a 09 |MINSTR))|;..X} ..|
|000018c0| 58 0a 09 58 2f 2a 0a 09 | 58 20 2a 20 70 72 69 6e |X..X/*..|X * prin|
|000018d0| 74 20 22 68 6f 73 74 3a | 20 20 20 20 20 20 20 75 |t "host:|       u|
|000018e0| 73 65 72 31 20 75 73 65 | 72 32 20 2e 2e 2e 20 22 |ser1 use|r2 ... "|
|000018f0| 0a 09 58 20 2a 2f 0a 09 | 58 62 75 72 70 28 73 2c |..X */..|Xburp(s,|
|00001900| 20 72 2c 20 6e 29 0a 09 | 58 72 65 67 69 73 74 65 | r, n)..|Xregiste|
|00001910| 72 20 63 68 61 72 20 2a | 73 2c 20 20 2a 72 3b 0a |r char *|s,  *r;.|
|00001920| 09 58 69 6e 74 20 6e 3b | 0a 09 58 7b 09 0a 09 58 |.Xint n;|..X{...X|
|00001930| 09 73 20 2b 3d 20 35 3b | 09 09 2f 2a 20 73 6b 69 |.s += 5;|../* ski|
|00001940| 70 20 22 77 68 6f 64 2e | 22 20 70 72 65 66 69 78 |p "whod.|" prefix|
|00001950| 20 2a 2f 0a 09 58 09 69 | 66 20 28 6e 6f 77 2d 68 | */..X.i|f (now-h|
|00001960| 64 72 2e 72 63 76 64 20 | 3e 20 52 57 50 45 52 49 |dr.rcvd |> RWPERI|
|00001970| 4f 44 29 09 2f 2a 20 6d | 61 72 6b 20 6f 76 65 72 |OD)./* m|ark over|
|00001980| 64 75 65 20 68 6f 73 74 | 73 20 2a 2f 0a 09 58 09 |due host|s */..X.|
|00001990| 09 70 72 69 6e 74 66 28 | 22 25 2e 2a 73 3a 25 2a |.printf(|"%.*s:%*|
|000019a0| 73 22 2c 20 4d 52 47 4e | 2c 20 73 2c 20 4d 52 47 |s", MRGN|, s, MRG|
|000019b0| 4e 2b 31 2d 73 74 72 6c | 65 6e 28 73 29 2c 20 22 |N+1-strl|en(s), "|
|000019c0| 2a 22 29 3b 0a 09 58 09 | 65 6c 73 65 0a 09 58 09 |*");..X.|else..X.|
|000019d0| 09 70 72 69 6e 74 66 28 | 22 25 2e 2a 73 3a 25 2a |.printf(|"%.*s:%*|
|000019e0| 73 22 2c 20 4d 52 47 4e | 2c 20 73 2c 20 4d 52 47 |s", MRGN|, s, MRG|
|000019f0| 4e 2b 31 2d 73 74 72 6c | 65 6e 28 73 29 2c 20 22 |N+1-strl|en(s), "|
|00001a00| 20 22 29 3b 0a 09 58 09 | 66 6f 72 20 28 73 20 3d | ");..X.|for (s =|
|00001a10| 20 72 3b 20 73 20 3c 20 | 28 72 2b 6e 29 3b 20 73 | r; s < |(r+n); s|
|00001a20| 20 2b 3d 20 73 69 7a 65 | 6f 66 28 72 75 74 29 29 | += size|of(rut))|
|00001a30| 0a 09 58 09 09 70 72 69 | 6e 74 66 28 22 20 25 2e |..X..pri|ntf(" %.|
|00001a40| 2a 73 22 2c 20 4d 49 4e | 53 54 52 2c 20 73 2b 4d |*s", MIN|STR, s+M|
|00001a50| 49 4e 53 54 52 29 3b 0a | 09 58 09 70 72 69 6e 74 |INSTR);.|.X.print|
|00001a60| 66 28 22 5c 6e 22 29 3b | 0a 09 58 7d 0a 53 48 41 |f("\n");|..X}.SHA|
|00001a70| 52 5f 45 4f 46 0a 69 66 | 20 74 65 73 74 20 34 33 |R_EOF.if| test 43|
|00001a80| 31 37 20 2d 6e 65 20 22 | 60 77 63 20 2d 63 20 3c |17 -ne "|`wc -c <|
|00001a90| 20 27 72 75 2e 63 27 60 | 22 0a 74 68 65 6e 0a 09 | 'ru.c'`|".then..|
|00001aa0| 65 63 68 6f 20 73 68 61 | 72 3a 20 65 72 72 6f 72 |echo sha|r: error|
|00001ab0| 20 74 72 61 6e 73 6d 69 | 74 74 69 6e 67 20 22 27 | transmi|tting "'|
|00001ac0| 72 75 2e 63 27 22 20 27 | 28 73 68 6f 75 6c 64 20 |ru.c'" '|(should |
|00001ad0| 68 61 76 65 20 62 65 65 | 6e 20 34 33 31 37 20 63 |have bee|n 4317 c|
|00001ae0| 68 61 72 61 63 74 65 72 | 73 29 27 0a 66 69 0a 66 |haracter|s)'.fi.f|
|00001af0| 69 20 23 20 65 6e 64 20 | 6f 66 20 6f 76 65 72 77 |i # end |of overw|
|00001b00| 72 69 74 69 6e 67 20 63 | 68 65 63 6b 0a 65 63 68 |riting c|heck.ech|
|00001b10| 6f 20 73 68 61 72 3a 20 | 65 78 74 72 61 63 74 69 |o shar: |extracti|
|00001b20| 6e 67 20 22 27 72 75 2e | 6c 27 22 20 27 28 31 30 |ng "'ru.|l'" '(10|
|00001b30| 32 35 20 63 68 61 72 61 | 63 74 65 72 73 29 27 0a |25 chara|cters)'.|
|00001b40| 69 66 20 74 65 73 74 20 | 2d 66 20 27 72 75 2e 6c |if test |-f 'ru.l|
|00001b50| 27 0a 74 68 65 6e 0a 09 | 65 63 68 6f 20 73 68 61 |'.then..|echo sha|
|00001b60| 72 3a 20 77 69 6c 6c 20 | 6e 6f 74 20 6f 76 65 72 |r: will |not over|
|00001b70| 2d 77 72 69 74 65 20 65 | 78 69 73 74 69 6e 67 20 |-write e|xisting |
|00001b80| 66 69 6c 65 20 22 27 72 | 75 2e 6c 27 22 0a 65 6c |file "'r|u.l'".el|
|00001b90| 73 65 0a 73 65 64 20 27 | 73 2f 5e 09 58 2f 2f 27 |se.sed '|s/^.X//'|
|00001ba0| 20 3c 3c 20 5c 53 48 41 | 52 5f 45 4f 46 20 3e 20 | << \SHA|R_EOF > |
|00001bb0| 27 72 75 2e 6c 27 0a 09 | 58 2e 54 48 20 52 55 53 |'ru.l'..|X.TH RUS|
|00001bc0| 45 52 53 20 6c 6f 63 61 | 6c 0a 09 58 2e 55 43 0a |ERS loca|l..X.UC.|
|00001bd0| 09 58 2e 53 48 20 4e 41 | 4d 45 0a 09 58 72 75 73 |.X.SH NA|ME..Xrus|
|00001be0| 65 72 73 20 5c 2d 20 63 | 6f 6d 70 61 63 74 20 6c |ers \- c|ompact l|
|00001bf0| 69 73 74 20 6f 66 20 75 | 73 65 72 73 20 6f 6e 20 |ist of u|sers on |
|00001c00| 61 6c 6c 20 22 76 69 73 | 69 62 6c 65 22 20 73 79 |all "vis|ible" sy|
|00001c10| 73 74 65 6d 73 0a 09 58 | 2e 53 48 20 53 59 4e 4f |stems..X|.SH SYNO|
|00001c20| 50 53 49 53 0a 09 58 2e | 42 20 2f 75 73 72 2f 6c |PSIS..X.|B /usr/l|
|00001c30| 6f 63 61 6c 2f 72 75 73 | 65 72 73 20 5b 2d 64 20 |ocal/rus|ers [-d |
|00001c40| 64 6f 6d 61 69 6e 5d 20 | 5b 2d 68 20 68 6f 73 74 |domain] |[-h host|
|00001c50| 5d 0a 09 58 2e 53 48 20 | 44 45 53 43 52 49 50 54 |]..X.SH |DESCRIPT|
|00001c60| 49 4f 4e 0a 09 58 2e 49 | 20 52 75 73 65 72 73 0a |ION..X.I| Rusers.|
|00001c70| 09 58 6c 69 73 74 73 20 | 74 68 65 20 6c 6f 67 69 |.Xlists |the logi|
|00001c80| 6e 20 6e 61 6d 65 73 20 | 6f 66 20 74 68 65 20 75 |n names |of the u|
|00001c90| 73 65 72 73 20 63 75 72 | 72 65 6e 74 6c 79 20 6f |sers cur|rently o|
|00001ca0| 6e 20 61 6c 6c 20 76 69 | 73 69 62 6c 65 20 73 79 |n all vi|sible sy|
|00001cb0| 73 74 65 6d 73 0a 09 58 | 69 6e 20 61 20 63 6f 6d |stems..X|in a com|
|00001cc0| 70 61 63 74 2c 0a 09 58 | 6f 6e 65 2d 6c 69 6e 65 |pact,..X|one-line|
|00001cd0| 2d 70 65 72 2d 68 6f 73 | 74 20 66 6f 72 6d 61 74 |-per-hos|t format|
|00001ce0| 2e 0a 09 58 53 79 73 74 | 65 6d 73 20 77 69 74 68 |...XSyst|ems with|
|00001cf0| 20 6e 6f 20 75 73 65 72 | 73 20 61 72 65 20 6e 6f | no user|s are no|
|00001d00| 74 20 6c 69 73 74 65 64 | 2e 0a 09 58 55 73 69 6e |t listed|...XUsin|
|00001d10| 67 20 74 68 65 20 2d 64 | 20 6f 70 74 69 6f 6e 20 |g the -d| option |
|00001d20| 6d 61 6b 65 73 0a 09 58 | 2e 49 20 72 75 73 65 72 |makes..X|.I ruser|
|00001d30| 73 0a 09 58 6c 69 73 74 | 20 6f 6e 6c 79 20 74 68 |s..Xlist| only th|
|00001d40| 65 20 6c 6f 67 69 6e 20 | 6e 61 6d 65 73 20 6f 66 |e login |names of|
|00001d50| 20 74 68 65 20 75 73 65 | 72 73 20 6f 6e 20 76 69 | the use|rs on vi|
|00001d60| 73 69 62 6c 65 20 73 79 | 73 74 65 6d 73 0a 09 58 |sible sy|stems..X|
|00001d70| 69 6e 20 74 68 65 20 73 | 70 65 63 69 66 69 65 64 |in the s|pecified|
|00001d80| 20 64 6f 6d 61 69 6e 2e | 20 20 55 73 69 6e 67 20 | domain.|  Using |
|00001d90| 74 68 65 20 2d 68 20 6f | 70 74 69 6f 6e 20 6d 61 |the -h o|ption ma|
|00001da0| 6b 65 73 0a 09 58 2e 49 | 20 72 75 73 65 72 73 0a |kes..X.I| rusers.|
|00001db0| 09 58 6c 69 73 74 20 6f | 6e 6c 79 20 74 68 65 20 |.Xlist o|nly the |
|00001dc0| 6c 6f 67 69 6e 20 6e 61 | 6d 65 73 20 6f 66 20 74 |login na|mes of t|
|00001dd0| 68 65 20 75 73 65 72 73 | 20 63 75 72 72 65 6e 74 |he users| current|
|00001de0| 6c 79 20 6f 6e 20 74 68 | 65 20 73 70 65 63 69 66 |ly on th|e specif|
|00001df0| 69 65 64 20 68 6f 73 74 | 2e 0a 09 58 57 68 65 6e |ied host|...XWhen|
|00001e00| 20 74 68 65 20 2d 68 20 | 6f 70 74 69 6f 6e 20 69 | the -h |option i|
|00001e10| 73 20 75 73 65 64 20 61 | 6e 64 20 61 20 22 2a 22 |s used a|nd a "*"|
|00001e20| 20 61 70 70 65 61 72 73 | 20 61 66 74 65 72 20 74 | appears| after t|
|00001e30| 68 65 20 68 6f 73 74 6e | 61 6d 65 2c 0a 09 58 74 |he hostn|ame,..Xt|
|00001e40| 68 65 20 72 65 73 74 20 | 6f 66 20 74 68 65 20 6f |he rest |of the o|
|00001e50| 75 74 70 75 74 20 6c 69 | 6e 65 20 6d 61 79 20 62 |utput li|ne may b|
|00001e60| 65 20 69 6e 63 6f 72 72 | 65 63 74 20 62 65 63 61 |e incorr|ect beca|
|00001e70| 75 73 65 0a 09 58 74 68 | 65 20 72 77 68 6f 20 64 |use..Xth|e rwho d|
|00001e80| 61 74 61 20 77 61 73 20 | 6f 76 65 72 20 35 20 6d |ata was |over 5 m|
|00001e90| 69 6e 75 74 65 73 20 6f | 6c 64 2e 0a 09 58 41 20 |inutes o|ld...XA |
|00001ea0| 22 76 69 73 69 62 6c 65 | 20 73 79 73 74 65 6d 22 |"visible| system"|
|00001eb0| 20 69 73 20 61 6e 79 20 | 73 79 73 74 65 6d 20 66 | is any |system f|
|00001ec0| 72 6f 6d 20 77 68 69 63 | 68 20 72 77 68 6f 20 70 |rom whic|h rwho p|
|00001ed0| 61 63 6b 65 74 73 0a 09 | 58 61 72 65 20 62 65 69 |ackets..|Xare bei|
|00001ee0| 6e 67 20 72 65 63 65 69 | 76 65 64 2e 0a 09 58 2e |ng recei|ved...X.|
|00001ef0| 53 48 20 48 49 53 54 4f | 52 59 0a 09 58 4f 72 69 |SH HISTO|RY..XOri|
|00001f00| 67 69 6e 61 6c 6c 79 20 | 63 72 65 61 74 65 64 20 |ginally |created |
|00001f10| 62 79 20 61 6c 74 65 72 | 69 6e 67 20 0a 09 58 2e |by alter|ing ..X.|
|00001f20| 49 20 75 73 65 72 73 28 | 31 29 0a 09 58 77 69 74 |I users(|1)..Xwit|
|00001f30| 68 20 70 69 65 63 65 73 | 20 66 72 6f 6d 0a 09 58 |h pieces| from..X|
|00001f40| 2e 49 20 72 77 68 6f 28 | 31 29 2e 0a 09 58 52 65 |.I rwho(|1)...XRe|
|00001f50| 77 72 69 74 74 65 6e 20 | 74 6f 20 74 72 79 20 74 |written |to try t|
|00001f60| 6f 20 65 6c 69 6d 69 6e | 61 74 65 20 62 6f 72 72 |o elimin|ate borr|
|00001f70| 6f 77 65 64 20 73 6f 75 | 72 63 65 2e 0a 09 58 2e |owed sou|rce...X.|
|00001f80| 53 48 20 41 55 54 48 4f | 52 0a 09 58 50 2e 20 4b |SH AUTHO|R..XP. K|
|00001f90| 65 72 6e 2c 20 55 2e 20 | 6f 66 20 54 6f 72 6f 6e |ern, U. |of Toron|
|00001fa0| 74 6f 2c 20 70 6b 65 72 | 6e 40 75 74 63 73 72 69 |to, pker|n@utcsri|
|00001fb0| 2e 75 75 63 70 0a 09 58 | 2e 53 48 20 46 49 4c 45 |.uucp..X|.SH FILE|
|00001fc0| 53 0a 09 58 2f 75 73 72 | 2f 73 70 6f 6f 6c 2f 72 |S..X/usr|/spool/r|
|00001fd0| 77 68 6f 2f 77 68 6f 64 | 2e 2a 0a 09 58 2e 53 48 |who/whod|.*..X.SH|
|00001fe0| 20 53 45 45 20 41 4c 53 | 4f 0a 09 58 75 73 65 72 | SEE ALS|O..Xuser|
|00001ff0| 73 28 31 29 2c 20 72 77 | 68 6f 28 31 29 0a 53 48 |s(1), rw|ho(1).SH|
|00002000| 41 52 5f 45 4f 46 0a 69 | 66 20 74 65 73 74 20 31 |AR_EOF.i|f test 1|
|00002010| 30 32 35 20 2d 6e 65 20 | 22 60 77 63 20 2d 63 20 |025 -ne |"`wc -c |
|00002020| 3c 20 27 72 75 2e 6c 27 | 60 22 0a 74 68 65 6e 0a |< 'ru.l'|`".then.|
|00002030| 09 65 63 68 6f 20 73 68 | 61 72 3a 20 65 72 72 6f |.echo sh|ar: erro|
|00002040| 72 20 74 72 61 6e 73 6d | 69 74 74 69 6e 67 20 22 |r transm|itting "|
|00002050| 27 72 75 2e 6c 27 22 20 | 27 28 73 68 6f 75 6c 64 |'ru.l'" |'(should|
|00002060| 20 68 61 76 65 20 62 65 | 65 6e 20 31 30 32 35 20 | have be|en 1025 |
|00002070| 63 68 61 72 61 63 74 65 | 72 73 29 27 0a 66 69 0a |characte|rs)'.fi.|
|00002080| 66 69 20 23 20 65 6e 64 | 20 6f 66 20 6f 76 65 72 |fi # end| of over|
|00002090| 77 72 69 74 69 6e 67 20 | 63 68 65 63 6b 0a 23 09 |writing |check.#.|
|000020a0| 45 6e 64 20 6f 66 20 73 | 68 65 6c 6c 20 61 72 63 |End of s|hell arc|
|000020b0| 68 69 76 65 0a 65 78 69 | 74 20 30 0a             |hive.exi|t 0.    |
+--------+-------------------------+-------------------------+--------+--------+