arch/arm-raspi/kernel/kernel_intern.h

   1 /*
   2     Copyright © 2013-2015, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #ifndef KERNEL_INTERN_H_
   7 #define KERNEL_INTERN_H_
   8
   9 #include <aros/libcall.h>
  10 #include <inttypes.h>
  11 #include <exec/lists.h>
  12 #include <exec/execbase.h>
  13 #include <exec/memory.h>
  14 #include <utility/tagitem.h>
  15 #include <stdio.h>
  16 #include <stdarg.h>
  17
  18 extern uint32_t __arm_periiobase;
  19 #define ARM_PERIIOBASE (__arm_periiobase)
  20 #include <hardware/bcm283x.h>
  21
  22 #undef KernelBase
  23
  24 /* Use system timer 3 for our scheduling heartbeat */
  25 #define VBLANK_TIMER            3
  26 #define VBLANK_INTERVAL         (1000000 / 50)
  27
  28 #define KERNEL_PHYS_BASE        0x07800000
  29 #define KERNEL_VIRT_BASE        0xff800000
  30
  31 #define VFPEnable               (1 << 30)
  32 #define VFPSingle               (3 << 20)
  33 #define VFPDouble               (3 << 22)
  34
  35 void core_SetupMMU(void);
  36 void core_SetupIntr(void);
  37
  38 void *KrnAddSysTimerHandler(struct KernelBase *);
  39
  40 intptr_t krnGetTagData(Tag tagValue, intptr_t defaultVal, const struct TagItem *tagList);
  41 struct TagItem *krnFindTagItem(Tag tagValue, const struct TagItem *tagList);
  42 struct TagItem *krnNextTagItem(const struct TagItem **tagListPtr);
  43
  44 struct KernelBase *getKernelBase();
  45
  46 #ifdef bug
  47 #undef bug
  48 #endif
  49 #ifdef D
  50 #undef D
  51 #endif
  52 #if DEBUG
  53 #define D(x) x
  54 #define DALLOCMEM(x)
  55 #else
  56 #define D(x)
  57 #define DALLOCMEM(x)
  58 #endif
  59
  60 #define __STR(x) #x
  61 #define STR(x) __STR(x)
  62
  63 AROS_LD2(int, KrnBug,
  64          AROS_LDA(const char *, format, A0),
  65          AROS_LDA(va_list, args, A1),
  66          struct KernelBase *, KernelBase, 12, Kernel);
  67
  68 static inline void bug(const char *format, ...)
  69 {
  70     struct KernelBase *kbase = getKernelBase();
  71     va_list args;
  72     va_start(args, format);
  73     AROS_SLIB_ENTRY(KrnBug, Kernel, 12)(format, args, kbase);
  74     va_end(args);
  75 }
  76
  77 #define VECTCOMMON_START \
  78     "           sub     sp, sp, #4*4           \n" \
  79     "           stmfd   sp!, {r0-r12}          \n" \
  80     "           mov     r0, sp                 \n" \
  81     "           mrs     r1, spsr               \n" \
  82     "           str     r1, [r0, #16*4]        \n" \
  83     "           str     lr, [r0, #15*4]        \n"
  84
  85 #define VECTCOMMON_END \
  86     "           add     r1, sp, #13*4          \n" \
  87     "           ldm     r1, {sp}^              \n" \
  88     "           add     r1, sp, #14*4          \n" \
  89     "           ldm     r1, {lr}^              \n" \
  90     "           ldr     lr, [sp, #15*4]        \n" \
  91     "           ldr     r1, [sp, #16*4]        \n" \
  92     "           msr     spsr, r1               \n" \
  93     "           ldmfd   sp!, {r0-r12}          \n" \
  94     "           add     sp, sp, #4*4           \n" \
  95     "           movs    pc, lr                 \n"
  96
  97 #define STORE_TASKSTATE(task, regs)                                             \
  98     struct ExceptionContext *ctx = task->tc_UnionETask.tc_ETask->et_RegFrame;   \
  99     int __task_reg_no;                                                          \
 100     for (__task_reg_no = 0; __task_reg_no < 12; __task_reg_no++)                \
 101     {                                                                           \
 102         ctx->r[__task_reg_no] = ((uint32_t *)regs)[__task_reg_no];              \
 103     }                                                                           \
 104     ctx->ip = ((uint32_t *)regs)[12];                                           \
 105     ctx->sp = task->tc_SPReg = ((uint32_t *)regs)[13];                          \
 106     ctx->lr = ((uint32_t *)regs)[14];                                           \
 107     ctx->pc = ((uint32_t *)regs)[15];                                           \
 108     ctx->cpsr = ((uint32_t *)regs)[16];
 109
 110 #define RESTORE_TASKSTATE(task, regs)                                           \
 111     struct ExceptionContext *ctx = task->tc_UnionETask.tc_ETask->et_RegFrame;   \
 112     int __task_reg_no;                                                          \
 113     for (__task_reg_no = 0; __task_reg_no < 12; __task_reg_no++)                \
 114     {                                                                           \
 115         ((uint32_t *)regs)[__task_reg_no] = ctx->r[__task_reg_no];              \
 116     }                                                                           \
 117     ((uint32_t *)regs)[12] = ctx->ip;                                           \
 118     ((uint32_t *)regs)[13] = ctx->sp = task->tc_SPReg;                          \
 119     ((uint32_t *)regs)[14] = ctx->lr;                                           \
 120     ((uint32_t *)regs)[15] = ctx->pc;                                           \
 121     ((uint32_t *)regs)[16] = ctx->cpsr;
 122
 123 #endif /*KERNEL_INTERN_H_*/