/* Specific flags and argument handling of the front-end of the
|
/* Specific flags and argument handling of the front-end of the
|
GNU compiler for the Java(TM) language.
|
GNU compiler for the Java(TM) language.
|
Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
|
Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
|
2005, 2006, 2007 Free Software Foundation, Inc.
|
2005, 2006, 2007 Free Software Foundation, Inc.
|
|
|
This file is part of GCC.
|
This file is part of GCC.
|
|
|
GCC is free software; you can redistribute it and/or modify
|
GCC is free software; you can redistribute it and/or modify
|
it under the terms of the GNU General Public License as published by
|
it under the terms of the GNU General Public License as published by
|
the Free Software Foundation; either version 3, or (at your option)
|
the Free Software Foundation; either version 3, or (at your option)
|
any later version.
|
any later version.
|
|
|
GCC is distributed in the hope that it will be useful,
|
GCC is distributed in the hope that it will be useful,
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
GNU General Public License for more details.
|
GNU General Public License for more details.
|
|
|
You should have received a copy of the GNU General Public License
|
You should have received a copy of the GNU General Public License
|
along with GCC; see the file COPYING3. If not see
|
along with GCC; see the file COPYING3. If not see
|
<http://www.gnu.org/licenses/>.
|
<http://www.gnu.org/licenses/>.
|
|
|
Java and all Java-based marks are trademarks or registered trademarks
|
Java and all Java-based marks are trademarks or registered trademarks
|
of Sun Microsystems, Inc. in the United States and other countries.
|
of Sun Microsystems, Inc. in the United States and other countries.
|
The Free Software Foundation is independent of Sun Microsystems, Inc. */
|
The Free Software Foundation is independent of Sun Microsystems, Inc. */
|
|
|
#include "config.h"
|
#include "config.h"
|
#include "system.h"
|
#include "system.h"
|
#include "coretypes.h"
|
#include "coretypes.h"
|
#include "tm.h"
|
#include "tm.h"
|
#include "gcc.h"
|
#include "gcc.h"
|
#include "jcf.h"
|
#include "jcf.h"
|
|
|
/* Name of spec file. */
|
/* Name of spec file. */
|
#define SPEC_FILE "libgcj.spec"
|
#define SPEC_FILE "libgcj.spec"
|
|
|
/* This bit is set if we saw a `-xfoo' language specification. */
|
/* This bit is set if we saw a `-xfoo' language specification. */
|
#define LANGSPEC (1<<1)
|
#define LANGSPEC (1<<1)
|
/* True if this arg is a parameter to the previous option-taking arg. */
|
/* True if this arg is a parameter to the previous option-taking arg. */
|
#define PARAM_ARG (1<<2)
|
#define PARAM_ARG (1<<2)
|
/* True if this arg is a .java input file name. */
|
/* True if this arg is a .java input file name. */
|
#define JAVA_FILE_ARG (1<<3)
|
#define JAVA_FILE_ARG (1<<3)
|
/* True if this arg is a .class input file name. */
|
/* True if this arg is a .class input file name. */
|
#define CLASS_FILE_ARG (1<<4)
|
#define CLASS_FILE_ARG (1<<4)
|
/* True if this arg is a .zip or .jar input file name. */
|
/* True if this arg is a .zip or .jar input file name. */
|
#define ZIP_FILE_ARG (1<<5)
|
#define ZIP_FILE_ARG (1<<5)
|
/* True if this arg is @FILE - where FILE contains a list of filenames. */
|
/* True if this arg is @FILE - where FILE contains a list of filenames. */
|
#define INDIRECT_FILE_ARG (1<<6)
|
#define INDIRECT_FILE_ARG (1<<6)
|
/* True if this arg is a resource file. */
|
/* True if this arg is a resource file. */
|
#define RESOURCE_FILE_ARG (1<<7)
|
#define RESOURCE_FILE_ARG (1<<7)
|
|
|
static char *find_spec_file (const char *);
|
static char *find_spec_file (const char *);
|
static int verify_class_name (const char *);
|
static int verify_class_name (const char *);
|
|
|
static const char *main_class_name = NULL;
|
static const char *main_class_name = NULL;
|
int lang_specific_extra_outfiles = 0;
|
int lang_specific_extra_outfiles = 0;
|
|
|
/* True if we should add -shared-libgcc to the command-line. */
|
/* True if we should add -shared-libgcc to the command-line. */
|
int shared_libgcc = 1;
|
int shared_libgcc = 1;
|
|
|
static const char jvgenmain_spec[] =
|
static const char jvgenmain_spec[] =
|
"jvgenmain %{findirect-dispatch} %{D*} %b %m.i |\n\
|
"jvgenmain %{findirect-dispatch} %{D*} %b %m.i |\n\
|
cc1 %m.i %1 \
|
cc1 %m.i %1 \
|
%{!Q:-quiet} -dumpbase %b.c %{d*} %{m*} %{a*}\
|
%{!Q:-quiet} -dumpbase %b.c %{d*} %{m*} %{a*}\
|
%{g*} %{O*} \
|
%{g*} %{O*} \
|
%{v:-version} %{pg:-p} %{p}\
|
%{v:-version} %{pg:-p} %{p}\
|
%<fbounds-check %<fno-bounds-check\
|
%<fbounds-check %<fno-bounds-check\
|
%<fassume-compiled* %<fno-assume-compiled*\
|
%<fassume-compiled* %<fno-assume-compiled*\
|
%<fcompile-resource* %<fassert %<fno-assert \
|
%<fcompile-resource* %<fassert %<fno-assert \
|
%<femit-class-file %<femit-class-files %<fencoding*\
|
%<femit-class-file %<femit-class-files %<fencoding*\
|
%<fuse-boehm-gc %<fhash-synchronization %<fjni\
|
%<fuse-boehm-gc %<fhash-synchronization %<fjni\
|
%<findirect-dispatch %<fnew-verifier\
|
%<findirect-dispatch %<fnew-verifier\
|
%<fno-store-check %<foutput-class-dir\
|
%<fno-store-check %<foutput-class-dir\
|
%<fclasspath* %<fCLASSPATH* %<fbootclasspath*\
|
%<fclasspath* %<fCLASSPATH* %<fbootclasspath*\
|
%<fextdirs*\
|
%<fextdirs*\
|
%<fuse-divide-subroutine %<fno-use-divide-subroutine\
|
%<fuse-divide-subroutine %<fno-use-divide-subroutine\
|
%<fuse-atomic-builtins %<fno-use-atomic-builtins\
|
%<fuse-atomic-builtins %<fno-use-atomic-builtins\
|
%<fcheck-references %<fno-check-references\
|
%<fcheck-references %<fno-check-references\
|
%<ffilelist-file %<fsaw-java-file %<fsource* %<ftarget*\
|
%<ffilelist-file %<fsaw-java-file %<fsource* %<ftarget*\
|
%{f*} -fdollars-in-identifiers\
|
%{f*} -fdollars-in-identifiers\
|
%{aux-info*}\
|
%{aux-info*}\
|
%{pg:%{fomit-frame-pointer:%e-pg and -fomit-frame-pointer are incompatible}}\
|
%{pg:%{fomit-frame-pointer:%e-pg and -fomit-frame-pointer are incompatible}}\
|
%{S:%W{o*}%{!o*:-o %b.s}}\
|
%{S:%W{o*}%{!o*:-o %b.s}}\
|
%(invoke_as)";
|
%(invoke_as)";
|
|
|
/* Return full path name of spec file if it is in DIR, or NULL if
|
/* Return full path name of spec file if it is in DIR, or NULL if
|
not. */
|
not. */
|
static char *
|
static char *
|
find_spec_file (const char *dir)
|
find_spec_file (const char *dir)
|
{
|
{
|
char *spec;
|
char *spec;
|
int x;
|
int x;
|
struct stat sb;
|
struct stat sb;
|
|
|
spec = XNEWVEC (char, strlen (dir) + sizeof (SPEC_FILE)
|
spec = XNEWVEC (char, strlen (dir) + sizeof (SPEC_FILE)
|
+ sizeof ("-specs=") + 4);
|
+ sizeof ("-specs=") + 4);
|
strcpy (spec, "-specs=");
|
strcpy (spec, "-specs=");
|
x = strlen (spec);
|
x = strlen (spec);
|
strcat (spec, dir);
|
strcat (spec, dir);
|
strcat (spec, "/");
|
strcat (spec, "/");
|
strcat (spec, SPEC_FILE);
|
strcat (spec, SPEC_FILE);
|
if (! stat (spec + x, &sb))
|
if (! stat (spec + x, &sb))
|
return spec;
|
return spec;
|
free (spec);
|
free (spec);
|
return NULL;
|
return NULL;
|
}
|
}
|
|
|
#define JAVA_START_CHAR_P(c) (c < 128 && (ISIDST (c) || c == '$'))
|
#define JAVA_START_CHAR_P(c) (c < 128 && (ISIDST (c) || c == '$'))
|
#define JAVA_PART_CHAR_P(c) (c < 128 \
|
#define JAVA_PART_CHAR_P(c) (c < 128 \
|
&& (ISIDNUM (c) \
|
&& (ISIDNUM (c) \
|
|| c == '$' \
|
|| c == '$' \
|
|| (c >= 0x00 && c <= 0x08) \
|
|| (c >= 0x00 && c <= 0x08) \
|
|| (c >= 0x0e && c <= 0x1b) \
|
|| (c >= 0x0e && c <= 0x1b) \
|
|| c == 0x7f))
|
|| c == 0x7f))
|
|
|
/* Verify that NAME is a valid Java class name that might contain
|
/* Verify that NAME is a valid Java class name that might contain
|
`main'. Return 0 on failure. */
|
`main'. Return 0 on failure. */
|
static int
|
static int
|
verify_class_name (const char *name)
|
verify_class_name (const char *name)
|
{
|
{
|
/* FIXME: what encoding do we use for command-line arguments? For
|
/* FIXME: what encoding do we use for command-line arguments? For
|
now we assume plain ASCII, which of course is wrong. */
|
now we assume plain ASCII, which of course is wrong. */
|
while (*name)
|
while (*name)
|
{
|
{
|
int ch = *name++;
|
int ch = *name++;
|
if (ch < 0 || ! JAVA_START_CHAR_P (ch))
|
if (ch < 0 || ! JAVA_START_CHAR_P (ch))
|
return 0;
|
return 0;
|
while (*name)
|
while (*name)
|
{
|
{
|
ch = *name++;
|
ch = *name++;
|
if (ch < 0)
|
if (ch < 0)
|
return 0;
|
return 0;
|
/* We found a break between class names. Next character
|
/* We found a break between class names. Next character
|
must be an identifier start again. */
|
must be an identifier start again. */
|
if (ch == '.')
|
if (ch == '.')
|
break;
|
break;
|
if (! JAVA_PART_CHAR_P (ch))
|
if (! JAVA_PART_CHAR_P (ch))
|
return 0;
|
return 0;
|
}
|
}
|
}
|
}
|
|
|
return 1;
|
return 1;
|
}
|
}
|
|
|
void
|
void
|
lang_specific_driver (int *in_argc, const char *const **in_argv,
|
lang_specific_driver (int *in_argc, const char *const **in_argv,
|
int *in_added_libraries)
|
int *in_added_libraries)
|
{
|
{
|
int i, j;
|
int i, j;
|
|
|
int saw_save_temps = 0;
|
int saw_save_temps = 0;
|
|
|
/* This will be 0 if we encounter a situation where we should not
|
/* This will be 0 if we encounter a situation where we should not
|
link in libgcj. */
|
link in libgcj. */
|
int library = 1;
|
int library = 1;
|
|
|
/* This will be 1 if multiple input files (.class and/or .java)
|
/* This will be 1 if multiple input files (.class and/or .java)
|
should be passed to a single jc1 invocation. */
|
should be passed to a single jc1 invocation. */
|
int combine_inputs = 0;
|
int combine_inputs = 0;
|
|
|
/* Number of .java and .class source file arguments seen. */
|
/* Number of .java and .class source file arguments seen. */
|
int java_files_count = 0;
|
int java_files_count = 0;
|
int class_files_count = 0;
|
int class_files_count = 0;
|
/* Number of .zip or .jar file arguments seen. */
|
/* Number of .zip or .jar file arguments seen. */
|
int zip_files_count = 0;
|
int zip_files_count = 0;
|
/* Number of '@FILES' arguments seen. */
|
/* Number of '@FILES' arguments seen. */
|
int indirect_files_count = 0;
|
int indirect_files_count = 0;
|
|
|
/* Name of file containing list of files to compile. */
|
/* Name of file containing list of files to compile. */
|
char *filelist_filename = 0;
|
char *filelist_filename = 0;
|
|
|
FILE *filelist_file = 0;
|
FILE *filelist_file = 0;
|
|
|
/* The number of arguments being added to what's in argv, other than
|
/* The number of arguments being added to what's in argv, other than
|
libraries. */
|
libraries. */
|
int added = 2;
|
int added = 2;
|
|
|
/* Used to track options that take arguments, so we don't go wrapping
|
/* Used to track options that take arguments, so we don't go wrapping
|
those with -xc++/-xnone. */
|
those with -xc++/-xnone. */
|
const char *quote = NULL;
|
const char *quote = NULL;
|
|
|
/* The new argument list will be contained in this. */
|
/* The new argument list will be contained in this. */
|
const char **arglist;
|
const char **arglist;
|
|
|
/* Nonzero if we saw a `-xfoo' language specification on the
|
/* Nonzero if we saw a `-xfoo' language specification on the
|
command line. Used to avoid adding our own -xc++ if the user
|
command line. Used to avoid adding our own -xc++ if the user
|
already gave a language for the file. */
|
already gave a language for the file. */
|
int saw_speclang = 0;
|
int saw_speclang = 0;
|
|
|
/* Saw --resource, -C or -o options, respectively. */
|
/* Saw --resource, -C or -o options, respectively. */
|
int saw_resource = 0;
|
int saw_resource = 0;
|
int saw_C = 0;
|
int saw_C = 0;
|
int saw_o = 0;
|
int saw_o = 0;
|
|
|
/* Saw some -O* or -g* option, respectively. */
|
/* Saw some -O* or -g* option, respectively. */
|
int saw_O = 0;
|
int saw_O = 0;
|
int saw_g = 0;
|
int saw_g = 0;
|
|
|
/* Saw a `-D' option. */
|
/* Saw a `-D' option. */
|
int saw_D = 0;
|
int saw_D = 0;
|
|
|
/* An array used to flag each argument that needs a bit set for
|
/* An array used to flag each argument that needs a bit set for
|
LANGSPEC, MATHLIB, WITHLIBC, or GCLIB. */
|
LANGSPEC, MATHLIB, WITHLIBC, or GCLIB. */
|
int *args;
|
int *args;
|
|
|
/* The total number of arguments with the new stuff. */
|
/* The total number of arguments with the new stuff. */
|
int argc;
|
int argc;
|
|
|
/* The argument list. */
|
/* The argument list. */
|
const char *const *argv;
|
const char *const *argv;
|
|
|
/* The number of libraries added in. */
|
/* The number of libraries added in. */
|
int added_libraries;
|
int added_libraries;
|
|
|
/* The total number of arguments with the new stuff. */
|
/* The total number of arguments with the new stuff. */
|
int num_args = 1;
|
int num_args = 1;
|
|
|
/* Nonzero if linking is supposed to happen. */
|
/* Nonzero if linking is supposed to happen. */
|
int will_link = 1;
|
int will_link = 1;
|
|
|
/* Nonzero if we want to find the spec file. */
|
/* Nonzero if we want to find the spec file. */
|
int want_spec_file = 1;
|
int want_spec_file = 1;
|
|
|
/* The argument we use to specify the spec file. */
|
/* The argument we use to specify the spec file. */
|
char *spec_file = NULL;
|
char *spec_file = NULL;
|
|
|
/* If linking, nonzero if the BC-ABI is in use. */
|
/* If linking, nonzero if the BC-ABI is in use. */
|
int link_for_bc_abi = 0;
|
int link_for_bc_abi = 0;
|
|
|
argc = *in_argc;
|
argc = *in_argc;
|
argv = *in_argv;
|
argv = *in_argv;
|
added_libraries = *in_added_libraries;
|
added_libraries = *in_added_libraries;
|
|
|
args = XCNEWVEC (int, argc);
|
args = XCNEWVEC (int, argc);
|
|
|
for (i = 1; i < argc; i++)
|
for (i = 1; i < argc; i++)
|
{
|
{
|
/* If the previous option took an argument, we swallow it here. */
|
/* If the previous option took an argument, we swallow it here. */
|
if (quote)
|
if (quote)
|
{
|
{
|
quote = NULL;
|
quote = NULL;
|
args[i] |= PARAM_ARG;
|
args[i] |= PARAM_ARG;
|
continue;
|
continue;
|
}
|
}
|
|
|
/* We don't do this anymore, since we don't get them with minus
|
/* We don't do this anymore, since we don't get them with minus
|
signs on them. */
|
signs on them. */
|
if (argv[i][0] == '\0' || argv[i][1] == '\0')
|
if (argv[i][0] == '\0' || argv[i][1] == '\0')
|
continue;
|
continue;
|
|
|
if (argv[i][0] == '-')
|
if (argv[i][0] == '-')
|
{
|
{
|
if (library != 0 && (strcmp (argv[i], "-nostdlib") == 0
|
if (library != 0 && (strcmp (argv[i], "-nostdlib") == 0
|
|| strcmp (argv[i], "-nodefaultlibs") == 0))
|
|| strcmp (argv[i], "-nodefaultlibs") == 0))
|
{
|
{
|
library = 0;
|
library = 0;
|
}
|
}
|
else if (strncmp (argv[i], "-fmain=", 7) == 0)
|
else if (strncmp (argv[i], "-fmain=", 7) == 0)
|
{
|
{
|
main_class_name = argv[i] + 7;
|
main_class_name = argv[i] + 7;
|
added--;
|
added--;
|
}
|
}
|
else if (strcmp (argv[i], "-fhelp") == 0)
|
else if (strcmp (argv[i], "-fhelp") == 0)
|
want_spec_file = 0;
|
want_spec_file = 0;
|
else if (strcmp (argv[i], "-v") == 0)
|
else if (strcmp (argv[i], "-v") == 0)
|
{
|
{
|
if (argc == 2)
|
if (argc == 2)
|
{
|
{
|
/* If they only gave us `-v', don't try to link
|
/* If they only gave us `-v', don't try to link
|
in libgcj. */
|
in libgcj. */
|
library = 0;
|
library = 0;
|
}
|
}
|
}
|
}
|
else if (strncmp (argv[i], "-x", 2) == 0)
|
else if (strncmp (argv[i], "-x", 2) == 0)
|
saw_speclang = 1;
|
saw_speclang = 1;
|
else if (strcmp (argv[i], "-C") == 0)
|
else if (strcmp (argv[i], "-C") == 0)
|
{
|
{
|
saw_C = 1;
|
saw_C = 1;
|
want_spec_file = 0;
|
want_spec_file = 0;
|
if (library != 0)
|
if (library != 0)
|
added -= 2;
|
added -= 2;
|
library = 0;
|
library = 0;
|
will_link = 0;
|
will_link = 0;
|
}
|
}
|
else if (strncmp (argv[i], "-fcompile-resource=", 19) == 0)
|
else if (strncmp (argv[i], "-fcompile-resource=", 19) == 0)
|
{
|
{
|
saw_resource = 1;
|
saw_resource = 1;
|
want_spec_file = 0;
|
want_spec_file = 0;
|
if (library != 0)
|
if (library != 0)
|
--added;
|
--added;
|
library = 0;
|
library = 0;
|
will_link = 0;
|
will_link = 0;
|
}
|
}
|
else if (argv[i][1] == 'D')
|
else if (argv[i][1] == 'D')
|
saw_D = 1;
|
saw_D = 1;
|
else if (argv[i][1] == 'g')
|
else if (argv[i][1] == 'g')
|
saw_g = 1;
|
saw_g = 1;
|
else if (argv[i][1] == 'O')
|
else if (argv[i][1] == 'O')
|
saw_O = 1;
|
saw_O = 1;
|
else if ((argv[i][2] == '\0'
|
else if ((argv[i][2] == '\0'
|
&& strchr ("bBVDUoeTuIYmLiAI", argv[i][1]) != NULL)
|
&& strchr ("bBVDUoeTuIYmLiAI", argv[i][1]) != NULL)
|
|| strcmp (argv[i], "-Tdata") == 0
|
|| strcmp (argv[i], "-Tdata") == 0
|
|| strcmp (argv[i], "-MT") == 0
|
|| strcmp (argv[i], "-MT") == 0
|
|| strcmp (argv[i], "-MF") == 0)
|
|| strcmp (argv[i], "-MF") == 0)
|
{
|
{
|
if (strcmp (argv[i], "-o") == 0)
|
if (strcmp (argv[i], "-o") == 0)
|
saw_o = 1;
|
saw_o = 1;
|
quote = argv[i];
|
quote = argv[i];
|
}
|
}
|
else if (strcmp (argv[i], "-classpath") == 0
|
else if (strcmp (argv[i], "-classpath") == 0
|
|| strcmp (argv[i], "-bootclasspath") == 0
|
|| strcmp (argv[i], "-bootclasspath") == 0
|
|| strcmp (argv[i], "-CLASSPATH") == 0
|
|| strcmp (argv[i], "-CLASSPATH") == 0
|
|| strcmp (argv[i], "-encoding") == 0
|
|| strcmp (argv[i], "-encoding") == 0
|
|| strcmp (argv[i], "-extdirs") == 0)
|
|| strcmp (argv[i], "-extdirs") == 0)
|
{
|
{
|
quote = argv[i];
|
quote = argv[i];
|
added -= 1;
|
added -= 1;
|
}
|
}
|
else if (library != 0
|
else if (library != 0
|
&& ((argv[i][2] == '\0'
|
&& ((argv[i][2] == '\0'
|
&& strchr ("cSEM", argv[i][1]) != NULL)
|
&& strchr ("cSEM", argv[i][1]) != NULL)
|
|| strcmp (argv[i], "-MM") == 0))
|
|| strcmp (argv[i], "-MM") == 0))
|
{
|
{
|
/* Don't specify libraries if we won't link, since that would
|
/* Don't specify libraries if we won't link, since that would
|
cause a warning. */
|
cause a warning. */
|
library = 0;
|
library = 0;
|
added -= 2;
|
added -= 2;
|
|
|
/* Remember this so we can confirm -fmain option. */
|
/* Remember this so we can confirm -fmain option. */
|
will_link = 0;
|
will_link = 0;
|
}
|
}
|
else if (strcmp (argv[i], "-d") == 0)
|
else if (strcmp (argv[i], "-d") == 0)
|
{
|
{
|
/* `-d' option is for javac compatibility. */
|
/* `-d' option is for javac compatibility. */
|
quote = argv[i];
|
quote = argv[i];
|
added -= 1;
|
added -= 1;
|
}
|
}
|
else if (strcmp (argv[i], "-fsyntax-only") == 0
|
else if (strcmp (argv[i], "-fsyntax-only") == 0
|
|| strcmp (argv[i], "--syntax-only") == 0)
|
|| strcmp (argv[i], "--syntax-only") == 0)
|
{
|
{
|
library = 0;
|
library = 0;
|
will_link = 0;
|
will_link = 0;
|
continue;
|
continue;
|
}
|
}
|
else if (strcmp (argv[i], "-save-temps") == 0)
|
else if (strcmp (argv[i], "-save-temps") == 0)
|
saw_save_temps = 1;
|
saw_save_temps = 1;
|
else if (strcmp (argv[i], "-static-libgcc") == 0
|
else if (strcmp (argv[i], "-static-libgcc") == 0
|
|| strcmp (argv[i], "-static") == 0)
|
|| strcmp (argv[i], "-static") == 0)
|
shared_libgcc = 0;
|
shared_libgcc = 0;
|
else if (strcmp (argv[i], "-findirect-dispatch") == 0
|
else if (strcmp (argv[i], "-findirect-dispatch") == 0
|
|| strcmp (argv[i], "--indirect-dispatch") == 0)
|
|| strcmp (argv[i], "--indirect-dispatch") == 0)
|
{
|
{
|
link_for_bc_abi = 1;
|
link_for_bc_abi = 1;
|
}
|
}
|
else
|
else
|
/* Pass other options through. */
|
/* Pass other options through. */
|
continue;
|
continue;
|
}
|
}
|
else
|
else
|
{
|
{
|
int len;
|
int len;
|
|
|
if (saw_speclang)
|
if (saw_speclang)
|
{
|
{
|
saw_speclang = 0;
|
saw_speclang = 0;
|
continue;
|
continue;
|
}
|
}
|
|
|
if (saw_resource)
|
if (saw_resource)
|
{
|
{
|
args[i] |= RESOURCE_FILE_ARG;
|
args[i] |= RESOURCE_FILE_ARG;
|
added += 2; /* for -xjava and -xnone */
|
added += 2; /* for -xjava and -xnone */
|
}
|
}
|
|
|
if (argv[i][0] == '@')
|
if (argv[i][0] == '@')
|
{
|
{
|
args[i] |= INDIRECT_FILE_ARG;
|
args[i] |= INDIRECT_FILE_ARG;
|
indirect_files_count++;
|
indirect_files_count++;
|
added += 2; /* for -xjava and -xnone */
|
added += 2; /* for -xjava and -xnone */
|
}
|
}
|
|
|
len = strlen (argv[i]);
|
len = strlen (argv[i]);
|
if (len > 5 && strcmp (argv[i] + len - 5, ".java") == 0)
|
if (len > 5 && strcmp (argv[i] + len - 5, ".java") == 0)
|
{
|
{
|
args[i] |= JAVA_FILE_ARG;
|
args[i] |= JAVA_FILE_ARG;
|
java_files_count++;
|
java_files_count++;
|
}
|
}
|
if (len > 6 && strcmp (argv[i] + len - 6, ".class") == 0)
|
if (len > 6 && strcmp (argv[i] + len - 6, ".class") == 0)
|
{
|
{
|
args[i] |= CLASS_FILE_ARG;
|
args[i] |= CLASS_FILE_ARG;
|
class_files_count++;
|
class_files_count++;
|
}
|
}
|
if (len > 4
|
if (len > 4
|
&& (strcmp (argv[i] + len - 4, ".zip") == 0
|
&& (strcmp (argv[i] + len - 4, ".zip") == 0
|
|| strcmp (argv[i] + len - 4, ".jar") == 0))
|
|| strcmp (argv[i] + len - 4, ".jar") == 0))
|
{
|
{
|
args[i] |= ZIP_FILE_ARG;
|
args[i] |= ZIP_FILE_ARG;
|
zip_files_count++;
|
zip_files_count++;
|
}
|
}
|
}
|
}
|
}
|
}
|
|
|
if (quote)
|
if (quote)
|
fatal ("argument to '%s' missing\n", quote);
|
fatal ("argument to '%s' missing\n", quote);
|
|
|
if (saw_D && ! main_class_name)
|
if (saw_D && ! main_class_name)
|
fatal ("can't specify '-D' without '--main'\n");
|
fatal ("can't specify '-D' without '--main'\n");
|
|
|
if (main_class_name && ! verify_class_name (main_class_name))
|
if (main_class_name && ! verify_class_name (main_class_name))
|
fatal ("'%s' is not a valid class name", main_class_name);
|
fatal ("'%s' is not a valid class name", main_class_name);
|
|
|
num_args = argc + added;
|
num_args = argc + added;
|
if (saw_resource)
|
if (saw_resource)
|
{
|
{
|
if (! saw_o)
|
if (! saw_o)
|
fatal ("--resource requires -o");
|
fatal ("--resource requires -o");
|
}
|
}
|
if (saw_C)
|
if (saw_C)
|
{
|
{
|
num_args += 3;
|
num_args += 3;
|
if (class_files_count + zip_files_count > 0)
|
if (class_files_count + zip_files_count > 0)
|
{
|
{
|
error ("warning: already-compiled .class files ignored with -C");
|
error ("warning: already-compiled .class files ignored with -C");
|
num_args -= class_files_count + zip_files_count;
|
num_args -= class_files_count + zip_files_count;
|
class_files_count = 0;
|
class_files_count = 0;
|
zip_files_count = 0;
|
zip_files_count = 0;
|
}
|
}
|
num_args += 2; /* For -o NONE. */
|
num_args += 2; /* For -o NONE. */
|
if (saw_o)
|
if (saw_o)
|
fatal ("cannot specify both -C and -o");
|
fatal ("cannot specify both -C and -o");
|
}
|
}
|
if ((saw_o && java_files_count + class_files_count + zip_files_count > 1)
|
if ((saw_o && java_files_count + class_files_count + zip_files_count > 1)
|
|| (saw_C && java_files_count > 1)
|
|| (saw_C && java_files_count > 1)
|
|| (indirect_files_count > 0
|
|| (indirect_files_count > 0
|
&& java_files_count + class_files_count + zip_files_count > 0))
|
&& java_files_count + class_files_count + zip_files_count > 0))
|
combine_inputs = 1;
|
combine_inputs = 1;
|
|
|
if (combine_inputs)
|
if (combine_inputs)
|
{
|
{
|
filelist_filename = make_temp_file ("jx");
|
filelist_filename = make_temp_file ("jx");
|
if (filelist_filename == NULL)
|
if (filelist_filename == NULL)
|
fatal ("cannot create temporary file");
|
fatal ("cannot create temporary file");
|
record_temp_file (filelist_filename, ! saw_save_temps, 0);
|
record_temp_file (filelist_filename, ! saw_save_temps, 0);
|
filelist_file = fopen (filelist_filename, "w");
|
filelist_file = fopen (filelist_filename, "w");
|
if (filelist_file == NULL)
|
if (filelist_file == NULL)
|
pfatal_with_name (filelist_filename);
|
pfatal_with_name (filelist_filename);
|
num_args -= java_files_count + class_files_count + zip_files_count;
|
num_args -= java_files_count + class_files_count + zip_files_count;
|
num_args += 3; /* for the combined arg "-xjava", and "-xnone" */
|
num_args += 3; /* for the combined arg "-xjava", and "-xnone" */
|
}
|
}
|
|
|
if (main_class_name)
|
if (main_class_name)
|
{
|
{
|
lang_specific_extra_outfiles++;
|
lang_specific_extra_outfiles++;
|
}
|
}
|
if (saw_g + saw_O == 0)
|
if (saw_g + saw_O == 0)
|
num_args++;
|
num_args++;
|
num_args++;
|
num_args++;
|
/* An additional entry for the classpath. */
|
/* An additional entry for the classpath. */
|
num_args++;
|
num_args++;
|
|
|
if (combine_inputs || indirect_files_count > 0)
|
if (combine_inputs || indirect_files_count > 0)
|
num_args += 1; /* for "-ffilelist-file" */
|
num_args += 1; /* for "-ffilelist-file" */
|
if (combine_inputs && indirect_files_count > 0)
|
if (combine_inputs && indirect_files_count > 0)
|
fatal("using both @FILE with multiple files not implemented");
|
fatal("using both @FILE with multiple files not implemented");
|
|
|
/* There's no point adding -shared-libgcc if we don't have a shared
|
/* There's no point adding -shared-libgcc if we don't have a shared
|
libgcc. */
|
libgcc. */
|
#ifndef ENABLE_SHARED_LIBGCC
|
#ifndef ENABLE_SHARED_LIBGCC
|
shared_libgcc = 0;
|
shared_libgcc = 0;
|
#endif
|
#endif
|
|
|
if (java_files_count > 0)
|
if (java_files_count > 0)
|
++num_args;
|
++num_args;
|
|
|
num_args += shared_libgcc;
|
num_args += shared_libgcc;
|
|
|
num_args += link_for_bc_abi;
|
num_args += link_for_bc_abi;
|
|
|
arglist = XNEWVEC (const char *, num_args + 1);
|
arglist = XNEWVEC (const char *, num_args + 1);
|
j = 0;
|
j = 0;
|
|
|
arglist[j++] = argv[0];
|
arglist[j++] = argv[0];
|
|
|
if (combine_inputs || indirect_files_count > 0)
|
if (combine_inputs || indirect_files_count > 0)
|
arglist[j++] = "-ffilelist-file";
|
arglist[j++] = "-ffilelist-file";
|
|
|
if (combine_inputs)
|
if (combine_inputs)
|
{
|
{
|
arglist[j++] = "-xjava";
|
arglist[j++] = "-xjava";
|
arglist[j++] = filelist_filename;
|
arglist[j++] = filelist_filename;
|
arglist[j++] = "-xnone";
|
arglist[j++] = "-xnone";
|
}
|
}
|
|
|
if (java_files_count > 0)
|
if (java_files_count > 0)
|
arglist[j++] = "-fsaw-java-file";
|
arglist[j++] = "-fsaw-java-file";
|
|
|
jcf_path_init ();
|
jcf_path_init ();
|
for (i = 1; i < argc; i++, j++)
|
for (i = 1; i < argc; i++, j++)
|
{
|
{
|
arglist[j] = argv[i];
|
arglist[j] = argv[i];
|
|
|
if ((args[i] & PARAM_ARG))
|
if ((args[i] & PARAM_ARG))
|
continue;
|
continue;
|
|
|
if ((args[i] & RESOURCE_FILE_ARG) != 0)
|
if ((args[i] & RESOURCE_FILE_ARG) != 0)
|
{
|
{
|
arglist[j++] = "-xjava";
|
arglist[j++] = "-xjava";
|
arglist[j++] = argv[i];
|
arglist[j++] = argv[i];
|
arglist[j] = "-xnone";
|
arglist[j] = "-xnone";
|
}
|
}
|
|
|
if (argv[i][0] == '-' && argv[i][1] == 'I')
|
if (argv[i][0] == '-' && argv[i][1] == 'I')
|
{
|
{
|
const char *arg;
|
const char *arg;
|
if (argv[i][2] == '\0')
|
if (argv[i][2] == '\0')
|
{
|
{
|
gcc_assert (i + 1 < argc && (args[i + 1] & PARAM_ARG) != 0);
|
gcc_assert (i + 1 < argc && (args[i + 1] & PARAM_ARG) != 0);
|
arg = argv[i + 1];
|
arg = argv[i + 1];
|
/* Drop the argument. */
|
/* Drop the argument. */
|
++i;
|
++i;
|
}
|
}
|
else
|
else
|
arg = &argv[i][2];
|
arg = &argv[i][2];
|
jcf_path_include_arg (arg);
|
jcf_path_include_arg (arg);
|
--j;
|
--j;
|
continue;
|
continue;
|
}
|
}
|
if (! strcmp (argv[i], "-classpath")
|
if (! strcmp (argv[i], "-classpath")
|
|| ! strcmp (argv[i], "-CLASSPATH"))
|
|| ! strcmp (argv[i], "-CLASSPATH"))
|
{
|
{
|
jcf_path_classpath_arg (argv[i + 1]);
|
jcf_path_classpath_arg (argv[i + 1]);
|
++i;
|
++i;
|
--j;
|
--j;
|
continue;
|
continue;
|
}
|
}
|
if (! strcmp (argv[i], "-bootclasspath"))
|
if (! strcmp (argv[i], "-bootclasspath"))
|
{
|
{
|
jcf_path_bootclasspath_arg (argv[i + 1]);
|
jcf_path_bootclasspath_arg (argv[i + 1]);
|
++i;
|
++i;
|
--j;
|
--j;
|
continue;
|
continue;
|
}
|
}
|
if (! strncmp (argv[i], "-fCLASSPATH=", 12)
|
if (! strncmp (argv[i], "-fCLASSPATH=", 12)
|
|| ! strncmp (argv[i], "-fclasspath=", 12))
|
|| ! strncmp (argv[i], "-fclasspath=", 12))
|
{
|
{
|
const char *p = strchr (argv[i], '=');
|
const char *p = strchr (argv[i], '=');
|
jcf_path_classpath_arg (p + 1);
|
jcf_path_classpath_arg (p + 1);
|
--j;
|
--j;
|
continue;
|
continue;
|
}
|
}
|
if (! strncmp (argv[i], "-fbootclasspath=", 16))
|
if (! strncmp (argv[i], "-fbootclasspath=", 16))
|
{
|
{
|
const char *p = strchr (argv[i], '=');
|
const char *p = strchr (argv[i], '=');
|
jcf_path_bootclasspath_arg (p + 1);
|
jcf_path_bootclasspath_arg (p + 1);
|
--j;
|
--j;
|
continue;
|
continue;
|
}
|
}
|
if (! strcmp (argv[i], "-extdirs"))
|
if (! strcmp (argv[i], "-extdirs"))
|
{
|
{
|
jcf_path_extdirs_arg (argv[i + 1]);
|
jcf_path_extdirs_arg (argv[i + 1]);
|
++i;
|
++i;
|
--j;
|
--j;
|
continue;
|
continue;
|
}
|
}
|
|
|
if (strcmp (argv[i], "-encoding") == 0)
|
if (strcmp (argv[i], "-encoding") == 0)
|
{
|
{
|
arglist[j] = concat ("-f", argv[i]+1, "=", argv[i+1], NULL);
|
arglist[j] = concat ("-f", argv[i]+1, "=", argv[i+1], NULL);
|
i++;
|
i++;
|
continue;
|
continue;
|
}
|
}
|
|
|
if (strcmp (argv[i], "-d") == 0)
|
if (strcmp (argv[i], "-d") == 0)
|
{
|
{
|
arglist[j] = concat ("-foutput-class-dir=", argv[i + 1], NULL);
|
arglist[j] = concat ("-foutput-class-dir=", argv[i + 1], NULL);
|
++i;
|
++i;
|
continue;
|
continue;
|
}
|
}
|
|
|
if (spec_file == NULL && strncmp (argv[i], "-L", 2) == 0)
|
if (spec_file == NULL && strncmp (argv[i], "-L", 2) == 0)
|
spec_file = find_spec_file (argv[i] + 2);
|
spec_file = find_spec_file (argv[i] + 2);
|
|
|
if (strncmp (argv[i], "-fmain=", 7) == 0)
|
if (strncmp (argv[i], "-fmain=", 7) == 0)
|
{
|
{
|
if (! will_link)
|
if (! will_link)
|
fatal ("cannot specify 'main' class when not linking");
|
fatal ("cannot specify 'main' class when not linking");
|
--j;
|
--j;
|
continue;
|
continue;
|
}
|
}
|
|
|
if ((args[i] & INDIRECT_FILE_ARG) != 0)
|
if ((args[i] & INDIRECT_FILE_ARG) != 0)
|
{
|
{
|
arglist[j++] = "-xjava";
|
arglist[j++] = "-xjava";
|
arglist[j++] = argv[i]+1; /* Drop '@'. */
|
arglist[j++] = argv[i]+1; /* Drop '@'. */
|
arglist[j] = "-xnone";
|
arglist[j] = "-xnone";
|
}
|
}
|
|
|
if ((args[i] & (CLASS_FILE_ARG|ZIP_FILE_ARG)) && saw_C)
|
if ((args[i] & (CLASS_FILE_ARG|ZIP_FILE_ARG)) && saw_C)
|
{
|
{
|
--j;
|
--j;
|
continue;
|
continue;
|
}
|
}
|
|
|
if (combine_inputs
|
if (combine_inputs
|
&& (args[i] & (CLASS_FILE_ARG|JAVA_FILE_ARG|ZIP_FILE_ARG)) != 0)
|
&& (args[i] & (CLASS_FILE_ARG|JAVA_FILE_ARG|ZIP_FILE_ARG)) != 0)
|
{
|
{
|
fputs (argv[i], filelist_file);
|
fputs (argv[i], filelist_file);
|
fputc ('\n', filelist_file);
|
fputc ('\n', filelist_file);
|
--j;
|
--j;
|
continue;
|
continue;
|
}
|
}
|
}
|
}
|
|
|
/* Handle classpath setting. We specify the bootclasspath since
|
/* Handle classpath setting. We specify the bootclasspath since
|
that requires the fewest changes to our existing code... */
|
that requires the fewest changes to our existing code... */
|
jcf_path_seal (0);
|
jcf_path_seal (0);
|
arglist[j++] = jcf_path_compute ("-fbootclasspath=");
|
arglist[j++] = jcf_path_compute ("-fbootclasspath=");
|
|
|
if (combine_inputs)
|
if (combine_inputs)
|
{
|
{
|
if (fclose (filelist_file))
|
if (fclose (filelist_file))
|
pfatal_with_name (filelist_filename);
|
pfatal_with_name (filelist_filename);
|
}
|
}
|
|
|
/* If we saw no -O or -g option, default to -g1, for javac compatibility. */
|
/* If we saw no -O or -g option, default to -g1, for javac compatibility. */
|
if (saw_g + saw_O == 0)
|
if (saw_g + saw_O == 0)
|
arglist[j++] = "-g1";
|
arglist[j++] = "-g1";
|
|
|
/* Read the specs file corresponding to libgcj.
|
/* Read the specs file corresponding to libgcj.
|
If we didn't find the spec file on the -L path, then we hope it
|
If we didn't find the spec file on the -L path, then we hope it
|
is somewhere in the standard install areas. */
|
is somewhere in the standard install areas. */
|
if (want_spec_file)
|
if (want_spec_file)
|
arglist[j++] = spec_file == NULL ? "-specs=libgcj.spec" : spec_file;
|
arglist[j++] = spec_file == NULL ? "-specs=libgcj.spec" : spec_file;
|
|
|
if (saw_C)
|
if (saw_C)
|
{
|
{
|
arglist[j++] = "-fsyntax-only";
|
arglist[j++] = "-fsyntax-only";
|
arglist[j++] = "-femit-class-files";
|
arglist[j++] = "-femit-class-files";
|
arglist[j++] = "-S";
|
arglist[j++] = "-S";
|
arglist[j++] = "-o";
|
arglist[j++] = "-o";
|
arglist[j++] = "NONE";
|
arglist[j++] = "NONE";
|
}
|
}
|
|
|
if (shared_libgcc)
|
if (shared_libgcc)
|
arglist[j++] = "-shared-libgcc";
|
arglist[j++] = "-shared-libgcc";
|
|
|
if (link_for_bc_abi)
|
if (link_for_bc_abi)
|
arglist[j++] = "-s-bc-abi";
|
arglist[j++] = "-s-bc-abi";
|
|
|
arglist[j] = NULL;
|
arglist[j] = NULL;
|
|
|
*in_argc = j;
|
*in_argc = j;
|
*in_argv = arglist;
|
*in_argv = arglist;
|
*in_added_libraries = added_libraries;
|
*in_added_libraries = added_libraries;
|
}
|
}
|
|
|
int
|
int
|
lang_specific_pre_link (void)
|
lang_specific_pre_link (void)
|
{
|
{
|
int err;
|
int err;
|
if (main_class_name == NULL)
|
if (main_class_name == NULL)
|
return 0;
|
return 0;
|
/* Append `main' to make the filename unique and allow
|
/* Append `main' to make the filename unique and allow
|
|
|
gcj --main=hello -save-temps hello.java
|
gcj --main=hello -save-temps hello.java
|
|
|
to work. jvgenmain needs to strip this `main' to arrive at the correct
|
to work. jvgenmain needs to strip this `main' to arrive at the correct
|
class name. Append dummy `.c' that can be stripped by set_input so %b
|
class name. Append dummy `.c' that can be stripped by set_input so %b
|
is correct. */
|
is correct. */
|
set_input (concat (main_class_name, "main.c", NULL));
|
set_input (concat (main_class_name, "main.c", NULL));
|
err = do_spec (jvgenmain_spec);
|
err = do_spec (jvgenmain_spec);
|
if (err == 0)
|
if (err == 0)
|
{
|
{
|
/* Shift the outfiles array so the generated main comes first.
|
/* Shift the outfiles array so the generated main comes first.
|
This is important when linking against (non-shared) libraries,
|
This is important when linking against (non-shared) libraries,
|
since otherwise we risk (a) nothing getting linked or
|
since otherwise we risk (a) nothing getting linked or
|
(b) 'main' getting picked up from a library. */
|
(b) 'main' getting picked up from a library. */
|
int i = n_infiles;
|
int i = n_infiles;
|
const char *generated = outfiles[i];
|
const char *generated = outfiles[i];
|
while (--i >= 0)
|
while (--i >= 0)
|
outfiles[i + 1] = outfiles[i];
|
outfiles[i + 1] = outfiles[i];
|
outfiles[0] = generated;
|
outfiles[0] = generated;
|
}
|
}
|
return err;
|
return err;
|
}
|
}
|
|
|
