home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 May / W2KPRK.iso / apps / posix / source / PAX / GETOPT.C < prev    next >
Encoding:
C/C++ Source or Header  |  1999-11-17  |  2.0 KB  |  109 lines
  1. /*
  2.     getopt.c
  3.  
  4.     modified public-domain AT&T getopt(3)
  5. */
  6.  
  7. #include <stdio.h>
  8. #include <string.h>
  9.  
  10. #ifdef _POSIX_SOURCE
  11. #    include <unistd.h>
  12. #else
  13. #    define STDERR_FILENO 2
  14. #    ifdef __STDC__
  15.         extern int write (int fildes, char * buf, unsigned nbyte);
  16. #    else
  17.         extern int write ();
  18. #    endif
  19. #endif
  20.  
  21. int opterr = 1;
  22. int optind = 1;
  23. int optopt;
  24. char * optarg;
  25.  
  26. #ifdef __STDC__
  27.     static void ERR (char ** argv, char * s, char c)
  28. #else
  29.     static void ERR (argv, s, c)
  30.     char ** argv, * s, c;
  31. #endif
  32. {
  33.     char errbuf[2];
  34.  
  35. #ifdef DF_TRACE_DEBUG
  36. printf("DF_TRACE_DEBUG:     static void ERR () in getopt.c\n");
  37. #endif
  38.     if (opterr)
  39.     {
  40.         errbuf[0] = c;
  41.         errbuf[1] = '\n';
  42.         (void) write(STDERR_FILENO,argv[0],strlen(argv[0]));
  43.         (void) write(STDERR_FILENO,s,strlen(s));
  44.         (void) write(STDERR_FILENO,errbuf,sizeof errbuf);
  45.     }
  46. }
  47.  
  48. #ifdef __STDC__
  49.     int getopt (int argc, char ** argv, char * opts)
  50. #else
  51.     int getopt (argc, argv, opts)
  52.     int argc;
  53.     char ** argv, * opts;
  54. #endif
  55. {
  56.     static int sp = 1, error = (int) '?';
  57.     static char sw = '-', eos = '\0', arg = ':';
  58.     register char c, * cp;
  59.  
  60. #ifdef DF_TRACE_DEBUG
  61. printf("DF_TRACE_DEBUG:     int getopt () in getopt.c\n");
  62. #endif
  63.     if (sp == 1)
  64.         if (optind >= argc || argv[optind][0] != sw
  65.         || argv[optind][1] == eos)
  66.             return EOF;
  67.         else if (strcmp(argv[optind],"--") == 0)
  68.         {
  69.             optind++;
  70.             return EOF;
  71.         }
  72.     c = argv[optind][sp];
  73.     optopt = (int) c;
  74.     if (c == arg || (cp = strchr(opts,c)) == NULL)
  75.     {
  76.         ERR(argv,": illegal option--",c);
  77.         if (argv[optind][++sp] == eos)
  78.         {
  79.             optind++;
  80.             sp = 1;
  81.         }
  82.         return error;
  83.     }
  84.     else if (*++cp == arg)
  85.     {
  86.         if (argv[optind][sp + 1] != eos)
  87.             optarg = &argv[optind++][sp + 1];
  88.         else if (++optind >= argc)
  89.         {
  90.             ERR(argv,": option requires an argument--",c);
  91.             sp = 1;
  92.             return error;
  93.         }
  94.         else
  95.             optarg = argv[optind++];
  96.         sp = 1;
  97.     }
  98.     else
  99.     {
  100.         if (argv[optind][++sp] == eos)
  101.         {
  102.             sp = 1;
  103.             optind++;
  104.         }
  105.         optarg = NULL;
  106.     }
  107.     return (int) c;
  108. }
  109.