]> git.ipfire.org Git - thirdparty/glibc.git/blobdiff - iconv/iconv_prog.c
Update copyright notices with scripts/update-copyrights
[thirdparty/glibc.git] / iconv / iconv_prog.c
index 229b752576345446bdbfc8c6f88e3442dc4a1c35..4a9d1c7e4c772e60244331c6926175031814866e 100644 (file)
@@ -1,22 +1,20 @@
 /* Convert text in given files from the specified from-set to the to-set.
-   Copyright (C) 1998,1999,2000,2001,2002,2003 Free Software Foundation, Inc.
+   Copyright (C) 1998-2014 Free Software Foundation, Inc.
    This file is part of the GNU C Library.
    Contributed by Ulrich Drepper <drepper@cygnus.com>, 1998.
 
-   The GNU C Library is free software; you can redistribute it and/or
-   modify it under the terms of the GNU Lesser General Public
-   License as published by the Free Software Foundation; either
-   version 2.1 of the License, or (at your option) any later version.
+   This program 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; version 2 of the License, or
+   (at your option) any later version.
 
-   The GNU C Library is distributed in the hope that it will be useful,
+   This program 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
-   Lesser General Public License for more details.
+   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 Lesser General Public
-   License along with the GNU C Library; if not, write to the Free
-   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
-   02111-1307 USA.  */
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, see <http://www.gnu.org/licenses/>.  */
 
 #include <argp.h>
 #include <assert.h>
