home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 1998 February / VPR9802A.ISO / APP_DEMO / VC / MAIN.BIN / interpreter.h < prev    next >
C/C++ Source or Header  |  1997-10-27  |  20KB  |  635 lines
  1. /*
  2.  * @(#)interpreter.h    1.115 97/03/03
  3.  * 
  4.  * Copyright (c) 1995, 1996 Sun Microsystems, Inc. All Rights Reserved.
  5.  * 
  6.  * This software is the confidential and proprietary information of Sun
  7.  * Microsystems, Inc. ("Confidential Information").  You shall not
  8.  * disclose such Confidential Information and shall use it only in
  9.  * accordance with the terms of the license agreement you entered into
  10.  * with Sun.
  11.  * 
  12.  * SUN MAKES NO REPRESENTATIONS OR WARRANTIES ABOUT THE SUITABILITY OF THE
  13.  * SOFTWARE, EITHER EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE
  14.  * IMPLIED WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR
  15.  * PURPOSE, OR NON-INFRINGEMENT. SUN SHALL NOT BE LIABLE FOR ANY DAMAGES
  16.  * SUFFERED BY LICENSEE AS A RESULT OF USING, MODIFYING OR DISTRIBUTING
  17.  * THIS SOFTWARE OR ITS DERIVATIVES.
  18.  * 
  19.  * CopyrightVersion 1.1_beta
  20.  * 
  21.  */
  22.  
  23. /*
  24.  * Definitions for the interperter    6/27/91
  25.  */
  26.  
  27. #ifndef _INTERPRETER_H_
  28. #define _INTERPRETER_H_
  29.  
  30. #include <stdio.h>
  31. #include <stdlib.h>
  32. #include <string.h>
  33.  
  34. #include "bool.h"
  35. #include "config.h"
  36. #include "jni.h"
  37.  
  38. extern char *progname;
  39. extern bool_t debugging;
  40. extern bool_t verbose;
  41. extern bool_t verbosegc;
  42. extern bool_t noasyncgc;
  43. extern bool_t classgc;
  44.  
  45. extern ClassClass *classJavaLangClass;       /* class java/lang/Class */
  46. extern ClassClass *classJavaLangObject;       /* class java/lang/Object */
  47. extern ClassClass *classJavaLangString;       /* class java/lang/String */
  48.  
  49. extern ClassClass *classJavaLangThrowable;
  50. extern ClassClass *classJavaLangException;
  51. extern ClassClass *classJavaLangError;
  52. extern ClassClass *classJavaLangRuntimeException;
  53. extern ClassClass *classJavaLangThreadDeath;
  54.  
  55. extern ClassClass *interfaceJavaLangCloneable; /* class java/lang/Cloneable */
  56. extern ClassClass *interfaceJavaIoSerializable; /* class java/io/Serializable */
  57.  
  58. enum { VERIFY_NONE, VERIFY_REMOTE, VERIFY_ALL };
  59.  
  60. extern int verifyclasses;
  61.  
  62. #define FINALIZER_METHOD_NAME "finalize"
  63. #define FINALIZER_METHOD_SIGNATURE "()V"
  64.  
  65. #ifdef TRACING
  66.   extern int trace;
  67.   extern int tracem;
  68.   extern void trace_method(struct execenv*, struct methodblock*, int, int);
  69.   enum { TRACE_METHOD_ENTER, TRACE_METHOD_RETURN, TRACE_METHOD_NATIVE_RETURN };
  70. # define TRACE_METHOD(ee, mb, args_size, type) \
  71.       if (tracem) trace_method(ee, mb, args_size, type); else
  72.  
  73. #else
  74. # define trace  0
  75. # define tracem 0
  76. # define TRACE_METHOD(ee, mb, args_size, type) 
  77. #endif
  78.  
  79. extern char *opnames[];
  80.  
  81. /* Get a constant pool index, from a pc */
  82. #define GET_INDEX(ptr) (((int)((ptr)[0]) << 8) | (ptr)[1])
  83.  
  84. extern char *Object2CString(JHandle *);
  85.  
  86. #define METHOD_FLAG_BITS 5
  87. #define FLAG_MASK       ((1<<METHOD_FLAG_BITS)-1)  /* valid flag bits */
  88. #define METHOD_MASK     (~FLAG_MASK)  /* valid mtable ptr bits */
  89. #define LENGTH_MASK     METHOD_MASK
  90.  
  91. #define obj_flags(o) \
  92.     (((unsigned long) (o)->methods) & FLAG_MASK)
  93. #define obj_length(o)   \
  94.     (((unsigned long) (o)->methods) >> METHOD_FLAG_BITS)
  95.  
  96. #define mkatype(t,l) ((struct methodtable *) (((l) << METHOD_FLAG_BITS)|(t)))
  97. #define atype(m) ((m) & FLAG_MASK)
  98.  
  99.  
  100. #define obj_methodtable(obj) ((obj)->methods)
  101. #define obj_classblock(obj) ((obj)->methods->classdescriptor)
  102.  
  103. #define obj_array_methodtable(obj) \
  104.     ((obj_flags((obj)) == T_NORMAL_OBJECT) ? obj_methodtable((obj))      \
  105.                                            : cbMethodTable(classJavaLangObject))
  106. #define obj_array_classblock(obj) \
  107.     ((obj_flags((obj)) == T_NORMAL_OBJECT) ? (obj)->methods->classdescriptor \
  108.                                            : classJavaLangObject)
  109.  
  110. #define mt_slot(methodtable, slot) (methodtable)->methods[slot]
  111.  
  112. #define uobj_getslot(o, slot) (o)[slot]
  113. #define uobj_setslot(o, slot, v) (uobj_getslot(o, slot) = (v))
  114.  
  115. #define obj_getslot(o, slot) uobj_getslot(unhand(o), slot)
  116. #define obj_setslot(o, slot, v) (obj_getslot(o, slot) = (v))
  117.  
  118. #define obj_monitor(handlep) ((int) handlep)
  119.  
  120.  
  121. struct arrayinfo {
  122.     int index;
  123.     char sig;      /* type signature. */
  124.     char *name;
  125.     int factor;
  126. };
  127.  
  128. typedef union stack_item {
  129.     /* Non pointer items */
  130.     int            i;
  131.     float          f;
  132.     OBJECT         o;
  133.     /* Pointer items */
  134.     JHandle       *h;
  135.     void          *p;
  136.     unsigned char *addr;
  137. } stack_item;
  138.  
  139. struct execenv {
  140.     struct javastack  *initial_stack;
  141.     struct javaframe  *current_frame; 
  142.     JHandle           *thread;        /* vague type to avoid include files */
  143.     char              exceptionKind;
  144.     union {
  145.     JHandle          *exc;        /* holds exception object */
  146.     unsigned char *addr;        /* holds pc for stack overflow */
  147.     } exception;
  148.  
  149.     /* Stuff for the JNI: */
  150.     struct JNIEnv_    nativeInterface;
  151.  
  152.     /* Detecting class circularities */
  153.     struct seenclass {
  154.     ClassClass    *cb;
  155.     struct seenclass *next;
  156.     } seenclasses;
  157. };
  158.  
  159. typedef struct execenv ExecEnv;
  160.  
  161. #define PRIVILEGED_EE ((ExecEnv*)-1)
  162.  
  163. #define JAVASTACK_CHUNK_SIZE 2000
  164. struct javastack {
  165.     struct execenv  *execenv;        /* execenv we belong to */
  166.     struct javastack *prev;          /* previous stack of this execenv */
  167.     struct javastack *next;          /* next stack of this execenv */
  168.     stack_item      *end_data;      /* address of end of data */
  169.     unsigned int     stack_so_far;  /* total space used by this chunk and
  170.                      * all previous chunks. */
  171.     stack_item       data[JAVASTACK_CHUNK_SIZE];    /* actual data */
  172.  
  173. };
  174.  
  175. typedef struct javastack JavaStack;
  176.  
  177.  
  178. struct javaframe {
  179.     /* DANGER DANGER DANGER DANGER DANGER DANGER DANGER DANGER DANGER DANGER 
  180.      * N. B.the first two items in structure shouldn't be needed by function
  181.      * return or by the Garbage Collector, since they may be overwritten by
  182.      * dreturn, lreturn, etc.
  183.      */
  184.     cp_item_type       *constant_pool; /* constant_pool of this method */
  185.     unsigned char      *returnpc;      /* pc of next instruction */
  186.     /* REGNAD REGNAD REGNAD REGNAD REGNAD REGNAD REGNAD REGNAD REGNAD REGNAD */
  187.  
  188.     stack_item         *optop;           /* current top of stack */
  189.     stack_item         *vars;           /* pointer to this frame's vars */
  190.     struct javaframe   *prev;          /* previous java frame. */
  191.     struct javastack   *javastack;                      
  192.     unsigned char      *lastpc;           /* pc of last executed instruction */
  193.     struct methodblock *current_method;/* method currently executing */
  194.     JHandle            *monitor;       /* object locked by this method */
  195.     int                    mon_starttime; /* time this method began */
  196.     stack_item ostack[1];           /* start of this frame's stack */
  197. };
  198.  
  199. typedef struct javaframe JavaFrame; 
  200.  
  201.  
  202. /*
  203.  * Javaframe.exceptionKind is used to signal why the interpreter
  204.  * loop was exited.
  205.  */
  206. #define EXCKIND_NONE            0               /* return */
  207. #define EXCKIND_THROW        1        /* throw */
  208. #define EXCKIND_STKOVRFLW       2               /* stack overflow */
  209.  
  210. /*
  211.  * Be sure to use these macros to access the exception structure.  Do
  212.  * not access the fields directly.
  213.  */
  214. #define exceptionClear(ee)            \
  215.     ((ee)->exceptionKind = EXCKIND_NONE);
  216.  
  217. #define exceptionOccurred(ee)            \
  218.     ((ee)->exceptionKind != EXCKIND_NONE)
  219.  
  220. #define exceptionThrow(ee, obj)            \
  221.     (ee)->exceptionKind = EXCKIND_THROW;    \
  222.     (ee)->exception.exc = (obj);
  223.  
  224. /* Macro for handling specific kinds of exceptions */
  225. #define exceptionThrowSpecial(ee, obj, kind)    \
  226.     (ee)->exceptionKind = kind;            \
  227.     (ee)->exception.exc = (obj);
  228.  
  229.  
  230. extern long nbinclasses, sizebinclasses;
  231. extern ClassClass **binclasses;
  232.  
  233. /* stuff for dealing with handles */
  234. #define unhand(o) ((o)->obj)
  235.  
  236.  
  237. /* globals.c */
  238.  
  239. ClassClass** get_binclasses(void);
  240. ClassClass* get_classClass(void);
  241. ClassClass* get_classObject(void);
  242. long get_nbinclasses(void);
  243.  
  244. /* gc.c */
  245.  
  246. bool_t InitializeAlloc(long max, long min);
  247. HObject *AllocHandle(struct methodtable *, ClassObject *);
  248. extern struct arrayinfo arrayinfo[];
  249. extern int64_t TotalObjectMemory(void);
  250. extern int64_t FreeObjectMemory(void);
  251. extern int64_t TotalHandleMemory(void);
  252. extern int64_t FreeHandleMemory(void);
  253. extern int tracegc;
  254.  
  255. extern void gc(int async, unsigned int spaceRequested);
  256.  
  257.  
  258. /* interpreter.c */
  259.  
  260. /* SignalError() -- Instantiate an object of the specified class. 
  261.  * Indicate that that error occurred.
  262.  */
  263. extern bool_t UseLosslessQuickOpcodes;
  264. void SignalError(struct execenv *, char *, char *);
  265.  
  266. JavaStack *CreateNewJavaStack(ExecEnv *ee, JavaStack *previous_stack);
  267.  
  268. void InitializeExecEnv(ExecEnv *ee, JHandle *thread);
  269. void DeleteExecEnv(ExecEnv *ee);
  270. extern ExecEnv *DefaultExecEnv;
  271.  
  272.  
  273. HObject *execute_java_constructor(ExecEnv *,
  274.                  char *classname,
  275.                  ClassClass *cb,
  276.                  char *signature, ...);
  277. long execute_java_static_method(ExecEnv *, ClassClass *cb,
  278.                    char *method_name, char *signature, ...);
  279. long execute_java_dynamic_method(ExecEnv *, HObject *obj,
  280.                 char *method_name, char *signature, ...);
  281.      
  282. long do_execute_java_method(ExecEnv *ee, void *obj, 
  283.                char *method_name, char *signature, 
  284.                struct methodblock *mb,
  285.                bool_t isStaticCall, ...);
  286.  
  287. long do_execute_java_method_vararg(ExecEnv *ee, void *obj, 
  288.                    char *method_name, char *signature, 
  289.                    struct methodblock *mb,
  290.                    bool_t isStaticCall, va_list args, 
  291.                    long *highBits, bool_t shortFloats);
  292.  
  293. long now(void);
  294. bool_t isSpecialSuperCall(ClassClass *current_class, struct methodblock *mb);
  295.  
  296. void InitializeInterpreter(void);
  297. bool_t is_instance_of(JHandle * h, ClassClass *dcb, ExecEnv *ee);
  298. bool_t is_subclass_of(ClassClass *cb, ClassClass *dcb, ExecEnv *ee);
  299. bool_t array_is_instance_of_array_type(JHandle * h, ClassClass *cb, 
  300.                        ExecEnv *ee);
  301. bool_t ImplementsInterface(ClassClass *cb, ClassClass *icb, ExecEnv *ee);
  302. HObject *MultiArrayAlloc(int dimensions, ClassClass *, stack_item *sizes);
  303. bool_t ExecuteJava(unsigned char  *, ExecEnv *ee);
  304.  
  305. /*
  306.  * Called from ExecuteJava.
  307.  *    -1:   rewrite signalled an error
  308.  *     0:   rewrite went okay
  309.  *    +1:   opcode changed underneath us.  Redo
  310.  */
  311.  
  312. int quickFieldAccess( int opcode, unsigned char * pc, struct fieldblock *fb,
  313.             ExecEnv *ee );
  314. int quickStaticAccess( int opcode, unsigned char * pc, struct fieldblock *fb,
  315.             ExecEnv *ee );
  316. int quickInvocation( int opcode, unsigned char * pc, struct methodblock *mb,
  317.             ExecEnv *ee );
  318. void FixupQuickInvocation(unsigned char *pc, 
  319.               struct methodblock *currentMethod,
  320.               struct methodblock *targetMethod);
  321.  
  322. bool_t
  323. invokeInterfaceError(ExecEnv *ee, unsigned char *pc, 
  324.              ClassClass *cb, ClassClass *intf);
  325.  
  326. unsigned char *
  327. ProcedureFindThrowTag(ExecEnv *ee, 
  328.               JavaFrame *frame, JHandle *object, unsigned char *pc);
  329.  
  330. void *
  331. ResolveClassConstantFromPC(unsigned char *pc, unsigned char opcode, 
  332.                    cp_item_type *, struct execenv *ee, unsigned mask);
  333.  
  334.  
  335.  
  336. struct stat;
  337.  
  338. bool_t dynoLink(struct methodblock *);
  339. bool_t dynoLinkJNI(struct methodblock *);
  340. char *str2rd(char *);
  341. char *unicode2rd(unicode *, long);
  342.  
  343. /* classruntime.c */
  344. HArrayOfChar *MakeString(char *, long);
  345.  
  346. ClassClass *FindClass(struct execenv *, char *, bool_t resolve);
  347. ClassClass *FindStickySystemClass(struct execenv *, char *, bool_t resolve);
  348. ClassClass *FindClassFromClass(struct execenv *, char *, bool_t resolve, ClassClass *from);
  349. void RunStaticInitializers(ClassClass *cb);
  350. void InitializeInvoker(ClassClass *cb);
  351.  
  352. bool_t
  353. invokeJavaMethod(JHandle *o, struct methodblock *mb, int args_size, ExecEnv *ee);
  354. bool_t invokeSynchronizedJavaMethod(JHandle *o, struct methodblock *mb, 
  355.                     int args_size, ExecEnv *ee);
  356. bool_t invokeNativeMethod(JHandle *o, struct methodblock *mb, int args_size, 
  357.               ExecEnv *ee);
  358. bool_t invokeSynchronizedNativeMethod(JHandle *o, struct methodblock *mb, 
  359.                       int args_size, ExecEnv *ee);
  360. bool_t invokeJNINativeMethod(JHandle *o, struct methodblock *mb, int args_size, 
  361.                  ExecEnv *ee);
  362. bool_t invokeJNISynchronizedNativeMethod(JHandle *o, struct methodblock *mb, 
  363.                      int args_size, ExecEnv *ee);
  364. bool_t invokeLazyNativeMethod(JHandle *o, struct methodblock *mb, int args_size, 
  365.                   ExecEnv *ee);
  366. bool_t invokeAbstractMethod(JHandle *o, struct methodblock *mb, int args_size, 
  367.                 ExecEnv *ee);
  368. bool_t invokeCompiledMethod(JHandle *o, struct methodblock *mb, int args_size, 
  369.                 ExecEnv *ee);
  370.  
  371.  
  372. void LoadClassConstants(ClassClass *cb);
  373. bool_t ResolveClassStringConstant(ClassClass *, unsigned, struct execenv *);
  374. bool_t ResolveClassConstant(cp_item_type *, unsigned index, struct execenv *ee,
  375.                 unsigned mask);
  376. bool_t ResolveClassConstantFromClass(ClassClass *, unsigned index, 
  377.                      struct execenv *ee, unsigned mask);
  378.  
  379. void InitializeClassConstantResolver();
  380.  
  381. bool_t VerifyClassAccess(ClassClass *, ClassClass *, bool_t);
  382. bool_t VerifyFieldAccess(ClassClass *, ClassClass *, int, bool_t);
  383. bool_t IsSameClassPackage(ClassClass *class1, ClassClass *class2); 
  384.  
  385. char *GetClassConstantClassName(cp_item_type *constant_pool, int index);
  386. unsigned NameAndTypeToHash(char *name, char *type);
  387. HObject *newobject(ClassClass *cb, unsigned char *pc, struct execenv *ee);
  388.  
  389.  
  390. char *pc2string(unsigned char *pc, struct methodblock *mb, char *buf, char *limit);
  391.  
  392. JHandle *ArrayAlloc(int, int);
  393. JHandle *ObjAlloc(ClassClass *, long);
  394. int sizearray(int, int);
  395. extern char *remote_classname(JHandle *);
  396. extern JHandle *remote_clone(struct execenv *);
  397. extern long remote_cast(JHandle *, ClassClass *);
  398. int pc2lineno(struct methodblock *, unsigned int);
  399.  
  400. /* From verify_class.c */
  401. bool_t VerifyClass(ClassClass *cb);
  402. bool_t IsLegalClassname(char *name, bool_t allowArrayClass);
  403.  
  404. /* From verify_code.c */
  405. bool_t verify_class_codes(ClassClass *cb);
  406.  
  407.  
  408. /* from profiler.c */
  409. extern int java_monitor;
  410. void javamon(int i);
  411. void java_mon(struct methodblock *caller, struct methodblock *callee, int time);
  412. void java_mon_dump(void);
  413.  
  414. #ifdef JCOV
  415. #include "jcov.h"
  416. #endif /* JCOV */
  417.  
  418. /* from classloader.c */
  419. void FreeClass(ClassClass *cb);
  420. void AddBinClass(ClassClass * cb);
  421. void DelBinClass(ClassClass * cb);
  422. ClassClass *LoadClassLocally(char *name);
  423. bool_t createInternalClass(unsigned char *bytes, unsigned char *limit,
  424.                            ClassClass *cb, struct Hjava_lang_ClassLoader *,
  425.                             char *utfname, char **detail);
  426. ClassClass *createFakeArrayClass(char *name, int base_type, int depth, 
  427.                  ClassClass *inner_cb, 
  428.                  struct Hjava_lang_ClassLoader *);
  429. ClassClass *createPrimitiveClass(char *name, char sig, unsigned char typecode,
  430.     unsigned char slotsize, unsigned char elementsize);
  431. unsigned Signature2ArgsSize(char *method_signature);
  432.  
  433. /* from classresolver.c */
  434. char *InitializeClass(ClassClass * cb, char **detail);
  435. char *ResolveClass(ClassClass * cb, char **detail);
  436. ClassClass *FindClass(struct execenv *ee, char *name, bool_t resolve);
  437. ClassClass *FindClassFromClass(struct execenv *ee, char *name, 
  438.                    bool_t resolve, ClassClass *from);
  439. ClassClass *ClassLoaderFindClass(ExecEnv *ee, 
  440.                  struct Hjava_lang_ClassLoader *loader, 
  441.                  char *name, bool_t resolve);
  442.  
  443. int  makeslottable(ClassClass * clb);
  444. void lock_classes(void);
  445. void unlock_classes(void);
  446.  
  447. extern ClassClass *class_void;
  448. extern ClassClass *class_boolean;
  449. extern ClassClass *class_byte;
  450. extern ClassClass *class_char;
  451. extern ClassClass *class_short;
  452. extern ClassClass *class_int;
  453. extern ClassClass *class_long;
  454. extern ClassClass *class_float;
  455. extern ClassClass *class_double;
  456.  
  457. extern ClassClass *FindPrimitiveClass(char *);
  458.  
  459. /* from path_md.c */
  460. char **CLASSPATH(void);
  461.  
  462. /* from threadruntime.c */
  463. struct Hjava_lang_Thread *InitializeClassThread(ExecEnv *ee, char **errmsg);
  464. void InitializeMainThread(void);
  465. long *getclassvariable(ClassClass *cb, char *fname);
  466. struct Hjava_lang_Thread;
  467. char *thread_name(struct Hjava_lang_Thread *tid); 
  468.  
  469. void setThreadName(struct Hjava_lang_Thread *ht, HArrayOfChar *newName);
  470. HArrayOfChar *getThreadName(void);
  471.  
  472. /* from exception.c */
  473. struct Hjava_lang_Throwable;
  474. void fillInStackTrace(struct Hjava_lang_Throwable *handle, ExecEnv *ee);
  475.  
  476. /* from CompSupport.c */
  477. long CallInterpreted(register struct methodblock * mb, void *obj,...);
  478.  
  479. /* used to indicate of an object or remote or local */
  480. extern struct methodtable *remote_methodtable;
  481.  
  482. void unicode2str(unicode *, char *, long);
  483. unicode *str2unicode(char *, unicode *, long);
  484.  
  485. enum {
  486.     MangleMethodName_JDK_1,
  487.     MangleMethodName_JNI_SHORT,
  488.     MangleMethodName_JNI_LONG
  489. };
  490. void mangleMethodName(struct methodblock *mb, char *buffer, int buflen,
  491.               int mangleType);
  492.  
  493. enum { 
  494.     MangleUTF_Class, 
  495.     MangleUTF_Field, 
  496.     MangleUTF_FieldStub, 
  497.     MangleUTF_Signature,
  498.     MangleUTF_JNI
  499. };
  500. int mangleUTFString(char *name, char *buffer, int buflen, int mangleType);
  501.  
  502. /* string hash support */
  503. struct StrIDhash;
  504. unsigned short Str2ID(struct StrIDhash **, char *, void ***, int);
  505. char *ID2Str(struct StrIDhash *, unsigned short, void ***);
  506. void Str2IDFree(struct StrIDhash **);
  507. void Str2IDCallback(struct StrIDhash **hash_ptr, void (*)(char *, void *));
  508. ExecEnv *EE(void);
  509.  
  510. /* Miscellaneous functions in util.c */
  511. char *unicode2rd(unicode *s, long len);
  512. void out_of_memory(void);
  513. void prints(char *s);
  514. void printus(unicode *str, long len);
  515. int jio_snprintf(char *str, size_t count, const char *fmt, ...);
  516. int jio_vsnprintf(char *str, size_t count, const char *fmt, va_list args);
  517.  
  518. int jio_printf(const char *fmt, ...);
  519. int jio_fprintf(FILE *, const char *fmt, ...);
  520. int jio_vfprintf(FILE *, const char *fmt, va_list args);
  521.  
  522.  
  523. /* allows you to override panic & oom "functionality" */
  524. typedef void (*PanicHook)(const char* panicString);
  525. typedef void (*OutOfMemoryHook) ();
  526.  
  527. extern PanicHook panic_hook;
  528. extern OutOfMemoryHook out_of_memory_hook;
  529.  
  530. /* Stuff from compiler.c */
  531.  
  532. void InitializeForCompiler(ClassClass *cb);
  533. void CompilerFreeClass(ClassClass *cb);
  534. void CompilerCompileClass(ClassClass *cb);
  535. void ReadInCompiledCode(void *context, struct methodblock *mb, 
  536.             int attribute_length, 
  537.             unsigned long (*get1byte)(),
  538.             unsigned long (*get2bytes)(), 
  539.             unsigned long (*get4bytes)(), 
  540.             void (*getNbytes)());
  541.  
  542. bool_t PCinCompiledCode(unsigned char *pc, struct methodblock *mb);
  543. unsigned char *CompiledCodePC(JavaFrame *frame, struct methodblock *mb);
  544. JavaFrame *CompiledFramePrev(JavaFrame *frame, JavaFrame *buf);
  545.  
  546.  
  547. /* Stuff from simplify.c */
  548. bool_t MethodCallInline(unsigned char *pc, struct methodblock *sourceMethod,
  549.             struct methodblock *mb, unsigned char *result);
  550.  
  551. #define KEEP_POINTER_ALIVE(p) if ((p) == 0) EE()
  552. /* 
  553.  * BEGIN JNI STUFF: 
  554.  * Only the stuff used by the JNI implementation, but not by JNI 
  555.  * programmers. jni.h contains the types and function prototypes
  556.  * used by JNI programmers
  557.  */
  558.  
  559. int InitializeJNI();
  560.  
  561. void InitializeJNIRootFrame(ExecEnv *ee);
  562. void DeleteJNIRootFrame(ExecEnv *ee);
  563.  
  564. /*
  565.  * Reference tables
  566.  */
  567.  
  568. #define JNI_REF_COUNT_MASK 0x1fffffff
  569.  
  570. #define JNI_REF_TAG_MASK 0x60000000
  571.  
  572. #define JNI_REF_HANDLE_TAG 0x00000000
  573.  
  574. #define JNI_REF_FB_TAG 0x20000000
  575.  
  576. #define JNI_REF_MB_TAG 0x40000000
  577.  
  578. typedef struct JNIRefCell {
  579.     uint32_t refCount;
  580.     void *content;
  581. } JNIRefCell;
  582.  
  583. typedef struct JNIRefTable {
  584.     JNIRefCell *elements;
  585.     int base;
  586.     int top;
  587.     int size;
  588. } JNIRefTable;
  589.  
  590. extern jref jni_AddRefCell(JNIRefTable *table, void *entry, int kind);
  591. extern JNIRefTable globalRefTable;
  592.  
  593. /*
  594.  * JNIEnv <-> ExecEnv conversion
  595.  */
  596.  
  597. #define JNIEnv2EE(env) \
  598.     ((ExecEnv*)((char*)(env) - offsetof(ExecEnv, nativeInterface)))
  599.  
  600. #define EE2JNIEnv(ee) ((JNIEnv *)(&(ee)->nativeInterface))
  601.  
  602. /*
  603.  * References
  604.  * The local reference table is stored in field reserved1.
  605.  */
  606.  
  607. #define JNIEnvGetLocalRefs(env) \
  608.     ((JNIRefTable *)(((struct JNIEnv_ *)(env))->reserved1))
  609.  
  610. #define MkRefLocal(env, jobj, tag) \
  611.     ((jref)(jni_AddRefCell(JNIEnvGetLocalRefs(env), (void *)(jobj), tag)))
  612.  
  613. #define DeRef(env, ref) \
  614.     ((int)(ref) > 0 ? \
  615.          JNIEnvGetLocalRefs(env)->elements[(int)(ref) - 1].content \
  616.        : ((ref) ? \
  617.               globalRefTable.elements[-((int)(ref)) - 1].content \
  618.             : 0))
  619.  
  620. /* 
  621.  * JavaVM <-> main EE conversion
  622.  * The main EE is stored in field reserved0.
  623.  */
  624. #define JavaVMGetEE(vm) ((ExecEnv *)(((struct JavaVM_ *)vm)->reserved0))
  625.  
  626. /* used in java_main */
  627. struct methodblock *
  628. JNI_FindMainMethod(ClassClass *cb, char **error_message_p);
  629. /*
  630.  * END JNI STUFF
  631.  */
  632.  
  633. #endif /* ! _INTERPRETER_H_ */
  634.  
  635.