9b30d2493bffad74ef5718e50985b916b4e05b92
[debian/tar] / lib / prepargs.c
1 /* Parse arguments from a string and prepend them to an argv.
2    Copyright 1999-2001, 2007, 2013 Free Software Foundation, Inc.
3
4    This program is free software; you can redistribute it and/or modify
5    it under the terms of the GNU General Public License as published by
6    the Free Software Foundation; either version 3, or (at your option)
7    any later version.
8
9    This program is distributed in the hope that it will be useful,
10    but WITHOUT ANY WARRANTY; without even the implied warranty of
11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12    GNU General Public License for more details.
13
14    You should have received a copy of the GNU General Public License
15    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
16
17 /* Written by Paul Eggert <eggert@twinsun.com>.  */
18
19 #ifdef HAVE_CONFIG_H
20 # include <config.h>
21 #endif
22 #include "prepargs.h"
23 #include <sys/types.h>
24 #include <xalloc.h>
25
26 #if HAVE_STRING_H
27 # include <string.h>
28 #endif
29
30 #include <ctype.h>
31
32 /* IN_CTYPE_DOMAIN (C) is nonzero if the unsigned char C can safely be given
33    as an argument to <ctype.h> macros like "isspace".  */
34 #ifdef STDC_HEADERS
35 # define IN_CTYPE_DOMAIN(c) 1
36 #else
37 # define IN_CTYPE_DOMAIN(c) ((c) <= 0177)
38 #endif
39
40 #define ISSPACE(c) (IN_CTYPE_DOMAIN (c) && isspace (c))
41
42 /* Find the white-space-separated options specified by OPTIONS, and
43    using BUF to store copies of these options, set ARGV[0], ARGV[1],
44    etc. to the option copies.  Return the number N of options found.
45    Do not set ARGV[N].  If ARGV is null, do not store ARGV[0]
46    etc.  Backslash can be used to escape whitespace (and backslashes).  */
47 static int
48 prepend_args (char const *options, char *buf, char **argv)
49 {
50   char const *o = options;
51   char *b = buf;
52   int n = 0;
53
54   for (;;)
55     {
56       while (ISSPACE ((unsigned char) *o))
57         o++;
58       if (!*o)
59         return n;
60       if (argv)
61         argv[n] = b;
62       n++;
63
64       do
65         if ((*b++ = *o++) == '\\' && *o)
66           b[-1] = *o++;
67       while (*o && ! ISSPACE ((unsigned char) *o));
68
69       *b++ = '\0';
70     }
71 }
72
73 /* Prepend the whitespace-separated options in OPTIONS to the argument
74    vector of a main program with argument count *PARGC and argument
75    vector *PARGV.  */
76 void
77 prepend_default_options (char const *options, int *pargc, char ***pargv)
78 {
79   if (options)
80     {
81       char *buf = xmalloc (strlen (options) + 1);
82       int prepended = prepend_args (options, buf, (char **) 0);
83       int argc = *pargc;
84       char * const *argv = *pargv;
85       char **pp = (char **) xmalloc ((prepended + argc + 1) * sizeof *pp);
86       *pargc = prepended + argc;
87       *pargv = pp;
88       *pp++ = *argv++;
89       pp += prepend_args (options, buf, pp);
90       while ((*pp++ = *argv++))
91         continue;
92     }
93 }