1 function decode_stack(sp)
\r
6 sp += 4; /* skip stored ulCriticalNesting */
\r
8 a[16] = Debug.evaluate("*(unsigned long*)" + sp);
\r
10 for (i = 0; i <= 15; i++)
\r
13 a[i] = Debug.evaluate("*(unsigned long*)" + sp);
\r
19 function add_task(task, state)
\r
21 var tcb, task_name, current_task, regs;
\r
23 current_task = Debug.evaluate("pxCurrentTCB");
\r
24 tcb = Debug.evaluate("*(tskTCB *)" + task);
\r
26 task_name = Debug.evaluate("(char*)&(*(tskTCB *)" + task + ").pcTaskName[0]");
\r
27 task_name = "#" + tcb.uxTCBNumber + " \"" + task_name + "\"";
\r
29 if (task == current_task)
\r
31 state = "executing";
\r
36 regs = decode_stack(tcb.pxTopOfStack);
\r
39 Threads.add(task_name, tcb.uxPriority, state, regs);
\r
42 function add_list(list, state)
\r
44 var i, index, item, task;
\r
46 if (list && list.uxNumberOfItems>0)
\r
48 index = list.xListEnd.pxNext;
\r
50 for (i = 0; i < list.uxNumberOfItems; i++)
\r
52 item = Debug.evaluate("*(xListItem *)" + index);
\r
54 task = item ? item.pvOwner : 0;
\r
57 add_task(task, state);
\r
59 index = item.pxNext;
\r
66 var i, list, lists, max_priority;
\r
70 if( Debug.evaluate("pxCurrentTCB") == 0 )
\r
73 max_priority = Debug.evaluate("uxTopUsedPriority");
\r
75 Threads.newqueue("Ready");
\r
76 for (i = max_priority; i >= 0; i--)
\r
78 list = Debug.evaluate("pxReadyTasksLists[" + i + "]");
\r
79 add_list(list, "ready");
\r
82 Threads.newqueue("Blocked");
\r
83 list = Debug.evaluate("pxDelayedTaskList");
\r
86 list = Debug.evaluate("*(xList *)" + list);
\r
87 add_list(list, "blocked");
\r
90 list = Debug.evaluate("pxOverflowDelayedTaskList");
\r
93 list = Debug.evaluate("*(xList *)" + list);
\r
94 add_list(list, "blocked");
\r
97 Threads.newqueue("Suspended");
\r
98 list = Debug.evaluate("xSuspendedTaskList");
\r
101 add_list(list, "suspended");
\r