/* ARM memory operations. */ /* Swap T0 with memory at address T1. */ /* ??? Is this exception safe? */ #define MEM_SWP_OP(name, lname) \ void OPPROTO glue(op_swp##name,MEMSUFFIX)(void) \ { \ uint32_t tmp; \ cpu_lock(); \ tmp = glue(ld##lname,MEMSUFFIX)(T1); \ glue(st##name,MEMSUFFIX)(T1, T0); \ T0 = tmp; \ cpu_unlock(); \ FORCE_RET(); \ } MEM_SWP_OP(b, ub) MEM_SWP_OP(l, l) #undef MEM_SWP_OP /* Load-locked, store exclusive. */ #define EXCLUSIVE_OP(suffix, ldsuffix) \ void OPPROTO glue(op_ld##suffix##ex,MEMSUFFIX)(void) \ { \ cpu_lock(); \ helper_mark_exclusive(env, T1); \ T0 = glue(ld##ldsuffix,MEMSUFFIX)(T1); \ cpu_unlock(); \ FORCE_RET(); \ } \ \ void OPPROTO glue(op_st##suffix##ex,MEMSUFFIX)(void) \ { \ int failed; \ cpu_lock(); \ failed = helper_test_exclusive(env, T1); \ /* ??? Is it safe to hold the cpu lock over a store? */ \ if (!failed) { \ glue(st##suffix,MEMSUFFIX)(T1, T0); \ } \ T0 = failed; \ cpu_unlock(); \ FORCE_RET(); \ } EXCLUSIVE_OP(b, ub) EXCLUSIVE_OP(w, uw) EXCLUSIVE_OP(l, l) #undef EXCLUSIVE_OP /* Load exclusive T0:T1 from address T1. */ void OPPROTO glue(op_ldqex,MEMSUFFIX)(void) { cpu_lock(); helper_mark_exclusive(env, T1); T0 = glue(ldl,MEMSUFFIX)(T1); T1 = glue(ldl,MEMSUFFIX)((T1 + 4)); cpu_unlock(); FORCE_RET(); } /* Store exclusive T0:T2 to address T1. */ void OPPROTO glue(op_stqex,MEMSUFFIX)(void) { int failed; cpu_lock(); failed = helper_test_exclusive(env, T1); /* ??? Is it safe to hold the cpu lock over a store? */ if (!failed) { glue(stl,MEMSUFFIX)(T1, T0); glue(stl,MEMSUFFIX)((T1 + 4), T2); } T0 = failed; cpu_unlock(); FORCE_RET(); } /* Floating point load/store. Address is in T1 */ #define VFP_MEM_OP(p, w) \ void OPPROTO glue(op_vfp_ld##p,MEMSUFFIX)(void) \ { \ FT0##p = glue(ldf##w,MEMSUFFIX)(T1); \ FORCE_RET(); \ } \ void OPPROTO glue(op_vfp_st##p,MEMSUFFIX)(void) \ { \ glue(stf##w,MEMSUFFIX)(T1, FT0##p); \ FORCE_RET(); \ } VFP_MEM_OP(s,l) VFP_MEM_OP(d,q) #undef VFP_MEM_OP /* iwMMXt load/store. Address is in T1 */ #define MMX_MEM_OP(name, ldname) \ void OPPROTO glue(op_iwmmxt_ld##name,MEMSUFFIX)(void) \ { \ M0 = glue(ld##ldname,MEMSUFFIX)(T1); \ FORCE_RET(); \ } \ void OPPROTO glue(op_iwmmxt_st##name,MEMSUFFIX)(void) \ { \ glue(st##name,MEMSUFFIX)(T1, M0); \ FORCE_RET(); \ } MMX_MEM_OP(b, ub) MMX_MEM_OP(w, uw) MMX_MEM_OP(l, l) MMX_MEM_OP(q, q) #undef MMX_MEM_OP #undef MEMSUFFIX