bool express_calcu(string express) { trim(express); if (execute_calculation_express(express)) { copy_variant(JAVASCRIPT_VARIANT_KEYNAME_CALCULATION_RESULT,JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT); return true; } else if (execute_function_call(express)) { copy_variant(JAVASCRIPT_VARIANT_KEYNAME_CALCULATION_RESULT,JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT); return true; }/* else if (execute_calculation_term(express)) { // WARNING ,it will crash because of STL lib .. copy_variant(JAVASCRIPT_VARIANT_KEYNAME_CALCULATION_RESULT,JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT); return true; }*/ express_type express_type_=get_express_type(express); if (EXPRESSION_UNKNOW!=express_type_) { if (EXPRESSION_NUMBER_DECIMAL==express_type_) { set_variant(JAVASCRIPT_VARIANT_KEYNAME_CALCULATION_RESULT,(void*)atoi(express.c_str()),NUMBER); } else if (EXPRESSION_NUMBER_HEX==express_type_) { set_variant(JAVASCRIPT_VARIANT_KEYNAME_CALCULATION_RESULT,(void*)hex_string_to_number(express),NUMBER); } else if (EXPRESSION_STRING==express_type_) { set_variant(JAVASCRIPT_VARIANT_KEYNAME_CALCULATION_RESULT,(void*)(express.substr(1,express.length()-2)).c_str(),STRING); } else if (EXPRESSION_ARRAY==express_type_) { string variant_name(express.substr(0,express.find('['))); express_calcu(express.substr(express.find('[')+1,express.find(']')-express.find('[')-1)); unsigned long array_index=0; support_javascript_variant_type array_type=NONE; get_variant(JAVASCRIPT_VARIANT_KEYNAME_CALCULATION_RESULT,(void*)&array_index,&array_type); if (NUMBER!=array_index) return false; get_variant_array(variant_name,array_index,&array_index,&array_type); set_variant(JAVASCRIPT_VARIANT_KEYNAME_CALCULATION_RESULT,(void*)array_index,array_type); } return true; } return false; }
void read_argument(arg_t* arg) { assert(arg != NULL); int as_value = 0; unsigned int t1 = 0; variant_t v1; unsigned int t2 = 0; init_variant(&v1); read_token(); if (token == LEFT_BRAKET_TOKEN) { as_value = 1; read_token(); } else { as_value = 0; } if (is_value_token(token)) { t1 = token; copy_variant(&v1, &value); } else { fprintf(stderr, "%s:%d: error: Expected identifier or integer but got %s.\n", get_scan_file(), get_scan_line(), get_token_name(token)); result = -1; return; } if (next_token == PLUS_TOKEN) { read_token(); assert(token == PLUS_TOKEN); read_token(); if (is_value_token(token)) { t2 = token; } else { fprintf(stderr, "%s:%d: error: Expected identifier or integer but got %s.\n", get_scan_file(), get_scan_line(), get_token_name(token)); result = -1; return; } } if (as_value == 1) { read_token(); if (token != RIGHT_BRAKET_TOKEN) { fprintf(stderr, "%s:%d: error: Missmatched braket.\n", get_scan_file(), get_scan_line()); result = -1; return; } } /* 0x00-0x07: register (A, B, C, X, Y, Z, I or J, in that order) 0x08-0x0f: [register] 0x10-0x17: [next word + register] 0x18: POP / [SP++] 0x19: PEEK / [SP] 0x1a: PUSH / [--SP] 0x1b: SP 0x1c: PC 0x1d: O 0x1e: [next word] 0x1f: next word (literal) 0x20-0x3f: literal value 0x00-0x1f (literal) */ if (is_symbolic(t1)) { switch (t1) { case A_TOKEN: if (as_value) arg->value = 0x08; else arg->value = 0x00; break; case B_TOKEN: if (as_value) arg->value = 0x09; else arg->value = 0x01; break; case C_TOKEN: if (as_value) arg->value = 0x0A; else arg->value = 0x02; break; case X_TOKEN: if (as_value) arg->value = 0x0B; else arg->value = 0x03; break; case Y_TOKEN: if (as_value) arg->value = 0x0C; else arg->value = 0x04; break; case Z_TOKEN: if (as_value) arg->value = 0x0D; else arg->value = 0x05; break; case I_TOKEN: if (as_value) arg->value = 0x0E; else arg->value = 0x06; break; case J_TOKEN: if (as_value) arg->value = 0x0F; else arg->value = 0x07; break; case POP_TOKEN: arg->value = 0x18; break; case PEEK_TOKEN: arg->value = 0x19; break; case PUSH_TOKEN: arg->value = 0x1A; break; case SP_TOKEN: arg->value = 0x1B; break; case PC_TOKEN: arg->value = 0x1C; break; case O_TOKEN: arg->value = 0x1D; break; } /* TODO validate that there is no offset */ } else if (t1 == IDENTIFIER_TOKEN) { // for jumps we encode alwas next word // this is since we can't resolve the target at this point arg->value = 0x1F; copy_variant(&arg->extra, &v1); /* TODO validate that there is no offset */ } else { assert(t1 == INTEGER_TOKEN); assert(v1.type == UINT_TYPE); if (as_value && t2 == 0) { arg->value = 0x1E; copy_variant(&arg->extra, &v1); } if (!as_value && t2 == 0) { if (v1.ui <= 0x1F) { arg->value = 0x20 + v1.ui; } else { arg->value = 0x1F; copy_variant(&arg->extra, &v1); } } if (t2 != 0) { assert(as_value == 1); switch (t2) { case A_TOKEN: arg->value = 0x10; break; case B_TOKEN: arg->value = 0x11; break; case C_TOKEN: arg->value = 0x12; break; case X_TOKEN: arg->value = 0x13; break; case Y_TOKEN: arg->value = 0x14; break; case Z_TOKEN: arg->value = 0x15; break; case I_TOKEN: arg->value = 0x16; break; case J_TOKEN: arg->value = 0x17; break; default: assert(0 && "should never happen"); break; } copy_variant(&arg->extra, &v1); } } }
static bool execute_calculation_express(string& express) { long next_calculation_flag=get_next_calculation_flag(express); if ('+'==express[next_calculation_flag]) { string left_express(express.substr(0,next_calculation_flag)); trim(left_express); express_type left_express_type=get_express_type(left_express); unsigned long left_express_calcu_value=0; support_javascript_variant_type left_express_calcu_value_type=NONE; if (EXPRESSION_UNKNOW==left_express_type) // 12kk4+321 or +321 return false; if (EXPRESSION_VARIANT==left_express_type) { get_variant(left_express,(void*)&left_express_calcu_value,&left_express_calcu_value_type); } else if (EXPRESSION_EXPRESS==left_express_type) { // (123+321)+1 if (!execute_calculation_express(left_express)) return false; get_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)&left_express_calcu_value,&left_express_calcu_value_type); } else if (EXPRESSION_STRING==left_express_type) { // 'AAA'+'A' left_express=left_express.substr(1,left_express.length()-2); } if (NUMBER==left_express_calcu_value_type || EXPRESSION_NUMBER_DECIMAL==left_express_type || EXPRESSION_NUMBER_HEX==left_express_type) { left_express_type=EXPRESSION_NUMBER_DECIMAL; } else { left_express_type=EXPRESSION_STRING; } string right_express(express.substr(next_calculation_flag+1)); trim(right_express); express_type right_express_type=get_express_type(right_express); unsigned long right_express_calcu_value=0; support_javascript_variant_type right_express_calcu_value_type=NONE; if (EXPRESSION_UNKNOW==right_express_type) // 321+12kk4 or 321+ return false; if (EXPRESSION_VARIANT==right_express_type) { get_variant(right_express,(void*)&right_express_calcu_value,&right_express_calcu_value_type); } else if (EXPRESSION_EXPRESS==right_express_type) { // 123+123+123 if (!execute_calculation_express(right_express)) return false; get_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)&right_express_calcu_value,&right_express_calcu_value_type); } else if (EXPRESSION_STRING==right_express_type) { // 'AAA'+'A' right_express=right_express.substr(1,right_express.length()-2); } if (NUMBER==right_express_calcu_value_type || EXPRESSION_NUMBER_DECIMAL==right_express_type || EXPRESSION_NUMBER_HEX==right_express_type) { right_express_type=EXPRESSION_NUMBER_DECIMAL; } else { right_express_type=EXPRESSION_STRING; } // 123+123 or (123+321)+123+123 or '123'+'123' or '123'+123 if (EXPRESSION_STRING==left_express_type && EXPRESSION_STRING!=right_express_type) { if (NONE!=right_express_calcu_value_type) { string connect_string(left_express); connect_string+=right_express; set_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)connect_string.c_str(),STRING); } else { char conver_buffer[0x20]={0}; sprintf(conver_buffer,"%d",right_express_calcu_value); string connect_string(left_express); connect_string+=conver_buffer; set_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)connect_string.c_str(),STRING); } } else if (EXPRESSION_STRING!=left_express_type && EXPRESSION_STRING==right_express_type) { if (NONE==left_express_calcu_value_type) { string connect_string(left_express); connect_string+=right_express; set_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)connect_string.c_str(),STRING); } else { char conver_buffer[0x20]={0}; sprintf(conver_buffer,"%d",left_express_calcu_value); string connect_string(conver_buffer); connect_string+=right_express; set_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)connect_string.c_str(),STRING); } } else if (EXPRESSION_STRING==left_express_type && EXPRESSION_STRING==right_express_type) { // alloc in heap .. //string connect_string; unsigned long connect_string_length=0; if (NONE!=left_express_calcu_value_type) connect_string_length=strlen((char*)left_express_calcu_value); else connect_string_length=left_express.length(); if (NONE!=right_express_calcu_value_type) connect_string_length+=strlen((char*)right_express_calcu_value); else connect_string_length+=right_express.length(); char* connect_string=(char*)alloc_memory(connect_string_length+1); unsigned long copy_offset=0; if (NONE!=left_express_calcu_value_type) { copy_offset=strlen((char*)left_express_calcu_value); memcpy(connect_string,(const void*)left_express_calcu_value,copy_offset); } else { copy_offset=left_express.length(); memcpy(connect_string,left_express.c_str(),copy_offset); } if (NONE!=right_express_calcu_value_type) memcpy((void*)((unsigned long)connect_string+copy_offset),(const void*)right_express_calcu_value,strlen((char*)right_express_calcu_value)); else memcpy((void*)((unsigned long)connect_string+copy_offset),right_express.c_str(),right_express.length()); set_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)connect_string,STRING); } else { long left_express_value=0; if (NONE!=left_express_calcu_value_type) { left_express_value=left_express_calcu_value; } else { if (EXPRESSION_NUMBER_HEX==left_express_calcu_value_type) left_express_value=hex_string_to_number(left_express); else left_express_value=atoi(left_express.c_str()); } long right_express_value=0; if (NONE!=right_express_calcu_value_type) { right_express_value=right_express_calcu_value; } else { if (EXPRESSION_NUMBER_HEX==right_express_calcu_value_type) right_express_value=hex_string_to_number(right_express); else right_express_value=atoi(right_express.c_str()); } left_express_value+=right_express_value; set_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)left_express_value,NUMBER); } return true; } else if ('-'==express[next_calculation_flag]) { string left_express(express.substr(0,next_calculation_flag)); trim(left_express); express_type left_express_type=get_express_type(left_express); unsigned long left_express_calcu_value=0; support_javascript_variant_type left_express_calcu_value_type=NONE; if (EXPRESSION_UNKNOW==left_express_type) return false; if (EXPRESSION_EXPRESS==left_express_type || EXPRESSION_VARIANT==left_express_type) { if (!execute_calculation_express(left_express)) return false; get_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)&left_express_calcu_value,&left_express_calcu_value_type); if (NUMBER==left_express_calcu_value_type) left_express_type=EXPRESSION_NUMBER_DECIMAL; } else if (EXPRESSION_NUMBER_HEX==left_express_type) { left_express_calcu_value=hex_string_to_number(left_express); } else if (EXPRESSION_NUMBER_DECIMAL==left_express_type) { left_express_calcu_value=atoi(left_express.c_str()); } string right_express(express.substr(next_calculation_flag+1)); trim(right_express); express_type right_express_type=get_express_type(right_express); unsigned long right_express_calcu_value=0; support_javascript_variant_type right_express_calcu_value_type=NONE; if (EXPRESSION_UNKNOW==right_express_type) return false; if (EXPRESSION_EXPRESS==right_express_type || EXPRESSION_VARIANT==right_express_type) { if (!execute_calculation_express(right_express)) return false; get_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)&right_express_calcu_value,&right_express_calcu_value_type); if (NUMBER==right_express_calcu_value_type) right_express_type=EXPRESSION_NUMBER_DECIMAL; } else if (EXPRESSION_NUMBER_HEX==right_express_type) { right_express_calcu_value=hex_string_to_number(right_express); } else if (EXPRESSION_NUMBER_DECIMAL==right_express_type) { right_express_calcu_value=atoi(right_express.c_str()); } left_express_calcu_value-=right_express_calcu_value; set_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)left_express_calcu_value,NUMBER); return true; } else if ('*'==express[next_calculation_flag]) { string left_express(express.substr(0,next_calculation_flag)); trim(left_express); express_type left_express_type=get_express_type(left_express); unsigned long left_express_calcu_value=0; support_javascript_variant_type left_express_calcu_value_type=NONE; if (EXPRESSION_UNKNOW==left_express_type) return false; if (EXPRESSION_EXPRESS==left_express_type || EXPRESSION_VARIANT==left_express_type) { if (!execute_calculation_express(left_express)) return false; get_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)&left_express_calcu_value,&left_express_calcu_value_type); if (NUMBER==left_express_calcu_value_type) left_express_type=EXPRESSION_NUMBER_DECIMAL; } else if (EXPRESSION_NUMBER_HEX==left_express_type) { left_express_calcu_value=hex_string_to_number(left_express); } else if (EXPRESSION_NUMBER_DECIMAL==left_express_type) { left_express_calcu_value=atoi(left_express.c_str()); } string right_express(express.substr(next_calculation_flag+1)); trim(right_express); express_type right_express_type=get_express_type(right_express); unsigned long right_express_calcu_value=0; support_javascript_variant_type right_express_calcu_value_type=NONE; if (EXPRESSION_UNKNOW==right_express_type) return false; if (EXPRESSION_EXPRESS==right_express_type || EXPRESSION_VARIANT==right_express_type) { if (!execute_calculation_express(right_express)) return false; get_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)&right_express_calcu_value,&right_express_calcu_value_type); if (NUMBER==right_express_calcu_value_type) right_express_type=EXPRESSION_NUMBER_DECIMAL; } else if (EXPRESSION_NUMBER_HEX==right_express_type) { right_express_calcu_value=hex_string_to_number(right_express); } else if (EXPRESSION_NUMBER_DECIMAL==right_express_type) { right_express_calcu_value=atoi(right_express.c_str()); } left_express_calcu_value*=right_express_calcu_value; set_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)left_express_calcu_value,NUMBER); return true; } else if ('/'==express[next_calculation_flag]) { string left_express(express.substr(0,next_calculation_flag)); trim(left_express); express_type left_express_type=get_express_type(left_express); unsigned long left_express_calcu_value=0; support_javascript_variant_type left_express_calcu_value_type=NONE; if (EXPRESSION_UNKNOW==left_express_type) return false; if (EXPRESSION_EXPRESS==left_express_type || EXPRESSION_VARIANT==left_express_type) { if (!execute_calculation_express(left_express)) return false; get_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)&left_express_calcu_value,&left_express_calcu_value_type); if (NUMBER==left_express_calcu_value_type) left_express_type=EXPRESSION_NUMBER_DECIMAL; } else if (EXPRESSION_NUMBER_HEX==left_express_type) { left_express_calcu_value=hex_string_to_number(left_express); } else if (EXPRESSION_NUMBER_DECIMAL==left_express_type) { left_express_calcu_value=atoi(left_express.c_str()); } string right_express(express.substr(next_calculation_flag+1)); trim(right_express); express_type right_express_type=get_express_type(right_express); unsigned long right_express_calcu_value=0; support_javascript_variant_type right_express_calcu_value_type=NONE; if (EXPRESSION_UNKNOW==right_express_type) return false; if (EXPRESSION_EXPRESS==right_express_type || EXPRESSION_VARIANT==right_express_type) { if (!execute_calculation_express(right_express)) return false; get_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)&right_express_calcu_value,&right_express_calcu_value_type); if (NUMBER==right_express_calcu_value_type) right_express_type=EXPRESSION_NUMBER_DECIMAL; } else if (EXPRESSION_NUMBER_HEX==right_express_type) { right_express_calcu_value=hex_string_to_number(right_express); } else if (EXPRESSION_NUMBER_DECIMAL==right_express_type) { right_express_calcu_value=atoi(right_express.c_str()); } left_express_calcu_value/=right_express_calcu_value; set_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)left_express_calcu_value,NUMBER); return true; } else if ('('==express[next_calculation_flag]) { string resolve_express(express); for (unsigned long left_bracket_index=resolve_express.find('('); left_bracket_index!=INVALID_VALUE; left_bracket_index=resolve_express.find('(')) { unsigned long next_right_bracket=get_matching_outside_right_bracket(express,0); if (!next_right_bracket) return false; if (!execute_calculation_express(resolve_express.substr(left_bracket_index+1,next_right_bracket-left_bracket_index-1))) return false; unsigned long express_calcu_result_value=0; support_javascript_variant_type express_calcu_result_value_type=NONE; get_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)&express_calcu_result_value,&express_calcu_result_value_type); resolve_express=express.substr(0,left_bracket_index); if (NUMBER==express_calcu_result_value_type) { char conver_buffer[0x20]={0}; sprintf(conver_buffer,"%d",express_calcu_result_value); resolve_express+=conver_buffer; } else { resolve_express+="\'"; resolve_express+=(const char*)express_calcu_result_value; resolve_express+="\'"; } resolve_express+=express.substr(next_right_bracket+1); } if (!execute_calculation_express(resolve_express)) return false; return true; } if (is_exist_variant(express)) { // test_var copy_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,express); return true; } else if (INVALID_VALUE!=express.find('[') && INVALID_VALUE!=express.find(']')) { // test_array unsigned long left_brcket_index=express.find('['); unsigned long right_brcket_index=express.find(']'); string array_name(express.substr(0,left_brcket_index)); trim(array_name); string array_index_string(express.substr(left_brcket_index+1,right_brcket_index-left_brcket_index-1)); trim(array_index_string); if (!express_calcu(array_index_string)) return false; unsigned long array_index=0; support_javascript_variant_type array_index_type=NONE; get_variant(JAVASCRIPT_VARIANT_KEYNAME_CALCULATION_RESULT,(void*)&array_index,&array_index_type); unsigned long array_index_data=0; support_javascript_variant_type array_index_data_type=NONE; get_variant_array(array_name,array_index,(void*)&array_index_data,&array_index_data_type); set_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)array_index_data,array_index_data_type); return true; } return false; // TIPS ! all bug had been debug success .. }
bool eval(string express) { filter_useless_char(express); trim(express); if (check_string("{",express.c_str()) && INVALID_VALUE!=express.find('}')) { // inside code block .. for (unsigned long code_block_end_index=get_matching_outside_right_brace(express.substr(1),0), code_block_start_index=express.find('{'); INVALID_VALUE!=code_block_start_index && INVALID_VALUE!=code_block_end_index; code_block_end_index=get_matching_outside_right_brace(express.substr(1),0), code_block_start_index=express.find('{')) { string code_block(express.substr(code_block_start_index+1,code_block_end_index-code_block_start_index)); while (INVALID_VALUE!=code_block.find(';')) { if (!eval(code_block.substr(0,code_block.find(';')))) return false; code_block=code_block.substr(code_block.find(';')+1); } if (!code_block_start_index) break; express=express.substr(0,code_block_start_index-1)+express.substr(code_block_end_index+1); } return true; } bool base_javascript_syntax_execute_result=true; if (check_string("for",express.c_str())) { // base JavaScript syntax .. base_javascript_syntax_execute_result=eval_for(express); } else if (check_string("if",express.c_str())) { base_javascript_syntax_execute_result=eval_if(express); } if (check_string("function",express.c_str())) { base_javascript_syntax_execute_result=eval_decleare_function(express); if (base_javascript_syntax_execute_result) return eval(express); } else if (check_string("return",express.c_str())) { return eval_function_return(express); } string next_express; if (INVALID_VALUE!=express.find(';')) { // put data .. next_express=express.substr(express.find(';')+1); express=express.substr(0,express.find(';')); } if (eval_function(express)) { } else if (INVALID_VALUE!=express.find('=')) { // var asd=123 or var4='asd' char calcu_flag=express[express.find('=')-1]; if ('+'==calcu_flag) { if (INVALID_VALUE!=express.find("+=")) { // asd+=123 -> asd=asd+123 string variant_name(express.substr(0,express.find("+="))); trim(variant_name); if (!eval(variant_name+"="+variant_name+"+"+express.substr(express.find("+=")+2))) return false; } } else if ('-'==calcu_flag) { if (INVALID_VALUE!=express.find("-=")) { // asd+=123 -> asd=asd+123 string variant_name(express.substr(0,express.find("-="))); trim(variant_name); if (!eval(variant_name+"="+variant_name+"-"+express.substr(express.find("-=")+2))) return false; } } else if ('*'==calcu_flag) { if (INVALID_VALUE!=express.find("*=")) { // asd+=123 -> asd=asd+123 string variant_name(express.substr(0,express.find("*="))); trim(variant_name); if (!eval(variant_name+"="+variant_name+"*"+express.substr(express.find("*=")+2))) return false; } } else if ('/'==calcu_flag) { if (INVALID_VALUE!=express.find("/=")) { // asd+=123 -> asd=asd+123 string variant_name(express.substr(0,express.find("/="))); trim(variant_name); if (!eval(variant_name+"="+variant_name+"/"+express.substr(express.find("/=")+2))) return false; } } else { string variant_name; // asd string calcu_express; if (check_string("var",express.c_str())) { if (INVALID_VALUE!=express.find('=')) { variant_name=express.substr(3,express.find('=')-3); calcu_express=express.substr(express.find('=')+1); } else { variant_name=express.substr(3,express.find(';')-3); } } else { if (INVALID_VALUE!=express.find('=')) { variant_name=express.substr(0,express.find('=')); calcu_express=express.substr(express.find('=')+1); } else { variant_name=express.substr(3,express.find(';')-3); } } trim(variant_name); if (!calcu_express.empty()) if (!express_calcu(calcu_express)) return false; if (EXPRESSION_ARRAY==get_express_type(variant_name)) { unsigned long calcu_result=0; support_javascript_variant_type calcu_result_type=NONE; get_variant(JAVASCRIPT_VARIANT_KEYNAME_CALCULATION_RESULT,(void*)&calcu_result,&calcu_result_type); string array_index_express(variant_name.substr(variant_name.find('[')+1,variant_name.find(']')-variant_name.find('[')-1)); if (!express_calcu(array_index_express)) return false; unsigned long array_index=0; support_javascript_variant_type array_index_type=NONE; get_variant(JAVASCRIPT_VARIANT_KEYNAME_CALCULATION_RESULT,(void*)&array_index,&array_index_type); variant_name=variant_name.substr(0,variant_name.find('[')); trim(variant_name); if (INT_ARRAY==get_variant_type(variant_name) && NUMBER!=calcu_result_type) return false; set_variant_array(variant_name,array_index,(void*)calcu_result,calcu_result_type); } else { copy_variant(variant_name,JAVASCRIPT_VARIANT_KEYNAME_CALCULATION_RESULT); } } } if (!next_express.empty()) return eval(next_express); return base_javascript_syntax_execute_result; }
bool execute_calculation_term(string& express) { if (INVALID_VALUE!=express.find("==")) { if (express_calcu(express.substr(0,express.find("==")))) { copy_variant(JAVASCRIPT_VARIANT_KEYNAME_EXPRESS_LEFT_RESULT,JAVASCRIPT_VARIANT_KEYNAME_CALCULATION_RESULT); if (express_calcu(express.substr(express.find("==")+2))) { unsigned long left_term_data=0; support_javascript_variant_type left_term_data_type=NONE; unsigned long right_term_data=0; support_javascript_variant_type right_term_data_type=NONE; get_variant(JAVASCRIPT_VARIANT_KEYNAME_EXPRESS_LEFT_RESULT,(void*)&left_term_data,&left_term_data_type); get_variant(JAVASCRIPT_VARIANT_KEYNAME_CALCULATION_RESULT,(void*)&right_term_data,&right_term_data_type); if (left_term_data_type!=right_term_data_type) { left_term_data=0; left_term_data_type=NUMBER; set_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)left_term_data,left_term_data_type); } else if (NUMBER==left_term_data_type) { if (left_term_data==right_term_data) left_term_data=1; else left_term_data=0; left_term_data_type=NUMBER; set_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)left_term_data,left_term_data_type); } else if (STRING==left_term_data_type) { if (!strcmp((const char*)left_term_data,(const char*)right_term_data)) left_term_data=1; else left_term_data=0; left_term_data_type=NUMBER; set_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)left_term_data,left_term_data_type); } return true; } } } else if (INVALID_VALUE!=express.find("!=")) { express.replace(express.find("!="),2,"=="); if (express_calcu(express)) { unsigned long calcu_term_value=0; support_javascript_variant_type calcu_term_value_type=NONE; get_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)&calcu_term_value,&calcu_term_value_type); calcu_term_value=(calcu_term_value)?0:1; set_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)calcu_term_value,calcu_term_value_type); return true; } } else if (INVALID_VALUE!=express.find(">=")) { express.replace(express.find(">="),2,"<"); if (express_calcu(express)) { unsigned long calcu_term_value=0; support_javascript_variant_type calcu_term_value_type=NONE; get_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)&calcu_term_value,&calcu_term_value_type); calcu_term_value=(calcu_term_value)?0:1; set_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)calcu_term_value,calcu_term_value_type); return true; } } else if (INVALID_VALUE!=express.find("<=")) { express.replace(express.find("<="),2,">"); if (express_calcu(express)) { unsigned long calcu_term_value=0; support_javascript_variant_type calcu_term_value_type=NONE; get_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)&calcu_term_value,&calcu_term_value_type); calcu_term_value=(calcu_term_value)?0:1; set_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)calcu_term_value,calcu_term_value_type); return true; } } else if (INVALID_VALUE!=express.find("<")) { if (express_calcu(express.substr(0,express.find('<')))) { copy_variant(JAVASCRIPT_VARIANT_KEYNAME_EXPRESS_LEFT_RESULT,JAVASCRIPT_VARIANT_KEYNAME_CALCULATION_RESULT); if (express_calcu(express.substr(express.find('<')+1))) { unsigned long left_term_data=0; support_javascript_variant_type left_term_data_type=NONE; unsigned long right_term_data=0; support_javascript_variant_type right_term_data_type=NONE; get_variant(JAVASCRIPT_VARIANT_KEYNAME_EXPRESS_LEFT_RESULT,(void*)&left_term_data,&left_term_data_type); get_variant(JAVASCRIPT_VARIANT_KEYNAME_CALCULATION_RESULT,(void*)&right_term_data,&right_term_data_type); if (left_term_data_type==right_term_data_type && NUMBER==left_term_data_type) { if (left_term_data<right_term_data) left_term_data=1; else left_term_data=0; left_term_data_type=NUMBER; set_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)left_term_data,left_term_data_type); return true; } } } } else if (INVALID_VALUE!=express.find(">")) { if (express_calcu(express.substr(0,express.find('>')))) { copy_variant(JAVASCRIPT_VARIANT_KEYNAME_EXPRESS_LEFT_RESULT,JAVASCRIPT_VARIANT_KEYNAME_CALCULATION_RESULT); if (express_calcu(express.substr(express.find('>')+1))) { unsigned long left_term_data=0; support_javascript_variant_type left_term_data_type=NONE; unsigned long right_term_data=0; support_javascript_variant_type right_term_data_type=NONE; get_variant(JAVASCRIPT_VARIANT_KEYNAME_EXPRESS_LEFT_RESULT,(void*)&left_term_data,&left_term_data_type); get_variant(JAVASCRIPT_VARIANT_KEYNAME_CALCULATION_RESULT,(void*)&right_term_data,&right_term_data_type); if (left_term_data_type==right_term_data_type && NUMBER==left_term_data_type) { if (left_term_data>right_term_data) left_term_data=1; else left_term_data=0; left_term_data_type=NUMBER; set_variant(JAVASCRIPT_VARIANT_KEYNAME_FUNCTION_RESULT,(void*)left_term_data,left_term_data_type); return true; } } } } else { if (!express.empty()) { if (express_calcu(express)) { unsigned long calcu_term_value=0; support_javascript_variant_type calcu_term_value_type=NONE; get_variant(JAVASCRIPT_VARIANT_KEYNAME_CALCULATION_RESULT,(void*)&calcu_term_value,&calcu_term_value_type); if (calcu_term_value) return true; } } } return false; }