mh_getopt.c
2.94 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
/* GNU Mailutils -- a suite of utilities for electronic mail
Copyright (C) 1999, 2000, 2001, 2002 Free Software Foundation, Inc.
GNU Mailutils is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2, or (at your option)
any later version.
GNU Mailutils is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with GNU Mailutils; if not, write to the Free Software
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
/* Parse traditional MH options. */
#ifdef HAVE_CONFIG_H
# include <config.h>
#endif
#include <stdio.h>
#include <stdlib.h>
#include <mh_getopt.h>
int mh_optind = 1;
char *mh_optarg;
char *mh_optptr;
int
mh_getopt (int argc, char **argv, struct mh_option *mh_opt, const char *doc)
{
struct mh_option *p;
int optlen;
if (mh_optind >= argc || argv[mh_optind] == NULL)
return EOF;
mh_optptr = argv[mh_optind];
if (mh_optptr[0] == '+')
{
mh_optarg = mh_optptr + 1;
mh_optind++;
return '+';
}
if (mh_optptr[0] != '-')
return EOF;
optlen = strlen (mh_optptr+1);
for (p = mh_opt; p->opt; p++)
{
if ((p->match_len <= optlen
&& memcmp (mh_optptr+1, p->opt, optlen) == 0)
|| (p->flags == MH_OPT_BOOL
&& optlen > 2
&& memcmp (mh_optptr+1, "no", 2) == 0
&& strlen (p->opt) >= optlen-2
&& memcmp (mh_optptr+3, p->opt, optlen-2) == 0))
break;
}
if (p->opt)
{
switch (p->flags)
{
case MH_OPT_BOOL:
if (memcmp (mh_optptr+1, "no", 2) == 0)
mh_optarg = "no";
else
mh_optarg = "yes";
break;
case MH_OPT_ARG:
mh_optarg = argv[++mh_optind];
break;
default:
mh_optarg = NULL;
}
mh_optind++;
return p->key;
}
else if (!strcmp (mh_optptr+1, "help"))
{
mh_help (mh_opt, doc);
exit (1);
}
return '?';
}
void
mh_help (struct mh_option *mh_opt, const char *doc)
{
struct mh_option *p;
printf (_("Compatibility syntax:\n"));
printf (_("%s [switches] %s\n"), program_invocation_short_name, doc);
printf (_(" switches are:\n"));
for (p = mh_opt; p->opt; p++)
{
int len = strlen (p->opt);
printf (" -");
if (p->flags == MH_OPT_BOOL)
printf ("[no]");
if (len > p->match_len)
printf ("(%*.*s)%s",
p->match_len, p->match_len, p->opt,
p->opt + p->match_len);
else
printf ("%s", p->opt);
if (p->flags == MH_OPT_ARG)
printf (" %s", p->arg);
printf ("\n");
}
printf (" -help\n");
printf (_("\nPlease use GNU long options instead.\n"
"Run %s --help for more info on these.\n"),
program_invocation_short_name);
}