Quellcodebibliothek Statistik Leitseite products/sources/formale Sprachen/C/Linux/arch/microblaze/kernel/   (Open Source Betriebssystem Version 6.17.9©)  Datei vom 24.10.2025 mit Größe 34 kB image not shown  

Quelle  entry.S   Sprache: Sparc

 
/*
 * Low-level system-call handling, trap handlers and context-switching
 *
 * Copyright (C) 2008-2009 Michal Simek <monstr@monstr.eu>
 * Copyright (C) 2008-2009 PetaLogix
 * Copyright (C) 2003 John Williams <jwilliams@itee.uq.edu.au>
 * Copyright (C) 2001,2002 NEC Corporation
 * Copyright (C) 2001,2002 Miles Bader <miles@gnu.org>
 *
 * This file is subject to the terms and conditions of the GNU General
 * Public License. See the file COPYING in the main directory of this
 * archive for more details.
 *
 * Written by Miles Bader <miles@gnu.org>
 * Heavily modified by John Williams for Microblaze
 */


#include <linux/sys.h>
#include <linux/linkage.h>

#include <asm/entry.h>
#include <asm/current.h>
#include <asm/processor.h>
#include <asm/exceptions.h>
#include <asm/asm-offsets.h>
#include <asm/thread_info.h>

#include <asm/page.h>
#include <asm/unistd.h>
#include <asm/xilinx_mb_manager.h>

#include <linux/errno.h>
#include <asm/signal.h>
#include <asm/mmu.h>

#undef DEBUG

#ifdef DEBUG
/* Create space for syscalls counting. */
.section .data
.global syscall_debug_table
.align 4
syscall_debug_table:
 .space (__NR_syscalls * 4)
#endif /* DEBUG */

#define C_ENTRY(name) .globl name; .align 4; name

/*
 * Various ways of setting and clearing BIP in flags reg.
 * This is mucky, but necessary using microblaze version that
 * allows msr ops to write to BIP
 */

#if CONFIG_XILINX_MICROBLAZE0_USE_MSR_INSTR
 .macro clear_bip
 msrclr r0, MSR_BIP
 .endm

 .macro set_bip
 msrset r0, MSR_BIP
 .endm

 .macro clear_eip
 msrclr r0, MSR_EIP
 .endm

 .macro set_ee
 msrset r0, MSR_EE
 .endm

 .macro disable_irq
 msrclr r0, MSR_IE
 .endm

 .macro enable_irq
 msrset r0, MSR_IE
 .endm

 .macro set_ums
 msrset r0, MSR_UMS
 msrclr r0, MSR_VMS
 .endm

 .macro set_vms
 msrclr r0, MSR_UMS
 msrset r0, MSR_VMS
 .endm

 .macro clear_ums
 msrclr r0, MSR_UMS
 .endm

 .macro clear_vms_ums
 msrclr r0, MSR_VMS | MSR_UMS
 .endm
#else
 .macro clear_bip
 mfs r11, rmsr
 andi r11, r11, ~MSR_BIP
 mts rmsr, r11
 .endm

 .macro set_bip
 mfs r11, rmsr
 ori r11, r11, MSR_BIP
 mts rmsr, r11
 .endm

 .macro clear_eip
 mfs r11, rmsr
 andi r11, r11, ~MSR_EIP
 mts rmsr, r11
 .endm

 .macro set_ee
 mfs r11, rmsr
 ori r11, r11, MSR_EE
 mts rmsr, r11
 .endm

 .macro disable_irq
 mfs r11, rmsr
 andi r11, r11, ~MSR_IE
 mts rmsr, r11
 .endm

 .macro enable_irq
 mfs r11, rmsr
 ori r11, r11, MSR_IE
 mts rmsr, r11
 .endm

 .macro set_ums
 mfs r11, rmsr
 ori r11, r11, MSR_VMS
 andni r11, r11, MSR_UMS
 mts rmsr, r11
 .endm

 .macro set_vms
 mfs r11, rmsr
 ori r11, r11, MSR_VMS
 andni r11, r11, MSR_UMS
 mts rmsr, r11
 .endm

 .macro clear_ums
 mfs r11, rmsr
 andni r11, r11, MSR_UMS
 mts rmsr,r11
 .endm

 .macro clear_vms_ums
 mfs r11, rmsr
 andni r11, r11, (MSR_VMS|MSR_UMS)
 mts rmsr,r11
 .endm
#endif

/* Define how to call high-level functions. With MMU, virtual mode must be
 * enabled when calling the high-level function. Clobbers R11.
 * VM_ON, VM_OFF, DO_JUMP_BIPCLR, DO_CALL
 */


/* turn on virtual protected mode save */
#define VM_ON  \
 set_ums; \
 rted r0, 2f; \
 nop; \
2:

/* turn off virtual protected mode save and user mode save*/
#define VM_OFF   \
 clear_vms_ums;  \
 rted r0, TOPHYS(1f); \
 nop; \
1:

#define SAVE_REGS \
 swi r2, r1, PT_R2; /* Save SDA */ \
 swi r3, r1, PT_R3;     \
 swi r4, r1, PT_R4;     \
 swi r5, r1, PT_R5;     \
 swi r6, r1, PT_R6;     \
 swi r7, r1, PT_R7;     \
 swi r8, r1, PT_R8;     \
 swi r9, r1, PT_R9;     \
 swi r10, r1, PT_R10;     \
 swi r11, r1, PT_R11; /* save clobbered regs after rval */\
 swi r12, r1, PT_R12;     \
 swi r13, r1, PT_R13; /* Save SDA2 */ \
 swi r14, r1, PT_PC; /* PC, before IRQ/trap */ \
 swi r15, r1, PT_R15; /* Save LP */ \
 swi r16, r1, PT_R16;     \
 swi r17, r1, PT_R17;     \
 swi r18, r1, PT_R18; /* Save asm scratch reg */ \
 swi r19, r1, PT_R19;     \
 swi r20, r1, PT_R20;     \
 swi r21, r1, PT_R21;     \
 swi r22, r1, PT_R22;     \
 swi r23, r1, PT_R23;     \
 swi r24, r1, PT_R24;     \
 swi r25, r1, PT_R25;     \
 swi r26, r1, PT_R26;     \
 swi r27, r1, PT_R27;     \
 swi r28, r1, PT_R28;     \
 swi r29, r1, PT_R29;     \
 swi r30, r1, PT_R30;     \
 swi r31, r1, PT_R31; /* Save current task reg */ \
 mfs r11, rmsr;  /* save MSR */ \
 swi r11, r1, PT_MSR;

