xref: /netbsd-src/external/gpl2/gettext/dist/gettext-tools/src/write-resources.c (revision 946379e7b37692fc43f68eb0d1c10daa0a7f3b6c)
1 /* Writing C# .resources files.
2    Copyright (C) 2003, 2005 Free Software Foundation, Inc.
3    Written by Bruno Haible <bruno@clisp.org>, 2003.
4 
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 2, or (at your option)
8    any later version.
9 
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.
14 
15    You should have received a copy of the GNU General Public License
16    along with this program; if not, write to the Free Software Foundation,
17    Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.  */
18 
19 #ifdef HAVE_CONFIG_H
20 # include <config.h>
21 #endif
22 
23 /* Specification.  */
24 #include "write-resources.h"
25 
26 #include <errno.h>
27 #include <stdbool.h>
28 #include <stdlib.h>
29 #include <stdio.h>
30 #include <string.h>
31 
32 #include "error.h"
33 #include "xerror.h"
34 #include "relocatable.h"
35 #include "csharpexec.h"
36 #include "pipe.h"
37 #include "wait-process.h"
38 #include "message.h"
39 #include "msgfmt.h"
40 #include "msgl-iconv.h"
41 #include "po-charset.h"
42 #include "xalloc.h"
43 #include "pathname.h"
44 #include "fwriteerror.h"
45 #include "exit.h"
46 #include "gettext.h"
47 
48 #define _(str) gettext (str)
49 
50 
51 /* A .resources file has such a complex format that it's most easily generated
52    through the C# class ResourceWriter.  So we start a C# process to execute
53    the WriteResource program, sending it the msgid/msgstr pairs as
54    NUL-terminated UTF-8 encoded strings.  */
55 
56 struct locals
57 {
58   /* IN */
59   message_list_ty *mlp;
60 };
61 
62 static bool
execute_writing_input(const char * progname,const char * prog_path,char ** prog_argv,void * private_data)63 execute_writing_input (const char *progname,
64 		       const char *prog_path, char **prog_argv,
65 		       void *private_data)
66 {
67   struct locals *l = (struct locals *) private_data;
68   pid_t child;
69   int fd[1];
70   FILE *fp;
71   int exitstatus;
72 
73   /* Open a pipe to the C# execution engine.  */
74   child = create_pipe_out (progname, prog_path, prog_argv, NULL, false,
75 			   true, true, fd);
76 
77   fp = fdopen (fd[0], "wb");
78   if (fp == NULL)
79     error (EXIT_FAILURE, errno, _("fdopen() failed"));
80 
81   /* Write the message list.  */
82   {
83     message_list_ty *mlp = l->mlp;
84     size_t j;
85 
86     for (j = 0; j < mlp->nitems; j++)
87       {
88 	message_ty *mp = mlp->item[j];
89 
90 	fwrite (mp->msgid, 1, strlen (mp->msgid) + 1, fp);
91 	fwrite (mp->msgstr, 1, strlen (mp->msgstr) + 1, fp);
92       }
93   }
94 
95   if (fwriteerror (fp))
96     error (EXIT_FAILURE, 0, _("error while writing to %s subprocess"),
97 	   progname);
98 
99   /* Remove zombie process from process list, and retrieve exit status.  */
100   /* He we can ignore SIGPIPE because WriteResource either writes to a file
101      - then it never gets SIGPIPE - or to standard output, and in the latter
102      case it has no side effects other than writing to standard output.  */
103   exitstatus = wait_subprocess (child, progname, true, false, true, true);
104   if (exitstatus != 0)
105     error (EXIT_FAILURE, 0, _("%s subprocess failed with exit code %d"),
106 	   progname, exitstatus);
107 
108   return false;
109 }
110 
111 int
msgdomain_write_csharp_resources(message_list_ty * mlp,const char * canon_encoding,const char * domain_name,const char * file_name)112 msgdomain_write_csharp_resources (message_list_ty *mlp,
113 				  const char *canon_encoding,
114 				  const char *domain_name,
115 				  const char *file_name)
116 {
117   /* If no entry for this domain don't even create the file.  */
118   if (mlp->nitems != 0)
119     {
120       /* Determine whether mlp has entries with context.  */
121       {
122 	bool has_context;
123 	size_t j;
124 
125 	has_context = false;
126 	for (j = 0; j < mlp->nitems; j++)
127 	  if (mlp->item[j]->msgctxt != NULL)
128 	    has_context = true;
129 	if (has_context)
130 	  {
131 	    multiline_error (xstrdup (""),
132 			     xstrdup (_("\
133 message catalog has context dependent translations\n\
134 but the C# .resources format doesn't support contexts\n")));
135 	    return 1;
136 	  }
137       }
138 
139       /* Determine whether mlp has plural entries.  */
140       {
141 	bool has_plural;
142 	size_t j;
143 
144 	has_plural = false;
145 	for (j = 0; j < mlp->nitems; j++)
146 	  if (mlp->item[j]->msgid_plural != NULL)
147 	    has_plural = true;
148 	if (has_plural)
149 	  {
150 	    multiline_error (xstrdup (""),
151 			     xstrdup (_("\
152 message catalog has plural form translations\n\
153 but the C# .resources format doesn't support plural handling\n")));
154 	    return 1;
155 	  }
156       }
157 
158       /* Convert the messages to Unicode.  */
159       iconv_message_list (mlp, canon_encoding, po_charset_utf8, NULL);
160 
161       /* Execute the WriteResource program.  */
162       {
163 	const char *args[2];
164 	const char *gettextexedir;
165 	char *assembly_path;
166 	struct locals locals;
167 
168 	/* Prepare arguments.  */
169 	args[0] = file_name;
170 	args[1] = NULL;
171 
172 	/* Make it possible to override the .exe location.  This is
173 	   necessary for running the testsuite before "make install".  */
174 	gettextexedir = getenv ("GETTEXTCSHARPEXEDIR");
175 	if (gettextexedir == NULL || gettextexedir[0] == '\0')
176 	  gettextexedir = relocate (LIBDIR "/gettext");
177 
178 	assembly_path =
179 	  concatenated_pathname (gettextexedir, "msgfmt.net", ".exe");
180 
181 	locals.mlp = mlp;
182 
183 	if (execute_csharp_program (assembly_path, NULL, 0,
184 				    args,
185 				    verbose, false,
186 				    execute_writing_input, &locals))
187 	  /* An error message should already have been provided.  */
188 	  exit (EXIT_FAILURE);
189 
190 	free (assembly_path);
191       }
192     }
193 
194   return 0;
195 }
196