109 lines
3.4 KiB
C
Executable File
109 lines
3.4 KiB
C
Executable File
/***************************************************************************
|
|
* *
|
|
* Copyright 2012 LSI Corporation. All rights reserved. *
|
|
* *
|
|
* This file is confidential and a trade secret of LSI Corporation. The *
|
|
* receipt of or possession of this file does not convey any rights to *
|
|
* reproduce or disclose its contents or to manufacture, use, or sell *
|
|
* anything it may describe, in whole, or in part, without the specific *
|
|
* written consent of LSI Corporation. *
|
|
* *
|
|
***************************************************************************
|
|
*/
|
|
#include "inc/getopt.h"
|
|
|
|
/* This function gets the next option letter from the console input.
|
|
It is supposed to be equivalent to the UNIX getopt function.
|
|
Options are preceeded by a dash, currently a slash is not allowed.
|
|
Multiple options after one dash are valid, and arguments after
|
|
the option with a colon between are supported.*/
|
|
|
|
/* Common varibles. */
|
|
|
|
int opterr = 1, /* error messages printed? default: yes */
|
|
optind = 1, /* index into parent argv vector */
|
|
optopt; /* character checked for validity */
|
|
|
|
char *optarg; /* argument associated with option */
|
|
|
|
#define EMSG ""
|
|
|
|
char *progname; /* may also be defined elsewhere */
|
|
|
|
|
|
static void
|
|
error(char *pch) /* error message routine */
|
|
{
|
|
if (!opterr)
|
|
return; /* without printing */
|
|
|
|
fprintf(stderr, "%s: %s: %c\n",
|
|
((NULL != progname) ? progname : "getopt"), pch, optopt);
|
|
}
|
|
|
|
|
|
int
|
|
getopt(int argc, char *argv[], char *ostr)
|
|
{
|
|
static char *place = EMSG; /* option letter processing */
|
|
char *oli; /* option letter list index */
|
|
|
|
progname = argv[0];
|
|
|
|
if (!*place)
|
|
{ /* update scanning pointer */
|
|
if (optind >= argc ||
|
|
(*(place = argv[optind]) != '-' &&
|
|
*(place = argv[optind]) != '/') ||
|
|
!*++place)
|
|
{
|
|
return EOF;
|
|
}
|
|
if (*place == '-')
|
|
{ /* found "--"; ignore; (end of options) */
|
|
++optind;
|
|
return EOF;
|
|
}
|
|
}
|
|
|
|
/* option letter okay? */
|
|
optopt = (int)*place;
|
|
++place;
|
|
oli = strchr(ostr, optopt);
|
|
if ((optopt == (int)':') ||
|
|
!(oli = strchr(ostr, optopt)))
|
|
{
|
|
if (!*place)
|
|
++optind;
|
|
|
|
error("illegal option");
|
|
return BADCH;
|
|
}
|
|
|
|
if (*++oli != ':') /* Check for argument after option */
|
|
{ /* don't need argument */
|
|
optarg = NULL;
|
|
if (!*place)
|
|
++optind;
|
|
}
|
|
else
|
|
{ /* need an argument */
|
|
if (*place)
|
|
optarg = place; /* no white space */
|
|
else
|
|
if (argc <= ++optind)
|
|
{ /* no arg */
|
|
place = EMSG;
|
|
error("option requires an argument");
|
|
return BADCH;
|
|
}
|
|
else
|
|
optarg = argv[optind]; /* white space */
|
|
place = EMSG;
|
|
++optind;
|
|
}
|
|
return optopt; /* return option letter */
|
|
}
|
|
|
|
/* vi: set sw=4 ts=4 sts=4 et :iv */
|