@@ -59,13 +57,13 @@ void (*argp_program_version_hook) (FILE *, struct argp_state *) = print_version;
 static const struct argp_option options[] =
 {
   { NULL, 0, NULL, 0, N_("Input/Output format specification:") },
-  { "from-code", 'f', "NAME", 0, N_("encoding of original text") },
-  { "to-code", 't', "NAME", 0, N_("encoding for output") },
+  { "from-code", 'f', N_("NAME"), 0, N_("encoding of original text") },
+  { "to-code", 't', N_("NAME"), 0, N_("encoding for output") },
   { NULL, 0, NULL, 0, N_("Information:") },
   { "list", 'l', NULL, 0, N_("list all known coded character sets") },
   { NULL, 0, NULL, 0, N_("Output control:") },
   { NULL, 'c', NULL, 0, N_("omit invalid characters from output") },
-  { "output", 'o', "FILE", 0, N_("output file") },
+  { "output", 'o', N_("FILE"), 0, N_("output file") },
   { "silent", 's', NULL, 0, N_("suppress warnings") },
   { "verbose", OPT_VERBOSE, NULL, 0, N_("print progress information") },
   { NULL, 0, NULL, 0, NULL }
@@ -109,9 +107,12 @@ static int list;
 int omit_invalid;
 
 /* Prototypes for the functions doing the actual work.  */
-static int process_block (iconv_t cd, char *addr, size_t len, FILE *output);
-static int process_fd (iconv_t cd, int fd, FILE *output);
-static int process_file (iconv_t cd, FILE *input, FILE *output);
+static int process_block (iconv_t cd, char *addr, size_t len, FILE **output,
+                         const char *output_file);
+static int process_fd (iconv_t cd, int fd, FILE **output,
+                      const char *output_file);
+static int process_file (iconv_t cd, FILE *input, FILE **output,
+                        const char *output_file);
 static void print_known_names (void) internal_function;
 
 
@@ -120,7 +121,6 @@ main (int argc, char *argv[])
 {
   int status = EXIT_SUCCESS;
   int remaining;
-  FILE *output;
   iconv_t cd;
   const char *orig_to_code;
   struct charmap_t *from_charmap = NULL;
@@ -155,19 +155,21 @@ main (int argc, char *argv[])
       if (*errhand == '/')
        {
          --nslash;
-         errhand = strchrnul (errhand, '/');
+         errhand = strchrnul (errhand + 1, '/');
 
          if (*errhand == '/')
            {
              --nslash;
-             ++errhand;
+             errhand = strchr (errhand, '\0');
            }
        }
 
-      newp = (char *) alloca (errhand - to_code + nslash + 6 + 1);
+      newp = (char *) alloca (errhand - to_code + nslash + 7 + 1);
       cp = mempcpy (newp, to_code, errhand - to_code);
       while (nslash-- > 0)
        *cp++ = '/';
+      if (cp[-1] != '/')
+       *cp++ = ',';
       memcpy (cp, "IGNORE", sizeof ("IGNORE"));
 
       to_code = newp;
@@ -183,24 +185,14 @@ main (int argc, char *argv[])
   if (strchr (from_code, '/') != NULL)
     /* The from-name might be a charmap file name.  Try reading the
        file.  */
-    from_charmap = charmap_read (from_code, /*0, 1*/1, 0, 0);
+    from_charmap = charmap_read (from_code, /*0, 1*/1, 0, 0, 0);
 
   if (strchr (orig_to_code, '/') != NULL)
     /* The to-name might be a charmap file name.  Try reading the
        file.  */
-    to_charmap = charmap_read (orig_to_code, /*0, 1,*/1,0, 0);
+    to_charmap = charmap_read (orig_to_code, /*0, 1,*/1, 0, 0, 0);
 
 
-  /* Determine output file.  */
-  if (output_file != NULL && strcmp (output_file, "-") != 0)
-    {
-      output = fopen (output_file, "w");
-      if (output == NULL)
-       error (EXIT_FAILURE, errno, _("cannot open output file"));
-    }
-  else
-    output = stdout;
-
   /* At this point we have to handle two cases.  The first one is
      where a charmap is used for the from- or to-charset, or both.  We
      handle this special since it is very different from the sane way of
@@ -209,7 +201,7 @@ main (int argc, char *argv[])
   if (from_charmap != NULL || to_charmap != NULL)
     /* Construct the conversion table and do the conversion.  */
     status = charmap_conversion (from_code, from_charmap, to_code, to_charmap,
-                                argc, remaining, argv, output);
+                                argc, remaining, argv, output_file);
   else
     {
       /* Let's see whether we have these coded character sets.  */
@@ -237,51 +229,59 @@ main (int argc, char *argv[])
              if (from_wrong)
                {
                  if (to_wrong)
-                   error (EXIT_FAILURE, 0,
+                   error (0, 0,
                           _("\
 conversions from `%s' and to `%s' are not supported"),
                           from_pretty, to_pretty);
                  else
-                   error (EXIT_FAILURE, 0,
+                   error (0, 0,
                           _("conversion from `%s' is not supported"),
                           from_pretty);
                }
              else
                {
                  if (to_wrong)
-                   error (EXIT_FAILURE, 0,
+                   error (0, 0,
                           _("conversion to `%s' is not supported"),
                           to_pretty);
                  else
-                   error (EXIT_FAILURE, 0,
+                   error (0, 0,
                           _("conversion from `%s' to `%s' is not supported"),
                           from_pretty, to_pretty);
                }
+
+             argp_help (&argp, stderr, ARGP_HELP_SEE,
+                        program_invocation_short_name);
+             exit (1);
            }
          else
            error (EXIT_FAILURE, errno,
                   _("failed to start conversion processing"));
        }
 
+      /* The output file.  Will be opened when we are ready to produce
+        output.  */
+      FILE *output = NULL;
+
       /* Now process the remaining files.  Write them to stdout or the file
         specified with the `-o' parameter.  If we have no file given as
         the parameter process all from stdin.  */
       if (remaining == argc)
        {
-         if (process_file (cd, stdin, output) != 0)
+         if (process_file (cd, stdin, &output, output_file) != 0)
            status = EXIT_FAILURE;
        }
       else
        do
          {
 #ifdef _POSIX_MAPPED_FILES
-           struct stat st;
+           struct stat64 st;
            char *addr;
 #endif
-           int fd;
+           int fd, ret;
 
            if (verbose)
-             printf ("%s:\n", argv[remaining]);
+             fprintf (stderr, "%s:\n", argv[remaining]);
            if (strcmp (argv[remaining], "-") == 0)
              fd = 0;
            else
@@ -300,7 +300,7 @@ conversions from `%s' and to `%s' are not supported"),
 #ifdef _POSIX_MAPPED_FILES
            /* We have possibilities for reading the input file.  First try
               to mmap() it since this will provide the fastest solution.  */
-           if (fstat (fd, &st) == 0
+           if (fstat64 (fd, &st) == 0
                && ((addr = mmap (NULL, st.st_size, PROT_READ, MAP_PRIVATE,
                                  fd, 0)) != MAP_FAILED))
              {
@@ -311,51 +311,51 @@ conversions from `%s' and to `%s' are not supported"),
                         _("error while closing input `%s'"),
                         argv[remaining]);
 
-               if (process_block (cd, addr, st.st_size, output) < 0)
+               ret = process_block (cd, addr, st.st_size, &output,
+                                    output_file);
+
+               /* We don't need the input data anymore.  */
+               munmap ((void *) addr, st.st_size);
+
+               if (ret != 0)
                  {
-                   /* Something went wrong.  */
                    status = EXIT_FAILURE;
 
-                   /* We don't need the input data anymore.  */
-                   munmap ((void *) addr, st.st_size);
-
-                   /* We cannot go on with producing output since it might
-                      lead to problem because the last output might leave
-                      the output stream in an undefined state.  */
-                   break;
+                   if (ret < 0)
+                     /* We cannot go on with producing output since it might
+                        lead to problem because the last output might leave
+                        the output stream in an undefined state.  */
+                     break;
                  }
-
-               /* We don't need the input data anymore.  */
-               munmap ((void *) addr, st.st_size);
              }
            else
 #endif /* _POSIX_MAPPED_FILES */
              {
                /* Read the file in pieces.  */
-               if (process_fd (cd, fd, output) != 0)
+               ret = process_fd (cd, fd, &output, output_file);
+
+               /* Now close the file.  */
+               close (fd);
+
+               if (ret != 0)
                  {
                    /* Something went wrong.  */
                    status = EXIT_FAILURE;
 
-                   /* We don't need the input file anymore.  */
-                   close (fd);
-
-                   /* We cannot go on with producing output since it might
-                      lead to problem because the last output might leave
-                      the output stream in an undefined state.  */
-                   break;
+                   if (ret < 0)
+                     /* We cannot go on with producing output since it might
+                        lead to problem because the last output might leave
+                        the output stream in an undefined state.  */
+                     break;
                  }
-
-               /* Now close the file.  */
-               close (fd);
              }
          }
        while (++remaining < argc);
-    }
 
-  /* Close the output file now.  */
-  if (fclose (output))
-    error (EXIT_FAILURE, errno, _("error while closing output file"));
+      /* Close the output file now.  */
+      if (output != NULL && fclose (output))
+       error (EXIT_FAILURE, errno, _("error while closing output file"));
+    }
 
   return status;
 }
@@ -400,12 +400,16 @@ parse_opt (int key, char *arg, struct argp_state *state)
 static char *
 more_help (int key, const char *text, void *input)
 {
+  char *tp = NULL;
   switch (key)
     {
     case ARGP_KEY_HELP_EXTRA:
       /* We print some extra information.  */
-      return strdup (gettext ("\
-Report bugs using the `glibcbug' script to <bugs@gnu.org>.\n"));
+      if (asprintf (&tp, gettext ("\
+For bug reporting instructions, please see:\n\
+%s.\n"), REPORT_BUGS_TO) < 0)
+       return NULL;
+      return tp;
     default:
       break;
     }
@@ -417,18 +421,54 @@ Report bugs using the `glibcbug' script to <bugs@gnu.org>.\n"));
 static void
 print_version (FILE *stream, struct argp_state *state)
 {
-  fprintf (stream, "iconv (GNU %s) %s\n", PACKAGE, VERSION);
+  fprintf (stream, "iconv %s%s\n", PKGVERSION, VERSION);
   fprintf (stream, gettext ("\
 Copyright (C) %s Free Software Foundation, Inc.\n\
 This is free software; see the source for copying conditions.  There is NO\n\
 warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n\
-"), "2003");
+"), "2013");
   fprintf (stream, gettext ("Written by %s.\n"), "Ulrich Drepper");
 }
 
 
 static int
-process_block (iconv_t cd, char *addr, size_t len, FILE *output)
+write_output (const char *outbuf, const char *outptr, FILE **output,
+             const char *output_file)
+{
+  /* We have something to write out.  */
+  int errno_save = errno;
+
+  if (*output == NULL)
+    {
+      /* Determine output file.  */
+      if (output_file != NULL && strcmp (output_file, "-") != 0)
+       {
+         *output = fopen (output_file, "w");
+         if (*output == NULL)
+           error (EXIT_FAILURE, errno, _("cannot open output file"));
+       }
+      else
+       *output = stdout;
+    }
+
+  if (fwrite (outbuf, 1, outptr - outbuf, *output) < (size_t) (outptr - outbuf)
+      || ferror (*output))
+    {
+      /* Error occurred while printing the result.  */
+      error (0, 0, _("\
+conversion stopped due to problem in writing the output"));
+      return -1;
+    }
+
+  errno = errno_save;
+
+  return 0;
+}
+
+
+static int
+process_block (iconv_t cd, char *addr, size_t len, FILE **output,
+              const char *output_file)
 {
 #define OUTBUF_SIZE    32768
   const char *start = addr;
@@ -436,6 +476,7 @@ process_block (iconv_t cd, char *addr, size_t len, FILE *output)
   char *outptr;
   size_t outlen;
   size_t n;
+  int ret = 0;
 
   while (len > 0)
     {
@@ -443,51 +484,45 @@ process_block (iconv_t cd, char *addr, size_t len, FILE *output)
       outlen = OUTBUF_SIZE;
       n = iconv (cd, &addr, &len, &outptr, &outlen);
 
-      if (outptr != outbuf)
+      if (n == (size_t) -1 && omit_invalid && errno == EILSEQ)
        {
-         /* We have something to write out.  */
-         int errno_save = errno;
-
-         if (fwrite (outbuf, 1, outptr - outbuf, output)
-             < (size_t) (outptr - outbuf)
-             || ferror (output))
-           {
-             /* Error occurred while printing the result.  */
-             error (0, 0, _("\
-conversion stopped due to problem in writing the output"));
-             return -1;
-           }
+         ret = 1;
+         if (len == 0)
+           n = 0;
+         else
+           errno = E2BIG;
+       }
 
-         errno = errno_save;
+      if (outptr != outbuf)
+       {
+         ret = write_output (outbuf, outptr, output, output_file);
+         if (ret != 0)
+           break;
        }
 
       if (n != (size_t) -1)
        {
          /* All the input test is processed.  For state-dependent
-             character sets we have to flush the state now.  */
+            character sets we have to flush the state now.  */
          outptr = outbuf;
          outlen = OUTBUF_SIZE;
-         (void) iconv (cd, NULL, NULL, &outptr, &outlen);
+         n = iconv (cd, NULL, NULL, &outptr, &outlen);
 
          if (outptr != outbuf)
            {
-             /* We have something to write out.  */
-             int errno_save = errno;
+             ret = write_output (outbuf, outptr, output, output_file);
+             if (ret != 0)
+               break;
+           }
 
-             if (fwrite (outbuf, 1, outptr - outbuf, output)
-                 < (size_t) (outptr - outbuf)
-                 || ferror (output))
-               {
-                 /* Error occurred while printing the result.  */
-                 error (0, 0, _("\
-conversion stopped due to problem in writing the output"));
-                 return -1;
-               }
+         if (n != (size_t) -1)
+           break;
 
-             errno = errno_save;
+         if (omit_invalid && errno == EILSEQ)
+           {
+             ret = 1;
+             break;
            }
-
-         break;
        }
 
       if (errno != E2BIG)
@@ -496,8 +531,9 @@ conversion stopped due to problem in writing the output"));
          switch (errno)
            {
            case EILSEQ:
-             error (0, 0, _("illegal input sequence at position %ld"),
-                    (long) (addr - start));
+             if (! omit_invalid)
+               error (0, 0, _("illegal input sequence at position %ld"),
+                      (long int) (addr - start));
              break;
            case EINVAL:
              error (0, 0, _("\
@@ -515,12 +551,12 @@ incomplete character or shift sequence at end of buffer"));
        }
     }
 
-  return 0;
+  return ret;
 }
 
 
 static int
-process_fd (iconv_t cd, int fd, FILE *output)
+process_fd (iconv_t cd, int fd, FILE **output, const char *output_file)
 {
   /* we have a problem with reading from a desriptor since we must not
      provide the iconv() function an incomplete character or shift
@@ -594,16 +630,16 @@ process_fd (iconv_t cd, int fd, FILE *output)
       }
 
   /* Now we have all the input in the buffer.  Process it in one run.  */
-  return process_block (cd, inbuf, actlen, output);
+  return process_block (cd, inbuf, actlen, output, output_file);
 }
 
 
 static int
-process_file (iconv_t cd, FILE *input, FILE *output)
+process_file (iconv_t cd, FILE *input, FILE **output, const char *output_file)
 {
   /* This should be safe since we use this function only for `stdin' and
      we haven't read anything so far.  */
-  return process_fd (cd, fileno (input), output);
+  return process_fd (cd, fileno (input), output, output_file);
 }
 
 
@@ -685,9 +721,8 @@ add_known_names (struct gconv_module *node)
     add_known_names (node->right);
   do
     {
-      if (strcmp (node->from_string, "INTERNAL"))
-       tsearch (node->from_string, &printlist,
-                (__compar_fn_t) strverscmp);
+      if (strcmp (node->from_string, "INTERNAL") != 0)
+       tsearch (node->from_string, &printlist, (__compar_fn_t) strverscmp);
       if (strcmp (node->to_string, "INTERNAL") != 0)
        tsearch (node->to_string, &printlist, (__compar_fn_t) strverscmp);
 
@@ -750,21 +785,19 @@ print_known_names (void)
        add_known_names (modules);
     }
 
-  fputs (_("\
-The following list contain all the coded character sets known.  This does\n\
+  bool human_readable = isatty (fileno (stdout));
+
+  if (human_readable)
+    fputs (_("\
+The following list contains all the coded character sets known.  This does\n\
 not necessarily mean that all combinations of these names can be used for\n\
 the FROM and TO command line parameters.  One coded character set can be\n\
 listed with several different names (aliases).\n\n  "), stdout);
 
   /* Now print the collected names.  */
   column = 2;
-  if (isatty (fileno (stdout)))
-    {
-      twalk (printlist, do_print_human);
+  twalk (printlist, human_readable ? do_print_human : do_print);
 
-      if (column != 0)
-       puts ("");
-    }
-  else
-    twalk (printlist, do_print);
+  if (human_readable && column != 0)
+    puts ("");
 }