/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / usenet / altsrcs / 3 / 3399

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 46 72 6f 6d 3a 20 72 6f | 62 65 72 74 40 69 73 67 |From: ro|bert@isg|
|00000010| 74 65 63 2e 55 55 43 50 | 20 28 52 6f 62 65 72 74 |tec.UUCP| (Robert|
|00000020| 20 4f 73 62 6f 72 6e 65 | 29 0a 4e 65 77 73 67 72 | Osborne|).Newsgr|
|00000030| 6f 75 70 73 3a 20 61 6c | 74 2e 73 6f 75 72 63 65 |oups: al|t.source|
|00000040| 73 0a 53 75 62 6a 65 63 | 74 3a 20 52 65 3a 20 79 |s.Subjec|t: Re: y|
|00000050| 65 74 20 41 6e 6f 74 68 | 65 72 20 74 65 73 74 20 |et Anoth|er test |
|00000060| 41 4e 44 20 61 20 50 44 | 20 67 65 74 6f 70 74 0a |AND a PD| getopt.|
|00000070| 4d 65 73 73 61 67 65 2d | 49 44 3a 20 3c 31 30 37 |Message-|ID: <107|
|00000080| 34 40 69 73 67 74 65 63 | 2e 55 55 43 50 3e 0a 44 |4@isgtec|.UUCP>.D|
|00000090| 61 74 65 3a 20 32 31 20 | 4d 61 79 20 39 31 20 31 |ate: 21 |May 91 1|
|000000a0| 35 3a 30 37 3a 33 31 20 | 47 4d 54 0a 0a 49 6e 20 |5:07:31 |GMT..In |
|000000b0| 61 72 74 69 63 6c 65 20 | 3c 72 65 6d 75 73 40 70 |article |<remus@p|
|000000c0| 61 75 6c 2e 61 6c 70 68 | 61 2e 65 64 75 3e 2c 20 |aul.alph|a.edu>, |
|000000d0| 64 65 6e 76 40 6e 79 77 | 75 20 77 72 69 74 65 73 |denv@nyw|u writes|
|000000e0| 3a 0a 7c 3e 20 74 68 69 | 73 20 69 73 20 6a 75 73 |:.|> thi|s is jus|
|000000f0| 74 20 61 20 74 65 73 74 | 2e 0a 0a 57 68 79 20 69 |t a test|...Why i|
|00000100| 73 20 74 68 69 73 20 69 | 6e 20 61 6c 74 2e 73 6f |s this i|n alt.so|
|00000110| 75 72 63 65 73 3f 20 20 | 49 74 20 77 61 73 20 63 |urces?  |It was c|
|00000120| 72 6f 73 73 70 6f 73 74 | 65 64 20 74 6f 20 61 6c |rosspost|ed to al|
|00000130| 74 2e 74 65 73 74 2c 20 | 73 6f 20 6f 62 76 69 6f |t.test, |so obvio|
|00000140| 75 73 6c 79 0a 69 74 27 | 73 20 6d 6f 72 65 20 74 |usly.it'|s more t|
|00000150| 68 61 6e 20 6a 75 73 74 | 20 74 68 65 20 66 61 63 |han just| the fac|
|00000160| 74 20 74 68 61 74 20 79 | 6f 75 27 72 65 20 61 20 |t that y|ou're a |
|00000170| 6d 6f 72 6f 6e 2e 20 20 | 57 68 79 20 70 6f 73 74 |moron.  |Why post|
|00000180| 20 61 20 74 65 73 74 0a | 77 68 79 20 6e 6f 74 20 | a test.|why not |
|00000190| 70 6f 73 74 20 73 6f 6d | 65 20 73 6f 75 72 63 65 |post som|e source|
|000001a0| 73 3f 0a 0a 52 6f 62 2e | 0a 0a 4f 42 2e 20 53 6f |s?..Rob.|..OB. So|
|000001b0| 75 72 63 65 0a 0a 48 65 | 72 65 20 69 73 20 61 20 |urce..He|re is a |
|000001c0| 67 65 74 6f 70 74 20 49 | 20 77 72 6f 74 65 20 28 |getopt I| wrote (|
|000001d0| 6e 6f 77 20 50 44 29 20 | 62 65 63 61 75 73 65 20 |now PD) |because |
|000001e0| 54 75 72 62 6f 20 43 20 | 64 6f 65 73 6e 27 74 20 |Turbo C |doesn't |
|000001f0| 68 61 76 65 20 6f 6e 65 | 21 0a 28 4d 61 79 62 65 |have one|!.(Maybe|
|00000200| 20 74 68 65 79 27 6c 6c | 20 70 75 74 20 74 68 69 | they'll| put thi|
|00000210| 73 20 6f 6e 65 20 69 6e | 74 6f 20 74 68 65 69 72 |s one in|to their|
|00000220| 20 6c 69 62 72 61 72 69 | 65 73 20 6e 6f 77 20 3a | librari|es now :|
|00000230| 2d 29 0a 0a 23 21 2f 62 | 69 6e 2f 73 68 0a 23 20 |-)..#!/b|in/sh.# |
|00000240| 54 68 69 73 20 69 73 20 | 61 20 73 68 65 6c 6c 20 |This is |a shell |
|00000250| 61 72 63 68 69 76 65 20 | 28 70 72 6f 64 75 63 65 |archive |(produce|
|00000260| 64 20 62 79 20 73 68 61 | 72 20 33 2e 34 39 29 0a |d by sha|r 3.49).|
|00000270| 23 20 54 6f 20 65 78 74 | 72 61 63 74 20 74 68 65 |# To ext|ract the|
|00000280| 20 66 69 6c 65 73 20 66 | 72 6f 6d 20 74 68 69 73 | files f|rom this|
|00000290| 20 61 72 63 68 69 76 65 | 2c 20 73 61 76 65 20 69 | archive|, save i|
|000002a0| 74 20 74 6f 20 61 20 66 | 69 6c 65 2c 20 72 65 6d |t to a f|ile, rem|
|000002b0| 6f 76 65 0a 23 20 65 76 | 65 72 79 74 68 69 6e 67 |ove.# ev|erything|
|000002c0| 20 61 62 6f 76 65 20 74 | 68 65 20 22 21 2f 62 69 | above t|he "!/bi|
|000002d0| 6e 2f 73 68 22 20 6c 69 | 6e 65 20 61 62 6f 76 65 |n/sh" li|ne above|
|000002e0| 2c 20 61 6e 64 20 74 79 | 70 65 20 22 73 68 20 66 |, and ty|pe "sh f|
|000002f0| 69 6c 65 5f 6e 61 6d 65 | 22 2e 0a 23 0a 23 20 6d |ile_name|"..#.# m|
|00000300| 61 64 65 20 30 35 2f 32 | 31 2f 31 39 39 31 20 31 |ade 05/2|1/1991 1|
|00000310| 35 3a 30 31 20 55 54 43 | 20 62 79 20 72 6f 62 65 |5:01 UTC| by robe|
|00000320| 72 74 40 69 73 67 74 65 | 63 2e 55 55 43 50 0a 23 |rt@isgte|c.UUCP.#|
|00000330| 20 53 6f 75 72 63 65 20 | 64 69 72 65 63 74 6f 72 | Source |director|
|00000340| 79 20 2f 74 6d 70 5f 6d | 6e 74 2f 68 6f 6d 65 2f |y /tmp_m|nt/home/|
|00000350| 6a 6f 6b 65 72 31 2f 72 | 6f 62 65 72 74 2f 74 65 |joker1/r|obert/te|
|00000360| 73 74 2f 67 65 74 6f 70 | 74 0a 23 0a 23 20 65 78 |st/getop|t.#.# ex|
|00000370| 69 73 74 69 6e 67 20 66 | 69 6c 65 73 20 77 69 6c |isting f|iles wil|
|00000380| 6c 20 4e 4f 54 20 62 65 | 20 6f 76 65 72 77 72 69 |l NOT be| overwri|
|00000390| 74 74 65 6e 20 75 6e 6c | 65 73 73 20 2d 63 20 69 |tten unl|ess -c i|
|000003a0| 73 20 73 70 65 63 69 66 | 69 65 64 0a 23 0a 23 20 |s specif|ied.#.# |
|000003b0| 54 68 69 73 20 73 68 61 | 72 20 63 6f 6e 74 61 69 |This sha|r contai|
|000003c0| 6e 73 3a 0a 23 20 6c 65 | 6e 67 74 68 20 20 6d 6f |ns:.# le|ngth  mo|
|000003d0| 64 65 20 20 20 20 20 20 | 20 6e 61 6d 65 0a 23 20 |de      | name.# |
|000003e0| 2d 2d 2d 2d 2d 2d 20 2d | 2d 2d 2d 2d 2d 2d 2d 2d |------ -|--------|
|000003f0| 2d 20 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |- ------|--------|
|00000400| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000410| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0a 23 20 20 |--------|----.#  |
|00000420| 20 31 38 37 30 20 2d 72 | 77 2d 72 77 2d 72 2d 2d | 1870 -r|w-rw-r--|
|00000430| 20 67 65 74 6f 70 74 2e | 63 0a 23 0a 23 20 3d 3d | getopt.|c.#.# ==|
|00000440| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 20 67 65 74 6f |========|=== geto|
|00000450| 70 74 2e 63 20 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |pt.c ===|========|
|00000460| 3d 3d 3d 0a 69 66 20 74 | 65 73 74 20 2d 66 20 27 |===.if t|est -f '|
|00000470| 67 65 74 6f 70 74 2e 63 | 27 20 2d 61 20 58 22 24 |getopt.c|' -a X"$|
|00000480| 31 22 20 21 3d 20 58 22 | 2d 63 22 3b 20 74 68 65 |1" != X"|-c"; the|
|00000490| 6e 0a 09 65 63 68 6f 20 | 27 78 20 2d 20 73 6b 69 |n..echo |'x - ski|
|000004a0| 70 70 69 6e 67 20 67 65 | 74 6f 70 74 2e 63 20 28 |pping ge|topt.c (|
|000004b0| 46 69 6c 65 20 61 6c 72 | 65 61 64 79 20 65 78 69 |File alr|eady exi|
|000004c0| 73 74 73 29 27 0a 65 6c | 73 65 0a 65 63 68 6f 20 |sts)'.el|se.echo |
|000004d0| 27 78 20 2d 20 65 78 74 | 72 61 63 74 69 6e 67 20 |'x - ext|racting |
|000004e0| 67 65 74 6f 70 74 2e 63 | 20 28 54 65 78 74 29 27 |getopt.c| (Text)'|
|000004f0| 0a 73 65 64 20 27 73 2f | 5e 58 2f 2f 27 20 3c 3c |.sed 's/|^X//' <<|
|00000500| 20 27 53 48 41 52 5f 45 | 4f 46 27 20 3e 20 27 67 | 'SHAR_E|OF' > 'g|
|00000510| 65 74 6f 70 74 2e 63 27 | 20 26 26 0a 2f 2a 0a 2a |etopt.c'| &&./*.*|
|00000520| 2a 09 54 68 69 73 20 67 | 65 74 6f 70 74 20 62 65 |*.This g|etopt be|
|00000530| 68 61 76 65 73 20 70 72 | 65 74 74 79 20 6d 75 63 |haves pr|etty muc|
|00000540| 68 20 6c 69 6b 65 20 79 | 6f 75 20 77 6f 75 6c 64 |h like y|ou would|
|00000550| 20 65 78 70 65 63 74 2e | 0a 2a 2a 09 49 74 20 64 | expect.|.**.It d|
|00000560| 6f 65 73 20 68 61 6e 64 | 6c 65 20 61 72 67 75 6d |oes hand|le argum|
|00000570| 65 6e 74 73 20 6c 69 6b | 65 20 27 2d 61 62 2d 27 |ents lik|e '-ab-'|
|00000580| 20 61 20 6c 69 74 74 6c | 65 20 64 69 66 66 65 72 | a littl|e differ|
|00000590| 65 6e 74 6c 79 0a 2a 2a | 20 20 74 68 65 6e 20 6e |ently.**|  then n|
|000005a0| 6f 72 6d 61 6c 3b 20 20 | 49 20 74 68 69 6e 6b 20 |ormal;  |I think |
|000005b0| 74 68 65 20 2d 2d 20 27 | 73 74 6f 70 20 6f 70 74 |the -- '|stop opt|
|000005c0| 69 6f 6e 20 70 72 6f 63 | 65 73 73 69 6e 67 27 20 |ion proc|essing' |
|000005d0| 73 68 6f 75 6c 64 0a 2a | 2a 20 20 62 65 20 74 72 |should.*|*  be tr|
|000005e0| 65 61 74 65 64 20 6c 69 | 6b 65 20 6a 75 73 74 20 |eated li|ke just |
|000005f0| 61 6e 6f 74 68 65 72 20 | 6f 70 74 69 6f 6e 2c 20 |another |option, |
|00000600| 20 73 6f 20 74 68 61 74 | 27 73 20 77 68 61 74 20 | so that|'s what |
|00000610| 6d 69 6e 65 20 64 6f 65 | 73 2e 0a 2a 2a 20 20 4f |mine doe|s..**  O|
|00000620| 74 68 65 72 20 67 65 74 | 6f 70 74 73 20 73 65 65 |ther get|opts see|
|00000630| 6d 20 74 6f 20 69 67 6e | 6f 72 65 20 74 68 65 20 |m to ign|ore the |
|00000640| 73 65 63 6f 6e 64 20 27 | 2d 27 20 69 6e 20 27 2d |second '|-' in '-|
|00000650| 61 62 2d 27 2e 0a 2a 2a | 0a 2a 2a 20 20 49 20 68 |ab-'..**|.**  I h|
|00000660| 65 72 65 62 79 20 70 6c | 61 63 65 20 74 68 69 73 |ereby pl|ace this|
|00000670| 20 76 65 72 73 69 6f 6e | 20 6f 66 20 67 65 74 6f | version| of geto|
|00000680| 70 74 20 69 6e 0a 2a 2a | 20 20 74 68 65 20 70 75 |pt in.**|  the pu|
|00000690| 62 6c 69 63 20 64 6f 6d | 61 69 6e 2e 20 20 44 6f |blic dom|ain.  Do|
|000006a0| 20 77 69 74 68 20 74 68 | 69 73 20 77 68 61 74 20 | with th|is what |
|000006b0| 79 6f 75 20 77 69 6c 6c | 2e 0a 2a 2a 20 20 49 27 |you will|..**  I'|
|000006c0| 6d 20 73 75 72 65 20 74 | 68 65 72 65 20 69 73 20 |m sure t|here is |
|000006d0| 61 20 6e 69 63 65 72 20 | 61 6e 64 20 66 61 73 74 |a nicer |and fast|
|000006e0| 65 72 20 76 65 72 73 69 | 6f 6e 20 6f 75 74 20 74 |er versi|on out t|
|000006f0| 68 65 72 65 0a 2a 2a 20 | 20 73 6f 6d 65 77 68 65 |here.** | somewhe|
|00000700| 72 65 20 62 75 74 20 49 | 20 64 6f 6e 27 74 20 63 |re but I| don't c|
|00000710| 61 72 65 21 0a 2a 2a 0a | 2a 2a 20 20 52 6f 62 65 |are!.**.|**  Robe|
|00000720| 72 74 20 4f 73 62 6f 72 | 6e 65 2c 20 4d 61 79 20 |rt Osbor|ne, May |
|00000730| 31 39 39 31 2e 0a 2a 2f | 0a 23 69 6e 63 6c 75 64 |1991..*/|.#includ|
|00000740| 65 20 3c 73 74 64 69 6f | 2e 68 3e 0a 58 0a 69 6e |e <stdio|.h>.X.in|
|00000750| 74 20 6f 70 74 69 6e 64 | 20 3d 20 31 3b 0a 69 6e |t optind| = 1;.in|
|00000760| 74 20 6f 70 74 65 72 72 | 20 3d 20 31 3b 0a 63 68 |t opterr| = 1;.ch|
|00000770| 61 72 20 2a 6f 70 74 61 | 72 67 20 3d 20 28 63 68 |ar *opta|rg = (ch|
|00000780| 61 72 20 2a 29 20 30 3b | 0a 58 0a 73 74 61 74 69 |ar *) 0;|.X.stati|
|00000790| 63 20 63 68 61 72 20 2a | 6e 65 78 74 5f 61 72 67 |c char *|next_arg|
|000007a0| 20 3d 20 28 63 68 61 72 | 20 2a 29 20 30 3b 0a 58 | = (char| *) 0;.X|
|000007b0| 0a 23 64 65 66 69 6e 65 | 20 4e 4f 5f 4f 50 54 09 |.#define| NO_OPT.|
|000007c0| 09 30 0a 23 64 65 66 69 | 6e 65 20 4f 50 54 5f 50 |.0.#defi|ne OPT_P|
|000007d0| 4c 41 49 4e 09 31 0a 23 | 64 65 66 69 6e 65 20 4f |LAIN.1.#|define O|
|000007e0| 50 54 5f 41 52 47 09 09 | 32 0a 58 0a 58 09 0a 69 |PT_ARG..|2.X.X..i|
|000007f0| 6e 74 0a 67 65 74 6f 70 | 74 28 61 72 67 63 2c 20 |nt.getop|t(argc, |
|00000800| 61 72 67 76 2c 20 6f 70 | 74 73 74 72 69 6e 67 29 |argv, op|tstring)|
|00000810| 0a 58 09 69 6e 74 20 61 | 72 67 63 3b 0a 58 09 63 |.X.int a|rgc;.X.c|
|00000820| 68 61 72 20 2a 61 72 67 | 76 5b 5d 3b 0a 58 09 63 |har *arg|v[];.X.c|
|00000830| 68 61 72 20 2a 6f 70 74 | 73 74 72 69 6e 67 3b 0a |har *opt|string;.|
|00000840| 7b 0a 58 09 69 6e 74 20 | 72 65 74 3b 0a 58 09 69 |{.X.int |ret;.X.i|
|00000850| 6e 74 20 77 68 69 63 68 | 20 3d 20 4e 4f 5f 4f 50 |nt which| = NO_OP|
|00000860| 54 3b 0a 58 09 0a 58 09 | 69 66 28 20 6e 65 78 74 |T;.X..X.|if( next|
|00000870| 5f 61 72 67 20 3d 3d 20 | 28 63 68 61 72 20 2a 29 |_arg == |(char *)|
|00000880| 30 20 29 0a 58 09 7b 0a | 58 09 09 69 66 28 20 61 |0 ).X.{.|X..if( a|
|00000890| 72 67 76 5b 6f 70 74 69 | 6e 64 5d 20 3d 3d 20 28 |rgv[opti|nd] == (|
|000008a0| 63 68 61 72 20 2a 29 20 | 30 20 7c 7c 20 61 72 67 |char *) |0 || arg|
|000008b0| 76 5b 6f 70 74 69 6e 64 | 5d 5b 30 5d 20 21 3d 20 |v[optind|][0] != |
|000008c0| 27 2d 27 20 29 0a 58 09 | 09 09 72 65 74 75 72 6e |'-' ).X.|..return|
|000008d0| 20 2d 31 3b 0a 58 09 09 | 6e 65 78 74 5f 61 72 67 | -1;.X..|next_arg|
|000008e0| 20 3d 20 26 61 72 67 76 | 5b 6f 70 74 69 6e 64 5d | = &argv|[optind]|
|000008f0| 5b 31 5d 3b 0a 58 09 7d | 0a 58 09 69 66 28 20 2a |[1];.X.}|.X.if( *|
|00000900| 6e 65 78 74 5f 61 72 67 | 20 3d 3d 20 27 5c 30 27 |next_arg| == '\0'|
|00000910| 20 7c 7c 20 2a 6e 65 78 | 74 5f 61 72 67 20 3d 3d | || *nex|t_arg ==|
|00000920| 20 27 2d 27 20 29 0a 58 | 09 7b 0a 58 09 09 6f 70 | '-' ).X|.{.X..op|
|00000930| 74 69 6e 64 2b 2b 3b 0a | 58 09 09 72 65 74 75 72 |tind++;.|X..retur|
|00000940| 6e 20 2d 31 3b 0a 58 09 | 7d 0a 58 0a 58 09 77 68 |n -1;.X.|}.X.X.wh|
|00000950| 69 6c 65 28 2a 6f 70 74 | 73 74 72 69 6e 67 29 0a |ile(*opt|string).|
|00000960| 58 09 09 69 66 28 20 2a | 6e 65 78 74 5f 61 72 67 |X..if( *|next_arg|
|00000970| 20 3d 3d 20 2a 6f 70 74 | 73 74 72 69 6e 67 2b 2b | == *opt|string++|
|00000980| 20 29 0a 58 09 09 09 77 | 68 69 63 68 20 3d 20 28 | ).X...w|hich = (|
|00000990| 2a 6f 70 74 73 74 72 69 | 6e 67 20 3d 3d 20 27 3a |*optstri|ng == ':|
|000009a0| 27 29 20 3f 20 4f 50 54 | 5f 41 52 47 20 3a 20 4f |') ? OPT|_ARG : O|
|000009b0| 50 54 5f 50 4c 41 49 4e | 3b 0a 58 09 09 09 0a 58 |PT_PLAIN|;.X....X|
|000009c0| 09 73 77 69 74 63 68 28 | 20 77 68 69 63 68 20 29 |.switch(| which )|
|000009d0| 0a 58 09 7b 0a 58 09 63 | 61 73 65 20 4e 4f 5f 4f |.X.{.X.c|ase NO_O|
|000009e0| 50 54 3a 0a 58 09 63 61 | 73 65 20 4f 50 54 5f 50 |PT:.X.ca|se OPT_P|
|000009f0| 4c 41 49 4e 3a 0a 58 09 | 09 72 65 74 20 3d 20 2a |LAIN:.X.|.ret = *|
|00000a00| 6e 65 78 74 5f 61 72 67 | 2b 2b 3b 0a 58 09 09 69 |next_arg|++;.X..i|
|00000a10| 66 28 20 2a 6e 65 78 74 | 5f 61 72 67 20 3d 3d 20 |f( *next|_arg == |
|00000a20| 27 5c 30 27 20 29 0a 58 | 09 09 7b 0a 58 09 09 09 |'\0' ).X|..{.X...|
|00000a30| 6f 70 74 69 6e 64 2b 2b | 3b 0a 58 09 09 09 6e 65 |optind++|;.X...ne|
|00000a40| 78 74 5f 61 72 67 20 3d | 20 28 63 68 61 72 20 2a |xt_arg =| (char *|
|00000a50| 29 30 3b 0a 58 09 09 7d | 0a 58 09 09 69 66 28 20 |)0;.X..}|.X..if( |
|00000a60| 77 68 69 63 68 20 3d 3d | 20 4f 50 54 5f 50 4c 41 |which ==| OPT_PLA|
|00000a70| 49 4e 20 29 0a 58 09 09 | 09 72 65 74 75 72 6e 20 |IN ).X..|.return |
|00000a80| 72 65 74 3b 0a 58 09 09 | 69 66 28 20 6f 70 74 65 |ret;.X..|if( opte|
|00000a90| 72 72 20 29 0a 58 09 09 | 09 66 70 72 69 6e 74 66 |rr ).X..|.fprintf|
|00000aa0| 28 73 74 64 65 72 72 2c | 20 22 25 73 3a 20 69 6c |(stderr,| "%s: il|
|00000ab0| 6c 65 67 61 6c 20 6f 70 | 74 69 6f 6e 20 2d 2d 20 |legal op|tion -- |
|00000ac0| 25 63 5c 6e 22 2c 20 61 | 72 67 76 5b 30 5d 2c 20 |%c\n", a|rgv[0], |
|00000ad0| 72 65 74 29 3b 0a 58 09 | 09 72 65 74 75 72 6e 20 |ret);.X.|.return |
|00000ae0| 27 3f 27 3b 0a 58 09 63 | 61 73 65 20 4f 50 54 5f |'?';.X.c|ase OPT_|
|00000af0| 41 52 47 3a 0a 58 09 09 | 72 65 74 20 3d 20 2a 6e |ARG:.X..|ret = *n|
|00000b00| 65 78 74 5f 61 72 67 2b | 2b 3b 0a 58 09 09 6f 70 |ext_arg+|+;.X..op|
|00000b10| 74 69 6e 64 2b 2b 3b 0a | 58 09 09 69 66 28 20 2a |tind++;.|X..if( *|
|00000b20| 6e 65 78 74 5f 61 72 67 | 20 21 3d 20 27 5c 30 27 |next_arg| != '\0'|
|00000b30| 20 29 0a 58 09 09 7b 0a | 58 09 09 09 6f 70 74 61 | ).X..{.|X...opta|
|00000b40| 72 67 20 3d 20 6e 65 78 | 74 5f 61 72 67 3b 0a 58 |rg = nex|t_arg;.X|
|00000b50| 09 09 09 6e 65 78 74 5f | 61 72 67 20 3d 20 28 63 |...next_|arg = (c|
|00000b60| 68 61 72 20 2a 29 30 3b | 0a 58 09 09 09 72 65 74 |har *)0;|.X...ret|
|00000b70| 75 72 6e 20 72 65 74 3b | 0a 58 09 09 7d 0a 58 09 |urn ret;|.X..}.X.|
|00000b80| 09 65 6c 73 65 20 69 66 | 28 20 61 72 67 76 5b 6f |.else if|( argv[o|
|00000b90| 70 74 69 6e 64 5d 20 21 | 3d 20 28 63 68 61 72 20 |ptind] !|= (char |
|00000ba0| 2a 29 20 30 20 29 0a 58 | 09 09 7b 0a 58 09 09 09 |*) 0 ).X|..{.X...|
|00000bb0| 6f 70 74 61 72 67 20 3d | 20 61 72 67 76 5b 6f 70 |optarg =| argv[op|
|00000bc0| 74 69 6e 64 5d 3b 0a 58 | 09 09 09 6f 70 74 69 6e |tind];.X|...optin|
|00000bd0| 64 2b 2b 3b 0a 58 09 09 | 09 6e 65 78 74 5f 61 72 |d++;.X..|.next_ar|
|00000be0| 67 20 3d 20 28 63 68 61 | 72 20 2a 29 20 30 3b 0a |g = (cha|r *) 0;.|
|00000bf0| 58 09 09 09 72 65 74 75 | 72 6e 20 72 65 74 3b 0a |X...retu|rn ret;.|
|00000c00| 58 09 09 7d 0a 58 09 09 | 65 6c 73 65 0a 58 09 09 |X..}.X..|else.X..|
|00000c10| 7b 0a 58 09 09 09 6e 65 | 78 74 5f 61 72 67 20 3d |{.X...ne|xt_arg =|
|00000c20| 20 28 63 68 61 72 20 2a | 29 20 30 3b 0a 58 09 09 | (char *|) 0;.X..|
|00000c30| 09 69 66 28 20 6f 70 74 | 65 72 72 20 29 0a 58 09 |.if( opt|err ).X.|
|00000c40| 09 09 09 66 70 72 69 6e | 74 66 28 73 74 64 65 72 |...fprin|tf(stder|
|00000c50| 72 2c 20 22 25 73 3a 20 | 6f 70 74 69 6f 6e 20 72 |r, "%s: |option r|
|00000c60| 65 71 75 69 72 65 73 20 | 61 6e 20 6f 70 74 69 6f |equires |an optio|
|00000c70| 6e 20 2d 2d 20 25 63 5c | 6e 22 2c 0a 58 09 09 09 |n -- %c\|n",.X...|
|00000c80| 09 09 09 61 72 67 76 5b | 30 5d 2c 20 72 65 74 29 |...argv[|0], ret)|
|00000c90| 3b 0a 58 09 09 09 72 65 | 74 75 72 6e 20 27 3f 27 |;.X...re|turn '?'|
|00000ca0| 3b 0a 58 09 09 7d 0a 58 | 09 7d 0a 7d 0a 53 48 41 |;.X..}.X|.}.}.SHA|
|00000cb0| 52 5f 45 4f 46 0a 63 68 | 6d 6f 64 20 30 36 36 34 |R_EOF.ch|mod 0664|
|00000cc0| 20 67 65 74 6f 70 74 2e | 63 20 7c 7c 0a 65 63 68 | getopt.|c ||.ech|
|00000cd0| 6f 20 27 72 65 73 74 6f | 72 65 20 6f 66 20 67 65 |o 'resto|re of ge|
|00000ce0| 74 6f 70 74 2e 63 20 66 | 61 69 6c 65 64 27 0a 57 |topt.c f|ailed'.W|
|00000cf0| 63 5f 63 3d 22 60 77 63 | 20 2d 63 20 3c 20 27 67 |c_c="`wc| -c < 'g|
|00000d00| 65 74 6f 70 74 2e 63 27 | 60 22 0a 74 65 73 74 20 |etopt.c'|`".test |
|00000d10| 31 38 37 30 20 2d 65 71 | 20 22 24 57 63 5f 63 22 |1870 -eq| "$Wc_c"|
|00000d20| 20 7c 7c 0a 09 65 63 68 | 6f 20 27 67 65 74 6f 70 | ||..ech|o 'getop|
|00000d30| 74 2e 63 3a 20 6f 72 69 | 67 69 6e 61 6c 20 73 69 |t.c: ori|ginal si|
|00000d40| 7a 65 20 31 38 37 30 2c | 20 63 75 72 72 65 6e 74 |ze 1870,| current|
|00000d50| 20 73 69 7a 65 27 20 22 | 24 57 63 5f 63 22 0a 66 | size' "|$Wc_c".f|
|00000d60| 69 0a 65 78 69 74 20 30 | 0a                      |i.exit 0|.       |
+--------+-------------------------+-------------------------+--------+--------+