#define RESTORE_REGS_GP \
 lwi r2, r1, PT_R2; /* restore SDA */ \
 lwi r3, r1, PT_R3;     \
 lwi r4, r1, PT_R4;     \
 lwi r5, r1, PT_R5;     \
 lwi r6, r1, PT_R6;     \
 lwi r7, r1, PT_R7;     \
 lwi r8, r1, PT_R8;     \
 lwi r9, r1, PT_R9;     \
 lwi r10, r1, PT_R10;     \
 lwi r11, r1, PT_R11; /* restore clobbered regs after rval */\
 lwi r12, r1, PT_R12;     \
 lwi r13, r1, PT_R13; /* restore SDA2 */ \
 lwi r14, r1, PT_PC; /* RESTORE_LINK PC, before IRQ/trap */\
 lwi r15, r1, PT_R15; /* restore LP */ \
 lwi r16, r1, PT_R16;     \
 lwi r17, r1, PT_R17;     \
 lwi r18, r1, PT_R18; /* restore asm scratch reg */ \
 lwi r19, r1, PT_R19;     \
 lwi r20, r1, PT_R20;     \
 lwi r21, r1, PT_R21;     \
 lwi r22, r1, PT_R22;     \
 lwi r23, r1, PT_R23;     \
 lwi r24, r1, PT_R24;     \
 lwi r25, r1, PT_R25;     \
 lwi r26, r1, PT_R26;     \
 lwi r27, r1, PT_R27;     \
 lwi r28, r1, PT_R28;     \
 lwi r29, r1, PT_R29;     \
 lwi r30, r1, PT_R30;     \
 lwi r31, r1, PT_R31; /* Restore cur task reg */

#define RESTORE_REGS \
 lwi r11, r1, PT_MSR;     \
 mts rmsr , r11;      \
 RESTORE_REGS_GP

#define RESTORE_REGS_RTBD \
 lwi r11, r1, PT_MSR;     \
 andni r11, r11, MSR_EIP;          /* clear EIP */             \
 ori r11, r11, MSR_EE | MSR_BIP; /* set EE and BIP */        \
 mts rmsr , r11;      \
 RESTORE_REGS_GP

#define SAVE_STATE \
 swi r1, r0, TOPHYS(PER_CPU(ENTRY_SP)); /* save stack */ \
 /* See if already in kernel mode.*/ \
 mfs r1, rmsr;      \
 andi r1, r1, MSR_UMS;     \
 bnei r1, 1f;      \
 /* Kernel-mode state save.  */ \
 /* Reload kernel stack-ptr. */ \
 lwi r1, r0, TOPHYS(PER_CPU(ENTRY_SP));   \
 /* FIXME: I can add these two lines to one */ \
 /* tophys(r1,r1); */ \
 /* addik r1, r1, -PT_SIZE; */ \
 addik r1, r1, CONFIG_KERNEL_BASE_ADDR - CONFIG_KERNEL_START - PT_SIZE; \
 SAVE_REGS       \
 brid 2f;       \
 swi r1, r1, PT_MODE;       \
1: /* User-mode state save.  */ \
 lwi r1, r0, TOPHYS(PER_CPU(CURRENT_SAVE)); /* get saved current */\
 tophys(r1,r1);       \
 lwi r1, r1, TS_THREAD_INFO; /* get the thread info */ \
 /* MS these three instructions can be added to one */ \
 /* addik r1, r1, THREAD_SIZE; */ \
 /* tophys(r1,r1); */ \
 /* addik r1, r1, -PT_SIZE; */ \
 addik r1, r1, THREAD_SIZE + CONFIG_KERNEL_BASE_ADDR - CONFIG_KERNEL_START - PT_SIZE; \
 SAVE_REGS       \
 lwi r11, r0, TOPHYS(PER_CPU(ENTRY_SP));   \
 swi r11, r1, PT_R1; /* Store user SP.  */ \
 swi r0, r1, PT_MODE; /* Was in user-mode.  */ \
 /* MS: I am clearing UMS even in case when I come from kernel space */ \
 clear_ums;        \
2: lwi CURRENT_TASK, r0, TOPHYS(PER_CPU(CURRENT_SAVE));

.text

.extern cpuinfo

C_ENTRY(mb_flush_dcache):
 addik r1, r1, -PT_SIZE
 SAVE_REGS

 addik r3, r0, cpuinfo
 lwi r7, r3, CI_DCS
 lwi r8, r3, CI_DCL
 sub r9, r7, r8
1:
 wdc.flush r9, r0
 bgtid r9, 1b
 addk r9, r9, r8

 RESTORE_REGS
 addik r1, r1, PT_SIZE
 rtsd r15, 8
 nop

C_ENTRY(mb_invalidate_icache):
 addik r1, r1, -PT_SIZE
 SAVE_REGS

 addik r3, r0, cpuinfo
 lwi r7, r3, CI_ICS
 lwi r8, r3, CI_ICL
 sub r9, r7, r8
1:
 wic  r9, r0
 bgtid r9, 1b
 addk r9, r9, r8

 RESTORE_REGS
 addik r1, r1, PT_SIZE
 rtsd r15, 8
 nop

/*
 * User trap.
 *
 * System calls are handled here.
 *
 * Syscall protocol:
 * Syscall number in r12, args in r5-r10
 * Return value in r3
 *
 * Trap entered via brki instruction, so BIP bit is set, and interrupts
 * are masked. This is nice, means we don't have to CLI before state save
 */

C_ENTRY(_user_exception):
 swi r1, r0, TOPHYS(PER_CPU(ENTRY_SP)) /* save stack */
 addi r14, r14, 4 /* return address is 4 byte after call */

 lwi r1, r0, TOPHYS(PER_CPU(CURRENT_SAVE)); /* get saved current */
 tophys(r1,r1);
 lwi r1, r1, TS_THREAD_INFO; /* get stack from task_struct */
