Ruben Ayrapetyan
141 lines
4.0 KiB
C
141 lines
4.0 KiB
C
/* Copyright 2014 Samsung Electronics Co., Ltd.
|
|
*
|
|
* Licensed under the Apache License, Version 2.0 (the "License");
|
|
* you may not use this file except in compliance with the License.
|
|
* You may obtain a copy of the License at
|
|
*
|
|
* http://www.apache.org/licenses/LICENSE-2.0
|
|
*
|
|
* Unless required by applicable law or agreed to in writing, software
|
|
* distributed under the License is distributed on an "AS IS" BASIS
|
|
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
|
* See the License for the specific language governing permissions and
|
|
* limitations under the License.
|
|
*/
|
|
|
|
#include "opcodes.h"
|
|
#include "opcodes-ecma-support.h"
|
|
|
|
/**
|
|
* 'Jump if true' opcode handler.
|
|
*
|
|
* Note:
|
|
* the opcode changes current opcode position to specified opcode index
|
|
* if argument evaluates to true.
|
|
*/
|
|
ecma_completion_value_t
|
|
opfunc_is_true_jmp (opcode_t opdata, /**< operation data */
|
|
int_data_t *int_data) /**< interpreter context */
|
|
{
|
|
const idx_t cond_var_idx = opdata.data.is_true_jmp.value;
|
|
const idx_t dst_opcode_idx = opdata.data.is_true_jmp.opcode;
|
|
|
|
ecma_completion_value_t ret_value;
|
|
|
|
ECMA_TRY_CATCH (cond_value, get_variable_value (int_data, cond_var_idx, false), ret_value);
|
|
|
|
ecma_completion_value_t to_bool_completion = ecma_op_to_boolean (cond_value.u.value);
|
|
JERRY_ASSERT (ecma_is_completion_value_normal (to_bool_completion));
|
|
|
|
if (ecma_is_value_true (to_bool_completion.u.value))
|
|
{
|
|
int_data->pos = dst_opcode_idx;
|
|
}
|
|
else
|
|
{
|
|
int_data->pos++;
|
|
}
|
|
|
|
ret_value = ecma_make_empty_completion_value ();
|
|
|
|
ECMA_FINALIZE (cond_value);
|
|
|
|
return ret_value;
|
|
} /* opfunc_is_true_jmp */
|
|
|
|
/**
|
|
* 'Jump if false' opcode handler.
|
|
*
|
|
* Note:
|
|
* the opcode changes current opcode position to specified opcode index
|
|
* if argument evaluates to false.
|
|
*/
|
|
ecma_completion_value_t
|
|
opfunc_is_false_jmp (opcode_t opdata, /**< operation data */
|
|
int_data_t *int_data) /**< interpreter context */
|
|
{
|
|
const idx_t cond_var_idx = opdata.data.is_false_jmp.value;
|
|
const idx_t dst_opcode_idx = opdata.data.is_false_jmp.opcode;
|
|
|
|
ecma_completion_value_t ret_value;
|
|
|
|
ECMA_TRY_CATCH (cond_value, get_variable_value (int_data, cond_var_idx, false), ret_value);
|
|
|
|
ecma_completion_value_t to_bool_completion = ecma_op_to_boolean (cond_value.u.value);
|
|
JERRY_ASSERT (ecma_is_completion_value_normal (to_bool_completion));
|
|
|
|
if (!ecma_is_value_true (to_bool_completion.u.value))
|
|
{
|
|
int_data->pos = dst_opcode_idx;
|
|
}
|
|
else
|
|
{
|
|
int_data->pos++;
|
|
}
|
|
|
|
ret_value = ecma_make_empty_completion_value ();
|
|
|
|
ECMA_FINALIZE (cond_value);
|
|
|
|
return ret_value;
|
|
} /* opfunc_is_false_jmp */
|
|
|
|
/**
|
|
* 'Jump' opcode handler.
|
|
*
|
|
* Note:
|
|
* the opcode changes current opcode position to specified opcode index
|
|
*/
|
|
ecma_completion_value_t
|
|
opfunc_jmp (opcode_t opdata, /**< operation data */
|
|
int_data_t *int_data) /**< interpreter context */
|
|
{
|
|
int_data->pos = opdata.data.jmp.opcode_idx;
|
|
|
|
return ecma_make_empty_completion_value ();
|
|
} /* opfunc_jmp */
|
|
|
|
/**
|
|
* 'Jump down' opcode handler.
|
|
*
|
|
* Note:
|
|
* the opcode changes adds specified value to current opcode position
|
|
*/
|
|
ecma_completion_value_t
|
|
opfunc_jmp_down (opcode_t opdata, /**< operation data */
|
|
int_data_t *int_data) /**< interpreter context */
|
|
{
|
|
JERRY_ASSERT (int_data->pos <= int_data->pos + opdata.data.jmp_up.opcode_count);
|
|
|
|
int_data->pos = (opcode_counter_t) (int_data->pos + opdata.data.jmp_down.opcode_count);
|
|
|
|
return ecma_make_empty_completion_value ();
|
|
} /* opfunc_jmp_down */
|
|
|
|
/**
|
|
* 'Jump up' opcode handler.
|
|
*
|
|
* Note:
|
|
* the opcode changes substracts specified value from current opcode position
|
|
*/
|
|
ecma_completion_value_t
|
|
opfunc_jmp_up (opcode_t opdata, /**< operation data */
|
|
int_data_t *int_data) /**< interpreter context */
|
|
{
|
|
JERRY_ASSERT (int_data->pos >= opdata.data.jmp_up.opcode_count);
|
|
|
|
int_data->pos = (opcode_counter_t) (int_data->pos - opdata.data.jmp_down.opcode_count);
|
|
|
|
return ecma_make_empty_completion_value ();
|
|
} /* opfunc_jmp_up */
|