diff options
Diffstat (limited to 'gettext-tools/src/msgunfmt.c')
| -rw-r--r-- | gettext-tools/src/msgunfmt.c | 400 |
1 files changed, 400 insertions, 0 deletions
diff --git a/gettext-tools/src/msgunfmt.c b/gettext-tools/src/msgunfmt.c new file mode 100644 index 000000000..eb650b16d --- /dev/null +++ b/gettext-tools/src/msgunfmt.c @@ -0,0 +1,400 @@ +/* msgunfmt - converts binary .mo files to Uniforum style .po files + Copyright (C) 1995-1998, 2000-2002 Free Software Foundation, Inc. + Written by Ulrich Drepper <drepper@gnu.ai.mit.edu>, April 1995. + + 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; either version 2, or (at your option) + any later version. + + 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 General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program; if not, write to the Free Software Foundation, + Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ + +#ifdef HAVE_CONFIG_H +# include <config.h> +#endif + +#include <getopt.h> +#include <limits.h> +#include <stdbool.h> +#include <stdio.h> +#include <stdlib.h> +#include <locale.h> + +#include "error.h" +#include "progname.h" +#include "basename.h" +#include "exit.h" +#include "message.h" +#include "msgunfmt.h" +#include "read-mo.h" +#include "read-java.h" +#include "read-tcl.h" +#include "write-po.h" +#include "gettext.h" + +#define _(str) gettext (str) + + +/* Be more verbose. */ +bool verbose; + +/* Java mode input file specification. */ +static bool java_mode; +static const char *java_resource_name; +static const char *java_locale_name; + +/* Tcl mode input file specification. */ +static bool tcl_mode; +static const char *tcl_locale_name; +static const char *tcl_base_directory; + +/* Force output of PO file even if empty. */ +static int force_po; + +/* Long options. */ +static const struct option long_options[] = +{ + { "escape", no_argument, NULL, 'E' }, + { "force-po", no_argument, &force_po, 1 }, + { "help", no_argument, NULL, 'h' }, + { "indent", no_argument, NULL, 'i' }, + { "java", no_argument, NULL, 'j' }, + { "locale", required_argument, NULL, 'l' }, + { "no-escape", no_argument, NULL, 'e' }, + { "no-wrap", no_argument, NULL, CHAR_MAX + 2 }, + { "output-file", required_argument, NULL, 'o' }, + { "resource", required_argument, NULL, 'r' }, + { "sort-output", no_argument, NULL, 's' }, + { "strict", no_argument, NULL, 'S' }, + { "tcl", no_argument, NULL, CHAR_MAX + 1 }, + { "verbose", no_argument, NULL, 'v' }, + { "version", no_argument, NULL, 'V' }, + { "width", required_argument, NULL, 'w', }, + { NULL, 0, NULL, 0 } +}; + + +/* Forward declaration of local functions. */ +static void usage (int status) +#if defined __GNUC__ && ((__GNUC__ == 2 && __GNUC_MINOR__ >= 5) || __GNUC__ > 2) + __attribute__ ((noreturn)) +#endif +; + + +int +main (int argc, char **argv) +{ + int optchar; + bool do_help = false; + bool do_version = false; + const char *output_file = "-"; + msgdomain_list_ty *result; + bool sort_by_msgid = false; + + /* Set program name for messages. */ + set_program_name (argv[0]); + error_print_progname = maybe_print_progname; + +#ifdef HAVE_SETLOCALE + /* Set locale via LC_ALL. */ + setlocale (LC_ALL, ""); +#endif + + /* Set the text message domain. */ + bindtextdomain (PACKAGE, LOCALEDIR); + textdomain (PACKAGE); + + while ((optchar = getopt_long (argc, argv, "d:eEhijl:o:r:svVw:", + long_options, NULL)) + != EOF) + switch (optchar) + { + case '\0': + /* long option */ + break; + + case 'd': + tcl_base_directory = optarg; + break; + + case 'e': + message_print_style_escape (false); + break; + + case 'E': + message_print_style_escape (true); + break; + + case 'h': + do_help = true; + break; + + case 'i': + message_print_style_indent (); + break; + + case 'j': + java_mode = true; + break; + + case 'l': + java_locale_name = optarg; + tcl_locale_name = optarg; + break; + + case 'o': + output_file = optarg; + break; + + case 'r': + java_resource_name = optarg; + break; + + case 's': + sort_by_msgid = true; + break; + + case 'S': + message_print_style_uniforum (); + break; + + case 'v': + verbose = true; + break; + + case 'V': + do_version = true; + break; + + case 'w': + { + int value; + char *endp; + value = strtol (optarg, &endp, 10); + if (endp != optarg) + message_page_width_set (value); + } + break; + + case CHAR_MAX + 1: + tcl_mode = true; + break; + + case CHAR_MAX + 2: /* --no-wrap */ + message_page_width_ignore (); + break; + + default: + usage (EXIT_FAILURE); + break; + } + + /* Version information is requested. */ + if (do_version) + { + printf ("%s (GNU %s) %s\n", basename (program_name), PACKAGE, VERSION); + /* xgettext: no-wrap */ + printf (_("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\ +"), + "1995-1998, 2000-2002"); + printf (_("Written by %s.\n"), "Ulrich Drepper"); + exit (EXIT_SUCCESS); + } + + /* Help is requested. */ + if (do_help) + usage (EXIT_SUCCESS); + + /* Check for contradicting options. */ + if (java_mode && tcl_mode) + error (EXIT_FAILURE, 0, _("%s and %s are mutually exclusive"), + "--java", "--tcl"); + if (java_mode) + { + if (optind < argc) + { + error (EXIT_FAILURE, 0, + _("%s and explicit file names are mutually exclusive"), + "--java"); + } + } + else if (tcl_mode) + { + if (optind < argc) + { + error (EXIT_FAILURE, 0, + _("%s and explicit file names are mutually exclusive"), + "--tcl"); + } + if (tcl_locale_name == NULL) + { + error (EXIT_SUCCESS, 0, + _("%s requires a \"-l locale\" specification"), + "--tcl"); + usage (EXIT_FAILURE); + } + if (tcl_base_directory == NULL) + { + error (EXIT_SUCCESS, 0, + _("%s requires a \"-d directory\" specification"), + "--tcl"); + usage (EXIT_FAILURE); + } + } + else + { + if (java_resource_name != NULL) + { + error (EXIT_SUCCESS, 0, _("%s is only valid with %s"), + "--resource", "--java"); + usage (EXIT_FAILURE); + } + if (java_locale_name != NULL) + { + error (EXIT_SUCCESS, 0, _("%s is only valid with %s"), + "--locale", "--java"); + usage (EXIT_FAILURE); + } + } + + /* Read the given .mo file. */ + if (java_mode) + { + result = msgdomain_read_java (java_resource_name, java_locale_name); + } + else if (tcl_mode) + { + result = msgdomain_read_tcl (tcl_locale_name, tcl_base_directory); + } + else + { + message_list_ty *mlp; + + mlp = message_list_alloc (false); + if (optind < argc) + { + do + read_mo_file (mlp, argv[optind]); + while (++optind < argc); + } + else + read_mo_file (mlp, "-"); + + result = msgdomain_list_alloc (false); + result->item[0]->messages = mlp; + } + + /* Sorting the list of messages. */ + if (sort_by_msgid) + msgdomain_list_sort_by_msgid (result); + + /* Write the resulting message list to the given .po file. */ + msgdomain_list_print (result, output_file, force_po, false); + + /* No problems. */ + exit (EXIT_SUCCESS); +} + + +/* Display usage information and exit. */ +static void +usage (int status) +{ + if (status != EXIT_SUCCESS) + fprintf (stderr, _("Try `%s --help' for more information.\n"), + program_name); + else + { + /* xgettext: no-wrap */ + printf (_("\ +Usage: %s [OPTION] [FILE]...\n\ +"), program_name); + printf ("\n"); + /* xgettext: no-wrap */ + printf (_("\ +Convert binary message catalog to Uniforum style .po file.\n\ +")); + printf ("\n"); + /* xgettext: no-wrap */ + printf (_("\ +Mandatory arguments to long options are mandatory for short options too.\n\ +")); + printf ("\n"); + /* xgettext: no-wrap */ + printf (_("\ +Operation mode:\n\ + -j, --java Java mode: input is a Java ResourceBundle class\n\ + --tcl Tcl mode: input is a tcl/msgcat .msg file\n\ +")); + printf ("\n"); + /* xgettext: no-wrap */ + printf (_("\ +Input file location:\n\ + FILE ... input .mo files\n\ +If no input file is given or if it is -, standard input is read.\n\ +")); + printf ("\n"); + /* xgettext: no-wrap */ + printf (_("\ +Input file location in Java mode:\n\ + -r, --resource=RESOURCE resource name\n\ + -l, --locale=LOCALE locale name, either language or language_COUNTRY\n\ +The class name is determined by appending the locale name to the resource name,\n\ +separated with an underscore. The class is located using the CLASSPATH.\n\ +")); + printf ("\n"); + /* xgettext: no-wrap */ + printf (_("\ +Input file location in Tcl mode:\n\ + -l, --locale=LOCALE locale name, either language or language_COUNTRY\n\ + -d DIRECTORY base directory of .msg message catalogs\n\ +The -l and -d options are mandatory. The .msg file is located in the\n\ +specified directory.\n\ +")); + printf ("\n"); + /* xgettext: no-wrap */ + printf (_("\ +Output file location:\n\ + -o, --output-file=FILE write output to specified file\n\ +The results are written to standard output if no output file is specified\n\ +or if it is -.\n\ +")); + printf ("\n"); + /* xgettext: no-wrap */ + printf (_("\ +Output details:\n\ + -e, --no-escape do not use C escapes in output (default)\n\ + -E, --escape use C escapes in output, no extended chars\n\ + --force-po write PO file even if empty\n\ + -i, --indent write indented output style\n\ + --strict write strict uniforum style\n\ + -w, --width=NUMBER set output page width\n\ + --no-wrap do not break long message lines, longer than\n\ + the output page width, into several lines\n\ + -s, --sort-output generate sorted output\n\ +")); + printf ("\n"); + /* xgettext: no-wrap */ + printf (_("\ +Informative output:\n\ + -h, --help display this help and exit\n\ + -V, --version output version information and exit\n\ + -v, --verbose increase verbosity level\n\ +")); + printf ("\n"); + fputs (_("Report bugs to <bug-gnu-gettext@gnu.org>.\n"), + stdout); + } + + exit (status); +} |