1 /* Reading Java ResourceBundles.
2 Copyright (C) 2001-2003, 2006-2008, 2011 Free Software Foundation, Inc.
3 Written by Bruno Haible <haible@clisp.cons.org>, 2001.
5 This program is free software: you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 3 of the License, or
8 (at your option) any later version.
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with this program. If not, see <http://www.gnu.org/licenses/>. */
23 #include "read-java.h"
31 #include "relocatable.h"
33 #include "spawn-pipe.h"
34 #include "wait-process.h"
35 #include "read-catalog.h"
40 #define _(str) gettext (str)
43 /* A Java resource name can only be manipulated by a Java virtual machine.
44 So we start a JVM to execute the DumpResource program, and read its
45 output, which is .po format without comments. */
50 msgdomain_list_ty *mdlp;
54 execute_and_read_po_output (const char *progname,
55 const char *prog_path, char **prog_argv,
58 struct locals *l = (struct locals *) private_data;
64 /* Open a pipe to the JVM. */
65 child = create_pipe_in (progname, prog_path, prog_argv, DEV_NULL, false,
68 fp = fdopen (fd[0], "r");
70 error (EXIT_FAILURE, errno, _("fdopen() failed"));
72 /* Read the message list. */
73 l->mdlp = read_catalog_stream (fp, "(pipe)", "(pipe)", &input_format_po);
77 /* Remove zombie process from process list, and retrieve exit status. */
79 wait_subprocess (child, progname, false, false, true, true, NULL);
81 error (EXIT_FAILURE, 0, _("%s subprocess failed with exit code %d"),
82 progname, exitstatus);
89 msgdomain_read_java (const char *resource_name, const char *locale_name)
91 const char *class_name = "gnu.gettext.DumpResource";
92 const char *gettextjexedir;
93 const char *gettextjar;
98 /* Make it possible to override the executable's location. This is
99 necessary for running the testsuite before "make install". */
100 gettextjexedir = getenv ("GETTEXTJEXEDIR");
101 if (gettextjexedir == NULL || gettextjexedir[0] == '\0')
102 gettextjexedir = relocate (GETTEXTJEXEDIR);
104 gettextjexedir = NULL;
107 /* Make it possible to override the gettext.jar location. This is
108 necessary for running the testsuite before "make install". */
109 gettextjar = getenv ("GETTEXTJAR");
110 if (gettextjar == NULL || gettextjar[0] == '\0')
111 gettextjar = relocate (GETTEXTJAR);
113 /* Assign a default value to the resource name. */
114 if (resource_name == NULL)
115 resource_name = "Messages";
117 /* Prepare arguments. */
118 args[0] = resource_name;
119 if (locale_name != NULL)
121 args[1] = locale_name;
127 /* Dump the resource and retrieve the resulting output.
128 Here we use the user's CLASSPATH, not a minimal one, so that the
129 resource can be found. */
130 if (execute_java_class (class_name, &gettextjar, 1, false, gettextjexedir,
133 execute_and_read_po_output, &locals))
134 /* An error message should already have been provided. */