2 * Alpha emulation cpu micro-operations for memory accesses for qemu.
4 * Copyright (c) 2007 Jocelyn Mayer
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
21 //#define DEBUG_MEM_ACCESSES
22 #if defined (DEBUG_MEM_ACCESSES)
23 void helper_print_mem_EA (target_ulong EA);
24 #define print_mem_EA(EA) do { helper_print_mem_EA(EA); } while (0)
26 #define print_mem_EA(EA) do { } while (0)
29 static always_inline uint32_t glue(ldl_l, MEMSUFFIX) (target_ulong EA)
33 return glue(ldl, MEMSUFFIX)(EA);
36 static always_inline uint32_t glue(ldq_l, MEMSUFFIX) (target_ulong EA)
40 return glue(ldq, MEMSUFFIX)(EA);
43 static always_inline void glue(stl_c, MEMSUFFIX) (target_ulong EA,
46 if (EA == env->lock) {
47 glue(stl, MEMSUFFIX)(EA, data);
55 static always_inline void glue(stq_c, MEMSUFFIX) (target_ulong EA,
58 if (EA == env->lock) {
59 glue(stq, MEMSUFFIX)(EA, data);
67 #define ALPHA_LD_OP(name, op) \
68 void OPPROTO glue(glue(op_ld, name), MEMSUFFIX) (void) \
71 T1 = glue(op, MEMSUFFIX)(T0); \
75 #define ALPHA_ST_OP(name, op) \
76 void OPPROTO glue(glue(op_st, name), MEMSUFFIX) (void) \
79 glue(op, MEMSUFFIX)(T0, T1); \
88 ALPHA_LD_OP(l_l, ldl_l);
89 ALPHA_LD_OP(q_l, ldq_l);
90 ALPHA_ST_OP(l_c, stl_c);
91 ALPHA_ST_OP(q_c, stq_c);
93 #define ALPHA_LDF_OP(name, op) \
94 void OPPROTO glue(glue(op_ld, name), MEMSUFFIX) (void) \
97 FT1 = glue(op, MEMSUFFIX)(T0); \
101 #define ALPHA_STF_OP(name, op) \
102 void OPPROTO glue(glue(op_st, name), MEMSUFFIX) (void) \
105 glue(op, MEMSUFFIX)(T0, FT1); \
109 ALPHA_LDF_OP(t, ldfq);
110 ALPHA_STF_OP(t, stfq);
111 ALPHA_LDF_OP(s, ldfl);
112 ALPHA_STF_OP(s, stfl);
114 /* VAX floating point */
115 ALPHA_LDF_OP(f, helper_ldff);
116 ALPHA_STF_OP(f, helper_stff);
117 ALPHA_LDF_OP(g, helper_ldfg);
118 ALPHA_STF_OP(g, helper_stfg);