Statistics
| Branch: | Revision:

scoutos / prex-0.9.0 / usr / lib / libc / stdlib / getopt.c @ 03e9c04a

History | View | Annotate | Download (3.45 KB)

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

    
30
#include <unistd.h>
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
}