#ifdef HAVE_CONFIG_H
# include <config.h>
#endif
#include <alloca.h>
#include "javacomp.h"
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "execute.h"
#include "pipe.h"
#include "wait-process.h"
#include "classpath.h"
#include "xsetenv.h"
#include "sh-quote.h"
#include "safe-read.h"
#include "xalloc.h"
#include "error.h"
#include "gettext.h"
#define _(str) gettext (str)
bool
compile_java_class (const char * const *java_sources,
unsigned int java_sources_count,
const char * const *classpaths,
unsigned int classpaths_count,
const char *directory,
bool optimize, bool debug,
bool use_minimal_classpath,
bool verbose)
{
bool err = false;
char *old_JAVA_HOME;
{
const char *javac = getenv ("JAVAC");
if (javac != NULL && javac[0] != '\0')
{
char *old_classpath;
unsigned int command_length;
char *command;
char *argv[4];
int exitstatus;
unsigned int i;
char *p;
old_classpath =
set_classpath (classpaths, classpaths_count, false,
verbose);
command_length = strlen (javac);
if (optimize)
command_length += 3;
if (debug)
command_length += 3;
if (directory != NULL)
command_length += 4 + shell_quote_length (directory);
for (i = 0; i < java_sources_count; i++)
command_length += 1 + shell_quote_length (java_sources[i]);
command_length += 1;
command = (char *) alloca (command_length);
p = command;
memcpy (p, javac, strlen (javac));
p += strlen (javac);
if (optimize)
{
memcpy (p, " -O", 3);
p += 3;
}
if (debug)
{
memcpy (p, " -g", 3);
p += 3;
}
if (directory != NULL)
{
memcpy (p, " -d ", 4);
p += 4;
p = shell_quote_copy (p, directory);
}
for (i = 0; i < java_sources_count; i++)
{
*p++ = ' ';
p = shell_quote_copy (p, java_sources[i]);
}
*p++ = '\0';
if (p - command > command_length)
abort ();
if (verbose)
printf ("%s\n", command);
argv[0] = "/bin/sh";
argv[1] = "-c";
argv[2] = command;
argv[3] = NULL;
exitstatus = execute (javac, "/bin/sh", argv, false, false, false,
true, true);
err = (exitstatus != 0);
reset_classpath (old_classpath);
goto done1;
}
}
old_JAVA_HOME = getenv ("JAVA_HOME");
if (old_JAVA_HOME != NULL)
{
old_JAVA_HOME = xstrdup (old_JAVA_HOME);
unsetenv ("JAVA_HOME");
}
{
static bool gcj_tested;
static bool gcj_present;
if (!gcj_tested)
{
char *argv[3];
pid_t child;
int fd[1];
int exitstatus;
argv[0] = "gcj";
argv[1] = "--version";
argv[2] = NULL;
child = create_pipe_in ("gcj", "gcj", argv, DEV_NULL, true, true,
false, fd);
gcj_present = false;
if (child != -1)
{
char c[3];
size_t count = 0;
while (safe_read (fd[0], &c[count], 1) > 0)
{
if (c[count] == '\n')
break;
if (count == 0)
{
if (!(c[0] >= '0' && c[0] <= '9'))
continue;
gcj_present = (c[0] >= '3');
}
count++;
if (count == 3)
{
if (c[0] == '3' && c[1] == '.'
&& (c[2] == '0' || c[2] == '1'))
gcj_present = false;
break;
}
}
while (safe_read (fd[0], &c[0], 1) > 0)
;
close (fd[0]);
exitstatus = wait_subprocess (child, "gcj", true, true, false);
if (exitstatus != 0)
gcj_present = false;
}
gcj_tested = true;
}
if (gcj_present)
{
char *old_classpath;
unsigned int argc;
char **argv;
char **argp;
int exitstatus;
unsigned int i;
old_classpath =
set_classpath (classpaths, classpaths_count, use_minimal_classpath,
verbose);
argc =
2 + (optimize ? 1 : 0) + (debug ? 1 : 0) + (directory != NULL ? 2 : 0)
+ java_sources_count;
argv = (char **) alloca ((argc + 1) * sizeof (char *));
argp = argv;
*argp++ = "gcj";
*argp++ = "-C";
if (optimize)
*argp++ = "-O";
if (debug)
*argp++ = "-g";
if (directory != NULL)
{
*argp++ = "-d";
*argp++ = (char *) directory;
}
for (i = 0; i < java_sources_count; i++)
*argp++ = (char *) java_sources[i];
*argp = NULL;
if (argp - argv != argc)
abort ();
if (verbose)
{
char *command = shell_quote_argv (argv);
printf ("%s\n", command);
free (command);
}
exitstatus = execute ("gcj", "gcj", argv, false, false, false, true,
true);
err = (exitstatus != 0);
reset_classpath (old_classpath);
goto done2;
}
}
{
static bool javac_tested;
static bool javac_present;
if (!javac_tested)
{
char *argv[2];
int exitstatus;
argv[0] = "javac";
argv[1] = NULL;
exitstatus = execute ("javac", "javac", argv, false, true, true, true,
false);
javac_present = (exitstatus == 0 || exitstatus == 1 || exitstatus == 2);
javac_tested = true;
}
if (javac_present)
{
char *old_classpath;
unsigned int argc;
char **argv;
char **argp;
int exitstatus;
unsigned int i;
old_classpath =
set_classpath (classpaths, classpaths_count, use_minimal_classpath,
verbose);
argc =
1 + (optimize ? 1 : 0) + (debug ? 1 : 0) + (directory != NULL ? 2 : 0)
+ java_sources_count;
argv = (char **) alloca ((argc + 1) * sizeof (char *));
argp = argv;
*argp++ = "javac";
if (optimize)
*argp++ = "-O";
if (debug)
*argp++ = "-g";
if (directory != NULL)
{
*argp++ = "-d";
*argp++ = (char *) directory;
}
for (i = 0; i < java_sources_count; i++)
*argp++ = (char *) java_sources[i];
*argp = NULL;
if (argp - argv != argc)
abort ();
if (verbose)
{
char *command = shell_quote_argv (argv);
printf ("%s\n", command);
free (command);
}
exitstatus = execute ("javac", "javac", argv, false, false, false,
true, true);
err = (exitstatus != 0);
reset_classpath (old_classpath);
goto done2;
}
}
{
static bool jikes_tested;
static bool jikes_present;
if (!jikes_tested)
{
char *argv[2];
int exitstatus;
argv[0] = "jikes";
argv[1] = NULL;
exitstatus = execute ("jikes", "jikes", argv, false, true, true, true,
false);
jikes_present = (exitstatus == 0 || exitstatus == 1);
jikes_tested = true;
}
if (jikes_present)
{
char *old_classpath;
unsigned int argc;
char **argv;
char **argp;
int exitstatus;
unsigned int i;
old_classpath =
set_classpath (classpaths, classpaths_count, false,
verbose);
argc =
1 + (optimize ? 1 : 0) + (debug ? 1 : 0) + (directory != NULL ? 2 : 0)
+ java_sources_count;
argv = (char **) alloca ((argc + 1) * sizeof (char *));
argp = argv;
*argp++ = "jikes";
if (optimize)
*argp++ = "-O";
if (debug)
*argp++ = "-g";
if (directory != NULL)
{
*argp++ = "-d";
*argp++ = (char *) directory;
}
for (i = 0; i < java_sources_count; i++)
*argp++ = (char *) java_sources[i];
*argp = NULL;
if (argp - argv != argc)
abort ();
if (verbose)
{
char *command = shell_quote_argv (argv);
printf ("%s\n", command);
free (command);
}
exitstatus = execute ("jikes", "jikes", argv, false, false, false,
true, true);
err = (exitstatus != 0);
reset_classpath (old_classpath);
goto done2;
}
}
error (0, 0, _("Java compiler not found, try installing gcj or set $JAVAC"));
err = true;
done2:
if (old_JAVA_HOME != NULL)
{
xsetenv ("JAVA_HOME", old_JAVA_HOME, 1);
free (old_JAVA_HOME);
}
done1:
return err;
}