X-Git-Url: https://oss.titaniummirror.com/gitweb/?a=blobdiff_plain;f=gcc%2Fjava%2Fjcf.h;fp=gcc%2Fjava%2Fjcf.h;h=0000000000000000000000000000000000000000;hb=6fed43773c9b0ce596dca5686f37ac3fc0fa11c0;hp=e674bdb702218137c2be7b921f623e234ba98390;hpb=27b11d56b743098deb193d510b337ba22dc52e5c;p=msp430-gcc.git diff --git a/gcc/java/jcf.h b/gcc/java/jcf.h deleted file mode 100644 index e674bdb7..00000000 --- a/gcc/java/jcf.h +++ /dev/null @@ -1,294 +0,0 @@ -/* Utility macros to read Java(TM) .class files and byte codes. - - Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002 Free Software Foundation, Inc. - -This program is free software; you can redistribute it and/or modify -it under the terms of the GNU General Public License as published by -the Free Software Foundation; either version 2, or (at your option) -any later version. - -This program is distributed in the hope that it will be useful, -but WITHOUT ANY WARRANTY; without even the implied warranty of -MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -GNU General Public License for more details. - -You should have received a copy of the GNU General Public License -along with GNU CC; see the file COPYING. If not, write to -the Free Software Foundation, 59 Temple Place - Suite 330, -Boston, MA 02111-1307, USA. - -Java and all Java-based marks are trademarks or registered trademarks -of Sun Microsystems, Inc. in the United States and other countries. -The Free Software Foundation is independent of Sun Microsystems, Inc. */ - -/* Written by Per Bothner , February 1996. */ - -#ifndef GCC_JCF_H -#define GCC_JCF_H -#include "javaop.h" -#ifndef DEFUN -#if defined (__STDC__) -#define AND , -#define PTR void * -#define DEFUN(name, arglist, args) name(args) -#else -#define PTR char * -#define AND ; -#define DEFUN(name, arglist, args) name arglist args; -#endif -#endif /* !DEFUN */ - -#ifndef PARAMS -#if defined (__STDC__) -#define PARAMS (paramlist) paramlist -#else -#define PARAMS (paramlist) () -#endif -#endif - -#ifndef JCF_u4 -#define JCF_u4 unsigned long -#endif -#ifndef JCF_u2 -#define JCF_u2 unsigned short -#endif - -#define ALLOC xmalloc -#define REALLOC xrealloc -#ifndef FREE -#define FREE(PTR) free(PTR) -#endif - -#ifdef JCF_word -#define JCF_word JCF_u4 -#endif - -/* If we have both "scandir" and "alphasort", we can cache directory - listings to reduce the time taken to search the classpath. */ -#if defined(HAVE_SCANDIR) && defined(HAVE_ALPHASORT) -#define JCF_USE_SCANDIR 1 -#else -#define JCF_USE_SCANDIR 0 -#endif - -struct JCF; -typedef int (*jcf_filbuf_t) PARAMS ((struct JCF*, int needed)); - -typedef struct CPool { - /* Available number of elements in the constants array, before it - must be re-allocated. */ - int capacity; - - /* The constant_pool_count. */ - int count; - - uint8* tags; - - jword* data; -} CPool; - -struct ZipDirectory; - -/* JCF encapsulates the state of reading a Java Class File. */ - -typedef struct JCF { - unsigned char *buffer; - unsigned char *buffer_end; - unsigned char *read_ptr; - unsigned char *read_end; - int java_source : 1; - int right_zip : 1; - int finished : 1; - jcf_filbuf_t filbuf; - void *read_state; - const char *filename; - const char *classname; - struct ZipDirectory *zipd; /* Directory entry where it was found */ - JCF_u2 access_flags, this_class, super_class; - CPool cpool; -} JCF; -/*typedef JCF* JCF_FILE;*/ - -#define JCF_SEEN_IN_ZIP(JCF) ((JCF)->zipd != NULL) - -/* The CPOOL macros take a (pointer to a) CPool. - The JPOOL macros take a (pointer to a) JCF. - Some of the latter should perhaps be deprecated or removed. */ - -#define CPOOL_COUNT(CPOOL) ((CPOOL)->count) -#define JPOOL_SIZE(JCF) CPOOL_COUNT(&(JCF)->cpool) -#define JPOOL_TAG(JCF, INDEX) ((JCF)->cpool.tags[INDEX]) -/* The INDEX'th constant pool entry as a JCF_u4. */ -#define CPOOL_UINT(CPOOL, INDEX) ((CPOOL)->data[INDEX]) -#define JPOOL_UINT(JCF, INDEX) CPOOL_UINT(&(JCF)->cpool, INDEX) /*deprecated*/ -/* The first uint16 of the INDEX'th constant pool entry. */ -#define CPOOL_USHORT1(CPOOL, INDEX) ((CPOOL)->data[INDEX] & 0xFFFF) -#define JPOOL_USHORT1(JCF, INDEX) CPOOL_USHORT1(&(JCF)->cpool, INDEX) -/* The second uint16 of the INDEX'th constant pool entry. */ -#define CPOOL_USHORT2(CPOOL, INDEX) ((CPOOL)->data[INDEX] >> 16) -#define JPOOL_USHORT2(JCF, INDEX) CPOOL_USHORT2(&(JCF)->cpool, INDEX) -#define JPOOL_LONG(JCF, INDEX) \ - WORDS_TO_LONG (JPOOL_UINT(JCF, INDEX), JPOOL_UINT(JCF, (INDEX)+1)) -#define JPOOL_DOUBLE(JCF, INDEX) \ - WORDS_TO_DOUBLE (JPOOL_UINT(JCF, INDEX), JPOOL_UINT(JCF, (INDEX)+1)) -#ifndef JPOOL_UTF_LENGTH -#define JPOOL_UTF_LENGTH(JCF, INDEX) \ - GET_u2 ((JCF)->buffer+JPOOL_UINT(JCF, INDEX)) -#endif -#ifndef JPOOL_UTF_DATA -#define JPOOL_UTF_DATA(JCF, INDEX) \ - ((JCF)->buffer+JPOOL_UINT(JCF, INDEX)+2) -#endif -#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 CPOOL_INDEX_IN_RANGE(CPOOL, INDEX) \ - ((INDEX) > 0 && (INDEX) < CPOOL_COUNT(CPOOL)) - -#define CPOOL_FINISH(CPOOL) { \ - if ((CPOOL)->tags) FREE ((CPOOL)->tags); \ - if ((CPOOL)->data) FREE ((CPOOL)->data); } - -#define JCF_FINISH(JCF) { \ - CPOOL_FINISH(&(JCF)->cpool); \ - if ((JCF)->buffer) FREE ((JCF)->buffer); \ - if ((JCF)->filename) FREE ((char *) (JCF)->filename); \ - if ((JCF)->classname) FREE ((char *) (JCF)->classname); \ - (JCF)->finished = 1; } - -#define CPOOL_INIT(CPOOL) \ - ((CPOOL)->capacity = 0, (CPOOL)->count = 0, (CPOOL)->tags = 0, (CPOOL)->data = 0) - -#define CPOOL_REINIT(CPOOL) ((CPOOL)->count = 0) - -#define JCF_ZERO(JCF) \ - ((JCF)->buffer = (JCF)->buffer_end = (JCF)->read_ptr = (JCF)->read_end = 0,\ - (JCF)->read_state = 0, (JCF)->filename = (JCF)->classname = 0, \ - CPOOL_INIT(&(JCF)->cpool), (JCF)->java_source = 0, (JCF)->zipd = 0, \ - (JCF)->finished = 0) - -/* Given that PTR points to a 2-byte unsigned integer in network - (big-endian) byte-order, return that integer. */ -#define GET_u2(PTR) (((PTR)[0] << 8) | ((PTR)[1])) -/* Like GET_u2, but for little-endian format. */ -#define GET_u2_le(PTR) (((PTR)[1] << 8) | ((PTR)[0])) - -/* Given that PTR points to a 4-byte unsigned integer in network - (big-endian) byte-order, return that integer. */ -#define GET_u4(PTR) (((JCF_u4)(PTR)[0] << 24) | ((JCF_u4)(PTR)[1] << 16) \ - | ((JCF_u4)(PTR)[2] << 8) | ((JCF_u4)(PTR)[3])) -/* Like GET_u4, but for little-endian order. */ -#define GET_u4_le(PTR) (((JCF_u4)(PTR)[3] << 24) | ((JCF_u4)(PTR)[2] << 16) \ - | ((JCF_u4)(PTR)[1] << 8) | ((JCF_u4)(PTR)[0])) - -/* Make sure there are COUNT bytes readable. */ -#define JCF_FILL(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_READ(JCF, BUFFER, N) \ - (memcpy (BUFFER, (JCF)->read_ptr, N), (JCF)->read_ptr += (N)) -#define JCF_SKIP(JCF,N) ((JCF)->read_ptr += (N)) -#define JCF_readu(JCF) (*(JCF)->read_ptr++) - -/* Reads an unsigned 2-byte integer in network (big-endian) byte-order - from JCF. Returns that integer. - 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_le(JCF) ((JCF)->read_ptr += 2, GET_u2_le((JCF)->read_ptr-2)) - -/* 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_le(JCF) ((JCF)->read_ptr += 4, GET_u4_le((JCF)->read_ptr-4)) - -#define JCF_TELL(JCF) ((JCF)->read_ptr - (JCF)->buffer) -#define JCF_SEEK(JCF, POS) ((JCF)->read_ptr = (JCF)->buffer + (POS)) - -#define ACC_PUBLIC 0x0001 -#define ACC_PRIVATE 0x0002 -#define ACC_PROTECTED 0x0004 -#define ACC_STATIC 0x0008 -#define ACC_FINAL 0x0010 -#define ACC_SYNCHRONIZED 0x0020 -#define ACC_SUPER 0x0020 -#define ACC_VOLATILE 0x0040 -#define ACC_TRANSIENT 0x0080 -#define ACC_NATIVE 0x0100 -#define ACC_INTERFACE 0x0200 -#define ACC_ABSTRACT 0x0400 -#define ACC_STRICT 0x0800 - -#define ACC_VISIBILITY (ACC_PUBLIC | ACC_PRIVATE | ACC_PROTECTED) - -#define CONSTANT_Class 7 -#define CONSTANT_Fieldref 9 -#define CONSTANT_Methodref 10 -#define CONSTANT_InterfaceMethodref 11 -#define CONSTANT_String 8 -#define CONSTANT_Integer 3 -#define CONSTANT_Float 4 -#define CONSTANT_Long 5 -#define CONSTANT_Double 6 -#define CONSTANT_NameAndType 12 -#define CONSTANT_Utf8 1 -#define CONSTANT_Unicode 2 - -#define DEFAULT_CLASS_PATH "." - -extern const char *find_class PARAMS ((const char *, int, JCF*, int)); -extern const char *find_classfile PARAMS ((char *, JCF*, const char *)); -extern int jcf_filbuf_from_stdio PARAMS ((JCF *jcf, int count)); -extern int jcf_unexpected_eof PARAMS ((JCF*, int)) ATTRIBUTE_NORETURN; - -/* Extract a character from a Java-style Utf8 string. - * PTR points to the current character. - * LIMIT points to the end of the Utf8 string. - * PTR is incremented to point after the character that gets returned. - * On an error, -1 is returned. */ -#define UTF8_GET(PTR, LIMIT) \ - ((PTR) >= (LIMIT) ? -1 \ - : *(PTR) < 128 ? *(PTR)++ \ - : (*(PTR)&0xE0) == 0xC0 && ((PTR)+=2)<=(LIMIT) && ((PTR)[-1]&0xC0) == 0x80 \ - ? (((PTR)[-2] & 0x1F) << 6) + ((PTR)[-1] & 0x3F) \ - : (*(PTR) & 0xF0) == 0xE0 && ((PTR) += 3) <= (LIMIT) \ - && ((PTR)[-2] & 0xC0) == 0x80 && ((PTR)[-1] & 0xC0) == 0x80 \ - ? (((PTR)[-3]&0x0F) << 12) + (((PTR)[-2]&0x3F) << 6) + ((PTR)[-1]&0x3F) \ - : ((PTR)++, -1)) - -extern char *jcf_write_base_directory; - -/* Debug macros, for the front end */ - -extern int quiet_flag; -#ifdef VERBOSE_SKELETON -#undef SOURCE_FRONTEND_DEBUG -#define SOURCE_FRONTEND_DEBUG(X) \ - {if (!quiet_flag) {printf ("* "); printf X; putchar ('\n');} } -#else -#define SOURCE_FRONTEND_DEBUG(X) -#endif - -/* Declarations for dependency code. */ -extern void jcf_dependency_reset PARAMS ((void)); -extern void jcf_dependency_set_target PARAMS ((const char *)); -extern void jcf_dependency_add_target PARAMS ((const char *)); -extern void jcf_dependency_set_dep_file PARAMS ((const char *)); -extern void jcf_dependency_add_file PARAMS ((const char *, int)); -extern void jcf_dependency_write PARAMS ((void)); -extern void jcf_dependency_init PARAMS ((int)); -extern void jcf_dependency_print_dummies PARAMS ((void)); - -/* Declarations for path handling code. */ -extern void jcf_path_init PARAMS ((void)); -extern void jcf_path_classpath_arg PARAMS ((const char *)); -extern void jcf_path_bootclasspath_arg PARAMS ((const char *)); -extern void jcf_path_extdirs_arg PARAMS ((const char *)); -extern void jcf_path_include_arg PARAMS ((const char *)); -extern void jcf_path_seal PARAMS ((int)); -extern void *jcf_path_start PARAMS ((void)); -extern void *jcf_path_next PARAMS ((void *)); -extern char *jcf_path_name PARAMS ((void *)); -extern int jcf_path_is_zipfile PARAMS ((void *)); -extern int jcf_path_is_system PARAMS ((void *)); -extern int jcf_path_max_len PARAMS ((void)); - -#endif /* ! GCC_JCF_H */