git.sur5r.net Git - freertos/blob - Source/portable/Renesas/SH2A_FPU/portasm.src

   1 ;/*\r
   2 ;    FreeRTOS V6.0.2 - Copyright (C) 2009 Real Time Engineers Ltd.\r
   3 ;\r
   4 ;    ***************************************************************************\r
   5 ;    *                                                                         *\r
   6 ;    * If you are:                                                             *\r
   7 ;    *                                                                         *\r
   8 ;    *    + New to FreeRTOS,                                                   *\r
   9 ;    *    + Wanting to learn FreeRTOS or multitasking in general quickly       *\r
  10 ;    *    + Looking for basic training,                                        *\r
  11 ;    *    + Wanting to improve your FreeRTOS skills and productivity           *\r
  12 ;    *                                                                         *\r
  13 ;    * then take a look at the FreeRTOS eBook                                  *\r
  14 ;    *                                                                         *\r
  15 ;    *        "Using the FreeRTOS Real Time Kernel - a Practical Guide"        *\r
  16 ;    *                  http://www.FreeRTOS.org/Documentation                  *\r
  17 ;    *                                                                         *\r
  18 ;    * A pdf reference manual is also available.  Both are usually delivered   *\r
  19 ;    * to your inbox within 20 minutes to two hours when purchased between 8am *\r
  20 ;    * and 8pm GMT (although please allow up to 24 hours in case of            *\r
  21 ;    * exceptional circumstances).  Thank you for your support!                *\r
  22 ;    *                                                                         *\r
  23 ;    ***************************************************************************\r
  24 ;\r
  25 ;    This file is part of the FreeRTOS distribution.\r
  26 ;\r
  27 ;    FreeRTOS is free software; you can redistribute it and/or modify it under\r
  28 ;    the terms of the GNU General Public License (version 2) as published by the\r
  29 ;    Free Software Foundation AND MODIFIED BY the FreeRTOS exception.\r
  30 ;    ***NOTE*** The exception to the GPL is included to allow you to distribute\r
  31 ;    a combined work that includes FreeRTOS without being obliged to provide the\r
  32 ;    source code for proprietary components outside of the FreeRTOS kernel.\r
  33 ;    FreeRTOS is distributed in the hope that it will be useful, but WITHOUT\r
  34 ;    ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or\r
  35 ;    FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for\r
  36 ;    more details. You should have received a copy of the GNU General Public \r
  37 ;    License and the FreeRTOS license exception along with FreeRTOS; if not it \r
  38 ;    can be viewed here: http://www.freertos.org/a00114.html and also obtained \r
  39 ;    by writing to Richard Barry, contact details for whom are available on the\r
  40 ;    FreeRTOS WEB site.\r
  41 ;\r
  42 ;    1 tab == 4 spaces!\r
  43 ;\r
  44 ;    http://www.FreeRTOS.org - Documentation, latest information, license and\r
  45 ;    contact details.\r
  46 ;\r
  47 ;    http://www.SafeRTOS.com - A version that is certified for use in safety\r
  48 ;    critical systems.\r
  49 ;\r
  50 ;    http://www.OpenRTOS.com - Commercial support, development, porting,\r
  51 ;    licensing and training services.\r
  52 ;*/\r
  53 \r
  54         .import _pxCurrentTCB\r
  55         .import _vTaskSwitchContext\r
  56         .import _vTaskIncrementTick\r
  57 \r
  58         .export _vPortStartFirstTask\r
  59         .export _ulPortGetGBR\r
  60         .export _vPortYield\r
  61         .export _vPortPreemptiveTick\r
  62         .export _vPortCooperativeTick\r
  63 \r
  64     .section    P\r
  65 \r
  66         .macro portSAVE_CONTEXT\r
  67 \r
  68         ; Save r0 to r14 and pr.\r
  69         movml.l r15, @-r15\r
  70         \r
  71         ; Save mac1, mach and gbr\r
  72         sts.l   macl, @-r15\r
  73         sts.l   mach, @-r15\r
  74         stc.l   gbr, @-r15\r
  75         \r
  76         ; Get the address of pxCurrentTCB\r
  77         mov.l   #_pxCurrentTCB, r0\r
  78         \r
  79         ; Get the address of pxTopOfStack from the TCB.\r
  80         mov.l   @r0, r0\r
  81         \r
  82         ; Save the stack pointer in pxTopOfStack.\r
  83         mov.l   r15, @r0\r
  84 \r
  85         .endm\r
  86 \r
  87 ;-----------------------------------------------------------\r
  88 \r
  89         .macro portRESTORE_CONTEXT\r
  90 \r
  91         ; Get the address of the pxCurrentTCB variable.\r
  92         mov.l   #_pxCurrentTCB, r0\r
  93 \r
  94         ; Get the address of the task stack from pxCurrentTCB.\r
  95         mov.l   @r0, r0\r
  96 \r
  97         ; Get the task stack itself into the stack pointer. \r
  98         mov.l   @r0, r15                \r
  99 \r
 100         ; Restore system registers.\r
 101         ldc.l   @r15+, gbr\r
 102         lds.l   @r15+, mach\r
 103         lds.l   @r15+, macl\r
 104 \r
 105         ; Restore r0 to r14 and PR\r
 106         movml.l @r15+, r15\r
 107         \r
 108         ; Pop the SR and PC to jump to the start of the task.\r
 109         rte\r
 110         nop\r
 111 \r
 112         .endm\r
 113 ;-----------------------------------------------------------\r
 114         \r
 115 _vPortStartFirstTask:\r
 116                 \r
 117         portRESTORE_CONTEXT\r
 118         \r
 119 ;-----------------------------------------------------------\r
 120 \r
 121 _vPortYield:\r
 122 \r
 123         ; Push r0 so it can be used.\r
 124         mov.l   r0, @-r15\r
 125         \r
 126         ; Set the interrupt mask in the status register.\r
 127         stc             sr, r0\r
 128         or              #240,r0\r
 129         ldc             r0, sr\r
 130         \r
 131         ; Restore r0 so its original value can be saved by the movml.l instruction \r
 132         ; below, without ending up with two copies on the stack.\r
 133         mov.l   @r15+, r0\r
 134 \r
 135         portSAVE_CONTEXT\r
 136 \r
 137         mov.l   #_vTaskSwitchContext, r0\r
 138         jsr             @r0\r
 139         nop\r
 140 \r
 141         portRESTORE_CONTEXT\r
 142         \r
 143 ;-----------------------------------------------------------\r
 144 \r
 145 _vPortPreemptiveTick\r
 146 \r
 147         portSAVE_CONTEXT\r
 148         \r
 149         mov.l   #_vTaskIncrementTick, r0\r
 150         jsr             @r0\r
 151         nop\r
 152 \r
 153         mov.l   #_vTaskSwitchContext, r0\r
 154         jsr             @r0\r
 155         nop\r
 156 \r
 157         portRESTORE_CONTEXT\r
 158         \r
 159 ;-----------------------------------------------------------\r
 160 \r
 161 _vPortCooperativeTick\r
 162 \r
 163         portSAVE_CONTEXT\r
 164         \r
 165         mov.l   #_vTaskIncrementTick, r0\r
 166         jsr             @r0\r
 167         nop\r
 168 \r
 169         portRESTORE_CONTEXT\r
 170         \r
 171 ;-----------------------------------------------------------\r
 172 \r
 173 _ulPortGetGBR:\r
 174 \r
 175         stc.l   gbr, r0\r
 176         rts\r
 177         nop\r
 178 \r
 179         .end\r
 180                 \r