]>
cloudbase.mooo.com Git - z180-stamp.git/blob - avr/getopt-min.c
2 * Minimum getopt, original version was:
6 getopt -- public domain version of standard System V routine
8 Strictly enforces the System V Command Syntax Standard;
9 provided by D A Gwyn of BRL for generic ANSI C implementations
11 /* $Id: getopt.c,v 1.2 1992/12/07 11:12:52 nickc Exp $ */
13 #include "common.h" /* definition of FLASH */
16 int optind
= 0; /* next argv[] index */
17 char *optarg
; /* option parameter if any */
21 getopt( /* returns letter, '?', EOF */
22 int argc
, /* argument count from main */
23 char *const argv
[], /* argument vector from main */
24 const FLASH
char *optstring
) /* allowed args, e.g. "ab:c" */
26 static int sp
; /* position within argument */
27 int osp
; /* saved `sp' for param test */
28 int c
; /* option letter */
29 const FLASH
char *cp
; /* -> option in `optstring' */
32 if (optind
== 0) { /* start a new argument scan */
37 if ( sp
== 1 ) /* fresh argument */
39 if ( optind
>= argc
/* no more arguments */
40 || argv
[optind
][0] != '-' /* no more options */
41 || argv
[optind
][1] == '\0' /* not option; stdin */
46 c
= argv
[optind
][sp
]; /* option letter */
47 osp
= sp
++; /* get ready for next letter */
49 if ( argv
[optind
][sp
] == '\0' ) /* end of argument */
51 ++optind
; /* get ready for next try */
52 sp
= 1; /* beginning of next argument */
55 if ( c
== ':' /* optstring syntax conflict */
56 || (cp
= strchr_P( optstring
, c
)) == NULL
/* not found */
60 if ( cp
[1] == ':' ) /* option takes parameter */
65 if ( sp
!= 1 ) /* reset by end of argument */
71 optarg
= argv
[optind
]; /* make parameter available */
72 ++optind
; /* skip over parameter */