1 /*
2  * Copyright (c) 2002 Todd C. Miller <millert@openbsd.org>
3  *
4  * Permission to use, copy, modify, and distribute this software for any
5  * purpose with or without fee is hereby granted, provided that the above
6  * copyright notice and this permission notice appear in all copies.
7  *
8  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
9  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
10  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
11  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
12  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
13  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
14  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
15  *
16  * Sponsored in part by the Defense Advanced Research Projects
17  * Agency (DARPA) and Air Force Research Laboratory, Air Force
18  * Materiel Command, USAF, under agreement number F39502-99-1-0512.
19  */
20 
21 #include <stdio.h>
22 #include <stdlib.h>
23 #include <getopt.h>
24 
25 /*
26  * Simple getopt_long() and getopt_long_only() excerciser.
27  * ENVIRONMENT:
28  *	LONG_ONLY	: use getopt_long_only() (default is getopt_long())
29  *	POSIXLY_CORRECT	: don't permute args
30  */
31 
32 int
33 main(int argc, char **argv)
34 {
35 	int ch, idx, goggles;
36 	int (*gl)(int, char * const *, const char *, const struct option *, int *);
37 	struct option longopts[] = {
38 		{ "force", no_argument, 0, 0 },
39 		{ "fast", no_argument, 0, '1' },
40 		{ "best", no_argument, 0, '9' },
41 		{ "input", required_argument, 0, 'i' },
42 		{ "illiterate", no_argument, 0, 0 },
43 		{ "drinking", required_argument, &goggles, 42 },
44 		{ "help", no_argument, 0, 'h' },
45 		{ 0, 0, 0, 0 },
46 	};
47 
48 	if (getenv("LONG_ONLY")) {
49 		gl = getopt_long_only;
50 		printf("getopt_long_only");
51 	} else {
52 		gl = getopt_long;
53 		printf("getopt_long");
54 	}
55 	if (getenv("POSIXLY_CORRECT"))
56 		printf(" (POSIXLY_CORRECT)");
57 	printf(": ");
58 	for (idx = 1; idx < argc; idx++)
59 		printf("%s ", argv[idx]);
60 	printf("\n");
61 
62 	goggles = 0;
63 	for (;;) {
64 		idx = -1;
65 		ch = gl(argc, argv, "19bf:i:hW;-", longopts, &idx);
66 		if (ch == -1)
67 			break;
68 		switch (ch) {
69 		case 0:
70 		case '1':
71 		case '9':
72 		case 'h':
73 		case 'b':
74 		case '-':
75 			if (idx != -1) {
76 				if (goggles == 42)
77 					printf("option %s, arg %s\n",
78 					    longopts[idx].name, optarg);
79 				else
80 					printf("option %s\n",
81 					    longopts[idx].name);
82 			} else
83 				printf("option %c\n", ch);
84 			break;
85 		case 'f':
86 		case 'i':
87 			if (idx != -1)
88 				printf("option %s, arg %s\n",
89 				    longopts[idx].name, optarg);
90 			else
91 				printf("option %c, arg %s\n", ch, optarg);
92 			break;
93 
94 		case '?':
95 			break;
96 
97 		default:
98 			printf("unexpected return value: %c\n", ch);
99 			break;
100 		}
101 	}
102 	argc -= optind;
103 	argv += optind;
104 
105 	if (argc > 0) {
106 		printf("remaining ARGV: ");
107 		while (argc--)
108 			printf("%s ", *argv++);
109 		printf("\n");
110 	}
111 	printf("\n");
112 
113 	exit (0);
114 }
115