/* GNU gettext - internationalization aids Copyright (C) 1995-1998, 2000, 2001 Free Software Foundation, Inc. This file was written by Peter Miller 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 #endif #include #include #include #include #include #include "dir-list.h" #include "error.h" #include "progname.h" #include "message.h" #include "read-po.h" #include "write-po.h" #include "system.h" #include "libgettext.h" #include "po.h" #define _(str) gettext (str) /* If non-zero do not print unneeded messages. */ static int quiet; /* Verbosity level. */ static int verbosity_level; /* Force output of PO file even if empty. */ static int force_po; /* list of user-specified compendiums. */ static message_list_list_ty *compendiums; /* Long options. */ static const struct option long_options[] = { { "add-location", no_argument, &line_comment, 1 }, { "compendium", required_argument, NULL, 'C', }, { "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' }, { "quiet", no_argument, NULL, 'q' }, { "sort-by-file", no_argument, NULL, 'F' }, { "sort-output", no_argument, NULL, 's' }, { "silent", no_argument, NULL, 'q' }, { "strict", no_argument, NULL, 'S' }, { "verbose", no_argument, NULL, 'v' }, { "version", no_argument, NULL, 'V' }, { "width", required_argument, NULL, 'w', }, { NULL, 0, NULL, 0 } }; /* Prototypes for local functions. */ static void usage PARAMS ((int __status)); static message_list_ty *merge PARAMS ((const char *__fn1, const char *__fn2)); static void compendium PARAMS ((const char *__filename)); int main (argc, argv) int argc; char **argv; { int opt; int do_help; int do_version; char *output_file; message_list_ty *result; int sort_by_filepos = 0; int sort_by_msgid = 0; /* Set program name for messages. */ set_program_name (argv[0]); error_print_progname = maybe_print_progname; verbosity_level = 0; quiet = 0; gram_max_allowed_errors = UINT_MAX; #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 = 0; do_version = 0; output_file = NULL; while ((opt = getopt_long (argc, argv, "C:D:eEFhio:qsvVw:", long_options, NULL)) != EOF) switch (opt) { case '\0': /* Long option. */ break; case 'C': compendium (optarg); break; case 'D': dir_list_append (optarg); break; case 'e': message_print_style_escape (0); break; case 'E': message_print_style_escape (1); break; case 'F': sort_by_filepos = 1; break; case 'h': do_help = 1; break; case 'i': message_print_style_indent (); break; case 'o': output_file = optarg; break; case 'q': quiet = 1; break; case 's': sort_by_msgid = 1; break; case 'S': message_print_style_uniforum (); break; case 'v': ++verbosity_level; break; case 'V': do_version = 1; break; case 'w': { int value; char *endp; value = strtol (optarg, &endp, 10); if (endp != optarg) message_page_width_set (value); } 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, 2001"); printf (_("Written by %s.\n"), "Peter Miller"); 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) { error (EXIT_SUCCESS, 0, _("no input files given")); usage (EXIT_FAILURE); } if (optind + 2 != argc) { error (EXIT_SUCCESS, 0, _("exactly 2 input files required")); usage (EXIT_FAILURE); } if (sort_by_msgid && sort_by_filepos) error (EXIT_FAILURE, 0, _("%s and %s are mutually exclusive"), "--sort-output", "--sort-by-file"); /* merge the two files */ result = merge (argv[optind], argv[optind + 1]); /* Sort the results. */ if (sort_by_filepos) message_list_sort_by_filepos (result); else if (sort_by_msgid) message_list_sort_by_msgid (result); /* Write the merged message list out. */ message_list_print (result, output_file, force_po, 0); exit (EXIT_SUCCESS); } static void compendium (filename) const char *filename; { message_list_ty *mlp; mlp = read_po_file (filename); if (!compendiums) compendiums = message_list_list_alloc (); message_list_list_append (compendiums, mlp); } /* 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] def.po ref.pot\n\ "), program_name); printf ("\n"); /* xgettext: no-wrap */ printf (_("\ Merges two Uniforum style .po files together. The def.po file is an\n\ existing PO file with translations which will be taken over to the newly\n\ created file as long as they still match; comments will be preserved,\n\ but extracted comments and file positions will be discarded. The ref.pot\n\ file is the last created PO file with up-to-date source references but\n\ old translations, or a PO Template file (generally created by xgettext);\n\ any translations or comments in the file will be discarded, however dot\n\ comments and file positions will be preserved. Where an exact match\n\ cannot be found, fuzzy matching is used to produce better results.\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\ def.po translations referring to old sources\n\ ref.pot references to new sources\n\ -D, --directory=DIRECTORY add DIRECTORY to list for input files search\n\ -C, --compendium=FILE additional library of message translations,\n\ may be specified more than once\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 indented output style\n\ --no-location suppress '#: filename:line' lines\n\ --add-location preserve '#: filename:line' lines (default)\n\ --strict strict Uniforum output style\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\ -v, --verbose increase verbosity level\n\ -q, --quiet, --silent suppress progress indicators\n\ ")); printf ("\n"); fputs (_("Report bugs to .\n"), stdout); } exit (status); } #define DOT_FREQUENCE 10 static message_list_ty * merge (fn1, fn2) const char *fn1; /* definitions */ const char *fn2; /* references */ { message_list_ty *def; message_list_ty *ref; message_ty *defmsg; size_t j, k; size_t merged, fuzzied, missing, obsolete; message_list_ty *result; message_list_list_ty *definitions; merged = fuzzied = missing = obsolete = 0; /* This is the definitions file, created by a human. */ def = read_po_file (fn1); /* Glue the definition file and the compendiums together, to define the set of places to look for message definitions. */ definitions = message_list_list_alloc (); message_list_list_append (definitions, def); if (compendiums) message_list_list_append_list (definitions, compendiums); /* This is the references file, created by groping the sources with the xgettext program. */ ref = read_po_file (fn2); result = message_list_alloc (); /* Every reference must be matched with its definition. */ for (j = 0; j < ref->nitems; ++j) { message_ty *refmsg; /* Because merging can take a while we print something to signal we are not dead. */ if (!quiet && verbosity_level <= 1 && j % DOT_FREQUENCE == 0) fputc ('.', stderr); refmsg = ref->item[j]; /* See if it is in the other file. */ defmsg = message_list_list_search (definitions, refmsg->msgid); if (defmsg) { /* Merge the reference with the definition: take the #. and #: comments from the reference, take the # comments from the definition, take the msgstr from the definition. Add this merged entry to the output message list. */ message_ty *mp = message_merge (defmsg, refmsg); message_list_append (result, mp); /* Remember that this message has been used, when we scan later to see if anything was omitted. */ defmsg->used = 1; ++merged; continue; } /* If the message was not defined at all, try to find a very similar message, it could be a typo, or the suggestion may help. */ defmsg = message_list_list_search_fuzzy (definitions, refmsg->msgid); if (defmsg) { message_ty *mp; if (verbosity_level > 1) { po_gram_error_at_line (&refmsg->variant[0].pos, _("\ this message is used but not defined...")); po_gram_error_at_line (&defmsg->variant[0].pos, _("\ ...but this definition is similar")); } /* Merge the reference with the definition: take the #. and #: comments from the reference, take the # comments from the definition, take the msgstr from the definition. Add this merged entry to the output message list. */ mp = message_merge (defmsg, refmsg); mp->is_fuzzy = 1; message_list_append (result, mp); /* Remember that this message has been used, when we scan later to see if anything was omitted. */ defmsg->used = 1; ++fuzzied; if (!quiet && verbosity_level <= 1) /* Always print a dot if we handled a fuzzy match. */ fputc ('.', stderr); } else { message_ty *mp; if (verbosity_level > 1) po_gram_error_at_line (&refmsg->variant[0].pos, _("\ this message is used but not defined in %s"), fn1); mp = message_copy (refmsg); message_list_append (result, mp); ++missing; } } /* Look for messages in the definition file, which are not present in the reference file, indicating messages which defined but not used in the program. Don't scan the compendium(s). */ for (k = 0; k < def->nitems; ++k) { defmsg = def->item[k]; if (defmsg->used) continue; /* Remember the old translation although it is not used anymore. But we mark it as obsolete. */ defmsg->obsolete = 1; message_list_append (result, defmsg); ++obsolete; } /* Report some statistics. */ if (verbosity_level > 0) fprintf (stderr, _("%s\ Read %ld old + %ld reference, \ merged %ld, fuzzied %ld, missing %ld, obsolete %ld.\n"), !quiet && verbosity_level <= 1 ? "\n" : "", (long) def->nitems, (long) ref->nitems, (long) merged, (long) fuzzied, (long) missing, (long) obsolete); else if (!quiet) fputs (_(" done.\n"), stderr); return result; }