2 /* $NetBSD: iconv.c,v 1.16 2009/02/20 15:28:21 yamt Exp $ */
5 * Copyright (c)2003 Citrus Project,
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 #include <sys/cdefs.h>
44 static unsigned long long invalids;
46 static void do_conv(FILE *, const char *, const char *, bool, bool);
47 static int do_list(unsigned int, const char * const *, void *);
48 static void usage(void);
50 struct option long_options[] =
52 {"from-code", required_argument, NULL, 'f'},
53 {"list", no_argument, NULL, 'l'},
54 {"silent", no_argument, NULL, 's'},
55 {"to-code", required_argument, NULL, 't'},
56 {NULL, no_argument, NULL, 0}
63 "Usage:\t%1$s [-cs] -f <from_code> -t <to_code> [file ...]\n"
64 "\t%1$s -f <from_code> [-cs] [-t <to_code>] [file ...]\n"
65 "\t%1$s -t <to_code> [-cs] [-f <from_code>] [file ...]\n"
66 "\t%1$s -l\n", getprogname());
70 #define INBUFSIZE 1024
71 #define OUTBUFSIZE (INBUFSIZE * 2)
73 do_conv(FILE *fp, const char *from, const char *to, bool silent,
77 char inbuf[INBUFSIZE], outbuf[OUTBUFSIZE], *out;
79 size_t inbytes, outbytes, ret;
81 if ((cd = iconv_open(to, from)) == (iconv_t)-1)
82 err(EXIT_FAILURE, "iconv_open(%s, %s)", to, from);
87 if (iconvctl(cd, ICONV_SET_DISCARD_ILSEQ, (void *)&arg) == -1)
90 while ((inbytes = fread(inbuf, 1, INBUFSIZE, fp)) > 0) {
96 outbytes = OUTBUFSIZE;
97 ret = __iconv(cd, &in, &inbytes, &out, &outbytes,
100 if (outbytes < OUTBUFSIZE)
101 (void)fwrite(outbuf, 1, OUTBUFSIZE - outbytes,
103 if (ret == (size_t)-1 && errno != E2BIG) {
104 if (errno != EINVAL || in == inbuf)
105 err(EXIT_FAILURE, "iconv()");
107 /* incomplete input character */
108 (void)memmove(inbuf, in, inbytes);
109 ret = fread(inbuf + inbytes, 1,
110 INBUFSIZE - inbytes, fp);
115 "unexpected end of file; "
116 "the last character is "
119 err(EXIT_FAILURE, "fread()");
126 /* reset the shift state of the output buffer */
127 outbytes = OUTBUFSIZE;
129 ret = iconv(cd, NULL, NULL, &out, &outbytes);
130 if (ret == (size_t)-1)
131 err(EXIT_FAILURE, "iconv()");
132 if (outbytes < OUTBUFSIZE)
133 (void)fwrite(outbuf, 1, OUTBUFSIZE - outbytes, stdout);
135 if (invalids > 0 && !silent)
136 warnx("warning: invalid characters: %llu", invalids);
142 do_list(unsigned int n, const char * const *list, void *data __unused)
146 for(i = 0; i < n; i++) {
147 printf("%s", list[i]);
157 main(int argc, char **argv)
162 bool opt_c = false, opt_s = false;
164 opt_f = opt_t = strdup("");
166 setlocale(LC_ALL, "");
167 setprogname(argv[0]);
169 while ((ch = getopt_long(argc, argv, "csLlf:t:",
170 long_options, NULL)) != -1) {
180 if (opt_s || opt_c || strcmp(opt_f, "") != 0 ||
181 strcmp(opt_t, "") != 0) {
182 warnx("-l is not allowed with other flags.");
185 iconvlist(do_list, NULL);
186 return (EXIT_SUCCESS);
190 opt_f = strdup(optarg);
195 opt_t = strdup(optarg);
203 if ((strcmp(opt_f, "") == 0) && (strcmp(opt_t, "") == 0))
206 do_conv(stdin, opt_f, opt_t, opt_s, opt_c);
208 for (i = 0; i < argc; i++) {
209 fp = (strcmp(argv[i], "-") != 0) ?
210 fopen(argv[i], "r") : stdin;
212 err(EXIT_FAILURE, "Cannot open `%s'",
214 do_conv(fp, opt_f, opt_t, opt_s,
219 return (EXIT_SUCCESS);