/* calculate kernel stack pointer from task struct 8k */
 addik r1, r1, THREAD_SIZE;
 tophys(r1,r1);

 addik r1, r1, -PT_SIZE; /* Make room on the stack.  */
 SAVE_REGS
 swi r0, r1, PT_R3
 swi r0, r1, PT_R4

 swi r0, r1, PT_MODE;   /* Was in user-mode. */
 lwi r11, r0, TOPHYS(PER_CPU(ENTRY_SP));
 swi r11, r1, PT_R1;  /* Store user SP.  */
 clear_ums;
2: lwi CURRENT_TASK, r0, TOPHYS(PER_CPU(CURRENT_SAVE));
 /* Save away the syscall number.  */
 swi r12, r1, PT_R0;
 tovirt(r1,r1)

/* where the trap should return need -8 to adjust for rtsd r15, 8*/
/* Jump to the appropriate function for the system call number in r12
 * (r12 is not preserved), or return an error if r12 is not valid. The LP
 * register should point to the location where
 * the called function should return.  [note that MAKE_SYS_CALL uses label 1] */


 /* Step into virtual mode */
 rtbd r0, 3f
 nop
3:
 lwi r11, CURRENT_TASK, TS_THREAD_INFO /* get thread info */
 lwi r11, r11, TI_FLAGS  /* get flags in thread info */
 andi r11, r11, _TIF_WORK_SYSCALL_MASK
 beqi r11, 4f

 addik r3, r0, -ENOSYS
 swi r3, r1, PT_R3
 brlid r15, do_syscall_trace_enter
 addik r5, r1, PT_R0

 # do_syscall_trace_enter returns the new syscall nr.
 addk r12, r0, r3
 lwi r5, r1, PT_R5;
 lwi r6, r1, PT_R6;
 lwi r7, r1, PT_R7;
 lwi r8, r1, PT_R8;
 lwi r9, r1, PT_R9;
 lwi r10, r1, PT_R10;
4:
/* Jump to the appropriate function for the system call number in r12
 * (r12 is not preserved), or return an error if r12 is not valid.
 * The LP register should point to the location where the called function
 * should return.  [note that MAKE_SYS_CALL uses label 1] */

 /* See if the system call number is valid */
 blti r12, 5f
 addi r11, r12, -__NR_syscalls;
 bgei r11, 5f;
 /* Figure out which function to use for this system call.  */
 /* Note Microblaze barrel shift is optional, so don't rely on it */
 add r12, r12, r12;   /* convert num -> ptr */
 add r12, r12, r12;
 addi r30, r0, 1   /* restarts allowed */

#ifdef DEBUG
 /* Trac syscalls and stored them to syscall_debug_table */
 /* The first syscall location stores total syscall number */
 lwi r3, r0, syscall_debug_table
 addi r3, r3, 1
 swi r3, r0, syscall_debug_table
 lwi r3, r12, syscall_debug_table
 addi r3, r3, 1
 swi r3, r12, syscall_debug_table
#endif

 # Find and jump into the syscall handler.
 lwi r12, r12, sys_call_table
 /* where the trap should return need -8 to adjust for rtsd r15, 8 */
 addi r15, r0, ret_from_trap-8
 bra r12

 /* The syscall number is invalid, return an error.  */
5:
 braid ret_from_trap
 addi r3, r0, -ENOSYS;

/* Entry point used to return from a syscall/trap */
/* We re-enable BIP bit before state restore */
C_ENTRY(ret_from_trap):
 swi r3, r1, PT_R3
 swi r4, r1, PT_R4

 lwi r11, r1, PT_MODE;
/* See if returning to kernel mode, if so, skip resched &c.  */
 bnei r11, 2f;
 /* We're returning to user mode, so check for various conditions that
 * trigger rescheduling. */

 /* FIXME: Restructure all these flag checks. */
 lwi r11, CURRENT_TASK, TS_THREAD_INFO; /* get thread info */
 lwi r11, r11, TI_FLAGS;  /* get flags in thread info */
 andi r11, r11, _TIF_WORK_SYSCALL_MASK
 beqi r11, 1f

 brlid r15, do_syscall_trace_leave
 addik r5, r1, PT_R0
1:
 /* We're returning to user mode, so check for various conditions that
 * trigger rescheduling. */

 /* get thread info from current task */
 lwi r11, CURRENT_TASK, TS_THREAD_INFO;
 lwi r19, r11, TI_FLAGS;  /* get flags in thread info */
 andi r11, r19, _TIF_NEED_RESCHED;
 beqi r11, 5f;

 bralid r15, schedule; /* Call scheduler */
 nop;    /* delay slot */
 bri 1b

 /* Maybe handle a signal */
5:
 andi r11, r19, _TIF_SIGPENDING | _TIF_NOTIFY_RESUME;
 beqi r11, 4f;  /* Signals to handle, handle them */

 addik r5, r1, 0;  /* Arg 1: struct pt_regs *regs */
 bralid r15, do_notify_resume; /* Handle any signals */
 add r6, r30, r0;  /* Arg 2: int in_syscall */
 add r30, r0, r0  /* no more restarts */
 bri 1b

/* Finally, return to user state.  */
4: set_bip;   /*  Ints masked for state restore */
 swi CURRENT_TASK, r0, PER_CPU(CURRENT_SAVE); /* save current */
 VM_OFF;
 tophys(r1,r1);
 RESTORE_REGS_RTBD;
 addik r1, r1, PT_SIZE  /* Clean up stack space.  */
 lwi r1, r1, PT_R1 - PT_SIZE;/* Restore user stack pointer. */
 bri 6f;

/* Return to kernel state.  */
2: set_bip;   /*  Ints masked for state restore */
 VM_OFF;
 tophys(r1,r1);
 RESTORE_REGS_RTBD;
 addik r1, r1, PT_SIZE  /* Clean up stack space.  */
 tovirt(r1,r1);
6:
TRAP_return:  /* Make global symbol for debugging */
 rtbd r14, 0; /* Instructions to return from an IRQ */
 nop;


