| /* |
| * Softmmu related functions |
| * |
| * Copyright (C) 2010-2012 Guan Xuetao |
| * |
| * This program is free software; you can redistribute it and/or modify |
| * it under the terms of the GNU General Public License version 2 as |
| * published by the Free Software Foundation, or any later version. |
| * See the COPYING file in the top-level directory. |
| */ |
| #ifdef CONFIG_USER_ONLY |
| #error This file only exist under softmmu circumstance |
| #endif |
| |
| #include <cpu.h> |
| |
| #undef DEBUG_UC32 |
| |
| #ifdef DEBUG_UC32 |
| #define DPRINTF(fmt, ...) printf("%s: " fmt , __func__, ## __VA_ARGS__) |
| #else |
| #define DPRINTF(fmt, ...) do {} while (0) |
| #endif |
| |
| #define SUPERPAGE_SIZE (1 << 22) |
| #define UC32_PAGETABLE_READ (1 << 8) |
| #define UC32_PAGETABLE_WRITE (1 << 7) |
| #define UC32_PAGETABLE_EXEC (1 << 6) |
| #define UC32_PAGETABLE_EXIST (1 << 2) |
| #define PAGETABLE_TYPE(x) ((x) & 3) |
| |
| |
| /* Map CPU modes onto saved register banks. */ |
| static inline int bank_number(CPUUniCore32State *env, int mode) |
| { |
| switch (mode) { |
| case ASR_MODE_USER: |
| case ASR_MODE_SUSR: |
| return 0; |
| case ASR_MODE_PRIV: |
| return 1; |
| case ASR_MODE_TRAP: |
| return 2; |
| case ASR_MODE_EXTN: |
| return 3; |
| case ASR_MODE_INTR: |
| return 4; |
| } |
| cpu_abort(env, "Bad mode %x\n", mode); |
| return -1; |
| } |
| |
| void switch_mode(CPUUniCore32State *env, int mode) |
| { |
| int old_mode; |
| int i; |
| |
| old_mode = env->uncached_asr & ASR_M; |
| if (mode == old_mode) { |
| return; |
| } |
| |
| i = bank_number(env, old_mode); |
| env->banked_r29[i] = env->regs[29]; |
| env->banked_r30[i] = env->regs[30]; |
| env->banked_bsr[i] = env->bsr; |
| |
| i = bank_number(env, mode); |
| env->regs[29] = env->banked_r29[i]; |
| env->regs[30] = env->banked_r30[i]; |
| env->bsr = env->banked_bsr[i]; |
| } |
| |
| /* Handle a CPU exception. */ |
| void do_interrupt(CPUUniCore32State *env) |
| { |
| uint32_t addr; |
| int new_mode; |
| |
| switch (env->exception_index) { |
| case UC32_EXCP_PRIV: |
| new_mode = ASR_MODE_PRIV; |
| addr = 0x08; |
| break; |
| case UC32_EXCP_ITRAP: |
| DPRINTF("itrap happened at %x\n", env->regs[31]); |
| new_mode = ASR_MODE_TRAP; |
| addr = 0x0c; |
| break; |
| case UC32_EXCP_DTRAP: |
| DPRINTF("dtrap happened at %x\n", env->regs[31]); |
| new_mode = ASR_MODE_TRAP; |
| addr = 0x10; |
| break; |
| case UC32_EXCP_INTR: |
| new_mode = ASR_MODE_INTR; |
| addr = 0x18; |
| break; |
| default: |
| cpu_abort(env, "Unhandled exception 0x%x\n", env->exception_index); |
| return; |
| } |
| /* High vectors. */ |
| if (env->cp0.c1_sys & (1 << 13)) { |
| addr += 0xffff0000; |
| } |
| |
| switch_mode(env, new_mode); |
| env->bsr = cpu_asr_read(env); |
| env->uncached_asr = (env->uncached_asr & ~ASR_M) | new_mode; |
| env->uncached_asr |= ASR_I; |
| /* The PC already points to the proper instruction. */ |
| env->regs[30] = env->regs[31]; |
| env->regs[31] = addr; |
| env->interrupt_request |= CPU_INTERRUPT_EXITTB; |
| } |
| |
| static int get_phys_addr_ucv2(CPUUniCore32State *env, uint32_t address, |
| int access_type, int is_user, uint32_t *phys_ptr, int *prot, |
| target_ulong *page_size) |
| { |
| int code; |
| uint32_t table; |
| uint32_t desc; |
| uint32_t phys_addr; |
| |
| /* Pagetable walk. */ |
| /* Lookup l1 descriptor. */ |
| table = env->cp0.c2_base & 0xfffff000; |
| table |= (address >> 20) & 0xffc; |
| desc = ldl_phys(table); |
| code = 0; |
| switch (PAGETABLE_TYPE(desc)) { |
| case 3: |
| /* Superpage */ |
| if (!(desc & UC32_PAGETABLE_EXIST)) { |
| code = 0x0b; /* superpage miss */ |
| goto do_fault; |
| } |
| phys_addr = (desc & 0xffc00000) | (address & 0x003fffff); |
| *page_size = SUPERPAGE_SIZE; |
| break; |
| case 0: |
| /* Lookup l2 entry. */ |
| if (is_user) { |
| DPRINTF("PGD address %x, desc %x\n", table, desc); |
| } |
| if (!(desc & UC32_PAGETABLE_EXIST)) { |
| code = 0x05; /* second pagetable miss */ |
| goto do_fault; |
| } |
| table = (desc & 0xfffff000) | ((address >> 10) & 0xffc); |
| desc = ldl_phys(table); |
| /* 4k page. */ |
| if (is_user) { |
| DPRINTF("PTE address %x, desc %x\n", table, desc); |
| } |
| if (!(desc & UC32_PAGETABLE_EXIST)) { |
| code = 0x08; /* page miss */ |
| goto do_fault; |
| } |
| switch (PAGETABLE_TYPE(desc)) { |
| case 0: |
| phys_addr = (desc & 0xfffff000) | (address & 0xfff); |
| *page_size = TARGET_PAGE_SIZE; |
| break; |
| default: |
| cpu_abort(env, "wrong page type!"); |
| } |
| break; |
| default: |
| cpu_abort(env, "wrong page type!"); |
| } |
| |
| *phys_ptr = phys_addr; |
| *prot = 0; |
| /* Check access permissions. */ |
| if (desc & UC32_PAGETABLE_READ) { |
| *prot |= PAGE_READ; |
| } else { |
| if (is_user && (access_type == 0)) { |
| code = 0x11; /* access unreadable area */ |
| goto do_fault; |
| } |
| } |
| |
| if (desc & UC32_PAGETABLE_WRITE) { |
| *prot |= PAGE_WRITE; |
| } else { |
| if (is_user && (access_type == 1)) { |
| code = 0x12; /* access unwritable area */ |
| goto do_fault; |
| } |
| } |
| |
| if (desc & UC32_PAGETABLE_EXEC) { |
| *prot |= PAGE_EXEC; |
| } else { |
| if (is_user && (access_type == 2)) { |
| code = 0x13; /* access unexecutable area */ |
| goto do_fault; |
| } |
| } |
| |
| do_fault: |
| return code; |
| } |
| |
| int uc32_cpu_handle_mmu_fault(CPUUniCore32State *env, target_ulong address, |
| int access_type, int mmu_idx) |
| { |
| uint32_t phys_addr; |
| target_ulong page_size; |
| int prot; |
| int ret, is_user; |
| |
| ret = 1; |
| is_user = mmu_idx == MMU_USER_IDX; |
| |
| if ((env->cp0.c1_sys & 1) == 0) { |
| /* MMU disabled. */ |
| phys_addr = address; |
| prot = PAGE_READ | PAGE_WRITE | PAGE_EXEC; |
| page_size = TARGET_PAGE_SIZE; |
| ret = 0; |
| } else { |
| if ((address & (1 << 31)) || (is_user)) { |
| ret = get_phys_addr_ucv2(env, address, access_type, is_user, |
| &phys_addr, &prot, &page_size); |
| if (is_user) { |
| DPRINTF("user space access: ret %x, address %x, " |
| "access_type %x, phys_addr %x, prot %x\n", |
| ret, address, access_type, phys_addr, prot); |
| } |
| } else { |
| /*IO memory */ |
| phys_addr = address | (1 << 31); |
| prot = PAGE_READ | PAGE_WRITE | PAGE_EXEC; |
| page_size = TARGET_PAGE_SIZE; |
| ret = 0; |
| } |
| } |
| |
| if (ret == 0) { |
| /* Map a single page. */ |
| phys_addr &= TARGET_PAGE_MASK; |
| address &= TARGET_PAGE_MASK; |
| tlb_set_page(env, address, phys_addr, prot, mmu_idx, page_size); |
| return 0; |
| } |
| |
| env->cp0.c3_faultstatus = ret; |
| env->cp0.c4_faultaddr = address; |
| if (access_type == 2) { |
| env->exception_index = UC32_EXCP_ITRAP; |
| } else { |
| env->exception_index = UC32_EXCP_DTRAP; |
| } |
| return ret; |
| } |
| |
| hwaddr cpu_get_phys_page_debug(CPUUniCore32State *env, |
| target_ulong addr) |
| { |
| cpu_abort(env, "%s not supported yet\n", __func__); |
| return addr; |
| } |
