home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: SHell self-extracting ARchive
(archive/shar).
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| dexvert
| Newsgroup Content (archive/news)
| magic
| Supported |
| 100%
| dexvert
| SHell self-extracting ARchive (archive/shar)
| magic
| Supported |
| 100%
| dexvert
| Internet Message Format (text/imf)
| magic
| Supported |
| 1%
| dexvert
| Text File (text/txt)
| fallback
| Supported |
| 100%
| file
| news or mail text
| default
| |
| 99%
| file
| makefile script, ASCII text
| default
| |
| 100%
| checkBytes
| Printable ASCII
| default
| |
| 100%
| perlTextCheck
| Likely Text (Perl)
| default
| |
| 100%
| siegfried
| fmt/329 Shell Archive Format
| default
| |
| 100%
| detectItEasy
| Format: plain text[LF]
| default (weak)
| |
| 100%
| xdgMime
| message/rfc822
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 53 75 62 6a 65 63 74 3a | 20 20 76 31 35 69 30 32 |Subject:| v15i02|
|00000010| 34 3a 20 20 46 69 6c 74 | 65 72 20 74 6f 20 65 6c |4: Filt|er to el|
|00000020| 69 6d 69 6e 61 74 65 20 | 66 69 6c 65 20 69 6e 63 |iminate |file inc|
|00000030| 6c 75 73 69 6f 6e 20 63 | 6f 6d 6d 61 6e 64 73 0a |lusion c|ommands.|
|00000040| 4e 65 77 73 67 72 6f 75 | 70 73 3a 20 63 6f 6d 70 |Newsgrou|ps: comp|
|00000050| 2e 73 6f 75 72 63 65 73 | 2e 75 6e 69 78 0a 53 65 |.sources|.unix.Se|
|00000060| 6e 64 65 72 3a 20 73 6f | 75 72 63 65 73 0a 41 70 |nder: so|urces.Ap|
|00000070| 70 72 6f 76 65 64 3a 20 | 72 73 61 6c 7a 40 75 75 |proved: |rsalz@uu|
|00000080| 6e 65 74 2e 55 55 2e 4e | 45 54 0a 0a 53 75 62 6d |net.UU.N|ET..Subm|
|00000090| 69 74 74 65 64 2d 62 79 | 3a 20 53 74 65 6e 20 46 |itted-by|: Sten F|
|000000a0| 6f 6c 6b 65 72 6d 61 6e | 20 3c 73 74 65 6e 40 65 |olkerman| <sten@e|
|000000b0| 6e 65 61 2e 73 65 3e 0a | 50 6f 73 74 69 6e 67 2d |nea.se>.|Posting-|
|000000c0| 6e 75 6d 62 65 72 3a 20 | 56 6f 6c 75 6d 65 20 31 |number: |Volume 1|
|000000d0| 35 2c 20 49 73 73 75 65 | 20 32 34 0a 41 72 63 68 |5, Issue| 24.Arch|
|000000e0| 69 76 65 2d 6e 61 6d 65 | 3a 20 69 6e 63 2d 65 6c |ive-name|: inc-el|
|000000f0| 69 6d 0a 0a 5b 20 20 54 | 68 69 73 20 69 73 20 61 |im..[ T|his is a|
|00000100| 20 67 65 6e 65 72 61 6c | 20 66 69 6c 74 65 72 20 | general| filter |
|00000110| 74 6f 20 72 65 6d 6f 76 | 65 20 22 69 6e 63 6c 75 |to remov|e "inclu|
|00000120| 64 65 22 20 63 6f 6d 6d | 61 6e 64 73 20 66 72 6f |de" comm|ands fro|
|00000130| 6d 20 66 69 6c 65 73 2e | 0a 20 20 20 49 74 20 63 |m files.|. It c|
|00000140| 61 6e 20 70 72 6f 63 65 | 73 73 20 22 2e 73 6f 22 |an proce|ss ".so"|
|00000150| 20 63 6f 6d 6d 61 6e 64 | 73 20 66 6f 72 20 2a 72 | command|s for *r|
|00000160| 6f 66 66 2c 20 22 23 69 | 6e 63 6c 75 64 65 22 20 |off, "#i|nclude" |
|00000170| 63 6f 6d 6d 61 6e 64 73 | 20 66 6f 72 0a 20 20 20 |commands| for. |
|00000180| 43 2c 20 65 74 63 2e 20 | 20 49 74 20 75 6e 64 65 |C, etc. | It unde|
|00000190| 72 73 74 61 6e 64 73 20 | 7e 6e 61 6d 65 20 61 6e |rstands |~name an|
|000001a0| 64 20 7c 20 66 6f 72 20 | 70 69 70 65 64 20 63 6f |d | for |piped co|
|000001b0| 6d 6d 61 6e 64 73 2e 0a | 0a 20 20 20 54 68 65 20 |mmands..|. The |
|000001c0| 4d 61 6b 65 66 69 6c 65 | 20 77 69 6c 6c 20 63 61 |Makefile| will ca|
|000001d0| 75 73 65 20 70 72 6f 62 | 6c 65 6d 73 20 66 6f 72 |use prob|lems for|
|000001e0| 20 66 6f 6c 6b 73 20 77 | 69 74 68 6f 75 74 20 74 | folks w|ithout t|
|000001f0| 68 65 20 53 79 73 74 65 | 6d 56 0a 20 20 20 22 61 |he Syste|mV. "a|
|00000200| 75 67 6d 65 6e 74 65 64 | 20 6d 61 6b 65 22 2c 20 |ugmented| make", |
|00000210| 73 6f 20 75 73 65 20 74 | 68 65 20 4d 61 6b 65 2e |so use t|he Make.|
|00000220| 41 6c 74 20 74 68 61 74 | 20 49 20 77 72 6f 74 65 |Alt that| I wrote|
|00000230| 2e 0a 0a 20 20 20 54 68 | 65 20 6d 61 6e 75 61 6c |... Th|e manual|
|00000240| 20 70 61 67 65 20 75 73 | 65 73 20 74 68 65 20 22 | page us|es the "|
|00000250| 43 22 20 66 6f 6e 74 3b | 20 69 66 20 79 6f 75 20 |C" font;| if you |
|00000260| 64 6f 6e 27 74 20 68 61 | 76 65 20 69 74 0a 20 20 |don't ha|ve it. |
|00000270| 20 79 6f 75 20 6d 69 67 | 68 74 20 6e 65 65 64 20 | you mig|ht need |
|00000280| 74 6f 20 64 6f 20 73 6f | 6d 65 20 74 77 65 61 6b |to do so|me tweak|
|00000290| 69 6e 67 20 2d 2d 20 63 | 68 65 63 6b 20 6f 75 74 |ing -- c|heck out|
|000002a0| 20 61 6c 6c 20 5c 66 0a | 20 20 20 63 6f 6d 6d 61 | all \f.| comma|
|000002b0| 6e 64 73 2e 0a 0a 20 20 | 20 2d 72 24 20 20 5d 0a |nds... | -r$ ].|
|000002c0| 0a 23 21 20 2f 62 69 6e | 2f 73 68 0a 23 20 54 68 |.#! /bin|/sh.# Th|
|000002d0| 69 73 20 69 73 20 61 20 | 73 68 65 6c 6c 20 61 72 |is is a |shell ar|
|000002e0| 63 68 69 76 65 2e 20 20 | 52 65 6d 6f 76 65 20 61 |chive. |Remove a|
|000002f0| 6e 79 74 68 69 6e 67 20 | 62 65 66 6f 72 65 20 74 |nything |before t|
|00000300| 68 69 73 20 6c 69 6e 65 | 2c 20 74 68 65 6e 20 75 |his line|, then u|
|00000310| 6e 70 61 63 6b 0a 23 20 | 69 74 20 62 79 20 73 61 |npack.# |it by sa|
|00000320| 76 69 6e 67 20 69 74 20 | 69 6e 74 6f 20 61 20 66 |ving it |into a f|
|00000330| 69 6c 65 20 61 6e 64 20 | 74 79 70 69 6e 67 20 22 |ile and |typing "|
|00000340| 73 68 20 66 69 6c 65 22 | 2e 20 20 54 6f 20 6f 76 |sh file"|. To ov|
|00000350| 65 72 77 72 69 74 65 20 | 65 78 69 73 74 69 6e 67 |erwrite |existing|
|00000360| 0a 23 20 66 69 6c 65 73 | 2c 20 74 79 70 65 20 22 |.# files|, type "|
|00000370| 73 68 20 66 69 6c 65 20 | 2d 63 22 2e 20 20 59 6f |sh file |-c". Yo|
|00000380| 75 20 63 61 6e 20 61 6c | 73 6f 20 66 65 65 64 20 |u can al|so feed |
|00000390| 74 68 69 73 20 61 73 20 | 73 74 61 6e 64 61 72 64 |this as |standard|
|000003a0| 20 69 6e 70 75 74 20 76 | 69 61 0a 23 20 75 6e 73 | input v|ia.# uns|
|000003b0| 68 61 72 2c 20 6f 72 20 | 62 79 20 74 79 70 69 6e |har, or |by typin|
|000003c0| 67 20 22 73 68 20 3c 66 | 69 6c 65 22 2c 20 65 2e |g "sh <f|ile", e.|
|000003d0| 67 2e 2e 20 20 49 66 20 | 74 68 69 73 20 61 72 63 |g.. If |this arc|
|000003e0| 68 69 76 65 20 69 73 20 | 63 6f 6d 70 6c 65 74 65 |hive is |complete|
|000003f0| 2c 20 79 6f 75 0a 23 20 | 77 69 6c 6c 20 73 65 65 |, you.# |will see|
|00000400| 20 74 68 65 20 66 6f 6c | 6c 6f 77 69 6e 67 20 6d | the fol|lowing m|
|00000410| 65 73 73 61 67 65 20 61 | 74 20 74 68 65 20 65 6e |essage a|t the en|
|00000420| 64 3a 0a 23 09 09 22 45 | 6e 64 20 6f 66 20 73 68 |d:.#.."E|nd of sh|
|00000430| 65 6c 6c 20 61 72 63 68 | 69 76 65 2e 22 0a 23 20 |ell arch|ive.".# |
|00000440| 43 6f 6e 74 65 6e 74 73 | 3a 20 20 4d 61 6b 65 2e |Contents|: Make.|
|00000450| 61 6c 74 20 4d 61 6b 65 | 66 69 6c 65 20 66 69 6c |alt Make|file fil|
|00000460| 65 31 20 66 69 6c 65 32 | 20 69 6e 63 2d 65 6c 69 |e1 file2| inc-eli|
|00000470| 6d 20 69 6e 65 6c 69 6d | 2e 31 6e 65 74 0a 23 20 |m inelim|.1net.# |
|00000480| 20 20 69 6e 65 6c 69 6d | 2e 63 20 75 6e 65 6e 76 | inelim|.c unenv|
|00000490| 2e 63 0a 23 20 57 72 61 | 70 70 65 64 20 62 79 20 |.c.# Wra|pped by |
|000004a0| 72 73 61 6c 7a 40 66 69 | 67 2e 62 62 6e 2e 63 6f |rsalz@fi|g.bbn.co|
|000004b0| 6d 20 6f 6e 20 54 75 65 | 20 4d 61 79 20 33 31 20 |m on Tue| May 31 |
|000004c0| 31 36 3a 31 34 3a 30 30 | 20 31 39 38 38 0a 50 41 |16:14:00| 1988.PA|
|000004d0| 54 48 3d 2f 62 69 6e 3a | 2f 75 73 72 2f 62 69 6e |TH=/bin:|/usr/bin|
|000004e0| 3a 2f 75 73 72 2f 75 63 | 62 20 3b 20 65 78 70 6f |:/usr/uc|b ; expo|
|000004f0| 72 74 20 50 41 54 48 0a | 69 66 20 74 65 73 74 20 |rt PATH.|if test |
|00000500| 2d 66 20 27 4d 61 6b 65 | 2e 61 6c 74 27 20 2d 61 |-f 'Make|.alt' -a|
|00000510| 20 22 24 7b 31 7d 22 20 | 21 3d 20 22 2d 63 22 20 | "${1}" |!= "-c" |
|00000520| 3b 20 74 68 65 6e 20 0a | 20 20 65 63 68 6f 20 73 |; then .| echo s|
|00000530| 68 61 72 3a 20 57 69 6c | 6c 20 6e 6f 74 20 63 6c |har: Wil|l not cl|
|00000540| 6f 62 62 65 72 20 65 78 | 69 73 74 69 6e 67 20 66 |obber ex|isting f|
|00000550| 69 6c 65 20 5c 22 27 4d | 61 6b 65 2e 61 6c 74 27 |ile \"'M|ake.alt'|
|00000560| 5c 22 0a 65 6c 73 65 0a | 65 63 68 6f 20 73 68 61 |\".else.|echo sha|
|00000570| 72 3a 20 45 78 74 72 61 | 63 74 69 6e 67 20 5c 22 |r: Extra|cting \"|
|00000580| 27 4d 61 6b 65 2e 61 6c | 74 27 5c 22 20 5c 28 37 |'Make.al|t'\" \(7|
|00000590| 33 37 20 63 68 61 72 61 | 63 74 65 72 73 5c 29 0a |37 chara|cters\).|
|000005a0| 73 65 64 20 22 73 2f 5e | 58 2f 2f 22 20 3e 27 4d |sed "s/^|X//" >'M|
|000005b0| 61 6b 65 2e 61 6c 74 27 | 20 3c 3c 27 45 4e 44 5f |ake.alt'| <<'END_|
|000005c0| 4f 46 5f 46 49 4c 45 27 | 0a 58 23 20 4d 61 6b 65 |OF_FILE'|.X# Make|
|000005d0| 66 69 6c 65 20 66 6f 72 | 20 69 6e 65 6c 69 6d 0a |file for| inelim.|
|000005e0| 58 0a 58 0a 42 49 4e 44 | 49 52 3d 20 2f 75 73 72 |X.X.BIND|IR= /usr|
|000005f0| 2f 6c 6f 63 61 6c 2f 62 | 69 6e 0a 58 0a 53 59 53 |/local/b|in.X.SYS|
|00000600| 54 45 4d 3d 42 53 44 0a | 43 46 4c 41 47 53 20 20 |TEM=BSD.|CFLAGS |
|00000610| 3d 20 2d 4f 20 2d 44 24 | 28 53 59 53 54 45 4d 29 |= -O -D$|(SYSTEM)|
|00000620| 0a 58 0a 43 4f 4d 4d 41 | 4e 44 3d 20 69 6e 65 6c |.X.COMMA|ND= inel|
|00000630| 69 6d 0a 53 52 43 53 3d | 20 20 20 69 6e 65 6c 69 |im.SRCS=| ineli|
|00000640| 6d 2e 63 20 75 6e 65 6e | 76 2e 63 0a 4f 42 4a 53 |m.c unen|v.c.OBJS|
|00000650| 3d 20 69 6e 65 6c 69 6d | 2e 6f 20 75 6e 65 6e 76 |= inelim|.o unenv|
|00000660| 2e 6f 0a 4d 41 4e 50 41 | 47 45 3d 20 69 6e 65 6c |.o.MANPA|GE= inel|
|00000670| 69 6d 2e 31 6e 65 74 0a | 58 0a 58 0a 74 72 61 70 |im.1net.|X.X.trap|
|00000680| 3a 20 62 74 65 73 74 0a | 58 0a 62 74 65 73 74 3a |: btest.|X.btest:|
|00000690| 20 20 69 6e 65 6c 69 6d | 0a 58 09 2e 2f 69 6e 65 | inelim|.X../ine|
|000006a0| 6c 69 6d 20 66 69 6c 65 | 31 0a 58 09 2e 2f 69 6e |lim file|1.X../in|
|000006b0| 65 6c 69 6d 20 2d 76 20 | 66 69 6c 65 31 0a 58 09 |elim -v |file1.X.|
|000006c0| 2e 2f 69 6e 65 6c 69 6d | 20 2d 70 20 2e 73 6f 20 |./inelim| -p .so |
|000006d0| 66 69 6c 65 31 0a 58 09 | 2e 2f 69 6e 65 6c 69 6d |file1.X.|./inelim|
|000006e0| 20 66 69 6c 65 31 20 7c | 20 2e 2f 69 6e 65 6c 69 | file1 || ./ineli|
|000006f0| 6d 20 2d 70 20 73 6f 75 | 72 63 65 0a 58 0a 69 6e |m -p sou|rce.X.in|
|00000700| 73 74 61 6c 6c 3a 20 24 | 28 42 49 4e 44 49 52 29 |stall: $|(BINDIR)|
|00000710| 2f 24 28 43 4f 4d 4d 41 | 4e 44 29 0a 58 0a 58 24 |/$(COMMA|ND).X.X$|
|00000720| 28 42 49 4e 44 49 52 29 | 2f 24 28 43 4f 4d 4d 41 |(BINDIR)|/$(COMMA|
|00000730| 4e 44 29 3a 20 24 28 43 | 4f 4d 4d 41 4e 44 29 0a |ND): $(C|OMMAND).|
|00000740| 58 09 63 70 20 24 28 43 | 4f 4d 4d 41 4e 44 29 20 |X.cp $(C|OMMAND) |
|00000750| 24 40 0a 58 09 63 68 6d | 6f 64 20 37 35 35 20 24 |$@.X.chm|od 755 $|
|00000760| 40 0a 58 0a 62 73 64 3a | 0a 58 09 24 28 4d 41 4b |@.X.bsd:|.X.$(MAK|
|00000770| 45 29 20 24 28 43 4f 4d | 4d 41 4e 44 29 20 53 59 |E) $(COM|MAND) SY|
|00000780| 53 54 45 4d 3d 42 53 44 | 0a 58 0a 61 74 74 3a 0a |STEM=BSD|.X.att:.|
|00000790| 58 09 24 28 4d 41 4b 45 | 29 20 24 28 43 4f 4d 4d |X.$(MAKE|) $(COMM|
|000007a0| 41 4e 44 29 20 53 59 53 | 54 45 4d 3d 53 59 53 56 |AND) SYS|TEM=SYSV|
|000007b0| 0a 58 0a 58 24 28 43 4f | 4d 4d 41 4e 44 29 3a 20 |.X.X$(CO|MMAND): |
|000007c0| 24 28 4f 42 4a 53 29 0a | 58 09 24 28 43 43 29 20 |$(OBJS).|X.$(CC) |
|000007d0| 24 28 4c 44 46 4c 41 47 | 53 29 20 2d 6f 20 24 40 |$(LDFLAG|S) -o $@|
|000007e0| 20 24 28 4f 42 4a 53 29 | 0a 58 0a 6c 69 6e 74 3a | $(OBJS)|.X.lint:|
|000007f0| 0a 58 09 24 28 4c 49 4e | 54 29 20 2d 44 24 28 53 |.X.$(LIN|T) -D$(S|
|00000800| 59 53 54 45 4d 29 20 24 | 28 4c 46 4c 41 47 53 29 |YSTEM) $|(LFLAGS)|
|00000810| 20 24 28 53 52 43 53 29 | 0a 58 0a 63 6c 65 61 6e | $(SRCS)|.X.clean|
|00000820| 3a 0a 58 09 72 6d 20 2d | 66 20 24 28 4f 42 4a 53 |:.X.rm -|f $(OBJS|
|00000830| 29 0a 58 0a 72 6f 67 73 | 68 61 72 3a 0a 58 09 73 |).X.rogs|har:.X.s|
|00000840| 68 61 72 20 2d 63 20 2d | 66 20 69 6e 65 6c 69 6d |har -c -|f inelim|
|00000850| 2e 73 68 61 72 20 24 28 | 4d 41 4e 50 41 47 45 29 |.shar $(|MANPAGE)|
|00000860| 20 4d 61 6b 65 66 69 6c | 65 20 24 28 53 52 43 53 | Makefil|e $(SRCS|
|00000870| 29 20 66 69 6c 65 31 20 | 66 69 6c 65 32 0a 58 0a |) file1 |file2.X.|
|00000880| 67 6f 73 73 68 61 72 3a | 0a 58 09 73 68 61 72 20 |gosshar:|.X.shar |
|00000890| 2d 63 20 24 28 4d 41 4e | 50 41 47 45 29 20 4d 61 |-c $(MAN|PAGE) Ma|
|000008a0| 6b 65 66 69 6c 65 20 24 | 28 53 52 43 53 29 20 66 |kefile $|(SRCS) f|
|000008b0| 69 6c 65 31 20 66 69 6c | 65 32 20 3e 20 69 6e 63 |ile1 fil|e2 > inc|
|000008c0| 65 6c 69 6d 2e 73 68 61 | 72 0a 45 4e 44 5f 4f 46 |elim.sha|r.END_OF|
|000008d0| 5f 46 49 4c 45 0a 69 66 | 20 74 65 73 74 20 37 33 |_FILE.if| test 73|
|000008e0| 37 20 2d 6e 65 20 60 77 | 63 20 2d 63 20 3c 27 4d |7 -ne `w|c -c <'M|
|000008f0| 61 6b 65 2e 61 6c 74 27 | 60 3b 20 74 68 65 6e 0a |ake.alt'|`; then.|
|00000900| 20 20 20 20 65 63 68 6f | 20 73 68 61 72 3a 20 5c | echo| shar: \|
|00000910| 22 27 4d 61 6b 65 2e 61 | 6c 74 27 5c 22 20 75 6e |"'Make.a|lt'\" un|
|00000920| 70 61 63 6b 65 64 20 77 | 69 74 68 20 77 72 6f 6e |packed w|ith wron|
|00000930| 67 20 73 69 7a 65 21 0a | 66 69 0a 23 20 65 6e 64 |g size!.|fi.# end|
|00000940| 20 6f 66 20 27 4d 61 6b | 65 2e 61 6c 74 27 0a 66 | of 'Mak|e.alt'.f|
|00000950| 69 0a 69 66 20 74 65 73 | 74 20 2d 66 20 27 4d 61 |i.if tes|t -f 'Ma|
|00000960| 6b 65 66 69 6c 65 27 20 | 2d 61 20 22 24 7b 31 7d |kefile' |-a "${1}|
|00000970| 22 20 21 3d 20 22 2d 63 | 22 20 3b 20 74 68 65 6e |" != "-c|" ; then|
|00000980| 20 0a 20 20 65 63 68 6f | 20 73 68 61 72 3a 20 57 | . echo| shar: W|
|00000990| 69 6c 6c 20 6e 6f 74 20 | 63 6c 6f 62 62 65 72 20 |ill not |clobber |
|000009a0| 65 78 69 73 74 69 6e 67 | 20 66 69 6c 65 20 5c 22 |existing| file \"|
|000009b0| 27 4d 61 6b 65 66 69 6c | 65 27 5c 22 0a 65 6c 73 |'Makefil|e'\".els|
|000009c0| 65 0a 65 63 68 6f 20 73 | 68 61 72 3a 20 45 78 74 |e.echo s|har: Ext|
|000009d0| 72 61 63 74 69 6e 67 20 | 5c 22 27 4d 61 6b 65 66 |racting |\"'Makef|
|000009e0| 69 6c 65 27 5c 22 20 5c | 28 37 39 34 20 63 68 61 |ile'\" \|(794 cha|
|000009f0| 72 61 63 74 65 72 73 5c | 29 0a 73 65 64 20 22 73 |racters\|).sed "s|
|00000a00| 2f 5e 58 2f 2f 22 20 3e | 27 4d 61 6b 65 66 69 6c |/^X//" >|'Makefil|
|00000a10| 65 27 20 3c 3c 27 45 4e | 44 5f 4f 46 5f 46 49 4c |e' <<'EN|D_OF_FIL|
|00000a20| 45 27 0a 58 23 20 4d 61 | 6b 65 66 69 6c 65 20 66 |E'.X# Ma|kefile f|
|00000a30| 6f 72 20 69 6e 65 6c 69 | 6d 0a 58 0a 42 49 4e 44 |or ineli|m.X.BIND|
|00000a40| 49 52 3d 20 2f 75 73 72 | 2f 6c 6f 63 61 6c 2f 62 |IR= /usr|/local/b|
|00000a50| 69 6e 0a 58 0a 58 2e 53 | 55 46 46 49 58 45 53 3a |in.X.X.S|UFFIXES:|
|00000a60| 0a 58 2e 53 55 46 46 49 | 58 45 53 3a 20 2e 6e 6f |.X.SUFFI|XES: .no|
|00000a70| 6e 65 0a 58 0a 53 59 53 | 54 45 4d 3d 42 53 44 0a |ne.X.SYS|TEM=BSD.|
|00000a80| 43 46 4c 41 47 53 20 20 | 3d 20 2d 4f 20 2d 44 24 |CFLAGS |= -O -D$|
|00000a90| 28 53 59 53 54 45 4d 29 | 0a 58 0a 43 4f 4d 4d 41 |(SYSTEM)|.X.COMMA|
|00000aa0| 4e 44 3d 20 69 6e 65 6c | 69 6d 0a 53 52 43 53 3d |ND= inel|im.SRCS=|
|00000ab0| 20 20 20 69 6e 65 6c 69 | 6d 2e 63 20 75 6e 65 6e | ineli|m.c unen|
|00000ac0| 76 2e 63 0a 4d 41 4e 50 | 41 47 45 3d 20 69 6e 65 |v.c.MANP|AGE= ine|
|00000ad0| 6c 69 6d 2e 31 6e 65 74 | 0a 58 0a 4f 42 4a 53 3d |lim.1net|.X.OBJS=|
|00000ae0| 20 24 28 53 52 43 53 3a | 2e 63 3d 2e 6f 29 0a 58 | $(SRCS:|.c=.o).X|
|00000af0| 0a 74 72 61 70 3a 20 62 | 74 65 73 74 0a 58 0a 62 |.trap: b|test.X.b|
|00000b00| 74 65 73 74 3a 20 20 69 | 6e 65 6c 69 6d 0a 58 09 |test: i|nelim.X.|
|00000b10| 2e 2f 69 6e 65 6c 69 6d | 20 66 69 6c 65 31 0a 58 |./inelim| file1.X|
|00000b20| 09 2e 2f 69 6e 65 6c 69 | 6d 20 2d 76 20 66 69 6c |../ineli|m -v fil|
|00000b30| 65 31 0a 58 09 2e 2f 69 | 6e 65 6c 69 6d 20 2d 70 |e1.X../i|nelim -p|
|00000b40| 20 2e 73 6f 20 66 69 6c | 65 31 0a 58 09 2e 2f 69 | .so fil|e1.X../i|
|00000b50| 6e 65 6c 69 6d 20 66 69 | 6c 65 31 20 7c 20 2e 2f |nelim fi|le1 | ./|
|00000b60| 69 6e 65 6c 69 6d 20 2d | 70 20 73 6f 75 72 63 65 |inelim -|p source|
|00000b70| 0a 58 0a 69 6e 73 74 61 | 6c 6c 3a 20 24 28 42 49 |.X.insta|ll: $(BI|
|00000b80| 4e 44 49 52 29 2f 24 28 | 43 4f 4d 4d 41 4e 44 29 |NDIR)/$(|COMMAND)|
|00000b90| 0a 58 0a 58 24 28 42 49 | 4e 44 49 52 29 2f 24 28 |.X.X$(BI|NDIR)/$(|
|00000ba0| 43 4f 4d 4d 41 4e 44 29 | 3a 20 24 24 28 40 46 29 |COMMAND)|: $$(@F)|
|00000bb0| 0a 58 09 63 70 20 24 28 | 40 46 29 20 24 40 0a 58 |.X.cp $(|@F) $@.X|
|00000bc0| 09 63 68 6d 6f 64 20 37 | 35 35 20 24 40 0a 58 0a |.chmod 7|55 $@.X.|
|00000bd0| 62 73 64 3a 0a 58 09 24 | 28 4d 41 4b 45 29 20 24 |bsd:.X.$|(MAKE) $|
|00000be0| 28 43 4f 4d 4d 41 4e 44 | 29 20 53 59 53 54 45 4d |(COMMAND|) SYSTEM|
|00000bf0| 3d 42 53 44 0a 58 0a 61 | 74 74 3a 0a 58 09 24 28 |=BSD.X.a|tt:.X.$(|
|00000c00| 4d 41 4b 45 29 20 24 28 | 43 4f 4d 4d 41 4e 44 29 |MAKE) $(|COMMAND)|
|00000c10| 20 53 59 53 54 45 4d 3d | 53 59 53 56 0a 58 0a 58 | SYSTEM=|SYSV.X.X|
|00000c20| 24 28 43 4f 4d 4d 41 4e | 44 29 3a 20 24 28 4f 42 |$(COMMAN|D): $(OB|
|00000c30| 4a 53 29 0a 58 09 24 28 | 43 43 29 20 24 28 4c 44 |JS).X.$(|CC) $(LD|
|00000c40| 46 4c 41 47 53 29 20 2d | 6f 20 24 40 20 24 28 4f |FLAGS) -|o $@ $(O|
|00000c50| 42 4a 53 29 0a 58 0a 58 | 24 28 4f 42 4a 53 29 3a |BJS).X.X|$(OBJS):|
|00000c60| 20 24 24 2a 2e 63 0a 58 | 09 24 28 43 43 29 20 24 | $$*.c.X|.$(CC) $|
|00000c70| 28 43 46 4c 41 47 53 29 | 20 2d 63 20 24 2a 2e 63 |(CFLAGS)| -c $*.c|
|00000c80| 0a 58 0a 6c 69 6e 74 3a | 0a 58 09 24 28 4c 49 4e |.X.lint:|.X.$(LIN|
|00000c90| 54 29 20 2d 44 24 28 53 | 59 53 54 45 4d 29 20 24 |T) -D$(S|YSTEM) $|
|00000ca0| 28 4c 46 4c 41 47 53 29 | 20 24 28 53 52 43 53 29 |(LFLAGS)| $(SRCS)|
|00000cb0| 0a 58 0a 63 6c 65 61 6e | 3a 0a 58 09 72 6d 20 2d |.X.clean|:.X.rm -|
|00000cc0| 66 20 24 28 4f 42 4a 53 | 29 0a 58 0a 72 6f 67 73 |f $(OBJS|).X.rogs|
|00000cd0| 68 61 72 3a 0a 58 09 73 | 68 61 72 20 2d 63 20 2d |har:.X.s|har -c -|
|00000ce0| 66 20 69 6e 65 6c 69 6d | 2e 73 68 61 72 20 24 28 |f inelim|.shar $(|
|00000cf0| 4d 41 4e 50 41 47 45 29 | 20 4d 61 6b 65 66 69 6c |MANPAGE)| Makefil|
|00000d00| 65 20 24 28 53 52 43 53 | 29 20 66 69 6c 65 31 20 |e $(SRCS|) file1 |
|00000d10| 66 69 6c 65 32 0a 58 0a | 67 6f 73 73 68 61 72 3a |file2.X.|gosshar:|
|00000d20| 0a 58 09 73 68 61 72 20 | 2d 63 20 24 28 4d 41 4e |.X.shar |-c $(MAN|
|00000d30| 50 41 47 45 29 20 4d 61 | 6b 65 66 69 6c 65 20 24 |PAGE) Ma|kefile $|
|00000d40| 28 53 52 43 53 29 20 66 | 69 6c 65 31 20 66 69 6c |(SRCS) f|ile1 fil|
|00000d50| 65 32 20 3e 20 69 6e 63 | 65 6c 69 6d 2e 73 68 61 |e2 > inc|elim.sha|
|00000d60| 72 0a 45 4e 44 5f 4f 46 | 5f 46 49 4c 45 0a 69 66 |r.END_OF|_FILE.if|
|00000d70| 20 74 65 73 74 20 37 39 | 34 20 2d 6e 65 20 60 77 | test 79|4 -ne `w|
|00000d80| 63 20 2d 63 20 3c 27 4d | 61 6b 65 66 69 6c 65 27 |c -c <'M|akefile'|
|00000d90| 60 3b 20 74 68 65 6e 0a | 20 20 20 20 65 63 68 6f |`; then.| echo|
|00000da0| 20 73 68 61 72 3a 20 5c | 22 27 4d 61 6b 65 66 69 | shar: \|"'Makefi|
|00000db0| 6c 65 27 5c 22 20 75 6e | 70 61 63 6b 65 64 20 77 |le'\" un|packed w|
|00000dc0| 69 74 68 20 77 72 6f 6e | 67 20 73 69 7a 65 21 0a |ith wron|g size!.|
|00000dd0| 66 69 0a 23 20 65 6e 64 | 20 6f 66 20 27 4d 61 6b |fi.# end| of 'Mak|
|00000de0| 65 66 69 6c 65 27 0a 66 | 69 0a 69 66 20 74 65 73 |efile'.f|i.if tes|
|00000df0| 74 20 2d 66 20 27 66 69 | 6c 65 31 27 20 2d 61 20 |t -f 'fi|le1' -a |
|00000e00| 22 24 7b 31 7d 22 20 21 | 3d 20 22 2d 63 22 20 3b |"${1}" !|= "-c" ;|
|00000e10| 20 74 68 65 6e 20 0a 20 | 20 65 63 68 6f 20 73 68 | then . | echo sh|
|00000e20| 61 72 3a 20 57 69 6c 6c | 20 6e 6f 74 20 63 6c 6f |ar: Will| not clo|
|00000e30| 62 62 65 72 20 65 78 69 | 73 74 69 6e 67 20 66 69 |bber exi|sting fi|
|00000e40| 6c 65 20 5c 22 27 66 69 | 6c 65 31 27 5c 22 0a 65 |le \"'fi|le1'\".e|
|00000e50| 6c 73 65 0a 65 63 68 6f | 20 73 68 61 72 3a 20 45 |lse.echo| shar: E|
|00000e60| 78 74 72 61 63 74 69 6e | 67 20 5c 22 27 66 69 6c |xtractin|g \"'fil|
|00000e70| 65 31 27 5c 22 20 5c 28 | 31 32 31 20 63 68 61 72 |e1'\" \(|121 char|
|00000e80| 61 63 74 65 72 73 5c 29 | 0a 73 65 64 20 22 73 2f |acters\)|.sed "s/|
|00000e90| 5e 58 2f 2f 22 20 3e 27 | 66 69 6c 65 31 27 20 3c |^X//" >'|file1' <|
|00000ea0| 3c 27 45 4e 44 5f 4f 46 | 5f 46 49 4c 45 27 0a 6b |<'END_OF|_FILE'.k|
|00000eb0| 6e 61 74 74 65 0a 69 6e | 63 6c 75 64 65 20 66 69 |natte.in|clude fi|
|00000ec0| 6c 65 32 0a 58 2e 73 6f | 20 66 69 6c 65 32 0a 69 |le2.X.so| file2.i|
|00000ed0| 6e 63 6c 75 64 65 20 24 | 48 4f 4d 45 2f 2e 63 73 |nclude $|HOME/.cs|
|00000ee0| 68 72 63 0a 74 6a 61 74 | 74 65 0a 69 6e 63 6c 75 |hrc.tjat|te.inclu|
|00000ef0| 64 65 20 7c 20 61 77 6b | 20 27 42 45 47 49 4e 7b |de | awk| 'BEGIN{|
|00000f00| 46 53 3d 22 3a 22 7d 7b | 70 72 69 6e 74 20 24 31 |FS=":"}{|print $1|
|00000f10| 7d 27 20 2f 65 74 63 2f | 70 61 73 73 77 64 20 7c |}' /etc/|passwd ||
|00000f20| 20 66 6d 74 0a 65 6e 64 | 0a 45 4e 44 5f 4f 46 5f | fmt.end|.END_OF_|
|00000f30| 46 49 4c 45 0a 69 66 20 | 74 65 73 74 20 31 32 31 |FILE.if |test 121|
|00000f40| 20 2d 6e 65 20 60 77 63 | 20 2d 63 20 3c 27 66 69 | -ne `wc| -c <'fi|
|00000f50| 6c 65 31 27 60 3b 20 74 | 68 65 6e 0a 20 20 20 20 |le1'`; t|hen. |
|00000f60| 65 63 68 6f 20 73 68 61 | 72 3a 20 5c 22 27 66 69 |echo sha|r: \"'fi|
|00000f70| 6c 65 31 27 5c 22 20 75 | 6e 70 61 63 6b 65 64 20 |le1'\" u|npacked |
|00000f80| 77 69 74 68 20 77 72 6f | 6e 67 20 73 69 7a 65 21 |with wro|ng size!|
|00000f90| 0a 66 69 0a 23 20 65 6e | 64 20 6f 66 20 27 66 69 |.fi.# en|d of 'fi|
|00000fa0| 6c 65 31 27 0a 66 69 0a | 69 66 20 74 65 73 74 20 |le1'.fi.|if test |
|00000fb0| 2d 66 20 27 66 69 6c 65 | 32 27 20 2d 61 20 22 24 |-f 'file|2' -a "$|
|00000fc0| 7b 31 7d 22 20 21 3d 20 | 22 2d 63 22 20 3b 20 74 |{1}" != |"-c" ; t|
|00000fd0| 68 65 6e 20 0a 20 20 65 | 63 68 6f 20 73 68 61 72 |hen . e|cho shar|
|00000fe0| 3a 20 57 69 6c 6c 20 6e | 6f 74 20 63 6c 6f 62 62 |: Will n|ot clobb|
|00000ff0| 65 72 20 65 78 69 73 74 | 69 6e 67 20 66 69 6c 65 |er exist|ing file|
|00001000| 20 5c 22 27 66 69 6c 65 | 32 27 5c 22 0a 65 6c 73 | \"'file|2'\".els|
|00001010| 65 0a 65 63 68 6f 20 73 | 68 61 72 3a 20 45 78 74 |e.echo s|har: Ext|
|00001020| 72 61 63 74 69 6e 67 20 | 5c 22 27 66 69 6c 65 32 |racting |\"'file2|
|00001030| 27 5c 22 20 5c 28 37 20 | 63 68 61 72 61 63 74 65 |'\" \(7 |characte|
|00001040| 72 73 5c 29 0a 73 65 64 | 20 22 73 2f 5e 58 2f 2f |rs\).sed| "s/^X//|
|00001050| 22 20 3e 27 66 69 6c 65 | 32 27 20 3c 3c 27 45 4e |" >'file|2' <<'EN|
|00001060| 44 5f 4f 46 5f 46 49 4c | 45 27 0a 66 6e 61 74 74 |D_OF_FIL|E'.fnatt|
|00001070| 65 0a 45 4e 44 5f 4f 46 | 5f 46 49 4c 45 0a 69 66 |e.END_OF|_FILE.if|
|00001080| 20 74 65 73 74 20 37 20 | 2d 6e 65 20 60 77 63 20 | test 7 |-ne `wc |
|00001090| 2d 63 20 3c 27 66 69 6c | 65 32 27 60 3b 20 74 68 |-c <'fil|e2'`; th|
|000010a0| 65 6e 0a 20 20 20 20 65 | 63 68 6f 20 73 68 61 72 |en. e|cho shar|
|000010b0| 3a 20 5c 22 27 66 69 6c | 65 32 27 5c 22 20 75 6e |: \"'fil|e2'\" un|
|000010c0| 70 61 63 6b 65 64 20 77 | 69 74 68 20 77 72 6f 6e |packed w|ith wron|
|000010d0| 67 20 73 69 7a 65 21 0a | 66 69 0a 23 20 65 6e 64 |g size!.|fi.# end|
|000010e0| 20 6f 66 20 27 66 69 6c | 65 32 27 0a 66 69 0a 69 | of 'fil|e2'.fi.i|
|000010f0| 66 20 74 65 73 74 20 2d | 66 20 27 69 6e 63 2d 65 |f test -|f 'inc-e|
|00001100| 6c 69 6d 27 20 2d 61 20 | 22 24 7b 31 7d 22 20 21 |lim' -a |"${1}" !|
|00001110| 3d 20 22 2d 63 22 20 3b | 20 74 68 65 6e 20 0a 20 |= "-c" ;| then . |
|00001120| 20 65 63 68 6f 20 73 68 | 61 72 3a 20 57 69 6c 6c | echo sh|ar: Will|
|00001130| 20 6e 6f 74 20 63 6c 6f | 62 62 65 72 20 65 78 69 | not clo|bber exi|
|00001140| 73 74 69 6e 67 20 66 69 | 6c 65 20 5c 22 27 69 6e |sting fi|le \"'in|
|00001150| 63 2d 65 6c 69 6d 27 5c | 22 0a 65 6c 73 65 0a 65 |c-elim'\|".else.e|
|00001160| 63 68 6f 20 73 68 61 72 | 3a 20 45 78 74 72 61 63 |cho shar|: Extrac|
|00001170| 74 69 6e 67 20 5c 22 27 | 69 6e 63 2d 65 6c 69 6d |ting \"'|inc-elim|
|00001180| 27 5c 22 20 5c 28 37 30 | 35 20 63 68 61 72 61 63 |'\" \(70|5 charac|
|00001190| 74 65 72 73 5c 29 0a 73 | 65 64 20 22 73 2f 5e 58 |ters\).s|ed "s/^X|
|000011a0| 2f 2f 22 20 3e 27 69 6e | 63 2d 65 6c 69 6d 27 20 |//" >'in|c-elim' |
|000011b0| 3c 3c 27 45 4e 44 5f 4f | 46 5f 46 49 4c 45 27 0a |<<'END_O|F_FILE'.|
|000011c0| 58 46 72 6f 6d 20 65 6e | 65 61 21 73 74 65 6e 40 |XFrom en|ea!sten@|
|000011d0| 75 75 6e 65 74 2e 75 75 | 2e 6e 65 74 20 4d 6f 6e |uunet.uu|.net Mon|
|000011e0| 20 46 65 62 20 32 39 20 | 30 33 3a 30 33 3a 30 35 | Feb 29 |03:03:05|
|000011f0| 20 31 39 38 38 0a 52 65 | 63 65 69 76 65 64 3a 20 | 1988.Re|ceived: |
|00001200| 66 72 6f 6d 20 42 42 4e | 2e 43 4f 4d 20 28 62 62 |from BBN|.COM (bb|
|00001210| 6e 2e 63 6f 6d 2e 41 52 | 50 41 29 20 62 79 20 70 |n.com.AR|PA) by p|
|00001220| 69 6e 65 61 70 70 6c 65 | 2e 62 62 6e 2e 63 6f 6d |ineapple|.bbn.com|
|00001230| 20 69 64 20 41 41 31 32 | 34 32 33 3b 20 4d 6f 6e | id AA12|423; Mon|
|00001240| 2c 20 32 39 20 46 65 62 | 20 38 38 20 30 32 3a 35 |, 29 Feb| 88 02:5|
|00001250| 36 3a 32 34 20 65 73 74 | 0a 52 65 63 65 69 76 65 |6:24 est|.Receive|
|00001260| 64 3a 20 66 72 6f 6d 20 | 75 75 6e 65 74 2e 75 75 |d: from |uunet.uu|
|00001270| 2e 6e 65 74 20 62 79 20 | 42 42 4e 2e 43 4f 4d 20 |.net by |BBN.COM |
|00001280| 69 64 20 61 61 32 32 33 | 31 35 3b 20 32 39 20 46 |id aa223|15; 29 F|
|00001290| 65 62 20 38 38 20 32 3a | 35 35 20 45 53 54 0a 52 |eb 88 2:|55 EST.R|
|000012a0| 65 63 65 69 76 65 64 3a | 20 66 72 6f 6d 20 65 6e |eceived:| from en|
|000012b0| 65 61 2e 55 55 43 50 20 | 62 79 20 75 75 6e 65 74 |ea.UUCP |by uunet|
|000012c0| 2e 55 55 2e 4e 45 54 20 | 28 35 2e 35 34 2f 31 2e |.UU.NET |(5.54/1.|
|000012d0| 31 34 29 20 77 69 74 68 | 20 55 55 43 50 20 0a 58 |14) with| UUCP .X|
|000012e0| 09 69 64 20 41 41 32 32 | 39 33 35 3b 20 4d 6f 6e |.id AA22|935; Mon|
|000012f0| 2c 20 32 39 20 46 65 62 | 20 38 38 20 30 31 3a 34 |, 29 Feb| 88 01:4|
|00001300| 38 3a 35 33 20 45 53 54 | 0a 52 65 63 65 69 76 65 |8:53 EST|.Receive|
|00001310| 64 3a 20 62 79 20 65 6e | 65 61 2e 73 65 20 28 35 |d: by en|ea.se (5|
|00001320| 2e 35 37 2b 2b 2f 31 2e | 31 39 29 0a 58 09 69 64 |.57++/1.|19).X.id|
|00001330| 20 41 41 31 32 37 33 30 | 3b 20 4d 6f 6e 2c 20 32 | AA12730|; Mon, 2|
|00001340| 39 20 46 65 62 20 38 38 | 20 30 30 3a 35 39 3a 30 |9 Feb 88| 00:59:0|
|00001350| 38 20 2b 30 31 30 30 20 | 28 4d 45 54 29 0a 44 61 |8 +0100 |(MET).Da|
|00001360| 74 65 3a 20 4d 6f 6e 2c | 20 32 39 20 46 65 62 20 |te: Mon,| 29 Feb |
|00001370| 38 38 20 30 30 3a 35 39 | 3a 30 38 20 2b 30 31 30 |88 00:59|:08 +010|
|00001380| 30 0a 58 46 72 6f 6d 3a | 20 53 74 65 6e 20 46 6f |0.XFrom:| Sten Fo|
|00001390| 6c 6b 65 72 6d 61 6e 20 | 3c 73 74 65 6e 40 65 6e |lkerman |<sten@en|
|000013a0| 65 61 2e 73 65 3e 0a 4d | 65 73 73 61 67 65 2d 49 |ea.se>.M|essage-I|
|000013b0| 64 3a 20 3c 38 38 30 32 | 32 38 32 33 35 39 2e 41 |d: <8802|282359.A|
|000013c0| 41 31 32 37 33 30 40 65 | 6e 65 61 2e 73 65 3e 0a |A12730@e|nea.se>.|
|000013d0| 54 6f 3a 20 63 6f 6d 70 | 2d 73 6f 75 72 63 65 73 |To: comp|-sources|
|000013e0| 2d 75 6e 69 78 40 65 6e | 65 61 2e 73 65 0a 53 74 |-unix@en|ea.se.St|
|000013f0| 61 74 75 73 3a 20 52 0a | 58 0a 77 72 69 74 74 69 |atus: R.|X.writti|
|00001400| 6e 67 20 2e 2f 69 6e 65 | 6c 69 6d 2e 31 6e 65 74 |ng ./ine|lim.1net|
|00001410| 0a 77 72 69 74 74 69 6e | 67 20 2e 2f 4d 61 6b 65 |.writtin|g ./Make|
|00001420| 66 69 6c 65 0a 77 72 69 | 74 74 69 6e 67 20 2e 2f |file.wri|tting ./|
|00001430| 69 6e 65 6c 69 6d 2e 63 | 0a 77 72 69 74 74 69 6e |inelim.c|.writtin|
|00001440| 67 20 2e 2f 75 6e 65 6e | 76 2e 63 0a 77 72 69 74 |g ./unen|v.c.writ|
|00001450| 74 69 6e 67 20 2e 2f 66 | 69 6c 65 31 0a 77 72 69 |ting ./f|ile1.wri|
|00001460| 74 74 69 6e 67 20 2e 2f | 66 69 6c 65 32 0a 58 46 |tting ./|file2.XF|
|00001470| 69 6e 69 73 68 65 64 20 | 61 72 63 68 69 76 65 20 |inished |archive |
|00001480| 31 20 6f 66 20 31 0a 45 | 4e 44 5f 4f 46 5f 46 49 |1 of 1.E|ND_OF_FI|
|00001490| 4c 45 0a 69 66 20 74 65 | 73 74 20 37 30 35 20 2d |LE.if te|st 705 -|
|000014a0| 6e 65 20 60 77 63 20 2d | 63 20 3c 27 69 6e 63 2d |ne `wc -|c <'inc-|
|000014b0| 65 6c 69 6d 27 60 3b 20 | 74 68 65 6e 0a 20 20 20 |elim'`; |then. |
|000014c0| 20 65 63 68 6f 20 73 68 | 61 72 3a 20 5c 22 27 69 | echo sh|ar: \"'i|
|000014d0| 6e 63 2d 65 6c 69 6d 27 | 5c 22 20 75 6e 70 61 63 |nc-elim'|\" unpac|
|000014e0| 6b 65 64 20 77 69 74 68 | 20 77 72 6f 6e 67 20 73 |ked with| wrong s|
|000014f0| 69 7a 65 21 0a 66 69 0a | 23 20 65 6e 64 20 6f 66 |ize!.fi.|# end of|
|00001500| 20 27 69 6e 63 2d 65 6c | 69 6d 27 0a 66 69 0a 69 | 'inc-el|im'.fi.i|
|00001510| 66 20 74 65 73 74 20 2d | 66 20 27 69 6e 65 6c 69 |f test -|f 'ineli|
|00001520| 6d 2e 31 6e 65 74 27 20 | 2d 61 20 22 24 7b 31 7d |m.1net' |-a "${1}|
|00001530| 22 20 21 3d 20 22 2d 63 | 22 20 3b 20 74 68 65 6e |" != "-c|" ; then|
|00001540| 20 0a 20 20 65 63 68 6f | 20 73 68 61 72 3a 20 57 | . echo| shar: W|
|00001550| 69 6c 6c 20 6e 6f 74 20 | 63 6c 6f 62 62 65 72 20 |ill not |clobber |
|00001560| 65 78 69 73 74 69 6e 67 | 20 66 69 6c 65 20 5c 22 |existing| file \"|
|00001570| 27 69 6e 65 6c 69 6d 2e | 31 6e 65 74 27 5c 22 0a |'inelim.|1net'\".|
|00001580| 65 6c 73 65 0a 65 63 68 | 6f 20 73 68 61 72 3a 20 |else.ech|o shar: |
|00001590| 45 78 74 72 61 63 74 69 | 6e 67 20 5c 22 27 69 6e |Extracti|ng \"'in|
|000015a0| 65 6c 69 6d 2e 31 6e 65 | 74 27 5c 22 20 5c 28 31 |elim.1ne|t'\" \(1|
|000015b0| 35 37 31 20 63 68 61 72 | 61 63 74 65 72 73 5c 29 |571 char|acters\)|
|000015c0| 0a 73 65 64 20 22 73 2f | 5e 58 2f 2f 22 20 3e 27 |.sed "s/|^X//" >'|
|000015d0| 69 6e 65 6c 69 6d 2e 31 | 6e 65 74 27 20 3c 3c 27 |inelim.1|net' <<'|
|000015e0| 45 4e 44 5f 4f 46 5f 46 | 49 4c 45 27 0a 58 2e 64 |END_OF_F|ILE'.X.d|
|000015f0| 65 20 72 24 0a 58 2e 64 | 73 20 72 56 20 5c 5c 24 |e r$.X.d|s rV \\$|
|00001600| 33 0a 58 2e 64 73 20 72 | 44 20 5c 5c 24 34 0a 58 |3.X.ds r|D \\$4.X|
|00001610| 2e 2e 0a 58 2e 72 24 20 | 24 48 65 61 64 65 72 3a |...X.r$ |$Header:|
|00001620| 20 69 6e 65 6c 69 6d 2e | 31 6e 65 74 2c 76 20 31 | inelim.|1net,v 1|
|00001630| 2e 33 20 31 39 38 38 2d | 30 32 2d 32 33 20 31 36 |.3 1988-|02-23 16|
|00001640| 3a 30 30 3a 31 32 20 73 | 74 65 6e 20 45 78 70 20 |:00:12 s|ten Exp |
|00001650| 24 0a 58 2e 54 48 20 49 | 4e 45 4c 49 4d 20 31 6e |$.X.TH I|NELIM 1n|
|00001660| 65 74 20 22 45 4e 45 41 | 20 44 41 54 41 20 5c 2a |et "ENEA| DATA \*|
|00001670| 28 72 44 22 0a 58 2e 64 | 73 20 54 44 20 5c 66 43 |(rD".X.d|s TD \fC|
|00001680| 69 6e 65 6c 69 6d 5c 66 | 52 0a 58 2e 53 48 20 4e |inelim\f|R.X.SH N|
|00001690| 41 4d 45 0a 69 6e 65 6c | 69 6d 20 5c 2d 20 65 6c |AME.inel|im \- el|
|000016a0| 69 6d 69 6e 61 74 65 20 | 69 6e 63 6c 75 64 65 20 |iminate |include |
|000016b0| 73 74 61 74 65 6d 65 6e | 74 73 0a 58 2e 53 48 20 |statemen|ts.X.SH |
|000016c0| 53 59 4e 4f 50 53 49 53 | 0a 58 2e 42 20 69 6e 65 |SYNOPSIS|.X.B ine|
|000016d0| 6c 69 6d 0a 58 5b 0a 58 | 2e 42 20 5c 2d 76 0a 58 |lim.X[.X|.B \-v.X|
|000016e0| 5d 20 5b 0a 58 2e 42 49 | 20 5c 2d 70 20 70 61 74 |] [.X.BI| \-p pat|
|000016f0| 74 65 72 6e 0a 58 5d 20 | 5b 0a 58 2e 49 20 66 69 |tern.X] |[.X.I fi|
|00001700| 6c 65 73 0a 58 5d 0a 58 | 2e 53 48 20 44 45 53 43 |les.X].X|.SH DESC|
|00001710| 52 49 50 54 49 4f 4e 0a | 58 5c 2a 28 54 44 20 72 |RIPTION.|X\*(TD r|
|00001720| 65 61 64 73 20 74 68 65 | 20 73 70 65 63 69 66 69 |eads the| specifi|
|00001730| 65 64 20 66 69 6c 65 73 | 20 6f 72 20 74 68 65 20 |ed files| or the |
|00001740| 73 74 61 6e 64 61 72 64 | 20 69 6e 70 75 74 20 61 |standard| input a|
|00001750| 6e 64 20 70 65 72 66 6f | 72 6d 73 20 74 68 65 0a |nd perfo|rms the.|
|00001760| 69 6d 70 6c 69 65 64 20 | 74 65 78 74 75 61 6c 20 |implied |textual |
|00001770| 69 6e 63 6c 75 73 69 6f | 6e 2e 20 54 68 65 20 69 |inclusio|n. The i|
|00001780| 6e 63 6c 75 64 65 20 73 | 74 61 74 65 6d 65 6e 74 |nclude s|tatement|
|00001790| 20 68 61 73 20 61 73 20 | 64 65 66 61 75 6c 74 20 | has as |default |
|000017a0| 74 68 65 20 66 6f 72 6d | 61 74 3a 0a 58 2e 50 50 |the form|at:.X.PP|
|000017b0| 0a 58 5c 66 43 69 6e 63 | 6c 75 64 65 20 5c 66 49 |.X\fCinc|lude \fI|
|000017c0| 73 6f 6d 65 66 69 6c 65 | 5c 66 52 0a 58 2e 50 50 |somefile|\fR.X.PP|
|000017d0| 0a 77 68 65 6e 20 74 68 | 65 79 20 61 70 70 65 61 |.when th|ey appea|
|000017e0| 72 20 69 6e 20 62 65 67 | 69 6e 6e 69 6e 67 20 6f |r in beg|inning o|
|000017f0| 66 20 69 6e 70 75 74 20 | 6c 69 6e 65 73 2e 20 20 |f input |lines. |
|00001800| 42 65 66 6f 72 65 20 5c | 66 49 73 6f 6d 65 66 69 |Before \|fIsomefi|
|00001810| 6c 65 5c 66 52 20 69 73 | 0a 61 63 63 65 73 73 65 |le\fR is|.accesse|
|00001820| 64 2c 20 74 68 65 20 66 | 69 6c 65 20 6e 61 6d 65 |d, the f|ile name|
|00001830| 20 77 69 6c 6c 20 67 6f | 20 74 68 72 6f 75 67 68 | will go| through|
|00001840| 20 74 69 6c 64 65 20 61 | 6e 64 20 65 6e 76 69 72 | tilde a|nd envir|
|00001850| 6f 6e 6d 65 6e 74 20 73 | 75 62 73 74 69 74 75 74 |onment s|ubstitut|
|00001860| 69 6f 6e 2c 0a 69 6e 20 | 61 20 6d 61 6e 6e 65 72 |ion,.in |a manner|
|00001870| 20 6c 69 6b 65 20 5c 66 | 43 63 73 68 28 31 29 5c | like \f|Ccsh(1)\|
|00001880| 66 52 2e 20 20 49 66 20 | 74 68 65 20 66 69 6c 65 |fR. If |the file|
|00001890| 20 6e 61 6d 65 20 64 6f | 65 73 20 6e 6f 74 20 62 | name do|es not b|
|000018a0| 65 67 69 6e 20 77 69 74 | 68 20 27 2f 27 2c 0a 74 |egin wit|h '/',.t|
|000018b0| 68 65 20 69 6e 63 6c 75 | 64 65 20 66 69 6c 65 20 |he inclu|de file |
|000018c0| 69 73 20 6f 70 65 6e 65 | 64 20 72 65 6c 61 74 69 |is opene|d relati|
|000018d0| 76 65 20 74 6f 20 74 68 | 65 20 64 69 72 65 63 74 |ve to th|e direct|
|000018e0| 6f 72 79 20 6c 6f 63 61 | 74 69 6f 6e 20 6f 66 20 |ory loca|tion of |
|000018f0| 74 68 65 20 63 75 72 72 | 65 6e 74 0a 66 69 6c 65 |the curr|ent.file|
|00001900| 2e 20 20 49 66 20 74 68 | 65 20 66 69 6c 65 20 6e |. If th|e file n|
|00001910| 61 6d 65 20 62 65 67 69 | 6e 73 20 77 69 74 68 20 |ame begi|ns with |
|00001920| 27 7c 27 2c 20 74 68 65 | 20 72 65 73 74 20 6f 66 |'|', the| rest of|
|00001930| 20 74 68 65 20 6c 69 6e | 65 20 69 73 20 66 65 64 | the lin|e is fed|
|00001940| 20 74 6f 0a 58 5c 66 43 | 73 68 28 31 29 5c 66 52 | to.X\fC|sh(1)\fR|
|00001950| 2c 20 61 6e 64 20 64 61 | 74 61 20 66 72 6f 6d 20 |, and da|ta from |
|00001960| 73 74 64 6f 75 74 20 69 | 73 20 73 75 62 73 74 69 |stdout i|s substi|
|00001970| 74 75 74 65 64 20 69 6e | 20 70 6c 61 63 65 20 6f |tuted in| place o|
|00001980| 66 20 74 68 65 20 69 6e | 63 6c 75 64 65 0a 6c 69 |f the in|clude.li|
|00001990| 6e 65 2e 20 49 66 20 54 | 68 65 20 66 69 6c 65 20 |ne. If T|he file |
|000019a0| 6e 61 6d 65 20 69 73 20 | 6a 75 73 74 20 27 2d 27 |name is |just '-'|
|000019b0| 2c 20 74 68 65 20 73 74 | 64 69 6e 20 77 69 6c 6c |, the st|din will|
|000019c0| 20 62 65 20 72 65 61 64 | 20 66 6f 72 20 64 61 74 | be read| for dat|
|000019d0| 61 20 74 6f 0a 73 75 62 | 73 74 69 74 75 74 65 20 |a to.sub|stitute |
|000019e0| 74 68 65 20 69 6e 63 6c | 75 73 69 6f 6e 20 6c 69 |the incl|usion li|
|000019f0| 6e 65 20 77 69 74 68 2e | 0a 58 2e 50 50 0a 54 68 |ne with.|.X.PP.Th|
|00001a00| 65 20 63 6f 6d 6d 61 6e | 64 20 6c 69 6e 65 20 6f |e comman|d line o|
|00001a10| 70 74 69 6f 6e 73 20 61 | 72 65 3a 0a 58 2e 54 50 |ptions a|re:.X.TP|
|00001a20| 20 32 63 0a 58 2e 42 49 | 20 5c 2d 70 20 70 61 74 | 2c.X.BI| \-p pat|
|00001a30| 74 65 72 6e 0a 58 2e 49 | 20 70 61 74 74 65 72 6e |tern.X.I| pattern|
|00001a40| 0a 77 69 6c 6c 20 62 65 | 20 75 73 65 64 20 69 6e |.will be| used in|
|00001a50| 73 74 65 61 64 20 6f 66 | 20 5c 66 43 69 6e 63 6c |stead of| \fCincl|
|00001a60| 75 64 65 5c 66 52 20 74 | 6f 20 64 65 74 65 63 74 |ude\fR t|o detect|
|00001a70| 20 69 6e 63 6c 75 64 65 | 20 73 74 61 74 65 6d 65 | include| stateme|
|00001a80| 6e 74 73 2e 0a 53 75 62 | 73 65 71 75 65 6e 74 20 |nts..Sub|sequent |
|00001a90| 77 68 69 74 65 73 70 61 | 63 65 20 69 73 20 73 6b |whitespa|ce is sk|
|00001aa0| 69 70 70 65 64 20 61 6e | 64 20 74 68 65 20 72 65 |ipped an|d the re|
|00001ab0| 73 74 20 6f 66 20 74 68 | 65 20 6c 69 6e 65 20 69 |st of th|e line i|
|00001ac0| 73 20 74 61 6b 65 6e 20 | 61 73 20 74 68 65 0a 6e |s taken |as the.n|
|00001ad0| 61 6d 65 20 6f 66 20 74 | 68 65 20 66 69 6c 65 20 |ame of t|he file |
|00001ae0| 74 6f 20 69 6e 63 6c 75 | 64 65 2e 0a 58 2e 54 50 |to inclu|de..X.TP|
|00001af0| 0a 58 2e 42 20 5c 2d 76 | 0a 76 65 72 62 6f 73 65 |.X.B \-v|.verbose|
|00001b00| 20 6f 70 65 72 61 74 69 | 6f 6e 2e 20 45 61 63 68 | operati|on. Each|
|00001b10| 20 6c 69 6e 65 20 6f 6e | 20 74 68 65 20 73 74 61 | line on| the sta|
|00001b20| 6e 64 61 72 64 20 6f 75 | 74 70 75 74 20 69 73 20 |ndard ou|tput is |
|00001b30| 70 72 65 63 65 64 65 64 | 20 62 79 20 74 68 65 20 |preceded| by the |
|00001b40| 69 6e 70 75 74 0a 66 69 | 6c 65 20 6e 61 6d 65 20 |input.fi|le name |
|00001b50| 61 6e 64 20 6c 69 6e 65 | 20 6e 75 6d 62 65 72 2e |and line| number.|
|00001b60| 0a 58 2e 53 48 20 45 4e | 56 49 52 4f 4e 4d 45 4e |.X.SH EN|VIRONMEN|
|00001b70| 54 0a 41 6c 6c 20 65 6e | 76 69 72 6f 6e 6d 65 6e |T.All en|vironmen|
|00001b80| 74 20 76 61 72 69 61 62 | 6c 65 73 20 6d 61 79 20 |t variab|les may |
|00001b90| 62 65 20 73 75 62 73 74 | 69 74 75 74 65 64 20 69 |be subst|ituted i|
|00001ba0| 6e 74 6f 20 61 6e 20 69 | 6e 63 6c 75 73 69 6f 6e |nto an i|nclusion|
|00001bb0| 20 66 69 6c 65 20 6e 61 | 6d 65 2e 0a 58 2e 53 48 | file na|me..X.SH|
|00001bc0| 20 22 53 45 45 20 41 4c | 53 4f 22 0a 58 5c 66 43 | "SEE AL|SO".X\fC|
|00001bd0| 73 68 28 31 29 5c 66 52 | 20 61 6e 64 20 5c 66 43 |sh(1)\fR| and \fC|
|00001be0| 63 73 68 28 31 29 5c 66 | 52 0a 58 2e 53 48 20 41 |csh(1)\f|R.X.SH A|
|00001bf0| 55 54 48 4f 52 0a 53 74 | 65 6e 20 46 6f 6c 6b 65 |UTHOR.St|en Folke|
|00001c00| 72 6d 61 6e 20 28 73 74 | 65 6e 40 65 6e 65 61 29 |rman (st|en@enea)|
|00001c10| 0a 58 2e 53 48 20 42 55 | 47 53 0a 4e 6f 20 73 75 |.X.SH BU|GS.No su|
|00001c20| 70 70 6f 72 74 20 66 6f | 72 20 71 75 6f 74 65 73 |pport fo|r quotes|
|00001c30| 2e 0a 45 4e 44 5f 4f 46 | 5f 46 49 4c 45 0a 69 66 |..END_OF|_FILE.if|
|00001c40| 20 74 65 73 74 20 31 35 | 37 31 20 2d 6e 65 20 60 | test 15|71 -ne `|
|00001c50| 77 63 20 2d 63 20 3c 27 | 69 6e 65 6c 69 6d 2e 31 |wc -c <'|inelim.1|
|00001c60| 6e 65 74 27 60 3b 20 74 | 68 65 6e 0a 20 20 20 20 |net'`; t|hen. |
|00001c70| 65 63 68 6f 20 73 68 61 | 72 3a 20 5c 22 27 69 6e |echo sha|r: \"'in|
|00001c80| 65 6c 69 6d 2e 31 6e 65 | 74 27 5c 22 20 75 6e 70 |elim.1ne|t'\" unp|
|00001c90| 61 63 6b 65 64 20 77 69 | 74 68 20 77 72 6f 6e 67 |acked wi|th wrong|
|00001ca0| 20 73 69 7a 65 21 0a 66 | 69 0a 23 20 65 6e 64 20 | size!.f|i.# end |
|00001cb0| 6f 66 20 27 69 6e 65 6c | 69 6d 2e 31 6e 65 74 27 |of 'inel|im.1net'|
|00001cc0| 0a 66 69 0a 69 66 20 74 | 65 73 74 20 2d 66 20 27 |.fi.if t|est -f '|
|00001cd0| 69 6e 65 6c 69 6d 2e 63 | 27 20 2d 61 20 22 24 7b |inelim.c|' -a "${|
|00001ce0| 31 7d 22 20 21 3d 20 22 | 2d 63 22 20 3b 20 74 68 |1}" != "|-c" ; th|
|00001cf0| 65 6e 20 0a 20 20 65 63 | 68 6f 20 73 68 61 72 3a |en . ec|ho shar:|
|00001d00| 20 57 69 6c 6c 20 6e 6f | 74 20 63 6c 6f 62 62 65 | Will no|t clobbe|
|00001d10| 72 20 65 78 69 73 74 69 | 6e 67 20 66 69 6c 65 20 |r existi|ng file |
|00001d20| 5c 22 27 69 6e 65 6c 69 | 6d 2e 63 27 5c 22 0a 65 |\"'ineli|m.c'\".e|
|00001d30| 6c 73 65 0a 65 63 68 6f | 20 73 68 61 72 3a 20 45 |lse.echo| shar: E|
|00001d40| 78 74 72 61 63 74 69 6e | 67 20 5c 22 27 69 6e 65 |xtractin|g \"'ine|
|00001d50| 6c 69 6d 2e 63 27 5c 22 | 20 5c 28 36 35 37 31 20 |lim.c'\"| \(6571 |
|00001d60| 63 68 61 72 61 63 74 65 | 72 73 5c 29 0a 73 65 64 |characte|rs\).sed|
|00001d70| 20 22 73 2f 5e 58 2f 2f | 22 20 3e 27 69 6e 65 6c | "s/^X//|" >'inel|
|00001d80| 69 6d 2e 63 27 20 3c 3c | 27 45 4e 44 5f 4f 46 5f |im.c' <<|'END_OF_|
|00001d90| 46 49 4c 45 27 0a 58 23 | 69 66 6e 64 65 66 20 6c |FILE'.X#|ifndef l|
|00001da0| 69 6e 74 0a 73 74 61 74 | 69 63 20 63 68 61 72 20 |int.stat|ic char |
|00001db0| 2a 52 43 53 69 64 20 3d | 20 22 24 48 65 61 64 65 |*RCSid =| "$Heade|
|00001dc0| 72 3a 20 69 6e 65 6c 69 | 6d 2e 63 2c 76 20 31 2e |r: ineli|m.c,v 1.|
|00001dd0| 35 20 31 39 38 38 2d 30 | 32 2d 32 39 20 30 30 3a |5 1988-0|2-29 00:|
|00001de0| 33 39 3a 33 38 20 73 74 | 65 6e 20 45 78 70 20 24 |39:38 st|en Exp $|
|00001df0| 22 3b 0a 58 23 65 6e 64 | 69 66 0a 58 0a 58 2f 2a |";.X#end|if.X.X/*|
|00001e00| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001e10| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001e20| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001e30| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001e40| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 5c 0a 58 2a |********|****\.X*|
|00001e50| 20 09 09 09 09 09 09 09 | 09 09 20 20 20 20 20 20 | .......|.. |
|00001e60| 2a 0a 58 2a 20 20 4e 41 | 4d 45 09 09 09 09 09 09 |*.X* NA|ME......|
|00001e70| 09 09 09 20 20 20 20 20 | 20 2a 0a 58 2a 20 20 20 |... | *.X* |
|00001e80| 20 69 6e 65 6c 69 6d 20 | 2d 20 65 6c 69 6d 69 6e | inelim |- elimin|
|00001e90| 61 74 65 20 69 6e 63 6c | 75 64 65 20 73 74 61 74 |ate incl|ude stat|
|00001ea0| 65 6d 65 6e 74 73 09 09 | 09 09 20 20 20 20 20 20 |ements..|.. |
|00001eb0| 2a 0a 58 2a 20 09 09 09 | 09 09 09 09 09 09 20 20 |*.X* ...|...... |
|00001ec0| 20 20 20 20 2a 0a 58 2a | 20 20 53 59 4e 4f 50 53 | *.X*| SYNOPS|
|00001ed0| 49 53 09 09 09 09 09 09 | 09 09 20 20 20 20 20 20 |IS......|.. |
|00001ee0| 2a 0a 58 2a 20 20 20 20 | 69 6e 65 6c 69 6d 20 5b |*.X* |inelim [|
|00001ef0| 2d 76 5d 20 5b 2d 70 20 | 70 61 74 74 65 72 6e 5d |-v] [-p |pattern]|
|00001f00| 20 5b 66 69 6c 65 73 5d | 09 09 09 09 09 20 20 20 | [files]|..... |
|00001f10| 20 20 20 2a 0a 58 2a 20 | 09 09 09 09 09 09 09 09 | *.X* |........|
|00001f20| 09 20 20 20 20 20 20 2a | 0a 58 2a 20 20 44 45 53 |. *|.X* DES|
|00001f30| 43 52 49 50 54 49 4f 4e | 09 09 09 09 09 09 09 09 |CRIPTION|........|
|00001f40| 20 20 20 20 20 20 2a 0a | 58 2a 20 20 20 20 69 6e | *.|X* in|
|00001f50| 65 6c 69 6d 20 65 6c 69 | 6d 69 6e 61 74 65 20 69 |elim eli|minate i|
|00001f60| 6e 63 6c 75 64 65 20 73 | 74 61 74 65 6d 65 6e 74 |nclude s|tatement|
|00001f70| 73 20 62 79 20 73 75 62 | 73 74 69 74 75 74 69 6e |s by sub|stitutin|
|00001f80| 67 20 74 68 65 20 6c 69 | 6e 65 20 77 69 74 68 20 |g the li|ne with |
|00001f90| 74 68 65 20 20 20 20 2a | 0a 58 2a 20 20 20 20 69 |the *|.X* i|
|00001fa0| 6e 63 6c 75 64 65 20 73 | 74 61 74 65 6d 65 6e 74 |nclude s|tatement|
|00001fb0| 20 77 69 74 68 20 74 68 | 65 20 63 6f 6e 74 65 6e | with th|e conten|
|00001fc0| 74 73 20 6f 66 20 74 68 | 65 6e 20 66 69 6c 65 20 |ts of th|en file |
|00001fd0| 74 6f 20 62 65 20 69 6e | 63 6c 75 64 65 64 2e 20 |to be in|cluded. |
|00001fe0| 54 68 65 20 20 20 20 20 | 2a 0a 58 2a 20 20 20 20 |The |*.X* |
|00001ff0| 72 65 73 75 6c 74 20 69 | 73 20 77 72 69 74 74 65 |result i|s writte|
|00002000| 6e 20 74 6f 20 73 74 64 | 6f 75 74 2e 20 54 68 65 |n to std|out. The|
|00002010| 20 2d 76 20 6f 70 74 69 | 6f 6e 20 70 72 69 6e 74 | -v opti|on print|
|00002020| 73 20 66 69 6c 65 20 6e | 61 6d 6e 20 61 6e 64 20 |s file n|amn and |
|00002030| 6c 69 6e 65 20 20 20 20 | 20 2a 0a 58 2a 20 20 20 |line | *.X* |
|00002040| 20 6e 75 6d 62 65 72 20 | 61 74 20 74 68 65 20 62 | number |at the b|
|00002050| 65 67 69 6e 6e 69 6e 67 | 20 6f 66 20 65 61 63 68 |eginning| of each|
|00002060| 20 6c 69 6e 65 2e 20 54 | 68 65 20 2d 70 20 6f 70 | line. T|he -p op|
|00002070| 74 69 6f 6e 20 61 6c 6c | 6f 77 73 20 79 6f 75 20 |tion all|ows you |
|00002080| 74 6f 09 20 20 20 20 20 | 20 2a 0a 58 2a 20 20 20 |to. | *.X* |
|00002090| 20 73 70 65 63 69 66 79 | 20 61 6e 20 61 6c 74 65 | specify| an alte|
|000020a0| 72 6e 61 74 69 76 65 20 | 70 61 74 74 65 72 6e 20 |rnative |pattern |
|000020b0| 69 6e 73 74 65 61 64 20 | 6f 66 20 74 68 65 20 73 |instead |of the s|
|000020c0| 74 61 6e 64 61 72 64 20 | 27 69 6e 63 6c 75 64 65 |tandard |'include|
|000020d0| 27 2e 20 49 66 20 6e 6f | 20 20 2a 0a 58 2a 20 20 |'. If no| *.X* |
|000020e0| 20 20 66 69 6c 65 73 20 | 61 72 65 20 67 69 76 65 | files |are give|
|000020f0| 6e 2c 20 73 74 64 69 6e | 20 69 73 20 74 61 6b 65 |n, stdin| is take|
|00002100| 6e 2e 20 54 69 6c 64 65 | 20 61 6e 64 20 65 6e 76 |n. Tilde| and env|
|00002110| 69 72 6f 6e 6d 65 6e 74 | 20 73 75 62 73 74 69 74 |ironment| substit|
|00002120| 75 74 69 6f 6e 20 69 73 | 20 20 20 2a 0a 58 2a 20 |ution is| *.X* |
|00002130| 20 20 20 70 65 72 66 6f | 72 6d 65 64 20 6f 6e 20 | perfo|rmed on |
|00002140| 65 61 63 68 20 69 6e 63 | 6c 75 64 65 20 66 69 6c |each inc|lude fil|
|00002150| 65 20 6e 61 6d 65 2e 20 | 49 66 20 74 68 65 20 65 |e name. |If the e|
|00002160| 78 70 61 6e 64 65 64 20 | 66 69 6c 65 20 6e 61 6d |xpanded |file nam|
|00002170| 65 20 64 6f 65 73 6e 27 | 74 20 20 20 2a 0a 58 2a |e doesn'|t *.X*|
|00002180| 20 20 20 20 62 65 67 69 | 6e 20 77 69 74 68 20 61 | begi|n with a|
|00002190| 20 27 2f 27 2c 20 74 68 | 65 20 64 69 72 65 63 74 | '/', th|e direct|
|000021a0| 6f 72 79 20 69 6e 20 77 | 68 69 63 68 20 77 65 20 |ory in w|hich we |
|000021b0| 61 72 65 20 72 65 61 64 | 69 6e 67 20 66 72 6f 6d |are read|ing from|
|000021c0| 20 61 74 20 74 68 65 20 | 20 20 20 20 20 2a 0a 58 | at the | *.X|
|000021d0| 2a 20 20 20 20 6d 6f 6d | 65 6e 74 20 69 73 20 70 |* mom|ent is p|
|000021e0| 72 65 66 69 78 65 64 2e | 20 49 66 20 74 68 65 20 |refixed.| If the |
|000021f0| 66 69 72 73 74 20 63 68 | 61 72 61 63 74 65 72 20 |first ch|aracter |
|00002200| 69 6e 20 74 68 65 20 66 | 69 6c 65 20 6e 61 6d 65 |in the f|ile name|
|00002210| 20 69 73 20 27 7c 27 2c | 20 74 68 65 20 20 2a 0a | is '|',| the *.|
|00002220| 58 2a 20 20 20 20 72 65 | 73 74 20 69 73 20 66 65 |X* re|st is fe|
|00002230| 64 20 74 6f 20 22 2f 62 | 69 6e 2f 73 68 22 20 61 |d to "/b|in/sh" a|
|00002240| 6e 64 20 64 61 74 61 20 | 66 72 6f 6d 20 73 74 64 |nd data |from std|
|00002250| 6f 75 74 20 72 65 70 6c | 61 63 65 73 20 74 68 65 |out repl|aces the|
|00002260| 20 69 6e 63 6c 75 64 65 | 09 20 20 20 20 20 20 2a | include|. *|
|00002270| 0a 58 2a 20 20 20 20 6c | 69 6e 65 2e 09 09 09 09 |.X* l|ine.....|
|00002280| 09 09 09 09 20 20 20 20 | 20 20 2a 0a 58 2a 20 09 |.... | *.X* .|
|00002290| 09 09 09 09 09 09 09 09 | 20 20 20 20 20 20 2a 0a |........| *.|
|000022a0| 58 2a 20 20 41 55 54 48 | 4f 52 09 09 09 09 09 09 |X* AUTH|OR......|
|000022b0| 09 09 20 20 20 20 20 20 | 2a 0a 58 2a 20 20 20 20 |.. |*.X* |
|000022c0| 73 74 65 6e 40 65 6e 65 | 61 09 09 09 09 09 09 09 |sten@ene|a.......|
|000022d0| 09 20 20 20 20 20 20 2a | 0a 58 2a 20 09 09 09 09 |. *|.X* ....|
|000022e0| 09 09 09 09 09 20 20 20 | 20 20 20 2a 0a 58 5c 2a |..... | *.X\*|
|000022f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002300| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002310| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002320| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002330| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2f 0a 58 0a |********|****/.X.|
|00002340| 58 2f 2a 0a 58 20 2a 20 | 24 4c 6f 67 3a 09 69 6e |X/*.X * |$Log:.in|
|00002350| 65 6c 69 6d 2e 63 2c 76 | 20 24 0a 58 20 2a 20 0a |elim.c,v| $.X * .|
|00002360| 58 20 2a 20 52 65 76 69 | 73 69 6f 6e 20 31 2e 35 |X * Revi|sion 1.5|
|00002370| 20 20 31 39 38 38 2d 30 | 32 2d 32 39 20 20 30 30 | 1988-0|2-29 00|
|00002380| 3a 33 39 3a 33 38 20 20 | 73 74 65 6e 0a 58 20 2a |:39:38 |sten.X *|
|00002390| 20 62 65 66 6f 72 65 20 | 70 75 62 6c 69 63 20 72 | before |public r|
|000023a0| 65 6c 65 61 73 65 0a 58 | 20 2a 20 0a 58 20 2a 20 |elease.X| * .X * |
|000023b0| 52 65 76 69 73 69 6f 6e | 20 31 2e 34 20 20 31 39 |Revision| 1.4 19|
|000023c0| 38 38 2d 30 32 2d 32 33 | 20 20 31 34 3a 35 34 3a |88-02-23| 14:54:|
|000023d0| 35 38 20 20 73 74 65 6e | 0a 58 20 2a 20 69 6e 63 |58 sten|.X * inc|
|000023e0| 65 6c 69 6d 20 3d 3e 20 | 69 6e 65 6c 69 6d 0a 58 |elim => |inelim.X|
|000023f0| 20 2a 20 0a 58 20 2a 20 | 52 65 76 69 73 69 6f 6e | * .X * |Revision|
|00002400| 20 31 2e 33 20 20 31 39 | 38 37 2d 30 33 2d 30 32 | 1.3 19|87-03-02|
|00002410| 20 20 30 30 3a 34 31 3a | 34 32 20 20 73 74 65 6e | 00:41:|42 sten|
|00002420| 0a 58 20 2a 20 69 6e 63 | 6c 75 73 69 6f 6e 20 6f |.X * inc|lusion o|
|00002430| 66 20 63 6f 6d 6d 61 6e | 64 20 73 74 64 6f 75 74 |f comman|d stdout|
|00002440| 2e 0a 58 20 2a 20 0a 58 | 20 2a 20 52 65 76 69 73 |..X * .X| * Revis|
|00002450| 69 6f 6e 20 31 2e 32 20 | 20 31 39 38 36 2d 31 30 |ion 1.2 | 1986-10|
|00002460| 2d 32 30 20 20 31 36 3a | 34 30 3a 35 37 20 20 73 |-20 16:|40:57 s|
|00002470| 74 65 6e 0a 58 20 2a 20 | 72 65 6c 65 61 73 65 64 |ten.X * |released|
|00002480| 20 74 6f 20 74 68 65 20 | 49 6e 6e 65 72 20 43 69 | to the |Inner Ci|
|00002490| 72 63 6c 65 0a 58 20 2a | 20 0a 58 20 2a 20 52 65 |rcle.X *| .X * Re|
|000024a0| 76 69 73 69 6f 6e 20 31 | 2e 31 20 20 31 39 38 36 |vision 1|.1 1986|
|000024b0| 2d 31 30 2d 30 35 20 20 | 32 33 3a 30 39 3a 33 39 |-10-05 |23:09:39|
|000024c0| 20 20 73 74 65 6e 0a 58 | 20 2a 20 49 6e 69 74 69 | sten.X| * Initi|
|000024d0| 61 6c 20 72 65 76 69 73 | 69 6f 6e 0a 58 20 2a 2f |al revis|ion.X */|
|000024e0| 0a 58 0a 58 23 69 6e 63 | 6c 75 64 65 20 3c 73 74 |.X.X#inc|lude <st|
|000024f0| 64 69 6f 2e 68 3e 0a 58 | 23 69 6e 63 6c 75 64 65 |dio.h>.X|#include|
|00002500| 20 3c 63 74 79 70 65 2e | 68 3e 0a 58 23 69 6e 63 | <ctype.|h>.X#inc|
|00002510| 6c 75 64 65 20 3c 61 73 | 73 65 72 74 2e 68 3e 0a |lude <as|sert.h>.|
|00002520| 58 0a 58 23 69 66 64 65 | 66 20 42 53 44 0a 58 23 |X.X#ifde|f BSD.X#|
|00002530| 69 6e 63 6c 75 64 65 20 | 3c 73 79 73 2f 70 61 72 |include |<sys/par|
|00002540| 61 6d 2e 68 3e 0a 58 23 | 65 6e 64 69 66 0a 58 23 |am.h>.X#|endif.X#|
|00002550| 69 66 64 65 66 20 56 37 | 0a 58 23 64 65 66 69 6e |ifdef V7|.X#defin|
|00002560| 65 20 4d 41 58 50 41 54 | 48 4c 45 4e 20 32 35 36 |e MAXPAT|HLEN 256|
|00002570| 0a 58 23 65 6e 64 69 66 | 0a 58 23 69 66 64 65 66 |.X#endif|.X#ifdef|
|00002580| 20 53 59 53 56 0a 58 23 | 69 6e 63 6c 75 64 65 20 | SYSV.X#|include |
|00002590| 3c 6c 69 6d 69 74 73 2e | 68 3e 0a 58 23 64 65 66 |<limits.|h>.X#def|
|000025a0| 69 6e 65 20 4d 41 58 50 | 41 54 48 4c 45 4e 20 50 |ine MAXP|ATHLEN P|
|000025b0| 41 54 48 5f 4d 41 58 0a | 58 23 65 6e 64 69 66 0a |ATH_MAX.|X#endif.|
|000025c0| 58 0a 58 23 69 66 64 65 | 66 20 53 59 53 56 0a 58 |X.X#ifde|f SYSV.X|
|000025d0| 23 64 65 66 69 6e 65 20 | 72 69 6e 64 65 78 20 73 |#define |rindex s|
|000025e0| 74 72 72 63 68 72 0a 58 | 23 65 6e 64 69 66 0a 58 |trrchr.X|#endif.X|
|000025f0| 0a 58 23 64 65 66 69 6e | 65 20 4c 4c 45 4e 20 32 |.X#defin|e LLEN 2|
|00002600| 35 36 0a 58 0a 65 78 74 | 65 72 6e 20 63 68 61 72 |56.X.ext|ern char|
|00002610| 20 2a 73 74 72 63 61 74 | 28 29 3b 0a 65 78 74 65 | *strcat|();.exte|
|00002620| 72 6e 20 63 68 61 72 20 | 2a 73 74 72 63 70 79 28 |rn char |*strcpy(|
|00002630| 29 3b 0a 65 78 74 65 72 | 6e 20 46 49 4c 45 20 2a |);.exter|n FILE *|
|00002640| 70 6f 70 65 6e 28 29 3b | 0a 65 78 74 65 72 6e 20 |popen();|.extern |
|00002650| 69 6e 74 20 72 69 6e 64 | 65 78 28 29 3b 0a 65 78 |int rind|ex();.ex|
|00002660| 74 65 72 6e 20 76 6f 69 | 64 20 65 78 69 74 28 29 |tern voi|d exit()|
|00002670| 3b 0a 58 0a 58 23 64 65 | 66 69 6e 65 20 53 74 72 |;.X.X#de|fine Str|
|00002680| 63 70 79 20 28 76 6f 69 | 64 29 20 73 74 72 63 70 |cpy (voi|d) strcp|
|00002690| 79 0a 58 23 64 65 66 69 | 6e 65 20 53 74 72 63 61 |y.X#defi|ne Strca|
|000026a0| 74 20 28 76 6f 69 64 29 | 20 73 74 72 63 61 74 0a |t (void)| strcat.|
|000026b0| 58 0a 58 23 64 65 66 69 | 6e 65 20 49 4e 43 4c 55 |X.X#defi|ne INCLU|
|000026c0| 44 45 20 22 69 6e 63 6c | 75 64 65 22 0a 58 0a 63 |DE "incl|ude".X.c|
|000026d0| 68 61 72 20 2a 70 72 6f | 67 6e 61 6d 65 3b 0a 69 |har *pro|gname;.i|
|000026e0| 6e 74 20 76 65 72 62 6f | 73 65 20 3d 20 30 3b 0a |nt verbo|se = 0;.|
|000026f0| 63 68 61 72 20 2a 70 61 | 74 74 65 72 6e 20 3d 20 |char *pa|ttern = |
|00002700| 49 4e 43 4c 55 44 45 3b | 0a 58 0a 58 2f 2a 2a 2a |INCLUDE;|.X.X/***|
|00002710| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002720| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002730| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002740| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 5c |********|*******\|
|00002750| 0a 58 2a 20 09 09 09 09 | 09 09 09 09 20 20 20 2a |.X* ....|.... *|
|00002760| 0a 58 2a 20 20 70 69 70 | 65 66 69 6c 65 3a 20 72 |.X* pip|efile: r|
|00002770| 65 61 64 20 74 68 65 20 | 66 69 6c 65 20 67 69 76 |ead the |file giv|
|00002780| 65 6e 20 61 73 20 70 61 | 72 61 6d 65 74 65 72 20 |en as pa|rameter |
|00002790| 61 6e 64 20 69 6e 76 6f | 6b 65 20 70 69 70 65 66 |and invo|ke pipef|
|000027a0| 69 6c 65 20 20 2a 0a 58 | 2a 20 20 20 20 72 65 63 |ile *.X|* rec|
|000027b0| 75 72 73 69 76 65 6c 79 | 20 6f 6e 20 64 65 74 65 |ursively| on dete|
|000027c0| 63 74 65 64 20 69 6e 63 | 6c 75 64 65 20 66 69 6c |cted inc|lude fil|
|000027d0| 65 73 2e 09 09 09 20 20 | 20 2a 0a 58 2a 20 09 09 |es.... | *.X* ..|
|000027e0| 09 09 09 09 09 09 20 20 | 20 2a 0a 58 5c 2a 2a 2a |...... | *.X\***|
|000027f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002800| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002810| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002820| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2f |********|*******/|
|00002830| 0a 73 74 61 74 69 63 20 | 76 6f 69 64 0a 70 69 70 |.static |void.pip|
|00002840| 65 66 69 6c 65 28 63 66 | 64 2c 20 63 77 64 2c 20 |efile(cf|d, cwd, |
|00002850| 63 66 6e 29 0a 58 46 49 | 4c 45 20 2a 63 66 64 3b |cfn).XFI|LE *cfd;|
|00002860| 0a 63 68 61 72 20 2a 63 | 77 64 2c 20 2a 63 66 6e |.char *c|wd, *cfn|
|00002870| 3b 0a 58 7b 0a 58 20 20 | 20 20 69 6e 74 20 20 20 |;.X{.X | int |
|00002880| 20 20 20 20 20 20 20 20 | 20 20 6c 63 6e 74 20 3d | | lcnt =|
|00002890| 20 30 3b 0a 58 20 20 20 | 20 63 68 61 72 20 20 20 | 0;.X | char |
|000028a0| 20 20 20 20 20 20 20 20 | 20 69 77 64 5b 4d 41 58 | | iwd[MAX|
|000028b0| 50 41 54 48 4c 45 4e 5d | 3b 0a 58 20 20 20 20 63 |PATHLEN]|;.X c|
|000028c0| 68 61 72 20 20 20 20 20 | 20 20 20 20 20 20 20 6c |har | l|
|000028d0| 69 6e 65 5b 4c 4c 45 4e | 5d 3b 0a 58 0a 58 20 20 |ine[LLEN|];.X.X |
|000028e0| 20 20 77 68 69 6c 65 20 | 28 66 67 65 74 73 28 6c | while |(fgets(l|
|000028f0| 69 6e 65 2c 20 4c 4c 45 | 4e 20 2d 20 31 2c 20 63 |ine, LLE|N - 1, c|
|00002900| 66 64 29 20 21 3d 20 30 | 29 0a 58 20 20 20 20 7b |fd) != 0|).X {|
|00002910| 0a 58 09 6c 63 6e 74 2b | 2b 3b 0a 58 09 69 66 20 |.X.lcnt+|+;.X.if |
|00002920| 28 73 74 72 6e 63 6d 70 | 28 6c 69 6e 65 2c 20 70 |(strncmp|(line, p|
|00002930| 61 74 74 65 72 6e 2c 20 | 73 74 72 6c 65 6e 28 70 |attern, |strlen(p|
|00002940| 61 74 74 65 72 6e 29 29 | 20 21 3d 20 30 29 0a 58 |attern))| != 0).X|
|00002950| 09 7b 0a 58 09 20 20 20 | 20 69 66 20 28 76 65 72 |.{.X. | if (ver|
|00002960| 62 6f 73 65 29 0a 58 09 | 09 66 70 72 69 6e 74 66 |bose).X.|.fprintf|
|00002970| 28 73 74 64 6f 75 74 2c | 20 22 25 73 2f 25 73 2c |(stdout,| "%s/%s,|
|00002980| 20 6c 69 6e 65 20 25 64 | 3a 20 22 2c 20 63 77 64 | line %d|: ", cwd|
|00002990| 2c 20 63 66 6e 2c 20 6c | 63 6e 74 29 3b 0a 58 09 |, cfn, l|cnt);.X.|
|000029a0| 20 20 20 20 66 70 75 74 | 73 28 6c 69 6e 65 2c 20 | fput|s(line, |
|000029b0| 73 74 64 6f 75 74 29 3b | 0a 58 09 7d 20 65 6c 73 |stdout);|.X.} els|
|000029c0| 65 0a 58 09 7b 0a 58 09 | 20 20 20 20 46 49 4c 45 |e.X.{.X.| FILE|
|000029d0| 20 20 20 20 20 20 20 20 | 20 20 20 2a 69 66 64 3b | | *ifd;|
|000029e0| 0a 58 09 20 20 20 20 63 | 68 61 72 20 20 20 20 20 |.X. c|har |
|000029f0| 20 20 20 20 20 20 2a 69 | 66 6e 2c 20 2a 70 3b 0a | *i|fn, *p;.|
|00002a00| 58 09 20 20 20 20 63 68 | 61 72 20 20 20 20 20 20 |X. ch|ar |
|00002a10| 20 20 20 20 20 20 70 61 | 74 68 5b 4d 41 58 50 41 | pa|th[MAXPA|
|00002a20| 54 48 4c 45 4e 5d 3b 0a | 58 09 20 20 20 20 63 68 |THLEN];.|X. ch|
|00002a30| 61 72 20 20 20 20 20 20 | 20 20 20 20 20 20 70 70 |ar | pp|
|00002a40| 61 74 68 5b 4d 41 58 50 | 41 54 48 4c 45 4e 5d 3b |ath[MAXP|ATHLEN];|
|00002a50| 0a 58 0a 58 09 20 20 20 | 20 66 6f 72 20 28 70 20 |.X.X. | for (p |
|00002a60| 3d 20 6c 69 6e 65 20 2b | 20 73 74 72 6c 65 6e 28 |= line +| strlen(|
|00002a70| 70 61 74 74 65 72 6e 29 | 3b 20 69 73 73 70 61 63 |pattern)|; isspac|
|00002a80| 65 28 2a 70 29 3b 20 70 | 2b 2b 29 3b 0a 58 09 20 |e(*p); p|++);.X. |
|00002a90| 20 20 20 69 66 20 28 75 | 6e 74 69 6c 64 65 28 70 | if (u|ntilde(p|
|00002aa0| 70 61 74 68 2c 20 70 29 | 20 21 3d 20 30 29 0a 58 |path, p)| != 0).X|
|00002ab0| 09 20 20 20 20 7b 0a 58 | 09 09 66 70 72 69 6e 74 |. {.X|..fprint|
|00002ac0| 66 28 73 74 64 65 72 72 | 2c 20 22 25 73 2f 25 73 |f(stderr|, "%s/%s|
|00002ad0| 2c 20 6c 69 6e 65 20 25 | 64 3a 20 25 73 3a 20 25 |, line %|d: %s: %|
|00002ae0| 73 5c 6e 22 2c 0a 58 09 | 09 09 63 77 64 2c 20 63 |s\n",.X.|..cwd, c|
|00002af0| 66 6e 2c 20 6c 63 6e 74 | 2c 20 70 72 6f 67 6e 61 |fn, lcnt|, progna|
|00002b00| 6d 65 2c 20 22 43 61 6e | 6e 6f 74 20 75 6e 74 69 |me, "Can|not unti|
|00002b10| 6c 64 65 22 29 3b 0a 58 | 09 09 65 78 69 74 28 31 |lde");.X|..exit(1|
|00002b20| 29 3b 0a 58 09 20 20 20 | 20 7d 0a 58 09 20 20 20 |);.X. | }.X. |
|00002b30| 20 69 66 20 28 70 70 61 | 74 68 5b 30 5d 20 3d 3d | if (ppa|th[0] ==|
|00002b40| 20 27 7c 27 29 0a 58 09 | 20 20 20 20 7b 0a 58 09 | '|').X.| {.X.|
|00002b50| 09 70 70 61 74 68 5b 73 | 74 72 6c 65 6e 28 70 70 |.ppath[s|trlen(pp|
|00002b60| 61 74 68 29 20 2d 20 31 | 5d 20 3d 20 27 5c 30 27 |ath) - 1|] = '\0'|
|00002b70| 3b 0a 58 09 09 66 6f 72 | 20 28 70 20 3d 20 70 70 |;.X..for| (p = pp|
|00002b80| 61 74 68 20 2b 20 31 3b | 20 69 73 73 70 61 63 65 |ath + 1;| isspace|
|00002b90| 28 2a 70 29 3b 20 70 2b | 2b 29 3b 0a 58 09 09 69 |(*p); p+|+);.X..i|
|00002ba0| 66 20 28 28 69 66 64 20 | 3d 20 70 6f 70 65 6e 28 |f ((ifd |= popen(|
|00002bb0| 70 2c 20 22 72 22 29 29 | 20 3d 3d 20 28 46 49 4c |p, "r"))| == (FIL|
|00002bc0| 45 20 2a 29 20 4e 55 4c | 4c 29 0a 58 09 09 7b 0a |E *) NUL|L).X..{.|
|00002bd0| 58 09 09 20 20 20 20 66 | 70 72 69 6e 74 66 28 73 |X.. f|printf(s|
|00002be0| 74 64 65 72 72 2c 20 22 | 25 73 3a 20 43 61 6e 6e |tderr, "|%s: Cann|
|00002bf0| 6f 74 20 70 6f 70 65 6e | 20 25 73 5c 6e 22 2c 20 |ot popen| %s\n", |
|00002c00| 70 72 6f 67 6e 61 6d 65 | 2c 20 70 70 61 74 68 29 |progname|, ppath)|
|00002c10| 3b 0a 58 09 09 20 20 20 | 20 65 78 69 74 28 31 29 |;.X.. | exit(1)|
|00002c20| 3b 0a 58 09 09 7d 0a 58 | 09 09 70 69 70 65 66 69 |;.X..}.X|..pipefi|
|00002c30| 6c 65 28 69 66 64 2c 20 | 63 77 64 2c 20 70 70 61 |le(ifd, |cwd, ppa|
|00002c40| 74 68 29 3b 0a 58 09 09 | 28 76 6f 69 64 29 20 70 |th);.X..|(void) p|
|00002c50| 63 6c 6f 73 65 28 69 66 | 64 29 3b 0a 58 09 20 20 |close(if|d);.X. |
|00002c60| 20 20 7d 20 65 6c 73 65 | 0a 58 09 20 20 20 20 7b | } else|.X. {|
|00002c70| 0a 58 09 09 69 66 20 28 | 28 75 6e 65 6e 76 28 70 |.X..if (|(unenv(p|
|00002c80| 61 74 68 2c 20 70 70 61 | 74 68 29 29 20 21 3d 20 |ath, ppa|th)) != |
|00002c90| 30 29 0a 58 09 09 7b 0a | 58 09 09 20 20 20 20 66 |0).X..{.|X.. f|
|00002ca0| 70 72 69 6e 74 66 28 73 | 74 64 65 72 72 2c 20 22 |printf(s|tderr, "|
|00002cb0| 25 73 2f 25 73 2c 20 6c | 69 6e 65 20 25 64 3a 20 |%s/%s, l|ine %d: |
|00002cc0| 25 73 3a 20 25 73 5c 6e | 22 2c 0a 58 09 09 09 20 |%s: %s\n|",.X... |
|00002cd0| 20 20 20 63 77 64 2c 20 | 63 66 6e 2c 20 6c 63 6e | cwd, |cfn, lcn|
|00002ce0| 74 2c 20 70 72 6f 67 6e | 61 6d 65 2c 20 22 43 61 |t, progn|ame, "Ca|
|00002cf0| 6e 6e 6f 74 20 75 6e 65 | 6e 76 22 29 3b 0a 58 09 |nnot une|nv");.X.|
|00002d00| 09 20 20 20 20 65 78 69 | 74 28 31 29 3b 0a 58 09 |. exi|t(1);.X.|
|00002d10| 09 7d 0a 58 09 09 69 66 | 20 28 70 61 74 68 5b 30 |.}.X..if| (path[0|
|00002d20| 5d 20 3d 3d 20 27 2f 27 | 29 0a 58 09 09 20 20 20 |] == '/'|).X.. |
|00002d30| 20 53 74 72 63 70 79 28 | 69 77 64 2c 20 70 61 74 | Strcpy(|iwd, pat|
|00002d40| 68 29 3b 0a 58 09 09 65 | 6c 73 65 0a 58 09 09 7b |h);.X..e|lse.X..{|
|00002d50| 0a 58 09 09 20 20 20 20 | 53 74 72 63 70 79 28 69 |.X.. |Strcpy(i|
|00002d60| 77 64 2c 20 63 77 64 29 | 3b 0a 58 09 09 20 20 20 |wd, cwd)|;.X.. |
|00002d70| 20 53 74 72 63 61 74 28 | 69 77 64 2c 20 22 2f 22 | Strcat(|iwd, "/"|
|00002d80| 29 3b 0a 58 09 09 20 20 | 20 20 53 74 72 63 61 74 |);.X.. | Strcat|
|00002d90| 28 69 77 64 2c 20 70 61 | 74 68 29 3b 0a 58 09 09 |(iwd, pa|th);.X..|
|00002da0| 7d 0a 58 09 09 69 77 64 | 5b 73 74 72 6c 65 6e 28 |}.X..iwd|[strlen(|
|00002db0| 69 77 64 29 20 2d 20 31 | 5d 20 3d 20 27 5c 30 27 |iwd) - 1|] = '\0'|
|00002dc0| 3b 0a 58 09 09 69 66 20 | 28 28 69 66 64 20 3d 20 |;.X..if |((ifd = |
|00002dd0| 66 6f 70 65 6e 28 69 77 | 64 2c 20 22 72 22 29 29 |fopen(iw|d, "r"))|
|00002de0| 20 3d 3d 20 28 46 49 4c | 45 20 2a 29 20 4e 55 4c | == (FIL|E *) NUL|
|00002df0| 4c 29 0a 58 09 09 7b 0a | 58 09 09 20 20 20 20 66 |L).X..{.|X.. f|
|00002e00| 70 72 69 6e 74 66 28 73 | 74 64 65 72 72 2c 20 22 |printf(s|tderr, "|
|00002e10| 25 73 3a 20 43 61 6e 6e | 6f 74 20 6f 70 65 6e 20 |%s: Cann|ot open |
|00002e20| 25 73 5c 6e 22 2c 20 70 | 72 6f 67 6e 61 6d 65 2c |%s\n", p|rogname,|
|00002e30| 20 69 77 64 29 3b 0a 58 | 09 09 20 20 20 20 65 78 | iwd);.X|.. ex|
|00002e40| 69 74 28 31 29 3b 0a 58 | 09 09 7d 0a 58 09 09 69 |it(1);.X|..}.X..i|
|00002e50| 66 6e 20 3d 20 28 63 68 | 61 72 20 2a 29 20 72 69 |fn = (ch|ar *) ri|
|00002e60| 6e 64 65 78 28 69 77 64 | 2c 20 27 2f 27 29 3b 0a |ndex(iwd|, '/');.|
|00002e70| 58 09 09 2a 69 66 6e 2b | 2b 20 3d 20 27 5c 30 27 |X..*ifn+|+ = '\0'|
|00002e80| 3b 0a 58 09 09 70 69 70 | 65 66 69 6c 65 28 69 66 |;.X..pip|efile(if|
|00002e90| 64 2c 20 69 77 64 2c 20 | 69 66 6e 29 3b 0a 58 09 |d, iwd, |ifn);.X.|
|00002ea0| 09 28 76 6f 69 64 29 20 | 66 63 6c 6f 73 65 28 69 |.(void) |fclose(i|
|00002eb0| 66 64 29 3b 0a 58 09 20 | 20 20 20 7d 0a 58 09 7d |fd);.X. | }.X.}|
|00002ec0| 0a 58 20 20 20 20 7d 0a | 58 7d 0a 58 0a 58 23 69 |.X }.|X}.X.X#i|
|00002ed0| 66 64 65 66 20 56 37 0a | 58 2f 2a 2a 2a 2a 2a 2a |fdef V7.|X/******|
|00002ee0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002ef0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002f00| 2a 2a 2a 2a 2a 2a 2a 2a | 5c 0a 58 2a 20 09 09 09 |********|\.X* ...|
|00002f10| 09 09 20 20 20 20 20 20 | 20 2a 0a 58 2a 20 6d 79 |.. | *.X* my|
|00002f20| 67 65 74 77 64 20 72 65 | 74 72 69 65 76 65 73 20 |getwd re|trieves |
|00002f30| 63 75 72 72 65 6e 74 20 | 77 6f 72 6b 69 6e 67 20 |current |working |
|00002f40| 64 69 72 65 63 74 6f 72 | 79 20 20 2a 0a 58 2a 20 |director|y *.X* |
|00002f50| 09 09 09 09 09 20 20 20 | 20 20 20 20 2a 0a 58 5c |..... | *.X\|
|00002f60| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002f70| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002f80| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2f 0a |********|******/.|
|00002f90| 73 74 61 74 69 63 20 76 | 6f 69 64 0a 6d 79 67 65 |static v|oid.myge|
|00002fa0| 74 77 64 28 74 6f 29 0a | 63 68 61 72 20 2a 74 6f |twd(to).|char *to|
|00002fb0| 3b 0a 58 7b 0a 58 20 20 | 20 20 46 49 4c 45 20 2a |;.X{.X | FILE *|
|00002fc0| 70 77 64 66 64 3b 0a 58 | 20 20 20 20 63 68 61 72 |pwdfd;.X| char|
|00002fd0| 20 2a 69 3b 0a 58 0a 58 | 20 20 20 20 70 77 64 66 | *i;.X.X| pwdf|
|00002fe0| 64 20 3d 20 70 6f 70 65 | 6e 20 28 22 2f 62 69 6e |d = pope|n ("/bin|
|00002ff0| 2f 70 77 64 5c 6e 22 29 | 3b 0a 58 20 20 20 20 61 |/pwd\n")|;.X a|
|00003000| 73 73 65 72 74 20 28 70 | 77 64 66 64 20 21 3d 20 |ssert (p|wdfd != |
|00003010| 4e 55 4c 4c 29 3b 0a 58 | 20 20 20 20 69 20 3d 20 |NULL);.X| i = |
|00003020| 66 67 65 74 73 20 28 74 | 6f 2c 20 4d 41 58 50 41 |fgets (t|o, MAXPA|
|00003030| 54 48 4c 45 4e 2c 20 70 | 77 64 66 64 29 3b 0a 58 |THLEN, p|wdfd);.X|
|00003040| 20 20 20 20 61 73 73 65 | 72 74 20 28 69 20 21 3d | asse|rt (i !=|
|00003050| 20 4e 55 4c 4c 29 3b 0a | 58 20 20 20 20 70 63 6c | NULL);.|X pcl|
|00003060| 6f 73 65 20 28 70 77 64 | 66 64 29 3b 0a 58 20 20 |ose (pwd|fd);.X |
|00003070| 20 20 74 6f 5b 73 74 72 | 6c 65 6e 20 28 74 6f 29 | to[str|len (to)|
|00003080| 20 2d 20 31 5d 20 3d 20 | 27 5c 30 27 3b 0a 58 7d | - 1] = |'\0';.X}|
|00003090| 0a 58 23 65 6e 64 69 66 | 0a 58 2f 2a 2a 2a 2a 2a |.X#endif|.X/*****|
|000030a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000030b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000030c0| 2a 2a 2a 2a 5c 0a 58 2a | 20 09 09 09 09 09 20 20 |****\.X*| ..... |
|000030d0| 2a 0a 58 2a 20 20 75 73 | 61 67 65 3a 20 64 69 73 |*.X* us|age: dis|
|000030e0| 70 6c 61 79 20 63 6f 72 | 72 65 63 74 20 75 73 61 |play cor|rect usa|
|000030f0| 67 65 20 61 6e 64 20 65 | 78 69 74 20 20 2a 0a 58 |ge and e|xit *.X|
|00003100| 2a 20 09 09 09 09 09 20 | 20 2a 0a 58 5c 2a 2a 2a |* ..... | *.X\***|
|00003110| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003120| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003130| 2a 2a 2a 2a 2a 2a 2f 0a | 73 74 61 74 69 63 20 76 |******/.|static v|
|00003140| 6f 69 64 0a 75 73 61 67 | 65 28 29 0a 58 7b 0a 58 |oid.usag|e().X{.X|
|00003150| 20 20 20 20 66 70 72 69 | 6e 74 66 28 73 74 64 65 | fpri|ntf(stde|
|00003160| 72 72 2c 20 22 55 73 61 | 67 65 3a 20 25 73 20 5b |rr, "Usa|ge: %s [|
|00003170| 2d 76 5d 20 5b 2d 70 20 | 70 61 74 74 65 72 6e 5d |-v] [-p |pattern]|
|00003180| 20 5b 66 69 6c 65 73 5d | 5c 6e 22 2c 20 70 72 6f | [files]|\n", pro|
|00003190| 67 6e 61 6d 65 29 3b 0a | 58 20 20 20 20 65 78 69 |gname);.|X exi|
|000031a0| 74 28 31 29 3b 0a 58 7d | 0a 58 0a 76 6f 69 64 0a |t(1);.X}|.X.void.|
|000031b0| 6d 61 69 6e 20 28 61 72 | 67 63 2c 20 61 72 67 76 |main (ar|gc, argv|
|000031c0| 29 0a 69 6e 74 09 61 72 | 67 63 3b 0a 63 68 61 72 |).int.ar|gc;.char|
|000031d0| 09 2a 61 72 67 76 5b 5d | 3b 0a 58 7b 0a 58 20 20 |.*argv[]|;.X{.X |
|000031e0| 20 20 63 68 61 72 20 20 | 20 20 20 20 20 20 20 20 | char | |
|000031f0| 20 20 73 77 3b 0a 58 20 | 20 20 20 65 78 74 65 72 | sw;.X | exter|
|00003200| 6e 20 69 6e 74 20 20 20 | 20 20 20 6f 70 74 69 6e |n int | optin|
|00003210| 64 3b 0a 58 20 20 20 20 | 65 78 74 65 72 6e 20 63 |d;.X |extern c|
|00003220| 68 61 72 20 20 20 20 2a | 6f 70 74 61 72 67 3b 0a |har *|optarg;.|
|00003230| 58 20 20 20 20 63 68 61 | 72 20 20 20 20 20 20 20 |X cha|r |
|00003240| 20 20 20 20 20 64 69 72 | 5b 4d 41 58 50 41 54 48 | dir|[MAXPATH|
|00003250| 4c 45 4e 5d 3b 0a 58 0a | 58 20 20 20 20 69 66 20 |LEN];.X.|X if |
|00003260| 28 28 70 72 6f 67 6e 61 | 6d 65 20 3d 20 28 63 68 |((progna|me = (ch|
|00003270| 61 72 20 2a 29 72 69 6e | 64 65 78 28 61 72 67 76 |ar *)rin|dex(argv|
|00003280| 5b 30 5d 2c 20 27 2f 27 | 29 29 20 3d 3d 20 30 29 |[0], '/'|)) == 0)|
|00003290| 0a 58 09 70 72 6f 67 6e | 61 6d 65 20 3d 20 61 72 |.X.progn|ame = ar|
|000032a0| 67 76 5b 30 5d 3b 0a 58 | 20 20 20 20 77 68 69 6c |gv[0];.X| whil|
|000032b0| 65 20 28 28 73 77 20 3d | 20 67 65 74 6f 70 74 28 |e ((sw =| getopt(|
|000032c0| 61 72 67 63 2c 20 61 72 | 67 76 2c 20 22 76 70 3a |argc, ar|gv, "vp:|
|000032d0| 22 29 29 20 21 3d 20 28 | 63 68 61 72 29 20 45 4f |")) != (|char) EO|
|000032e0| 46 29 0a 58 09 73 77 69 | 74 63 68 20 28 73 77 29 |F).X.swi|tch (sw)|
|000032f0| 0a 58 09 7b 0a 58 09 63 | 61 73 65 20 27 76 27 3a |.X.{.X.c|ase 'v':|
|00003300| 0a 58 09 20 20 20 20 76 | 65 72 62 6f 73 65 2b 2b |.X. v|erbose++|
|00003310| 3b 0a 58 09 20 20 20 20 | 62 72 65 61 6b 3b 0a 58 |;.X. |break;.X|
|00003320| 09 63 61 73 65 20 27 70 | 27 3a 0a 58 09 20 20 20 |.case 'p|':.X. |
|00003330| 20 70 61 74 74 65 72 6e | 20 3d 20 6f 70 74 61 72 | pattern| = optar|
|00003340| 67 3b 0a 58 09 20 20 20 | 20 62 72 65 61 6b 3b 0a |g;.X. | break;.|
|00003350| 58 09 63 61 73 65 20 27 | 3f 27 3a 0a 58 09 20 20 |X.case '|?':.X. |
|00003360| 20 20 75 73 61 67 65 28 | 29 3b 0a 58 09 20 20 20 | usage(|);.X. |
|00003370| 20 62 72 65 61 6b 3b 0a | 58 09 7d 0a 58 23 69 66 | break;.|X.}.X#if|
|00003380| 64 65 66 20 42 53 44 0a | 58 20 20 20 20 28 76 6f |def BSD.|X (vo|
|00003390| 69 64 29 20 67 65 74 77 | 64 28 64 69 72 29 3b 0a |id) getw|d(dir);.|
|000033a0| 58 23 65 6e 64 69 66 0a | 58 23 69 66 64 65 66 20 |X#endif.|X#ifdef |
|000033b0| 56 37 0a 58 20 20 20 20 | 6d 79 67 65 74 77 64 28 |V7.X |mygetwd(|
|000033c0| 64 69 72 29 3b 0a 58 23 | 65 6e 64 69 66 0a 58 23 |dir);.X#|endif.X#|
|000033d0| 69 66 64 65 66 20 53 59 | 53 56 0a 58 20 20 20 20 |ifdef SY|SV.X |
|000033e0| 28 76 6f 69 64 29 20 67 | 65 74 63 77 64 28 64 69 |(void) g|etcwd(di|
|000033f0| 72 2c 20 4d 41 58 50 41 | 54 48 4c 45 4e 29 3b 0a |r, MAXPA|THLEN);.|
|00003400| 58 23 65 6e 64 69 66 0a | 58 20 20 20 20 69 66 20 |X#endif.|X if |
|00003410| 28 6f 70 74 69 6e 64 20 | 3d 3d 20 61 72 67 63 29 |(optind |== argc)|
|00003420| 0a 58 09 70 69 70 65 66 | 69 6c 65 28 73 74 64 69 |.X.pipef|ile(stdi|
|00003430| 6e 2c 20 64 69 72 2c 20 | 22 22 29 3b 0a 58 20 20 |n, dir, |"");.X |
|00003440| 20 20 65 6c 73 65 0a 58 | 09 66 6f 72 20 28 3b 20 | else.X|.for (; |
|00003450| 6f 70 74 69 6e 64 20 3c | 20 61 72 67 63 3b 20 6f |optind <| argc; o|
|00003460| 70 74 69 6e 64 2b 2b 29 | 0a 58 09 7b 0a 58 09 20 |ptind++)|.X.{.X. |
|00003470| 20 20 20 46 49 4c 45 20 | 20 20 20 20 20 20 20 20 | FILE | |
|00003480| 20 20 2a 66 64 3b 0a 58 | 09 20 20 20 20 63 68 61 | *fd;.X|. cha|
|00003490| 72 20 20 20 20 20 20 20 | 20 20 20 20 2a 66 69 6c |r | *fil|
|000034a0| 65 3b 0a 58 09 20 20 20 | 20 63 68 61 72 20 20 20 |e;.X. | char |
|000034b0| 20 20 20 20 20 20 20 20 | 20 70 61 74 68 5b 4d 41 | | path[MA|
|000034c0| 58 50 41 54 48 4c 45 4e | 5d 3b 0a 58 09 20 20 20 |XPATHLEN|];.X. |
|000034d0| 20 63 68 61 72 20 20 20 | 20 20 20 20 20 20 20 20 | char | |
|000034e0| 20 70 70 61 74 68 5b 4d | 41 58 50 41 54 48 4c 45 | ppath[M|AXPATHLE|
|000034f0| 4e 5d 3b 0a 58 0a 58 09 | 20 20 20 20 69 66 20 28 |N];.X.X.| if (|
|00003500| 73 74 72 63 6d 70 28 61 | 72 67 76 5b 6f 70 74 69 |strcmp(a|rgv[opti|
|00003510| 6e 64 5d 2c 20 22 2d 22 | 29 20 3d 3d 20 30 29 0a |nd], "-"|) == 0).|
|00003520| 58 09 09 70 69 70 65 66 | 69 6c 65 28 73 74 64 69 |X..pipef|ile(stdi|
|00003530| 6e 2c 20 64 69 72 2c 20 | 22 22 29 3b 0a 58 09 20 |n, dir, |"");.X. |
|00003540| 20 20 20 65 6c 73 65 0a | 58 09 20 20 20 20 7b 0a | else.|X. {.|
|00003550| 58 09 09 69 66 20 28 75 | 6e 74 69 6c 64 65 28 70 |X..if (u|ntilde(p|
|00003560| 70 61 74 68 2c 20 61 72 | 67 76 5b 6f 70 74 69 6e |path, ar|gv[optin|
|00003570| 64 5d 29 20 21 3d 20 30 | 29 0a 58 09 09 7b 0a 58 |d]) != 0|).X..{.X|
|00003580| 09 09 20 20 20 20 66 70 | 72 69 6e 74 66 28 73 74 |.. fp|rintf(st|
|00003590| 64 65 72 72 2c 20 22 25 | 73 3a 20 25 73 3a 20 25 |derr, "%|s: %s: %|
|000035a0| 73 5c 6e 22 2c 0a 58 09 | 09 09 20 20 20 20 70 72 |s\n",.X.|.. pr|
|000035b0| 6f 67 6e 61 6d 65 2c 20 | 22 43 61 6e 6e 6f 74 20 |ogname, |"Cannot |
|000035c0| 75 6e 74 69 6c 64 65 22 | 2c 20 61 72 67 76 5b 6f |untilde"|, argv[o|
|000035d0| 70 74 69 6e 64 5d 29 3b | 0a 58 09 09 20 20 20 20 |ptind]);|.X.. |
|000035e0| 65 78 69 74 28 31 29 3b | 0a 58 09 09 7d 0a 58 09 |exit(1);|.X..}.X.|
|000035f0| 09 69 66 20 28 28 75 6e | 65 6e 76 28 70 61 74 68 |.if ((un|env(path|
|00003600| 2c 20 70 70 61 74 68 29 | 29 20 21 3d 20 30 29 0a |, ppath)|) != 0).|
|00003610| 58 09 09 7b 0a 58 09 09 | 20 20 20 20 66 70 72 69 |X..{.X..| fpri|
|00003620| 6e 74 66 28 73 74 64 65 | 72 72 2c 20 22 25 73 3a |ntf(stde|rr, "%s:|
|00003630| 20 25 73 3a 20 25 73 5c | 6e 22 2c 0a 58 09 09 09 | %s: %s\|n",.X...|
|00003640| 20 20 20 20 70 72 6f 67 | 6e 61 6d 65 2c 20 22 43 | prog|name, "C|
|00003650| 61 6e 6e 6f 74 20 75 6e | 65 6e 76 22 2c 20 61 72 |annot un|env", ar|
|00003660| 67 76 5b 6f 70 74 69 6e | 64 5d 29 3b 0a 58 09 09 |gv[optin|d]);.X..|
|00003670| 20 20 20 20 65 78 69 74 | 28 31 29 3b 0a 58 09 09 | exit|(1);.X..|
|00003680| 7d 0a 58 09 09 69 66 20 | 28 70 61 74 68 5b 30 5d |}.X..if |(path[0]|
|00003690| 20 3d 3d 20 27 2f 27 29 | 0a 58 09 09 20 20 20 20 | == '/')|.X.. |
|000036a0| 53 74 72 63 70 79 28 64 | 69 72 2c 20 70 61 74 68 |Strcpy(d|ir, path|
|000036b0| 29 3b 0a 58 09 09 65 6c | 73 65 0a 58 09 09 7b 0a |);.X..el|se.X..{.|
|000036c0| 58 09 09 20 20 20 20 69 | 66 20 28 64 69 72 5b 73 |X.. i|f (dir[s|
|000036d0| 74 72 6c 65 6e 28 64 69 | 72 29 20 2d 20 31 5d 20 |trlen(di|r) - 1] |
|000036e0| 21 3d 20 27 2f 27 29 0a | 58 09 09 09 53 74 72 63 |!= '/').|X...Strc|
|000036f0| 61 74 28 64 69 72 2c 20 | 22 2f 22 29 3b 0a 58 09 |at(dir, |"/");.X.|
|00003700| 09 20 20 20 20 53 74 72 | 63 61 74 28 64 69 72 2c |. Str|cat(dir,|
|00003710| 20 70 61 74 68 29 3b 0a | 58 09 09 7d 0a 58 09 09 | path);.|X..}.X..|
|00003720| 69 66 20 28 28 66 64 20 | 3d 20 66 6f 70 65 6e 28 |if ((fd |= fopen(|
|00003730| 64 69 72 2c 20 22 72 22 | 29 29 20 3d 3d 20 28 46 |dir, "r"|)) == (F|
|00003740| 49 4c 45 20 2a 29 20 4e | 55 4c 4c 29 0a 58 09 09 |ILE *) N|ULL).X..|
|00003750| 7b 0a 58 09 09 20 20 20 | 20 66 70 72 69 6e 74 66 |{.X.. | fprintf|
|00003760| 28 73 74 64 65 72 72 2c | 20 22 25 73 3a 20 43 61 |(stderr,| "%s: Ca|
|00003770| 6e 6e 6f 74 20 6f 70 65 | 6e 20 25 73 5c 6e 22 2c |nnot ope|n %s\n",|
|00003780| 20 70 72 6f 67 6e 61 6d | 65 2c 20 64 69 72 29 3b | prognam|e, dir);|
|00003790| 0a 58 09 09 20 20 20 20 | 65 78 69 74 28 31 29 3b |.X.. |exit(1);|
|000037a0| 0a 58 09 09 7d 0a 58 09 | 09 66 69 6c 65 20 3d 20 |.X..}.X.|.file = |
|000037b0| 28 63 68 61 72 20 2a 29 | 20 72 69 6e 64 65 78 28 |(char *)| rindex(|
|000037c0| 64 69 72 2c 20 27 2f 27 | 29 3b 0a 58 09 09 2a 66 |dir, '/'|);.X..*f|
|000037d0| 69 6c 65 2b 2b 20 3d 20 | 27 5c 30 27 3b 0a 58 09 |ile++ = |'\0';.X.|
|000037e0| 09 70 69 70 65 66 69 6c | 65 28 66 64 2c 20 64 69 |.pipefil|e(fd, di|
|000037f0| 72 2c 20 66 69 6c 65 29 | 3b 0a 58 09 09 28 76 6f |r, file)|;.X..(vo|
|00003800| 69 64 29 20 66 63 6c 6f | 73 65 28 66 64 29 3b 0a |id) fclo|se(fd);.|
|00003810| 58 09 20 20 20 20 7d 0a | 58 09 7d 0a 58 20 20 20 |X. }.|X.}.X |
|00003820| 20 65 78 69 74 28 30 29 | 3b 0a 58 20 20 20 20 2f | exit(0)|;.X /|
|00003830| 2a 20 4e 4f 54 52 45 41 | 43 48 45 44 20 2a 2f 0a |* NOTREA|CHED */.|
|00003840| 58 7d 0a 45 4e 44 5f 4f | 46 5f 46 49 4c 45 0a 69 |X}.END_O|F_FILE.i|
|00003850| 66 20 74 65 73 74 20 36 | 35 37 31 20 2d 6e 65 20 |f test 6|571 -ne |
|00003860| 60 77 63 20 2d 63 20 3c | 27 69 6e 65 6c 69 6d 2e |`wc -c <|'inelim.|
|00003870| 63 27 60 3b 20 74 68 65 | 6e 0a 20 20 20 20 65 63 |c'`; the|n. ec|
|00003880| 68 6f 20 73 68 61 72 3a | 20 5c 22 27 69 6e 65 6c |ho shar:| \"'inel|
|00003890| 69 6d 2e 63 27 5c 22 20 | 75 6e 70 61 63 6b 65 64 |im.c'\" |unpacked|
|000038a0| 20 77 69 74 68 20 77 72 | 6f 6e 67 20 73 69 7a 65 | with wr|ong size|
|000038b0| 21 0a 66 69 0a 23 20 65 | 6e 64 20 6f 66 20 27 69 |!.fi.# e|nd of 'i|
|000038c0| 6e 65 6c 69 6d 2e 63 27 | 0a 66 69 0a 69 66 20 74 |nelim.c'|.fi.if t|
|000038d0| 65 73 74 20 2d 66 20 27 | 75 6e 65 6e 76 2e 63 27 |est -f '|unenv.c'|
|000038e0| 20 2d 61 20 22 24 7b 31 | 7d 22 20 21 3d 20 22 2d | -a "${1|}" != "-|
|000038f0| 63 22 20 3b 20 74 68 65 | 6e 20 0a 20 20 65 63 68 |c" ; the|n . ech|
|00003900| 6f 20 73 68 61 72 3a 20 | 57 69 6c 6c 20 6e 6f 74 |o shar: |Will not|
|00003910| 20 63 6c 6f 62 62 65 72 | 20 65 78 69 73 74 69 6e | clobber| existin|
|00003920| 67 20 66 69 6c 65 20 5c | 22 27 75 6e 65 6e 76 2e |g file \|"'unenv.|
|00003930| 63 27 5c 22 0a 65 6c 73 | 65 0a 65 63 68 6f 20 73 |c'\".els|e.echo s|
|00003940| 68 61 72 3a 20 45 78 74 | 72 61 63 74 69 6e 67 20 |har: Ext|racting |
|00003950| 5c 22 27 75 6e 65 6e 76 | 2e 63 27 5c 22 20 5c 28 |\"'unenv|.c'\" \(|
|00003960| 31 36 39 32 20 63 68 61 | 72 61 63 74 65 72 73 5c |1692 cha|racters\|
|00003970| 29 0a 73 65 64 20 22 73 | 2f 5e 58 2f 2f 22 20 3e |).sed "s|/^X//" >|
|00003980| 27 75 6e 65 6e 76 2e 63 | 27 20 3c 3c 27 45 4e 44 |'unenv.c|' <<'END|
|00003990| 5f 4f 46 5f 46 49 4c 45 | 27 0a 58 2f 2a 20 4c 49 |_OF_FILE|'.X/* LI|
|000039a0| 4e 54 4c 49 42 52 41 52 | 59 20 2a 2f 0a 58 0a 58 |NTLIBRAR|Y */.X.X|
|000039b0| 23 69 66 6e 64 65 66 20 | 6c 69 6e 74 0a 73 74 61 |#ifndef |lint.sta|
|000039c0| 74 69 63 20 63 68 61 72 | 20 2a 52 43 53 69 64 20 |tic char| *RCSid |
|000039d0| 3d 20 22 24 48 65 61 64 | 65 72 3a 20 75 6e 65 6e |= "$Head|er: unen|
|000039e0| 76 2e 63 2c 76 20 31 2e | 31 20 31 39 38 38 2d 30 |v.c,v 1.|1 1988-0|
|000039f0| 32 2d 32 39 20 30 30 3a | 34 31 3a 32 33 20 73 74 |2-29 00:|41:23 st|
|00003a00| 65 6e 20 45 78 70 20 24 | 22 3b 0a 58 23 65 6e 64 |en Exp $|";.X#end|
|00003a10| 69 66 0a 58 0a 58 2f 2a | 0a 58 20 2a 20 24 4c 6f |if.X.X/*|.X * $Lo|
|00003a20| 67 3a 09 75 6e 65 6e 76 | 2e 63 2c 76 20 24 0a 58 |g:.unenv|.c,v $.X|
|00003a30| 20 2a 20 0a 58 20 2a 20 | 52 65 76 69 73 69 6f 6e | * .X * |Revision|
|00003a40| 20 31 2e 31 20 20 31 39 | 38 38 2d 30 32 2d 32 39 | 1.1 19|88-02-29|
|00003a50| 20 20 30 30 3a 34 31 3a | 32 33 20 20 73 74 65 6e | 00:41:|23 sten|
|00003a60| 0a 58 20 2a 20 49 6e 69 | 74 69 61 6c 20 72 65 76 |.X * Ini|tial rev|
|00003a70| 69 73 69 6f 6e 0a 58 20 | 2a 20 0a 58 20 2a 20 52 |ision.X |* .X * R|
|00003a80| 65 76 69 73 69 6f 6e 20 | 31 2e 31 20 20 31 39 38 |evision |1.1 198|
|00003a90| 36 2d 31 30 2d 32 30 20 | 20 31 36 3a 35 31 3a 32 |6-10-20 | 16:51:2|
|00003aa0| 32 20 20 73 74 65 6e 0a | 58 20 2a 20 49 6e 69 74 |2 sten.|X * Init|
|00003ab0| 69 61 6c 20 72 65 76 69 | 73 69 0a 58 20 2a 2f 0a |ial revi|si.X */.|
|00003ac0| 58 0a 58 23 69 6e 63 6c | 75 64 65 20 3c 73 74 64 |X.X#incl|ude <std|
|00003ad0| 69 6f 2e 68 3e 0a 58 23 | 69 6e 63 6c 75 64 65 20 |io.h>.X#|include |
|00003ae0| 3c 63 74 79 70 65 2e 68 | 3e 0a 58 23 69 6e 63 6c |<ctype.h|>.X#incl|
|00003af0| 75 64 65 20 3c 70 77 64 | 2e 68 3e 0a 58 23 64 65 |ude <pwd|.h>.X#de|
|00003b00| 66 69 6e 65 20 53 74 72 | 63 70 79 20 28 76 6f 69 |fine Str|cpy (voi|
|00003b10| 64 29 20 73 74 72 63 70 | 79 0a 58 23 64 65 66 69 |d) strcp|y.X#defi|
|00003b20| 6e 65 20 53 74 72 63 61 | 74 20 28 76 6f 69 64 29 |ne Strca|t (void)|
|00003b30| 20 73 74 72 63 61 74 0a | 58 0a 58 2f 2a 2a 2a 2a | strcat.|X.X/****|
|00003b40| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003b50| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003b60| 2a 2a 2a 2a 5c 0a 58 2a | 20 09 09 09 09 09 20 2a |****\.X*| ..... *|
|00003b70| 0a 58 2a 20 20 75 6e 74 | 69 6c 64 65 3a 20 70 65 |.X* unt|ilde: pe|
|00003b80| 72 66 6f 72 6d 20 74 69 | 6c 64 65 20 73 75 62 73 |rform ti|lde subs|
|00003b90| 74 69 74 75 74 69 6f 6e | 2e 09 20 2a 0a 58 2a 20 |titution|.. *.X* |
|00003ba0| 09 09 09 09 09 20 2a 0a | 58 5c 2a 2a 2a 2a 2a 2a |..... *.|X\******|
|00003bb0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003bc0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003bd0| 2a 2a 2f 0a 58 0a 75 6e | 74 69 6c 64 65 28 6f 75 |**/.X.un|tilde(ou|
|00003be0| 74 2c 20 69 6e 29 0a 63 | 68 61 72 20 2a 6f 75 74 |t, in).c|har *out|
|00003bf0| 2c 20 2a 69 6e 3b 0a 58 | 7b 0a 58 20 20 20 20 69 |, *in;.X|{.X i|
|00003c00| 66 20 28 69 6e 5b 30 5d | 20 21 3d 20 27 7e 27 29 |f (in[0]| != '~')|
|00003c10| 0a 58 20 20 20 20 7b 0a | 58 09 53 74 72 63 70 79 |.X {.|X.Strcpy|
|00003c20| 28 6f 75 74 2c 20 69 6e | 29 3b 0a 58 09 72 65 74 |(out, in|);.X.ret|
|00003c30| 75 72 6e 20 28 30 29 3b | 0a 58 20 20 20 20 7d 0a |urn (0);|.X }.|
|00003c40| 58 20 20 20 20 69 66 20 | 28 69 73 61 6c 6e 75 6d |X if |(isalnum|
|00003c50| 28 69 6e 5b 31 5d 29 29 | 0a 58 20 20 20 20 7b 0a |(in[1]))|.X {.|
|00003c60| 58 09 63 68 61 72 20 20 | 20 20 20 20 20 20 20 20 |X.char | |
|00003c70| 20 20 75 73 65 72 5b 38 | 30 5d 3b 0a 58 09 73 74 | user[8|0];.X.st|
|00003c80| 72 75 63 74 20 70 61 73 | 73 77 64 20 20 2a 70 77 |ruct pas|swd *pw|
|00003c90| 2c 20 2a 67 65 74 70 77 | 6e 61 6d 28 29 3b 0a 58 |, *getpw|nam();.X|
|00003ca0| 09 63 68 61 72 20 20 20 | 20 20 20 20 20 20 20 20 |.char | |
|00003cb0| 2a 70 2c 20 2a 70 75 3b | 0a 58 0a 58 09 70 20 3d |*p, *pu;|.X.X.p =|
|00003cc0| 20 69 6e 20 2b 20 31 3b | 0a 58 09 70 75 20 3d 20 | in + 1;|.X.pu = |
|00003cd0| 75 73 65 72 3b 0a 58 09 | 77 68 69 6c 65 20 28 69 |user;.X.|while (i|
|00003ce0| 73 61 6c 6e 75 6d 28 2a | 70 29 20 7c 7c 20 2a 70 |salnum(*|p) || *p|
|00003cf0| 20 3d 3d 20 27 2d 27 29 | 0a 58 09 20 20 20 20 2a | == '-')|.X. *|
|00003d00| 70 75 2b 2b 20 3d 20 2a | 70 2b 2b 3b 0a 58 09 2a |pu++ = *|p++;.X.*|
|00003d10| 70 75 20 3d 20 27 5c 30 | 27 3b 0a 58 09 69 66 20 |pu = '\0|';.X.if |
|00003d20| 28 28 70 77 20 3d 20 67 | 65 74 70 77 6e 61 6d 28 |((pw = g|etpwnam(|
|00003d30| 75 73 65 72 29 29 20 3d | 3d 20 4e 55 4c 4c 29 0a |user)) =|= NULL).|
|00003d40| 58 09 20 20 20 20 72 65 | 74 75 72 6e 20 28 31 29 |X. re|turn (1)|
|00003d50| 3b 0a 58 09 53 74 72 63 | 70 79 28 6f 75 74 2c 20 |;.X.Strc|py(out, |
|00003d60| 70 77 2d 3e 70 77 5f 64 | 69 72 29 3b 0a 58 09 53 |pw->pw_d|ir);.X.S|
|00003d70| 74 72 63 61 74 28 6f 75 | 74 2c 20 70 29 3b 0a 58 |trcat(ou|t, p);.X|
|00003d80| 20 20 20 20 7d 20 65 6c | 73 65 0a 58 20 20 20 20 | } el|se.X |
|00003d90| 7b 0a 58 09 63 68 61 72 | 20 20 20 20 20 20 20 20 |{.X.char| |
|00003da0| 20 20 20 2a 70 3b 0a 58 | 0a 58 09 69 66 20 28 28 | *p;.X|.X.if ((|
|00003db0| 70 20 3d 20 28 63 68 61 | 72 20 2a 29 20 67 65 74 |p = (cha|r *) get|
|00003dc0| 65 6e 76 28 22 48 4f 4d | 45 22 29 29 20 3d 3d 20 |env("HOM|E")) == |
|00003dd0| 28 63 68 61 72 20 2a 29 | 20 4e 55 4c 4c 29 0a 58 |(char *)| NULL).X|
|00003de0| 09 20 20 20 20 72 65 74 | 75 72 6e 20 28 31 29 3b |. ret|urn (1);|
|00003df0| 0a 58 09 53 74 72 63 70 | 79 28 6f 75 74 2c 20 70 |.X.Strcp|y(out, p|
|00003e00| 29 3b 0a 58 09 53 74 72 | 63 61 74 28 6f 75 74 2c |);.X.Str|cat(out,|
|00003e10| 20 69 6e 20 2b 20 31 29 | 3b 0a 58 20 20 20 20 7d | in + 1)|;.X }|
|00003e20| 0a 58 20 20 20 20 72 65 | 74 75 72 6e 20 28 30 29 |.X re|turn (0)|
|00003e30| 3b 0a 58 7d 0a 58 0a 58 | 2f 2a 2a 2a 2a 2a 2a 2a |;.X}.X.X|/*******|
|00003e40| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003e50| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003e60| 2a 2a 2a 2a 5c 0a 58 2a | 20 09 09 09 09 09 20 20 |****\.X*| ..... |
|00003e70| 20 20 2a 0a 58 2a 20 20 | 75 6e 65 6e 76 3a 20 70 | *.X* |unenv: p|
|00003e80| 65 72 66 6f 72 6d 20 65 | 6e 76 69 72 6f 6e 6d 65 |erform e|nvironme|
|00003e90| 6e 74 20 73 75 62 73 74 | 69 74 75 74 69 6f 6e 20 |nt subst|itution |
|00003ea0| 20 2a 0a 58 2a 20 09 09 | 09 09 09 20 20 20 20 2a | *.X* ..|... *|
|00003eb0| 0a 58 5c 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.X\*****|********|
|00003ec0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003ed0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2f 0a |********|******/.|
|00003ee0| 58 0a 75 6e 65 6e 76 28 | 6f 75 74 2c 20 69 6e 29 |X.unenv(|out, in)|
|00003ef0| 0a 63 68 61 72 20 2a 6f | 75 74 2c 20 2a 69 6e 3b |.char *o|ut, *in;|
|00003f00| 0a 58 7b 0a 58 20 20 20 | 20 77 68 69 6c 65 20 28 |.X{.X | while (|
|00003f10| 2a 69 6e 20 21 3d 20 27 | 5c 30 27 29 0a 58 20 20 |*in != '|\0').X |
|00003f20| 20 20 7b 0a 58 09 69 66 | 20 28 2a 69 6e 20 21 3d | {.X.if| (*in !=|
|00003f30| 20 27 24 27 29 0a 58 09 | 20 20 20 20 2a 6f 75 74 | '$').X.| *out|
|00003f40| 2b 2b 20 3d 20 2a 69 6e | 2b 2b 3b 0a 58 09 65 6c |++ = *in|++;.X.el|
|00003f50| 73 65 0a 58 09 7b 0a 58 | 09 20 20 20 20 63 68 61 |se.X.{.X|. cha|
|00003f60| 72 20 20 20 20 20 20 20 | 20 20 20 20 20 65 6e 76 |r | env|
|00003f70| 61 72 5b 38 30 5d 3b 0a | 58 09 20 20 20 20 63 68 |ar[80];.|X. ch|
|00003f80| 61 72 20 20 20 20 20 20 | 20 20 20 20 20 2a 70 3b |ar | *p;|
|00003f90| 0a 58 0a 58 09 20 20 20 | 20 69 6e 2b 2b 3b 0a 58 |.X.X. | in++;.X|
|00003fa0| 09 20 20 20 20 66 6f 72 | 20 28 70 20 3d 20 65 6e |. for| (p = en|
|00003fb0| 76 61 72 3b 20 69 73 61 | 6c 6e 75 6d 28 2a 69 6e |var; isa|lnum(*in|
|00003fc0| 29 3b 29 0a 58 09 09 2a | 70 2b 2b 20 3d 20 2a 69 |);).X..*|p++ = *i|
|00003fd0| 6e 2b 2b 3b 0a 58 09 20 | 20 20 20 2a 70 20 3d 20 |n++;.X. | *p = |
|00003fe0| 27 5c 30 27 3b 0a 58 09 | 20 20 20 20 69 66 20 28 |'\0';.X.| if (|
|00003ff0| 28 70 20 3d 20 28 63 68 | 61 72 20 2a 29 20 67 65 |(p = (ch|ar *) ge|
|00004000| 74 65 6e 76 28 65 6e 76 | 61 72 29 29 20 3d 3d 20 |tenv(env|ar)) == |
|00004010| 28 63 68 61 72 20 2a 29 | 20 4e 55 4c 4c 29 0a 58 |(char *)| NULL).X|
|00004020| 09 09 72 65 74 75 72 6e | 20 28 31 29 3b 0a 58 09 |..return| (1);.X.|
|00004030| 20 20 20 20 53 74 72 63 | 70 79 28 6f 75 74 2c 20 | Strc|py(out, |
|00004040| 70 29 3b 0a 58 09 20 20 | 20 20 6f 75 74 20 2b 3d |p);.X. | out +=|
|00004050| 20 73 74 72 6c 65 6e 28 | 6f 75 74 29 3b 0a 58 09 | strlen(|out);.X.|
|00004060| 7d 0a 58 20 20 20 20 7d | 0a 58 20 20 20 20 2a 6f |}.X }|.X *o|
|00004070| 75 74 20 3d 20 27 5c 30 | 27 3b 0a 58 20 20 20 20 |ut = '\0|';.X |
|00004080| 72 65 74 75 72 6e 20 28 | 30 29 3b 0a 58 7d 0a 45 |return (|0);.X}.E|
|00004090| 4e 44 5f 4f 46 5f 46 49 | 4c 45 0a 69 66 20 74 65 |ND_OF_FI|LE.if te|
|000040a0| 73 74 20 31 36 39 32 20 | 2d 6e 65 20 60 77 63 20 |st 1692 |-ne `wc |
|000040b0| 2d 63 20 3c 27 75 6e 65 | 6e 76 2e 63 27 60 3b 20 |-c <'une|nv.c'`; |
|000040c0| 74 68 65 6e 0a 20 20 20 | 20 65 63 68 6f 20 73 68 |then. | echo sh|
|000040d0| 61 72 3a 20 5c 22 27 75 | 6e 65 6e 76 2e 63 27 5c |ar: \"'u|nenv.c'\|
|000040e0| 22 20 75 6e 70 61 63 6b | 65 64 20 77 69 74 68 20 |" unpack|ed with |
|000040f0| 77 72 6f 6e 67 20 73 69 | 7a 65 21 0a 66 69 0a 23 |wrong si|ze!.fi.#|
|00004100| 20 65 6e 64 20 6f 66 20 | 27 75 6e 65 6e 76 2e 63 | end of |'unenv.c|
|00004110| 27 0a 66 69 0a 65 63 68 | 6f 20 73 68 61 72 3a 20 |'.fi.ech|o shar: |
|00004120| 45 6e 64 20 6f 66 20 73 | 68 65 6c 6c 20 61 72 63 |End of s|hell arc|
|00004130| 68 69 76 65 2e 0a 65 78 | 69 74 20 30 0a |hive..ex|it 0. |
+--------+-------------------------+-------------------------+--------+--------+
