The MC68040 MMU provides the size of the access that triggers the page fault. This size is set in the Special Status Word which is written in the stack frame of the access fault exception. So we need the size in m68k_cpu_unassigned_access() and m68k_cpu_handle_mmu_fault(). To be able to do that, this patch modifies the prototype of handle_mmu_fault handler, tlb_fill() and probe_write(). do_unassigned_access() already includes a size parameter. This patch also updates handle_mmu_fault handlers and tlb_fill() of all targets (only parameter, no code change). Signed-off-by: Laurent Vivier <laurent@vivier.eu> Reviewed-by: David Hildenbrand <david@redhat.com> Reviewed-by: Richard Henderson <richard.henderson@linaro.org> Message-Id: <20180118193846.24953-2-laurent@vivier.eu>
595 lines
15 KiB
C
595 lines
15 KiB
C
/*
|
|
* Helpers for HPPA instructions.
|
|
*
|
|
* Copyright (c) 2016 Richard Henderson <rth@twiddle.net>
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2 of the License, or (at your option) any later version.
|
|
*
|
|
* This library is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with this library; if not, see <http://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
#include "qemu/osdep.h"
|
|
#include "cpu.h"
|
|
#include "exec/exec-all.h"
|
|
#include "exec/helper-proto.h"
|
|
#include "exec/cpu_ldst.h"
|
|
|
|
void QEMU_NORETURN HELPER(excp)(CPUHPPAState *env, int excp)
|
|
{
|
|
HPPACPU *cpu = hppa_env_get_cpu(env);
|
|
CPUState *cs = CPU(cpu);
|
|
|
|
cs->exception_index = excp;
|
|
cpu_loop_exit(cs);
|
|
}
|
|
|
|
static void QEMU_NORETURN dynexcp(CPUHPPAState *env, int excp, uintptr_t ra)
|
|
{
|
|
HPPACPU *cpu = hppa_env_get_cpu(env);
|
|
CPUState *cs = CPU(cpu);
|
|
|
|
cs->exception_index = excp;
|
|
cpu_loop_exit_restore(cs, ra);
|
|
}
|
|
|
|
void HELPER(tsv)(CPUHPPAState *env, target_ulong cond)
|
|
{
|
|
if (unlikely((target_long)cond < 0)) {
|
|
dynexcp(env, EXCP_SIGFPE, GETPC());
|
|
}
|
|
}
|
|
|
|
void HELPER(tcond)(CPUHPPAState *env, target_ulong cond)
|
|
{
|
|
if (unlikely(cond)) {
|
|
dynexcp(env, EXCP_SIGFPE, GETPC());
|
|
}
|
|
}
|
|
|
|
static void atomic_store_3(CPUHPPAState *env, target_ulong addr, uint32_t val,
|
|
uint32_t mask, uintptr_t ra)
|
|
{
|
|
uint32_t old, new, cmp;
|
|
|
|
#ifdef CONFIG_USER_ONLY
|
|
uint32_t *haddr = g2h(addr - 1);
|
|
old = *haddr;
|
|
while (1) {
|
|
new = (old & ~mask) | (val & mask);
|
|
cmp = atomic_cmpxchg(haddr, old, new);
|
|
if (cmp == old) {
|
|
return;
|
|
}
|
|
old = cmp;
|
|
}
|
|
#else
|
|
#error "Not implemented."
|
|
#endif
|
|
}
|
|
|
|
static void do_stby_b(CPUHPPAState *env, target_ulong addr, target_ulong val,
|
|
bool parallel)
|
|
{
|
|
uintptr_t ra = GETPC();
|
|
|
|
switch (addr & 3) {
|
|
case 3:
|
|
cpu_stb_data_ra(env, addr, val, ra);
|
|
break;
|
|
case 2:
|
|
cpu_stw_data_ra(env, addr, val, ra);
|
|
break;
|
|
case 1:
|
|
/* The 3 byte store must appear atomic. */
|
|
if (parallel) {
|
|
atomic_store_3(env, addr, val, 0x00ffffffu, ra);
|
|
} else {
|
|
cpu_stb_data_ra(env, addr, val >> 16, ra);
|
|
cpu_stw_data_ra(env, addr + 1, val, ra);
|
|
}
|
|
break;
|
|
default:
|
|
cpu_stl_data_ra(env, addr, val, ra);
|
|
break;
|
|
}
|
|
}
|
|
|
|
void HELPER(stby_b)(CPUHPPAState *env, target_ulong addr, target_ulong val)
|
|
{
|
|
do_stby_b(env, addr, val, false);
|
|
}
|
|
|
|
void HELPER(stby_b_parallel)(CPUHPPAState *env, target_ulong addr,
|
|
target_ulong val)
|
|
{
|
|
do_stby_b(env, addr, val, true);
|
|
}
|
|
|
|
static void do_stby_e(CPUHPPAState *env, target_ulong addr, target_ulong val,
|
|
bool parallel)
|
|
{
|
|
uintptr_t ra = GETPC();
|
|
|
|
switch (addr & 3) {
|
|
case 3:
|
|
/* The 3 byte store must appear atomic. */
|
|
if (parallel) {
|
|
atomic_store_3(env, addr - 3, val, 0xffffff00u, ra);
|
|
} else {
|
|
cpu_stw_data_ra(env, addr - 3, val >> 16, ra);
|
|
cpu_stb_data_ra(env, addr - 1, val >> 8, ra);
|
|
}
|
|
break;
|
|
case 2:
|
|
cpu_stw_data_ra(env, addr - 2, val >> 16, ra);
|
|
break;
|
|
case 1:
|
|
cpu_stb_data_ra(env, addr - 1, val >> 24, ra);
|
|
break;
|
|
default:
|
|
/* Nothing is stored, but protection is checked and the
|
|
cacheline is marked dirty. */
|
|
#ifndef CONFIG_USER_ONLY
|
|
probe_write(env, addr, 0, cpu_mmu_index(env, 0), ra);
|
|
#endif
|
|
break;
|
|
}
|
|
}
|
|
|
|
void HELPER(stby_e)(CPUHPPAState *env, target_ulong addr, target_ulong val)
|
|
{
|
|
do_stby_e(env, addr, val, false);
|
|
}
|
|
|
|
void HELPER(stby_e_parallel)(CPUHPPAState *env, target_ulong addr,
|
|
target_ulong val)
|
|
{
|
|
do_stby_e(env, addr, val, true);
|
|
}
|
|
|
|
target_ulong HELPER(probe_r)(target_ulong addr)
|
|
{
|
|
return page_check_range(addr, 1, PAGE_READ);
|
|
}
|
|
|
|
target_ulong HELPER(probe_w)(target_ulong addr)
|
|
{
|
|
return page_check_range(addr, 1, PAGE_WRITE);
|
|
}
|
|
|
|
void HELPER(loaded_fr0)(CPUHPPAState *env)
|
|
{
|
|
uint32_t shadow = env->fr[0] >> 32;
|
|
int rm, d;
|
|
|
|
env->fr0_shadow = shadow;
|
|
|
|
switch (extract32(shadow, 9, 2)) {
|
|
default:
|
|
rm = float_round_nearest_even;
|
|
break;
|
|
case 1:
|
|
rm = float_round_to_zero;
|
|
break;
|
|
case 2:
|
|
rm = float_round_up;
|
|
break;
|
|
case 3:
|
|
rm = float_round_down;
|
|
break;
|
|
}
|
|
set_float_rounding_mode(rm, &env->fp_status);
|
|
|
|
d = extract32(shadow, 5, 1);
|
|
set_flush_to_zero(d, &env->fp_status);
|
|
set_flush_inputs_to_zero(d, &env->fp_status);
|
|
}
|
|
|
|
void cpu_hppa_loaded_fr0(CPUHPPAState *env)
|
|
{
|
|
helper_loaded_fr0(env);
|
|
}
|
|
|
|
#define CONVERT_BIT(X, SRC, DST) \
|
|
((SRC) > (DST) \
|
|
? (X) / ((SRC) / (DST)) & (DST) \
|
|
: ((X) & (SRC)) * ((DST) / (SRC)))
|
|
|
|
static void update_fr0_op(CPUHPPAState *env, uintptr_t ra)
|
|
{
|
|
uint32_t soft_exp = get_float_exception_flags(&env->fp_status);
|
|
uint32_t hard_exp = 0;
|
|
uint32_t shadow = env->fr0_shadow;
|
|
|
|
if (likely(soft_exp == 0)) {
|
|
env->fr[0] = (uint64_t)shadow << 32;
|
|
return;
|
|
}
|
|
set_float_exception_flags(0, &env->fp_status);
|
|
|
|
hard_exp |= CONVERT_BIT(soft_exp, float_flag_inexact, 1u << 0);
|
|
hard_exp |= CONVERT_BIT(soft_exp, float_flag_underflow, 1u << 1);
|
|
hard_exp |= CONVERT_BIT(soft_exp, float_flag_overflow, 1u << 2);
|
|
hard_exp |= CONVERT_BIT(soft_exp, float_flag_divbyzero, 1u << 3);
|
|
hard_exp |= CONVERT_BIT(soft_exp, float_flag_invalid, 1u << 4);
|
|
shadow |= hard_exp << (32 - 5);
|
|
env->fr0_shadow = shadow;
|
|
env->fr[0] = (uint64_t)shadow << 32;
|
|
|
|
if (hard_exp & shadow) {
|
|
dynexcp(env, EXCP_SIGFPE, ra);
|
|
}
|
|
}
|
|
|
|
float32 HELPER(fsqrt_s)(CPUHPPAState *env, float32 arg)
|
|
{
|
|
float32 ret = float32_sqrt(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
float32 HELPER(frnd_s)(CPUHPPAState *env, float32 arg)
|
|
{
|
|
float32 ret = float32_round_to_int(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
float32 HELPER(fadd_s)(CPUHPPAState *env, float32 a, float32 b)
|
|
{
|
|
float32 ret = float32_add(a, b, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
float32 HELPER(fsub_s)(CPUHPPAState *env, float32 a, float32 b)
|
|
{
|
|
float32 ret = float32_sub(a, b, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
float32 HELPER(fmpy_s)(CPUHPPAState *env, float32 a, float32 b)
|
|
{
|
|
float32 ret = float32_mul(a, b, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
float32 HELPER(fdiv_s)(CPUHPPAState *env, float32 a, float32 b)
|
|
{
|
|
float32 ret = float32_div(a, b, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
float64 HELPER(fsqrt_d)(CPUHPPAState *env, float64 arg)
|
|
{
|
|
float64 ret = float64_sqrt(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
float64 HELPER(frnd_d)(CPUHPPAState *env, float64 arg)
|
|
{
|
|
float64 ret = float64_round_to_int(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
float64 HELPER(fadd_d)(CPUHPPAState *env, float64 a, float64 b)
|
|
{
|
|
float64 ret = float64_add(a, b, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
float64 HELPER(fsub_d)(CPUHPPAState *env, float64 a, float64 b)
|
|
{
|
|
float64 ret = float64_sub(a, b, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
float64 HELPER(fmpy_d)(CPUHPPAState *env, float64 a, float64 b)
|
|
{
|
|
float64 ret = float64_mul(a, b, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
float64 HELPER(fdiv_d)(CPUHPPAState *env, float64 a, float64 b)
|
|
{
|
|
float64 ret = float64_div(a, b, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
float64 HELPER(fcnv_s_d)(CPUHPPAState *env, float32 arg)
|
|
{
|
|
float64 ret = float32_to_float64(arg, &env->fp_status);
|
|
ret = float64_maybe_silence_nan(ret, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
float32 HELPER(fcnv_d_s)(CPUHPPAState *env, float64 arg)
|
|
{
|
|
float32 ret = float64_to_float32(arg, &env->fp_status);
|
|
ret = float32_maybe_silence_nan(ret, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
float32 HELPER(fcnv_w_s)(CPUHPPAState *env, int32_t arg)
|
|
{
|
|
float32 ret = int32_to_float32(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
float32 HELPER(fcnv_dw_s)(CPUHPPAState *env, int64_t arg)
|
|
{
|
|
float32 ret = int64_to_float32(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
float64 HELPER(fcnv_w_d)(CPUHPPAState *env, int32_t arg)
|
|
{
|
|
float64 ret = int32_to_float64(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
float64 HELPER(fcnv_dw_d)(CPUHPPAState *env, int64_t arg)
|
|
{
|
|
float64 ret = int64_to_float64(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
int32_t HELPER(fcnv_s_w)(CPUHPPAState *env, float32 arg)
|
|
{
|
|
int32_t ret = float32_to_int32(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
int32_t HELPER(fcnv_d_w)(CPUHPPAState *env, float64 arg)
|
|
{
|
|
int32_t ret = float64_to_int32(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
int64_t HELPER(fcnv_s_dw)(CPUHPPAState *env, float32 arg)
|
|
{
|
|
int64_t ret = float32_to_int64(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
int64_t HELPER(fcnv_d_dw)(CPUHPPAState *env, float64 arg)
|
|
{
|
|
int64_t ret = float64_to_int64(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
int32_t HELPER(fcnv_t_s_w)(CPUHPPAState *env, float32 arg)
|
|
{
|
|
int32_t ret = float32_to_int32_round_to_zero(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
int32_t HELPER(fcnv_t_d_w)(CPUHPPAState *env, float64 arg)
|
|
{
|
|
int32_t ret = float64_to_int32_round_to_zero(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
int64_t HELPER(fcnv_t_s_dw)(CPUHPPAState *env, float32 arg)
|
|
{
|
|
int64_t ret = float32_to_int64_round_to_zero(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
int64_t HELPER(fcnv_t_d_dw)(CPUHPPAState *env, float64 arg)
|
|
{
|
|
int64_t ret = float64_to_int64_round_to_zero(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
float32 HELPER(fcnv_uw_s)(CPUHPPAState *env, uint32_t arg)
|
|
{
|
|
float32 ret = uint32_to_float32(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
float32 HELPER(fcnv_udw_s)(CPUHPPAState *env, uint64_t arg)
|
|
{
|
|
float32 ret = uint64_to_float32(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
float64 HELPER(fcnv_uw_d)(CPUHPPAState *env, uint32_t arg)
|
|
{
|
|
float64 ret = uint32_to_float64(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
float64 HELPER(fcnv_udw_d)(CPUHPPAState *env, uint64_t arg)
|
|
{
|
|
float64 ret = uint64_to_float64(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
uint32_t HELPER(fcnv_s_uw)(CPUHPPAState *env, float32 arg)
|
|
{
|
|
uint32_t ret = float32_to_uint32(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
uint32_t HELPER(fcnv_d_uw)(CPUHPPAState *env, float64 arg)
|
|
{
|
|
uint32_t ret = float64_to_uint32(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
uint64_t HELPER(fcnv_s_udw)(CPUHPPAState *env, float32 arg)
|
|
{
|
|
uint64_t ret = float32_to_uint64(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
uint64_t HELPER(fcnv_d_udw)(CPUHPPAState *env, float64 arg)
|
|
{
|
|
uint64_t ret = float64_to_uint64(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
uint32_t HELPER(fcnv_t_s_uw)(CPUHPPAState *env, float32 arg)
|
|
{
|
|
uint32_t ret = float32_to_uint32_round_to_zero(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
uint32_t HELPER(fcnv_t_d_uw)(CPUHPPAState *env, float64 arg)
|
|
{
|
|
uint32_t ret = float64_to_uint32_round_to_zero(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
uint64_t HELPER(fcnv_t_s_udw)(CPUHPPAState *env, float32 arg)
|
|
{
|
|
uint64_t ret = float32_to_uint64_round_to_zero(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
uint64_t HELPER(fcnv_t_d_udw)(CPUHPPAState *env, float64 arg)
|
|
{
|
|
uint64_t ret = float64_to_uint64_round_to_zero(arg, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
static void update_fr0_cmp(CPUHPPAState *env, uint32_t y, uint32_t c, int r)
|
|
{
|
|
uint32_t shadow = env->fr0_shadow;
|
|
|
|
switch (r) {
|
|
case float_relation_greater:
|
|
c = extract32(c, 4, 1);
|
|
break;
|
|
case float_relation_less:
|
|
c = extract32(c, 3, 1);
|
|
break;
|
|
case float_relation_equal:
|
|
c = extract32(c, 2, 1);
|
|
break;
|
|
case float_relation_unordered:
|
|
c = extract32(c, 1, 1);
|
|
break;
|
|
default:
|
|
g_assert_not_reached();
|
|
}
|
|
|
|
if (y) {
|
|
/* targeted comparison */
|
|
/* set fpsr[ca[y - 1]] to current compare */
|
|
shadow = deposit32(shadow, 21 - (y - 1), 1, c);
|
|
} else {
|
|
/* queued comparison */
|
|
/* shift cq right by one place */
|
|
shadow = deposit32(shadow, 11, 10, extract32(shadow, 12, 10));
|
|
/* move fpsr[c] to fpsr[cq[0]] */
|
|
shadow = deposit32(shadow, 21, 1, extract32(shadow, 26, 1));
|
|
/* set fpsr[c] to current compare */
|
|
shadow = deposit32(shadow, 26, 1, c);
|
|
}
|
|
|
|
env->fr0_shadow = shadow;
|
|
env->fr[0] = (uint64_t)shadow << 32;
|
|
}
|
|
|
|
void HELPER(fcmp_s)(CPUHPPAState *env, float32 a, float32 b,
|
|
uint32_t y, uint32_t c)
|
|
{
|
|
int r;
|
|
if (c & 1) {
|
|
r = float32_compare(a, b, &env->fp_status);
|
|
} else {
|
|
r = float32_compare_quiet(a, b, &env->fp_status);
|
|
}
|
|
update_fr0_op(env, GETPC());
|
|
update_fr0_cmp(env, y, c, r);
|
|
}
|
|
|
|
void HELPER(fcmp_d)(CPUHPPAState *env, float64 a, float64 b,
|
|
uint32_t y, uint32_t c)
|
|
{
|
|
int r;
|
|
if (c & 1) {
|
|
r = float64_compare(a, b, &env->fp_status);
|
|
} else {
|
|
r = float64_compare_quiet(a, b, &env->fp_status);
|
|
}
|
|
update_fr0_op(env, GETPC());
|
|
update_fr0_cmp(env, y, c, r);
|
|
}
|
|
|
|
float32 HELPER(fmpyfadd_s)(CPUHPPAState *env, float32 a, float32 b, float32 c)
|
|
{
|
|
float32 ret = float32_muladd(a, b, c, 0, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
float32 HELPER(fmpynfadd_s)(CPUHPPAState *env, float32 a, float32 b, float32 c)
|
|
{
|
|
float32 ret = float32_muladd(a, b, c, float_muladd_negate_product,
|
|
&env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
float64 HELPER(fmpyfadd_d)(CPUHPPAState *env, float64 a, float64 b, float64 c)
|
|
{
|
|
float64 ret = float64_muladd(a, b, c, 0, &env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|
|
|
|
float64 HELPER(fmpynfadd_d)(CPUHPPAState *env, float64 a, float64 b, float64 c)
|
|
{
|
|
float64 ret = float64_muladd(a, b, c, float_muladd_negate_product,
|
|
&env->fp_status);
|
|
update_fr0_op(env, GETPC());
|
|
return ret;
|
|
}
|