codec/getopt.c

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