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