1 /* Determine the Java version supported by javaexec.
2 Copyright (C) 2006-2024 Free Software Foundation, Inc.
3 Written by Bruno Haible <bruno@clisp.org>, 2006.
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 <https://www.gnu.org/licenses/>. */
21 #include "javaversion.h"
27 #if ENABLE_RELOCATABLE
28 # include "relocatable.h"
30 # define relocate(pathname) (pathname)
31 # define relocate2(pathname,allocatedp) (*(allocatedp) = NULL, (pathname))
35 #include "spawn-pipe.h"
36 #include "wait-process.h"
40 #define _(str) gettext (str)
43 #include "configmake.h"
53 execute_and_read_line (const char *progname
,
54 const char *prog_path
, const char * const *prog_argv
,
57 struct locals
*l
= (struct locals
*) private_data
;
66 /* Open a pipe to the JVM. */
67 child
= create_pipe_in (progname
, prog_path
, prog_argv
, NULL
,
68 DEV_NULL
, false, true, false, fd
);
73 /* Retrieve its result. */
74 fp
= fdopen (fd
[0], "r");
77 error (0, errno
, _("fdopen() failed"));
81 line
= NULL
; linesize
= 0;
82 linelen
= getline (&line
, &linesize
, fp
);
83 if (linelen
== (size_t)(-1))
85 error (0, 0, _("%s subprocess I/O error"), progname
);
88 if (linelen
> 0 && line
[linelen
- 1] == '\n')
89 line
[linelen
- 1] = '\0';
93 /* Remove zombie process from process list, and retrieve exit status. */
95 wait_subprocess (child
, progname
, true, false, true, false, NULL
);
107 javaexec_version (void)
109 const char *class_name
= "javaversion";
110 char *malloc_pkgdatadir
;
111 const char *pkgdatadir
= relocate2 (PKGDATADIR
, &malloc_pkgdatadir
);
113 struct locals locals
;
117 execute_java_class (class_name
, &pkgdatadir
, 1, true, NULL
, args
,
118 false, false, execute_and_read_line
, &locals
);
120 free (malloc_pkgdatadir
);