152 lines
		
	
	
		
			3.6 KiB
		
	
	
	
		
			C
		
	
	
	
			
		
		
	
	
			152 lines
		
	
	
		
			3.6 KiB
		
	
	
	
		
			C
		
	
	
	
/*
 | 
						|
 *  Helpers for loads and stores
 | 
						|
 *
 | 
						|
 *  Copyright (c) 2007 Jocelyn Mayer
 | 
						|
 *
 | 
						|
 * 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 "cpu.h"
 | 
						|
#include "helper.h"
 | 
						|
 | 
						|
 | 
						|
/* Softmmu support */
 | 
						|
#ifndef CONFIG_USER_ONLY
 | 
						|
 | 
						|
uint64_t helper_ldl_phys(uint64_t p)
 | 
						|
{
 | 
						|
    return (int32_t)ldl_phys(p);
 | 
						|
}
 | 
						|
 | 
						|
uint64_t helper_ldq_phys(uint64_t p)
 | 
						|
{
 | 
						|
    return ldq_phys(p);
 | 
						|
}
 | 
						|
 | 
						|
uint64_t helper_ldl_l_phys(CPUAlphaState *env, uint64_t p)
 | 
						|
{
 | 
						|
    env->lock_addr = p;
 | 
						|
    return env->lock_value = (int32_t)ldl_phys(p);
 | 
						|
}
 | 
						|
 | 
						|
uint64_t helper_ldq_l_phys(CPUAlphaState *env, uint64_t p)
 | 
						|
{
 | 
						|
    env->lock_addr = p;
 | 
						|
    return env->lock_value = ldq_phys(p);
 | 
						|
}
 | 
						|
 | 
						|
void helper_stl_phys(uint64_t p, uint64_t v)
 | 
						|
{
 | 
						|
    stl_phys(p, v);
 | 
						|
}
 | 
						|
 | 
						|
void helper_stq_phys(uint64_t p, uint64_t v)
 | 
						|
{
 | 
						|
    stq_phys(p, v);
 | 
						|
}
 | 
						|
 | 
						|
uint64_t helper_stl_c_phys(CPUAlphaState *env, uint64_t p, uint64_t v)
 | 
						|
{
 | 
						|
    uint64_t ret = 0;
 | 
						|
 | 
						|
    if (p == env->lock_addr) {
 | 
						|
        int32_t old = ldl_phys(p);
 | 
						|
        if (old == (int32_t)env->lock_value) {
 | 
						|
            stl_phys(p, v);
 | 
						|
            ret = 1;
 | 
						|
        }
 | 
						|
    }
 | 
						|
    env->lock_addr = -1;
 | 
						|
 | 
						|
    return ret;
 | 
						|
}
 | 
						|
 | 
						|
uint64_t helper_stq_c_phys(CPUAlphaState *env, uint64_t p, uint64_t v)
 | 
						|
{
 | 
						|
    uint64_t ret = 0;
 | 
						|
 | 
						|
    if (p == env->lock_addr) {
 | 
						|
        uint64_t old = ldq_phys(p);
 | 
						|
        if (old == env->lock_value) {
 | 
						|
            stq_phys(p, v);
 | 
						|
            ret = 1;
 | 
						|
        }
 | 
						|
    }
 | 
						|
    env->lock_addr = -1;
 | 
						|
 | 
						|
    return ret;
 | 
						|
}
 | 
						|
 | 
						|
static void do_unaligned_access(CPUAlphaState *env, target_ulong addr,
 | 
						|
                                int is_write, int is_user, uintptr_t retaddr)
 | 
						|
{
 | 
						|
    uint64_t pc;
 | 
						|
    uint32_t insn;
 | 
						|
 | 
						|
    do_restore_state(env, retaddr);
 | 
						|
 | 
						|
    pc = env->pc;
 | 
						|
    insn = cpu_ldl_code(env, pc);
 | 
						|
 | 
						|
    env->trap_arg0 = addr;
 | 
						|
    env->trap_arg1 = insn >> 26;                /* opcode */
 | 
						|
    env->trap_arg2 = (insn >> 21) & 31;         /* dest regno */
 | 
						|
    env->exception_index = EXCP_UNALIGN;
 | 
						|
    env->error_code = 0;
 | 
						|
    cpu_loop_exit(env);
 | 
						|
}
 | 
						|
 | 
						|
void cpu_unassigned_access(CPUAlphaState *env, target_phys_addr_t addr,
 | 
						|
                           int is_write, int is_exec, int unused, int size)
 | 
						|
{
 | 
						|
    env->trap_arg0 = addr;
 | 
						|
    env->trap_arg1 = is_write;
 | 
						|
    dynamic_excp(env, 0, EXCP_MCHK, 0);
 | 
						|
}
 | 
						|
 | 
						|
#include "softmmu_exec.h"
 | 
						|
 | 
						|
#define MMUSUFFIX _mmu
 | 
						|
#define ALIGNED_ONLY
 | 
						|
 | 
						|
#define SHIFT 0
 | 
						|
#include "softmmu_template.h"
 | 
						|
 | 
						|
#define SHIFT 1
 | 
						|
#include "softmmu_template.h"
 | 
						|
 | 
						|
#define SHIFT 2
 | 
						|
#include "softmmu_template.h"
 | 
						|
 | 
						|
#define SHIFT 3
 | 
						|
#include "softmmu_template.h"
 | 
						|
 | 
						|
/* try to fill the TLB and return an exception if error. If retaddr is
 | 
						|
   NULL, it means that the function was called in C code (i.e. not
 | 
						|
   from generated code or from helper.c) */
 | 
						|
/* XXX: fix it to restore all registers */
 | 
						|
void tlb_fill(CPUAlphaState *env, target_ulong addr, int is_write,
 | 
						|
              int mmu_idx, uintptr_t retaddr)
 | 
						|
{
 | 
						|
    int ret;
 | 
						|
 | 
						|
    ret = cpu_alpha_handle_mmu_fault(env, addr, is_write, mmu_idx);
 | 
						|
    if (unlikely(ret != 0)) {
 | 
						|
        do_restore_state(env, retaddr);
 | 
						|
        /* Exception index and error code are already set */
 | 
						|
        cpu_loop_exit(env);
 | 
						|
    }
 | 
						|
}
 | 
						|
#endif /* CONFIG_USER_ONLY */
 |