- Calling the class loader
- Running the main method
- $Id: cacao.c 895 2004-01-19 13:53:43Z edwin $
+ $Id: cacao.c 1009 2004-03-31 22:44:07Z edwin $
*/
bool verbose = false;
bool compileall = false;
bool runverbose = false; /* trace all method invocation */
+bool verboseexception = false; /* trace all method invocation */
bool collectverbose = false;
bool loadverbose = false;
bool opt_verify = true; /* true if classfiles should be verified */
-
+char mainString[256];
static classinfo *topclass;
-#ifndef USE_THREADS
+#if defined(USE_THREADS) && !defined(NATIVE_THREADS)
void **stackbottom = 0;
#endif
#define OPT_VERBOSETC 29
#define OPT_NOVERIFY 30
#define OPT_LIBERALUTF 31
-
+#define OPT_VERBOSEEXCEPTION 32
struct {char *name; bool arg; int value;} opts[] = {
{"classpath", true, OPT_CLASSPATH},
{"verbose", false, OPT_VERBOSE},
{"verbosegc", false, OPT_VERBOSEGC},
{"verbosecall", false, OPT_VERBOSECALL},
+ {"verboseexception", false, OPT_VERBOSEEXCEPTION},
#ifdef TYPECHECK_VERBOSE
{"verbosetc", false, OPT_VERBOSETC},
#endif
printf(" -verbose ............. write more information\n");
printf(" -verbosegc ........... write message for each GC\n");
printf(" -verbosecall ......... write message for each call\n");
+ printf(" -verboseexception .... write message for each step of stack unwinding\n");
#ifdef TYPECHECK_VERBOSE
printf(" -verbosetc ........... write debug messages while typechecking\n");
#endif
s8 runtime = totaltime - loadingtime - compilingtime;
char logtext[MAXLOGTEXT];
-#if defined(__I386__)
+#if defined(__I386__) || defined(__POWERPC__)
sprintf(logtext, "Time for loading classes: %lld secs, %lld millis",
#else
sprintf(logtext, "Time for loading classes: %ld secs, %ld millis",
loadingtime / 1000000, (loadingtime % 1000000) / 1000);
log_text(logtext);
-#if defined(__I386__)
+#if defined(__I386__) || defined(__POWERPC__)
sprintf(logtext, "Time for compiling code: %lld secs, %lld millis",
#else
sprintf(logtext, "Time for compiling code: %ld secs, %ld millis",
compilingtime / 1000000, (compilingtime % 1000000) / 1000);
log_text(logtext);
-#if defined(__I386__)
+#if defined(__I386__) || defined(__POWERPC__)
sprintf(logtext, "Time for running program: %lld secs, %lld millis",
#else
sprintf(logtext, "Time for running program: %ld secs, %ld millis",
runtime / 1000000, (runtime % 1000000) / 1000);
log_text(logtext);
-#if defined(__I386__)
+#if defined(__I386__) || defined(__POWERPC__)
sprintf(logtext, "Total time: %lld secs, %lld millis",
#else
sprintf(logtext, "Total time: %ld secs, %ld millis",
if (showconstantpool) class_showconstantpool(topclass);
if (showutf) utf_show();
-#ifdef USE_THREADS
+#if defined(USE_THREADS) && !defined(NATIVE_THREADS)
clear_thread_flags(); /* restores standard file descriptor
flags */
#endif
/********** interne (nur fuer main relevante Optionen) **************/
char logfilename[200] = "";
- u4 heapsize = 64000000;
+ u4 heapmaxsize = 64000000;
u4 heapstartsize = 200000;
char classpath[500] = ".";
bool startit = true;
char *specificmethodname = NULL;
char *specificsignature = NULL;
-#ifndef USE_THREADS
+#if defined(USE_THREADS) && !defined(NATIVE_THREADS)
stackbottom = &dummy;
#endif
}
else j = atoi(opt_arg);
- if (i == OPT_MX) heapsize = j;
+ if (i == OPT_MX) heapmaxsize = j;
else heapstartsize = j;
break;
compileverbose = true;
break;
+ case OPT_VERBOSEEXCEPTION:
+ verboseexception = true;
+ break;
+
case OPT_VERBOSEGC:
collectverbose = true;
break;
exit(10);
}
+ cp = argv[opt_ind++];
+ for (i = strlen(cp) - 1; i >= 0; i--) { /* Transform dots into slashes */
+ if (cp[i] == '.') cp[i] = '/'; /* in the class name */
+ }
+
+ strcpy(mainString,cp);
- /**************************** Program start *****************************/
+ /**************************** Program start *****************************/
log_init(logfilename);
if (verbose) {
log_text("CACAO started -------------------------------------------------------");
}
+ /* initalize the gc heap */
+ heap_init(heapmaxsize, heapstartsize);
+
native_setclasspath(classpath);
tables_init();
suck_init(classpath);
- heap_init(heapsize, heapstartsize, &dummy);
-
jit_init();
+#if defined(USE_THREADS) && defined(NATIVE_THREADS)
+ initThreadsEarly();
+#endif
+
loader_init((u1 *) &dummy);
native_loadclasses();
+ /* initialize the garbage collector */
+ gc_init();
+
+#if defined(USE_THREADS)
+ initThreads((u1*) &dummy);
+#endif
/*********************** Load JAVA classes ***************************/
- cp = argv[opt_ind++];
- for (i = strlen(cp) - 1; i >= 0; i--) { /* Transform dots into slashes */
- if (cp[i] == '.') cp[i] = '/'; /* in the class name */
- }
-
/*printf("-------------------->%s\n",cp);*/
topclass = loader_load(utf_new_char(cp));
/*class_showmethods(topclass); */
- if (*exceptionptr != 0) {
- printf("Exception in thread \"main\" ");
- utf_display((*exceptionptr)->vftbl->class->name);
- printf(": ");
- utf_display(javastring_toutf(((java_lang_Throwable *) *exceptionptr)->detailMessage, false));
- printf("\n");
-
- *exceptionptr = 0;
- }
-
- if (topclass == 0) {
- /* should we print out something? we already have the exception */
- exit(1);
+ if (*exceptionptr) {
+ throw_exception_exit();
}
/* initialize the garbage collector */
gc_init();
-#ifdef USE_THREADS
+#if defined(USE_THREADS) && !defined(NATIVE_THREADS)
initThreads((u1*) &dummy);
#endif
/* heap_addreference((void**) &a); */
- mainmethod = class_findmethod(topclass,
+ mainmethod = class_resolveclassmethod(topclass,
utf_new_char("main"),
- utf_new_char("([Ljava/lang/String;)V")
+ utf_new_char("([Ljava/lang/String;)V"),
+ topclass,
+ true
);
/* there is no main method or it isn't static */
#endif
/*class_showmethods(currentThread->group->header.vftbl->class); */
+ *threadrootmethod = mainmethod;
+
/* here we go... */
asm_calljavafunction(mainmethod, a, NULL, NULL, NULL);
if (*exceptionptr) {
- printf("Exception in thread \"main\" ");
- utf_display((*exceptionptr)->vftbl->class->name);
+ methodinfo *main_unhandled_print =
+ class_resolvemethod_approx((*exceptionptr)->vftbl->class,
+ utf_new_char("printStackTrace"),
+ utf_new_char("()V"));
- /* do we have a detail message? */
- if (((java_lang_Throwable *) *exceptionptr)->detailMessage) {
- printf(": ");
- utf_display(javastring_toutf(((java_lang_Throwable *) *exceptionptr)->detailMessage, false));
+ if (main_unhandled_print) {
+ java_objectheader *exo = *exceptionptr;
+ *exceptionptr = NULL;
+ asm_calljavafunction(main_unhandled_print, exo, NULL, NULL, NULL);
+
+ } else {
+ java_lang_String *msg;
+
+ printf("Exception in thread \"main\" ");
+ utf_display_classname((*exceptionptr)->vftbl->class->name);
+
+ /* do we have a detail message? */
+ msg = ((java_lang_Throwable *) *exceptionptr)->detailMessage;
+ if (msg) {
+ printf(": ");
+ utf_display(javastring_toutf(msg, false));
+ }
+ printf("\n");
}
- printf("\n");
}
-#ifdef USE_THREADS
+#if defined(USE_THREADS)
+#if defined(NATIVE_THREADS)
+ joinAllThreads();
+#else
killThread(currentThread);
-#endif
fprintf(stderr, "still here\n");
+#endif
+#endif
+ exit(0);
}
/************* If requested, compile all methods ********************/