/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / usenet / compsrcs / misc / volume10 / parsergs.p2

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 46 72 6f 6d 20 64 65 63 | 77 72 6c 21 65 6c 72 6f |From dec|wrl!elro|
|00000010| 79 2e 6a 70 6c 2e 6e 61 | 73 61 2e 67 6f 76 21 6a |y.jpl.na|sa.gov!j|
|00000020| 61 72 74 68 75 72 21 75 | 75 6e 65 74 21 61 6c 6c |arthur!u|unet!all|
|00000030| 62 65 72 79 20 53 61 74 | 20 4d 61 72 20 20 33 20 |bery Sat| Mar  3 |
|00000040| 31 38 3a 32 38 3a 35 38 | 20 50 53 54 20 31 39 39 |18:28:58| PST 199|
|00000050| 30 0a 41 72 74 69 63 6c | 65 20 31 33 35 35 20 6f |0.Articl|e 1355 o|
|00000060| 66 20 63 6f 6d 70 2e 73 | 6f 75 72 63 65 73 2e 6d |f comp.s|ources.m|
|00000070| 69 73 63 3a 0a 50 61 74 | 68 3a 20 64 65 63 77 72 |isc:.Pat|h: decwr|
|00000080| 6c 21 65 6c 72 6f 79 2e | 6a 70 6c 2e 6e 61 73 61 |l!elroy.|jpl.nasa|
|00000090| 2e 67 6f 76 21 6a 61 72 | 74 68 75 72 21 75 75 6e |.gov!jar|thur!uun|
|000000a0| 65 74 21 61 6c 6c 62 65 | 72 79 0a 46 72 6f 6d 3a |et!allbe|ry.From:|
|000000b0| 20 70 65 74 65 72 40 66 | 69 63 63 2e 75 75 2e 6e | peter@f|icc.uu.n|
|000000c0| 65 74 20 28 50 65 74 65 | 72 20 64 61 20 53 69 6c |et (Pete|r da Sil|
|000000d0| 76 61 29 0a 4e 65 77 73 | 67 72 6f 75 70 73 3a 20 |va).News|groups: |
|000000e0| 63 6f 6d 70 2e 73 6f 75 | 72 63 65 73 2e 6d 69 73 |comp.sou|rces.mis|
|000000f0| 63 0a 53 75 62 6a 65 63 | 74 3a 20 76 31 30 69 30 |c.Subjec|t: v10i0|
|00000100| 38 33 3a 20 50 61 72 73 | 65 20 41 52 47 48 3a 20 |83: Pars|e ARGH: |
|00000110| 6d 69 73 73 69 6e 67 20 | 66 69 6c 65 20 66 72 6f |missing |file fro|
|00000120| 6d 20 70 61 72 73 65 61 | 72 67 73 20 70 61 74 63 |m parsea|rgs patc|
|00000130| 68 65 73 0a 4d 65 73 73 | 61 67 65 2d 49 44 3a 20 |hes.Mess|age-ID: |
|00000140| 3c 37 39 39 38 35 40 75 | 75 6e 65 74 2e 55 55 2e |<79985@u|unet.UU.|
|00000150| 4e 45 54 3e 0a 44 61 74 | 65 3a 20 32 37 20 46 65 |NET>.Dat|e: 27 Fe|
|00000160| 62 20 39 30 20 30 32 3a | 35 31 3a 31 38 20 47 4d |b 90 02:|51:18 GM|
|00000170| 54 0a 53 65 6e 64 65 72 | 3a 20 61 6c 6c 62 65 72 |T.Sender|: allber|
|00000180| 79 40 75 75 6e 65 74 2e | 55 55 2e 4e 45 54 0a 4f |y@uunet.|UU.NET.O|
|00000190| 72 67 61 6e 69 7a 61 74 | 69 6f 6e 3a 20 58 65 6e |rganizat|ion: Xen|
|000001a0| 69 78 20 53 75 70 70 6f | 72 74 2c 20 46 49 43 43 |ix Suppo|rt, FICC|
|000001b0| 0a 4c 69 6e 65 73 3a 20 | 31 34 37 0a 41 70 70 72 |.Lines: |147.Appr|
|000001c0| 6f 76 65 64 3a 20 61 6c | 6c 62 65 72 79 40 75 75 |oved: al|lbery@uu|
|000001d0| 6e 65 74 2e 55 55 2e 4e | 45 54 20 28 42 72 61 6e |net.UU.N|ET (Bran|
|000001e0| 64 6f 6e 20 53 2e 20 41 | 6c 6c 62 65 72 79 20 2d |don S. A|llbery -|
|000001f0| 20 63 6f 6d 70 2e 73 6f | 75 72 63 65 73 2e 6d 69 | comp.so|urces.mi|
|00000200| 73 63 29 0a 0a 50 6f 73 | 74 69 6e 67 2d 6e 75 6d |sc)..Pos|ting-num|
|00000210| 62 65 72 3a 20 56 6f 6c | 75 6d 65 20 31 30 2c 20 |ber: Vol|ume 10, |
|00000220| 49 73 73 75 65 20 38 33 | 0a 53 75 62 6d 69 74 74 |Issue 83|.Submitt|
|00000230| 65 64 2d 62 79 3a 20 70 | 65 74 65 72 40 66 69 63 |ed-by: p|eter@fic|
|00000240| 63 2e 75 75 2e 6e 65 74 | 20 28 50 65 74 65 72 20 |c.uu.net| (Peter |
|00000250| 64 61 20 53 69 6c 76 61 | 29 0a 41 72 63 68 69 76 |da Silva|).Archiv|
|00000260| 65 2d 6e 61 6d 65 3a 20 | 70 61 72 73 65 61 72 67 |e-name: |parsearg|
|00000270| 73 2e 70 32 0a 0a 54 68 | 69 73 20 69 73 6e 27 74 |s.p2..Th|is isn't|
|00000280| 20 73 74 72 69 63 74 6c | 79 20 73 70 65 61 6b 69 | strictl|y speaki|
|00000290| 6e 67 20 61 20 70 61 74 | 63 68 2e 2e 2e 20 69 74 |ng a pat|ch... it|
|000002a0| 27 73 20 61 6e 20 65 78 | 74 72 61 20 66 69 6c 65 |'s an ex|tra file|
|000002b0| 20 72 65 71 75 69 72 65 | 64 20 62 79 20 74 68 65 | require|d by the|
|000002c0| 0a 66 69 72 73 74 20 73 | 65 74 20 6f 66 20 70 61 |.first s|et of pa|
|000002d0| 74 63 68 65 73 2e 20 49 | 20 73 68 6f 75 6c 64 20 |tches. I| should |
|000002e0| 6a 75 73 74 20 68 61 76 | 65 20 70 6f 73 74 65 64 |just hav|e posted|
|000002f0| 20 74 68 65 20 77 68 6f | 6c 65 20 74 68 69 6e 67 | the who|le thing|
|00000300| 20 61 67 61 69 6e 2e 2e | 2e 0a 0a 3a 0a 23 21 20 | again..|...:.#! |
|00000310| 2f 62 69 6e 2f 73 68 0a | 23 20 54 68 69 73 20 69 |/bin/sh.|# This i|
|00000320| 73 20 61 20 73 68 65 6c | 6c 20 61 72 63 68 69 76 |s a shel|l archiv|
|00000330| 65 2c 20 63 72 65 61 74 | 65 64 20 61 74 20 46 65 |e, creat|ed at Fe|
|00000340| 72 72 61 6e 74 69 20 49 | 6e 74 65 72 6e 61 74 69 |rranti I|nternati|
|00000350| 6f 6e 61 6c 20 43 6f 6e | 74 72 6f 6c 73 20 43 6f |onal Con|trols Co|
|00000360| 72 70 2e 0a 23 20 62 79 | 20 70 65 74 65 72 20 28 |rp..# by| peter (|
|00000370| 50 65 74 65 72 20 64 61 | 20 53 69 6c 76 61 20 2b |Peter da| Silva +|
|00000380| 31 20 37 31 33 20 32 37 | 34 20 35 31 38 30 29 20 |1 713 27|4 5180) |
|00000390| 6f 6e 20 46 72 69 20 46 | 65 62 20 32 33 20 30 35 |on Fri F|eb 23 05|
|000003a0| 3a 34 35 3a 35 33 20 31 | 39 39 30 0a 23 20 52 65 |:45:53 1|990.# Re|
|000003b0| 6d 6f 76 65 20 61 6e 79 | 74 68 69 6e 67 20 62 65 |move any|thing be|
|000003c0| 66 6f 72 65 20 74 68 65 | 20 22 23 21 20 2f 62 69 |fore the| "#! /bi|
|000003d0| 6e 2f 73 68 22 20 6c 69 | 6e 65 2c 20 74 68 65 6e |n/sh" li|ne, then|
|000003e0| 20 75 6e 70 61 63 6b 20 | 69 74 20 62 79 20 73 61 | unpack |it by sa|
|000003f0| 76 69 6e 67 0a 23 20 69 | 74 20 69 6e 74 6f 20 61 |ving.# i|t into a|
|00000400| 20 66 69 6c 65 20 61 6e | 64 20 74 79 70 69 6e 67 | file an|d typing|
|00000410| 20 22 73 68 20 66 69 6c | 65 22 2e 20 20 49 66 20 | "sh fil|e".  If |
|00000420| 79 6f 75 20 64 6f 20 6e | 6f 74 20 68 61 76 65 20 |you do n|ot have |
|00000430| 73 68 2c 20 79 6f 75 20 | 6e 65 65 64 20 0a 23 20 |sh, you |need .# |
|00000440| 75 6e 73 68 61 72 2c 20 | 61 20 64 65 61 72 63 68 |unshar, |a dearch|
|00000450| 69 76 69 6e 67 20 70 72 | 6f 67 72 61 6d 20 77 68 |iving pr|ogram wh|
|00000460| 69 63 68 20 69 73 20 77 | 69 64 65 6c 79 20 61 76 |ich is w|idely av|
|00000470| 61 69 6c 61 62 6c 65 2e | 20 20 49 6e 20 74 68 65 |ailable.|  In the|
|00000480| 20 61 62 73 6f 6c 75 74 | 65 0a 23 20 77 6f 73 74 | absolut|e.# wost|
|00000490| 20 63 61 73 65 2c 20 79 | 6f 75 20 63 61 6e 20 63 | case, y|ou can c|
|000004a0| 72 61 63 6b 20 74 68 65 | 20 66 69 6c 65 73 20 6f |rack the| files o|
|000004b0| 75 74 20 62 79 20 68 61 | 6e 64 2e 0a 23 20 49 66 |ut by ha|nd..# If|
|000004c0| 20 74 68 65 20 61 72 63 | 68 69 76 65 20 69 73 20 | the arc|hive is |
|000004d0| 63 6f 6d 70 6c 65 74 65 | 2c 20 79 6f 75 20 77 69 |complete|, you wi|
|000004e0| 6c 6c 20 73 65 65 20 74 | 68 65 20 6d 65 73 73 61 |ll see t|he messa|
|000004f0| 67 65 20 22 45 6e 64 20 | 6f 66 20 61 72 63 68 69 |ge "End |of archi|
|00000500| 76 65 2e 22 0a 23 20 61 | 74 20 74 68 65 20 65 6e |ve.".# a|t the en|
|00000510| 64 2e 0a 23 20 54 68 69 | 73 20 61 72 63 68 69 76 |d..# Thi|s archiv|
|00000520| 65 20 63 6f 6e 74 61 69 | 6e 73 20 74 68 65 20 66 |e contai|ns the f|
|00000530| 6f 6c 6c 6f 77 69 6e 67 | 20 66 69 6c 65 73 2e 2e |ollowing| files..|
|00000540| 2e 0a 23 20 27 61 72 67 | 6c 69 73 74 2e 63 27 0a |..# 'arg|list.c'.|
|00000550| 23 20 54 6f 20 65 78 74 | 72 61 63 74 20 74 68 65 |# To ext|ract the|
|00000560| 6d 2c 20 72 75 6e 20 74 | 68 65 20 66 6f 6c 6c 6f |m, run t|he follo|
|00000570| 77 69 6e 67 20 74 68 72 | 6f 75 67 68 20 2f 62 69 |wing thr|ough /bi|
|00000580| 6e 2f 73 68 0a 65 63 68 | 6f 20 78 20 2d 20 61 72 |n/sh.ech|o x - ar|
|00000590| 67 6c 69 73 74 2e 63 0a | 73 65 64 20 27 73 2f 5e |glist.c.|sed 's/^|
|000005a0| 58 2f 2f 27 20 3e 20 61 | 72 67 6c 69 73 74 2e 63 |X//' > a|rglist.c|
|000005b0| 20 3c 3c 20 27 2f 2f 45 | 4e 44 5f 4f 46 5f 46 49 | << '//E|ND_OF_FI|
|000005c0| 4c 45 27 0a 58 23 69 6e | 63 6c 75 64 65 20 3c 70 |LE'.X#in|clude <p|
|000005d0| 61 72 73 65 61 72 67 73 | 2e 68 3e 0a 58 23 69 6e |arseargs|.h>.X#in|
|000005e0| 63 6c 75 64 65 20 3c 63 | 74 79 70 65 2e 68 3e 0a |clude <c|type.h>.|
|000005f0| 58 0a 58 23 69 66 64 65 | 66 20 5f 5f 53 54 44 43 |X.X#ifde|f __STDC|
|00000600| 5f 5f 0a 58 74 79 70 65 | 64 65 66 20 76 6f 69 64 |__.Xtype|def void|
|00000610| 20 2a 70 6f 69 6e 74 65 | 72 3b 0a 58 23 65 6c 73 | *pointe|r;.X#els|
|00000620| 65 0a 58 74 79 70 65 64 | 65 66 20 63 68 61 72 20 |e.Xtyped|ef char |
|00000630| 2a 70 6f 69 6e 74 65 72 | 3b 0a 58 23 65 6e 64 69 |*pointer|;.X#endi|
|00000640| 66 0a 58 0a 58 65 78 74 | 65 72 6e 20 70 6f 69 6e |f.X.Xext|ern poin|
|00000650| 74 65 72 20 6d 61 6c 6c | 6f 63 28 29 3b 0a 58 0a |ter mall|oc();.X.|
|00000660| 58 23 64 65 66 69 6e 65 | 20 41 4c 4c 5f 41 44 09 |X#define| ALL_AD.|
|00000670| 09 61 64 20 3d 20 61 72 | 67 64 3b 20 61 64 2d 3e |.ad = ar|gd; ad->|
|00000680| 61 64 5f 6e 61 6d 65 20 | 21 3d 20 27 5c 30 27 3b |ad_name |!= '\0';|
|00000690| 20 61 64 2b 2b 0a 58 23 | 64 65 66 69 6e 65 20 41 | ad++.X#|define A|
|000006a0| 4c 4c 5f 44 45 46 53 09 | 61 64 20 3d 20 5f 44 65 |LL_DEFS.|ad = _De|
|000006b0| 66 61 75 6c 74 41 72 67 | 73 3b 20 61 64 2d 3e 61 |faultArg|s; ad->a|
|000006c0| 64 5f 6e 61 6d 65 20 21 | 3d 20 27 5c 30 27 3b 20 |d_name !|= '\0'; |
|000006d0| 61 64 2b 2b 0a 58 0a 58 | 65 78 74 65 72 6e 20 63 |ad++.X.X|extern c|
|000006e0| 68 61 72 09 2a 50 72 6f | 67 4e 61 6d 65 3b 0a 58 |har.*Pro|gName;.X|
|000006f0| 0a 58 2f 2a 20 41 72 67 | 75 6d 65 6e 74 20 6c 69 |.X/* Arg|ument li|
|00000700| 73 74 20 75 74 69 6c 69 | 74 79 20 72 6f 75 74 69 |st utili|ty routi|
|00000710| 6e 65 73 2e 20 41 66 74 | 65 72 20 70 72 6f 63 65 |nes. Aft|er proce|
|00000720| 73 73 69 6e 67 2c 20 70 | 61 72 73 65 61 72 67 73 |ssing, p|arseargs|
|00000730| 20 63 61 6c 6c 73 0a 58 | 20 2a 20 63 6c 65 61 6e | calls.X| * clean|
|00000740| 75 70 5f 6c 69 73 74 73 | 20 74 6f 20 72 65 76 65 |up_lists| to reve|
|00000750| 72 73 65 20 61 6c 6c 20 | 61 72 67 75 6d 65 6e 74 |rse all |argument|
|00000760| 20 6c 69 73 74 73 20 73 | 6f 20 74 68 65 79 20 73 | lists s|o they s|
|00000770| 74 61 79 20 69 6e 20 6f | 72 64 65 72 2e 0a 58 20 |tay in o|rder..X |
|00000780| 2a 2f 0a 58 0a 58 2f 2a | 20 52 65 76 65 72 73 65 |*/.X.X/*| Reverse|
|00000790| 20 61 20 6c 69 73 74 20 | 2a 2f 0a 58 73 74 72 75 | a list |*/.Xstru|
|000007a0| 63 74 20 61 72 67 6c 69 | 73 74 20 2a 72 65 76 65 |ct argli|st *reve|
|000007b0| 72 73 65 6c 69 73 74 28 | 66 72 6f 6d 29 0a 58 73 |rselist(|from).Xs|
|000007c0| 74 72 75 63 74 20 61 72 | 67 6c 69 73 74 20 2a 66 |truct ar|glist *f|
|000007d0| 72 6f 6d 3b 0a 58 7b 0a | 58 09 73 74 72 75 63 74 |rom;.X{.|X.struct|
|000007e0| 20 61 72 67 6c 69 73 74 | 20 2a 74 6f 2c 20 2a 74 | arglist| *to, *t|
|000007f0| 6d 70 3b 0a 58 0a 58 09 | 74 6f 20 3d 20 4e 55 4c |mp;.X.X.|to = NUL|
|00000800| 4c 3b 0a 58 09 77 68 69 | 6c 65 28 66 72 6f 6d 29 |L;.X.whi|le(from)|
|00000810| 20 7b 0a 58 09 09 74 6d | 70 20 3d 20 66 72 6f 6d | {.X..tm|p = from|
|00000820| 3b 20 2f 2a 20 72 65 6d | 6f 76 65 20 74 6f 70 20 |; /* rem|ove top |
|00000830| 66 72 6f 6d 20 6f 6c 64 | 20 6c 69 73 74 20 2a 2f |from old| list */|
|00000840| 0a 58 09 09 66 72 6f 6d | 20 3d 20 66 72 6f 6d 2d |.X..from| = from-|
|00000850| 3e 6e 6c 5f 6e 65 78 74 | 3b 0a 58 09 09 74 6d 70 |>nl_next|;.X..tmp|
|00000860| 2d 3e 6e 6c 5f 6e 65 78 | 74 20 3d 20 74 6f 3b 20 |->nl_nex|t = to; |
|00000870| 2f 2a 20 69 6e 73 65 72 | 74 20 74 6f 70 20 69 6e |/* inser|t top in|
|00000880| 20 6e 65 77 20 6c 69 73 | 74 20 2a 2f 0a 58 09 09 | new lis|t */.X..|
|00000890| 74 6f 20 3d 20 74 6d 70 | 3b 0a 58 09 7d 0a 58 09 |to = tmp|;.X.}.X.|
|000008a0| 72 65 74 75 72 6e 20 74 | 6f 3b 0a 58 7d 0a 58 0a |return t|o;.X}.X.|
|000008b0| 58 2f 2a 20 52 65 76 65 | 72 73 65 20 61 6c 6c 20 |X/* Reve|rse all |
|000008c0| 61 72 67 6c 69 73 74 73 | 20 69 6e 20 61 72 67 64 |arglists| in argd|
|000008d0| 20 2a 2f 0a 58 63 6c 65 | 61 6e 75 70 5f 6c 69 73 | */.Xcle|anup_lis|
|000008e0| 74 73 28 61 72 67 64 29 | 0a 58 41 52 47 44 45 53 |ts(argd)|.XARGDES|
|000008f0| 43 20 2a 61 72 67 64 3b | 0a 58 7b 0a 58 09 41 52 |C *argd;|.X{.X.AR|
|00000900| 47 44 45 53 43 20 2a 61 | 64 3b 0a 58 0a 58 09 66 |GDESC *a|d;.X.X.f|
|00000910| 6f 72 28 41 4c 4c 5f 41 | 44 29 20 7b 0a 58 09 09 |or(ALL_A|D) {.X..|
|00000920| 69 66 28 20 28 61 64 2d | 3e 61 64 5f 66 6c 61 67 |if( (ad-|>ad_flag|
|00000930| 73 20 26 20 41 52 47 4c | 49 53 54 29 20 26 26 0a |s & ARGL|IST) &&.|
|00000940| 58 09 09 20 20 20 20 2a | 28 73 74 72 75 63 74 20 |X..    *|(struct |
|00000950| 61 72 67 6c 69 73 74 20 | 2a 2a 29 61 64 2d 3e 61 |arglist |**)ad->a|
|00000960| 64 5f 76 61 6c 70 29 20 | 7b 0a 58 09 09 09 2a 28 |d_valp) |{.X...*(|
|00000970| 73 74 72 75 63 74 20 61 | 72 67 6c 69 73 74 20 2a |struct a|rglist *|
|00000980| 2a 29 61 64 2d 3e 61 64 | 5f 76 61 6c 70 20 3d 0a |*)ad->ad|_valp =.|
|00000990| 58 09 09 09 09 72 65 76 | 65 72 73 65 6c 69 73 74 |X....rev|erselist|
|000009a0| 28 20 2a 28 73 74 72 75 | 63 74 20 61 72 67 6c 69 |( *(stru|ct argli|
|000009b0| 73 74 20 2a 2a 29 61 64 | 2d 3e 61 64 5f 76 61 6c |st **)ad|->ad_val|
|000009c0| 70 20 29 3b 0a 58 09 09 | 7d 0a 58 09 7d 0a 58 7d |p );.X..|}.X.}.X}|
|000009d0| 0a 58 0a 58 2f 2a 0a 58 | 2a 2a 20 20 41 52 47 6c |.X.X/*.X|**  ARGl|
|000009e0| 69 73 74 20 2d 2d 20 6c | 69 73 74 20 61 72 67 75 |ist -- l|ist argu|
|000009f0| 6d 65 6e 74 20 74 72 61 | 6e 73 6c 61 74 69 6f 6e |ment tra|nslation|
|00000a00| 20 72 6f 75 74 69 6e 65 | 73 2e 0a 58 2a 2a 0a 58 | routine|s..X**.X|
|00000a10| 2a 2a 09 45 61 63 68 20 | 6f 66 20 74 68 65 73 65 |**.Each |of these|
|00000a20| 20 63 6f 6e 76 65 72 74 | 73 20 61 20 70 61 72 61 | convert|s a para|
|00000a30| 6d 65 74 65 72 20 76 61 | 6c 75 65 20 74 6f 20 74 |meter va|lue to t|
|00000a40| 68 65 20 69 6e 74 65 72 | 6e 61 6c 20 66 6f 72 6d |he inter|nal form|
|00000a50| 2c 0a 58 2a 2a 09 69 6e | 63 6c 75 64 69 6e 67 20 |,.X**.in|cluding |
|00000a60| 76 61 6c 69 64 69 74 79 | 20 63 68 65 63 6b 69 6e |validity| checkin|
|00000a70| 67 2e 20 20 54 68 65 69 | 72 20 70 61 72 61 6d 65 |g.  Thei|r parame|
|00000a80| 74 65 72 73 20 61 6e 64 | 20 72 65 74 75 72 6e 20 |ters and| return |
|00000a90| 76 61 6c 75 65 73 0a 58 | 2a 2a 09 61 6c 6c 20 62 |values.X|**.all b|
|00000aa0| 65 68 61 76 65 20 69 64 | 65 6e 74 69 63 61 6c 6c |ehave id|enticall|
|00000ab0| 79 2e 20 54 68 65 73 65 | 20 61 72 65 20 74 68 65 |y. These| are the|
|00000ac0| 20 72 6f 75 74 69 6e 65 | 73 20 66 6f 72 20 64 65 | routine|s for de|
|00000ad0| 61 6c 69 6e 67 20 77 69 | 74 68 0a 58 2a 2a 09 6c |aling wi|th.X**.l|
|00000ae0| 69 73 74 73 2e 2e 2e 0a | 58 2a 2a 0a 58 2a 2a 09 |ists....|X**.X**.|
|00000af0| 50 61 72 61 6d 65 74 65 | 72 73 3a 0a 58 2a 2a 09 |Paramete|rs:.X**.|
|00000b00| 09 61 64 20 2d 2d 20 74 | 68 65 20 61 72 67 75 6d |.ad -- t|he argum|
|00000b10| 65 6e 74 20 64 65 73 63 | 72 69 70 74 6f 72 20 66 |ent desc|riptor f|
|00000b20| 6f 72 20 74 68 69 73 20 | 70 61 72 61 6d 65 74 65 |or this |paramete|
|00000b30| 72 2e 0a 58 2a 2a 09 09 | 76 70 20 2d 2d 20 61 20 |r..X**..|vp -- a |
|00000b40| 70 6f 69 6e 74 65 72 20 | 74 6f 20 74 68 65 20 73 |pointer |to the s|
|00000b50| 74 72 69 6e 67 20 69 6e | 70 75 74 20 76 61 6c 75 |tring in|put valu|
|00000b60| 65 2e 0a 58 2a 2a 09 09 | 63 6f 70 79 66 20 2d 2d |e..X**..|copyf --|
|00000b70| 20 69 66 20 54 52 55 45 | 2c 20 74 68 65 20 76 61 | if TRUE|, the va|
|00000b80| 6c 75 65 20 77 69 6c 6c | 20 62 65 20 64 65 73 74 |lue will| be dest|
|00000b90| 72 6f 79 65 64 20 6c 61 | 74 65 72 2c 0a 58 2a 2a |royed la|ter,.X**|
|00000ba0| 09 09 09 61 6e 64 20 73 | 6f 20 73 68 6f 75 6c 64 |...and s|o should|
|00000bb0| 20 62 65 20 63 6f 70 69 | 65 64 20 69 66 20 69 74 | be copi|ed if it|
|00000bc0| 20 77 69 6c 6c 20 62 65 | 20 72 65 74 61 69 6e 65 | will be| retaine|
|00000bd0| 64 0a 58 2a 2a 09 09 09 | 28 61 73 20 66 6f 72 20 |d.X**...|(as for |
|00000be0| 61 20 73 74 72 69 6e 67 | 29 2e 0a 58 2a 2a 0a 58 |a string|)..X**.X|
|00000bf0| 2a 2a 09 52 65 74 75 72 | 6e 73 3a 0a 58 2a 2a 09 |**.Retur|ns:.X**.|
|00000c00| 09 54 52 55 45 20 2d 2d | 20 69 66 20 74 68 65 20 |.TRUE --| if the |
|00000c10| 63 6f 6e 76 65 72 73 69 | 6f 6e 20 77 61 73 20 73 |conversi|on was s|
|00000c20| 75 63 63 65 73 73 66 75 | 6c 2e 20 20 54 68 65 20 |uccessfu|l.  The |
|00000c30| 61 63 74 75 61 6c 0a 58 | 2a 2a 09 09 09 76 61 6c |actual.X|**...val|
|00000c40| 75 65 20 73 68 6f 75 6c | 64 20 62 65 20 61 64 64 |ue shoul|d be add|
|00000c50| 65 64 20 74 6f 20 74 68 | 65 20 6c 69 73 74 20 73 |ed to th|e list s|
|00000c60| 74 6f 72 65 64 20 69 6e | 20 74 68 65 0a 58 2a 2a |tored in| the.X**|
|00000c70| 09 09 09 6c 6f 63 61 74 | 69 6f 6e 20 69 6e 64 69 |...locat|ion indi|
|00000c80| 63 61 74 65 64 20 62 79 | 20 61 64 2d 3e 61 64 5f |cated by| ad->ad_|
|00000c90| 76 61 6c 70 2e 0a 58 2a | 2a 09 09 46 41 4c 53 45 |valp..X*|*..FALSE|
|00000ca0| 20 2d 2d 20 69 66 20 74 | 68 65 20 63 6f 6e 76 65 | -- if t|he conve|
|00000cb0| 72 73 69 6f 6e 20 66 61 | 69 6c 65 64 2e 20 20 54 |rsion fa|iled.  T|
|00000cc0| 68 65 20 72 65 61 73 6f | 6e 20 66 6f 72 20 66 61 |he reaso|n for fa|
|00000cd0| 69 6c 75 72 65 0a 58 2a | 2a 09 09 09 73 68 6f 75 |ilure.X*|*...shou|
|00000ce0| 6c 64 20 62 65 20 64 69 | 61 67 6e 6f 73 65 64 20 |ld be di|agnosed |
|00000cf0| 75 73 69 6e 67 20 75 73 | 72 65 72 72 28 29 2e 0a |using us|rerr()..|
|00000d00| 58 2a 2a 0a 58 2a 2a 09 | 53 69 64 65 20 45 66 66 |X**.X**.|Side Eff|
|00000d10| 65 63 74 73 3a 0a 58 2a | 2a 09 09 54 68 65 20 76 |ects:.X*|*..The v|
|00000d20| 61 6c 75 65 20 73 68 6f | 75 6c 64 20 62 65 20 73 |alue sho|uld be s|
|00000d30| 74 6f 72 65 64 20 74 68 | 72 6f 75 67 68 20 61 64 |tored th|rough ad|
|00000d40| 2d 3e 61 64 5f 76 61 6c | 70 2e 0a 58 2a 2f 0a 58 |->ad_val|p..X*/.X|
|00000d50| 0a 58 42 4f 4f 4c 0a 58 | 6c 69 73 74 53 74 72 28 |.XBOOL.X|listStr(|
|00000d60| 61 64 2c 20 76 70 2c 20 | 63 6f 70 79 66 29 0a 58 |ad, vp, |copyf).X|
|00000d70| 09 72 65 67 69 73 74 65 | 72 20 41 52 47 44 45 53 |.registe|r ARGDES|
|00000d80| 43 20 2a 61 64 3b 0a 58 | 09 72 65 67 69 73 74 65 |C *ad;.X|.registe|
|00000d90| 72 20 63 68 61 72 20 2a | 76 70 3b 0a 58 09 42 4f |r char *|vp;.X.BO|
|00000da0| 4f 4c 20 63 6f 70 79 66 | 3b 0a 58 7b 0a 58 09 63 |OL copyf|;.X{.X.c|
|00000db0| 68 61 72 20 2a 63 70 3b | 0a 58 09 73 74 72 75 63 |har *cp;|.X.struc|
|00000dc0| 74 20 61 72 67 6c 69 73 | 74 20 2a 6e 6c 3b 0a 58 |t arglis|t *nl;.X|
|00000dd0| 0a 58 09 69 66 20 28 63 | 6f 70 79 66 29 0a 58 09 |.X.if (c|opyf).X.|
|00000de0| 7b 0a 58 09 09 72 65 67 | 69 73 74 65 72 20 69 6e |{.X..reg|ister in|
|00000df0| 74 20 69 3b 0a 58 0a 58 | 09 09 69 20 3d 20 73 74 |t i;.X.X|..i = st|
|00000e00| 72 6c 65 6e 28 76 70 29 | 20 2b 20 31 3b 0a 58 09 |rlen(vp)| + 1;.X.|
|00000e10| 09 63 70 20 3d 20 28 63 | 68 61 72 20 2a 29 20 6d |.cp = (c|har *) m|
|00000e20| 61 6c 6c 6f 63 28 69 29 | 3b 0a 58 09 09 69 66 28 |alloc(i)|;.X..if(|
|00000e30| 21 63 70 29 20 7b 0a 58 | 09 09 09 75 73 72 65 72 |!cp) {.X|...usrer|
|00000e40| 72 28 22 6f 75 74 20 6f | 66 20 6d 65 6d 6f 72 79 |r("out o|f memory|
|00000e50| 20 73 61 76 69 6e 67 20 | 73 74 72 69 6e 67 20 25 | saving |string %|
|00000e60| 73 22 2c 20 61 64 2d 3e | 61 64 5f 70 72 6f 6d 70 |s", ad->|ad_promp|
|00000e70| 74 29 3b 0a 58 09 09 09 | 72 65 74 75 72 6e 20 46 |t);.X...|return F|
|00000e80| 41 4c 53 45 3b 0a 58 09 | 09 7d 0a 58 09 09 62 63 |ALSE;.X.|.}.X..bc|
|00000e90| 6f 70 79 28 76 70 2c 20 | 63 70 2c 20 69 29 3b 0a |opy(vp, |cp, i);.|
|00000ea0| 58 09 7d 0a 58 09 65 6c | 73 65 0a 58 09 7b 0a 58 |X.}.X.el|se.X.{.X|
|00000eb0| 09 09 63 70 20 3d 20 76 | 70 3b 0a 58 09 7d 0a 58 |..cp = v|p;.X.}.X|
|00000ec0| 0a 58 09 6e 6c 20 3d 20 | 28 73 74 72 75 63 74 20 |.X.nl = |(struct |
|00000ed0| 61 72 67 6c 69 73 74 20 | 2a 29 20 6d 61 6c 6c 6f |arglist |*) mallo|
|00000ee0| 63 28 73 69 7a 65 6f 66 | 20 2a 6e 6c 29 3b 0a 58 |c(sizeof| *nl);.X|
|00000ef0| 09 69 66 28 21 6e 6c 29 | 20 7b 0a 58 09 09 75 73 |.if(!nl)| {.X..us|
|00000f00| 72 65 72 72 28 22 6f 75 | 74 20 6f 66 20 6d 65 6d |rerr("ou|t of mem|
|00000f10| 6f 72 79 20 73 61 76 69 | 6e 67 20 61 72 67 20 25 |ory savi|ng arg %|
|00000f20| 73 22 2c 20 61 64 2d 3e | 61 64 5f 70 72 6f 6d 70 |s", ad->|ad_promp|
|00000f30| 74 29 3b 0a 58 09 09 69 | 66 28 63 6f 70 79 66 29 |t);.X..i|f(copyf)|
|00000f40| 20 66 72 65 65 28 63 70 | 29 3b 0a 58 09 09 72 65 | free(cp|);.X..re|
|00000f50| 74 75 72 6e 20 46 41 4c | 53 45 3b 0a 58 09 7d 0a |turn FAL|SE;.X.}.|
|00000f60| 58 0a 58 09 6e 6c 2d 3e | 6e 6c 5f 6e 65 78 74 20 |X.X.nl->|nl_next |
|00000f70| 3d 20 2a 28 73 74 72 75 | 63 74 20 61 72 67 6c 69 |= *(stru|ct argli|
|00000f80| 73 74 20 2a 2a 29 20 61 | 64 2d 3e 61 64 5f 76 61 |st **) a|d->ad_va|
|00000f90| 6c 70 3b 0a 58 09 6e 6c | 2d 3e 6e 6c 5f 76 61 6c |lp;.X.nl|->nl_val|
|00000fa0| 20 3d 20 28 41 52 42 50 | 54 52 29 63 70 3b 0a 58 | = (ARBP|TR)cp;.X|
|00000fb0| 09 2a 28 73 74 72 75 63 | 74 20 61 72 67 6c 69 73 |.*(struc|t arglis|
|00000fc0| 74 20 2a 2a 29 20 61 64 | 2d 3e 61 64 5f 76 61 6c |t **) ad|->ad_val|
|00000fd0| 70 20 3d 20 6e 6c 3b 0a | 58 09 72 65 74 75 72 6e |p = nl;.|X.return|
|00000fe0| 20 28 54 52 55 45 29 3b | 0a 58 7d 0a 58 0a 2f 2f | (TRUE);|.X}.X.//|
|00000ff0| 45 4e 44 5f 4f 46 5f 46 | 49 4c 45 0a 65 63 68 6f |END_OF_F|ILE.echo|
|00001000| 20 22 45 6e 64 20 6f 66 | 20 61 72 63 68 69 76 65 | "End of| archive|
|00001010| 2e 22 0a 23 20 65 6e 64 | 20 6f 66 20 61 72 63 68 |.".# end| of arch|
|00001020| 69 76 65 2e 0a 65 78 69 | 74 20 30 0a 2d 2d 20 0a |ive..exi|t 0.-- .|
|00001030| 20 5f 2d 2d 5f 7c 5c 20 | 20 50 65 74 65 72 20 64 | _--_|\ | Peter d|
|00001040| 61 20 53 69 6c 76 61 2e | 20 2b 31 20 37 31 33 20 |a Silva.| +1 713 |
|00001050| 32 37 34 20 35 31 38 30 | 2e 20 3c 70 65 74 65 72 |274 5180|. <peter|
|00001060| 40 66 69 63 63 2e 75 75 | 2e 6e 65 74 3e 2e 0a 2f |@ficc.uu|.net>../|
|00001070| 20 20 20 20 20 20 5c 0a | 5c 5f 2e 2d 2d 2e 5f 2f |      \.|\_.--._/|
|00001080| 20 58 65 6e 69 78 20 53 | 75 70 70 6f 72 74 20 2d | Xenix S|upport -|
|00001090| 2d 20 69 74 27 73 20 6e | 6f 74 20 6a 75 73 74 20 |- it's n|ot just |
|000010a0| 61 20 6a 6f 62 2c 20 69 | 74 27 73 20 61 6e 20 61 |a job, i|t's an a|
|000010b0| 64 76 65 6e 74 75 72 65 | 21 0a 20 20 20 20 20 20 |dventure|!.      |
|000010c0| 76 20 20 22 48 61 76 65 | 20 79 6f 75 20 68 75 67 |v  "Have| you hug|
|000010d0| 67 65 64 20 79 6f 75 72 | 20 77 6f 6c 66 20 74 6f |ged your| wolf to|
|000010e0| 64 61 79 3f 22 20 60 2d | 5f 2d 27 0a 0a 0a       |day?" `-|_-'...  |
+--------+-------------------------+-------------------------+--------+--------+