/* This the initial entry point for a new child thread, with an appropriate
   stack in place that makes it look like the child is in the middle of a
   syscall.  This function is actually `returned to' from switch_thread
   (copy_thread makes ret_from_fork the return address in each new thread's
   saved context).  */

C_ENTRY(ret_from_fork):
 bralid r15, schedule_tail; /* ...which is schedule_tail's arg */
 add r5, r3, r0; /* switch_thread returns the prev task */
    /* ( in the delay slot ) */
 brid ret_from_trap; /* Do normal trap return */
 add r3, r0, r0; /* Child's fork call should return 0. */

C_ENTRY(ret_from_kernel_thread):
 bralid r15, schedule_tail; /* ...which is schedule_tail's arg */
 add r5, r3, r0; /* switch_thread returns the prev task */
    /* ( in the delay slot ) */
 brald r15, r20 /* fn was left in r20 */
 addk r5, r0, r19 /* ... and argument - in r19 */
 brid ret_from_trap
 add r3, r0, r0

C_ENTRY(sys_rt_sigreturn_wrapper):
 addik r30, r0, 0  /* no restarts */
 brid sys_rt_sigreturn /* Do real work */
 addik r5, r1, 0;  /* add user context as 1st arg */

/*
 * HW EXCEPTION rutine start
 */

C_ENTRY(full_exception_trap):
 /* adjust exception address for privileged instruction
 * for finding where is it */

 addik r17, r17, -4
 SAVE_STATE /* Save registers */
 /* PC, before IRQ/trap - this is one instruction above */
 swi r17, r1, PT_PC;
 tovirt(r1,r1)
 /* FIXME this can be store directly in PT_ESR reg.
 * I tested it but there is a fault */

 /* where the trap should return need -8 to adjust for rtsd r15, 8 */
 addik r15, r0, ret_from_exc - 8
 mfs r6, resr
 mfs r7, rfsr;  /* save FSR */
 mts rfsr, r0; /* Clear sticky fsr */
 rted r0, full_exception
 addik r5, r1, 0   /* parameter struct pt_regs * regs */

/*
 * Unaligned data trap.
 *
 * Unaligned data trap last on 4k page is handled here.
 *
 * Trap entered via exception, so EE bit is set, and interrupts
 * are masked.  This is nice, means we don't have to CLI before state save
 *
 * The assembler routine is in "arch/microblaze/kernel/hw_exception_handler.S"
 */

C_ENTRY(unaligned_data_trap):
 /* MS: I have to save r11 value and then restore it because
 * set_bit, clear_eip, set_ee use r11 as temp register if MSR
 * instructions are not used. We don't need to do if MSR instructions
 * are used and they use r0 instead of r11.
 * I am using ENTRY_SP which should be primary used only for stack
 * pointer saving. */

 swi r11, r0, TOPHYS(PER_CPU(ENTRY_SP));
 set_bip;        /* equalize initial state for all possible entries */
 clear_eip;
 set_ee;
 lwi r11, r0, TOPHYS(PER_CPU(ENTRY_SP));
 SAVE_STATE  /* Save registers.*/
 /* PC, before IRQ/trap - this is one instruction above */
 swi r17, r1, PT_PC;
 tovirt(r1,r1)
 /* where the trap should return need -8 to adjust for rtsd r15, 8 */
 addik r15, r0, ret_from_exc-8
 mfs r3, resr  /* ESR */
 mfs r4, rear  /* EAR */
 rtbd r0, _unaligned_data_exception
 addik r7, r1, 0  /* parameter struct pt_regs * regs */

/*
 * Page fault traps.
 *
 * If the real exception handler (from hw_exception_handler.S) didn't find
 * the mapping for the process, then we're thrown here to handle such situation.
 *
 * Trap entered via exceptions, so EE bit is set, and interrupts
 * are masked.  This is nice, means we don't have to CLI before state save
 *
 * Build a standard exception frame for TLB Access errors.  All TLB exceptions
 * will bail out to this point if they can't resolve the lightweight TLB fault.
 *
 * The C function called is in "arch/microblaze/mm/fault.c", declared as:
 * void do_page_fault(struct pt_regs *regs,
 * unsigned long address,
 * unsigned long error_code)
 */

/* data and intruction trap - which is choose is resolved int fault.c */
C_ENTRY(page_fault_data_trap):
 SAVE_STATE  /* Save registers.*/
 /* PC, before IRQ/trap - this is one instruction above */
 swi r17, r1, PT_PC;
 tovirt(r1,r1)
 /* where the trap should return need -8 to adjust for rtsd r15, 8 */
 addik r15, r0, ret_from_exc-8
 mfs r6, rear  /* parameter unsigned long address */
 mfs r7, resr  /* parameter unsigned long error_code */
 rted r0, do_page_fault
 addik r5, r1, 0  /* parameter struct pt_regs * regs */

C_ENTRY(page_fault_instr_trap):
 SAVE_STATE  /* Save registers.*/
 /* PC, before IRQ/trap - this is one instruction above */
 swi r17, r1, PT_PC;
 tovirt(r1,r1)
 /* where the trap should return need -8 to adjust for rtsd r15, 8 */
 addik r15, r0, ret_from_exc-8
 mfs r6, rear  /* parameter unsigned long address */
 ori r7, r0, 0  /* parameter unsigned long error_code */
 rted r0, do_page_fault
 addik r5, r1, 0  /* parameter struct pt_regs * regs */

/* Entry point used to return from an exception.  */
C_ENTRY(ret_from_exc):
 lwi r11, r1, PT_MODE;
 bnei r11, 2f;  /* See if returning to kernel mode, */
     /* ... if so, skip resched &c.  */

 /* We're returning to user mode, so check for various conditions that
   trigger rescheduling. */

1:
 lwi r11, CURRENT_TASK, TS_THREAD_INFO; /* get thread info */
 lwi r19, r11, TI_FLAGS; /* get flags in thread info */
 andi r11, r19, _TIF_NEED_RESCHED;
 beqi r11, 5f;

/* Call the scheduler before returning from a syscall/trap. */
 bralid r15, schedule; /* Call scheduler */
 nop;    /* delay slot */
 bri 1b

 /* Maybe handle a signal */
