1 /* Reading C# .resources files.
2 Copyright (C) 2003-2004, 2006-2008, 2010-2011, 2020 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 3 of the License, or
8 (at your option) 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, see <https://www.gnu.org/licenses/>. */
17
18 #ifdef HAVE_CONFIG_H
19 # include <config.h>
20 #endif
21
22 /* Specification. */
23 #include "read-resources.h"
24
25 #include <errno.h>
26 #include <stdbool.h>
27 #include <stdlib.h>
28 #include <stdio.h>
29
30 #include "msgunfmt.h"
31 #include "relocatable.h"
32 #include "csharpexec.h"
33 #include "spawn-pipe.h"
34 #include "wait-process.h"
35 #include "read-catalog.h"
36 #include "read-po.h"
37 #include "message.h"
38 #include "concat-filename.h"
39 #include "error.h"
40 #include "gettext.h"
41
42 #define _(str) gettext (str)
43
44
45 /* A .resources file has such a complex format that it's most easily read
46 through the C# class ResourceReader. So we start a C# process to execute
47 the DumpResource program, and read its output, which is .po format without
48 comments. */
49
50 struct locals
51 {
52 /* OUT */
53 msgdomain_list_ty *mdlp;
54 };
55
56 static bool
57 execute_and_read_po_output (const char *progname,
58 const char *prog_path,
59 const char * const *prog_argv,
60 void *private_data)
61 {
62 struct locals *l = (struct locals *) private_data;
63 pid_t child;
64 int fd[1];
65 FILE *fp;
66 int exitstatus;
67
68 /* Open a pipe to the C# execution engine. */
69 child = create_pipe_in (progname, prog_path, prog_argv, NULL,
70 NULL, false, true, true, fd);
71
72 fp = fdopen (fd[0], "r");
73 if (fp == NULL)
74 error (EXIT_FAILURE, errno, _("fdopen() failed"));
75
76 /* Read the message list. */
77 l->mdlp = read_catalog_stream (fp, "(pipe)", "(pipe)", &input_format_po);
78
79 fclose (fp);
80
81 /* Remove zombie process from process list, and retrieve exit status. */
82 exitstatus =
83 wait_subprocess (child, progname, false, false, true, true, NULL);
84 if (exitstatus != 0)
85 error (EXIT_FAILURE, 0, _("%s subprocess failed with exit code %d"),
86 progname, exitstatus);
87
88 return false;
89 }
90
91
92 void
93 read_resources_file (message_list_ty *mlp, const char *filename)
94 {
95 const char *args[2];
96 const char *gettextexedir;
97 const char *gettextlibdir;
98 char *assembly_path;
99 const char *libdirs[1];
100 struct locals locals;
101
102 /* Prepare arguments. */
103 args[0] = filename;
104 args[1] = NULL;
105
106 /* Make it possible to override the .exe location. This is
107 necessary for running the testsuite before "make install". */
108 gettextexedir = getenv ("GETTEXTCSHARPEXEDIR");
109 if (gettextexedir == NULL || gettextexedir[0] == '\0')
110 gettextexedir = relocate (LIBDIR "/gettext");
111
112 /* Make it possible to override the .dll location. This is
113 necessary for running the testsuite before "make install". */
114 gettextlibdir = getenv ("GETTEXTCSHARPLIBDIR");
115 if (gettextlibdir == NULL || gettextlibdir[0] == '\0')
116 gettextlibdir = relocate (LIBDIR);
117
118 /* Dump the resource and retrieve the resulting output. */
119 assembly_path =
120 xconcatenated_filename (gettextexedir, "msgunfmt.net", ".exe");
121 libdirs[0] = gettextlibdir;
122 if (execute_csharp_program (assembly_path, libdirs, 1,
123 args,
124 verbose, false,
125 execute_and_read_po_output, &locals))
126 /* An error message should already have been provided. */
127 exit (EXIT_FAILURE);
128
129 /* Add the output to mlp. */
130 {
131 message_list_ty *read_mlp = locals.mdlp->item[0]->messages;
132 size_t j;
133
134 for (j = 0; j < read_mlp->nitems; j++)
135 message_list_append (mlp, read_mlp->item[j]);
136 }
137
138 free (assembly_path);
139 }