]> git.sur5r.net Git - freertos/blob - Source/tasks.c
Allow tasks to be suspended immediately after creation - provided the scheduler is...
[freertos] / Source / tasks.c
1 /*\r
2     FreeRTOS V6.0.5 - Copyright (C) 2010 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 \r
55 #include <stdio.h>\r
56 #include <stdlib.h>\r
57 #include <string.h>\r
58 \r
59 /* Defining MPU_WRAPPERS_INCLUDED_FROM_API_FILE prevents task.h from redefining\r
60 all the API functions to use the MPU wrappers.  That should only be done when\r
61 task.h is included from an application file. */\r
62 #define MPU_WRAPPERS_INCLUDED_FROM_API_FILE\r
63 \r
64 #include "FreeRTOS.h"\r
65 #include "task.h"\r
66 #include "StackMacros.h"\r
67 \r
68 #undef MPU_WRAPPERS_INCLUDED_FROM_API_FILE\r
69 \r
70 /*\r
71  * Macro to define the amount of stack available to the idle task.\r
72  */\r
73 #define tskIDLE_STACK_SIZE      configMINIMAL_STACK_SIZE\r
74 \r
75 /*\r
76  * Task control block.  A task control block (TCB) is allocated to each task,\r
77  * and stores the context of the task.\r
78  */\r
79 typedef struct tskTaskControlBlock\r
80 {\r
81         volatile portSTACK_TYPE *pxTopOfStack;          /*< Points to the location of the last item placed on the tasks stack.  THIS MUST BE THE FIRST MEMBER OF THE STRUCT. */\r
82 \r
83         #if ( portUSING_MPU_WRAPPERS == 1 )\r
84                 xMPU_SETTINGS xMPUSettings;                             /*< The MPU settings are defined as part of the port layer.  THIS MUST BE THE SECOND MEMBER OF THE STRUCT. */\r
85         #endif  \r
86         \r
87         xListItem                               xGenericListItem;       /*< List item used to place the TCB in ready and blocked queues. */\r
88         xListItem                               xEventListItem;         /*< List item used to place the TCB in event lists. */\r
89         unsigned portBASE_TYPE  uxPriority;                     /*< The priority of the task where 0 is the lowest priority. */\r
90         portSTACK_TYPE                  *pxStack;                       /*< Points to the start of the stack. */\r
91         signed char                             pcTaskName[ configMAX_TASK_NAME_LEN ];/*< Descriptive name given to the task when created.  Facilitates debugging only. */\r
92 \r
93         #if ( portSTACK_GROWTH > 0 )\r
94                 portSTACK_TYPE *pxEndOfStack;                   /*< Used for stack overflow checking on architectures where the stack grows up from low memory. */\r
95         #endif\r
96 \r
97         #if ( portCRITICAL_NESTING_IN_TCB == 1 )\r
98                 unsigned portBASE_TYPE uxCriticalNesting;\r
99         #endif\r
100 \r
101         #if ( configUSE_TRACE_FACILITY == 1 )\r
102                 unsigned portBASE_TYPE  uxTCBNumber;    /*< This is used for tracing the scheduler and making debugging easier only. */\r
103         #endif\r
104 \r
105         #if ( configUSE_MUTEXES == 1 )\r
106                 unsigned portBASE_TYPE uxBasePriority;  /*< The priority last assigned to the task - used by the priority inheritance mechanism. */\r
107         #endif\r
108 \r
109         #if ( configUSE_APPLICATION_TASK_TAG == 1 )\r
110                 pdTASK_HOOK_CODE pxTaskTag;\r
111         #endif\r
112 \r
113         #if ( configGENERATE_RUN_TIME_STATS == 1 )\r
114                 unsigned long ulRunTimeCounter;         /*< Used for calculating how much CPU time each task is utilising. */\r
115         #endif\r
116 \r
117 } tskTCB;\r
118 \r
119 \r
120 /*\r
121  * Some kernel aware debuggers require data to be viewed to be global, rather\r
122  * than file scope.\r
123  */\r
124 #ifdef portREMOVE_STATIC_QUALIFIER\r
125         #define static\r
126 #endif\r
127 \r
128 /*lint -e956 */\r
129 PRIVILEGED_DATA tskTCB * volatile pxCurrentTCB = NULL;\r
130 \r
131 /* Lists for ready and blocked tasks. --------------------*/\r
132 \r
133 PRIVILEGED_DATA static xList pxReadyTasksLists[ configMAX_PRIORITIES ]; /*< Prioritised ready tasks. */\r
134 PRIVILEGED_DATA static xList xDelayedTaskList1;                                                 /*< Delayed tasks. */\r
135 PRIVILEGED_DATA static xList xDelayedTaskList2;                                                 /*< Delayed tasks (two lists are used - one for delays that have overflowed the current tick count. */\r
136 PRIVILEGED_DATA static xList * volatile pxDelayedTaskList ;                             /*< Points to the delayed task list currently being used. */\r
137 PRIVILEGED_DATA static xList * volatile pxOverflowDelayedTaskList;              /*< Points to the delayed task list currently being used to hold tasks that have overflowed the current tick count. */\r
138 PRIVILEGED_DATA static xList xPendingReadyList;                                                 /*< Tasks that have been readied while the scheduler was suspended.  They will be moved to the ready queue when the scheduler is resumed. */\r
139 \r
140 #if ( INCLUDE_vTaskDelete == 1 )\r
141 \r
142         PRIVILEGED_DATA static volatile xList xTasksWaitingTermination;         /*< Tasks that have been deleted - but the their memory not yet freed. */\r
143         PRIVILEGED_DATA static volatile unsigned portBASE_TYPE uxTasksDeleted = ( unsigned portBASE_TYPE ) 0;\r
144 \r
145 #endif\r
146 \r
147 #if ( INCLUDE_vTaskSuspend == 1 )\r
148 \r
149         PRIVILEGED_DATA static xList xSuspendedTaskList;                                        /*< Tasks that are currently suspended. */\r
150 \r
151 #endif\r
152 \r
153 /* File private variables. --------------------------------*/\r
154 PRIVILEGED_DATA static volatile unsigned portBASE_TYPE uxCurrentNumberOfTasks   = ( unsigned portBASE_TYPE ) 0;\r
155 PRIVILEGED_DATA static volatile portTickType xTickCount                                                 = ( portTickType ) 0;\r
156 PRIVILEGED_DATA static unsigned portBASE_TYPE uxTopUsedPriority                                 = tskIDLE_PRIORITY;\r
157 PRIVILEGED_DATA static volatile unsigned portBASE_TYPE uxTopReadyPriority               = tskIDLE_PRIORITY;\r
158 PRIVILEGED_DATA static volatile signed portBASE_TYPE xSchedulerRunning                  = pdFALSE;\r
159 PRIVILEGED_DATA static volatile unsigned portBASE_TYPE uxSchedulerSuspended             = ( unsigned portBASE_TYPE ) pdFALSE;\r
160 PRIVILEGED_DATA static volatile unsigned portBASE_TYPE uxMissedTicks                    = ( unsigned portBASE_TYPE ) 0;\r
161 PRIVILEGED_DATA static volatile portBASE_TYPE xMissedYield                                              = ( portBASE_TYPE ) pdFALSE;\r
162 PRIVILEGED_DATA static volatile portBASE_TYPE xNumOfOverflows                                   = ( portBASE_TYPE ) 0;\r
163 PRIVILEGED_DATA static unsigned portBASE_TYPE uxTaskNumber                                              = ( unsigned portBASE_TYPE ) 0;\r
164 \r
165 #if ( configGENERATE_RUN_TIME_STATS == 1 )\r
166 \r
167         PRIVILEGED_DATA static char pcStatsString[ 50 ] ;\r
168         PRIVILEGED_DATA static unsigned long ulTaskSwitchedInTime = 0UL;        /*< Holds the value of a timer/counter the last time a task was switched in. */\r
169         static void prvGenerateRunTimeStatsForTasksInList( const signed char *pcWriteBuffer, xList *pxList, unsigned long ulTotalRunTime ) PRIVILEGED_FUNCTION;\r
170 \r
171 #endif\r
172 \r
173 /* Debugging and trace facilities private variables and macros. ------------*/\r
174 \r
175 /*\r
176  * The value used to fill the stack of a task when the task is created.  This\r
177  * is used purely for checking the high water mark for tasks.\r
178  */\r
179 #define tskSTACK_FILL_BYTE      ( 0xa5 )\r
180 \r
181 /*\r
182  * Macros used by vListTask to indicate which state a task is in.\r
183  */\r
184 #define tskBLOCKED_CHAR         ( ( signed char ) 'B' )\r
185 #define tskREADY_CHAR           ( ( signed char ) 'R' )\r
186 #define tskDELETED_CHAR         ( ( signed char ) 'D' )\r
187 #define tskSUSPENDED_CHAR       ( ( signed char ) 'S' )\r
188 \r
189 /*\r
190  * Macros and private variables used by the trace facility.\r
191  */\r
192 #if ( configUSE_TRACE_FACILITY == 1 )\r
193 \r
194         #define tskSIZE_OF_EACH_TRACE_LINE                      ( ( unsigned long ) ( sizeof( unsigned long ) + sizeof( unsigned long ) ) )\r
195         PRIVILEGED_DATA static volatile signed char * volatile pcTraceBuffer;\r
196         PRIVILEGED_DATA static signed char *pcTraceBufferStart;\r
197         PRIVILEGED_DATA static signed char *pcTraceBufferEnd;\r
198         PRIVILEGED_DATA static signed portBASE_TYPE xTracing = pdFALSE;\r
199         static unsigned portBASE_TYPE uxPreviousTask = 255;\r
200         PRIVILEGED_DATA static char pcStatusString[ 50 ];\r
201 \r
202 #endif\r
203 \r
204 /*-----------------------------------------------------------*/\r
205 \r
206 /*\r
207  * Macro that writes a trace of scheduler activity to a buffer.  This trace\r
208  * shows which task is running when and is very useful as a debugging tool.\r
209  * As this macro is called each context switch it is a good idea to undefine\r
210  * it if not using the facility.\r
211  */\r
212 #if ( configUSE_TRACE_FACILITY == 1 )\r
213 \r
214         #define vWriteTraceToBuffer()                                                                                                                                   \\r
215         {                                                                                                                                                                                               \\r
216                 if( xTracing )                                                                                                                                                          \\r
217                 {                                                                                                                                                                                       \\r
218                         if( uxPreviousTask != pxCurrentTCB->uxTCBNumber )                                                                               \\r
219                         {                                                                                                                                                                               \\r
220                                 if( ( pcTraceBuffer + tskSIZE_OF_EACH_TRACE_LINE ) < pcTraceBufferEnd )                         \\r
221                                 {                                                                                                                                                                       \\r
222                                         uxPreviousTask = pxCurrentTCB->uxTCBNumber;                                                                             \\r
223                                         *( unsigned long * ) pcTraceBuffer = ( unsigned long ) xTickCount;              \\r
224                                         pcTraceBuffer += sizeof( unsigned long );                                                                       \\r
225                                         *( unsigned long * ) pcTraceBuffer = ( unsigned long ) uxPreviousTask;  \\r
226                                         pcTraceBuffer += sizeof( unsigned long );                                                                       \\r
227                                 }                                                                                                                                                                       \\r
228                                 else                                                                                                                                                            \\r
229                                 {                                                                                                                                                                       \\r
230                                         xTracing = pdFALSE;                                                                                                                             \\r
231                                 }                                                                                                                                                                       \\r
232                         }                                                                                                                                                                               \\r
233                 }                                                                                                                                                                                       \\r
234         }\r
235 \r
236 #else\r
237 \r
238         #define vWriteTraceToBuffer()\r
239 \r
240 #endif\r
241 /*-----------------------------------------------------------*/\r
242 \r
243 /*\r
244  * Place the task represented by pxTCB into the appropriate ready queue for\r
245  * the task.  It is inserted at the end of the list.  One quirk of this is\r
246  * that if the task being inserted is at the same priority as the currently\r
247  * executing task, then it will only be rescheduled after the currently\r
248  * executing task has been rescheduled.\r
249  */\r
250 #define prvAddTaskToReadyQueue( pxTCB )                                                                                                                                                 \\r
251 {                                                                                                                                                                                                                               \\r
252         if( pxTCB->uxPriority > uxTopReadyPriority )                                                                                                                            \\r
253         {                                                                                                                                                                                                                       \\r
254                 uxTopReadyPriority = pxTCB->uxPriority;                                                                                                                                 \\r
255         }                                                                                                                                                                                                                       \\r
256         vListInsertEnd( ( xList * ) &( pxReadyTasksLists[ pxTCB->uxPriority ] ), &( pxTCB->xGenericListItem ) );        \\r
257 }\r
258 /*-----------------------------------------------------------*/\r
259 \r
260 /*\r
261  * Macro that looks at the list of tasks that are currently delayed to see if\r
262  * any require waking.\r
263  *\r
264  * Tasks are stored in the queue in the order of their wake time - meaning\r
265  * once one tasks has been found whose timer has not expired we need not look\r
266  * any further down the list.\r
267  */\r
268 #define prvCheckDelayedTasks()                                                                                                                                                                          \\r
269 {                                                                                                                                                                                                                                       \\r
270 register tskTCB *pxTCB;                                                                                                                                                                                         \\r
271                                                                                                                                                                                                                                         \\r
272         while( ( pxTCB = ( tskTCB * ) listGET_OWNER_OF_HEAD_ENTRY( pxDelayedTaskList ) ) != NULL )                                              \\r
273         {                                                                                                                                                                                                                               \\r
274                 if( xTickCount < listGET_LIST_ITEM_VALUE( &( pxTCB->xGenericListItem ) ) )                                                                      \\r
275                 {                                                                                                                                                                                                                       \\r
276                         break;                                                                                                                                                                                                  \\r
277                 }                                                                                                                                                                                                                       \\r
278                 vListRemove( &( pxTCB->xGenericListItem ) );                                                                                                                            \\r
279                 /* Is the task waiting on an event also? */                                                                                                                                     \\r
280                 if( pxTCB->xEventListItem.pvContainer )                                                                                                                                         \\r
281                 {                                                                                                                                                                                                                       \\r
282                         vListRemove( &( pxTCB->xEventListItem ) );                                                                                                                              \\r
283                 }                                                                                                                                                                                                                       \\r
284                 prvAddTaskToReadyQueue( pxTCB );                                                                                                                                                        \\r
285         }                                                                                                                                                                                                                               \\r
286 }\r
287 /*-----------------------------------------------------------*/\r
288 \r
289 /*\r
290  * Several functions take an xTaskHandle parameter that can optionally be NULL,\r
291  * where NULL is used to indicate that the handle of the currently executing\r
292  * task should be used in place of the parameter.  This macro simply checks to\r
293  * see if the parameter is NULL and returns a pointer to the appropriate TCB.\r
294  */\r
295 #define prvGetTCBFromHandle( pxHandle ) ( ( pxHandle == NULL ) ? ( tskTCB * ) pxCurrentTCB : ( tskTCB * ) pxHandle )\r
296 \r
297 \r
298 /* File private functions. --------------------------------*/\r
299 \r
300 /*\r
301  * Utility to ready a TCB for a given task.  Mainly just copies the parameters\r
302  * into the TCB structure.\r
303  */\r
304 static void prvInitialiseTCBVariables( tskTCB *pxTCB, const signed char * const pcName, unsigned portBASE_TYPE uxPriority, const xMemoryRegion * const xRegions, unsigned short usStackDepth ) PRIVILEGED_FUNCTION;\r
305 \r
306 /*\r
307  * Utility to ready all the lists used by the scheduler.  This is called\r
308  * automatically upon the creation of the first task.\r
309  */\r
310 static void prvInitialiseTaskLists( void ) PRIVILEGED_FUNCTION;\r
311 \r
312 /*\r
313  * The idle task, which as all tasks is implemented as a never ending loop.\r
314  * The idle task is automatically created and added to the ready lists upon\r
315  * creation of the first user task.\r
316  *\r
317  * The portTASK_FUNCTION_PROTO() macro is used to allow port/compiler specific\r
318  * language extensions.  The equivalent prototype for this function is:\r
319  *\r
320  * void prvIdleTask( void *pvParameters );\r
321  *\r
322  */\r
323 static portTASK_FUNCTION_PROTO( prvIdleTask, pvParameters );\r
324 \r
325 /*\r
326  * Utility to free all memory allocated by the scheduler to hold a TCB,\r
327  * including the stack pointed to by the TCB.\r
328  *\r
329  * This does not free memory allocated by the task itself (i.e. memory\r
330  * allocated by calls to pvPortMalloc from within the tasks application code).\r
331  */\r
332 #if ( ( INCLUDE_vTaskDelete == 1 ) || ( INCLUDE_vTaskCleanUpResources == 1 ) )\r
333 \r
334         static void prvDeleteTCB( tskTCB *pxTCB ) PRIVILEGED_FUNCTION;\r
335 \r
336 #endif\r
337 \r
338 /*\r
339  * Used only by the idle task.  This checks to see if anything has been placed\r
340  * in the list of tasks waiting to be deleted.  If so the task is cleaned up\r
341  * and its TCB deleted.\r
342  */\r
343 static void prvCheckTasksWaitingTermination( void ) PRIVILEGED_FUNCTION;\r
344 \r
345 /*\r
346  * Allocates memory from the heap for a TCB and associated stack.  Checks the\r
347  * allocation was successful.\r
348  */\r
349 static tskTCB *prvAllocateTCBAndStack( unsigned short usStackDepth, portSTACK_TYPE *puxStackBuffer ) PRIVILEGED_FUNCTION;\r
350 \r
351 /*\r
352  * Called from vTaskList.  vListTasks details all the tasks currently under\r
353  * control of the scheduler.  The tasks may be in one of a number of lists.\r
354  * prvListTaskWithinSingleList accepts a list and details the tasks from\r
355  * within just that list.\r
356  *\r
357  * THIS FUNCTION IS INTENDED FOR DEBUGGING ONLY, AND SHOULD NOT BE CALLED FROM\r
358  * NORMAL APPLICATION CODE.\r
359  */\r
360 #if ( configUSE_TRACE_FACILITY == 1 )\r
361 \r
362         static void prvListTaskWithinSingleList( const signed char *pcWriteBuffer, xList *pxList, signed char cStatus ) PRIVILEGED_FUNCTION;\r
363 \r
364 #endif\r
365 \r
366 /*\r
367  * When a task is created, the stack of the task is filled with a known value.\r
368  * This function determines the 'high water mark' of the task stack by\r
369  * determining how much of the stack remains at the original preset value.\r
370  */\r
371 #if ( ( configUSE_TRACE_FACILITY == 1 ) || ( INCLUDE_uxTaskGetStackHighWaterMark == 1 ) )\r
372 \r
373         static unsigned short usTaskCheckFreeStackSpace( const unsigned char * pucStackByte ) PRIVILEGED_FUNCTION;\r
374 \r
375 #endif\r
376 \r
377 \r
378 /*lint +e956 */\r
379 \r
380 \r
381 \r
382 /*-----------------------------------------------------------\r
383  * TASK CREATION API documented in task.h\r
384  *----------------------------------------------------------*/\r
385 \r
386 signed portBASE_TYPE xTaskGenericCreate( pdTASK_CODE pxTaskCode, const signed char * const pcName, unsigned short usStackDepth, void *pvParameters, unsigned portBASE_TYPE uxPriority, xTaskHandle *pxCreatedTask, portSTACK_TYPE *puxStackBuffer, const xMemoryRegion * const xRegions )\r
387 {\r
388 signed portBASE_TYPE xReturn;\r
389 tskTCB * pxNewTCB;\r
390 \r
391         /* Allocate the memory required by the TCB and stack for the new task,\r
392         checking that the allocation was successful. */\r
393         pxNewTCB = prvAllocateTCBAndStack( usStackDepth, puxStackBuffer );\r
394 \r
395         if( pxNewTCB != NULL )\r
396         {\r
397                 portSTACK_TYPE *pxTopOfStack;\r
398 \r
399                 #if( portUSING_MPU_WRAPPERS == 1 )\r
400                         /* Should the task be created in privileged mode? */\r
401                         portBASE_TYPE xRunPrivileged;\r
402                         if( ( uxPriority & portPRIVILEGE_BIT ) != 0x00 )\r
403                         {\r
404                                 xRunPrivileged = pdTRUE;\r
405                         }\r
406                         else\r
407                         {\r
408                                 xRunPrivileged = pdFALSE;\r
409                         }\r
410                         uxPriority &= ~portPRIVILEGE_BIT;\r
411                 #endif /* portUSING_MPU_WRAPPERS == 1 */\r
412 \r
413                 /* Calculate the top of stack address.  This depends on whether the\r
414                 stack grows from high memory to low (as per the 80x86) or visa versa.\r
415                 portSTACK_GROWTH is used to make the result positive or negative as\r
416                 required by the port. */\r
417                 #if( portSTACK_GROWTH < 0 )\r
418                 {\r
419                         pxTopOfStack = pxNewTCB->pxStack + ( usStackDepth - 1 );\r
420                         pxTopOfStack = ( portSTACK_TYPE * ) ( ( ( unsigned long ) pxTopOfStack ) & ( ( unsigned long ) ~portBYTE_ALIGNMENT_MASK  ) );\r
421                 }\r
422                 #else\r
423                 {\r
424                         pxTopOfStack = pxNewTCB->pxStack;\r
425 \r
426                         /* If we want to use stack checking on architectures that use\r
427                         a positive stack growth direction then we also need to store the\r
428                         other extreme of the stack space. */\r
429                         pxNewTCB->pxEndOfStack = pxNewTCB->pxStack + ( usStackDepth - 1 );\r
430                 }\r
431                 #endif\r
432 \r
433                 /* Setup the newly allocated TCB with the initial state of the task. */\r
434                 prvInitialiseTCBVariables( pxNewTCB, pcName, uxPriority, xRegions, usStackDepth );\r
435 \r
436                 /* Initialize the TCB stack to look as if the task was already running,\r
437                 but had been interrupted by the scheduler.  The return address is set\r
438                 to the start of the task function. Once the stack has been initialised\r
439                 the     top of stack variable is updated. */\r
440                 #if( portUSING_MPU_WRAPPERS == 1 )\r
441                 {\r
442                         pxNewTCB->pxTopOfStack = pxPortInitialiseStack( pxTopOfStack, pxTaskCode, pvParameters, xRunPrivileged );\r
443                 }\r
444                 #else\r
445                 {\r
446                         pxNewTCB->pxTopOfStack = pxPortInitialiseStack( pxTopOfStack, pxTaskCode, pvParameters );\r
447                 }\r
448                 #endif\r
449 \r
450                 if( ( void * ) pxCreatedTask != NULL )\r
451                 {\r
452                         /* Pass the TCB out - in an anonymous way.  The calling function/\r
453                         task can use this as a handle to delete the task later if\r
454                         required.*/\r
455                         *pxCreatedTask = ( xTaskHandle ) pxNewTCB;\r
456                 }\r
457                 \r
458                 /* We are going to manipulate the task queues to add this task to a\r
459                 ready list, so must make sure no interrupts occur. */\r
460                 portENTER_CRITICAL();\r
461                 {\r
462                         uxCurrentNumberOfTasks++;\r
463                         if( uxCurrentNumberOfTasks == ( unsigned portBASE_TYPE ) 1 )\r
464                         {\r
465                                 /* As this is the first task it must also be the current task. */\r
466                                 pxCurrentTCB =  pxNewTCB;\r
467 \r
468                                 /* This is the first task to be created so do the preliminary\r
469                                 initialisation required.  We will not recover if this call\r
470                                 fails, but we will report the failure. */\r
471                                 prvInitialiseTaskLists();\r
472                         }\r
473                         else\r
474                         {\r
475                                 /* If the scheduler is not already running, make this task the\r
476                                 current task if it is the highest priority task to be created\r
477                                 so far. */\r
478                                 if( xSchedulerRunning == pdFALSE )\r
479                                 {\r
480                                         if( pxCurrentTCB->uxPriority <= uxPriority )\r
481                                         {\r
482                                                 pxCurrentTCB = pxNewTCB;\r
483                                         }\r
484                                 }\r
485                         }\r
486 \r
487                         /* Remember the top priority to make context switching faster.  Use\r
488                         the priority in pxNewTCB as this has been capped to a valid value. */\r
489                         if( pxNewTCB->uxPriority > uxTopUsedPriority )\r
490                         {\r
491                                 uxTopUsedPriority = pxNewTCB->uxPriority;\r
492                         }\r
493 \r
494                         #if ( configUSE_TRACE_FACILITY == 1 )\r
495                         {\r
496                                 /* Add a counter into the TCB for tracing only. */\r
497                                 pxNewTCB->uxTCBNumber = uxTaskNumber;\r
498                         }\r
499                         #endif\r
500                         uxTaskNumber++;\r
501 \r
502                         prvAddTaskToReadyQueue( pxNewTCB );\r
503 \r
504                         xReturn = pdPASS;\r
505                         traceTASK_CREATE( pxNewTCB );\r
506                 }\r
507                 portEXIT_CRITICAL();\r
508         }\r
509         else\r
510         {\r
511                 xReturn = errCOULD_NOT_ALLOCATE_REQUIRED_MEMORY;\r
512                 traceTASK_CREATE_FAILED( pxNewTCB );\r
513         }\r
514 \r
515         if( xReturn == pdPASS )\r
516         {\r
517                 if( xSchedulerRunning != pdFALSE )\r
518                 {\r
519                         /* If the created task is of a higher priority than the current task\r
520                         then it should run now. */\r
521                         if( pxCurrentTCB->uxPriority < uxPriority )\r
522                         {\r
523                                 portYIELD_WITHIN_API();\r
524                         }\r
525                 }\r
526         }\r
527 \r
528         return xReturn;\r
529 }\r
530 /*-----------------------------------------------------------*/\r
531 \r
532 #if ( INCLUDE_vTaskDelete == 1 )\r
533 \r
534         void vTaskDelete( xTaskHandle pxTaskToDelete )\r
535         {\r
536         tskTCB *pxTCB;\r
537 \r
538                 portENTER_CRITICAL();\r
539                 {\r
540                         /* Ensure a yield is performed if the current task is being\r
541                         deleted. */\r
542                         if( pxTaskToDelete == pxCurrentTCB )\r
543                         {\r
544                                 pxTaskToDelete = NULL;\r
545                         }\r
546 \r
547                         /* If null is passed in here then we are deleting ourselves. */\r
548                         pxTCB = prvGetTCBFromHandle( pxTaskToDelete );\r
549 \r
550                         /* Remove task from the ready list and place in the     termination list.\r
551                         This will stop the task from be scheduled.  The idle task will check\r
552                         the termination list and free up any memory allocated by the\r
553                         scheduler for the TCB and stack. */\r
554                         vListRemove( &( pxTCB->xGenericListItem ) );\r
555 \r
556                         /* Is the task waiting on an event also? */\r
557                         if( pxTCB->xEventListItem.pvContainer )\r
558                         {\r
559                                 vListRemove( &( pxTCB->xEventListItem ) );\r
560                         }\r
561 \r
562                         vListInsertEnd( ( xList * ) &xTasksWaitingTermination, &( pxTCB->xGenericListItem ) );\r
563 \r
564                         /* Increment the ucTasksDeleted variable so the idle task knows\r
565                         there is a task that has been deleted and that it should therefore\r
566                         check the xTasksWaitingTermination list. */\r
567                         ++uxTasksDeleted;\r
568 \r
569                         /* Increment the uxTaskNumberVariable also so kernel aware debuggers\r
570                         can detect that the task lists need re-generating. */\r
571                         uxTaskNumber++;\r
572 \r
573                         traceTASK_DELETE( pxTCB );\r
574                 }\r
575                 portEXIT_CRITICAL();\r
576 \r
577                 /* Force a reschedule if we have just deleted the current task. */\r
578                 if( xSchedulerRunning != pdFALSE )\r
579                 {\r
580                         if( ( void * ) pxTaskToDelete == NULL )\r
581                         {\r
582                                 portYIELD_WITHIN_API();\r
583                         }\r
584                 }\r
585         }\r
586 \r
587 #endif\r
588 \r
589 \r
590 \r
591 \r
592 \r
593 \r
594 /*-----------------------------------------------------------\r
595  * TASK CONTROL API documented in task.h\r
596  *----------------------------------------------------------*/\r
597 \r
598 #if ( INCLUDE_vTaskDelayUntil == 1 )\r
599 \r
600         void vTaskDelayUntil( portTickType * const pxPreviousWakeTime, portTickType xTimeIncrement )\r
601         {\r
602         portTickType xTimeToWake;\r
603         portBASE_TYPE xAlreadyYielded, xShouldDelay = pdFALSE;\r
604 \r
605                 vTaskSuspendAll();\r
606                 {\r
607                         /* Generate the tick time at which the task wants to wake. */\r
608                         xTimeToWake = *pxPreviousWakeTime + xTimeIncrement;\r
609 \r
610                         if( xTickCount < *pxPreviousWakeTime )\r
611                         {\r
612                                 /* The tick count has overflowed since this function was\r
613                                 lasted called.  In this case the only time we should ever\r
614                                 actually delay is if the wake time has also     overflowed,\r
615                                 and the wake time is greater than the tick time.  When this\r
616                                 is the case it is as if neither time had overflowed. */\r
617                                 if( ( xTimeToWake < *pxPreviousWakeTime ) && ( xTimeToWake > xTickCount ) )\r
618                                 {\r
619                                         xShouldDelay = pdTRUE;\r
620                                 }\r
621                         }\r
622                         else\r
623                         {\r
624                                 /* The tick time has not overflowed.  In this case we will\r
625                                 delay if either the wake time has overflowed, and/or the\r
626                                 tick time is less than the wake time. */\r
627                                 if( ( xTimeToWake < *pxPreviousWakeTime ) || ( xTimeToWake > xTickCount ) )\r
628                                 {\r
629                                         xShouldDelay = pdTRUE;\r
630                                 }\r
631                         }\r
632 \r
633                         /* Update the wake time ready for the next call. */\r
634                         *pxPreviousWakeTime = xTimeToWake;\r
635 \r
636                         if( xShouldDelay )\r
637                         {\r
638                                 traceTASK_DELAY_UNTIL();\r
639 \r
640                                 /* We must remove ourselves from the ready list before adding\r
641                                 ourselves to the blocked list as the same list item is used for\r
642                                 both lists. */\r
643                                 vListRemove( ( xListItem * ) &( pxCurrentTCB->xGenericListItem ) );\r
644 \r
645                                 /* The list item will be inserted in wake time order. */\r
646                                 listSET_LIST_ITEM_VALUE( &( pxCurrentTCB->xGenericListItem ), xTimeToWake );\r
647 \r
648                                 if( xTimeToWake < xTickCount )\r
649                                 {\r
650                                         /* Wake time has overflowed.  Place this item in the\r
651                                         overflow list. */\r
652                                         vListInsert( ( xList * ) pxOverflowDelayedTaskList, ( xListItem * ) &( pxCurrentTCB->xGenericListItem ) );\r
653                                 }\r
654                                 else\r
655                                 {\r
656                                         /* The wake time has not overflowed, so we can use the\r
657                                         current block list. */\r
658                                         vListInsert( ( xList * ) pxDelayedTaskList, ( xListItem * ) &( pxCurrentTCB->xGenericListItem ) );\r
659                                 }\r
660                         }\r
661                 }\r
662                 xAlreadyYielded = xTaskResumeAll();\r
663 \r
664                 /* Force a reschedule if xTaskResumeAll has not already done so, we may\r
665                 have put ourselves to sleep. */\r
666                 if( !xAlreadyYielded )\r
667                 {\r
668                         portYIELD_WITHIN_API();\r
669                 }\r
670         }\r
671 \r
672 #endif\r
673 /*-----------------------------------------------------------*/\r
674 \r
675 #if ( INCLUDE_vTaskDelay == 1 )\r
676 \r
677         void vTaskDelay( portTickType xTicksToDelay )\r
678         {\r
679         portTickType xTimeToWake;\r
680         signed portBASE_TYPE xAlreadyYielded = pdFALSE;\r
681 \r
682                 /* A delay time of zero just forces a reschedule. */\r
683                 if( xTicksToDelay > ( portTickType ) 0 )\r
684                 {\r
685                         vTaskSuspendAll();\r
686                         {\r
687                                 traceTASK_DELAY();\r
688 \r
689                                 /* A task that is removed from the event list while the\r
690                                 scheduler is suspended will not get placed in the ready\r
691                                 list or removed from the blocked list until the scheduler\r
692                                 is resumed.\r
693 \r
694                                 This task cannot be in an event list as it is the currently\r
695                                 executing task. */\r
696 \r
697                                 /* Calculate the time to wake - this may overflow but this is\r
698                                 not a problem. */\r
699                                 xTimeToWake = xTickCount + xTicksToDelay;\r
700 \r
701                                 /* We must remove ourselves from the ready list before adding\r
702                                 ourselves to the blocked list as the same list item is used for\r
703                                 both lists. */\r
704                                 vListRemove( ( xListItem * ) &( pxCurrentTCB->xGenericListItem ) );\r
705 \r
706                                 /* The list item will be inserted in wake time order. */\r
707                                 listSET_LIST_ITEM_VALUE( &( pxCurrentTCB->xGenericListItem ), xTimeToWake );\r
708 \r
709                                 if( xTimeToWake < xTickCount )\r
710                                 {\r
711                                         /* Wake time has overflowed.  Place this item in the\r
712                                         overflow list. */\r
713                                         vListInsert( ( xList * ) pxOverflowDelayedTaskList, ( xListItem * ) &( pxCurrentTCB->xGenericListItem ) );\r
714                                 }\r
715                                 else\r
716                                 {\r
717                                         /* The wake time has not overflowed, so we can use the\r
718                                         current block list. */\r
719                                         vListInsert( ( xList * ) pxDelayedTaskList, ( xListItem * ) &( pxCurrentTCB->xGenericListItem ) );\r
720                                 }\r
721                         }\r
722                         xAlreadyYielded = xTaskResumeAll();\r
723                 }\r
724 \r
725                 /* Force a reschedule if xTaskResumeAll has not already done so, we may\r
726                 have put ourselves to sleep. */\r
727                 if( !xAlreadyYielded )\r
728                 {\r
729                         portYIELD_WITHIN_API();\r
730                 }\r
731         }\r
732 \r
733 #endif\r
734 /*-----------------------------------------------------------*/\r
735 \r
736 #if ( INCLUDE_uxTaskPriorityGet == 1 )\r
737 \r
738         unsigned portBASE_TYPE uxTaskPriorityGet( xTaskHandle pxTask )\r
739         {\r
740         tskTCB *pxTCB;\r
741         unsigned portBASE_TYPE uxReturn;\r
742 \r
743                 portENTER_CRITICAL();\r
744                 {\r
745                         /* If null is passed in here then we are changing the\r
746                         priority of the calling function. */\r
747                         pxTCB = prvGetTCBFromHandle( pxTask );\r
748                         uxReturn = pxTCB->uxPriority;\r
749                 }\r
750                 portEXIT_CRITICAL();\r
751 \r
752                 return uxReturn;\r
753         }\r
754 \r
755 #endif\r
756 /*-----------------------------------------------------------*/\r
757 \r
758 #if ( INCLUDE_vTaskPrioritySet == 1 )\r
759 \r
760         void vTaskPrioritySet( xTaskHandle pxTask, unsigned portBASE_TYPE uxNewPriority )\r
761         {\r
762         tskTCB *pxTCB;\r
763         unsigned portBASE_TYPE uxCurrentPriority, xYieldRequired = pdFALSE;\r
764 \r
765                 /* Ensure the new priority is valid. */\r
766                 if( uxNewPriority >= configMAX_PRIORITIES )\r
767                 {\r
768                         uxNewPriority = configMAX_PRIORITIES - 1;\r
769                 }\r
770 \r
771                 portENTER_CRITICAL();\r
772                 {\r
773                         if( pxTask == pxCurrentTCB )\r
774                         {\r
775                                 pxTask = NULL;\r
776                         }\r
777 \r
778                         /* If null is passed in here then we are changing the\r
779                         priority of the calling function. */\r
780                         pxTCB = prvGetTCBFromHandle( pxTask );\r
781 \r
782                         traceTASK_PRIORITY_SET( pxTask, uxNewPriority );\r
783 \r
784                         #if ( configUSE_MUTEXES == 1 )\r
785                         {\r
786                                 uxCurrentPriority = pxTCB->uxBasePriority;\r
787                         }\r
788                         #else\r
789                         {\r
790                                 uxCurrentPriority = pxTCB->uxPriority;\r
791                         }\r
792                         #endif\r
793 \r
794                         if( uxCurrentPriority != uxNewPriority )\r
795                         {\r
796                                 /* The priority change may have readied a task of higher\r
797                                 priority than the calling task. */\r
798                                 if( uxNewPriority > uxCurrentPriority )\r
799                                 {\r
800                                         if( pxTask != NULL )\r
801                                         {\r
802                                                 /* The priority of another task is being raised.  If we\r
803                                                 were raising the priority of the currently running task\r
804                                                 there would be no need to switch as it must have already\r
805                                                 been the highest priority task. */\r
806                                                 xYieldRequired = pdTRUE;\r
807                                         }\r
808                                 }\r
809                                 else if( pxTask == NULL )\r
810                                 {\r
811                                         /* Setting our own priority down means there may now be another\r
812                                         task of higher priority that is ready to execute. */\r
813                                         xYieldRequired = pdTRUE;\r
814                                 }\r
815 \r
816 \r
817 \r
818                                 #if ( configUSE_MUTEXES == 1 )\r
819                                 {\r
820                                         /* Only change the priority being used if the task is not\r
821                                         currently using an inherited priority. */\r
822                                         if( pxTCB->uxBasePriority == pxTCB->uxPriority )\r
823                                         {\r
824                                                 pxTCB->uxPriority = uxNewPriority;\r
825                                         }\r
826 \r
827                                         /* The base priority gets set whatever. */\r
828                                         pxTCB->uxBasePriority = uxNewPriority;\r
829                                 }\r
830                                 #else\r
831                                 {\r
832                                         pxTCB->uxPriority = uxNewPriority;\r
833                                 }\r
834                                 #endif\r
835 \r
836                                 listSET_LIST_ITEM_VALUE( &( pxTCB->xEventListItem ), ( configMAX_PRIORITIES - ( portTickType ) uxNewPriority ) );\r
837 \r
838                                 /* If the task is in the blocked or suspended list we need do\r
839                                 nothing more than change it's priority variable. However, if\r
840                                 the task is in a ready list it needs to be removed and placed\r
841                                 in the queue appropriate to its new priority. */\r
842                                 if( listIS_CONTAINED_WITHIN( &( pxReadyTasksLists[ uxCurrentPriority ] ), &( pxTCB->xGenericListItem ) ) )\r
843                                 {\r
844                                         /* The task is currently in its ready list - remove before adding\r
845                                         it to it's new ready list.  As we are in a critical section we\r
846                                         can do this even if the scheduler is suspended. */\r
847                                         vListRemove( &( pxTCB->xGenericListItem ) );\r
848                                         prvAddTaskToReadyQueue( pxTCB );\r
849                                 }\r
850 \r
851                                 if( xYieldRequired == pdTRUE )\r
852                                 {\r
853                                         portYIELD_WITHIN_API();\r
854                                 }\r
855                         }\r
856                 }\r
857                 portEXIT_CRITICAL();\r
858         }\r
859 \r
860 #endif\r
861 /*-----------------------------------------------------------*/\r
862 \r
863 #if ( INCLUDE_vTaskSuspend == 1 )\r
864 \r
865         void vTaskSuspend( xTaskHandle pxTaskToSuspend )\r
866         {\r
867         tskTCB *pxTCB;\r
868 \r
869                 portENTER_CRITICAL();\r
870                 {\r
871                         /* Ensure a yield is performed if the current task is being\r
872                         suspended. */\r
873                         if( pxTaskToSuspend == pxCurrentTCB )\r
874                         {\r
875                                 pxTaskToSuspend = NULL;\r
876                         }\r
877 \r
878                         /* If null is passed in here then we are suspending ourselves. */\r
879                         pxTCB = prvGetTCBFromHandle( pxTaskToSuspend );\r
880 \r
881                         traceTASK_SUSPEND( pxTCB );\r
882 \r
883                         /* Remove task from the ready/delayed list and place in the     suspended list. */\r
884                         vListRemove( &( pxTCB->xGenericListItem ) );\r
885 \r
886                         /* Is the task waiting on an event also? */\r
887                         if( pxTCB->xEventListItem.pvContainer )\r
888                         {\r
889                                 vListRemove( &( pxTCB->xEventListItem ) );\r
890                         }\r
891 \r
892                         vListInsertEnd( ( xList * ) &xSuspendedTaskList, &( pxTCB->xGenericListItem ) );\r
893                 }\r
894                 portEXIT_CRITICAL();\r
895 \r
896                 /* We may have just suspended the current task. */\r
897                 if( ( ( void * ) pxTaskToSuspend == NULL ) && ( xSchedulerRunning != pdFALSE ) )\r
898                 {\r
899                         portYIELD_WITHIN_API();\r
900                 }\r
901         }\r
902 \r
903 #endif\r
904 /*-----------------------------------------------------------*/\r
905 \r
906 #if ( INCLUDE_vTaskSuspend == 1 )\r
907 \r
908         signed portBASE_TYPE xTaskIsTaskSuspended( xTaskHandle xTask )\r
909         {\r
910         portBASE_TYPE xReturn = pdFALSE;\r
911         const tskTCB * const pxTCB = ( tskTCB * ) xTask;\r
912 \r
913                 /* Is the task we are attempting to resume actually in the\r
914                 suspended list? */\r
915                 if( listIS_CONTAINED_WITHIN( &xSuspendedTaskList, &( pxTCB->xGenericListItem ) ) != pdFALSE )\r
916                 {\r
917                         /* Has the task already been resumed from within an ISR? */\r
918                         if( listIS_CONTAINED_WITHIN( &xPendingReadyList, &( pxTCB->xEventListItem ) ) != pdTRUE )\r
919                         {\r
920                                 /* Is it in the suspended list because it is in the\r
921                                 Suspended state?  It is possible to be in the suspended\r
922                                 list because it is blocked on a task with no timeout\r
923                                 specified. */\r
924                                 if( listIS_CONTAINED_WITHIN( NULL, &( pxTCB->xEventListItem ) ) == pdTRUE )\r
925                                 {\r
926                                         xReturn = pdTRUE;\r
927                                 }\r
928                         }\r
929                 }\r
930 \r
931                 return xReturn;\r
932         }\r
933 \r
934 #endif\r
935 /*-----------------------------------------------------------*/\r
936 \r
937 #if ( INCLUDE_vTaskSuspend == 1 )\r
938 \r
939         void vTaskResume( xTaskHandle pxTaskToResume )\r
940         {\r
941         tskTCB *pxTCB;\r
942 \r
943                 /* Remove the task from whichever list it is currently in, and place\r
944                 it in the ready list. */\r
945                 pxTCB = ( tskTCB * ) pxTaskToResume;\r
946 \r
947                 /* The parameter cannot be NULL as it is impossible to resume the\r
948                 currently executing task. */\r
949                 if( ( pxTCB != NULL ) && ( pxTCB != pxCurrentTCB ) )\r
950                 {\r
951                         portENTER_CRITICAL();\r
952                         {\r
953                                 if( xTaskIsTaskSuspended( pxTCB ) == pdTRUE )\r
954                                 {\r
955                                         traceTASK_RESUME( pxTCB );\r
956 \r
957                                         /* As we are in a critical section we can access the ready\r
958                                         lists even if the scheduler is suspended. */\r
959                                         vListRemove(  &( pxTCB->xGenericListItem ) );\r
960                                         prvAddTaskToReadyQueue( pxTCB );\r
961 \r
962                                         /* We may have just resumed a higher priority task. */\r
963                                         if( pxTCB->uxPriority >= pxCurrentTCB->uxPriority )\r
964                                         {\r
965                                                 /* This yield may not cause the task just resumed to run, but\r
966                                                 will leave the lists in the correct state for the next yield. */\r
967                                                 portYIELD_WITHIN_API();\r
968                                         }\r
969                                 }\r
970                         }\r
971                         portEXIT_CRITICAL();\r
972                 }\r
973         }\r
974 \r
975 #endif\r
976 \r
977 /*-----------------------------------------------------------*/\r
978 \r
979 #if ( ( INCLUDE_xTaskResumeFromISR == 1 ) && ( INCLUDE_vTaskSuspend == 1 ) )\r
980 \r
981         portBASE_TYPE xTaskResumeFromISR( xTaskHandle pxTaskToResume )\r
982         {\r
983         portBASE_TYPE xYieldRequired = pdFALSE;\r
984         tskTCB *pxTCB;\r
985 \r
986                 pxTCB = ( tskTCB * ) pxTaskToResume;\r
987 \r
988                 if( xTaskIsTaskSuspended( pxTCB ) == pdTRUE )\r
989                 {\r
990                         traceTASK_RESUME_FROM_ISR( pxTCB );\r
991 \r
992                         if( uxSchedulerSuspended == ( unsigned portBASE_TYPE ) pdFALSE )\r
993                         {\r
994                                 xYieldRequired = ( pxTCB->uxPriority >= pxCurrentTCB->uxPriority );\r
995                                 vListRemove(  &( pxTCB->xGenericListItem ) );\r
996                                 prvAddTaskToReadyQueue( pxTCB );\r
997                         }\r
998                         else\r
999                         {\r
1000                                 /* We cannot access the delayed or ready lists, so will hold this\r
1001                                 task pending until the scheduler is resumed, at which point a\r
1002                                 yield will be performed if necessary. */\r
1003                                 vListInsertEnd( ( xList * ) &( xPendingReadyList ), &( pxTCB->xEventListItem ) );\r
1004                         }\r
1005                 }\r
1006 \r
1007                 return xYieldRequired;\r
1008         }\r
1009 \r
1010 #endif\r
1011 \r
1012 \r
1013 \r
1014 \r
1015 /*-----------------------------------------------------------\r
1016  * PUBLIC SCHEDULER CONTROL documented in task.h\r
1017  *----------------------------------------------------------*/\r
1018 \r
1019 \r
1020 void vTaskStartScheduler( void )\r
1021 {\r
1022 portBASE_TYPE xReturn;\r
1023 \r
1024         /* Add the idle task at the lowest priority. */\r
1025         xReturn = xTaskCreate( prvIdleTask, ( signed char * ) "IDLE", tskIDLE_STACK_SIZE, ( void * ) NULL, ( tskIDLE_PRIORITY | portPRIVILEGE_BIT ), ( xTaskHandle * ) NULL );\r
1026 \r
1027         if( xReturn == pdPASS )\r
1028         {\r
1029                 /* Interrupts are turned off here, to ensure a tick does not occur\r
1030                 before or during the call to xPortStartScheduler().  The stacks of\r
1031                 the created tasks contain a status word with interrupts switched on\r
1032                 so interrupts will automatically get re-enabled when the first task\r
1033                 starts to run.\r
1034 \r
1035                 STEPPING THROUGH HERE USING A DEBUGGER CAN CAUSE BIG PROBLEMS IF THE\r
1036                 DEBUGGER ALLOWS INTERRUPTS TO BE PROCESSED. */\r
1037                 portDISABLE_INTERRUPTS();\r
1038 \r
1039                 xSchedulerRunning = pdTRUE;\r
1040                 xTickCount = ( portTickType ) 0;\r
1041 \r
1042                 /* If configGENERATE_RUN_TIME_STATS is defined then the following\r
1043                 macro must be defined to configure the timer/counter used to generate\r
1044                 the run time counter time base. */\r
1045                 portCONFIGURE_TIMER_FOR_RUN_TIME_STATS();\r
1046 \r
1047                 /* Setting up the timer tick is hardware specific and thus in the\r
1048                 portable interface. */\r
1049                 if( xPortStartScheduler() )\r
1050                 {\r
1051                         /* Should not reach here as if the scheduler is running the\r
1052                         function will not return. */\r
1053                 }\r
1054                 else\r
1055                 {\r
1056                         /* Should only reach here if a task calls xTaskEndScheduler(). */\r
1057                 }\r
1058         }\r
1059 }\r
1060 /*-----------------------------------------------------------*/\r
1061 \r
1062 void vTaskEndScheduler( void )\r
1063 {\r
1064         /* Stop the scheduler interrupts and call the portable scheduler end\r
1065         routine so the original ISRs can be restored if necessary.  The port\r
1066         layer must ensure interrupts enable     bit is left in the correct state. */\r
1067         portDISABLE_INTERRUPTS();\r
1068         xSchedulerRunning = pdFALSE;\r
1069         vPortEndScheduler();\r
1070 }\r
1071 /*----------------------------------------------------------*/\r
1072 \r
1073 void vTaskSuspendAll( void )\r
1074 {\r
1075         /* A critical section is not required as the variable is of type\r
1076         portBASE_TYPE. */\r
1077         ++uxSchedulerSuspended;\r
1078 }\r
1079 /*----------------------------------------------------------*/\r
1080 \r
1081 signed portBASE_TYPE xTaskResumeAll( void )\r
1082 {\r
1083 register tskTCB *pxTCB;\r
1084 signed portBASE_TYPE xAlreadyYielded = pdFALSE;\r
1085 \r
1086         /* It is possible that an ISR caused a task to be removed from an event\r
1087         list while the scheduler was suspended.  If this was the case then the\r
1088         removed task will have been added to the xPendingReadyList.  Once the\r
1089         scheduler has been resumed it is safe to move all the pending ready\r
1090         tasks from this list into their appropriate ready list. */\r
1091         portENTER_CRITICAL();\r
1092         {\r
1093                 --uxSchedulerSuspended;\r
1094 \r
1095                 if( uxSchedulerSuspended == ( unsigned portBASE_TYPE ) pdFALSE )\r
1096                 {\r
1097                         if( uxCurrentNumberOfTasks > ( unsigned portBASE_TYPE ) 0 )\r
1098                         {\r
1099                                 portBASE_TYPE xYieldRequired = pdFALSE;\r
1100 \r
1101                                 /* Move any readied tasks from the pending list into the\r
1102                                 appropriate ready list. */\r
1103                                 while( ( pxTCB = ( tskTCB * ) listGET_OWNER_OF_HEAD_ENTRY(  ( ( xList * ) &xPendingReadyList ) ) ) != NULL )\r
1104                                 {\r
1105                                         vListRemove( &( pxTCB->xEventListItem ) );\r
1106                                         vListRemove( &( pxTCB->xGenericListItem ) );\r
1107                                         prvAddTaskToReadyQueue( pxTCB );\r
1108 \r
1109                                         /* If we have moved a task that has a priority higher than\r
1110                                         the current task then we should yield. */\r
1111                                         if( pxTCB->uxPriority >= pxCurrentTCB->uxPriority )\r
1112                                         {\r
1113                                                 xYieldRequired = pdTRUE;\r
1114                                         }\r
1115                                 }\r
1116 \r
1117                                 /* If any ticks occurred while the scheduler was suspended then\r
1118                                 they should be processed now.  This ensures the tick count does not\r
1119                                 slip, and that any delayed tasks are resumed at the correct time. */\r
1120                                 if( uxMissedTicks > ( unsigned portBASE_TYPE ) 0 )\r
1121                                 {\r
1122                                         while( uxMissedTicks > ( unsigned portBASE_TYPE ) 0 )\r
1123                                         {\r
1124                                                 vTaskIncrementTick();\r
1125                                                 --uxMissedTicks;\r
1126                                         }\r
1127 \r
1128                                         /* As we have processed some ticks it is appropriate to yield\r
1129                                         to ensure the highest priority task that is ready to run is\r
1130                                         the task actually running. */\r
1131                                         #if configUSE_PREEMPTION == 1\r
1132                                         {\r
1133                                                 xYieldRequired = pdTRUE;\r
1134                                         }\r
1135                                         #endif\r
1136                                 }\r
1137 \r
1138                                 if( ( xYieldRequired == pdTRUE ) || ( xMissedYield == pdTRUE ) )\r
1139                                 {\r
1140                                         xAlreadyYielded = pdTRUE;\r
1141                                         xMissedYield = pdFALSE;\r
1142                                         portYIELD_WITHIN_API();\r
1143                                 }\r
1144                         }\r
1145                 }\r
1146         }\r
1147         portEXIT_CRITICAL();\r
1148 \r
1149         return xAlreadyYielded;\r
1150 }\r
1151 \r
1152 \r
1153 \r
1154 \r
1155 \r
1156 \r
1157 /*-----------------------------------------------------------\r
1158  * PUBLIC TASK UTILITIES documented in task.h\r
1159  *----------------------------------------------------------*/\r
1160 \r
1161 \r
1162 \r
1163 portTickType xTaskGetTickCount( void )\r
1164 {\r
1165 portTickType xTicks;\r
1166 \r
1167         /* Critical section required if running on a 16 bit processor. */\r
1168         portENTER_CRITICAL();\r
1169         {\r
1170                 xTicks = xTickCount;\r
1171         }\r
1172         portEXIT_CRITICAL();\r
1173 \r
1174         return xTicks;\r
1175 }\r
1176 /*-----------------------------------------------------------*/\r
1177 \r
1178 portTickType xTaskGetTickCountFromISR( void )\r
1179 {\r
1180         return xTickCount;\r
1181 }\r
1182 /*-----------------------------------------------------------*/\r
1183 \r
1184 unsigned portBASE_TYPE uxTaskGetNumberOfTasks( void )\r
1185 {\r
1186         /* A critical section is not required because the variables are of type\r
1187         portBASE_TYPE. */\r
1188         return uxCurrentNumberOfTasks;\r
1189 }\r
1190 /*-----------------------------------------------------------*/\r
1191 \r
1192 #if ( configUSE_TRACE_FACILITY == 1 )\r
1193 \r
1194         void vTaskList( signed char *pcWriteBuffer )\r
1195         {\r
1196         unsigned portBASE_TYPE uxQueue;\r
1197 \r
1198                 /* This is a VERY costly function that should be used for debug only.\r
1199                 It leaves interrupts disabled for a LONG time. */\r
1200 \r
1201                 vTaskSuspendAll();\r
1202                 {\r
1203                         /* Run through all the lists that could potentially contain a TCB and\r
1204                         report the task name, state and stack high water mark. */\r
1205 \r
1206                         pcWriteBuffer[ 0 ] = ( signed char ) 0x00;\r
1207                         strcat( ( char * ) pcWriteBuffer, ( const char * ) "\r\n" );\r
1208 \r
1209                         uxQueue = uxTopUsedPriority + 1;\r
1210 \r
1211                         do\r
1212                         {\r
1213                                 uxQueue--;\r
1214 \r
1215                                 if( !listLIST_IS_EMPTY( &( pxReadyTasksLists[ uxQueue ] ) ) )\r
1216                                 {\r
1217                                         prvListTaskWithinSingleList( pcWriteBuffer, ( xList * ) &( pxReadyTasksLists[ uxQueue ] ), tskREADY_CHAR );\r
1218                                 }\r
1219                         }while( uxQueue > ( unsigned short ) tskIDLE_PRIORITY );\r
1220 \r
1221                         if( !listLIST_IS_EMPTY( pxDelayedTaskList ) )\r
1222                         {\r
1223                                 prvListTaskWithinSingleList( pcWriteBuffer, ( xList * ) pxDelayedTaskList, tskBLOCKED_CHAR );\r
1224                         }\r
1225 \r
1226                         if( !listLIST_IS_EMPTY( pxOverflowDelayedTaskList ) )\r
1227                         {\r
1228                                 prvListTaskWithinSingleList( pcWriteBuffer, ( xList * ) pxOverflowDelayedTaskList, tskBLOCKED_CHAR );\r
1229                         }\r
1230 \r
1231                         #if( INCLUDE_vTaskDelete == 1 )\r
1232                         {\r
1233                                 if( !listLIST_IS_EMPTY( &xTasksWaitingTermination ) )\r
1234                                 {\r
1235                                         prvListTaskWithinSingleList( pcWriteBuffer, ( xList * ) &xTasksWaitingTermination, tskDELETED_CHAR );\r
1236                                 }\r
1237                         }\r
1238                         #endif\r
1239 \r
1240                         #if ( INCLUDE_vTaskSuspend == 1 )\r
1241                         {\r
1242                                 if( !listLIST_IS_EMPTY( &xSuspendedTaskList ) )\r
1243                                 {\r
1244                                         prvListTaskWithinSingleList( pcWriteBuffer, ( xList * ) &xSuspendedTaskList, tskSUSPENDED_CHAR );\r
1245                                 }\r
1246                         }\r
1247                         #endif\r
1248                 }\r
1249                 xTaskResumeAll();\r
1250         }\r
1251 \r
1252 #endif\r
1253 /*----------------------------------------------------------*/\r
1254 \r
1255 #if ( configGENERATE_RUN_TIME_STATS == 1 )\r
1256 \r
1257         void vTaskGetRunTimeStats( signed char *pcWriteBuffer )\r
1258         {\r
1259         unsigned portBASE_TYPE uxQueue;\r
1260         unsigned long ulTotalRunTime = portGET_RUN_TIME_COUNTER_VALUE();\r
1261 \r
1262                 /* This is a VERY costly function that should be used for debug only.\r
1263                 It leaves interrupts disabled for a LONG time. */\r
1264 \r
1265                 vTaskSuspendAll();\r
1266                 {\r
1267                         /* Run through all the lists that could potentially contain a TCB,\r
1268                         generating a table of run timer percentages in the provided\r
1269                         buffer. */\r
1270 \r
1271                         pcWriteBuffer[ 0 ] = ( signed char ) 0x00;\r
1272                         strcat( ( char * ) pcWriteBuffer, ( const char * ) "\r\n" );\r
1273 \r
1274                         uxQueue = uxTopUsedPriority + 1;\r
1275 \r
1276                         do\r
1277                         {\r
1278                                 uxQueue--;\r
1279 \r
1280                                 if( !listLIST_IS_EMPTY( &( pxReadyTasksLists[ uxQueue ] ) ) )\r
1281                                 {\r
1282                                         prvGenerateRunTimeStatsForTasksInList( pcWriteBuffer, ( xList * ) &( pxReadyTasksLists[ uxQueue ] ), ulTotalRunTime );\r
1283                                 }\r
1284                         }while( uxQueue > ( unsigned short ) tskIDLE_PRIORITY );\r
1285 \r
1286                         if( !listLIST_IS_EMPTY( pxDelayedTaskList ) )\r
1287                         {\r
1288                                 prvGenerateRunTimeStatsForTasksInList( pcWriteBuffer, ( xList * ) pxDelayedTaskList, ulTotalRunTime );\r
1289                         }\r
1290 \r
1291                         if( !listLIST_IS_EMPTY( pxOverflowDelayedTaskList ) )\r
1292                         {\r
1293                                 prvGenerateRunTimeStatsForTasksInList( pcWriteBuffer, ( xList * ) pxOverflowDelayedTaskList, ulTotalRunTime );\r
1294                         }\r
1295 \r
1296                         #if ( INCLUDE_vTaskDelete == 1 )\r
1297                         {\r
1298                                 if( !listLIST_IS_EMPTY( &xTasksWaitingTermination ) )\r
1299                                 {\r
1300                                         prvGenerateRunTimeStatsForTasksInList( pcWriteBuffer, ( xList * ) &xTasksWaitingTermination, ulTotalRunTime );\r
1301                                 }\r
1302                         }\r
1303                         #endif\r
1304 \r
1305                         #if ( INCLUDE_vTaskSuspend == 1 )\r
1306                         {\r
1307                                 if( !listLIST_IS_EMPTY( &xSuspendedTaskList ) )\r
1308                                 {\r
1309                                         prvGenerateRunTimeStatsForTasksInList( pcWriteBuffer, ( xList * ) &xSuspendedTaskList, ulTotalRunTime );\r
1310                                 }\r
1311                         }\r
1312                         #endif\r
1313                 }\r
1314                 xTaskResumeAll();\r
1315         }\r
1316 \r
1317 #endif\r
1318 /*----------------------------------------------------------*/\r
1319 \r
1320 #if ( configUSE_TRACE_FACILITY == 1 )\r
1321 \r
1322         void vTaskStartTrace( signed char * pcBuffer, unsigned long ulBufferSize )\r
1323         {\r
1324                 portENTER_CRITICAL();\r
1325                 {\r
1326                         pcTraceBuffer = ( signed char * )pcBuffer;\r
1327                         pcTraceBufferStart = pcBuffer;\r
1328                         pcTraceBufferEnd = pcBuffer + ( ulBufferSize - tskSIZE_OF_EACH_TRACE_LINE );\r
1329                         xTracing = pdTRUE;\r
1330                 }\r
1331                 portEXIT_CRITICAL();\r
1332         }\r
1333 \r
1334 #endif\r
1335 /*----------------------------------------------------------*/\r
1336 \r
1337 #if ( configUSE_TRACE_FACILITY == 1 )\r
1338 \r
1339         unsigned long ulTaskEndTrace( void )\r
1340         {\r
1341         unsigned long ulBufferLength;\r
1342 \r
1343                 portENTER_CRITICAL();\r
1344                         xTracing = pdFALSE;\r
1345                 portEXIT_CRITICAL();\r
1346 \r
1347                 ulBufferLength = ( unsigned long ) ( pcTraceBuffer - pcTraceBufferStart );\r
1348 \r
1349                 return ulBufferLength;\r
1350         }\r
1351 \r
1352 #endif\r
1353 \r
1354 \r
1355 \r
1356 /*-----------------------------------------------------------\r
1357  * SCHEDULER INTERNALS AVAILABLE FOR PORTING PURPOSES\r
1358  * documented in task.h\r
1359  *----------------------------------------------------------*/\r
1360 \r
1361 \r
1362 void vTaskIncrementTick( void )\r
1363 {\r
1364         /* Called by the portable layer each time a tick interrupt occurs.\r
1365         Increments the tick then checks to see if the new tick value will cause any\r
1366         tasks to be unblocked. */\r
1367         if( uxSchedulerSuspended == ( unsigned portBASE_TYPE ) pdFALSE )\r
1368         {\r
1369                 ++xTickCount;\r
1370                 if( xTickCount == ( portTickType ) 0 )\r
1371                 {\r
1372                         xList *pxTemp;\r
1373 \r
1374                         /* Tick count has overflowed so we need to swap the delay lists.\r
1375                         If there are any items in pxDelayedTaskList here then there is\r
1376                         an error! */\r
1377                         pxTemp = pxDelayedTaskList;\r
1378                         pxDelayedTaskList = pxOverflowDelayedTaskList;\r
1379                         pxOverflowDelayedTaskList = pxTemp;\r
1380                         xNumOfOverflows++;\r
1381                 }\r
1382 \r
1383                 /* See if this tick has made a timeout expire. */\r
1384                 prvCheckDelayedTasks();\r
1385         }\r
1386         else\r
1387         {\r
1388                 ++uxMissedTicks;\r
1389 \r
1390                 /* The tick hook gets called at regular intervals, even if the\r
1391                 scheduler is locked. */\r
1392                 #if ( configUSE_TICK_HOOK == 1 )\r
1393                 {\r
1394                         extern void vApplicationTickHook( void );\r
1395 \r
1396                         vApplicationTickHook();\r
1397                 }\r
1398                 #endif\r
1399         }\r
1400 \r
1401         #if ( configUSE_TICK_HOOK == 1 )\r
1402         {\r
1403                 extern void vApplicationTickHook( void );\r
1404 \r
1405                 /* Guard against the tick hook being called when the missed tick\r
1406                 count is being unwound (when the scheduler is being unlocked. */\r
1407                 if( uxMissedTicks == 0 )\r
1408                 {\r
1409                         vApplicationTickHook();\r
1410                 }\r
1411         }\r
1412         #endif\r
1413 \r
1414         traceTASK_INCREMENT_TICK( xTickCount );\r
1415 }\r
1416 /*-----------------------------------------------------------*/\r
1417 \r
1418 #if ( ( INCLUDE_vTaskCleanUpResources == 1 ) && ( INCLUDE_vTaskSuspend == 1 ) )\r
1419 \r
1420         void vTaskCleanUpResources( void )\r
1421         {\r
1422         unsigned short usQueue;\r
1423         volatile tskTCB *pxTCB;\r
1424 \r
1425                 usQueue = ( unsigned short ) uxTopUsedPriority + ( unsigned short ) 1;\r
1426 \r
1427                 /* Remove any TCB's from the ready queues. */\r
1428                 do\r
1429                 {\r
1430                         usQueue--;\r
1431 \r
1432                         while( !listLIST_IS_EMPTY( &( pxReadyTasksLists[ usQueue ] ) ) )\r
1433                         {\r
1434                                 listGET_OWNER_OF_NEXT_ENTRY( pxTCB, &( pxReadyTasksLists[ usQueue ] ) );\r
1435                                 vListRemove( ( xListItem * ) &( pxTCB->xGenericListItem ) );\r
1436 \r
1437                                 prvDeleteTCB( ( tskTCB * ) pxTCB );\r
1438                         }\r
1439                 }while( usQueue > ( unsigned short ) tskIDLE_PRIORITY );\r
1440 \r
1441                 /* Remove any TCB's from the delayed queue. */\r
1442                 while( !listLIST_IS_EMPTY( &xDelayedTaskList1 ) )\r
1443                 {\r
1444                         listGET_OWNER_OF_NEXT_ENTRY( pxTCB, &xDelayedTaskList1 );\r
1445                         vListRemove( ( xListItem * ) &( pxTCB->xGenericListItem ) );\r
1446 \r
1447                         prvDeleteTCB( ( tskTCB * ) pxTCB );\r
1448                 }\r
1449 \r
1450                 /* Remove any TCB's from the overflow delayed queue. */\r
1451                 while( !listLIST_IS_EMPTY( &xDelayedTaskList2 ) )\r
1452                 {\r
1453                         listGET_OWNER_OF_NEXT_ENTRY( pxTCB, &xDelayedTaskList2 );\r
1454                         vListRemove( ( xListItem * ) &( pxTCB->xGenericListItem ) );\r
1455 \r
1456                         prvDeleteTCB( ( tskTCB * ) pxTCB );\r
1457                 }\r
1458 \r
1459                 while( !listLIST_IS_EMPTY( &xSuspendedTaskList ) )\r
1460                 {\r
1461                         listGET_OWNER_OF_NEXT_ENTRY( pxTCB, &xSuspendedTaskList );\r
1462                         vListRemove( ( xListItem * ) &( pxTCB->xGenericListItem ) );\r
1463 \r
1464                         prvDeleteTCB( ( tskTCB * ) pxTCB );\r
1465                 }\r
1466         }\r
1467 \r
1468 #endif\r
1469 /*-----------------------------------------------------------*/\r
1470 \r
1471 #if ( configUSE_APPLICATION_TASK_TAG == 1 )\r
1472 \r
1473         void vTaskSetApplicationTaskTag( xTaskHandle xTask, pdTASK_HOOK_CODE pxTagValue )\r
1474         {\r
1475         tskTCB *xTCB;\r
1476 \r
1477                 /* If xTask is NULL then we are setting our own task hook. */\r
1478                 if( xTask == NULL )\r
1479                 {\r
1480                         xTCB = ( tskTCB * ) pxCurrentTCB;\r
1481                 }\r
1482                 else\r
1483                 {\r
1484                         xTCB = ( tskTCB * ) xTask;\r
1485                 }\r
1486 \r
1487                 /* Save the hook function in the TCB.  A critical section is required as\r
1488                 the value can be accessed from an interrupt. */\r
1489                 portENTER_CRITICAL();\r
1490                         xTCB->pxTaskTag = pxTagValue;\r
1491                 portEXIT_CRITICAL();\r
1492         }\r
1493 \r
1494 #endif\r
1495 /*-----------------------------------------------------------*/\r
1496 \r
1497 #if ( configUSE_APPLICATION_TASK_TAG == 1 )\r
1498 \r
1499         pdTASK_HOOK_CODE xTaskGetApplicationTaskTag( xTaskHandle xTask )\r
1500         {\r
1501         tskTCB *xTCB;\r
1502         pdTASK_HOOK_CODE xReturn;\r
1503 \r
1504                 /* If xTask is NULL then we are setting our own task hook. */\r
1505                 if( xTask == NULL )\r
1506                 {\r
1507                         xTCB = ( tskTCB * ) pxCurrentTCB;\r
1508                 }\r
1509                 else\r
1510                 {\r
1511                         xTCB = ( tskTCB * ) xTask;\r
1512                 }\r
1513 \r
1514                 /* Save the hook function in the TCB.  A critical section is required as\r
1515                 the value can be accessed from an interrupt. */\r
1516                 portENTER_CRITICAL();\r
1517                         xReturn = xTCB->pxTaskTag;\r
1518                 portEXIT_CRITICAL();\r
1519 \r
1520                 return xReturn;\r
1521         }\r
1522 \r
1523 #endif\r
1524 /*-----------------------------------------------------------*/\r
1525 \r
1526 #if ( configUSE_APPLICATION_TASK_TAG == 1 )\r
1527 \r
1528         portBASE_TYPE xTaskCallApplicationTaskHook( xTaskHandle xTask, void *pvParameter )\r
1529         {\r
1530         tskTCB *xTCB;\r
1531         portBASE_TYPE xReturn;\r
1532 \r
1533                 /* If xTask is NULL then we are calling our own task hook. */\r
1534                 if( xTask == NULL )\r
1535                 {\r
1536                         xTCB = ( tskTCB * ) pxCurrentTCB;\r
1537                 }\r
1538                 else\r
1539                 {\r
1540                         xTCB = ( tskTCB * ) xTask;\r
1541                 }\r
1542 \r
1543                 if( xTCB->pxTaskTag != NULL )\r
1544                 {\r
1545                         xReturn = xTCB->pxTaskTag( pvParameter );\r
1546                 }\r
1547                 else\r
1548                 {\r
1549                         xReturn = pdFAIL;\r
1550                 }\r
1551 \r
1552                 return xReturn;\r
1553         }\r
1554 \r
1555 #endif\r
1556 /*-----------------------------------------------------------*/\r
1557 \r
1558 void vTaskSwitchContext( void )\r
1559 {\r
1560         if( uxSchedulerSuspended != ( unsigned portBASE_TYPE ) pdFALSE )\r
1561         {\r
1562                 /* The scheduler is currently suspended - do not allow a context\r
1563                 switch. */\r
1564                 xMissedYield = pdTRUE;\r
1565                 return;\r
1566         }\r
1567 \r
1568         traceTASK_SWITCHED_OUT();\r
1569 \r
1570         #if ( configGENERATE_RUN_TIME_STATS == 1 )\r
1571         {\r
1572                 unsigned long ulTempCounter = portGET_RUN_TIME_COUNTER_VALUE();\r
1573 \r
1574                         /* Add the amount of time the task has been running to the accumulated\r
1575                         time so far.  The time the task started running was stored in\r
1576                         ulTaskSwitchedInTime.  Note that there is no overflow protection here\r
1577                         so count values are only valid until the timer overflows.  Generally\r
1578                         this will be about 1 hour assuming a 1uS timer increment. */\r
1579                         pxCurrentTCB->ulRunTimeCounter += ( ulTempCounter - ulTaskSwitchedInTime );\r
1580                         ulTaskSwitchedInTime = ulTempCounter;\r
1581         }\r
1582         #endif\r
1583 \r
1584         taskFIRST_CHECK_FOR_STACK_OVERFLOW();\r
1585         taskSECOND_CHECK_FOR_STACK_OVERFLOW();\r
1586 \r
1587         /* Find the highest priority queue that contains ready tasks. */\r
1588         while( listLIST_IS_EMPTY( &( pxReadyTasksLists[ uxTopReadyPriority ] ) ) )\r
1589         {\r
1590                 --uxTopReadyPriority;\r
1591         }\r
1592 \r
1593         /* listGET_OWNER_OF_NEXT_ENTRY walks through the list, so the tasks of the\r
1594         same priority get an equal share of the processor time. */\r
1595         listGET_OWNER_OF_NEXT_ENTRY( pxCurrentTCB, &( pxReadyTasksLists[ uxTopReadyPriority ] ) );\r
1596 \r
1597         traceTASK_SWITCHED_IN();\r
1598         vWriteTraceToBuffer();\r
1599 }\r
1600 /*-----------------------------------------------------------*/\r
1601 \r
1602 void vTaskPlaceOnEventList( const xList * const pxEventList, portTickType xTicksToWait )\r
1603 {\r
1604 portTickType xTimeToWake;\r
1605 \r
1606         /* THIS FUNCTION MUST BE CALLED WITH INTERRUPTS DISABLED OR THE\r
1607         SCHEDULER SUSPENDED. */\r
1608 \r
1609         /* Place the event list item of the TCB in the appropriate event list.\r
1610         This is placed in the list in priority order so the highest priority task\r
1611         is the first to be woken by the event. */\r
1612         vListInsert( ( xList * ) pxEventList, ( xListItem * ) &( pxCurrentTCB->xEventListItem ) );\r
1613 \r
1614         /* We must remove ourselves from the ready list before adding ourselves\r
1615         to the blocked list as the same list item is used for both lists.  We have\r
1616         exclusive access to the ready lists as the scheduler is locked. */\r
1617         vListRemove( ( xListItem * ) &( pxCurrentTCB->xGenericListItem ) );\r
1618 \r
1619 \r
1620         #if ( INCLUDE_vTaskSuspend == 1 )\r
1621         {\r
1622                 if( xTicksToWait == portMAX_DELAY )\r
1623                 {\r
1624                         /* Add ourselves to the suspended task list instead of a delayed task\r
1625                         list to ensure we are not woken by a timing event.  We will block\r
1626                         indefinitely. */\r
1627                         vListInsertEnd( ( xList * ) &xSuspendedTaskList, ( xListItem * ) &( pxCurrentTCB->xGenericListItem ) );\r
1628                 }\r
1629                 else\r
1630                 {\r
1631                         /* Calculate the time at which the task should be woken if the event does\r
1632                         not occur.  This may overflow but this doesn't matter. */\r
1633                         xTimeToWake = xTickCount + xTicksToWait;\r
1634 \r
1635                         listSET_LIST_ITEM_VALUE( &( pxCurrentTCB->xGenericListItem ), xTimeToWake );\r
1636 \r
1637                         if( xTimeToWake < xTickCount )\r
1638                         {\r
1639                                 /* Wake time has overflowed.  Place this item in the overflow list. */\r
1640                                 vListInsert( ( xList * ) pxOverflowDelayedTaskList, ( xListItem * ) &( pxCurrentTCB->xGenericListItem ) );\r
1641                         }\r
1642                         else\r
1643                         {\r
1644                                 /* The wake time has not overflowed, so we can use the current block list. */\r
1645                                 vListInsert( ( xList * ) pxDelayedTaskList, ( xListItem * ) &( pxCurrentTCB->xGenericListItem ) );\r
1646                         }\r
1647                 }\r
1648         }\r
1649         #else\r
1650         {\r
1651                         /* Calculate the time at which the task should be woken if the event does\r
1652                         not occur.  This may overflow but this doesn't matter. */\r
1653                         xTimeToWake = xTickCount + xTicksToWait;\r
1654 \r
1655                         listSET_LIST_ITEM_VALUE( &( pxCurrentTCB->xGenericListItem ), xTimeToWake );\r
1656 \r
1657                         if( xTimeToWake < xTickCount )\r
1658                         {\r
1659                                 /* Wake time has overflowed.  Place this item in the overflow list. */\r
1660                                 vListInsert( ( xList * ) pxOverflowDelayedTaskList, ( xListItem * ) &( pxCurrentTCB->xGenericListItem ) );\r
1661                         }\r
1662                         else\r
1663                         {\r
1664                                 /* The wake time has not overflowed, so we can use the current block list. */\r
1665                                 vListInsert( ( xList * ) pxDelayedTaskList, ( xListItem * ) &( pxCurrentTCB->xGenericListItem ) );\r
1666                         }\r
1667         }\r
1668         #endif\r
1669 }\r
1670 /*-----------------------------------------------------------*/\r
1671 \r
1672 signed portBASE_TYPE xTaskRemoveFromEventList( const xList * const pxEventList )\r
1673 {\r
1674 tskTCB *pxUnblockedTCB;\r
1675 portBASE_TYPE xReturn;\r
1676 \r
1677         /* THIS FUNCTION MUST BE CALLED WITH INTERRUPTS DISABLED OR THE\r
1678         SCHEDULER SUSPENDED.  It can also be called from within an ISR. */\r
1679 \r
1680         /* The event list is sorted in priority order, so we can remove the\r
1681         first in the list, remove the TCB from the delayed list, and add\r
1682         it to the ready list.\r
1683 \r
1684         If an event is for a queue that is locked then this function will never\r
1685         get called - the lock count on the queue will get modified instead.  This\r
1686         means we can always expect exclusive access to the event list here. */\r
1687         pxUnblockedTCB = ( tskTCB * ) listGET_OWNER_OF_HEAD_ENTRY( pxEventList );\r
1688         vListRemove( &( pxUnblockedTCB->xEventListItem ) );\r
1689 \r
1690         if( uxSchedulerSuspended == ( unsigned portBASE_TYPE ) pdFALSE )\r
1691         {\r
1692                 vListRemove( &( pxUnblockedTCB->xGenericListItem ) );\r
1693                 prvAddTaskToReadyQueue( pxUnblockedTCB );\r
1694         }\r
1695         else\r
1696         {\r
1697                 /* We cannot access the delayed or ready lists, so will hold this\r
1698                 task pending until the scheduler is resumed. */\r
1699                 vListInsertEnd( ( xList * ) &( xPendingReadyList ), &( pxUnblockedTCB->xEventListItem ) );\r
1700         }\r
1701 \r
1702         if( pxUnblockedTCB->uxPriority >= pxCurrentTCB->uxPriority )\r
1703         {\r
1704                 /* Return true if the task removed from the event list has\r
1705                 a higher priority than the calling task.  This allows\r
1706                 the calling task to know if it should force a context\r
1707                 switch now. */\r
1708                 xReturn = pdTRUE;\r
1709         }\r
1710         else\r
1711         {\r
1712                 xReturn = pdFALSE;\r
1713         }\r
1714 \r
1715         return xReturn;\r
1716 }\r
1717 /*-----------------------------------------------------------*/\r
1718 \r
1719 void vTaskSetTimeOutState( xTimeOutType * const pxTimeOut )\r
1720 {\r
1721         pxTimeOut->xOverflowCount = xNumOfOverflows;\r
1722         pxTimeOut->xTimeOnEntering = xTickCount;\r
1723 }\r
1724 /*-----------------------------------------------------------*/\r
1725 \r
1726 portBASE_TYPE xTaskCheckForTimeOut( xTimeOutType * const pxTimeOut, portTickType * const pxTicksToWait )\r
1727 {\r
1728 portBASE_TYPE xReturn;\r
1729 \r
1730         portENTER_CRITICAL();\r
1731         {\r
1732                 #if ( INCLUDE_vTaskSuspend == 1 )\r
1733                         /* If INCLUDE_vTaskSuspend is set to 1 and the block time specified is\r
1734                         the maximum block time then the task should block indefinitely, and\r
1735                         therefore never time out. */\r
1736                         if( *pxTicksToWait == portMAX_DELAY )\r
1737                         {\r
1738                                 xReturn = pdFALSE;\r
1739                         }\r
1740                         else /* We are not blocking indefinitely, perform the checks below. */\r
1741                 #endif\r
1742 \r
1743                 if( ( xNumOfOverflows != pxTimeOut->xOverflowCount ) && ( ( portTickType ) xTickCount >= ( portTickType ) pxTimeOut->xTimeOnEntering ) )\r
1744                 {\r
1745                         /* The tick count is greater than the time at which vTaskSetTimeout()\r
1746                         was called, but has also overflowed since vTaskSetTimeOut() was called.\r
1747                         It must have wrapped all the way around and gone past us again. This\r
1748                         passed since vTaskSetTimeout() was called. */\r
1749                         xReturn = pdTRUE;\r
1750                 }\r
1751                 else if( ( ( portTickType ) ( ( portTickType ) xTickCount - ( portTickType ) pxTimeOut->xTimeOnEntering ) ) < ( portTickType ) *pxTicksToWait )\r
1752                 {\r
1753                         /* Not a genuine timeout. Adjust parameters for time remaining. */\r
1754                         *pxTicksToWait -= ( ( portTickType ) xTickCount - ( portTickType ) pxTimeOut->xTimeOnEntering );\r
1755                         vTaskSetTimeOutState( pxTimeOut );\r
1756                         xReturn = pdFALSE;\r
1757                 }\r
1758                 else\r
1759                 {\r
1760                         xReturn = pdTRUE;\r
1761                 }\r
1762         }\r
1763         portEXIT_CRITICAL();\r
1764 \r
1765         return xReturn;\r
1766 }\r
1767 /*-----------------------------------------------------------*/\r
1768 \r
1769 void vTaskMissedYield( void )\r
1770 {\r
1771         xMissedYield = pdTRUE;\r
1772 }\r
1773 \r
1774 /*\r
1775  * -----------------------------------------------------------\r
1776  * The Idle task.\r
1777  * ----------------------------------------------------------\r
1778  *\r
1779  * The portTASK_FUNCTION() macro is used to allow port/compiler specific\r
1780  * language extensions.  The equivalent prototype for this function is:\r
1781  *\r
1782  * void prvIdleTask( void *pvParameters );\r
1783  *\r
1784  */\r
1785 static portTASK_FUNCTION( prvIdleTask, pvParameters )\r
1786 {\r
1787         /* Stop warnings. */\r
1788         ( void ) pvParameters;\r
1789 \r
1790         for( ;; )\r
1791         {\r
1792                 /* See if any tasks have been deleted. */\r
1793                 prvCheckTasksWaitingTermination();\r
1794 \r
1795                 #if ( configUSE_PREEMPTION == 0 )\r
1796                 {\r
1797                         /* If we are not using preemption we keep forcing a task switch to\r
1798                         see if any other task has become available.  If we are using\r
1799                         preemption we don't need to do this as any task becoming available\r
1800                         will automatically get the processor anyway. */\r
1801                         taskYIELD();\r
1802                 }\r
1803                 #endif\r
1804 \r
1805                 #if ( ( configUSE_PREEMPTION == 1 ) && ( configIDLE_SHOULD_YIELD == 1 ) )\r
1806                 {\r
1807                         /* When using preemption tasks of equal priority will be\r
1808                         timesliced.  If a task that is sharing the idle priority is ready\r
1809                         to run then the idle task should yield before the end of the\r
1810                         timeslice.\r
1811 \r
1812                         A critical region is not required here as we are just reading from\r
1813                         the list, and an occasional incorrect value will not matter.  If\r
1814                         the ready list at the idle priority contains more than one task\r
1815                         then a task other than the idle task is ready to execute. */\r
1816                         if( listCURRENT_LIST_LENGTH( &( pxReadyTasksLists[ tskIDLE_PRIORITY ] ) ) > ( unsigned portBASE_TYPE ) 1 )\r
1817                         {\r
1818                                 taskYIELD();\r
1819                         }\r
1820                 }\r
1821                 #endif\r
1822 \r
1823                 #if ( configUSE_IDLE_HOOK == 1 )\r
1824                 {\r
1825                         extern void vApplicationIdleHook( void );\r
1826 \r
1827                         /* Call the user defined function from within the idle task.  This\r
1828                         allows the application designer to add background functionality\r
1829                         without the overhead of a separate task.\r
1830                         NOTE: vApplicationIdleHook() MUST NOT, UNDER ANY CIRCUMSTANCES,\r
1831                         CALL A FUNCTION THAT MIGHT BLOCK. */\r
1832                         vApplicationIdleHook();\r
1833                 }\r
1834                 #endif\r
1835         }\r
1836 } /*lint !e715 pvParameters is not accessed but all task functions require the same prototype. */\r
1837 \r
1838 \r
1839 \r
1840 \r
1841 \r
1842 \r
1843 \r
1844 /*-----------------------------------------------------------\r
1845  * File private functions documented at the top of the file.\r
1846  *----------------------------------------------------------*/\r
1847 \r
1848 \r
1849 \r
1850 static void prvInitialiseTCBVariables( tskTCB *pxTCB, const signed char * const pcName, unsigned portBASE_TYPE uxPriority, const xMemoryRegion * const xRegions, unsigned short usStackDepth )\r
1851 {\r
1852         /* Store the function name in the TCB. */\r
1853         #if configMAX_TASK_NAME_LEN > 1\r
1854         {\r
1855                 /* Don't bring strncpy into the build unnecessarily. */\r
1856                 strncpy( ( char * ) pxTCB->pcTaskName, ( const char * ) pcName, ( unsigned short ) configMAX_TASK_NAME_LEN );\r
1857         }\r
1858         #endif\r
1859         pxTCB->pcTaskName[ ( unsigned short ) configMAX_TASK_NAME_LEN - ( unsigned short ) 1 ] = '\0';\r
1860 \r
1861         /* This is used as an array index so must ensure it's not too large.  First\r
1862         remove the privilege bit if one is present. */\r
1863         if( uxPriority >= configMAX_PRIORITIES )\r
1864         {\r
1865                 uxPriority = configMAX_PRIORITIES - 1;\r
1866         }\r
1867 \r
1868         pxTCB->uxPriority = uxPriority;\r
1869         #if ( configUSE_MUTEXES == 1 )\r
1870         {\r
1871                 pxTCB->uxBasePriority = uxPriority;\r
1872         }\r
1873         #endif\r
1874 \r
1875         vListInitialiseItem( &( pxTCB->xGenericListItem ) );\r
1876         vListInitialiseItem( &( pxTCB->xEventListItem ) );\r
1877 \r
1878         /* Set the pxTCB as a link back from the xListItem.  This is so we can get\r
1879         back to the containing TCB from a generic item in a list. */\r
1880         listSET_LIST_ITEM_OWNER( &( pxTCB->xGenericListItem ), pxTCB );\r
1881 \r
1882         /* Event lists are always in priority order. */\r
1883         listSET_LIST_ITEM_VALUE( &( pxTCB->xEventListItem ), configMAX_PRIORITIES - ( portTickType ) uxPriority );\r
1884         listSET_LIST_ITEM_OWNER( &( pxTCB->xEventListItem ), pxTCB );\r
1885 \r
1886         #if ( portCRITICAL_NESTING_IN_TCB == 1 )\r
1887         {\r
1888                 pxTCB->uxCriticalNesting = ( unsigned portBASE_TYPE ) 0;\r
1889         }\r
1890         #endif\r
1891 \r
1892         #if ( configUSE_APPLICATION_TASK_TAG == 1 )\r
1893         {\r
1894                 pxTCB->pxTaskTag = NULL;\r
1895         }\r
1896         #endif\r
1897 \r
1898         #if ( configGENERATE_RUN_TIME_STATS == 1 )\r
1899         {\r
1900                 pxTCB->ulRunTimeCounter = 0UL;\r
1901         }\r
1902         #endif\r
1903 \r
1904         #if ( portUSING_MPU_WRAPPERS == 1 )\r
1905         {\r
1906                 vPortStoreTaskMPUSettings( &( pxTCB->xMPUSettings ), xRegions, pxTCB->pxStack, usStackDepth );\r
1907         }\r
1908         #else\r
1909         {\r
1910                 ( void ) xRegions;\r
1911                 ( void ) usStackDepth;\r
1912         }\r
1913         #endif\r
1914 }\r
1915 /*-----------------------------------------------------------*/\r
1916 \r
1917 #if ( portUSING_MPU_WRAPPERS == 1 )\r
1918 \r
1919         void vTaskAllocateMPURegions( xTaskHandle xTaskToModify, const xMemoryRegion * const xRegions )\r
1920         {\r
1921         tskTCB *pxTCB;\r
1922         \r
1923                 if( xTaskToModify == pxCurrentTCB )\r
1924                 {\r
1925                         xTaskToModify = NULL;\r
1926                 }\r
1927 \r
1928                 /* If null is passed in here then we are deleting ourselves. */\r
1929                 pxTCB = prvGetTCBFromHandle( xTaskToModify );\r
1930 \r
1931         vPortStoreTaskMPUSettings( &( pxTCB->xMPUSettings ), xRegions, NULL, 0 );\r
1932         }\r
1933         /*-----------------------------------------------------------*/\r
1934 #endif\r
1935 \r
1936 static void prvInitialiseTaskLists( void )\r
1937 {\r
1938 unsigned portBASE_TYPE uxPriority;\r
1939 \r
1940         for( uxPriority = 0; uxPriority < configMAX_PRIORITIES; uxPriority++ )\r
1941         {\r
1942                 vListInitialise( ( xList * ) &( pxReadyTasksLists[ uxPriority ] ) );\r
1943         }\r
1944 \r
1945         vListInitialise( ( xList * ) &xDelayedTaskList1 );\r
1946         vListInitialise( ( xList * ) &xDelayedTaskList2 );\r
1947         vListInitialise( ( xList * ) &xPendingReadyList );\r
1948 \r
1949         #if ( INCLUDE_vTaskDelete == 1 )\r
1950         {\r
1951                 vListInitialise( ( xList * ) &xTasksWaitingTermination );\r
1952         }\r
1953         #endif\r
1954 \r
1955         #if ( INCLUDE_vTaskSuspend == 1 )\r
1956         {\r
1957                 vListInitialise( ( xList * ) &xSuspendedTaskList );\r
1958         }\r
1959         #endif\r
1960 \r
1961         /* Start with pxDelayedTaskList using list1 and the pxOverflowDelayedTaskList\r
1962         using list2. */\r
1963         pxDelayedTaskList = &xDelayedTaskList1;\r
1964         pxOverflowDelayedTaskList = &xDelayedTaskList2;\r
1965 }\r
1966 /*-----------------------------------------------------------*/\r
1967 \r
1968 static void prvCheckTasksWaitingTermination( void )\r
1969 {\r
1970         #if ( INCLUDE_vTaskDelete == 1 )\r
1971         {\r
1972                 portBASE_TYPE xListIsEmpty;\r
1973 \r
1974                 /* ucTasksDeleted is used to prevent vTaskSuspendAll() being called\r
1975                 too often in the idle task. */\r
1976                 if( uxTasksDeleted > ( unsigned portBASE_TYPE ) 0 )\r
1977                 {\r
1978                         vTaskSuspendAll();\r
1979                                 xListIsEmpty = listLIST_IS_EMPTY( &xTasksWaitingTermination );\r
1980                         xTaskResumeAll();\r
1981 \r
1982                         if( !xListIsEmpty )\r
1983                         {\r
1984                                 tskTCB *pxTCB;\r
1985 \r
1986                                 portENTER_CRITICAL();\r
1987                                 {\r
1988                                         pxTCB = ( tskTCB * ) listGET_OWNER_OF_HEAD_ENTRY( ( ( xList * ) &xTasksWaitingTermination ) );\r
1989                                         vListRemove( &( pxTCB->xGenericListItem ) );\r
1990                                         --uxCurrentNumberOfTasks;\r
1991                                         --uxTasksDeleted;\r
1992                                 }\r
1993                                 portEXIT_CRITICAL();\r
1994 \r
1995                                 prvDeleteTCB( pxTCB );\r
1996                         }\r
1997                 }\r
1998         }\r
1999         #endif\r
2000 }\r
2001 /*-----------------------------------------------------------*/\r
2002 \r
2003 static tskTCB *prvAllocateTCBAndStack( unsigned short usStackDepth, portSTACK_TYPE *puxStackBuffer )\r
2004 {\r
2005 tskTCB *pxNewTCB;\r
2006 \r
2007         /* Allocate space for the TCB.  Where the memory comes from depends on\r
2008         the implementation of the port malloc function. */\r
2009         pxNewTCB = ( tskTCB * ) pvPortMalloc( sizeof( tskTCB ) );\r
2010 \r
2011         if( pxNewTCB != NULL )\r
2012         {\r
2013                 /* Allocate space for the stack used by the task being created.\r
2014                 The base of the stack memory stored in the TCB so the task can\r
2015                 be deleted later if required. */\r
2016                 pxNewTCB->pxStack = ( portSTACK_TYPE * ) pvPortMallocAligned( ( ( ( size_t )usStackDepth ) * sizeof( portSTACK_TYPE ) ), puxStackBuffer );\r
2017 \r
2018                 if( pxNewTCB->pxStack == NULL )\r
2019                 {\r
2020                         /* Could not allocate the stack.  Delete the allocated TCB. */\r
2021                         vPortFree( pxNewTCB );\r
2022                         pxNewTCB = NULL;\r
2023                 }\r
2024                 else\r
2025                 {\r
2026                         /* Just to help debugging. */\r
2027                         memset( pxNewTCB->pxStack, tskSTACK_FILL_BYTE, usStackDepth * sizeof( portSTACK_TYPE ) );\r
2028                 }\r
2029         }\r
2030 \r
2031         return pxNewTCB;\r
2032 }\r
2033 /*-----------------------------------------------------------*/\r
2034 \r
2035 #if ( configUSE_TRACE_FACILITY == 1 )\r
2036 \r
2037         static void prvListTaskWithinSingleList( const signed char *pcWriteBuffer, xList *pxList, signed char cStatus )\r
2038         {\r
2039         volatile tskTCB *pxNextTCB, *pxFirstTCB;\r
2040         unsigned short usStackRemaining;\r
2041 \r
2042                 /* Write the details of all the TCB's in pxList into the buffer. */\r
2043                 listGET_OWNER_OF_NEXT_ENTRY( pxFirstTCB, pxList );\r
2044                 do\r
2045                 {\r
2046                         listGET_OWNER_OF_NEXT_ENTRY( pxNextTCB, pxList );\r
2047                         #if ( portSTACK_GROWTH > 0 )\r
2048                         {\r
2049                                 usStackRemaining = usTaskCheckFreeStackSpace( ( unsigned char * ) pxNextTCB->pxEndOfStack );\r
2050                         }\r
2051                         #else\r
2052                         {\r
2053                                 usStackRemaining = usTaskCheckFreeStackSpace( ( unsigned char * ) pxNextTCB->pxStack );\r
2054                         }\r
2055                         #endif                  \r
2056                         \r
2057                         sprintf( pcStatusString, ( char * ) "%s\t\t%c\t%u\t%u\t%u\r\n", pxNextTCB->pcTaskName, cStatus, ( unsigned int ) pxNextTCB->uxPriority, usStackRemaining, ( unsigned int ) pxNextTCB->uxTCBNumber );\r
2058                         strcat( ( char * ) pcWriteBuffer, ( char * ) pcStatusString );\r
2059 \r
2060                 } while( pxNextTCB != pxFirstTCB );\r
2061         }\r
2062 \r
2063 #endif\r
2064 /*-----------------------------------------------------------*/\r
2065 \r
2066 #if ( configGENERATE_RUN_TIME_STATS == 1 )\r
2067 \r
2068         static void prvGenerateRunTimeStatsForTasksInList( const signed char *pcWriteBuffer, xList *pxList, unsigned long ulTotalRunTime )\r
2069         {\r
2070         volatile tskTCB *pxNextTCB, *pxFirstTCB;\r
2071         unsigned long ulStatsAsPercentage;\r
2072 \r
2073                 /* Write the run time stats of all the TCB's in pxList into the buffer. */\r
2074                 listGET_OWNER_OF_NEXT_ENTRY( pxFirstTCB, pxList );\r
2075                 do\r
2076                 {\r
2077                         /* Get next TCB in from the list. */\r
2078                         listGET_OWNER_OF_NEXT_ENTRY( pxNextTCB, pxList );\r
2079 \r
2080                         /* Divide by zero check. */\r
2081                         if( ulTotalRunTime > 0UL )\r
2082                         {\r
2083                                 /* Has the task run at all? */\r
2084                                 if( pxNextTCB->ulRunTimeCounter == 0 )\r
2085                                 {\r
2086                                         /* The task has used no CPU time at all. */\r
2087                                         sprintf( pcStatsString, ( char * ) "%s\t\t0\t\t0%%\r\n", pxNextTCB->pcTaskName );\r
2088                                 }\r
2089                                 else\r
2090                                 {\r
2091                                         /* What percentage of the total run time as the task used?\r
2092                                         This will always be rounded down to the nearest integer. */\r
2093                                         ulStatsAsPercentage = ( 100UL * pxNextTCB->ulRunTimeCounter ) / ulTotalRunTime;\r
2094 \r
2095                                         if( ulStatsAsPercentage > 0UL )\r
2096                                         {\r
2097                                                 sprintf( pcStatsString, ( char * ) "%s\t\t%u\t\t%u%%\r\n", pxNextTCB->pcTaskName, ( unsigned int ) pxNextTCB->ulRunTimeCounter, ( unsigned int ) ulStatsAsPercentage );\r
2098                                         }\r
2099                                         else\r
2100                                         {\r
2101                                                 /* If the percentage is zero here then the task has\r
2102                                                 consumed less than 1% of the total run time. */\r
2103                                                 sprintf( pcStatsString, ( char * ) "%s\t\t%u\t\t<1%%\r\n", pxNextTCB->pcTaskName, ( unsigned int ) pxNextTCB->ulRunTimeCounter );\r
2104                                         }\r
2105                                 }\r
2106 \r
2107                                 strcat( ( char * ) pcWriteBuffer, ( char * ) pcStatsString );\r
2108                         }\r
2109 \r
2110                 } while( pxNextTCB != pxFirstTCB );\r
2111         }\r
2112 \r
2113 #endif\r
2114 /*-----------------------------------------------------------*/\r
2115 \r
2116 #if ( ( configUSE_TRACE_FACILITY == 1 ) || ( INCLUDE_uxTaskGetStackHighWaterMark == 1 ) )\r
2117 \r
2118         static unsigned short usTaskCheckFreeStackSpace( const unsigned char * pucStackByte )\r
2119         {\r
2120         register unsigned short usCount = 0;\r
2121 \r
2122                 while( *pucStackByte == tskSTACK_FILL_BYTE )\r
2123                 {\r
2124                         pucStackByte -= portSTACK_GROWTH;\r
2125                         usCount++;\r
2126                 }\r
2127 \r
2128                 usCount /= sizeof( portSTACK_TYPE );\r
2129 \r
2130                 return usCount;\r
2131         }\r
2132 \r
2133 #endif\r
2134 /*-----------------------------------------------------------*/\r
2135 \r
2136 #if ( INCLUDE_uxTaskGetStackHighWaterMark == 1 )\r
2137 \r
2138         unsigned portBASE_TYPE uxTaskGetStackHighWaterMark( xTaskHandle xTask )\r
2139         {\r
2140         tskTCB *pxTCB;\r
2141         unsigned char *pcEndOfStack;\r
2142         unsigned portBASE_TYPE uxReturn;\r
2143 \r
2144                 pxTCB = prvGetTCBFromHandle( xTask );\r
2145 \r
2146                 #if portSTACK_GROWTH < 0\r
2147                 {\r
2148                         pcEndOfStack = ( unsigned char * ) pxTCB->pxStack;\r
2149                 }\r
2150                 #else\r
2151                 {\r
2152                         pcEndOfStack = ( unsigned char * ) pxTCB->pxEndOfStack;\r
2153                 }\r
2154                 #endif\r
2155 \r
2156                 uxReturn = ( unsigned portBASE_TYPE ) usTaskCheckFreeStackSpace( pcEndOfStack );\r
2157 \r
2158                 return uxReturn;\r
2159         }\r
2160 \r
2161 #endif\r
2162 /*-----------------------------------------------------------*/\r
2163 \r
2164 #if ( ( INCLUDE_vTaskDelete == 1 ) || ( INCLUDE_vTaskCleanUpResources == 1 ) )\r
2165 \r
2166         static void prvDeleteTCB( tskTCB *pxTCB )\r
2167         {\r
2168                 /* Free up the memory allocated by the scheduler for the task.  It is up to\r
2169                 the task to free any memory allocated at the application level. */\r
2170                 vPortFreeAligned( pxTCB->pxStack );\r
2171                 vPortFree( pxTCB );\r
2172         }\r
2173 \r
2174 #endif\r
2175 \r
2176 \r
2177 /*-----------------------------------------------------------*/\r
2178 \r
2179 #if ( INCLUDE_xTaskGetCurrentTaskHandle == 1 )\r
2180 \r
2181         xTaskHandle xTaskGetCurrentTaskHandle( void )\r
2182         {\r
2183         xTaskHandle xReturn;\r
2184 \r
2185                 /* A critical section is not required as this is not called from\r
2186                 an interrupt and the current TCB will always be the same for any\r
2187                 individual execution thread. */\r
2188                 xReturn = pxCurrentTCB;\r
2189 \r
2190                 return xReturn;\r
2191         }\r
2192 \r
2193 #endif\r
2194 \r
2195 /*-----------------------------------------------------------*/\r
2196 \r
2197 #if ( INCLUDE_xTaskGetSchedulerState == 1 )\r
2198 \r
2199         portBASE_TYPE xTaskGetSchedulerState( void )\r
2200         {\r
2201         portBASE_TYPE xReturn;\r
2202 \r
2203                 if( xSchedulerRunning == pdFALSE )\r
2204                 {\r
2205                         xReturn = taskSCHEDULER_NOT_STARTED;\r
2206                 }\r
2207                 else\r
2208                 {\r
2209                         if( uxSchedulerSuspended == ( unsigned portBASE_TYPE ) pdFALSE )\r
2210                         {\r
2211                                 xReturn = taskSCHEDULER_RUNNING;\r
2212                         }\r
2213                         else\r
2214                         {\r
2215                                 xReturn = taskSCHEDULER_SUSPENDED;\r
2216                         }\r
2217                 }\r
2218 \r
2219                 return xReturn;\r
2220         }\r
2221 \r
2222 #endif\r
2223 /*-----------------------------------------------------------*/\r
2224 \r
2225 #if ( configUSE_MUTEXES == 1 )\r
2226 \r
2227         void vTaskPriorityInherit( xTaskHandle * const pxMutexHolder )\r
2228         {\r
2229         tskTCB * const pxTCB = ( tskTCB * ) pxMutexHolder;\r
2230 \r
2231                 if( pxTCB->uxPriority < pxCurrentTCB->uxPriority )\r
2232                 {\r
2233                         /* Adjust the mutex holder state to account for its new priority. */\r
2234                         listSET_LIST_ITEM_VALUE( &( pxTCB->xEventListItem ), configMAX_PRIORITIES - ( portTickType ) pxCurrentTCB->uxPriority );\r
2235 \r
2236                         /* If the task being modified is in the ready state it will need to\r
2237                         be moved in to a new list. */\r
2238                         if( listIS_CONTAINED_WITHIN( &( pxReadyTasksLists[ pxTCB->uxPriority ] ), &( pxTCB->xGenericListItem ) ) )\r
2239                         {\r
2240                                 vListRemove( &( pxTCB->xGenericListItem ) );\r
2241 \r
2242                                 /* Inherit the priority before being moved into the new list. */\r
2243                                 pxTCB->uxPriority = pxCurrentTCB->uxPriority;\r
2244                                 prvAddTaskToReadyQueue( pxTCB );\r
2245                         }\r
2246                         else\r
2247                         {\r
2248                                 /* Just inherit the priority. */\r
2249                                 pxTCB->uxPriority = pxCurrentTCB->uxPriority;\r
2250                         }\r
2251                 }\r
2252         }\r
2253 \r
2254 #endif\r
2255 /*-----------------------------------------------------------*/\r
2256 \r
2257 #if ( configUSE_MUTEXES == 1 )\r
2258 \r
2259         void vTaskPriorityDisinherit( xTaskHandle * const pxMutexHolder )\r
2260         {\r
2261         tskTCB * const pxTCB = ( tskTCB * ) pxMutexHolder;\r
2262 \r
2263                 if( pxMutexHolder != NULL )\r
2264                 {\r
2265                         if( pxTCB->uxPriority != pxTCB->uxBasePriority )\r
2266                         {\r
2267                                 /* We must be the running task to be able to give the mutex back.\r
2268                                 Remove ourselves from the ready list we currently appear in. */\r
2269                                 vListRemove( &( pxTCB->xGenericListItem ) );\r
2270 \r
2271                                 /* Disinherit the priority before adding ourselves into the new\r
2272                                 ready list. */\r
2273                                 pxTCB->uxPriority = pxTCB->uxBasePriority;\r
2274                                 listSET_LIST_ITEM_VALUE( &( pxTCB->xEventListItem ), configMAX_PRIORITIES - ( portTickType ) pxTCB->uxPriority );\r
2275                                 prvAddTaskToReadyQueue( pxTCB );\r
2276                         }\r
2277                 }\r
2278         }\r
2279 \r
2280 #endif\r
2281 /*-----------------------------------------------------------*/\r
2282 \r
2283 #if ( portCRITICAL_NESTING_IN_TCB == 1 )\r
2284 \r
2285         void vTaskEnterCritical( void )\r
2286         {\r
2287                 portDISABLE_INTERRUPTS();\r
2288 \r
2289                 if( xSchedulerRunning != pdFALSE )\r
2290                 {\r
2291                         ( pxCurrentTCB->uxCriticalNesting )++;\r
2292                 }\r
2293         }\r
2294 \r
2295 #endif\r
2296 /*-----------------------------------------------------------*/\r
2297 \r
2298 #if ( portCRITICAL_NESTING_IN_TCB == 1 )\r
2299 \r
2300 void vTaskExitCritical( void )\r
2301 {\r
2302         if( xSchedulerRunning != pdFALSE )\r
2303         {\r
2304                 if( pxCurrentTCB->uxCriticalNesting > 0 )\r
2305                 {\r
2306                         ( pxCurrentTCB->uxCriticalNesting )--;\r
2307 \r
2308                         if( pxCurrentTCB->uxCriticalNesting == 0 )\r
2309                         {\r
2310                                 portENABLE_INTERRUPTS();\r
2311                         }\r
2312                 }\r
2313         }\r
2314 }\r
2315 \r
2316 #endif\r
2317 /*-----------------------------------------------------------*/\r
2318 \r
2319 \r
2320 \r
2321 \r