5: andi r11, r19, _TIF_SIGPENDING | _TIF_NOTIFY_RESUME;
 beqi r11, 4f;  /* Signals to handle, handle them */

 /*
 * Handle a signal return; Pending signals should be in r18.
 *
 * Not all registers are saved by the normal trap/interrupt entry
 * points (for instance, call-saved registers (because the normal
 * C-compiler calling sequence in the kernel makes sure they're
 * preserved), and call-clobbered registers in the case of
 * traps), but signal handlers may want to examine or change the
 * complete register state.  Here we save anything not saved by
 * the normal entry sequence, so that it may be safely restored
 * (in a possibly modified form) after do_notify_resume returns. */

 addik r5, r1, 0;  /* Arg 1: struct pt_regs *regs */
 bralid r15, do_notify_resume; /* Handle any signals */
 addi r6, r0, 0;  /* Arg 2: int in_syscall */
 bri 1b

/* Finally, return to user state.  */
4: set_bip;   /* Ints masked for state restore */
 swi CURRENT_TASK, r0, PER_CPU(CURRENT_SAVE); /* save current */
 VM_OFF;
 tophys(r1,r1);

 RESTORE_REGS_RTBD;
 addik r1, r1, PT_SIZE  /* Clean up stack space.  */

 lwi r1, r1, PT_R1 - PT_SIZE; /* Restore user stack pointer. */
 bri 6f;
/* Return to kernel state.  */
2: set_bip;   /* Ints masked for state restore */
 VM_OFF;
 tophys(r1,r1);
 RESTORE_REGS_RTBD;
 addik r1, r1, PT_SIZE  /* Clean up stack space.  */

 tovirt(r1,r1);
6:
EXC_return:  /* Make global symbol for debugging */
 rtbd r14, 0; /* Instructions to return from an IRQ */
 nop;

/*
 * HW EXCEPTION rutine end
 */


/*
 * Hardware maskable interrupts.
 *
 * The stack-pointer (r1) should have already been saved to the memory
 * location PER_CPU(ENTRY_SP).
 */

C_ENTRY(_interrupt):
/* MS: we are in physical address */
/* Save registers, switch to proper stack, convert SP to virtual.*/
 swi r1, r0, TOPHYS(PER_CPU(ENTRY_SP))
 /* MS: See if already in kernel mode. */
 mfs r1, rmsr
 nop
 andi r1, r1, MSR_UMS
 bnei r1, 1f

/* Kernel-mode state save. */
 lwi r1, r0, TOPHYS(PER_CPU(ENTRY_SP))
 tophys(r1,r1); /* MS: I have in r1 physical address where stack is */
 /* save registers */
/* MS: Make room on the stack -> activation record */
 addik r1, r1, -PT_SIZE;
 SAVE_REGS
 brid 2f;
 swi r1, r1, PT_MODE; /* 0 - user mode, 1 - kernel mode */
1:
/* User-mode state save. */
 /* MS: get the saved current */
 lwi r1, r0, TOPHYS(PER_CPU(CURRENT_SAVE));
 tophys(r1,r1);
 lwi r1, r1, TS_THREAD_INFO;
 addik r1, r1, THREAD_SIZE;
 tophys(r1,r1);
 /* save registers */
 addik r1, r1, -PT_SIZE;
 SAVE_REGS
 /* calculate mode */
 swi r0, r1, PT_MODE;
 lwi r11, r0, TOPHYS(PER_CPU(ENTRY_SP));
 swi r11, r1, PT_R1;
 clear_ums;
2:
 lwi CURRENT_TASK, r0, TOPHYS(PER_CPU(CURRENT_SAVE));
 tovirt(r1,r1)
 addik r15, r0, irq_call;
irq_call:rtbd r0, do_IRQ;
 addik r5, r1, 0;

/* MS: we are in virtual mode */
ret_from_irq:
 lwi r11, r1, PT_MODE;
 bnei r11, 2f;

1:
 lwi r11, CURRENT_TASK, TS_THREAD_INFO;
 lwi r19, r11, TI_FLAGS; /* MS: get flags from thread info */
 andi r11, r19, _TIF_NEED_RESCHED;
 beqi r11, 5f
 bralid r15, schedule;
 nop; /* delay slot */
 bri 1b

    /* Maybe handle a signal */
5: andi r11, r19, _TIF_SIGPENDING | _TIF_NOTIFY_RESUME;
 beqid r11, no_intr_resched
/* Handle a signal return; Pending signals should be in r18. */
 addik r5, r1, 0; /* Arg 1: struct pt_regs *regs */
 bralid r15, do_notify_resume; /* Handle any signals */
 addi r6, r0, 0; /* Arg 2: int in_syscall */
 bri 1b

/* Finally, return to user state. */
no_intr_resched:
    /* Disable interrupts, we are now committed to the state restore */
 disable_irq
 swi CURRENT_TASK, r0, PER_CPU(CURRENT_SAVE);
 VM_OFF;
 tophys(r1,r1);
 RESTORE_REGS
 addik r1, r1, PT_SIZE /* MS: Clean up stack space. */
 lwi r1, r1, PT_R1 - PT_SIZE;
 bri 6f;
/* MS: Return to kernel state. */
2:
#ifdef CONFIG_PREEMPTION
 lwi r11, CURRENT_TASK, TS_THREAD_INFO;
 /* MS: get preempt_count from thread info */
 lwi r5, r11, TI_PREEMPT_COUNT;
 bgti r5, restore;

 lwi r5, r11, TI_FLAGS;  /* get flags in thread info */
 andi r5, r5, _TIF_NEED_RESCHED;
 beqi r5, restore /* if zero jump over */

 /* interrupts are off that's why I am calling preempt_chedule_irq */
 bralid r15, preempt_schedule_irq
 nop
restore:
#endif
 VM_OFF /* MS: turn off MMU */
 tophys(r1,r1)
 RESTORE_REGS
 addik r1, r1, PT_SIZE /* MS: Clean up stack space. */
 tovirt(r1,r1);
6:
IRQ_return: /* MS: Make global symbol for debugging */
 rtid r14, 0
 nop

#ifdef CONFIG_MB_MANAGER

