git.sur5r.net Git - freertos/blob - FreeRTOS/Demo/AVR_ATMega323_IAR/regtest.c

   1 /*\r
   2     FreeRTOS V8.1.2 - Copyright (C) 2014 Real Time Engineers Ltd. \r
   3     All rights reserved\r
   4 \r
   5     VISIT http://www.FreeRTOS.org TO ENSURE YOU ARE USING THE LATEST VERSION.\r
   6 \r
   7     ***************************************************************************\r
   8      *                                                                       *\r
   9      *    FreeRTOS provides completely free yet professionally developed,    *\r
  10      *    robust, strictly quality controlled, supported, and cross          *\r
  11      *    platform software that has become a de facto standard.             *\r
  12      *                                                                       *\r
  13      *    Help yourself get started quickly and support the FreeRTOS         *\r
  14      *    project by purchasing a FreeRTOS tutorial book, reference          *\r
  15      *    manual, or both from: http://www.FreeRTOS.org/Documentation        *\r
  16      *                                                                       *\r
  17      *    Thank you!                                                         *\r
  18      *                                                                       *\r
  19     ***************************************************************************\r
  20 \r
  21     This file is part of the FreeRTOS distribution.\r
  22 \r
  23     FreeRTOS is free software; you can redistribute it and/or modify it under\r
  24     the terms of the GNU General Public License (version 2) as published by the\r
  25     Free Software Foundation >>!AND MODIFIED BY!<< the FreeRTOS exception.\r
  26 \r
  27     >>!   NOTE: The modification to the GPL is included to allow you to     !<<\r
  28     >>!   distribute a combined work that includes FreeRTOS without being   !<<\r
  29     >>!   obliged to provide the source code for proprietary components     !<<\r
  30     >>!   outside of the FreeRTOS kernel.                                   !<<\r
  31 \r
  32     FreeRTOS is distributed in the hope that it will be useful, but WITHOUT ANY\r
  33     WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS\r
  34     FOR A PARTICULAR PURPOSE.  Full license text is available from the following\r
  35     link: http://www.freertos.org/a00114.html\r
  36 \r
  37     1 tab == 4 spaces!\r
  38 \r
  39     ***************************************************************************\r
  40      *                                                                       *\r
  41      *    Having a problem?  Start by reading the FAQ "My application does   *\r
  42      *    not run, what could be wrong?"                                     *\r
  43      *                                                                       *\r
  44      *    http://www.FreeRTOS.org/FAQHelp.html                               *\r
  45      *                                                                       *\r
  46     ***************************************************************************\r
  47 \r
  48     http://www.FreeRTOS.org - Documentation, books, training, latest versions,\r
  49     license and Real Time Engineers Ltd. contact details.\r
  50 \r
  51     http://www.FreeRTOS.org/plus - A selection of FreeRTOS ecosystem products,\r
  52     including FreeRTOS+Trace - an indispensable productivity tool, a DOS\r
  53     compatible FAT file system, and our tiny thread aware UDP/IP stack.\r
  54 \r
  55     http://www.OpenRTOS.com - Real Time Engineers ltd license FreeRTOS to High\r
  56     Integrity Systems to sell under the OpenRTOS brand.  Low cost OpenRTOS\r
  57     licenses offer ticketed support, indemnification and middleware.\r
  58 \r
  59     http://www.SafeRTOS.com - High Integrity Systems also provide a safety\r
  60     engineered and independently SIL3 certified version for use in safety and\r
  61     mission critical applications that require provable dependability.\r
  62 \r
  63     1 tab == 4 spaces!\r
  64 */\r
  65 \r
  66 /* Scheduler include files. */\r
  67 #include "FreeRTOS.h"\r
  68 #include "task.h"\r
  69 \r
  70 /* Demo file headers. */\r
  71 #include "regtest.h"\r
  72 \r
  73 /*\r
  74  * Test tasks that sets registers to known values, then checks to ensure the\r
  75  * values remain as expected.  Test 1 and test 2 use different values.\r
  76  */\r
  77 static void prvRegisterCheck1( void *pvParameters );\r
  78 static void prvRegisterCheck2( void *pvParameters );\r
  79 \r
  80 /* Set to a non zero value should an error be found. */\r
  81 portBASE_TYPE xRegTestError = pdFALSE;\r
  82 \r
  83 /*-----------------------------------------------------------*/\r
  84 \r
  85 void vStartRegTestTasks( void )\r
  86 {\r
  87         xTaskCreate( prvRegisterCheck1, "Reg1", configMINIMAL_STACK_SIZE, NULL, tskIDLE_PRIORITY, NULL );\r
  88         xTaskCreate( prvRegisterCheck2, "Reg2", configMINIMAL_STACK_SIZE, NULL, tskIDLE_PRIORITY, NULL );               \r
  89 }\r
  90 /*-----------------------------------------------------------*/\r
  91 \r
  92 portBASE_TYPE xAreRegTestTasksStillRunning( void )\r
  93 {\r
  94 portBASE_TYPE xReturn;\r
  95 \r
  96         /* If a register was found to contain an unexpected value then the\r
  97         xRegTestError variable would have been set to a non zero value. */\r
  98         if( xRegTestError == pdFALSE )\r
  99         {\r
 100                 xReturn = pdTRUE;\r
 101         }\r
 102         else\r
 103         {\r
 104                 xReturn = pdFALSE;\r
 105         }\r
 106         \r
 107         return xReturn;\r
 108 }\r
 109 /*-----------------------------------------------------------*/\r
 110 \r
 111 static void prvRegisterCheck1( void *pvParameters )\r
 112 {\r
 113         ( void ) pvParameters;\r
 114 \r
 115         for( ;; )\r
 116         {\r
 117                 asm(    "LDI    r31,    5"              );              \r
 118                 asm(    "MOV    r0,             r31"    );\r
 119                 asm(    "LDI    r31,    6"              );\r
 120                 asm(    "MOV    r1,             r31"    );\r
 121                 asm(    "LDI    r31,    7"              );\r
 122                 asm(    "MOV    r2,             r31"    );\r
 123                 asm(    "LDI    r31,    8"              );\r
 124                 asm(    "MOV    r3,             r31"    );\r
 125                 asm(    "LDI    r31,    9"              );\r
 126                 asm(    "MOV    r4,             r31"    );\r
 127                 asm(    "LDI    r31,    10"             );\r
 128                 asm(    "MOV    r5,             r31"    );\r
 129                 asm(    "LDI    r31,    11"             );\r
 130                 asm(    "MOV    r6,             r31"    );\r
 131                 asm(    "LDI    r31,    12"             );\r
 132                 asm(    "MOV    r7,             r31"    );\r
 133                 asm(    "LDI    r31,    13"             );\r
 134                 asm(    "MOV    r8,             r31"    );\r
 135                 asm(    "LDI    r31,    14"             );\r
 136                 asm(    "MOV    r9,             r31"    );\r
 137                 asm(    "LDI    r31,    15"             );\r
 138                 asm(    "MOV    r10,    r31"    );\r
 139                 asm(    "LDI    r31,    16"             );\r
 140                 asm(    "MOV    r11,    r31"    );\r
 141                 asm(    "LDI    r31,    17"             );\r
 142                 asm(    "MOV    r12,    r31"    );\r
 143                 asm(    "LDI    r31,    18"             );\r
 144                 asm(    "MOV    r13,    r31"    );\r
 145                 asm(    "LDI    r31,    19"             );\r
 146                 asm(    "MOV    r14,    r31"    );\r
 147                 asm(    "LDI    r31,    20"             );\r
 148                 asm(    "MOV    r15,    r31"    );\r
 149                 asm(    "LDI    r16,    21"             );\r
 150                 asm(    "LDI    r17,    22"             );\r
 151                 asm(    "LDI    r18,    23"             );\r
 152                 asm(    "LDI    r19,    24"             );\r
 153                 asm(    "LDI    r20,    25"             );\r
 154                 asm(    "LDI    r21,    26"             );\r
 155                 asm(    "LDI    r22,    27"             );\r
 156                 asm(    "LDI    r23,    28"             );\r
 157                 asm(    "LDI    r24,    29"             );\r
 158                 asm(    "LDI    r25,    30"             );\r
 159                 asm(    "LDI    r26,    31"             );\r
 160                 asm(    "LDI    r27,    32"             );\r
 161                 asm(    "LDI    r30,    33"             );\r
 162 \r
 163                 asm(    "LDI    r31,    5"                      );\r
 164                 asm(    "CPSE   r31,    r0"                     );\r
 165                 asm(    "STS    xRegTestError, r0"      );\r
 166                 asm(    "LDI    r31,    6"                      );\r
 167                 asm(    "CPSE   r31,    r1"                     );\r
 168                 asm(    "STS    xRegTestError, r0"      );\r
 169                 asm(    "LDI    r31,    7"                      );\r
 170                 asm(    "CPSE   r31,    r2"                     );\r
 171                 asm(    "STS    xRegTestError, r0"      );\r
 172                 asm(    "LDI    r31,    8"                      );\r
 173                 asm(    "CPSE   r31,    r3"                     );\r
 174                 asm(    "STS    xRegTestError, r0"      );\r
 175                 asm(    "LDI    r31,    9"                      );\r
 176                 asm(    "CPSE   r31,    r4"                     );\r
 177                 asm(    "STS    xRegTestError, r0"      );\r
 178                 asm(    "LDI    r31,    10"                     );\r
 179                 asm(    "CPSE   r31,    r5"                     );\r
 180                 asm(    "STS    xRegTestError, r0"      );\r
 181                 asm(    "LDI    r31,    11"                     );\r
 182                 asm(    "CPSE   r31,    r6"                     );\r
 183                 asm(    "STS    xRegTestError, r0"      );\r
 184                 asm(    "LDI    r31,    12"                     );\r
 185                 asm(    "CPSE   r31,    r7"                     );\r
 186                 asm(    "STS    xRegTestError, r0"      );\r
 187                 asm(    "LDI    r31,    13"                     );\r
 188                 asm(    "CPSE   r31,    r8"                     );\r
 189                 asm(    "STS    xRegTestError, r0"      );\r
 190                 asm(    "LDI    r31,    14"                     );\r
 191                 asm(    "CPSE   r31,    r9"                     );\r
 192                 asm(    "STS    xRegTestError, r0"      );\r
 193                 asm(    "LDI    r31,    15"                     );\r
 194                 asm(    "CPSE   r31,    r10"            );\r
 195                 asm(    "STS    xRegTestError, r0"      );\r
 196                 asm(    "LDI    r31,    16"                     );\r
 197                 asm(    "CPSE   r31,    r11"            );\r
 198                 asm(    "STS    xRegTestError, r0"      );\r
 199                 asm(    "LDI    r31,    17"                     );\r
 200                 asm(    "CPSE   r31,    r12"            );\r
 201                 asm(    "STS    xRegTestError, r0"      );\r
 202                 asm(    "LDI    r31,    18"                     );\r
 203                 asm(    "CPSE   r31,    r13"            );\r
 204                 asm(    "STS    xRegTestError, r0"      );\r
 205                 asm(    "LDI    r31,    19"                     );\r
 206                 asm(    "CPSE   r31,    r14"            );\r
 207                 asm(    "STS    xRegTestError, r0"      );\r
 208                 asm(    "LDI    r31,    20"                     );\r
 209                 asm(    "CPSE   r31,    r15"            );\r
 210                 asm(    "STS    xRegTestError, r0"      );\r
 211                 asm(    "LDI    r31,    21"                     );\r
 212                 asm(    "CPSE   r31,    r16"            );\r
 213                 asm(    "STS    xRegTestError, r0"      );\r
 214                 asm(    "LDI    r31,    22"                     );\r
 215                 asm(    "CPSE   r31,    r17"            );\r
 216                 asm(    "STS    xRegTestError, r0"      );\r
 217                 asm(    "LDI    r31,    23"                     );\r
 218                 asm(    "CPSE   r31,    r18"            );\r
 219                 asm(    "STS    xRegTestError, r0"      );\r
 220                 asm(    "LDI    r31,    24"                     );\r
 221                 asm(    "CPSE   r31,    r19"            );\r
 222                 asm(    "STS    xRegTestError, r0"      );\r
 223                 asm(    "LDI    r31,    25"                     );\r
 224                 asm(    "CPSE   r31,    r20"            );\r
 225                 asm(    "STS    xRegTestError, r0"      );\r
 226                 asm(    "LDI    r31,    26"                     );\r
 227                 asm(    "CPSE   r31,    r21"            );\r
 228                 asm(    "STS    xRegTestError, r0"      );\r
 229                 asm(    "LDI    r31,    27"                     );\r
 230                 asm(    "CPSE   r31,    r22"            );\r
 231                 asm(    "STS    xRegTestError, r0"      );\r
 232                 asm(    "LDI    r31,    28"                     );\r
 233                 asm(    "CPSE   r31,    r23"            );\r
 234                 asm(    "STS    xRegTestError, r0"      );\r
 235                 asm(    "LDI    r31,    29"                     );\r
 236                 asm(    "CPSE   r31,    r24"            );\r
 237                 asm(    "STS    xRegTestError, r0"      );\r
 238                 asm(    "LDI    r31,    30"                     );\r
 239                 asm(    "CPSE   r31,    r25"            );\r
 240                 asm(    "STS    xRegTestError, r0"      );\r
 241                 asm(    "LDI    r31,    31"                     );\r
 242                 asm(    "CPSE   r31,    r26"            );\r
 243                 asm(    "STS    xRegTestError, r0"      );\r
 244                 asm(    "LDI    r31,    32"                     );\r
 245                 asm(    "CPSE   r31,    r27"            );\r
 246                 asm(    "STS    xRegTestError, r0"      );\r
 247                 asm(    "LDI    r31,    33"                     );\r
 248                 asm(    "CPSE   r31,    r30"            );\r
 249                 asm(    "STS    xRegTestError, r0"      );\r
 250         }\r
 251 }\r
 252 /*-----------------------------------------------------------*/\r
 253 \r
 254 static void prvRegisterCheck2( void *pvParameters )\r
 255 {\r
 256         ( void ) pvParameters;\r
 257 \r
 258         for( ;; )\r
 259         {\r
 260                 asm(    "LDI    r31,    1"              );              \r
 261                 asm(    "MOV    r0,             r31"    );\r
 262                 asm(    "LDI    r31,    2"              );\r
 263                 asm(    "MOV    r1,             r31"    );\r
 264                 asm(    "LDI    r31,    3"              );\r
 265                 asm(    "MOV    r2,             r31"    );\r
 266                 asm(    "LDI    r31,    4"              );\r
 267                 asm(    "MOV    r3,             r31"    );\r
 268                 asm(    "LDI    r31,    5"              );\r
 269                 asm(    "MOV    r4,             r31"    );\r
 270                 asm(    "LDI    r31,    6"              );\r
 271                 asm(    "MOV    r5,             r31"    );\r
 272                 asm(    "LDI    r31,    7"              );\r
 273                 asm(    "MOV    r6,             r31"    );\r
 274                 asm(    "LDI    r31,    8"              );\r
 275                 asm(    "MOV    r7,             r31"    );\r
 276                 asm(    "LDI    r31,    9"              );\r
 277                 asm(    "MOV    r8,             r31"    );\r
 278                 asm(    "LDI    r31,    10"             );\r
 279                 asm(    "MOV    r9,             r31"    );\r
 280                 asm(    "LDI    r31,    11"             );\r
 281                 asm(    "MOV    r10,    r31"    );\r
 282                 asm(    "LDI    r31,    12"             );\r
 283                 asm(    "MOV    r11,    r31"    );\r
 284                 asm(    "LDI    r31,    13"             );\r
 285                 asm(    "MOV    r12,    r31"    );\r
 286                 asm(    "LDI    r31,    14"             );\r
 287                 asm(    "MOV    r13,    r31"    );\r
 288                 asm(    "LDI    r31,    15"             );\r
 289                 asm(    "MOV    r14,    r31"    );\r
 290                 asm(    "LDI    r31,    16"             );\r
 291                 asm(    "MOV    r15,    r31"    );\r
 292                 asm(    "LDI    r16,    17"             );\r
 293                 asm(    "LDI    r17,    18"             );\r
 294                 asm(    "LDI    r18,    19"             );\r
 295                 asm(    "LDI    r19,    20"             );\r
 296                 asm(    "LDI    r20,    21"             );\r
 297                 asm(    "LDI    r21,    22"             );\r
 298                 asm(    "LDI    r22,    23"             );\r
 299                 asm(    "LDI    r23,    24"             );\r
 300                 asm(    "LDI    r24,    25"             );\r
 301                 asm(    "LDI    r25,    26"             );\r
 302                 asm(    "LDI    r26,    27"             );\r
 303                 asm(    "LDI    r27,    28"             );\r
 304                 asm(    "LDI    r30,    29"             );\r
 305 \r
 306                 asm(    "LDI    r31,    1"                      );\r
 307                 asm(    "CPSE   r31,    r0"                     );\r
 308                 asm(    "STS    xRegTestError, r0"      );\r
 309                 asm(    "LDI    r31,    2"                      );\r
 310                 asm(    "CPSE   r31,    r1"                     );\r
 311                 asm(    "STS    xRegTestError, r0"      );\r
 312                 asm(    "LDI    r31,    3"                      );\r
 313                 asm(    "CPSE   r31,    r2"                     );\r
 314                 asm(    "STS    xRegTestError, r0"      );\r
 315                 asm(    "LDI    r31,    4"                      );\r
 316                 asm(    "CPSE   r31,    r3"                     );\r
 317                 asm(    "STS    xRegTestError, r0"      );\r
 318                 asm(    "LDI    r31,    5"                      );\r
 319                 asm(    "CPSE   r31,    r4"                     );\r
 320                 asm(    "STS    xRegTestError, r0"      );\r
 321                 asm(    "LDI    r31,    6"                      );\r
 322                 asm(    "CPSE   r31,    r5"                     );\r
 323                 asm(    "STS    xRegTestError, r0"      );\r
 324                 asm(    "LDI    r31,    7"                      );\r
 325                 asm(    "CPSE   r31,    r6"                     );\r
 326                 asm(    "STS    xRegTestError, r0"      );\r
 327                 asm(    "LDI    r31,    8"                      );\r
 328                 asm(    "CPSE   r31,    r7"                     );\r
 329                 asm(    "STS    xRegTestError, r0"      );\r
 330                 asm(    "LDI    r31,    9"                      );\r
 331                 asm(    "CPSE   r31,    r8"                     );\r
 332                 asm(    "STS    xRegTestError, r0"      );\r
 333                 asm(    "LDI    r31,    10"                     );\r
 334                 asm(    "CPSE   r31,    r9"                     );\r
 335                 asm(    "STS    xRegTestError, r0"      );\r
 336                 asm(    "LDI    r31,    11"                     );\r
 337                 asm(    "CPSE   r31,    r10"            );\r
 338                 asm(    "STS    xRegTestError, r0"      );\r
 339                 asm(    "LDI    r31,    12"                     );\r
 340                 asm(    "CPSE   r31,    r11"            );\r
 341                 asm(    "STS    xRegTestError, r0"      );\r
 342                 asm(    "LDI    r31,    13"                     );\r
 343                 asm(    "CPSE   r31,    r12"            );\r
 344                 asm(    "STS    xRegTestError, r0"      );\r
 345                 asm(    "LDI    r31,    14"                     );\r
 346                 asm(    "CPSE   r31,    r13"            );\r
 347                 asm(    "STS    xRegTestError, r0"      );\r
 348                 asm(    "LDI    r31,    15"                     );\r
 349                 asm(    "CPSE   r31,    r14"            );\r
 350                 asm(    "STS    xRegTestError, r0"      );\r
 351                 asm(    "LDI    r31,    16"                     );\r
 352                 asm(    "CPSE   r31,    r15"            );\r
 353                 asm(    "STS    xRegTestError, r0"      );\r
 354                 asm(    "LDI    r31,    17"                     );\r
 355                 asm(    "CPSE   r31,    r16"            );\r
 356                 asm(    "STS    xRegTestError, r0"      );\r
 357                 asm(    "LDI    r31,    18"                     );\r
 358                 asm(    "CPSE   r31,    r17"            );\r
 359                 asm(    "STS    xRegTestError, r0"      );\r
 360                 asm(    "LDI    r31,    19"                     );\r
 361                 asm(    "CPSE   r31,    r18"            );\r
 362                 asm(    "STS    xRegTestError, r0"      );\r
 363                 asm(    "LDI    r31,    20"                     );\r
 364                 asm(    "CPSE   r31,    r19"            );\r
 365                 asm(    "STS    xRegTestError, r0"      );\r
 366                 asm(    "LDI    r31,    21"                     );\r
 367                 asm(    "CPSE   r31,    r20"            );\r
 368                 asm(    "STS    xRegTestError, r0"      );\r
 369                 asm(    "LDI    r31,    22"                     );\r
 370                 asm(    "CPSE   r31,    r21"            );\r
 371                 asm(    "STS    xRegTestError, r0"      );\r
 372                 asm(    "LDI    r31,    23"                     );\r
 373                 asm(    "CPSE   r31,    r22"            );\r
 374                 asm(    "STS    xRegTestError, r0"      );\r
 375                 asm(    "LDI    r31,    24"                     );\r
 376                 asm(    "CPSE   r31,    r23"            );\r
 377                 asm(    "STS    xRegTestError, r0"      );\r
 378                 asm(    "LDI    r31,    25"                     );\r
 379                 asm(    "CPSE   r31,    r24"            );\r
 380                 asm(    "STS    xRegTestError, r0"      );\r
 381                 asm(    "LDI    r31,    26"                     );\r
 382                 asm(    "CPSE   r31,    r25"            );\r
 383                 asm(    "STS    xRegTestError, r0"      );\r
 384                 asm(    "LDI    r31,    27"                     );\r
 385                 asm(    "CPSE   r31,    r26"            );\r
 386                 asm(    "STS    xRegTestError, r0"      );\r
 387                 asm(    "LDI    r31,    28"                     );\r
 388                 asm(    "CPSE   r31,    r27"            );\r
 389                 asm(    "STS    xRegTestError, r0"      );\r
 390                 asm(    "LDI    r31,    29"                     );\r
 391                 asm(    "CPSE   r31,    r30"            );\r
 392                 asm(    "STS    xRegTestError, r0"      );\r
 393         }\r
 394 }\r
 395 \r