annotate lib/getsubopt.c @ 14379:2330aac2ae54

maint: adjust cpp indentation to reflect nesting depth I.e., in a block of code that begins with an unnested "#if", put one space between the "#" in column 1 and following token. For example, -#include <sys/vfs.h> +# include <sys/vfs.h> Do this only in .c files that are part of a module I maintain. * lib/linkat.c: Filter through cppi. * lib/nanosleep.c: Likewise. * lib/openat.c: Likewise. * lib/openat-die.c: Likewise. * lib/dup3.c: Likewise. * lib/fchownat.c: Likewise. * lib/flock.c: Likewise. * lib/fsync.c: Likewise. * lib/fts.c: Likewise. * lib/getpass.c: Likewise. * lib/gettimeofday.c: Likewise. * lib/userspec.c: Likewise. * Makefile (sc_cpp_indent_check): New rule, to check this.
author Jim Meyering <meyering@redhat.com>
date Sun, 20 Feb 2011 23:02:43 +0100
parents 97fc9a21a8fb
children 8250f2777afc
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
8198
d84ab7c183f4 getsubopt.h is replaced with <stdlib.h>.
Bruno Haible <bruno@clisp.org>
parents: 8108
diff changeset
1 /* Parse comma separated list into words.
14079
97fc9a21a8fb maint: update almost all copyright ranges to include 2011
Jim Meyering <meyering@redhat.com>
parents: 12559
diff changeset
2 Copyright (C) 1996-1997, 1999, 2004, 2007, 2009-2011 Free Software
12559
c2cbabec01dd update nearly all FSF copyright year lists to include 2010
Jim Meyering <meyering@redhat.com>
parents: 12518
diff changeset
3 Foundation, Inc.
5138
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
4 This file is part of the GNU C Library.
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
5 Contributed by Ulrich Drepper <drepper@cygnus.com>, 1996.
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
6
9309
bbbbbf4cd1c5 Change copyright notice from GPLv2+ to GPLv3+.
Bruno Haible <bruno@clisp.org>
parents: 8198
diff changeset
7 This program is free software: you can redistribute it and/or modify
5243
8f943cf05985 Regenerate, now that it's listed in ../config/srclist.txt.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5138
diff changeset
8 it under the terms of the GNU General Public License as published by
9309
bbbbbf4cd1c5 Change copyright notice from GPLv2+ to GPLv3+.
Bruno Haible <bruno@clisp.org>
parents: 8198
diff changeset
9 the Free Software Foundation; either version 3 of the License, or
bbbbbf4cd1c5 Change copyright notice from GPLv2+ to GPLv3+.
Bruno Haible <bruno@clisp.org>
parents: 8198
diff changeset
10 (at your option) any later version.
5138
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
11
5243
8f943cf05985 Regenerate, now that it's listed in ../config/srclist.txt.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5138
diff changeset
12 This program is distributed in the hope that it will be useful,
5138
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
5243
8f943cf05985 Regenerate, now that it's listed in ../config/srclist.txt.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5138
diff changeset
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
8f943cf05985 Regenerate, now that it's listed in ../config/srclist.txt.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5138
diff changeset
15 GNU General Public License for more details.
5138
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
16
9309
bbbbbf4cd1c5 Change copyright notice from GPLv2+ to GPLv3+.
Bruno Haible <bruno@clisp.org>
parents: 8198
diff changeset
17 You should have received a copy of the GNU General Public License
bbbbbf4cd1c5 Change copyright notice from GPLv2+ to GPLv3+.
Bruno Haible <bruno@clisp.org>
parents: 8198
diff changeset
18 along with this program. If not, see <http://www.gnu.org/licenses/>. */
5138
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
19
8108
e22e004d89dd * lib/getsubopt.c [!_LIBC]: Include config.h and getsubopt.h.
Paul Eggert <eggert@cs.ucla.edu>
parents: 7944
diff changeset
20 #if !_LIBC
e22e004d89dd * lib/getsubopt.c [!_LIBC]: Include config.h and getsubopt.h.
Paul Eggert <eggert@cs.ucla.edu>
parents: 7944
diff changeset
21 # include <config.h>
e22e004d89dd * lib/getsubopt.c [!_LIBC]: Include config.h and getsubopt.h.
Paul Eggert <eggert@cs.ucla.edu>
parents: 7944
diff changeset
22 #endif
e22e004d89dd * lib/getsubopt.c [!_LIBC]: Include config.h and getsubopt.h.
Paul Eggert <eggert@cs.ucla.edu>
parents: 7944
diff changeset
23
5138
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
24 #include <stdlib.h>
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
25 #include <string.h>
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
26
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
27 #if !_LIBC
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
28 /* This code is written for inclusion in gnu-libc, and uses names in
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
29 the namespace reserved for libc. If we're compiling in gnulib,
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
30 define those names to be the normal ones instead. */
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
31 # undef __strchrnul
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
32 # define __strchrnul strchrnul
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
33 #endif
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
34
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
35 /* Parse comma separated suboption from *OPTIONP and match against
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
36 strings in TOKENS. If found return index and set *VALUEP to
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
37 optional value introduced by an equal sign. If the suboption is
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
38 not part of TOKENS return in *VALUEP beginning of unknown
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
39 suboption. On exit *OPTIONP is set to the beginning of the next
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
40 token or at the terminating NUL character. */
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
41 int
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
42 getsubopt (char **optionp, char *const *tokens, char **valuep)
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
43 {
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
44 char *endp, *vstart;
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
45 int cnt;
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
46
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
47 if (**optionp == '\0')
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
48 return -1;
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
49
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
50 /* Find end of next token. */
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
51 endp = __strchrnul (*optionp, ',');
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
52
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
53 /* Find start of value. */
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
54 vstart = memchr (*optionp, '=', endp - *optionp);
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
55 if (vstart == NULL)
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
56 vstart = endp;
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
57
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
58 /* Try to match the characters between *OPTIONP and VSTART against
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
59 one of the TOKENS. */
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
60 for (cnt = 0; tokens[cnt] != NULL; ++cnt)
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
61 if (strncmp (*optionp, tokens[cnt], vstart - *optionp) == 0
12421
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
62 && tokens[cnt][vstart - *optionp] == '\0')
5138
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
63 {
12421
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
64 /* We found the current option in TOKENS. */
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
65 *valuep = vstart != endp ? vstart + 1 : NULL;
5138
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
66
12421
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
67 if (*endp != '\0')
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
68 *endp++ = '\0';
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
69 *optionp = endp;
5138
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
70
12421
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
71 return cnt;
5138
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
72 }
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
73
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
74 /* The current suboption does not match any option. */
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
75 *valuep = *optionp;
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
76
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
77 if (*endp != '\0')
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
78 *endp++ = '\0';
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
79 *optionp = endp;
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
80
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
81 return -1;
965e5e2eaeac New module 'getsubopt'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
82 }