#define PT_PID  PT_SIZE
#define PT_TLBI  PT_SIZE + 4
#define PT_ZPR  PT_SIZE + 8
#define PT_TLBL0 PT_SIZE + 12
#define PT_TLBH0 PT_SIZE + 16

C_ENTRY(_xtmr_manager_reset):
 lwi r1, r0, xmb_manager_stackpointer

 /* Restore MSR */
 lwi r2, r1, PT_MSR
 mts rmsr, r2
 bri 4

 /* restore Special purpose registers */
 lwi r2, r1, PT_PID
 mts rpid, r2

 lwi r2, r1, PT_TLBI
 mts rtlbx, r2

 lwi r2, r1, PT_ZPR
 mts rzpr, r2

#if CONFIG_XILINX_MICROBLAZE0_USE_FPU
 lwi r2, r1, PT_FSR
 mts rfsr, r2
#endif

 /* restore all the tlb's */
 addik r3, r0, TOPHYS(tlb_skip)
 addik r6, r0, PT_TLBL0
 addik r7, r0, PT_TLBH0
restore_tlb:
 add r6, r6, r1
 add r7, r7, r1
 lwi r2, r6, 0
 mts  rtlblo, r2
 lwi r2, r7, 0
 mts rtlbhi, r2
 addik r6, r6, 4
 addik r7, r7, 4
 bgtid r3, restore_tlb
 addik r3, r3, -1

 lwi   r5, r0, TOPHYS(xmb_manager_dev)
 lwi r8, r0, TOPHYS(xmb_manager_reset_callback)
 set_vms
 /* return from reset need -8 to adjust for rtsd r15, 8 */
 addik   r15, r0, ret_from_reset - 8
 rtbd r8, 0
 nop

ret_from_reset:
 set_bip /* Ints masked for state restore */
 VM_OFF
 /* MS: Restore all regs */
 RESTORE_REGS
 lwi r14, r1, PT_R14
 lwi r16, r1, PT_PC
 addik r1, r1, PT_SIZE + 36
 rtbd r16, 0
 nop

/*
 * Break handler for MB Manager. Enter to _xmb_manager_break by
 * injecting fault in one of the TMR Microblaze core.
 * FIXME: This break handler supports getting
 * called from kernel space only.
 */

C_ENTRY(_xmb_manager_break):
 /*
 * Reserve memory in the stack for context store/restore
 * (which includes memory for storing tlbs (max two tlbs))
 */

 addik r1, r1, -PT_SIZE - 36
 swi r1, r0, xmb_manager_stackpointer
 SAVE_REGS
 swi r14, r1, PT_R14 /* rewrite saved R14 value */
 swi r16, r1, PT_PC; /* PC and r16 are the same */

 lwi r6, r0, TOPHYS(xmb_manager_baseaddr)
 lwi r7, r0, TOPHYS(xmb_manager_crval)
 /*
 * When the break vector gets asserted because of error injection,
 * the break signal must be blocked before exiting from the
 * break handler, below code configures the tmr manager
 * control register to block break signal.
 */

 swi r7, r6, 0

 /* Save the special purpose registers  */
 mfs r2, rpid
 swi r2, r1, PT_PID

 mfs r2, rtlbx
 swi r2, r1, PT_TLBI

 mfs r2, rzpr
 swi r2, r1, PT_ZPR

#if CONFIG_XILINX_MICROBLAZE0_USE_FPU
 mfs r2, rfsr
 swi r2, r1, PT_FSR
#endif
 mfs r2, rmsr
 swi r2, r1, PT_MSR

 /* Save all the tlb's */
 addik r3, r0, TOPHYS(tlb_skip)
 addik r6, r0, PT_TLBL0
 addik r7, r0, PT_TLBH0
save_tlb:
 add r6, r6, r1
 add r7, r7, r1
 mfs r2, rtlblo
 swi r2, r6, 0
 mfs r2, rtlbhi
 swi r2, r7, 0
 addik r6, r6, 4
 addik r7, r7, 4
 bgtid r3, save_tlb
 addik r3, r3, -1

 lwi   r5, r0, TOPHYS(xmb_manager_dev)
 lwi r8, r0, TOPHYS(xmb_manager_callback)
 /* return from break need -8 to adjust for rtsd r15, 8 */
 addik   r15, r0, ret_from_break - 8
 rtbd r8, 0
 nop

ret_from_break:
 /* flush the d-cache */
 bralid r15, mb_flush_dcache
 nop

 /*
 * To make sure microblaze i-cache is in a proper state
 * invalidate the i-cache.
 */

 bralid r15, mb_invalidate_icache
 nop

 set_bip; /* Ints masked for state restore */
 VM_OFF;
 mbar 1
 mbar 2
 bri 4
 suspend
 nop
#endif

/*
 * Debug trap for KGDB. Enter to _debug_exception by brki r16, 0x18
 * and call handling function with saved pt_regs
 */

C_ENTRY(_debug_exception):
 /* BIP bit is set on entry, no interrupts can occur */
 swi r1, r0, TOPHYS(PER_CPU(ENTRY_SP))

 mfs r1, rmsr
 nop
 andi r1, r1, MSR_UMS
 bnei r1, 1f
/* MS: Kernel-mode state save - kgdb */
 lwi r1, r0, TOPHYS(PER_CPU(ENTRY_SP)); /* Reload kernel stack-ptr*/

 /* BIP bit is set on entry, no interrupts can occur */
 addik   r1, r1, CONFIG_KERNEL_BASE_ADDR - CONFIG_KERNEL_START - PT_SIZE;
 SAVE_REGS;
 /* save all regs to pt_reg structure */
 swi r0, r1, PT_R0; /* R0 must be saved too */
 swi r14, r1, PT_R14 /* rewrite saved R14 value */
 swi r16, r1, PT_PC; /* PC and r16 are the same */
 /* save special purpose registers to pt_regs */
 mfs r11, rear;
 swi r11, r1, PT_EAR;
 mfs r11, resr;
 swi r11, r1, PT_ESR;
 mfs r11, rfsr;
 swi r11, r1, PT_FSR;

 /* stack pointer is in physical address at it is decrease
 * by PT_SIZE but we need to get correct R1 value */

 addik   r11, r1, CONFIG_KERNEL_START - CONFIG_KERNEL_BASE_ADDR + PT_SIZE;
 swi r11, r1, PT_R1
 /* MS: r31 - current pointer isn't changed */
 tovirt(r1,r1)
