diff options
Diffstat (limited to 'src/msguniq.c')
-rw-r--r-- | src/msguniq.c | 347 |
1 files changed, 347 insertions, 0 deletions
diff --git a/src/msguniq.c b/src/msguniq.c new file mode 100644 index 0000000..3405691 --- /dev/null +++ b/src/msguniq.c @@ -0,0 +1,347 @@ +/* Remove, select or merge duplicate translations. + Copyright (C) 2001 Free Software Foundation, Inc. + Written by Bruno Haible <haible@clisp.cons.org>, 2001. + + 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 <stdio.h> +#include <stdlib.h> +#include <locale.h> + +#include "dir-list.h" +#include "str-list.h" +#include "error.h" +#include "progname.h" +#include "message.h" +#include "read-po.h" +#include "write-po.h" +#include "msgl-cat.h" +#include "system.h" +#include "libgettext.h" + +#define _(str) gettext (str) + + +/* Force output of PO file even if empty. */ +static int force_po; + +/* Target encoding. */ +static const char *to_code; + +/* Long options. */ +static const struct option long_options[] = +{ + { "add-location", no_argument, &line_comment, 1 }, + { "directory", required_argument, NULL, 'D' }, + { "escape", no_argument, NULL, 'E' }, + { "force-po", no_argument, &force_po, 1 }, + { "help", no_argument, NULL, 'h' }, + { "indent", no_argument, NULL, 'i' }, + { "no-escape", no_argument, NULL, 'e' }, + { "no-location", no_argument, &line_comment, 0 }, + { "output-file", required_argument, NULL, 'o' }, + { "repeated", no_argument, NULL, 'd' }, + { "sort-by-file", no_argument, NULL, 'F' }, + { "sort-output", no_argument, NULL, 's' }, + { "strict", no_argument, NULL, 'S' }, + { "to-code", required_argument, NULL, 't' }, + { "unique", no_argument, NULL, 'u' }, + { "use-first", no_argument, NULL, CHAR_MAX + 1 }, + { "version", no_argument, NULL, 'V' }, + { "width", required_argument, NULL, 'w', }, + { NULL, 0, NULL, 0 } +}; + + +/* Prototypes for local functions. */ +static void usage PARAMS ((int status)); + + +int +main (argc, argv) + int argc; + char **argv; +{ + int optchar; + bool do_help; + bool do_version; + char *output_file; + const char *input_file; + string_list_ty *file_list; + msgdomain_list_ty *result; + bool sort_by_msgid = false; + bool sort_by_filepos = false; + + /* Set program name for messages. */ + 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); + + /* Set default values for variables. */ + do_help = false; + do_version = false; + output_file = NULL; + input_file = NULL; + more_than = 0; + less_than = INT_MAX; + use_first = false; + + while ((optchar = getopt_long (argc, argv, "dD:eEFhino:st:uVw:", + long_options, NULL)) != EOF) + switch (optchar) + { + case '\0': /* Long option. */ + break; + + case 'd': + more_than = 1; + less_than = INT_MAX; + break; + + case 'D': + dir_list_append (optarg); + break; + + case 'e': + message_print_style_escape (false); + break; + + case 'E': + message_print_style_escape (true); + break; + + case 'F': + sort_by_filepos = true; + break; + + case 'h': + do_help = true; + break; + + case 'i': + message_print_style_indent (); + break; + + case 'n': + line_comment = 1; + break; + + case 'o': + output_file = optarg; + break; + + case 's': + sort_by_msgid = true; + break; + + case 'S': + message_print_style_uniforum (); + break; + + case 't': + to_code = optarg; + break; + + case 'u': + more_than = 0; + less_than = 2; + 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: + use_first = true; + break; + + default: + usage (EXIT_FAILURE); + /* NOTREACHED */ + } + + /* Verify selected options. */ + if (!line_comment && sort_by_filepos) + error (EXIT_FAILURE, 0, _("%s and %s are mutually exclusive"), + "--no-location", "--sort-by-file"); + + if (sort_by_msgid && sort_by_filepos) + error (EXIT_FAILURE, 0, _("%s and %s are mutually exclusive"), + "--sort-output", "--sort-by-file"); + + /* Version information 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\ +"), + "2001"); + printf (_("Written by %s.\n"), "Bruno Haible"); + exit (EXIT_SUCCESS); + } + + /* Help is requested. */ + if (do_help) + usage (EXIT_SUCCESS); + + /* Test whether we have an .po file name as argument. */ + if (optind == argc) + input_file = "-"; + else if (optind + 1 == argc) + input_file = argv[optind]; + else + { + error (EXIT_SUCCESS, 0, _("at most one input file allowed")); + usage (EXIT_FAILURE); + } + + /* Determine list of files we have to process: a single file. */ + file_list = string_list_alloc (); + string_list_append (file_list, input_file); + + /* Read input files, then filter, convert and merge messages. */ + allow_duplicates = true; + result = catenate_msgdomain_list (file_list, to_code); + + string_list_free (file_list); + + /* Sorting the list of messages. */ + if (sort_by_filepos) + msgdomain_list_sort_by_filepos (result); + else if (sort_by_msgid) + msgdomain_list_sort_by_msgid (result); + + /* Write the PO file. */ + msgdomain_list_print (result, output_file, force_po, false); + + exit (EXIT_SUCCESS); +} + + +/* Display usage information and exit. */ +static void +usage (status) + 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] [INPUTFILE]\n\ +"), program_name); + printf ("\n"); + /* xgettext: no-wrap */ + printf (_("\ +Unifies duplicate translations in a translation catalog.\n\ +Finds duplicate translations of the same message ID. Such duplicates are\n\ +invalid input for other programs like msgfmt, msgmerge or msgcat. By\n\ +default, duplicates are merged together. When using the --repeated option,\n\ +only duplicates are output, and all other messages are discarded. Comments\n\ +and extracted comments will be cumulated, except that if --use-first is\n\ +specified, they will be taken from the first translation. File positions\n\ +will be cumulated. When using the --unique option, duplicates are discarded.\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 (_("\ +Input file location:\n\ + INPUTFILE input PO file\n\ + -D, --directory=DIRECTORY add DIRECTORY to list for input files search\n\ +If no input file is given or if it is -, standard input is read.\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 (_("\ +Message selection:\n\ + -d, --repeated print only duplicates\n\ + -u, --unique print only unique messages, discard duplicates\n\ +")); + printf ("\n"); + /* xgettext: no-wrap */ + printf (_("\ +Output details:\n\ + -t, --to-code=NAME encoding for output\n\ + --use-first use first available translation for each\n\ + message, don't merge several translations\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 the .po file using indented style\n\ + --no-location do not write '#: filename:line' lines\n\ + -n, --add-location generate '#: filename:line' lines (default)\n\ + --strict write out strict Uniforum conforming .po file\n\ + -w, --width=NUMBER set output page width\n\ + -s, --sort-output generate sorted output and remove duplicates\n\ + -F, --sort-by-file sort output by file location\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\ +")); + printf ("\n"); + fputs (_("Report bugs to <bug-gnu-utils@gnu.org>.\n"), + stdout); + } + + exit (status); +} + |