/* Utility macros to read Java(TM) .class files and byte codes.
|
/* Utility macros to read Java(TM) .class files and byte codes.
|
Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
|
Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
|
2006, 2007, 2008 Free Software Foundation, Inc.
|
2006, 2007, 2008 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. */
|
|
|
/* Written by Per Bothner <bothner@cygnus.com>, February 1996. */
|
/* Written by Per Bothner <bothner@cygnus.com>, February 1996. */
|
|
|
#ifndef GCC_JCF_H
|
#ifndef GCC_JCF_H
|
#define GCC_JCF_H
|
#define GCC_JCF_H
|
#include "javaop.h"
|
#include "javaop.h"
|
|
|
#ifndef JCF_u4
|
#ifndef JCF_u4
|
#define JCF_u4 unsigned long
|
#define JCF_u4 unsigned long
|
#endif
|
#endif
|
#ifndef JCF_u2
|
#ifndef JCF_u2
|
#define JCF_u2 unsigned short
|
#define JCF_u2 unsigned short
|
#endif
|
#endif
|
|
|
#define ALLOC xmalloc
|
#define ALLOC xmalloc
|
#define REALLOC xrealloc
|
#define REALLOC xrealloc
|
#ifndef FREE
|
#ifndef FREE
|
#define FREE(PTR) free(PTR)
|
#define FREE(PTR) free(PTR)
|
#endif
|
#endif
|
|
|
#ifdef JCF_word
|
#ifdef JCF_word
|
#define JCF_word JCF_u4
|
#define JCF_word JCF_u4
|
#endif
|
#endif
|
|
|
/* On case-insensitive file systems, we need to ensure that a request
|
/* On case-insensitive file systems, we need to ensure that a request
|
to open a .java or .class file is honored only if the file to be
|
to open a .java or .class file is honored only if the file to be
|
opened is of the exact case we are asking for. In other words, we
|
opened is of the exact case we are asking for. In other words, we
|
want to override the inherent case insensitivity of the underlying
|
want to override the inherent case insensitivity of the underlying
|
file system. On other platforms, this macro becomes the vanilla
|
file system. On other platforms, this macro becomes the vanilla
|
open() call.
|
open() call.
|
|
|
If you want to add another host, add your define to the list below
|
If you want to add another host, add your define to the list below
|
(i.e. defined(WIN32) || defined(YOUR_HOST)) and add a host-specific
|
(i.e. defined(WIN32) || defined(YOUR_HOST)) and add a host-specific
|
.c file to Make-lang.in similar to win32-host.c. */
|
.c file to Make-lang.in similar to win32-host.c. */
|
#if defined(WIN32)
|
#if defined(WIN32)
|
extern int
|
extern int
|
jcf_open_exact_case (const char* filename, int oflag);
|
jcf_open_exact_case (const char* filename, int oflag);
|
#define JCF_OPEN_EXACT_CASE(X, Y) jcf_open_exact_case (X, Y)
|
#define JCF_OPEN_EXACT_CASE(X, Y) jcf_open_exact_case (X, Y)
|
#else
|
#else
|
#define JCF_OPEN_EXACT_CASE open
|
#define JCF_OPEN_EXACT_CASE open
|
#endif /* WIN32 */
|
#endif /* WIN32 */
|
|
|
struct JCF;
|
struct JCF;
|
typedef int (*jcf_filbuf_t) (struct JCF*, int needed);
|
typedef int (*jcf_filbuf_t) (struct JCF*, int needed);
|
|
|
union GTY(()) cpool_entry {
|
union GTY(()) cpool_entry {
|
jword GTY ((tag ("0"))) w;
|
jword GTY ((tag ("0"))) w;
|
tree GTY ((tag ("1"))) t;
|
tree GTY ((tag ("1"))) t;
|
};
|
};
|
|
|
#define cpool_entry_is_tree(tag) \
|
#define cpool_entry_is_tree(tag) \
|
(tag & CONSTANT_ResolvedFlag) || tag == CONSTANT_Utf8
|
(tag & CONSTANT_ResolvedFlag) || tag == CONSTANT_Utf8
|
|
|
typedef struct GTY(()) CPool {
|
typedef struct GTY(()) CPool {
|
/* Available number of elements in the constants array, before it
|
/* Available number of elements in the constants array, before it
|
must be re-allocated. */
|
must be re-allocated. */
|
int capacity;
|
int capacity;
|
|
|
/* The constant_pool_count. */
|
/* The constant_pool_count. */
|
int count;
|
int count;
|
|
|
uint8* GTY((length ("%h.count"))) tags;
|
uint8* GTY((length ("%h.count"))) tags;
|
|
|
union cpool_entry * GTY((length ("%h.count"),
|
union cpool_entry * GTY((length ("%h.count"),
|
desc ("cpool_entry_is_tree (%1.tags%a)"))) data;
|
desc ("cpool_entry_is_tree (%1.tags%a)"))) data;
|
} CPool;
|
} CPool;
|
|
|
struct ZipDirectory;
|
struct ZipDirectory;
|
|
|
/* JCF encapsulates the state of reading a Java Class File. */
|
/* JCF encapsulates the state of reading a Java Class File. */
|
|
|
typedef struct GTY(()) JCF {
|
typedef struct GTY(()) JCF {
|
unsigned char * GTY ((skip)) buffer;
|
unsigned char * GTY ((skip)) buffer;
|
unsigned char * GTY ((skip)) buffer_end;
|
unsigned char * GTY ((skip)) buffer_end;
|
unsigned char * GTY ((skip)) read_ptr;
|
unsigned char * GTY ((skip)) read_ptr;
|
unsigned char * GTY ((skip)) read_end;
|
unsigned char * GTY ((skip)) read_end;
|
unsigned int right_zip : 1;
|
unsigned int right_zip : 1;
|
unsigned int finished : 1;
|
unsigned int finished : 1;
|
jcf_filbuf_t filbuf;
|
jcf_filbuf_t filbuf;
|
PTR GTY ((skip)) read_state;
|
PTR GTY ((skip)) read_state;
|
const char *filename;
|
const char *filename;
|
const char *classname;
|
const char *classname;
|
/* Directory entry where it was found. */
|
/* Directory entry where it was found. */
|
struct ZipDirectory * GTY ((skip)) zipd;
|
struct ZipDirectory * GTY ((skip)) zipd;
|
JCF_u2 access_flags;
|
JCF_u2 access_flags;
|
JCF_u2 this_class;
|
JCF_u2 this_class;
|
JCF_u2 super_class;
|
JCF_u2 super_class;
|
CPool cpool;
|
CPool cpool;
|
} JCF;
|
} JCF;
|
/*typedef JCF* JCF_FILE;*/
|
/*typedef JCF* JCF_FILE;*/
|
|
|
#define JCF_SEEN_IN_ZIP(JCF) ((JCF)->zipd != NULL)
|
#define JCF_SEEN_IN_ZIP(JCF) ((JCF)->zipd != NULL)
|
|
|
/* The CPOOL macros take a (pointer to a) CPool.
|
/* The CPOOL macros take a (pointer to a) CPool.
|
The JPOOL macros take a (pointer to a) JCF.
|
The JPOOL macros take a (pointer to a) JCF.
|
Some of the latter should perhaps be deprecated or removed. */
|
Some of the latter should perhaps be deprecated or removed. */
|
|
|
#define CPOOL_COUNT(CPOOL) ((CPOOL)->count)
|
#define CPOOL_COUNT(CPOOL) ((CPOOL)->count)
|
#define JPOOL_SIZE(JCF) CPOOL_COUNT(&(JCF)->cpool)
|
#define JPOOL_SIZE(JCF) CPOOL_COUNT(&(JCF)->cpool)
|
#define JPOOL_TAG(JCF, INDEX) ((JCF)->cpool.tags[INDEX])
|
#define JPOOL_TAG(JCF, INDEX) ((JCF)->cpool.tags[INDEX])
|
/* The INDEX'th constant pool entry as a JCF_u4. */
|
/* The INDEX'th constant pool entry as a JCF_u4. */
|
#define CPOOL_UINT(CPOOL, INDEX) ((CPOOL)->data[INDEX].w)
|
#define CPOOL_UINT(CPOOL, INDEX) ((CPOOL)->data[INDEX].w)
|
#define JPOOL_UINT(JCF, INDEX) CPOOL_UINT(&(JCF)->cpool, INDEX) /*deprecated*/
|
#define JPOOL_UINT(JCF, INDEX) CPOOL_UINT(&(JCF)->cpool, INDEX) /*deprecated*/
|
/* The first uint16 of the INDEX'th constant pool entry. */
|
/* The first uint16 of the INDEX'th constant pool entry. */
|
#define CPOOL_USHORT1(CPOOL, INDEX) ((CPOOL)->data[INDEX].w & 0xFFFF)
|
#define CPOOL_USHORT1(CPOOL, INDEX) ((CPOOL)->data[INDEX].w & 0xFFFF)
|
#define JPOOL_USHORT1(JCF, INDEX) CPOOL_USHORT1(&(JCF)->cpool, INDEX)
|
#define JPOOL_USHORT1(JCF, INDEX) CPOOL_USHORT1(&(JCF)->cpool, INDEX)
|
/* The second uint16 of the INDEX'th constant pool entry. */
|
/* The second uint16 of the INDEX'th constant pool entry. */
|
#define CPOOL_USHORT2(CPOOL, INDEX) ((CPOOL)->data[INDEX].w >> 16)
|
#define CPOOL_USHORT2(CPOOL, INDEX) ((CPOOL)->data[INDEX].w >> 16)
|
#define JPOOL_USHORT2(JCF, INDEX) CPOOL_USHORT2(&(JCF)->cpool, INDEX)
|
#define JPOOL_USHORT2(JCF, INDEX) CPOOL_USHORT2(&(JCF)->cpool, INDEX)
|
#define JPOOL_LONG(JCF, INDEX) \
|
#define JPOOL_LONG(JCF, INDEX) \
|
WORDS_TO_LONG (JPOOL_UINT(JCF, INDEX), JPOOL_UINT(JCF, (INDEX)+1))
|
WORDS_TO_LONG (JPOOL_UINT(JCF, INDEX), JPOOL_UINT(JCF, (INDEX)+1))
|
#define JPOOL_DOUBLE(JCF, INDEX) \
|
#define JPOOL_DOUBLE(JCF, INDEX) \
|
WORDS_TO_DOUBLE (JPOOL_UINT(JCF, INDEX), JPOOL_UINT(JCF, (INDEX)+1))
|
WORDS_TO_DOUBLE (JPOOL_UINT(JCF, INDEX), JPOOL_UINT(JCF, (INDEX)+1))
|
#ifndef JPOOL_UTF_LENGTH
|
#ifndef JPOOL_UTF_LENGTH
|
#define JPOOL_UTF_LENGTH(JCF, INDEX) \
|
#define JPOOL_UTF_LENGTH(JCF, INDEX) \
|
GET_u2 ((JCF)->buffer+JPOOL_UINT(JCF, INDEX))
|
GET_u2 ((JCF)->buffer+JPOOL_UINT(JCF, INDEX))
|
#endif
|
#endif
|
#ifndef JPOOL_UTF_DATA
|
#ifndef JPOOL_UTF_DATA
|
#define JPOOL_UTF_DATA(JCF, INDEX) \
|
#define JPOOL_UTF_DATA(JCF, INDEX) \
|
((JCF)->buffer+JPOOL_UINT(JCF, INDEX)+2)
|
((JCF)->buffer+JPOOL_UINT(JCF, INDEX)+2)
|
#endif
|
#endif
|
#define JPOOL_INT(JCF, INDEX) (WORD_TO_INT(JPOOL_UINT (JCF, INDEX)))
|
#define JPOOL_INT(JCF, INDEX) (WORD_TO_INT(JPOOL_UINT (JCF, INDEX)))
|
#define JPOOL_FLOAT(JCF, INDEX) WORD_TO_FLOAT (JPOOL_UINT (JCF, INDEX))
|
#define JPOOL_FLOAT(JCF, INDEX) WORD_TO_FLOAT (JPOOL_UINT (JCF, INDEX))
|
|
|
#define CPOOL_INDEX_IN_RANGE(CPOOL, INDEX) \
|
#define CPOOL_INDEX_IN_RANGE(CPOOL, INDEX) \
|
((INDEX) > 0 && (INDEX) < CPOOL_COUNT(CPOOL))
|
((INDEX) > 0 && (INDEX) < CPOOL_COUNT(CPOOL))
|
|
|
#define CPOOL_FINISH(CPOOL) { \
|
#define CPOOL_FINISH(CPOOL) { \
|
(CPOOL)->tags = 0; \
|
(CPOOL)->tags = 0; \
|
(CPOOL)->data = 0; \
|
(CPOOL)->data = 0; \
|
}
|
}
|
|
|
#define JCF_FINISH(JCF) { \
|
#define JCF_FINISH(JCF) { \
|
CPOOL_FINISH(&(JCF)->cpool); \
|
CPOOL_FINISH(&(JCF)->cpool); \
|
if ((JCF)->buffer) free ((JCF)->buffer); \
|
if ((JCF)->buffer) free ((JCF)->buffer); \
|
if ((JCF)->filename) free (CONST_CAST (char *, (JCF)->filename)); \
|
if ((JCF)->filename) free (CONST_CAST (char *, (JCF)->filename)); \
|
if ((JCF)->classname) free (CONST_CAST (char *, (JCF)->classname)); \
|
if ((JCF)->classname) free (CONST_CAST (char *, (JCF)->classname)); \
|
(JCF)->finished = 1; }
|
(JCF)->finished = 1; }
|
|
|
#define CPOOL_INIT(CPOOL) \
|
#define CPOOL_INIT(CPOOL) \
|
((CPOOL)->capacity = 0, (CPOOL)->count = 0, (CPOOL)->tags = 0, (CPOOL)->data = 0)
|
((CPOOL)->capacity = 0, (CPOOL)->count = 0, (CPOOL)->tags = 0, (CPOOL)->data = 0)
|
|
|
#define CPOOL_REINIT(CPOOL) ((CPOOL)->count = 0)
|
#define CPOOL_REINIT(CPOOL) ((CPOOL)->count = 0)
|
|
|
#define JCF_ZERO(JCF) \
|
#define JCF_ZERO(JCF) \
|
((JCF)->buffer = (JCF)->buffer_end = (JCF)->read_ptr = (JCF)->read_end = 0,\
|
((JCF)->buffer = (JCF)->buffer_end = (JCF)->read_ptr = (JCF)->read_end = 0,\
|
(JCF)->read_state = 0, (JCF)->filename = (JCF)->classname = 0, \
|
(JCF)->read_state = 0, (JCF)->filename = (JCF)->classname = 0, \
|
CPOOL_INIT(&(JCF)->cpool), (JCF)->zipd = 0, \
|
CPOOL_INIT(&(JCF)->cpool), (JCF)->zipd = 0, \
|
(JCF)->finished = 0)
|
(JCF)->finished = 0)
|
|
|
/* Given that PTR points to a 2-byte unsigned integer in network
|
/* Given that PTR points to a 2-byte unsigned integer in network
|
(big-endian) byte-order, return that integer. */
|
(big-endian) byte-order, return that integer. */
|
#define GET_u2(PTR) (((PTR)[0] << 8) | ((PTR)[1]))
|
#define GET_u2(PTR) (((PTR)[0] << 8) | ((PTR)[1]))
|
/* Like GET_u2, but for little-endian format. */
|
/* Like GET_u2, but for little-endian format. */
|
#define GET_u2_le(PTR) (((PTR)[1] << 8) | ((PTR)[0]))
|
#define GET_u2_le(PTR) (((PTR)[1] << 8) | ((PTR)[0]))
|
|
|
/* Given that PTR points to a 4-byte unsigned integer in network
|
/* Given that PTR points to a 4-byte unsigned integer in network
|
(big-endian) byte-order, return that integer. */
|
(big-endian) byte-order, return that integer. */
|
#define GET_u4(PTR) (((JCF_u4)(PTR)[0] << 24) | ((JCF_u4)(PTR)[1] << 16) \
|
#define GET_u4(PTR) (((JCF_u4)(PTR)[0] << 24) | ((JCF_u4)(PTR)[1] << 16) \
|
| ((JCF_u4)(PTR)[2] << 8) | ((JCF_u4)(PTR)[3]))
|
| ((JCF_u4)(PTR)[2] << 8) | ((JCF_u4)(PTR)[3]))
|
/* Like GET_u4, but for little-endian order. */
|
/* Like GET_u4, but for little-endian order. */
|
#define GET_u4_le(PTR) (((JCF_u4)(PTR)[3] << 24) | ((JCF_u4)(PTR)[2] << 16) \
|
#define GET_u4_le(PTR) (((JCF_u4)(PTR)[3] << 24) | ((JCF_u4)(PTR)[2] << 16) \
|
| ((JCF_u4)(PTR)[1] << 8) | ((JCF_u4)(PTR)[0]))
|
| ((JCF_u4)(PTR)[1] << 8) | ((JCF_u4)(PTR)[0]))
|
|
|
/* Make sure there are COUNT bytes readable. */
|
/* Make sure there are COUNT bytes readable. */
|
#define JCF_FILL(JCF, COUNT) \
|
#define JCF_FILL(JCF, COUNT) \
|
((JCF)->read_end-(JCF)->read_ptr >= (COUNT) ? 0 : (*(JCF)->filbuf)(JCF, COUNT))
|
((JCF)->read_end-(JCF)->read_ptr >= (COUNT) ? 0 : (*(JCF)->filbuf)(JCF, COUNT))
|
#define JCF_GETC(JCF) (JCF_FILL(JCF, 1) ? -1 : *(JCF)->read_ptr++)
|
#define JCF_GETC(JCF) (JCF_FILL(JCF, 1) ? -1 : *(JCF)->read_ptr++)
|
#define JCF_READ(JCF, BUFFER, N) \
|
#define JCF_READ(JCF, BUFFER, N) \
|
(memcpy (BUFFER, (JCF)->read_ptr, N), (JCF)->read_ptr += (N))
|
(memcpy (BUFFER, (JCF)->read_ptr, N), (JCF)->read_ptr += (N))
|
#define JCF_SKIP(JCF,N) ((JCF)->read_ptr += (N))
|
#define JCF_SKIP(JCF,N) ((JCF)->read_ptr += (N))
|
#define JCF_readu(JCF) (*(JCF)->read_ptr++)
|
#define JCF_readu(JCF) (*(JCF)->read_ptr++)
|
|
|
/* Reads an unsigned 2-byte integer in network (big-endian) byte-order
|
/* Reads an unsigned 2-byte integer in network (big-endian) byte-order
|
from JCF. Returns that integer.
|
from JCF. Returns that integer.
|
Does not check for EOF (make sure to call JCF_FILL before-hand). */
|
Does not check for EOF (make sure to call JCF_FILL before-hand). */
|
#define JCF_readu2(JCF) ((JCF)->read_ptr += 2, GET_u2 ((JCF)->read_ptr-2))
|
#define JCF_readu2(JCF) ((JCF)->read_ptr += 2, GET_u2 ((JCF)->read_ptr-2))
|
#define JCF_readu2_le(JCF) ((JCF)->read_ptr += 2, GET_u2_le((JCF)->read_ptr-2))
|
#define JCF_readu2_le(JCF) ((JCF)->read_ptr += 2, GET_u2_le((JCF)->read_ptr-2))
|
|
|
/* Like JCF_readu2, but read a 4-byte unsigned integer. */
|
/* Like JCF_readu2, but read a 4-byte unsigned integer. */
|
#define JCF_readu4(JCF) ((JCF)->read_ptr += 4, GET_u4 ((JCF)->read_ptr-4))
|
#define JCF_readu4(JCF) ((JCF)->read_ptr += 4, GET_u4 ((JCF)->read_ptr-4))
|
#define JCF_readu4_le(JCF) ((JCF)->read_ptr += 4, GET_u4_le((JCF)->read_ptr-4))
|
#define JCF_readu4_le(JCF) ((JCF)->read_ptr += 4, GET_u4_le((JCF)->read_ptr-4))
|
|
|
#define JCF_TELL(JCF) ((JCF)->read_ptr - (JCF)->buffer)
|
#define JCF_TELL(JCF) ((JCF)->read_ptr - (JCF)->buffer)
|
#define JCF_SEEK(JCF, POS) ((JCF)->read_ptr = (JCF)->buffer + (POS))
|
#define JCF_SEEK(JCF, POS) ((JCF)->read_ptr = (JCF)->buffer + (POS))
|
|
|
#define ACC_PUBLIC 0x0001
|
#define ACC_PUBLIC 0x0001
|
#define ACC_PRIVATE 0x0002
|
#define ACC_PRIVATE 0x0002
|
#define ACC_PROTECTED 0x0004
|
#define ACC_PROTECTED 0x0004
|
#define ACC_STATIC 0x0008
|
#define ACC_STATIC 0x0008
|
#define ACC_FINAL 0x0010
|
#define ACC_FINAL 0x0010
|
#define ACC_SYNCHRONIZED 0x0020
|
#define ACC_SYNCHRONIZED 0x0020
|
#define ACC_SUPER 0x0020
|
#define ACC_SUPER 0x0020
|
#define ACC_BRIDGE 0x0040
|
#define ACC_BRIDGE 0x0040
|
#define ACC_VOLATILE 0x0040
|
#define ACC_VOLATILE 0x0040
|
#define ACC_TRANSIENT 0x0080
|
#define ACC_TRANSIENT 0x0080
|
#define ACC_VARARGS 0x0080
|
#define ACC_VARARGS 0x0080
|
#define ACC_NATIVE 0x0100
|
#define ACC_NATIVE 0x0100
|
#define ACC_INTERFACE 0x0200
|
#define ACC_INTERFACE 0x0200
|
#define ACC_ABSTRACT 0x0400
|
#define ACC_ABSTRACT 0x0400
|
#define ACC_STRICT 0x0800
|
#define ACC_STRICT 0x0800
|
#define ACC_SYNTHETIC 0x01000
|
#define ACC_SYNTHETIC 0x01000
|
#define ACC_ANNOTATION 0x02000
|
#define ACC_ANNOTATION 0x02000
|
#define ACC_ENUM 0x04000
|
#define ACC_ENUM 0x04000
|
/* "Invisible" refers to Miranda methods inserted into an abstract
|
/* "Invisible" refers to Miranda methods inserted into an abstract
|
class. It is also used in the runtime. */
|
class. It is also used in the runtime. */
|
#define ACC_INVISIBLE 0x8000
|
#define ACC_INVISIBLE 0x8000
|
|
|
#define ACC_VISIBILITY (ACC_PUBLIC | ACC_PRIVATE | ACC_PROTECTED)
|
#define ACC_VISIBILITY (ACC_PUBLIC | ACC_PRIVATE | ACC_PROTECTED)
|
|
|
enum cpool_tag
|
enum cpool_tag
|
{
|
{
|
CONSTANT_Class = 7,
|
CONSTANT_Class = 7,
|
CONSTANT_Fieldref = 9,
|
CONSTANT_Fieldref = 9,
|
CONSTANT_Methodref = 10,
|
CONSTANT_Methodref = 10,
|
CONSTANT_InterfaceMethodref = 11,
|
CONSTANT_InterfaceMethodref = 11,
|
CONSTANT_String = 8,
|
CONSTANT_String = 8,
|
CONSTANT_Integer = 3,
|
CONSTANT_Integer = 3,
|
CONSTANT_Float = 4,
|
CONSTANT_Float = 4,
|
CONSTANT_Long = 5,
|
CONSTANT_Long = 5,
|
CONSTANT_Double = 6,
|
CONSTANT_Double = 6,
|
CONSTANT_NameAndType = 12,
|
CONSTANT_NameAndType = 12,
|
CONSTANT_Utf8 = 1,
|
CONSTANT_Utf8 = 1,
|
CONSTANT_Unicode = 2,
|
CONSTANT_Unicode = 2,
|
CONSTANT_None = 0
|
CONSTANT_None = 0
|
};
|
};
|
|
|
#define DEFAULT_CLASS_PATH "."
|
#define DEFAULT_CLASS_PATH "."
|
|
|
extern const char *find_class (const char *, int, JCF *);
|
extern const char *find_class (const char *, int, JCF *);
|
extern const char *find_classfile (char *, JCF*, const char *);
|
extern const char *find_classfile (char *, JCF*, const char *);
|
extern int jcf_filbuf_from_stdio (JCF *jcf, int count);
|
extern int jcf_filbuf_from_stdio (JCF *jcf, int count);
|
extern int jcf_unexpected_eof (JCF*, int) ATTRIBUTE_NORETURN;
|
extern int jcf_unexpected_eof (JCF*, int) ATTRIBUTE_NORETURN;
|
|
|
/* Extract a character from a Java-style Utf8 string.
|
/* Extract a character from a Java-style Utf8 string.
|
* PTR points to the current character.
|
* PTR points to the current character.
|
* LIMIT points to the end of the Utf8 string.
|
* LIMIT points to the end of the Utf8 string.
|
* PTR is incremented to point after the character that gets returned.
|
* PTR is incremented to point after the character that gets returned.
|
* On an error, -1 is returned. */
|
* On an error, -1 is returned. */
|
#define UTF8_GET(PTR, LIMIT) \
|
#define UTF8_GET(PTR, LIMIT) \
|
((PTR) >= (LIMIT) ? -1 \
|
((PTR) >= (LIMIT) ? -1 \
|
: *(PTR) < 128 ? *(PTR)++ \
|
: *(PTR) < 128 ? *(PTR)++ \
|
: (*(PTR)&0xE0) == 0xC0 && ((PTR)+=2)<=(LIMIT) && ((PTR)[-1]&0xC0) == 0x80 \
|
: (*(PTR)&0xE0) == 0xC0 && ((PTR)+=2)<=(LIMIT) && ((PTR)[-1]&0xC0) == 0x80 \
|
? (((PTR)[-2] & 0x1F) << 6) + ((PTR)[-1] & 0x3F) \
|
? (((PTR)[-2] & 0x1F) << 6) + ((PTR)[-1] & 0x3F) \
|
: (*(PTR) & 0xF0) == 0xE0 && ((PTR) += 3) <= (LIMIT) \
|
: (*(PTR) & 0xF0) == 0xE0 && ((PTR) += 3) <= (LIMIT) \
|
&& ((PTR)[-2] & 0xC0) == 0x80 && ((PTR)[-1] & 0xC0) == 0x80 \
|
&& ((PTR)[-2] & 0xC0) == 0x80 && ((PTR)[-1] & 0xC0) == 0x80 \
|
? (((PTR)[-3]&0x0F) << 12) + (((PTR)[-2]&0x3F) << 6) + ((PTR)[-1]&0x3F) \
|
? (((PTR)[-3]&0x0F) << 12) + (((PTR)[-2]&0x3F) << 6) + ((PTR)[-1]&0x3F) \
|
: ((PTR)++, -1))
|
: ((PTR)++, -1))
|
|
|
extern const char *jcf_write_base_directory;
|
extern const char *jcf_write_base_directory;
|
|
|
/* Debug macros, for the front end */
|
/* Debug macros, for the front end */
|
|
|
extern int quiet_flag;
|
extern int quiet_flag;
|
#ifdef VERBOSE_SKELETON
|
#ifdef VERBOSE_SKELETON
|
#undef SOURCE_FRONTEND_DEBUG
|
#undef SOURCE_FRONTEND_DEBUG
|
#define SOURCE_FRONTEND_DEBUG(X) \
|
#define SOURCE_FRONTEND_DEBUG(X) \
|
{if (!quiet_flag) {printf ("* "); printf X; putchar ('\n');} }
|
{if (!quiet_flag) {printf ("* "); printf X; putchar ('\n');} }
|
#else
|
#else
|
#define SOURCE_FRONTEND_DEBUG(X)
|
#define SOURCE_FRONTEND_DEBUG(X)
|
#endif
|
#endif
|
|
|
/* Declarations for dependency code. */
|
/* Declarations for dependency code. */
|
extern void jcf_dependency_reset (void);
|
extern void jcf_dependency_reset (void);
|
extern void jcf_dependency_set_target (const char *);
|
extern void jcf_dependency_set_target (const char *);
|
extern void jcf_dependency_add_target (const char *);
|
extern void jcf_dependency_add_target (const char *);
|
extern void jcf_dependency_set_dep_file (const char *);
|
extern void jcf_dependency_set_dep_file (const char *);
|
extern void jcf_dependency_add_file (const char *, int);
|
extern void jcf_dependency_add_file (const char *, int);
|
extern void jcf_dependency_write (void);
|
extern void jcf_dependency_write (void);
|
extern void jcf_dependency_init (int);
|
extern void jcf_dependency_init (int);
|
extern void jcf_dependency_print_dummies (void);
|
extern void jcf_dependency_print_dummies (void);
|
|
|
/* Declarations for path handling code. */
|
/* Declarations for path handling code. */
|
extern void jcf_path_init (void);
|
extern void jcf_path_init (void);
|
extern void jcf_path_classpath_arg (const char *);
|
extern void jcf_path_classpath_arg (const char *);
|
extern void jcf_path_bootclasspath_arg (const char *);
|
extern void jcf_path_bootclasspath_arg (const char *);
|
extern void jcf_path_extdirs_arg (const char *);
|
extern void jcf_path_extdirs_arg (const char *);
|
extern void jcf_path_include_arg (const char *);
|
extern void jcf_path_include_arg (const char *);
|
extern void jcf_path_seal (int);
|
extern void jcf_path_seal (int);
|
extern void *jcf_path_start (void);
|
extern void *jcf_path_start (void);
|
extern void *jcf_path_next (void *);
|
extern void *jcf_path_next (void *);
|
extern char *jcf_path_name (void *);
|
extern char *jcf_path_name (void *);
|
extern char *jcf_path_compute (const char *);
|
extern char *jcf_path_compute (const char *);
|
extern int jcf_path_is_zipfile (void *);
|
extern int jcf_path_is_zipfile (void *);
|
extern int jcf_path_is_system (void *);
|
extern int jcf_path_is_system (void *);
|
extern int jcf_path_max_len (void);
|
extern int jcf_path_max_len (void);
|
|
|
#endif /* ! GCC_JCF_H */
|
#endif /* ! GCC_JCF_H */
|
|
|