]> git.sur5r.net Git - freertos/blob - Demo/AVR_ATMega323_IAR/regtest.c
cc31c530817784bb5fbae0f0747b0378d0cbc023
[freertos] / Demo / AVR_ATMega323_IAR / regtest.c
1 /*\r
2         FreeRTOS.org V5.1.0 - Copyright (C) 2003-2008 Richard Barry.\r
3 \r
4         This file is part of the FreeRTOS.org distribution.\r
5 \r
6         FreeRTOS.org is free software; you can redistribute it and/or modify\r
7         it under the terms of the GNU General Public License as published by\r
8         the Free Software Foundation; either version 2 of the License, or\r
9         (at your option) any later version.\r
10 \r
11         FreeRTOS.org is distributed in the hope that it will be useful,\r
12         but WITHOUT ANY WARRANTY; without even the implied warranty of\r
13         MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\r
14         GNU General Public License for more details.\r
15 \r
16         You should have received a copy of the GNU General Public License\r
17         along with FreeRTOS.org; if not, write to the Free Software\r
18         Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA\r
19 \r
20         A special exception to the GPL can be applied should you wish to distribute\r
21         a combined work that includes FreeRTOS.org, without being obliged to provide\r
22         the source code for any proprietary components.  See the licensing section\r
23         of http://www.FreeRTOS.org for full details of how and when the exception\r
24         can be applied.\r
25 \r
26     ***************************************************************************\r
27     ***************************************************************************\r
28     *                                                                         *\r
29     * SAVE TIME AND MONEY!  We can port FreeRTOS.org to your own hardware,    *\r
30     * and even write all or part of your application on your behalf.          *\r
31     * See http://www.OpenRTOS.com for details of the services we provide to   *\r
32     * expedite your project.                                                  *\r
33     *                                                                         *\r
34     ***************************************************************************\r
35     ***************************************************************************\r
36 \r
37         Please ensure to read the configuration and relevant port sections of the\r
38         online documentation.\r
39 \r
40         http://www.FreeRTOS.org - Documentation, latest information, license and \r
41         contact details.\r
42 \r
43         http://www.SafeRTOS.com - A version that is certified for use in safety \r
44         critical systems.\r
45 \r
46         http://www.OpenRTOS.com - Commercial support, development, porting, \r
47         licensing and training services.\r
48 */\r
49 \r
50 /* Scheduler include files. */\r
51 #include "FreeRTOS.h"\r
52 #include "task.h"\r
53 \r
54 /* Demo file headers. */\r
55 #include "regtest.h"\r
56 \r
57 /*\r
58  * Test tasks that sets registers to known values, then checks to ensure the\r
59  * values remain as expected.  Test 1 and test 2 use different values.\r
60  */\r
61 static void prvRegisterCheck1( void *pvParameters );\r
62 static void prvRegisterCheck2( void *pvParameters );\r
63 \r
64 /* Set to a non zero value should an error be found. */\r
65 portBASE_TYPE xRegTestError = pdFALSE;\r
66 \r
67 /*-----------------------------------------------------------*/\r
68 \r
69 void vStartRegTestTasks( void )\r
70 {\r
71         xTaskCreate( prvRegisterCheck1, "Reg1", configMINIMAL_STACK_SIZE, NULL, tskIDLE_PRIORITY, NULL );\r
72         xTaskCreate( prvRegisterCheck2, "Reg2", configMINIMAL_STACK_SIZE, NULL, tskIDLE_PRIORITY, NULL );               \r
73 }\r
74 /*-----------------------------------------------------------*/\r
75 \r
76 portBASE_TYPE xAreRegTestTasksStillRunning( void )\r
77 {\r
78 portBASE_TYPE xReturn;\r
79 \r
80         /* If a register was found to contain an unexpected value then the\r
81         xRegTestError variable would have been set to a non zero value. */\r
82         if( xRegTestError == pdFALSE )\r
83         {\r
84                 xReturn = pdTRUE;\r
85         }\r
86         else\r
87         {\r
88                 xReturn = pdFALSE;\r
89         }\r
90         \r
91         return xReturn;\r
92 }\r
93 /*-----------------------------------------------------------*/\r
94 \r
95 static void prvRegisterCheck1( void *pvParameters )\r
96 {\r
97         ( void ) pvParameters;\r
98 \r
99         for( ;; )\r
100         {\r
101                 asm(    "LDI    r31,    5"              );              \r
102                 asm(    "MOV    r0,             r31"    );\r
103                 asm(    "LDI    r31,    6"              );\r
104                 asm(    "MOV    r1,             r31"    );\r
105                 asm(    "LDI    r31,    7"              );\r
106                 asm(    "MOV    r2,             r31"    );\r
107                 asm(    "LDI    r31,    8"              );\r
108                 asm(    "MOV    r3,             r31"    );\r
109                 asm(    "LDI    r31,    9"              );\r
110                 asm(    "MOV    r4,             r31"    );\r
111                 asm(    "LDI    r31,    10"             );\r
112                 asm(    "MOV    r5,             r31"    );\r
113                 asm(    "LDI    r31,    11"             );\r
114                 asm(    "MOV    r6,             r31"    );\r
115                 asm(    "LDI    r31,    12"             );\r
116                 asm(    "MOV    r7,             r31"    );\r
117                 asm(    "LDI    r31,    13"             );\r
118                 asm(    "MOV    r8,             r31"    );\r
119                 asm(    "LDI    r31,    14"             );\r
120                 asm(    "MOV    r9,             r31"    );\r
121                 asm(    "LDI    r31,    15"             );\r
122                 asm(    "MOV    r10,    r31"    );\r
123                 asm(    "LDI    r31,    16"             );\r
124                 asm(    "MOV    r11,    r31"    );\r
125                 asm(    "LDI    r31,    17"             );\r
126                 asm(    "MOV    r12,    r31"    );\r
127                 asm(    "LDI    r31,    18"             );\r
128                 asm(    "MOV    r13,    r31"    );\r
129                 asm(    "LDI    r31,    19"             );\r
130                 asm(    "MOV    r14,    r31"    );\r
131                 asm(    "LDI    r31,    20"             );\r
132                 asm(    "MOV    r15,    r31"    );\r
133                 asm(    "LDI    r16,    21"             );\r
134                 asm(    "LDI    r17,    22"             );\r
135                 asm(    "LDI    r18,    23"             );\r
136                 asm(    "LDI    r19,    24"             );\r
137                 asm(    "LDI    r20,    25"             );\r
138                 asm(    "LDI    r21,    26"             );\r
139                 asm(    "LDI    r22,    27"             );\r
140                 asm(    "LDI    r23,    28"             );\r
141                 asm(    "LDI    r24,    29"             );\r
142                 asm(    "LDI    r25,    30"             );\r
143                 asm(    "LDI    r26,    31"             );\r
144                 asm(    "LDI    r27,    32"             );\r
145                 asm(    "LDI    r30,    33"             );\r
146 \r
147                 asm(    "LDI    r31,    5"                      );\r
148                 asm(    "CPSE   r31,    r0"                     );\r
149                 asm(    "STS    xRegTestError, r0"      );\r
150                 asm(    "LDI    r31,    6"                      );\r
151                 asm(    "CPSE   r31,    r1"                     );\r
152                 asm(    "STS    xRegTestError, r0"      );\r
153                 asm(    "LDI    r31,    7"                      );\r
154                 asm(    "CPSE   r31,    r2"                     );\r
155                 asm(    "STS    xRegTestError, r0"      );\r
156                 asm(    "LDI    r31,    8"                      );\r
157                 asm(    "CPSE   r31,    r3"                     );\r
158                 asm(    "STS    xRegTestError, r0"      );\r
159                 asm(    "LDI    r31,    9"                      );\r
160                 asm(    "CPSE   r31,    r4"                     );\r
161                 asm(    "STS    xRegTestError, r0"      );\r
162                 asm(    "LDI    r31,    10"                     );\r
163                 asm(    "CPSE   r31,    r5"                     );\r
164                 asm(    "STS    xRegTestError, r0"      );\r
165                 asm(    "LDI    r31,    11"                     );\r
166                 asm(    "CPSE   r31,    r6"                     );\r
167                 asm(    "STS    xRegTestError, r0"      );\r
168                 asm(    "LDI    r31,    12"                     );\r
169                 asm(    "CPSE   r31,    r7"                     );\r
170                 asm(    "STS    xRegTestError, r0"      );\r
171                 asm(    "LDI    r31,    13"                     );\r
172                 asm(    "CPSE   r31,    r8"                     );\r
173                 asm(    "STS    xRegTestError, r0"      );\r
174                 asm(    "LDI    r31,    14"                     );\r
175                 asm(    "CPSE   r31,    r9"                     );\r
176                 asm(    "STS    xRegTestError, r0"      );\r
177                 asm(    "LDI    r31,    15"                     );\r
178                 asm(    "CPSE   r31,    r10"            );\r
179                 asm(    "STS    xRegTestError, r0"      );\r
180                 asm(    "LDI    r31,    16"                     );\r
181                 asm(    "CPSE   r31,    r11"            );\r
182                 asm(    "STS    xRegTestError, r0"      );\r
183                 asm(    "LDI    r31,    17"                     );\r
184                 asm(    "CPSE   r31,    r12"            );\r
185                 asm(    "STS    xRegTestError, r0"      );\r
186                 asm(    "LDI    r31,    18"                     );\r
187                 asm(    "CPSE   r31,    r13"            );\r
188                 asm(    "STS    xRegTestError, r0"      );\r
189                 asm(    "LDI    r31,    19"                     );\r
190                 asm(    "CPSE   r31,    r14"            );\r
191                 asm(    "STS    xRegTestError, r0"      );\r
192                 asm(    "LDI    r31,    20"                     );\r
193                 asm(    "CPSE   r31,    r15"            );\r
194                 asm(    "STS    xRegTestError, r0"      );\r
195                 asm(    "LDI    r31,    21"                     );\r
196                 asm(    "CPSE   r31,    r16"            );\r
197                 asm(    "STS    xRegTestError, r0"      );\r
198                 asm(    "LDI    r31,    22"                     );\r
199                 asm(    "CPSE   r31,    r17"            );\r
200                 asm(    "STS    xRegTestError, r0"      );\r
201                 asm(    "LDI    r31,    23"                     );\r
202                 asm(    "CPSE   r31,    r18"            );\r
203                 asm(    "STS    xRegTestError, r0"      );\r
204                 asm(    "LDI    r31,    24"                     );\r
205                 asm(    "CPSE   r31,    r19"            );\r
206                 asm(    "STS    xRegTestError, r0"      );\r
207                 asm(    "LDI    r31,    25"                     );\r
208                 asm(    "CPSE   r31,    r20"            );\r
209                 asm(    "STS    xRegTestError, r0"      );\r
210                 asm(    "LDI    r31,    26"                     );\r
211                 asm(    "CPSE   r31,    r21"            );\r
212                 asm(    "STS    xRegTestError, r0"      );\r
213                 asm(    "LDI    r31,    27"                     );\r
214                 asm(    "CPSE   r31,    r22"            );\r
215                 asm(    "STS    xRegTestError, r0"      );\r
216                 asm(    "LDI    r31,    28"                     );\r
217                 asm(    "CPSE   r31,    r23"            );\r
218                 asm(    "STS    xRegTestError, r0"      );\r
219                 asm(    "LDI    r31,    29"                     );\r
220                 asm(    "CPSE   r31,    r24"            );\r
221                 asm(    "STS    xRegTestError, r0"      );\r
222                 asm(    "LDI    r31,    30"                     );\r
223                 asm(    "CPSE   r31,    r25"            );\r
224                 asm(    "STS    xRegTestError, r0"      );\r
225                 asm(    "LDI    r31,    31"                     );\r
226                 asm(    "CPSE   r31,    r26"            );\r
227                 asm(    "STS    xRegTestError, r0"      );\r
228                 asm(    "LDI    r31,    32"                     );\r
229                 asm(    "CPSE   r31,    r27"            );\r
230                 asm(    "STS    xRegTestError, r0"      );\r
231                 asm(    "LDI    r31,    33"                     );\r
232                 asm(    "CPSE   r31,    r30"            );\r
233                 asm(    "STS    xRegTestError, r0"      );\r
234         }\r
235 }\r
236 /*-----------------------------------------------------------*/\r
237 \r
238 static void prvRegisterCheck2( void *pvParameters )\r
239 {\r
240         ( void ) pvParameters;\r
241 \r
242         for( ;; )\r
243         {\r
244                 asm(    "LDI    r31,    1"              );              \r
245                 asm(    "MOV    r0,             r31"    );\r
246                 asm(    "LDI    r31,    2"              );\r
247                 asm(    "MOV    r1,             r31"    );\r
248                 asm(    "LDI    r31,    3"              );\r
249                 asm(    "MOV    r2,             r31"    );\r
250                 asm(    "LDI    r31,    4"              );\r
251                 asm(    "MOV    r3,             r31"    );\r
252                 asm(    "LDI    r31,    5"              );\r
253                 asm(    "MOV    r4,             r31"    );\r
254                 asm(    "LDI    r31,    6"              );\r
255                 asm(    "MOV    r5,             r31"    );\r
256                 asm(    "LDI    r31,    7"              );\r
257                 asm(    "MOV    r6,             r31"    );\r
258                 asm(    "LDI    r31,    8"              );\r
259                 asm(    "MOV    r7,             r31"    );\r
260                 asm(    "LDI    r31,    9"              );\r
261                 asm(    "MOV    r8,             r31"    );\r
262                 asm(    "LDI    r31,    10"             );\r
263                 asm(    "MOV    r9,             r31"    );\r
264                 asm(    "LDI    r31,    11"             );\r
265                 asm(    "MOV    r10,    r31"    );\r
266                 asm(    "LDI    r31,    12"             );\r
267                 asm(    "MOV    r11,    r31"    );\r
268                 asm(    "LDI    r31,    13"             );\r
269                 asm(    "MOV    r12,    r31"    );\r
270                 asm(    "LDI    r31,    14"             );\r
271                 asm(    "MOV    r13,    r31"    );\r
272                 asm(    "LDI    r31,    15"             );\r
273                 asm(    "MOV    r14,    r31"    );\r
274                 asm(    "LDI    r31,    16"             );\r
275                 asm(    "MOV    r15,    r31"    );\r
276                 asm(    "LDI    r16,    17"             );\r
277                 asm(    "LDI    r17,    18"             );\r
278                 asm(    "LDI    r18,    19"             );\r
279                 asm(    "LDI    r19,    20"             );\r
280                 asm(    "LDI    r20,    21"             );\r
281                 asm(    "LDI    r21,    22"             );\r
282                 asm(    "LDI    r22,    23"             );\r
283                 asm(    "LDI    r23,    24"             );\r
284                 asm(    "LDI    r24,    25"             );\r
285                 asm(    "LDI    r25,    26"             );\r
286                 asm(    "LDI    r26,    27"             );\r
287                 asm(    "LDI    r27,    28"             );\r
288                 asm(    "LDI    r30,    29"             );\r
289 \r
290                 asm(    "LDI    r31,    1"                      );\r
291                 asm(    "CPSE   r31,    r0"                     );\r
292                 asm(    "STS    xRegTestError, r0"      );\r
293                 asm(    "LDI    r31,    2"                      );\r
294                 asm(    "CPSE   r31,    r1"                     );\r
295                 asm(    "STS    xRegTestError, r0"      );\r
296                 asm(    "LDI    r31,    3"                      );\r
297                 asm(    "CPSE   r31,    r2"                     );\r
298                 asm(    "STS    xRegTestError, r0"      );\r
299                 asm(    "LDI    r31,    4"                      );\r
300                 asm(    "CPSE   r31,    r3"                     );\r
301                 asm(    "STS    xRegTestError, r0"      );\r
302                 asm(    "LDI    r31,    5"                      );\r
303                 asm(    "CPSE   r31,    r4"                     );\r
304                 asm(    "STS    xRegTestError, r0"      );\r
305                 asm(    "LDI    r31,    6"                      );\r
306                 asm(    "CPSE   r31,    r5"                     );\r
307                 asm(    "STS    xRegTestError, r0"      );\r
308                 asm(    "LDI    r31,    7"                      );\r
309                 asm(    "CPSE   r31,    r6"                     );\r
310                 asm(    "STS    xRegTestError, r0"      );\r
311                 asm(    "LDI    r31,    8"                      );\r
312                 asm(    "CPSE   r31,    r7"                     );\r
313                 asm(    "STS    xRegTestError, r0"      );\r
314                 asm(    "LDI    r31,    9"                      );\r
315                 asm(    "CPSE   r31,    r8"                     );\r
316                 asm(    "STS    xRegTestError, r0"      );\r
317                 asm(    "LDI    r31,    10"                     );\r
318                 asm(    "CPSE   r31,    r9"                     );\r
319                 asm(    "STS    xRegTestError, r0"      );\r
320                 asm(    "LDI    r31,    11"                     );\r
321                 asm(    "CPSE   r31,    r10"            );\r
322                 asm(    "STS    xRegTestError, r0"      );\r
323                 asm(    "LDI    r31,    12"                     );\r
324                 asm(    "CPSE   r31,    r11"            );\r
325                 asm(    "STS    xRegTestError, r0"      );\r
326                 asm(    "LDI    r31,    13"                     );\r
327                 asm(    "CPSE   r31,    r12"            );\r
328                 asm(    "STS    xRegTestError, r0"      );\r
329                 asm(    "LDI    r31,    14"                     );\r
330                 asm(    "CPSE   r31,    r13"            );\r
331                 asm(    "STS    xRegTestError, r0"      );\r
332                 asm(    "LDI    r31,    15"                     );\r
333                 asm(    "CPSE   r31,    r14"            );\r
334                 asm(    "STS    xRegTestError, r0"      );\r
335                 asm(    "LDI    r31,    16"                     );\r
336                 asm(    "CPSE   r31,    r15"            );\r
337                 asm(    "STS    xRegTestError, r0"      );\r
338                 asm(    "LDI    r31,    17"                     );\r
339                 asm(    "CPSE   r31,    r16"            );\r
340                 asm(    "STS    xRegTestError, r0"      );\r
341                 asm(    "LDI    r31,    18"                     );\r
342                 asm(    "CPSE   r31,    r17"            );\r
343                 asm(    "STS    xRegTestError, r0"      );\r
344                 asm(    "LDI    r31,    19"                     );\r
345                 asm(    "CPSE   r31,    r18"            );\r
346                 asm(    "STS    xRegTestError, r0"      );\r
347                 asm(    "LDI    r31,    20"                     );\r
348                 asm(    "CPSE   r31,    r19"            );\r
349                 asm(    "STS    xRegTestError, r0"      );\r
350                 asm(    "LDI    r31,    21"                     );\r
351                 asm(    "CPSE   r31,    r20"            );\r
352                 asm(    "STS    xRegTestError, r0"      );\r
353                 asm(    "LDI    r31,    22"                     );\r
354                 asm(    "CPSE   r31,    r21"            );\r
355                 asm(    "STS    xRegTestError, r0"      );\r
356                 asm(    "LDI    r31,    23"                     );\r
357                 asm(    "CPSE   r31,    r22"            );\r
358                 asm(    "STS    xRegTestError, r0"      );\r
359                 asm(    "LDI    r31,    24"                     );\r
360                 asm(    "CPSE   r31,    r23"            );\r
361                 asm(    "STS    xRegTestError, r0"      );\r
362                 asm(    "LDI    r31,    25"                     );\r
363                 asm(    "CPSE   r31,    r24"            );\r
364                 asm(    "STS    xRegTestError, r0"      );\r
365                 asm(    "LDI    r31,    26"                     );\r
366                 asm(    "CPSE   r31,    r25"            );\r
367                 asm(    "STS    xRegTestError, r0"      );\r
368                 asm(    "LDI    r31,    27"                     );\r
369                 asm(    "CPSE   r31,    r26"            );\r
370                 asm(    "STS    xRegTestError, r0"      );\r
371                 asm(    "LDI    r31,    28"                     );\r
372                 asm(    "CPSE   r31,    r27"            );\r
373                 asm(    "STS    xRegTestError, r0"      );\r
374                 asm(    "LDI    r31,    29"                     );\r
375                 asm(    "CPSE   r31,    r30"            );\r
376                 asm(    "STS    xRegTestError, r0"      );\r
377         }\r
378 }\r
379 \r