Mercurial > hg > octave-kai > gnulib-hg

annotate lib/quotearg.c @ 2145:d0a924014953

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(quotearg_buffer_restyled): Do not quote alert, backslash, formfeed, and vertical tab unnecessarily in shell quoting style.
author Jim Meyering <jim@meyering.net>
date Mon, 17 Jan 2000 08:01:40 +0000
parents 30abc8682bdf
children 37b73a4c0ec5
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
1 /* quotearg.c - quote arguments for output
2124
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
2 Copyright (C) 1998, 1999, 2000 Free Software Foundation, Inc.
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
3
Jim Meyering <jim@meyering.net>
parents:
diff changeset
4 This program is free software; you can redistribute it and/or modify
Jim Meyering <jim@meyering.net>
parents:
diff changeset
5 it under the terms of the GNU General Public License as published by
Jim Meyering <jim@meyering.net>
parents:
diff changeset
6 the Free Software Foundation; either version 2, or (at your option)
Jim Meyering <jim@meyering.net>
parents:
diff changeset
7 any later version.
Jim Meyering <jim@meyering.net>
parents:
diff changeset
8
Jim Meyering <jim@meyering.net>
parents:
diff changeset
9 This program is distributed in the hope that it will be useful,
Jim Meyering <jim@meyering.net>
parents:
diff changeset
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
Jim Meyering <jim@meyering.net>
parents:
diff changeset
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
Jim Meyering <jim@meyering.net>
parents:
diff changeset
12 GNU General Public License for more details.
Jim Meyering <jim@meyering.net>
parents:
diff changeset
13
Jim Meyering <jim@meyering.net>
parents:
diff changeset
14 You should have received a copy of the GNU General Public License
Jim Meyering <jim@meyering.net>
parents:
diff changeset
15 along with this program; if not, write to the Free Software Foundation,
Jim Meyering <jim@meyering.net>
parents:
diff changeset
16 Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
Jim Meyering <jim@meyering.net>
parents:
diff changeset
17
Jim Meyering <jim@meyering.net>
parents:
diff changeset
18 /* Written by Paul Eggert <eggert@twinsun.com> */
Jim Meyering <jim@meyering.net>
parents:
diff changeset
19
Jim Meyering <jim@meyering.net>
parents:
diff changeset
20 #if HAVE_CONFIG_H
Jim Meyering <jim@meyering.net>
parents:
diff changeset
21 # include <config.h>
Jim Meyering <jim@meyering.net>
parents:
diff changeset
22 #endif
Jim Meyering <jim@meyering.net>
parents:
diff changeset
23
Jim Meyering <jim@meyering.net>
parents:
diff changeset
24 #include <sys/types.h>
Jim Meyering <jim@meyering.net>
parents:
diff changeset
25 #include <quotearg.h>
Jim Meyering <jim@meyering.net>
parents:
diff changeset
26 #include <xalloc.h>
Jim Meyering <jim@meyering.net>
parents:
diff changeset
27
Jim Meyering <jim@meyering.net>
parents:
diff changeset
28 #include <ctype.h>
Jim Meyering <jim@meyering.net>
parents:
diff changeset
29 #if defined (STDC_HEADERS) || (!defined (isascii) && !defined (HAVE_ISASCII))
Jim Meyering <jim@meyering.net>
parents:
diff changeset
30 # define ISASCII(c) 1
Jim Meyering <jim@meyering.net>
parents:
diff changeset
31 #else
Jim Meyering <jim@meyering.net>
parents:
diff changeset
32 # define ISASCII(c) isascii (c)
Jim Meyering <jim@meyering.net>
parents:
diff changeset
33 #endif
2124
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
34 #define ISPRINT(c) (ISASCII (c) && isprint (c))
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
35
1920
78f6058b59a6 Include <libintl.h> if ENABLE_NLS.
Jim Meyering <jim@meyering.net>
parents: 1891
diff changeset
36 #if ENABLE_NLS
78f6058b59a6 Include <libintl.h> if ENABLE_NLS.
Jim Meyering <jim@meyering.net>
parents: 1891
diff changeset
37 # include <libintl.h>
78f6058b59a6 Include <libintl.h> if ENABLE_NLS.
Jim Meyering <jim@meyering.net>
parents: 1891
diff changeset
38 # define _(text) gettext (text)
78f6058b59a6 Include <libintl.h> if ENABLE_NLS.
Jim Meyering <jim@meyering.net>
parents: 1891
diff changeset
39 #else
78f6058b59a6 Include <libintl.h> if ENABLE_NLS.
Jim Meyering <jim@meyering.net>
parents: 1891
diff changeset
40 # define _(text) text
78f6058b59a6 Include <libintl.h> if ENABLE_NLS.
Jim Meyering <jim@meyering.net>
parents: 1891
diff changeset
41 #endif
78f6058b59a6 Include <libintl.h> if ENABLE_NLS.
Jim Meyering <jim@meyering.net>
parents: 1891
diff changeset
42
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
43 #if HAVE_LIMITS_H
Jim Meyering <jim@meyering.net>
parents:
diff changeset
44 # include <limits.h>
Jim Meyering <jim@meyering.net>
parents:
diff changeset
45 #endif
Jim Meyering <jim@meyering.net>
parents:
diff changeset
46 #ifndef CHAR_BIT
Jim Meyering <jim@meyering.net>
parents:
diff changeset
47 # define CHAR_BIT 8
Jim Meyering <jim@meyering.net>
parents:
diff changeset
48 #endif
Jim Meyering <jim@meyering.net>
parents:
diff changeset
49 #ifndef UCHAR_MAX
Jim Meyering <jim@meyering.net>
parents:
diff changeset
50 # define UCHAR_MAX ((unsigned char) -1)
Jim Meyering <jim@meyering.net>
parents:
diff changeset
51 #endif
Jim Meyering <jim@meyering.net>
parents:
diff changeset
52
Jim Meyering <jim@meyering.net>
parents:
diff changeset
53 #if HAVE_STDLIB_H
Jim Meyering <jim@meyering.net>
parents:
diff changeset
54 # include <stdlib.h>
Jim Meyering <jim@meyering.net>
parents:
diff changeset
55 #endif
Jim Meyering <jim@meyering.net>
parents:
diff changeset
56
Jim Meyering <jim@meyering.net>
parents:
diff changeset
57 #if HAVE_STRING_H
Jim Meyering <jim@meyering.net>
parents:
diff changeset
58 # include <string.h>
Jim Meyering <jim@meyering.net>
parents:
diff changeset
59 #endif
Jim Meyering <jim@meyering.net>
parents:
diff changeset
60
2124
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
61 #if HAVE_MBRTOWC && HAVE_WCHAR_H
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
62 # include <wchar.h>
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
63 #else
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
64 # define iswprint(wc) 1
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
65 # define mbrtowc(pwc, s, n, ps) 1
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
66 # define mbsinit(ps) 1
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
67 # define mbstate_t int
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
68 #endif
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
69
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
70 #define INT_BITS (sizeof (int) * CHAR_BIT)
Jim Meyering <jim@meyering.net>
parents:
diff changeset
71
Jim Meyering <jim@meyering.net>
parents:
diff changeset
72 struct quoting_options
Jim Meyering <jim@meyering.net>
parents:
diff changeset
73 {
Jim Meyering <jim@meyering.net>
parents:
diff changeset
74 /* Basic quoting style. */
Jim Meyering <jim@meyering.net>
parents:
diff changeset
75 enum quoting_style style;
Jim Meyering <jim@meyering.net>
parents:
diff changeset
76
2124
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
77 /* Quote the characters indicated by this bit vector even if the
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
78 quoting style would not normally require them to be quoted. */
Jim Meyering <jim@meyering.net>
parents:
diff changeset
79 int quote_these_too[((UCHAR_MAX + 1) / INT_BITS
Jim Meyering <jim@meyering.net>
parents:
diff changeset
80 + ((UCHAR_MAX + 1) % INT_BITS != 0))];
Jim Meyering <jim@meyering.net>
parents:
diff changeset
81 };
Jim Meyering <jim@meyering.net>
parents:
diff changeset
82
Jim Meyering <jim@meyering.net>
parents:
diff changeset
83 /* Names of quoting styles. */
Jim Meyering <jim@meyering.net>
parents:
diff changeset
84 char const *const quoting_style_args[] =
Jim Meyering <jim@meyering.net>
parents:
diff changeset
85 {
1597
287550eb5c15 (quotearg_buffer): Cast -1 to size_t before comparing.
Jim Meyering <jim@meyering.net>
parents: 1565
diff changeset
86 "literal",
287550eb5c15 (quotearg_buffer): Cast -1 to size_t before comparing.
Jim Meyering <jim@meyering.net>
parents: 1565
diff changeset
87 "shell",
287550eb5c15 (quotearg_buffer): Cast -1 to size_t before comparing.
Jim Meyering <jim@meyering.net>
parents: 1565
diff changeset
88 "shell-always",
287550eb5c15 (quotearg_buffer): Cast -1 to size_t before comparing.
Jim Meyering <jim@meyering.net>
parents: 1565
diff changeset
89 "c",
287550eb5c15 (quotearg_buffer): Cast -1 to size_t before comparing.
Jim Meyering <jim@meyering.net>
parents: 1565
diff changeset
90 "escape",
1920
78f6058b59a6 Include <libintl.h> if ENABLE_NLS.
Jim Meyering <jim@meyering.net>
parents: 1891
diff changeset
91 "locale",
1597
287550eb5c15 (quotearg_buffer): Cast -1 to size_t before comparing.
Jim Meyering <jim@meyering.net>
parents: 1565
diff changeset
92 0
287550eb5c15 (quotearg_buffer): Cast -1 to size_t before comparing.
Jim Meyering <jim@meyering.net>
parents: 1565
diff changeset
93 };
287550eb5c15 (quotearg_buffer): Cast -1 to size_t before comparing.
Jim Meyering <jim@meyering.net>
parents: 1565
diff changeset
94
2124
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
95 /* Correspondences to quoting style names. */
1597
287550eb5c15 (quotearg_buffer): Cast -1 to size_t before comparing.
Jim Meyering <jim@meyering.net>
parents: 1565
diff changeset
96 enum quoting_style const quoting_style_vals[] =
287550eb5c15 (quotearg_buffer): Cast -1 to size_t before comparing.
Jim Meyering <jim@meyering.net>
parents: 1565
diff changeset
97 {
287550eb5c15 (quotearg_buffer): Cast -1 to size_t before comparing.
Jim Meyering <jim@meyering.net>
parents: 1565
diff changeset
98 literal_quoting_style,
287550eb5c15 (quotearg_buffer): Cast -1 to size_t before comparing.
Jim Meyering <jim@meyering.net>
parents: 1565
diff changeset
99 shell_quoting_style,
287550eb5c15 (quotearg_buffer): Cast -1 to size_t before comparing.
Jim Meyering <jim@meyering.net>
parents: 1565
diff changeset
100 shell_always_quoting_style,
287550eb5c15 (quotearg_buffer): Cast -1 to size_t before comparing.
Jim Meyering <jim@meyering.net>
parents: 1565
diff changeset
101 c_quoting_style,
1920
78f6058b59a6 Include <libintl.h> if ENABLE_NLS.
Jim Meyering <jim@meyering.net>
parents: 1891
diff changeset
102 escape_quoting_style,
78f6058b59a6 Include <libintl.h> if ENABLE_NLS.
Jim Meyering <jim@meyering.net>
parents: 1891
diff changeset
103 locale_quoting_style
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
104 };
Jim Meyering <jim@meyering.net>
parents:
diff changeset
105
1282
c5862deb63ad Update from patch-2.5.3.
Jim Meyering <jim@meyering.net>
parents: 1248
diff changeset
106 /* The default quoting options. */
c5862deb63ad Update from patch-2.5.3.
Jim Meyering <jim@meyering.net>
parents: 1248
diff changeset
107 static struct quoting_options default_quoting_options;
c5862deb63ad Update from patch-2.5.3.
Jim Meyering <jim@meyering.net>
parents: 1248
diff changeset
108
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
109 /* Allocate a new set of quoting options, with contents initially identical
1282
c5862deb63ad Update from patch-2.5.3.
Jim Meyering <jim@meyering.net>
parents: 1248
diff changeset
110 to O if O is not null, or to the default if O is null.
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
111 It is the caller's responsibility to free the result. */
Jim Meyering <jim@meyering.net>
parents:
diff changeset
112 struct quoting_options *
Jim Meyering <jim@meyering.net>
parents:
diff changeset
113 clone_quoting_options (struct quoting_options *o)
Jim Meyering <jim@meyering.net>
parents:
diff changeset
114 {
Jim Meyering <jim@meyering.net>
parents:
diff changeset
115 struct quoting_options *p
Jim Meyering <jim@meyering.net>
parents:
diff changeset
116 = (struct quoting_options *) xmalloc (sizeof (struct quoting_options));
1282
c5862deb63ad Update from patch-2.5.3.
Jim Meyering <jim@meyering.net>
parents: 1248
diff changeset
117 *p = *(o ? o : &default_quoting_options);
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
118 return p;
Jim Meyering <jim@meyering.net>
parents:
diff changeset
119 }
Jim Meyering <jim@meyering.net>
parents:
diff changeset
120
1282
c5862deb63ad Update from patch-2.5.3.
Jim Meyering <jim@meyering.net>
parents: 1248
diff changeset
121 /* Get the value of O's quoting style. If O is null, use the default. */
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
122 enum quoting_style
Jim Meyering <jim@meyering.net>
parents:
diff changeset
123 get_quoting_style (struct quoting_options *o)
Jim Meyering <jim@meyering.net>
parents:
diff changeset
124 {
1282
c5862deb63ad Update from patch-2.5.3.
Jim Meyering <jim@meyering.net>
parents: 1248
diff changeset
125 return (o ? o : &default_quoting_options)->style;
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
126 }
Jim Meyering <jim@meyering.net>
parents:
diff changeset
127
1282
c5862deb63ad Update from patch-2.5.3.
Jim Meyering <jim@meyering.net>
parents: 1248
diff changeset
128 /* In O (or in the default if O is null),
c5862deb63ad Update from patch-2.5.3.
Jim Meyering <jim@meyering.net>
parents: 1248
diff changeset
129 set the value of the quoting style to S. */
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
130 void
Jim Meyering <jim@meyering.net>
parents:
diff changeset
131 set_quoting_style (struct quoting_options *o, enum quoting_style s)
Jim Meyering <jim@meyering.net>
parents:
diff changeset
132 {
1282
c5862deb63ad Update from patch-2.5.3.
Jim Meyering <jim@meyering.net>
parents: 1248
diff changeset
133 (o ? o : &default_quoting_options)->style = s;
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
134 }
Jim Meyering <jim@meyering.net>
parents:
diff changeset
135
1282
c5862deb63ad Update from patch-2.5.3.
Jim Meyering <jim@meyering.net>
parents: 1248
diff changeset
136 /* In O (or in the default if O is null),
c5862deb63ad Update from patch-2.5.3.
Jim Meyering <jim@meyering.net>
parents: 1248
diff changeset
137 set the value of the quoting options for character C to I.
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
138 Return the old value. Currently, the only values defined for I are
Jim Meyering <jim@meyering.net>
parents:
diff changeset
139 0 (the default) and 1 (which means to quote the character even if
Jim Meyering <jim@meyering.net>
parents:
diff changeset
140 it would not otherwise be quoted). */
Jim Meyering <jim@meyering.net>
parents:
diff changeset
141 int
Jim Meyering <jim@meyering.net>
parents:
diff changeset
142 set_char_quoting (struct quoting_options *o, char c, int i)
Jim Meyering <jim@meyering.net>
parents:
diff changeset
143 {
Jim Meyering <jim@meyering.net>
parents:
diff changeset
144 unsigned char uc = c;
1282
c5862deb63ad Update from patch-2.5.3.
Jim Meyering <jim@meyering.net>
parents: 1248
diff changeset
145 int *p = (o ? o : &default_quoting_options)->quote_these_too + uc / INT_BITS;
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
146 int shift = uc % INT_BITS;
Jim Meyering <jim@meyering.net>
parents:
diff changeset
147 int r = (*p >> shift) & 1;
Jim Meyering <jim@meyering.net>
parents:
diff changeset
148 *p ^= ((i & 1) ^ r) << shift;
Jim Meyering <jim@meyering.net>
parents:
diff changeset
149 return r;
Jim Meyering <jim@meyering.net>
parents:
diff changeset
150 }
Jim Meyering <jim@meyering.net>
parents:
diff changeset
151
1282
c5862deb63ad Update from patch-2.5.3.
Jim Meyering <jim@meyering.net>
parents: 1248
diff changeset
152 /* Place into buffer BUFFER (of size BUFFERSIZE) a quoted version of
2124
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
153 argument ARG (of size ARGSIZE), using QUOTING_STYLE and the
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
154 non-quoting-style part of O to control quoting.
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
155 Terminate the output with a null character, and return the written
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
156 size of the output, not counting the terminating null.
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
157 If BUFFERSIZE is too small to store the output string, return the
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
158 value that would have been returned had BUFFERSIZE been large enough.
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
159 If ARGSIZE is -1, use the string length of the argument for ARGSIZE.
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
160
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
161 This function acts like quotearg_buffer (BUFFER, BUFFERSIZE, ARG,
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
162 ARGSIZE, O), except it uses QUOTING_STYLE instead of the quoting
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
163 style specified by O, and O may not be null. */
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
164
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
165 static size_t
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
166 quotearg_buffer_restyled (char *buffer, size_t buffersize,
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
167 char const *arg, size_t argsize,
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
168 enum quoting_style quoting_style,
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
169 struct quoting_options const *o)
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
170 {
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
171 size_t i;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
172 size_t len = 0;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
173 char const *quote_string = 0;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
174 size_t quote_string_len = 0;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
175 int backslash_escapes = 0;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
176
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
177 #define STORE(c) \
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
178 do \
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
179 { \
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
180 if (len < buffersize) \
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
181 buffer[len] = (c); \
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
182 len++; \
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
183 } \
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
184 while (0)
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
185
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
186 switch (quoting_style)
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
187 {
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
188 case c_quoting_style:
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
189 STORE ('"');
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
190 backslash_escapes = 1;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
191 quote_string = "\"";
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
192 quote_string_len = 1;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
193 break;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
194
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
195 case escape_quoting_style:
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
196 backslash_escapes = 1;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
197 break;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
198
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
199 case locale_quoting_style:
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
200 for (quote_string = _("`"); *quote_string; quote_string++)
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
201 STORE (*quote_string);
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
202 backslash_escapes = 1;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
203 quote_string = _("'");
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
204 quote_string_len = strlen (quote_string);
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
205 break;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
206
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
207 case shell_always_quoting_style:
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
208 STORE ('\'');
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
209 quote_string = "'";
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
210 quote_string_len = 1;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
211 break;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
212
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
213 default:
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
214 break;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
215 }
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
216
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
217 for (i = 0; ! (argsize == (size_t) -1 ? arg[i] == '\0' : i == argsize); i++)
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
218 {
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
219 unsigned char c;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
220 unsigned char esc;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
221
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
222 if (backslash_escapes
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
223 && quote_string_len
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
224 && i + quote_string_len <= argsize
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
225 && memcmp (arg + i, quote_string, quote_string_len) == 0)
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
226 STORE ('\\');
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
227
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
228 c = arg[i];
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
229 switch (c)
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
230 {
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
231 case '?':
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
232 switch (quoting_style)
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
233 {
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
234 case shell_quoting_style:
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
235 goto use_shell_always_quoting_style;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
236
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
237 case c_quoting_style:
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
238 if (i + 2 < argsize && arg[i + 1] == '?')
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
239 switch (arg[i + 2])
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
240 {
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
241 case '!': case '\'':
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
242 case '(': case ')': case '-': case '/':
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
243 case '<': case '=': case '>':
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
244 /* Escape the second '?' in what would otherwise be
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
245 a trigraph. */
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
246 i += 2;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
247 c = arg[i + 2];
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
248 STORE ('?');
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
249 STORE ('\\');
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
250 STORE ('?');
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
251 break;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
252 }
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
253 break;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
254
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
255 default:
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
256 break;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
257 }
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
258 break;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
259
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
260 #if HAVE_C_BACKSLASH_A
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
261 case '\a': esc = 'a'; goto c_escape;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
262 #endif
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
263 case '\b': esc = 'b'; goto c_escape;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
264 case '\f': esc = 'f'; goto c_escape;
2145
d0a924014953 (quotearg_buffer_restyled): Do not quote
Jim Meyering <jim@meyering.net>
parents: 2124
diff changeset
265 case '\n': esc = 'n'; goto c_and_shell_escape;
d0a924014953 (quotearg_buffer_restyled): Do not quote
Jim Meyering <jim@meyering.net>
parents: 2124
diff changeset
266 case '\r': esc = 'r'; goto c_and_shell_escape;
d0a924014953 (quotearg_buffer_restyled): Do not quote
Jim Meyering <jim@meyering.net>
parents: 2124
diff changeset
267 case '\t': esc = 't'; goto c_and_shell_escape;
2124
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
268 case '\v': esc = 'v'; goto c_escape;
2145
d0a924014953 (quotearg_buffer_restyled): Do not quote
Jim Meyering <jim@meyering.net>
parents: 2124
diff changeset
269 case '\\': esc = c; goto c_and_shell_escape;
2124
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
270
2145
d0a924014953 (quotearg_buffer_restyled): Do not quote
Jim Meyering <jim@meyering.net>
parents: 2124
diff changeset
271 c_and_shell_escape:
d0a924014953 (quotearg_buffer_restyled): Do not quote
Jim Meyering <jim@meyering.net>
parents: 2124
diff changeset
272 if (quoting_style == shell_quoting_style)
d0a924014953 (quotearg_buffer_restyled): Do not quote
Jim Meyering <jim@meyering.net>
parents: 2124
diff changeset
273 goto use_shell_always_quoting_style;
2124
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
274 c_escape:
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
275 if (backslash_escapes)
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
276 {
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
277 c = esc;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
278 goto store_escape;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
279 }
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
280 break;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
281
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
282 case '#': case '~':
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
283 if (i != 0)
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
284 break;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
285 /* Fall through. */
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
286 case ' ':
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
287 case '!': /* special in bash */
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
288 case '"': case '$': case '&':
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
289 case '(': case ')': case '*': case ';':
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
290 case '<': case '>': case '[':
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
291 case '^': /* special in old /bin/sh, e.g. SunOS 4.1.4 */
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
292 case '`': case '|':
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
293 /* A shell special character. In theory, '$' and '`' could
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
294 be the first bytes of multibyte characters, which means
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
295 we should check them with mbrtowc, but in practice this
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
296 doesn't happen so it's not worth worrying about. */
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
297 if (quoting_style == shell_quoting_style)
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
298 goto use_shell_always_quoting_style;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
299 break;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
300
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
301 case '\'':
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
302 switch (quoting_style)
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
303 {
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
304 case shell_quoting_style:
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
305 goto use_shell_always_quoting_style;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
306
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
307 case shell_always_quoting_style:
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
308 STORE ('\'');
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
309 STORE ('\\');
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
310 STORE ('\'');
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
311 break;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
312
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
313 default:
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
314 break;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
315 }
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
316 break;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
317
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
318 case '%': case '+': case ',': case '-': case '.': case '/':
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
319 case '0': case '1': case '2': case '3': case '4': case '5':
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
320 case '6': case '7': case '8': case '9': case ':': case '=':
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
321 case 'A': case 'B': case 'C': case 'D': case 'E': case 'F':
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
322 case 'G': case 'H': case 'I': case 'J': case 'K': case 'L':
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
323 case 'M': case 'N': case 'O': case 'P': case 'Q': case 'R':
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
324 case 'S': case 'T': case 'U': case 'V': case 'W': case 'X':
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
325 case 'Y': case 'Z': case ']': case '_': case 'a': case 'b':
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
326 case 'c': case 'd': case 'e': case 'f': case 'g': case 'h':
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
327 case 'i': case 'j': case 'k': case 'l': case 'm': case 'n':
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
328 case 'o': case 'p': case 'q': case 'r': case 's': case 't':
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
329 case 'u': case 'v': case 'w': case 'x': case 'y': case 'z':
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
330 case '{': case '}':
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
331 /* These characters don't cause problems, no matter what the
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
332 quoting style is. They cannot start multibyte sequences. */
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
333 break;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
334
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
335 default:
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
336 /* If we have a multibyte sequence, copy it until we reach
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
337 its end, find an error, or come back to the initial shift
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
338 state. For C-like styles, if the sequence has
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
339 unprintable characters, escape the whole sequence, since
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
340 we can't easily escape single characters within it. */
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
341 {
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
342 /* Length of multibyte sequence found so far. */
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
343 size_t m = 0;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
344
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
345 int printable = 1;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
346 mbstate_t mbstate;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
347 memset (&mbstate, 0, sizeof mbstate);
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
348
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
349 if (argsize == (size_t) -1)
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
350 argsize = strlen (arg);
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
351
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
352 do
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
353 {
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
354 wchar_t w;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
355 size_t bytes = mbrtowc (&w, &arg[i + m],
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
356 argsize - (i + m), &mbstate);
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
357 if (bytes == 0)
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
358 break;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
359 else if (bytes == (size_t) -1)
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
360 {
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
361 printable = 0;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
362 break;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
363 }
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
364 else if (bytes == (size_t) -2)
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
365 {
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
366 printable = 0;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
367 while (i + m < argsize && arg[i + m])
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
368 m++;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
369 break;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
370 }
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
371 else
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
372 {
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
373 if (! iswprint (w))
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
374 printable = 0;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
375 m += bytes;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
376 }
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
377 }
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
378 while (! mbsinit (&mbstate));
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
379
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
380 if (m <= 1)
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
381 {
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
382 /* Escape a unibyte character like a multibyte
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
383 sequence if using backslash escapes, and if the
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
384 character is not printable. */
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
385 m = backslash_escapes && ! ISPRINT (c);
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
386 printable = 0;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
387 }
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
388
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
389 if (m)
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
390 {
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
391 /* Output a multibyte sequence, or an escaped
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
392 unprintable unibyte character. */
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
393 size_t imax = i + m - 1;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
394
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
395 for (;;)
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
396 {
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
397 if (backslash_escapes && ! printable)
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
398 {
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
399 STORE ('\\');
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
400 STORE ('0' + (c >> 6));
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
401 STORE ('0' + ((c >> 3) & 7));
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
402 c = '0' + (c & 7);
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
403 }
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
404 if (i == imax)
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
405 break;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
406 STORE (c);
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
407 c = arg[++i];
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
408 }
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
409
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
410 goto store_c;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
411 }
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
412 }
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
413 }
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
414
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
415 if (! (backslash_escapes
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
416 && o->quote_these_too[c / INT_BITS] & (1 << (c % INT_BITS))))
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
417 goto store_c;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
418
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
419 store_escape:
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
420 STORE ('\\');
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
421
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
422 store_c:
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
423 STORE (c);
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
424 }
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
425
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
426 if (quote_string)
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
427 for (; *quote_string; quote_string++)
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
428 STORE (*quote_string);
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
429
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
430 if (len < buffersize)
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
431 buffer[len] = '\0';
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
432 return len;
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
433
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
434 use_shell_always_quoting_style:
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
435 return quotearg_buffer_restyled (buffer, buffersize, arg, argsize,
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
436 shell_always_quoting_style, o);
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
437 }
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
438
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
439 /* Place into buffer BUFFER (of size BUFFERSIZE) a quoted version of
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
440 argument ARG (of size ARGSIZE), using O to control quoting.
1282
c5862deb63ad Update from patch-2.5.3.
Jim Meyering <jim@meyering.net>
parents: 1248
diff changeset
441 If O is null, use the default.
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
442 Terminate the output with a null character, and return the written
Jim Meyering <jim@meyering.net>
parents:
diff changeset
443 size of the output, not counting the terminating null.
1282
c5862deb63ad Update from patch-2.5.3.
Jim Meyering <jim@meyering.net>
parents: 1248
diff changeset
444 If BUFFERSIZE is too small to store the output string, return the
c5862deb63ad Update from patch-2.5.3.
Jim Meyering <jim@meyering.net>
parents: 1248
diff changeset
445 value that would have been returned had BUFFERSIZE been large enough.
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
446 If ARGSIZE is -1, use the string length of the argument for ARGSIZE. */
Jim Meyering <jim@meyering.net>
parents:
diff changeset
447 size_t
1282
c5862deb63ad Update from patch-2.5.3.
Jim Meyering <jim@meyering.net>
parents: 1248
diff changeset
448 quotearg_buffer (char *buffer, size_t buffersize,
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
449 char const *arg, size_t argsize,
Jim Meyering <jim@meyering.net>
parents:
diff changeset
450 struct quoting_options const *o)
Jim Meyering <jim@meyering.net>
parents:
diff changeset
451 {
1282
c5862deb63ad Update from patch-2.5.3.
Jim Meyering <jim@meyering.net>
parents: 1248
diff changeset
452 struct quoting_options const *p = o ? o : &default_quoting_options;
2124
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
453 return quotearg_buffer_restyled (buffer, buffersize, arg, argsize,
30abc8682bdf Quote multibyte characters correctly.
Jim Meyering <jim@meyering.net>
parents: 1920
diff changeset
454 p->style, p);
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
455 }
Jim Meyering <jim@meyering.net>
parents:
diff changeset
456
Jim Meyering <jim@meyering.net>
parents:
diff changeset
457 /* Use storage slot N to return a quoted version of the string ARG.
Jim Meyering <jim@meyering.net>
parents:
diff changeset
458 OPTIONS specifies the quoting options.
Jim Meyering <jim@meyering.net>
parents:
diff changeset
459 The returned value points to static storage that can be
Jim Meyering <jim@meyering.net>
parents:
diff changeset
460 reused by the next call to this function with the same value of N.
1663
8ae2c5884032 (quotearg_n_options): Revert type of parameter `n'
Jim Meyering <jim@meyering.net>
parents: 1650
diff changeset
461 N must be nonnegative. N is deliberately declared with type `int'
8ae2c5884032 (quotearg_n_options): Revert type of parameter `n'
Jim Meyering <jim@meyering.net>
parents: 1650
diff changeset
462 to allow for future extensions (using negative values). */
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
463 static char *
1663
8ae2c5884032 (quotearg_n_options): Revert type of parameter `n'
Jim Meyering <jim@meyering.net>
parents: 1650
diff changeset
464 quotearg_n_options (int n, char const *arg,
1598
d0dff44eca51 (quotearg_n_options): Make `options' parameter be `const'.
Jim Meyering <jim@meyering.net>
parents: 1597
diff changeset
465 struct quoting_options const *options)
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
466 {
1597
287550eb5c15 (quotearg_buffer): Cast -1 to size_t before comparing.
Jim Meyering <jim@meyering.net>
parents: 1565
diff changeset
467 static unsigned int nslots;
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
468 static struct slotvec
Jim Meyering <jim@meyering.net>
parents:
diff changeset
469 {
Jim Meyering <jim@meyering.net>
parents:
diff changeset
470 size_t size;
Jim Meyering <jim@meyering.net>
parents:
diff changeset
471 char *val;
Jim Meyering <jim@meyering.net>
parents:
diff changeset
472 } *slotvec;
Jim Meyering <jim@meyering.net>
parents:
diff changeset
473
Jim Meyering <jim@meyering.net>
parents:
diff changeset
474 if (nslots <= n)
Jim Meyering <jim@meyering.net>
parents:
diff changeset
475 {
1663
8ae2c5884032 (quotearg_n_options): Revert type of parameter `n'
Jim Meyering <jim@meyering.net>
parents: 1650
diff changeset
476 int n1 = n + 1;
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
477 size_t s = n1 * sizeof (struct slotvec);
Jim Meyering <jim@meyering.net>
parents:
diff changeset
478 if (! (0 < n1 && n1 == s / sizeof (struct slotvec)))
Jim Meyering <jim@meyering.net>
parents:
diff changeset
479 abort ();
Jim Meyering <jim@meyering.net>
parents:
diff changeset
480 slotvec = (struct slotvec *) xrealloc (slotvec, s);
Jim Meyering <jim@meyering.net>
parents:
diff changeset
481 memset (slotvec + nslots, 0, (n1 - nslots) * sizeof (struct slotvec));
Jim Meyering <jim@meyering.net>
parents:
diff changeset
482 nslots = n;
Jim Meyering <jim@meyering.net>
parents:
diff changeset
483 }
Jim Meyering <jim@meyering.net>
parents:
diff changeset
484
Jim Meyering <jim@meyering.net>
parents:
diff changeset
485 {
Jim Meyering <jim@meyering.net>
parents:
diff changeset
486 size_t size = slotvec[n].size;
Jim Meyering <jim@meyering.net>
parents:
diff changeset
487 char *val = slotvec[n].val;
Jim Meyering <jim@meyering.net>
parents:
diff changeset
488 size_t qsize = quotearg_buffer (val, size, arg, (size_t) -1, options);
Jim Meyering <jim@meyering.net>
parents:
diff changeset
489
Jim Meyering <jim@meyering.net>
parents:
diff changeset
490 if (size <= qsize)
Jim Meyering <jim@meyering.net>
parents:
diff changeset
491 {
Jim Meyering <jim@meyering.net>
parents:
diff changeset
492 slotvec[n].size = size = qsize + 1;
Jim Meyering <jim@meyering.net>
parents:
diff changeset
493 slotvec[n].val = val = xrealloc (val, size);
Jim Meyering <jim@meyering.net>
parents:
diff changeset
494 quotearg_buffer (val, size, arg, (size_t) -1, options);
Jim Meyering <jim@meyering.net>
parents:
diff changeset
495 }
Jim Meyering <jim@meyering.net>
parents:
diff changeset
496
Jim Meyering <jim@meyering.net>
parents:
diff changeset
497 return val;
Jim Meyering <jim@meyering.net>
parents:
diff changeset
498 }
Jim Meyering <jim@meyering.net>
parents:
diff changeset
499 }
Jim Meyering <jim@meyering.net>
parents:
diff changeset
500
Jim Meyering <jim@meyering.net>
parents:
diff changeset
501 char *
1597
287550eb5c15 (quotearg_buffer): Cast -1 to size_t before comparing.
Jim Meyering <jim@meyering.net>
parents: 1565
diff changeset
502 quotearg_n (unsigned int n, char const *arg)
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
503 {
1282
c5862deb63ad Update from patch-2.5.3.
Jim Meyering <jim@meyering.net>
parents: 1248
diff changeset
504 return quotearg_n_options (n, arg, &default_quoting_options);
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
505 }
Jim Meyering <jim@meyering.net>
parents:
diff changeset
506
Jim Meyering <jim@meyering.net>
parents:
diff changeset
507 char *
Jim Meyering <jim@meyering.net>
parents:
diff changeset
508 quotearg (char const *arg)
Jim Meyering <jim@meyering.net>
parents:
diff changeset
509 {
Jim Meyering <jim@meyering.net>
parents:
diff changeset
510 return quotearg_n (0, arg);
Jim Meyering <jim@meyering.net>
parents:
diff changeset
511 }
Jim Meyering <jim@meyering.net>
parents:
diff changeset
512
Jim Meyering <jim@meyering.net>
parents:
diff changeset
513 char *
1920
78f6058b59a6 Include <libintl.h> if ENABLE_NLS.
Jim Meyering <jim@meyering.net>
parents: 1891
diff changeset
514 quotearg_n_style (unsigned int n, enum quoting_style s, char const *arg)
78f6058b59a6 Include <libintl.h> if ENABLE_NLS.
Jim Meyering <jim@meyering.net>
parents: 1891
diff changeset
515 {
78f6058b59a6 Include <libintl.h> if ENABLE_NLS.
Jim Meyering <jim@meyering.net>
parents: 1891
diff changeset
516 struct quoting_options o;
78f6058b59a6 Include <libintl.h> if ENABLE_NLS.
Jim Meyering <jim@meyering.net>
parents: 1891
diff changeset
517 o.style = s;
78f6058b59a6 Include <libintl.h> if ENABLE_NLS.
Jim Meyering <jim@meyering.net>
parents: 1891
diff changeset
518 memset (o.quote_these_too, 0, sizeof o.quote_these_too);
78f6058b59a6 Include <libintl.h> if ENABLE_NLS.
Jim Meyering <jim@meyering.net>
parents: 1891
diff changeset
519 return quotearg_n_options (n, arg, &o);
78f6058b59a6 Include <libintl.h> if ENABLE_NLS.
Jim Meyering <jim@meyering.net>
parents: 1891
diff changeset
520 }
78f6058b59a6 Include <libintl.h> if ENABLE_NLS.
Jim Meyering <jim@meyering.net>
parents: 1891
diff changeset
521
78f6058b59a6 Include <libintl.h> if ENABLE_NLS.
Jim Meyering <jim@meyering.net>
parents: 1891
diff changeset
522 char *
78f6058b59a6 Include <libintl.h> if ENABLE_NLS.
Jim Meyering <jim@meyering.net>
parents: 1891
diff changeset
523 quotearg_style (enum quoting_style s, char const *arg)
78f6058b59a6 Include <libintl.h> if ENABLE_NLS.
Jim Meyering <jim@meyering.net>
parents: 1891
diff changeset
524 {
78f6058b59a6 Include <libintl.h> if ENABLE_NLS.
Jim Meyering <jim@meyering.net>
parents: 1891
diff changeset
525 return quotearg_n_style (0, s, arg);
78f6058b59a6 Include <libintl.h> if ENABLE_NLS.
Jim Meyering <jim@meyering.net>
parents: 1891
diff changeset
526 }
78f6058b59a6 Include <libintl.h> if ENABLE_NLS.
Jim Meyering <jim@meyering.net>
parents: 1891
diff changeset
527
78f6058b59a6 Include <libintl.h> if ENABLE_NLS.
Jim Meyering <jim@meyering.net>
parents: 1891
diff changeset
528 char *
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
529 quotearg_char (char const *arg, char ch)
Jim Meyering <jim@meyering.net>
parents:
diff changeset
530 {
Jim Meyering <jim@meyering.net>
parents:
diff changeset
531 struct quoting_options options;
1282
c5862deb63ad Update from patch-2.5.3.
Jim Meyering <jim@meyering.net>
parents: 1248
diff changeset
532 options = default_quoting_options;
1248
Jim Meyering <jim@meyering.net>
parents:
diff changeset
533 set_char_quoting (&options, ch, 1);
Jim Meyering <jim@meyering.net>
parents:
diff changeset
534 return quotearg_n_options (0, arg, &options);
Jim Meyering <jim@meyering.net>
parents:
diff changeset
535 }
Jim Meyering <jim@meyering.net>
parents:
diff changeset
536
Jim Meyering <jim@meyering.net>
parents:
diff changeset
537 char *
Jim Meyering <jim@meyering.net>
parents:
diff changeset
538 quotearg_colon (char const *arg)
Jim Meyering <jim@meyering.net>
parents:
diff changeset
539 {
Jim Meyering <jim@meyering.net>
parents:
diff changeset
540 return quotearg_char (arg, ':');
Jim Meyering <jim@meyering.net>
parents:
diff changeset
541 }