Return to getopt.c CVS log

Up to [WindowsNT SDKs] / mstools / posix / samples / psxarc

Annotation of mstools/posix/samples/psxarc/getopt.c, revision 1.1

1.1     ! root        1: /* got this off net.sources */
        !             2: #include <stdio.h>
        !             3: #include <string.h>
        !             4: #include "getopt.h"
        !             5: 
        !             6: /*
        !             7:  * get option letter from argument vector
        !             8:  */
        !             9: int
        !            10:        opterr = 1,             // should error messages be printed?
        !            11:        optind = 1,             // index into parent argv vector
        !            12:        optopt;                 // character checked for validity
        !            13: char
        !            14:        *optarg;                // argument associated with option
        !            15: 
        !            16: #define EMSG   ""
        !            17: 
        !            18: char *progname;                        // may also be defined elsewhere
        !            19: 
        !            20: static void
        !            21: error(char *pch)
        !            22: {
        !            23:        if (!opterr) {
        !            24:                return;         // without printing
        !            25:        }
        !            26:        fprintf(stderr, "%s: %s: %c\n",
        !            27:                (NULL != progname) ? progname : "getopt", pch, optopt);
        !            28: }
        !            29: 
        !            30: int
        !            31: getopt(int argc, char **argv, char *ostr)
        !            32: {
        !            33:        static char *place = EMSG;      /* option letter processing */
        !            34:        register char *oli;                     /* option letter list index */
        !            35: 
        !            36:        if (!*place) {
        !            37:                // update scanning pointer
        !            38:                if (optind >= argc || *(place = argv[optind]) != '-' || !*++place) {
        !            39:                        return EOF; 
        !            40:                }
        !            41:                if (*place == '-') {
        !            42:                        // found "--"
        !            43:                        ++optind;
        !            44:                        return EOF;
        !            45:                }
        !            46:        }
        !            47: 
        !            48:        /* option letter okay? */
        !            49:        if ((optopt = (int)*place++) == (int)':'
        !            50:                || !(oli = strchr(ostr, optopt))) {
        !            51:                if (!*place) {
        !            52:                        ++optind;
        !            53:                }
        !            54:                error("illegal option");
        !            55:                return BADCH;
        !            56:        }
        !            57:        if (*++oli != ':') {    
        !            58:                /* don't need argument */
        !            59:                optarg = NULL;
        !            60:                if (!*place)
        !            61:                        ++optind;
        !            62:        } else {
        !            63:                /* need an argument */
        !            64:                if (*place) {
        !            65:                        optarg = place;         /* no white space */
        !            66:                } else  if (argc <= ++optind) {
        !            67:                        /* no arg */
        !            68:                        place = EMSG;
        !            69:                        error("option requires an argument");
        !            70:                        return BADCH;
        !            71:                } else {
        !            72:                        optarg = argv[optind];          /* white space */
        !            73:                }
        !            74:                place = EMSG;
        !            75:                ++optind;
        !            76:        }
        !            77:        return optopt;                  // return option letter
        !            78: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.