#ifdef CONFIG_KGDB
 addi r5, r1, 0 /* pass pt_reg address as the first arg */
 addik r15, r0, dbtrap_call; /* return address */
 rtbd r0, microblaze_kgdb_break
 nop;
#endif
 /* MS: Place handler for brki from kernel space if KGDB is OFF.
 * It is very unlikely that another brki instruction is called. */

 bri 0

/* MS: User-mode state save - gdb */
1: lwi r1, r0, TOPHYS(PER_CPU(CURRENT_SAVE)); /* get saved current */
 tophys(r1,r1);
 lwi r1, r1, TS_THREAD_INFO; /* get the thread info */
 addik r1, r1, THREAD_SIZE; /* calculate kernel stack pointer */
 tophys(r1,r1);

 addik r1, r1, -PT_SIZE; /* Make room on the stack.  */
 SAVE_REGS;
 swi r16, r1, PT_PC; /* Save LP */
 swi r0, r1, PT_MODE; /* Was in user-mode.  */
 lwi r11, r0, TOPHYS(PER_CPU(ENTRY_SP));
 swi r11, r1, PT_R1; /* Store user SP.  */
 lwi CURRENT_TASK, r0, TOPHYS(PER_CPU(CURRENT_SAVE));
 tovirt(r1,r1)
 set_vms;
 addik r5, r1, 0;
 addik r15, r0, dbtrap_call;
dbtrap_call: /* Return point for kernel/user entry + 8 because of rtsd r15, 8 */
 rtbd r0, sw_exception
 nop

 /* MS: The first instruction for the second part of the gdb/kgdb */
 set_bip; /* Ints masked for state restore */
 lwi r11, r1, PT_MODE;
 bnei r11, 2f;
/* MS: Return to user space - gdb */
1:
 /* Get current task ptr into r11 */
 lwi r11, CURRENT_TASK, TS_THREAD_INFO; /* get thread info */
 lwi r19, r11, TI_FLAGS; /* get flags in thread info */
 andi r11, r19, _TIF_NEED_RESCHED;
 beqi r11, 5f;

 /* Call the scheduler before returning from a syscall/trap. */
 bralid r15, schedule; /* Call scheduler */
 nop;    /* delay slot */
 bri 1b

 /* Maybe handle a signal */
5: andi r11, r19, _TIF_SIGPENDING | _TIF_NOTIFY_RESUME;
 beqi r11, 4f;  /* Signals to handle, handle them */

 addik r5, r1, 0;  /* Arg 1: struct pt_regs *regs */
 bralid r15, do_notify_resume; /* Handle any signals */
 addi  r6, r0, 0; /* Arg 2: int in_syscall */
 bri 1b

/* Finally, return to user state.  */
4: swi CURRENT_TASK, r0, PER_CPU(CURRENT_SAVE); /* save current */
 VM_OFF;
 tophys(r1,r1);
 /* MS: Restore all regs */
 RESTORE_REGS_RTBD
 addik r1, r1, PT_SIZE  /* Clean up stack space */
 lwi r1, r1, PT_R1 - PT_SIZE; /* Restore user stack pointer */
DBTRAP_return_user: /* MS: Make global symbol for debugging */
 rtbd r16, 0; /* MS: Instructions to return from a debug trap */
 nop;

/* MS: Return to kernel state - kgdb */
2: VM_OFF;
 tophys(r1,r1);
 /* MS: Restore all regs */
 RESTORE_REGS_RTBD
 lwi r14, r1, PT_R14;
 lwi r16, r1, PT_PC;
 addik r1, r1, PT_SIZE; /* MS: Clean up stack space */
 tovirt(r1,r1);
DBTRAP_return_kernel: /* MS: Make global symbol for debugging */
 rtbd r16, 0; /* MS: Instructions to return from a debug trap */
 nop;


ENTRY(_switch_to)
 /* prepare return value */
 addk r3, r0, CURRENT_TASK

 /* save registers in cpu_context */
 /* use r11 and r12, volatile registers, as temp register */
 /* give start of cpu_context for previous process */
 addik r11, r5, TI_CPU_CONTEXT
 swi r1, r11, CC_R1
 swi r2, r11, CC_R2
 /* skip volatile registers.
 * they are saved on stack when we jumped to _switch_to() */

 /* dedicated registers */
 swi r13, r11, CC_R13
 swi r14, r11, CC_R14
 swi r15, r11, CC_R15
 swi r16, r11, CC_R16
 swi r17, r11, CC_R17
 swi r18, r11, CC_R18
 /* save non-volatile registers */
 swi r19, r11, CC_R19
 swi r20, r11, CC_R20
 swi r21, r11, CC_R21
 swi r22, r11, CC_R22
 swi r23, r11, CC_R23
 swi r24, r11, CC_R24
 swi r25, r11, CC_R25
 swi r26, r11, CC_R26
 swi r27, r11, CC_R27
 swi r28, r11, CC_R28
 swi r29, r11, CC_R29
 swi r30, r11, CC_R30
 /* special purpose registers */
 mfs r12, rmsr
 swi r12, r11, CC_MSR
 mfs r12, rear
 swi r12, r11, CC_EAR
 mfs r12, resr
 swi r12, r11, CC_ESR
 mfs r12, rfsr
 swi r12, r11, CC_FSR

 /* update r31, the current-give me pointer to task which will be next */
 lwi CURRENT_TASK, r6, TI_TASK
 /* stored it to current_save too */
 swi CURRENT_TASK, r0, PER_CPU(CURRENT_SAVE)

 /* get new process' cpu context and restore */
 /* give me start where start context of next task */
 addik r11, r6, TI_CPU_CONTEXT

 /* non-volatile registers */
 lwi r30, r11, CC_R30
 lwi r29, r11, CC_R29
 lwi r28, r11, CC_R28
 lwi r27, r11, CC_R27
 lwi r26, r11, CC_R26
 lwi r25, r11, CC_R25
 lwi r24, r11, CC_R24
 lwi r23, r11, CC_R23
 lwi r22, r11, CC_R22
 lwi r21, r11, CC_R21
 lwi r20, r11, CC_R20
 lwi r19, r11, CC_R19
 /* dedicated registers */
 lwi r18, r11, CC_R18
 lwi r17, r11, CC_R17
 lwi r16, r11, CC_R16
 lwi r15, r11, CC_R15
 lwi r14, r11, CC_R14
 lwi r13, r11, CC_R13
 /* skip volatile registers */
 lwi r2, r11, CC_R2
 lwi r1, r11, CC_R1

 /* special purpose registers */
 lwi r12, r11, CC_FSR
 mts rfsr, r12
 lwi r12, r11, CC_MSR
 mts rmsr, r12

 rtsd r15, 8
 nop

