xeye_ atsu / Mbed 2 deprecated FRDM_RaVem_JVM

JVM test

Dependencies:   mbed

main.cpp@9:4ea7773ea2b0, 2013-09-07 (annotated)

Committer:
lynxeyed_atsu
Date:
Sat Sep 07 04:59:10 2013 +0000
Revision:
9:4ea7773ea2b0
Parent:
7:2a384a077520 
added if_icmp* mnemonics

Who changed what in which revision?

UserRevisionLine numberNew contents of line
lynxeyed_atsu 5:047542b65d00 1 #include <stdio.h>
lynxeyed_atsu 5:047542b65d00 2 #include <string.h>
lynxeyed_atsu 5:047542b65d00 3
lynxeyed_atsu 5:047542b65d00 4 #include "ravem.h"
chris 0:cf8a48b1fb23 5
lynxeyed_atsu 5:047542b65d00 6 ///* Main Program */
lynxeyed_atsu 5:047542b65d00 7 int main (void) {
lynxeyed_atsu 5:047542b65d00 8
lynxeyed_atsu 5:047542b65d00 9 hardware_init();
lynxeyed_atsu 5:047542b65d00 10 uart_init(9600);
lynxeyed_atsu 6:b9d0d96b052f 11 bc_init();
lynxeyed_atsu 5:047542b65d00 12 pool_init();
lynxeyed_atsu 5:047542b65d00 13
lynxeyed_atsu 5:047542b65d00 14 uart_print("LPC11U24 mbed JVM Start\r\n");
lynxeyed_atsu 5:047542b65d00 15 uart_print("please wait...\r\n\r\n");
chris 0:cf8a48b1fb23 16
lynxeyed_atsu 5:047542b65d00 17 int32_t thread_count = 0,lp,method_all_end;
lynxeyed_atsu 5:047542b65d00 18 // Initialize Operand Stack and local Register
lynxeyed_atsu 5:047542b65d00 19 class_st *p;
chris 1:eabc6f5b51d6 20
lynxeyed_atsu 5:047542b65d00 21 p = (class_st *)pool_alloc(sizeof(class_st) * 1);
lynxeyed_atsu 5:047542b65d00 22 if(p == NULL)uart_print("error!");
lynxeyed_atsu 5:047542b65d00 23 p[0] = seekCodeArrtibute(p[0], "main", 4); //main_attribute
lynxeyed_atsu 5:047542b65d00 24 p[0].field_mem_reg = NULL;
lynxeyed_atsu 5:047542b65d00 25 p[0].field_num = 0;
lynxeyed_atsu 5:047542b65d00 26 p[0].local_reg = (int *)pool_alloc(sizeof(int) * p[0].local_num);
lynxeyed_atsu 5:047542b65d00 27 p[0].op_stack_type = (int *)pool_alloc(sizeof(int) * p[0].stack_num);
lynxeyed_atsu 5:047542b65d00 28 p[0].op_stack = (int *)pool_alloc(sizeof(int) * p[0].stack_num);
lynxeyed_atsu 5:047542b65d00 29 p[0].op_stack_type[0] = 0;
lynxeyed_atsu 5:047542b65d00 30 p[0].threadCommand = Thread_Active;
lynxeyed_atsu 5:047542b65d00 31 p[0].myThreadNum = 0;
lynxeyed_atsu 5:047542b65d00 32
lynxeyed_atsu 5:047542b65d00 33
lynxeyed_atsu 5:047542b65d00 34 while(1){
lynxeyed_atsu 5:047542b65d00 35 for(lp = 0 ; lp < thread_count + 1 ;lp++){
lynxeyed_atsu 5:047542b65d00 36 if((p[lp].threadCommand == Thread_Active)||
lynxeyed_atsu 5:047542b65d00 37 (p[lp].threadCommand == Thread_inSleep)){
lynxeyed_atsu 5:047542b65d00 38 p[lp] = decodeVM(p[lp]);
lynxeyed_atsu 5:047542b65d00 39 }
lynxeyed_atsu 5:047542b65d00 40 }
lynxeyed_atsu 5:047542b65d00 41 switch(p[0].threadCommand){
lynxeyed_atsu 6:b9d0d96b052f 42 case Thread_getInitMethodWithStack:
lynxeyed_atsu 6:b9d0d96b052f 43 thread_count++;
lynxeyed_atsu 6:b9d0d96b052f 44
lynxeyed_atsu 6:b9d0d96b052f 45 p = (class_st *)pool_realloc((int *)p,sizeof(class_st)*(1 + thread_count));
lynxeyed_atsu 6:b9d0d96b052f 46 if(p == NULL)uart_print("error!");
lynxeyed_atsu 6:b9d0d96b052f 47 p[thread_count] = seekCodeArrtibute(p[thread_count], "<init>", 6); // init
lynxeyed_atsu 6:b9d0d96b052f 48 p[thread_count].field_mem_reg = NULL;
lynxeyed_atsu 6:b9d0d96b052f 49 p[thread_count].field_num = 0;
lynxeyed_atsu 6:b9d0d96b052f 50 p[thread_count].local_reg = (int *)pool_alloc(sizeof(int) * p[thread_count].local_num);
lynxeyed_atsu 6:b9d0d96b052f 51 p[thread_count].op_stack_type = (int *)pool_alloc(sizeof(int) * p[thread_count].stack_num);
lynxeyed_atsu 6:b9d0d96b052f 52 p[thread_count].op_stack = (int *)pool_alloc(sizeof(int) * p[thread_count].stack_num);
lynxeyed_atsu 6:b9d0d96b052f 53 p[thread_count].op_stack_type[0] = 0;
lynxeyed_atsu 6:b9d0d96b052f 54 p[thread_count].threadCommand = Thread_init;
lynxeyed_atsu 6:b9d0d96b052f 55
lynxeyed_atsu 6:b9d0d96b052f 56 // copy stack -> local variable
lynxeyed_atsu 6:b9d0d96b052f 57 for(lp = p[0].threadArg+1; lp != 0 ; lp--){
lynxeyed_atsu 6:b9d0d96b052f 58 p[thread_count].local_reg[lp] = getIntegerFromOperandStack(p[0]);
lynxeyed_atsu 6:b9d0d96b052f 59 }
lynxeyed_atsu 6:b9d0d96b052f 60
lynxeyed_atsu 6:b9d0d96b052f 61 while(p[thread_count].threadCommand != Thread_returned){
lynxeyed_atsu 6:b9d0d96b052f 62 p[thread_count] = decodeVM(p[thread_count]);
lynxeyed_atsu 6:b9d0d96b052f 63 }
lynxeyed_atsu 6:b9d0d96b052f 64
lynxeyed_atsu 6:b9d0d96b052f 65 p[thread_count].threadCommand = Thread_initIsDone;
lynxeyed_atsu 6:b9d0d96b052f 66 p[0].threadCommand = Thread_Active;
lynxeyed_atsu 6:b9d0d96b052f 67 break;
lynxeyed_atsu 6:b9d0d96b052f 68
lynxeyed_atsu 6:b9d0d96b052f 69 case Thread_getStartMethod:
lynxeyed_atsu 6:b9d0d96b052f 70 for(lp = 0 ; lp <= thread_count + 1 ; lp++){
lynxeyed_atsu 6:b9d0d96b052f 71 if(p[lp].threadCommand == Thread_initIsDone)break;
lynxeyed_atsu 6:b9d0d96b052f 72 }
lynxeyed_atsu 6:b9d0d96b052f 73 if(p[lp].threadCommand != Thread_initIsDone){
lynxeyed_atsu 5:047542b65d00 74 thread_count++;
lynxeyed_atsu 6:b9d0d96b052f 75 p = (class_st *)pool_realloc((int *)p,sizeof(class_st)*(1+thread_count));
lynxeyed_atsu 5:047542b65d00 76 if(p == NULL)uart_print("error!");
lynxeyed_atsu 6:b9d0d96b052f 77 lp = thread_count;
lynxeyed_atsu 5:047542b65d00 78
lynxeyed_atsu 5:047542b65d00 79 p[lp] = seekCodeArrtibute(p[lp], "run", 3); // run method(start() calls this method)
lynxeyed_atsu 6:b9d0d96b052f 80
lynxeyed_atsu 6:b9d0d96b052f 81 p[lp].local_reg = (int *)pool_alloc(sizeof(int) * p[lp].local_num);
lynxeyed_atsu 6:b9d0d96b052f 82 if(p[lp].local_reg == NULL)uart_print("error!");
lynxeyed_atsu 6:b9d0d96b052f 83 p[lp].op_stack_type = (int *)pool_alloc(sizeof(int) * p[lp].stack_num);
lynxeyed_atsu 6:b9d0d96b052f 84 if(p[lp].op_stack_type == NULL)uart_print("error!");
lynxeyed_atsu 6:b9d0d96b052f 85 p[lp].op_stack = (int *)pool_alloc( sizeof(int) * p[lp].stack_num);
lynxeyed_atsu 6:b9d0d96b052f 86 if(p[lp].op_stack == NULL)uart_print("error!");
lynxeyed_atsu 5:047542b65d00 87 p[lp].op_stack_type[0] = 0;
lynxeyed_atsu 5:047542b65d00 88 p[lp].threadCommand = Thread_Active;
lynxeyed_atsu 5:047542b65d00 89 p[lp].myThreadNum = lp;
lynxeyed_atsu 5:047542b65d00 90 p[0].threadCommand = Thread_Active;
lynxeyed_atsu 6:b9d0d96b052f 91 break;
lynxeyed_atsu 6:b9d0d96b052f 92 }
lynxeyed_atsu 6:b9d0d96b052f 93
lynxeyed_atsu 6:b9d0d96b052f 94 p[lp] = seekCodeArrtibute(p[lp], "run", 3); // run method(start() calls this method)
lynxeyed_atsu 6:b9d0d96b052f 95 if(p[lp].local_reg == NULL)uart_print("pointr error!\r\n");
lynxeyed_atsu 6:b9d0d96b052f 96 p[lp].local_reg = (int *)pool_realloc(p[lp].local_reg, sizeof(int) * p[lp].local_num);
lynxeyed_atsu 6:b9d0d96b052f 97 if(p[lp].local_reg == NULL)uart_print("pointr error!\r\n");
lynxeyed_atsu 6:b9d0d96b052f 98 p[lp].op_stack_type = (int *)pool_realloc(p[lp].op_stack_type,sizeof(int) * p[lp].stack_num);
lynxeyed_atsu 6:b9d0d96b052f 99 if(p[lp].op_stack_type == NULL)uart_print("pointr error!\r\n");
lynxeyed_atsu 6:b9d0d96b052f 100 p[lp].op_stack = (int *)pool_realloc(p[lp].op_stack, sizeof(int) * p[lp].stack_num);
lynxeyed_atsu 6:b9d0d96b052f 101 if(p[lp].op_stack == NULL)uart_print("pointr error!\r\n");
lynxeyed_atsu 6:b9d0d96b052f 102 p[lp].op_stack_type[0] = 0;
lynxeyed_atsu 6:b9d0d96b052f 103 p[lp].threadCommand = Thread_Active;
lynxeyed_atsu 6:b9d0d96b052f 104 p[lp].myThreadNum = lp;
lynxeyed_atsu 6:b9d0d96b052f 105 p[0].threadCommand = Thread_Active;
lynxeyed_atsu 6:b9d0d96b052f 106
lynxeyed_atsu 6:b9d0d96b052f 107 break;
chris 1:eabc6f5b51d6 108 }
lynxeyed_atsu 5:047542b65d00 109 method_all_end = 0;
lynxeyed_atsu 5:047542b65d00 110 for(lp = 0 ; lp < thread_count + 1 ; lp++){
lynxeyed_atsu 5:047542b65d00 111 if(p[lp].threadCommand != Thread_returned) method_all_end = method_all_end + 1;
lynxeyed_atsu 5:047542b65d00 112 }
lynxeyed_atsu 5:047542b65d00 113 if(method_all_end == 0) break;
chris 1:eabc6f5b51d6 114 }
lynxeyed_atsu 5:047542b65d00 115
lynxeyed_atsu 5:047542b65d00 116 // end
lynxeyed_atsu 5:047542b65d00 117 for(lp = 0; lp < thread_count + 1; lp++){
lynxeyed_atsu 5:047542b65d00 118 pool_free(p[lp].local_reg);
lynxeyed_atsu 5:047542b65d00 119 pool_free(p[lp].op_stack_type);
lynxeyed_atsu 5:047542b65d00 120 pool_free(p[lp].op_stack);
lynxeyed_atsu 5:047542b65d00 121 }
lynxeyed_atsu 6:b9d0d96b052f 122 pool_free((int *)&p);
lynxeyed_atsu 5:047542b65d00 123
lynxeyed_atsu 5:047542b65d00 124 p = NULL;
lynxeyed_atsu 5:047542b65d00 125
lynxeyed_atsu 5:047542b65d00 126 uart_print("\r\n\r\nJVM Fin\r\n");
lynxeyed_atsu 5:047542b65d00 127 while(1);
lynxeyed_atsu 5:047542b65d00 128
lynxeyed_atsu 5:047542b65d00 129 }