]> git.proxmox.com Git - mirror_qemu.git/blob - target-alpha/mem_helper.c
util/path: Use the GLib memory allocation routines
[mirror_qemu.git] / target-alpha / mem_helper.c
1 /*
2 * Helpers for loads and stores
3 *
4 * Copyright (c) 2007 Jocelyn Mayer
5 *
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.
10 *
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.
15 *
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, see <http://www.gnu.org/licenses/>.
18 */
19
20 #include "cpu.h"
21 #include "exec/helper-proto.h"
22 #include "exec/cpu_ldst.h"
23
24 /* Softmmu support */
25 #ifndef CONFIG_USER_ONLY
26
27 uint64_t helper_ldl_phys(CPUAlphaState *env, uint64_t p)
28 {
29 CPUState *cs = CPU(alpha_env_get_cpu(env));
30 return (int32_t)ldl_phys(cs->as, p);
31 }
32
33 uint64_t helper_ldq_phys(CPUAlphaState *env, uint64_t p)
34 {
35 CPUState *cs = CPU(alpha_env_get_cpu(env));
36 return ldq_phys(cs->as, p);
37 }
38
39 uint64_t helper_ldl_l_phys(CPUAlphaState *env, uint64_t p)
40 {
41 CPUState *cs = CPU(alpha_env_get_cpu(env));
42 env->lock_addr = p;
43 return env->lock_value = (int32_t)ldl_phys(cs->as, p);
44 }
45
46 uint64_t helper_ldq_l_phys(CPUAlphaState *env, uint64_t p)
47 {
48 CPUState *cs = CPU(alpha_env_get_cpu(env));
49 env->lock_addr = p;
50 return env->lock_value = ldq_phys(cs->as, p);
51 }
52
53 void helper_stl_phys(CPUAlphaState *env, uint64_t p, uint64_t v)
54 {
55 CPUState *cs = CPU(alpha_env_get_cpu(env));
56 stl_phys(cs->as, p, v);
57 }
58
59 void helper_stq_phys(CPUAlphaState *env, uint64_t p, uint64_t v)
60 {
61 CPUState *cs = CPU(alpha_env_get_cpu(env));
62 stq_phys(cs->as, p, v);
63 }
64
65 uint64_t helper_stl_c_phys(CPUAlphaState *env, uint64_t p, uint64_t v)
66 {
67 CPUState *cs = CPU(alpha_env_get_cpu(env));
68 uint64_t ret = 0;
69
70 if (p == env->lock_addr) {
71 int32_t old = ldl_phys(cs->as, p);
72 if (old == (int32_t)env->lock_value) {
73 stl_phys(cs->as, p, v);
74 ret = 1;
75 }
76 }
77 env->lock_addr = -1;
78
79 return ret;
80 }
81
82 uint64_t helper_stq_c_phys(CPUAlphaState *env, uint64_t p, uint64_t v)
83 {
84 CPUState *cs = CPU(alpha_env_get_cpu(env));
85 uint64_t ret = 0;
86
87 if (p == env->lock_addr) {
88 uint64_t old = ldq_phys(cs->as, p);
89 if (old == env->lock_value) {
90 stq_phys(cs->as, p, v);
91 ret = 1;
92 }
93 }
94 env->lock_addr = -1;
95
96 return ret;
97 }
98
99 void alpha_cpu_do_unaligned_access(CPUState *cs, vaddr addr,
100 int is_write, int is_user, uintptr_t retaddr)
101 {
102 AlphaCPU *cpu = ALPHA_CPU(cs);
103 CPUAlphaState *env = &cpu->env;
104 uint64_t pc;
105 uint32_t insn;
106
107 if (retaddr) {
108 cpu_restore_state(cs, retaddr);
109 }
110
111 pc = env->pc;
112 insn = cpu_ldl_code(env, pc);
113
114 env->trap_arg0 = addr;
115 env->trap_arg1 = insn >> 26; /* opcode */
116 env->trap_arg2 = (insn >> 21) & 31; /* dest regno */
117 cs->exception_index = EXCP_UNALIGN;
118 env->error_code = 0;
119 cpu_loop_exit(cs);
120 }
121
122 void alpha_cpu_unassigned_access(CPUState *cs, hwaddr addr,
123 bool is_write, bool is_exec, int unused,
124 unsigned size)
125 {
126 AlphaCPU *cpu = ALPHA_CPU(cs);
127 CPUAlphaState *env = &cpu->env;
128
129 env->trap_arg0 = addr;
130 env->trap_arg1 = is_write ? 1 : 0;
131 dynamic_excp(env, 0, EXCP_MCHK, 0);
132 }
133
134 /* try to fill the TLB and return an exception if error. If retaddr is
135 NULL, it means that the function was called in C code (i.e. not
136 from generated code or from helper.c) */
137 /* XXX: fix it to restore all registers */
138 void tlb_fill(CPUState *cs, target_ulong addr, int is_write,
139 int mmu_idx, uintptr_t retaddr)
140 {
141 int ret;
142
143 ret = alpha_cpu_handle_mmu_fault(cs, addr, is_write, mmu_idx);
144 if (unlikely(ret != 0)) {
145 if (retaddr) {
146 cpu_restore_state(cs, retaddr);
147 }
148 /* Exception index and error code are already set */
149 cpu_loop_exit(cs);
150 }
151 }
152 #endif /* CONFIG_USER_ONLY */