Return to getopt.c CVS log

Up to [local] / prex-old / usr / lib / libc / stdlib

Annotation of prex-old/usr/lib/libc/stdlib/getopt.c, Revision 1.1.1.1.2.1

1.1       nbrk        1: /*
                      2:  * Copyright (c) 1987, 1993, 1994
                      3:  *     The Regents of the University of California.  All rights reserved.
                      4:  *
                      5:  * Redistribution and use in source and binary forms, with or without
                      6:  * modification, are permitted provided that the following conditions
                      7:  * are met:
                      8:  * 1. Redistributions of source code must retain the above copyright
                      9:  *    notice, this list of conditions and the following disclaimer.
                     10:  * 2. Redistributions in binary form must reproduce the above copyright
                     11:  *    notice, this list of conditions and the following disclaimer in the
                     12:  *    documentation and/or other materials provided with the distribution.
                     13:  * 3. Neither the name of the University nor the names of its contributors
                     14:  *    may be used to endorse or promote products derived from this software
                     15:  *    without specific prior written permission.
                     16:  *
                     17:  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
                     18:  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
                     19:  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
                     20:  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
                     21:  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
                     22:  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
                     23:  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
                     24:  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
                     25:  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
                     26:  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
                     27:  * SUCH DAMAGE.
                     28:  */
                     29:
1.1.1.1.2.1! nbrk       30: #include <unistd.h>
1.1       nbrk       31: #include <stdio.h>
                     32: #include <stdlib.h>
                     33: #include <string.h>
                     34:
                     35: int    opterr = 1,             /* if error message should be printed */
                     36:        optind = 1,             /* index into parent argv vector */
                     37:        optopt,                 /* character checked for validity */
                     38:        optreset;               /* reset getopt */
                     39: char   *optarg;                /* argument associated with option */
                     40:
                     41: #define        BADCH   (int)'?'
                     42: #define        BADARG  (int)':'
                     43: #define        EMSG    ""
                     44:
                     45: /*
                     46:  * getopt --
                     47:  *     Parse argc/argv argument vector.
                     48:  */
                     49: int
                     50: getopt(int nargc, char * const nargv[], const char *ostr)
                     51: {
                     52: #if 0
                     53:        extern char *__progname;
                     54: #endif
                     55:        static char *place = EMSG;              /* option letter processing */
                     56:        char *oli;                              /* option letter list index */
                     57:
                     58:        if (optreset || !*place) {              /* update scanning pointer */
                     59:                optreset = 0;
                     60:                if (optind >= nargc || *(place = nargv[optind]) != '-') {
                     61:                        place = EMSG;
                     62:                        return (-1);
                     63:                }
                     64:                if (place[1] && *++place == '-') {      /* found "--" */
                     65:                        ++optind;
                     66:                        place = EMSG;
                     67:                        return (-1);
                     68:                }
                     69:        }                                       /* option letter okay? */
                     70:        if ((optopt = (int)*place++) == (int)':' ||
                     71:            !(oli = strchr(ostr, optopt))) {
                     72:                /*
                     73:                 * if the user didn't specify '-' as an option,
                     74:                 * assume it means -1.
                     75:                 */
                     76:                if (optopt == (int)'-')
                     77:                        return (-1);
                     78:                if (!*place)
                     79:                        ++optind;
                     80: #if 0
                     81:                if (opterr && *ostr != ':')
                     82:                        (void)fprintf(stderr,
                     83:                            "%s: illegal option -- %c\n", __progname, optopt);
                     84: #endif
                     85:                return (BADCH);
                     86:        }
                     87:        if (*++oli != ':') {                    /* don't need argument */
                     88:                optarg = NULL;
                     89:                if (!*place)
                     90:                        ++optind;
                     91:        }
                     92:        else {                                  /* need an argument */
                     93:                if (*place)                     /* no white space */
                     94:                        optarg = place;
                     95:                else if (nargc <= ++optind) {   /* no arg */
                     96:                        place = EMSG;
                     97:                        if (*ostr == ':')
                     98:                                return (BADARG);
                     99: #if 0
                    100:                        if (opterr)
                    101:                                (void)fprintf(stderr,
                    102:                                    "%s: option requires an argument -- %c\n",
                    103:                                    __progname, optopt);
                    104: #endif
                    105:                        return (BADCH);
                    106:                }
                    107:                else                            /* white space */
                    108:                        optarg = nargv[optind];
                    109:                place = EMSG;
                    110:                ++optind;
                    111:        }
                    112:        return (optopt);                        /* dump back option letter */
                    113: }