arch/arm-native/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 #include "kernel_arm.h"
  19
  20 #undef KernelBase
  21 struct KernelBase;
  22
  23 /* Use system timer 3 for our scheduling heartbeat */
  24 #define VBLANK_TIMER            3
  25 #define VBLANK_INTERVAL         (1000000 / 50)
  26
  27 #define KERNEL_PHYS_BASE        0x07800000
  28 #define KERNEL_VIRT_BASE        0xff800000
  29
  30 #define VFPEnable               (1 << 30)
  31 #define VFPSingle               (3 << 20)
  32 #define VFPDouble               (3 << 22)
  33
  34 void cpu_Probe(struct ARM_Implementation *);
  35 void cpu_Init(struct ARM_Implementation *, struct TagItem *);
  36
  37 void platform_Init(struct ARM_Implementation *, struct TagItem *);
  38
  39 void core_SetupMMU(struct TagItem *msg);
  40 void core_SetupIntr(void);
  41
  42 void *KrnAddSysTimerHandler(struct KernelBase *);
  43
  44 intptr_t krnGetTagData(Tag tagValue, intptr_t defaultVal, const struct TagItem *tagList);
  45 struct TagItem *krnFindTagItem(Tag tagValue, const struct TagItem *tagList);
  46 struct TagItem *krnNextTagItem(const struct TagItem **tagListPtr);
  47
  48 struct KernelBase *getKernelBase();
  49
  50 #ifdef bug
  51 #undef bug
  52 #endif
  53 #ifdef D
  54 #undef D
  55 #endif
  56 #if DEBUG
  57 #define D(x) x
  58 #define DALLOCMEM(x)
  59 #else
  60 #define D(x)
  61 #define DALLOCMEM(x)
  62 #endif
  63
  64 #define __STR(x) #x
  65 #define STR(x) __STR(x)
  66
  67 AROS_LD2(int, KrnBug,
  68          AROS_LDA(const char *, format, A0),
  69          AROS_LDA(va_list, args, A1),
  70          struct KernelBase *, KernelBase, 12, Kernel);
  71
  72 static inline void bug(const char *format, ...)
  73 {
  74     struct KernelBase *kbase = getKernelBase();
  75     va_list args;
  76     va_start(args, format);
  77     AROS_SLIB_ENTRY(KrnBug, Kernel, 12)(format, args, kbase);
  78     va_end(args);
  79 }
  80
  81 #define VECTCOMMON_START \
  82     "           srsfd   sp!, #0x13              \n" \
  83     "           cpsid   i, #0x13                \n" \
  84     "           sub     sp, sp, #2*4            \n" \
  85     "           stmfd   sp!, {r0-r12}           \n" \
  86     "           mov     r0, sp                  \n" \
  87     "           ldr     ip, [r0, #16*4]         \n" \
  88     "           and     ip, ip, #0x1f           \n" \
  89     "           cmp     ip, #0x10               \n" \
  90     "           cmpne   ip, #0x1f               \n" \
  91     "           addeq   r1, r0, #13*4           \n" \
  92     "           stmeq   r1, {sp, lr}^           \n" \
  93     "           strne   lr, [r0, #14*4]         \n"
  94
  95 #define VECTCOMMON_END \
  96     "           ldr     ip, [sp, #16*4]         \n" \
  97     "           and     ip, ip, #0x1f           \n" \
  98     "           cmp     ip, #0x10               \n" \
  99     "           cmpne   ip, #0x1f               \n" \
 100     "           addeq   r1, sp, #13*4           \n" \
 101     "           ldmeq   r1, {sp, lr}^           \n" \
 102     "           ldrne   lr, [sp, #14*4]         \n" \
 103     "           ldmfd   sp!, {r0-r12}           \n" \
 104     "           add     sp, sp, #2*4            \n" \
 105     "           rfefd   sp!                     \n"
 106
 107 #define STORE_TASKSTATE(task, regs)                                             \
 108     struct ExceptionContext *ctx = task->tc_UnionETask.tc_ETask->et_RegFrame;   \
 109     int __task_reg_no;                                                          \
 110     for (__task_reg_no = 0; __task_reg_no < 12; __task_reg_no++)                \
 111     {                                                                           \
 112         ctx->r[__task_reg_no] = ((uint32_t *)regs)[__task_reg_no];              \
 113     }                                                                           \
 114     ctx->ip = ((uint32_t *)regs)[12];                                           \
 115     ctx->sp = task->tc_SPReg = ((uint32_t *)regs)[13];                          \
 116     ctx->lr = ((uint32_t *)regs)[14];                                           \
 117     ctx->pc = ((uint32_t *)regs)[15];                                           \
 118     ctx->cpsr = ((uint32_t *)regs)[16];
 119
 120 #define RESTORE_TASKSTATE(task, regs)                                           \
 121     struct ExceptionContext *ctx = task->tc_UnionETask.tc_ETask->et_RegFrame;   \
 122     int __task_reg_no;                                                          \
 123     for (__task_reg_no = 0; __task_reg_no < 12; __task_reg_no++)                \
 124     {                                                                           \
 125         ((uint32_t *)regs)[__task_reg_no] = ctx->r[__task_reg_no];              \
 126     }                                                                           \
 127     ((uint32_t *)regs)[12] = ctx->ip;                                           \
 128     ((uint32_t *)regs)[13] = ctx->sp = task->tc_SPReg;                          \
 129     ((uint32_t *)regs)[14] = ctx->lr;                                           \
 130     ((uint32_t *)regs)[15] = ctx->pc;                                           \
 131     ((uint32_t *)regs)[16] = ctx->cpsr;
 132
 133 #endif /*KERNEL_INTERN_H_*/