home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The World of Computer Software
/
World_Of_Computer_Software-02-387-Vol-3of3.iso
/
d
/
dshar116.zip
/
GETOPT.C
< prev
next >
Wrap
C/C++ Source or Header
|
1993-03-08
|
1KB
|
62 lines
/* Public domain getopt.c, for systems who lacks getopt() */
#include <stdio.h>
#define ERR(as, ac) (opterr && fprintf(stderr, "%s%s%c\n", argv[0], as, ac))
#define strchr index
extern int strcmp();
extern char *strchr();
int opterr = 1;
int optind = 1;
int optopt;
char *optarg;
int getopt(argc, argv, opts)
int argc;
char **argv, *opts;
{
static int sp = 1;
register int c;
register char *cp;
if(sp == 1){
if(optind >= argc ||
argv[optind][0] != '-' || argv[optind][1] == '\0'){
return(EOF);
} else if(strcmp(argv[optind], "--") == NULL){
optind++;
return(EOF);
}
}
optopt = c = argv[optind][sp];
if(c == ':' || (cp = strchr(opts, c)) == NULL){
ERR(": unknown option, -", c);
if(argv[optind][++sp] == '\0'){
optind++;
sp = 1;
}
return('?');
}
if(*++cp == ':'){
if(argv[optind][sp + 1] != '\0'){
optarg = &argv[optind++][sp + 1];
} else if(++optind >= argc){
ERR(": argument missing for -", c);
sp = 1;
return('?');
} else {
optarg = argv[optind++];
}
sp = 1;
} else {
if(argv[optind][++sp] == '\0'){
sp = 1;
optind++;
}
optarg = NULL;
}
return(c);
}