#ifdef CONFIG_MB_MANAGER
.global xmb_inject_err
.section .text
.align 2
.ent xmb_inject_err
.type xmb_inject_err, @function
xmb_inject_err:
 addik r1, r1, -PT_SIZE
 SAVE_REGS

 /* Switch to real mode */
 VM_OFF;
 set_bip;
 mbar 1
 mbar 2
 bralid r15, XMB_INJECT_ERR_OFFSET
 nop;

 /* enable virtual mode */
 set_vms;
 /* barrier for instructions and data accesses */
 mbar 1
 mbar 2
 /*
 * Enable Interrupts, Virtual Protected Mode, equalize
 * initial state for all possible entries.
 */

 rtbd    r0, 1f
 nop;
1:
 RESTORE_REGS
 addik r1, r1, PT_SIZE
 rtsd r15, 8;
 nop;
.end xmb_inject_err

.section .data
.global xmb_manager_dev
.global xmb_manager_baseaddr
.global xmb_manager_crval
.global xmb_manager_callback
.global xmb_manager_reset_callback
.global xmb_manager_stackpointer
.align 4
xmb_manager_dev:
 .long 0
xmb_manager_baseaddr:
 .long 0
xmb_manager_crval:
 .long 0
xmb_manager_callback:
 .long 0
xmb_manager_reset_callback:
 .long 0
xmb_manager_stackpointer:
 .long 0

/*
 * When the break vector gets asserted because of error injection,
 * the break signal must be blocked before exiting from the
 * break handler, Below api updates the manager address and
 * control register and error count callback arguments,
 * which will be used by the break handler to block the
 * break and call the callback function.
 */

.global xmb_manager_register
.section .text
.align 2
.ent xmb_manager_register
.type xmb_manager_register, @function
xmb_manager_register:
 swi r5, r0, xmb_manager_baseaddr
 swi r6, r0, xmb_manager_crval
 swi r7, r0, xmb_manager_callback
 swi r8, r0, xmb_manager_dev
 swi r9, r0, xmb_manager_reset_callback

 rtsd r15, 8;
 nop;
.end xmb_manager_register
#endif

ENTRY(_reset)
 VM_OFF
 brai 0; /* Jump to reset vector */

 /* These are compiled and loaded into high memory, then
 * copied into place in mach_early_setup */

 .section .init.ivt, "ax"
#if CONFIG_MANUAL_RESET_VECTOR && !defined(CONFIG_MB_MANAGER)
 .org 0x0
 brai CONFIG_MANUAL_RESET_VECTOR
#elif defined(CONFIG_MB_MANAGER)
 .org 0x0
 brai TOPHYS(_xtmr_manager_reset);
#endif
 .org 0x8
 brai TOPHYS(_user_exception); /* syscall handler */
 .org 0x10
 brai TOPHYS(_interrupt); /* Interrupt handler */
#ifdef CONFIG_MB_MANAGER
 .org 0x18
 brai TOPHYS(_xmb_manager_break); /* microblaze manager break handler */
#else
 .org 0x18
 brai TOPHYS(_debug_exception); /* debug trap handler */
#endif
 .org 0x20
 brai TOPHYS(_hw_exception_handler); /* HW exception handler */

#ifdef CONFIG_MB_MANAGER
 /*
 * For TMR Inject API which injects the error should
 * be executed from LMB.
 * TMR Inject is programmed with address of 0x200 so that
 * when program counter matches with this address error will
 * be injected. 0x200 is expected to be next available bram
 * offset, hence used for this api.
 */

 .org XMB_INJECT_ERR_OFFSET
xmb_inject_error:
 nop
 rtsd r15, 8
 nop
#endif

.section .rodata,"a"
#include "syscall_table.S"

syscall_table_size=(.-sys_call_table)

type_SYSCALL:
 .ascii "SYSCALL\0"
type_IRQ:
 .ascii "IRQ\0"
type_IRQ_PREEMPT:
 .ascii "IRQ (PREEMPTED)\0"
type_SYSCALL_PREEMPT:
 .ascii " SYSCALL (PREEMPTED)\0"

 /*
 * Trap decoding for stack unwinder
 * Tuples are (start addr, end addr, string)
 * If return address lies on [start addr, end addr],
 * unwinder displays 'string'
 */


 .align 4
.global microblaze_trap_handlers
microblaze_trap_handlers:
 /* Exact matches come first */
 .word ret_from_trap; .word ret_from_trap   ; .word type_SYSCALL
 .word ret_from_irq ; .word ret_from_irq    ; .word type_IRQ
 /* Fuzzy matches go here */
 .word ret_from_irq ; .word no_intr_resched ; .word type_IRQ_PREEMPT
 .word ret_from_trap; .word TRAP_return     ; .word type_SYSCALL_PREEMPT
 /* End of table */
 .word 0               ; .word 0               ; .word 0

Messung V0.5
C=78 H=100 G=89

¤ Diese beiden folgenden Angebotsgruppen bietet das Unternehmen0.9Angebot  ¤

*Eine klare Vorstellung vom Zielzustand






Wurzel

Suchen

Beweissystem der NASA

Beweissystem Isabelle

NIST Cobol Testsuite

Cephes Mathematical Library

Wiener Entwicklungsmethode

Haftungshinweis

Die Informationen auf dieser Webseite wurden nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit, noch Qualität der bereit gestellten Informationen zugesichert.

Bemerkung:

Die farbliche Syntaxdarstellung und die Messung sind noch experimentell.