gettext-tools/src/read-java.c

   1 /* Reading Java ResourceBundles.
   2    Copyright (C) 2001-2003, 2006-2008, 2011, 2015 Free Software
   3    Foundation, Inc.
   4    Written by Bruno Haible <haible@clisp.cons.org>, 2001.
   5
   6    This program is free software: you can redistribute it and/or modify
   7    it under the terms of the GNU General Public License as published by
   8    the Free Software Foundation; either version 3 of the License, or
   9    (at your option) any later version.
  10
  11    This program is distributed in the hope that it will be useful,
  12    but WITHOUT ANY WARRANTY; without even the implied warranty of
  13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14    GNU General Public License for more details.
  15
  16    You should have received a copy of the GNU General Public License
  17    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
  18
  19 #ifdef HAVE_CONFIG_H
  20 # include <config.h>
  21 #endif
  22
  23 /* Specification.  */
  24 #include "read-java.h"
  25
  26 #include <stdbool.h>
  27 #include <stdio.h>
  28 #include <stdlib.h>
  29 #include <errno.h>
  30
  31 #include "msgunfmt.h"
  32 #include "relocatable.h"
  33 #include "javaexec.h"
  34 #include "spawn-pipe.h"
  35 #include "wait-process.h"
  36 #include "read-catalog.h"
  37 #include "read-po.h"
  38 #include "error.h"
  39 #include "gettext.h"
  40
  41 #define _(str) gettext (str)
  42
  43
  44 /* A Java resource name can only be manipulated by a Java virtual machine.
  45    So we start a JVM to execute the DumpResource program, and read its
  46    output, which is .po format without comments.  */
  47
  48 struct locals
  49 {
  50   /* OUT */
  51   msgdomain_list_ty *mdlp;
  52 };
  53
  54 static bool
  55 execute_and_read_po_output (const char *progname,
  56                             const char *prog_path, char **prog_argv,
  57                             void *private_data)
  58 {
  59   struct locals *l = (struct locals *) private_data;
  60   pid_t child;
  61   int fd[1];
  62   FILE *fp;
  63   int exitstatus;
  64
  65   /* Open a pipe to the JVM.  */
  66   child = create_pipe_in (progname, prog_path, prog_argv, DEV_NULL, false,
  67                           true, true, fd);
  68
  69   fp = fdopen (fd[0], "r");
  70   if (fp == NULL)
  71     error (EXIT_FAILURE, errno, _("fdopen() failed"));
  72
  73   /* Read the message list.  */
  74   l->mdlp = read_catalog_stream (fp, "(pipe)", "(pipe)", &input_format_po);
  75
  76   fclose (fp);
  77
  78   /* Remove zombie process from process list, and retrieve exit status.  */
  79   exitstatus =
  80     wait_subprocess (child, progname, false, false, true, true, NULL);
  81   if (exitstatus != 0)
  82     error (EXIT_FAILURE, 0, _("%s subprocess failed with exit code %d"),
  83            progname, exitstatus);
  84
  85   return false;
  86 }
  87
  88
  89 msgdomain_list_ty *
  90 msgdomain_read_java (const char *resource_name, const char *locale_name)
  91 {
  92   const char *class_name = "gnu.gettext.DumpResource";
  93   const char *gettextjexedir;
  94   const char *gettextjar;
  95   const char *args[3];
  96   struct locals locals;
  97
  98 #if USEJEXE
  99   /* Make it possible to override the executable's location.  This is
 100      necessary for running the testsuite before "make install".  */
 101   gettextjexedir = getenv ("GETTEXTJEXEDIR");
 102   if (gettextjexedir == NULL || gettextjexedir[0] == '\0')
 103     gettextjexedir = relocate (GETTEXTJEXEDIR);
 104 #else
 105   gettextjexedir = NULL;
 106 #endif
 107
 108   /* Make it possible to override the gettext.jar location.  This is
 109      necessary for running the testsuite before "make install".  */
 110   gettextjar = getenv ("GETTEXTJAR");
 111   if (gettextjar == NULL || gettextjar[0] == '\0')
 112     gettextjar = relocate (GETTEXTJAR);
 113
 114   /* Assign a default value to the resource name.  */
 115   if (resource_name == NULL)
 116     resource_name = "Messages";
 117
 118   /* Prepare arguments.  */
 119   args[0] = resource_name;
 120   if (locale_name != NULL)
 121     {
 122       args[1] = locale_name;
 123       args[2] = NULL;
 124     }
 125   else
 126     args[1] = NULL;
 127
 128   /* Dump the resource and retrieve the resulting output.
 129      Here we use the user's CLASSPATH, not a minimal one, so that the
 130      resource can be found.  */
 131   if (execute_java_class (class_name, &gettextjar, 1, false, gettextjexedir,
 132                           args,
 133                           verbose, false,
 134                           execute_and_read_po_output, &locals))
 135     /* An error message should already have been provided.  */
 136     exit (EXIT_FAILURE);
 137
 138   return locals.mdlp;
 139 }