Add ARM task switching support\!
[bertos.git] / cpu / cpu.h
1 /**
2  * \file
3  * <!--
4  * This file is part of BeRTOS.
5  *
6  * Bertos is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
19  *
20  * As a special exception, you may use this file as part of a free software
21  * library without restriction.  Specifically, if other files instantiate
22  * templates or use macros or inline functions from this file, or you compile
23  * this file and link it with other files to produce an executable, this
24  * file does not by itself cause the resulting executable to be covered by
25  * the GNU General Public License.  This exception does not however
26  * invalidate any other reasons why the executable file might be covered by
27  * the GNU General Public License.
28  *
29  * Copyright 2004, 2005, 2006, 2007 Develer S.r.l. (http://www.develer.com/)
30  * Copyright 2004 Giovanni Bajo
31  *
32  * -->
33  *
34  * \brief CPU-specific definitions
35  *
36  * \author Giovanni Bajo <rasky@develer.com>
37  * \author Bernardo Innocenti <bernie@develer.com>
38  * \author Stefano Fedrigo <aleph@develer.com>
39  * \author Francesco Sacchi <batt@develer.com>
40  */
41 #ifndef CPU_CPU_H
42 #define CPU_CPU_H
43
44 #include "detect.h"
45 #include <cfg/compiler.h> /* for uintXX_t */
46 #include <cfg/arch_config.h>  /* ARCH_EMUL */
47
48
49 /**
50  * \name Macros for determining CPU endianness.
51  * \{
52  */
53 #define CPU_BIG_ENDIAN    0x1234
54 #define CPU_LITTLE_ENDIAN 0x3412 /* Look twice, pal. This is not a bug. */
55 /*\}*/
56
57 /** Macro to include cpu-specific versions of the headers. */
58 #define CPU_HEADER(module)          PP_STRINGIZE(drv/PP_CAT3(module, _, CPU_ID).h)
59
60 /** Macro to include cpu-specific versions of implementation files. */
61 #define CPU_CSOURCE(module)         PP_STRINGIZE(drv/PP_CAT3(module, _, CPU_ID).c)
62
63
64 #if CPU_I196
65
66         #define NOP                     nop_instruction()
67         #define IRQ_DISABLE             disable_interrupt()
68         #define IRQ_ENABLE              enable_interrupt()
69
70         typedef uint16_t cpuflags_t; // FIXME
71         typedef unsigned int cpustack_t;
72
73         #define CPU_REG_BITS            16
74         #define CPU_REGS_CNT            16
75         #define CPU_STACK_GROWS_UPWARD  0
76         #define CPU_SP_ON_EMPTY_SLOT    0
77         #define CPU_BYTE_ORDER          CPU_LITTLE_ENDIAN
78         #define CPU_HARVARD             0
79
80 #elif CPU_X86
81
82         #define NOP                     asm volatile ("nop")
83
84         /* Get IRQ_* definitions from the hosting environment. */
85         #include <cfg/os.h>
86         #if OS_EMBEDDED
87                 #define IRQ_DISABLE             FIXME
88                 #define IRQ_ENABLE              FIXME
89                 #define IRQ_SAVE_DISABLE(x)     FIXME
90                 #define IRQ_RESTORE(x)          FIXME
91                 typedef uint32_t cpuflags_t; // FIXME
92         #endif /* OS_EMBEDDED */
93
94
95         #define CPU_REGS_CNT            7
96         #define CPU_SAVED_REGS_CNT      7
97         #define CPU_STACK_GROWS_UPWARD  0
98         #define CPU_SP_ON_EMPTY_SLOT    0
99         #define CPU_BYTE_ORDER          CPU_LITTLE_ENDIAN
100         #define CPU_HARVARD             0
101
102         #if CPU_X86_64
103                 typedef uint64_t cpustack_t;
104                 #define CPU_REG_BITS    64
105
106                 #ifdef __WIN64__
107                         /* WIN64 is an IL32-P64 weirdo. */
108                         #define SIZEOF_LONG  4
109                 #endif
110         #else
111                 typedef uint32_t cpustack_t;
112                 #define CPU_REG_BITS    32
113         #endif
114
115 #elif CPU_ARM
116
117         typedef uint32_t cpuflags_t;
118         typedef uint32_t cpustack_t;
119
120         /* Register counts include SREG too */
121         #define CPU_REG_BITS           32
122         #define CPU_REGS_CNT           16
123         #define CPU_SAVED_REGS_CNT     9
124         #define CPU_STACK_GROWS_UPWARD 0
125         #define CPU_SP_ON_EMPTY_SLOT   0
126         #define CPU_BYTE_ORDER         (__BIG_ENDIAN__ ? CPU_BIG_ENDIAN : CPU_LITTLE_ENDIAN)
127         #define CPU_HARVARD            0
128
129         #ifdef __IAR_SYSTEMS_ICC__
130
131                 #include <inarm.h>
132
133                 #if __CPU_MODE__ == 1 /* Thumb */
134                         /* Use stubs */
135                         extern cpuflags_t get_CPSR(void);
136                         extern void set_CPSR(cpuflags_t flags);
137                 #else
138                         #define get_CPSR __get_CPSR
139                         #define set_CPSR __set_CPSR
140                 #endif
141
142                 #define NOP         __no_operation()
143                 #define IRQ_DISABLE __disable_interrupt()
144                 #define IRQ_ENABLE  __enable_interrupt()
145
146                 #define IRQ_SAVE_DISABLE(x) \
147                 do { \
148                         (x) = get_CPSR(); \
149                         __disable_interrupt(); \
150                 } while (0)
151
152                 #define IRQ_RESTORE(x) \
153                 do { \
154                         set_CPSR(x); \
155                 } while (0)
156
157                 #define IRQ_GETSTATE() \
158                         ((bool)(get_CPSR() & 0xb0))
159
160                 #define BREAKPOINT  /* asm("bkpt 0") DOES NOT WORK */
161
162         #else /* !__IAR_SYSTEMS_ICC__ */
163                 #define NOP         asm volatile ("mov r0,r0" ::)
164
165                 #define IRQ_DISABLE \
166                 do { \
167                         asm volatile ( \
168                                 "mrs r0, cpsr\n\t" \
169                                 "orr r0, r0, #0xc0\n\t" \
170                                 "msr cpsr_c, r0" \
171                                 ::: "r0" \
172                         ); \
173                 } while (0)
174
175                 #define IRQ_ENABLE \
176                 do { \
177                         asm volatile ( \
178                                 "mrs r0, cpsr\n\t" \
179                                 "bic r0, r0, #0xc0\n\t" \
180                                 "msr cpsr_c, r0" \
181                                 ::: "r0" \
182                         ); \
183                 } while (0)
184
185                 #define IRQ_SAVE_DISABLE(x) \
186                 do { \
187                         asm volatile ( \
188                                 "mrs %0, cpsr\n\t" \
189                                 "orr r0, %0, #0xc0\n\t" \
190                                 "msr cpsr_c, r0" \
191                                 : "=r" (x) \
192                                 : /* no inputs */ \
193                                 : "r0" \
194                         ); \
195                 } while (0)
196
197                 #define IRQ_RESTORE(x) \
198                 do { \
199                         asm volatile ( \
200                                 "msr cpsr_c, %0" \
201                                 : /* no outputs */ \
202                                 : "r" (x) \
203                         ); \
204                 } while (0)
205
206                 #define CPU_READ_FLAGS() \
207                 ({ \
208                         uint32_t sreg; \
209                         asm volatile ( \
210                                 "mrs %0, cpsr\n\t" \
211                                 : "=r" (sreg) \
212                                 : /* no inputs */ \
213                         ); \
214                         sreg; \
215                 })
216
217                 #define IRQ_GETSTATE() (!((CPU_READ_FLAGS() & 0xc0) == 0xc0))
218
219                 /**
220                  * Initialization value for registers in stack frame.
221                  * The register index is not directly corrispondent to CPU
222                  * register numbers, but is related to how are pushed to stack (\see asm_switch_context).
223                  * Index (CPU_SAVED_REGS_CNT - 1) is the CPSR register:
224                  * the initial value is taken from current CPSR.
225                  */
226                 #define CPU_REG_INIT_VALUE(reg) (reg == (CPU_SAVED_REGS_CNT - 1) ? CPU_READ_FLAGS() : 0)
227
228         #endif /* !__IAR_SYSTEMS_ICC_ */
229
230 #elif CPU_PPC
231         #define NOP                 asm volatile ("nop" ::)
232
233         #define IRQ_DISABLE         FIXME
234         #define IRQ_ENABLE          FIXME
235         #define IRQ_SAVE_DISABLE(x) FIXME
236         #define IRQ_RESTORE(x)      FIXME
237         #define IRQ_GETSTATE()      FIXME
238
239         typedef uint32_t cpuflags_t; // FIXME
240         typedef uint32_t cpustack_t; // FIXME
241
242         /* Register counts include SREG too */
243         #define CPU_REG_BITS           (CPU_PPC32 ? 32 : 64)
244         #define CPU_REGS_CNT           FIXME
245         #define CPU_SAVED_REGS_CNT     FIXME
246         #define CPU_STACK_GROWS_UPWARD 0  //FIXME
247         #define CPU_SP_ON_EMPTY_SLOT   0  //FIXME
248         #define CPU_BYTE_ORDER         (__BIG_ENDIAN__ ? CPU_BIG_ENDIAN : CPU_LITTLE_ENDIAN)
249         #define CPU_HARVARD            0
250
251 #elif CPU_DSP56K
252
253         #define NOP                     asm(nop)
254         #define BREAKPOINT              asm(debug)
255         #define IRQ_DISABLE             do { asm(bfset #0x0200,SR); asm(nop); } while (0)
256         #define IRQ_ENABLE              do { asm(bfclr #0x0200,SR); asm(nop); } while (0)
257
258         #define IRQ_SAVE_DISABLE(x)  \
259                 do { (void)x; asm(move SR,x); asm(bfset #0x0200,SR); } while (0)
260         #define IRQ_RESTORE(x)  \
261                 do { (void)x; asm(move x,SR); } while (0)
262
263         static inline bool irq_running(void)
264         {
265                 extern void *user_sp;
266                 return !!user_sp;
267         }
268         #define IRQ_RUNNING() irq_running()
269
270         static inline bool irq_getstate(void)
271         {
272                 uint16_t x;
273                 asm(move SR,x);
274                 return !(x & 0x0200);
275         }
276         #define IRQ_GETSTATE() irq_getstate()
277
278         typedef uint16_t cpuflags_t;
279         typedef unsigned int cpustack_t;
280
281         #define CPU_REG_BITS            16
282         #define CPU_REGS_CNT            FIXME
283         #define CPU_SAVED_REGS_CNT      8
284         #define CPU_STACK_GROWS_UPWARD  1
285         #define CPU_SP_ON_EMPTY_SLOT    0
286         #define CPU_BYTE_ORDER          CPU_BIG_ENDIAN
287         #define CPU_HARVARD             1
288
289         /* Memory is word-addessed in the DSP56K */
290         #define CPU_BITS_PER_CHAR  16
291         #define SIZEOF_SHORT        1
292         #define SIZEOF_INT          1
293         #define SIZEOF_LONG         2
294         #define SIZEOF_PTR          1
295
296 #elif CPU_AVR
297
298         #define NOP           asm volatile ("nop" ::)
299         #define IRQ_DISABLE   asm volatile ("cli" ::)
300         #define IRQ_ENABLE    asm volatile ("sei" ::)
301
302         #define IRQ_SAVE_DISABLE(x) \
303         do { \
304                 __asm__ __volatile__( \
305                         "in %0,__SREG__\n\t" \
306                         "cli" \
307                         : "=r" (x) : /* no inputs */ : "cc" \
308                 ); \
309         } while (0)
310
311         #define IRQ_RESTORE(x) \
312         do { \
313                 __asm__ __volatile__( \
314                         "out __SREG__,%0" : /* no outputs */ : "r" (x) : "cc" \
315                 ); \
316         } while (0)
317
318         #define IRQ_GETSTATE() \
319         ({ \
320                 uint8_t sreg; \
321                 __asm__ __volatile__( \
322                         "in %0,__SREG__\n\t" \
323                         : "=r" (sreg)  /* no inputs & no clobbers */ \
324                 ); \
325                 (bool)(sreg & 0x80); \
326         })
327
328         typedef uint8_t cpuflags_t;
329         typedef uint8_t cpustack_t;
330
331         /* Register counts include SREG too */
332         #define CPU_REG_BITS            8
333         #define CPU_REGS_CNT           33
334         #define CPU_SAVED_REGS_CNT     19
335         #define CPU_STACK_GROWS_UPWARD  0
336         #define CPU_SP_ON_EMPTY_SLOT    1
337         #define CPU_BYTE_ORDER          CPU_LITTLE_ENDIAN
338         #define CPU_HARVARD             1
339
340         /**
341          * Initialization value for registers in stack frame.
342          * The register index is not directly corrispondent to CPU
343          * register numbers. Index 0 is the SREG register: the initial
344          * value is all 0 but the interrupt bit (bit 7).
345          */
346         #define CPU_REG_INIT_VALUE(reg) (reg == 0 ? 0x80 : 0)
347
348 #else
349         #error No CPU_... defined.
350 #endif
351
352 /**
353  * Execute \a CODE atomically with respect to interrupts.
354  *
355  * \see IRQ_SAVE_DISABLE IRQ_RESTORE
356  */
357 #define ATOMIC(CODE) \
358         do { \
359                 cpuflags_t __flags; \
360                 IRQ_SAVE_DISABLE(__flags); \
361                 CODE; \
362                 IRQ_RESTORE(__flags); \
363         } while (0)
364
365
366 /// Default for macro not defined in the right arch section
367 #ifndef CPU_REG_INIT_VALUE
368         #define CPU_REG_INIT_VALUE(reg)     0
369 #endif
370
371
372 #ifndef CPU_STACK_GROWS_UPWARD
373         #error CPU_STACK_GROWS_UPWARD should have been defined to either 0 or 1
374 #endif
375
376 #ifndef CPU_SP_ON_EMPTY_SLOT
377         #error CPU_SP_ON_EMPTY_SLOT should have been defined to either 0 or 1
378 #endif
379
380 /*
381  * Support stack handling peculiarities of a few CPUs.
382  *
383  * Most processors let their stack grow downward and
384  * keep SP pointing at the last pushed value.
385  */
386 #if !CPU_STACK_GROWS_UPWARD
387         #if !CPU_SP_ON_EMPTY_SLOT
388                 /* Most microprocessors (x86, m68k...) */
389                 #define CPU_PUSH_WORD(sp, data) \
390                         do { *--(sp) = (data); } while (0)
391                 #define CPU_POP_WORD(sp) \
392                         (*(sp)++)
393         #else
394                 /* AVR insanity */
395                 #define CPU_PUSH_WORD(sp, data) \
396                         do { *(sp)-- = (data); } while (0)
397                 #define CPU_POP_WORD(sp) \
398                         (*++(sp))
399         #endif
400
401 #else /* CPU_STACK_GROWS_UPWARD */
402
403         #if !CPU_SP_ON_EMPTY_SLOT
404                 /* DSP56K and other weirdos */
405                 #define CPU_PUSH_WORD(sp, data) \
406                         do { *++(sp) = (cpustack_t)(data); } while (0)
407                 #define CPU_POP_WORD(sp) \
408                         (*(sp)--)
409         #else
410                 #error I bet you cannot find a CPU like this
411         #endif
412 #endif
413
414
415 #if CPU_DSP56K
416         /*
417          * DSP56k pushes both PC and SR to the stack in the JSR instruction, but
418          * RTS discards SR while returning (it does not restore it). So we push
419          * 0 to fake the same context.
420          */
421         #define CPU_PUSH_CALL_CONTEXT(sp, func) \
422                 do { \
423                         CPU_PUSH_WORD((sp), (func)); \
424                         CPU_PUSH_WORD((sp), 0x100); \
425                 } while (0);
426
427 #elif CPU_AVR
428         /*
429          * In AVR, the addresses are pushed into the stack as little-endian, while
430          * memory accesses are big-endian (actually, it's a 8-bit CPU, so there is
431          * no natural endianess).
432          */
433         #define CPU_PUSH_CALL_CONTEXT(sp, func) \
434                 do { \
435                         uint16_t funcaddr = (uint16_t)(func); \
436                         CPU_PUSH_WORD((sp), funcaddr); \
437                         CPU_PUSH_WORD((sp), funcaddr>>8); \
438                 } while (0)
439
440 #else
441         #define CPU_PUSH_CALL_CONTEXT(sp, func) \
442                 CPU_PUSH_WORD((sp), (cpustack_t)(func))
443 #endif
444
445
446 /**
447  * \name Default type sizes.
448  *
449  * These defaults are reasonable for most 16/32bit machines.
450  * Some of these macros may be overridden by CPU-specific code above.
451  *
452  * ANSI C requires that the following equations be true:
453  * \code
454  *   sizeof(char) <= sizeof(short) <= sizeof(int) <= sizeof(long)
455  *   sizeof(float) <= sizeof(double)
456  *   CPU_BITS_PER_CHAR  >= 8
457  *   CPU_BITS_PER_SHORT >= 8
458  *   CPU_BITS_PER_INT   >= 16
459  *   CPU_BITS_PER_LONG  >= 32
460  * \endcode
461  * \{
462  */
463 #ifndef SIZEOF_CHAR
464 #define SIZEOF_CHAR  1
465 #endif
466
467 #ifndef SIZEOF_SHORT
468 #define SIZEOF_SHORT  2
469 #endif
470
471 #ifndef SIZEOF_INT
472 #if CPU_REG_BITS < 32
473         #define SIZEOF_INT  2
474 #else
475         #define SIZEOF_INT  4
476 #endif
477 #endif /* !SIZEOF_INT */
478
479 #ifndef SIZEOF_LONG
480 #if CPU_REG_BITS > 32
481         #define SIZEOF_LONG  8
482 #else
483         #define SIZEOF_LONG  4
484 #endif
485 #endif
486
487 #ifndef SIZEOF_PTR
488 #if CPU_REG_BITS < 32
489         #define SIZEOF_PTR   2
490 #elif CPU_REG_BITS == 32
491         #define SIZEOF_PTR   4
492 #else /* CPU_REG_BITS > 32 */
493         #define SIZEOF_PTR   8
494 #endif
495 #endif
496
497 #ifndef CPU_BITS_PER_CHAR
498 #define CPU_BITS_PER_CHAR   (SIZEOF_CHAR * 8)
499 #endif
500
501 #ifndef CPU_BITS_PER_SHORT
502 #define CPU_BITS_PER_SHORT  (SIZEOF_SHORT * CPU_BITS_PER_CHAR)
503 #endif
504
505 #ifndef CPU_BITS_PER_INT
506 #define CPU_BITS_PER_INT    (SIZEOF_INT * CPU_BITS_PER_CHAR)
507 #endif
508
509 #ifndef CPU_BITS_PER_LONG
510 #define CPU_BITS_PER_LONG   (SIZEOF_LONG * CPU_BITS_PER_CHAR)
511 #endif
512
513 #ifndef CPU_BITS_PER_PTR
514 #define CPU_BITS_PER_PTR    (SIZEOF_PTR * CPU_BITS_PER_CHAR)
515 #endif
516
517 #ifndef BREAKPOINT
518 #define BREAKPOINT /* nop */
519 #endif
520
521 /*\}*/
522
523 /* Sanity checks for the above definitions */
524 STATIC_ASSERT(sizeof(char) == SIZEOF_CHAR);
525 STATIC_ASSERT(sizeof(short) == SIZEOF_SHORT);
526 STATIC_ASSERT(sizeof(long) == SIZEOF_LONG);
527 STATIC_ASSERT(sizeof(int) == SIZEOF_INT);
528 STATIC_ASSERT(sizeof(void *) == SIZEOF_PTR);
529 STATIC_ASSERT(sizeof(int8_t) * CPU_BITS_PER_CHAR == 8);
530 STATIC_ASSERT(sizeof(uint8_t) * CPU_BITS_PER_CHAR == 8);
531 STATIC_ASSERT(sizeof(int16_t) * CPU_BITS_PER_CHAR == 16);
532 STATIC_ASSERT(sizeof(uint16_t) * CPU_BITS_PER_CHAR == 16);
533 STATIC_ASSERT(sizeof(int32_t) * CPU_BITS_PER_CHAR == 32);
534 STATIC_ASSERT(sizeof(uint32_t) * CPU_BITS_PER_CHAR == 32);
535 #ifdef __HAS_INT64_T__
536 STATIC_ASSERT(sizeof(int64_t) * CPU_BITS_PER_CHAR == 64);
537 STATIC_ASSERT(sizeof(uint64_t) * CPU_BITS_PER_CHAR == 64);
538 #endif
539
540 /**
541  * \def CPU_IDLE
542  *
543  * \brief Invoked by the scheduler to stop the CPU when idle.
544  *
545  * This hook can be redefined to put the CPU in low-power mode, or to
546  * profile system load with an external strobe, or to save CPU cycles
547  * in hosted environments such as emulators.
548  */
549 #ifndef CPU_IDLE
550         #if defined(ARCH_EMUL) && (ARCH & ARCH_EMUL)
551                 /* This emulator hook should yield the CPU to the host.  */
552                 EXTERN_C_BEGIN
553                 void emul_idle(void);
554                 EXTERN_C_END
555                 #define CPU_IDLE emul_idle()
556         #else /* !ARCH_EMUL */
557                 #define CPU_IDLE do { /* nothing */ } while (0)
558         #endif /* !ARCH_EMUL */
559 #endif /* !CPU_IDLE */
560
561 #endif /* CPU_CPU_H */