Mercurial > hg > Members > kono > Cerium
annotate TaskManager/kernel/ppe/TaskManagerImpl.cc @ 955:9989dd7b9ac2
unify all QueueInfo
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Wed, 04 Aug 2010 16:46:25 +0900 |
parents | 86aea6affe6c |
children |
rev | line source |
---|---|
5 | 1 #include <stdio.h> |
3 | 2 #include "TaskManagerImpl.h" |
46 | 3 #include "types.h" |
4 #include "error.h" | |
518 | 5 #include "SchedTask.h" |
619 | 6 #include "Scheduler.h" |
634 | 7 #include "SysTask.h" |
8 #include "SysFunc.h" | |
801 | 9 #include <string.h> |
10 | |
955 | 11 // singleton |
12 QueueInfo<TaskQueue> *taskQueuePool = new QueueInfo<TaskQueue>() ; | |
13 QueueInfo<HTask> *htaskPool = new QueueInfo<HTask>() ; | |
14 QueueInfo<TaskList> *taskListPool = new QueueInfo<TaskList>() ; | |
15 | |
619 | 16 |
220 | 17 static HTaskPtr systask_start; |
109 | 18 static HTaskPtr systask_finish; |
42 | 19 |
514 | 20 static void |
21 noaction(SchedTask *s, void *read, void *write) | |
3 | 22 { |
23 } | |
24 | |
835 | 25 TaskManagerImpl::TaskManagerImpl(int num) |
26 : machineNum(num){ | |
853 | 27 // 実行可能なHTaskのリスト |
955 | 28 activeTaskQueue = new QueueInfo<HTask>(htaskPool); |
853 | 29 // wait_forで止まっているHTaskのリスト。必要ないが、Dead lock detection に使う |
955 | 30 waitTaskQueue = new QueueInfo<HTask>(htaskPool); |
31 // HTask の factory. QueueInfo<HTask> ならなんでもいい。 | |
32 htaskImpl = waitTaskQueue ; // any QueueInfo<HTask> | |
33 // Task の dependency を表現する double linked list. QueueInfo<HTask> とは別に必要。 | |
34 taskQueueImpl = new QueueInfo<TaskQueue>(taskQueuePool); | |
480
46464727d825
TaskQueueInfo initiaization...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
479
diff
changeset
|
35 } |
50 | 36 |
220 | 37 /** |
298 | 38 * 一番最初に PPE で実行される systask_start |
220 | 39 */ |
42 | 40 void |
499 | 41 TaskManagerImpl::systask_init() |
42 | 42 { |
109 | 43 systask_register(); |
897
ad95be23c794
add return address in SimpleTask for debugging.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
855
diff
changeset
|
44 systask_start = create_task(StartTask,0,0,0,0,__builtin_return_address(0)); |
ad95be23c794
add return address in SimpleTask for debugging.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
855
diff
changeset
|
45 systask_finish = create_task(FinishTask,0,0,0,0,__builtin_return_address(0)); |
220 | 46 |
47 systask_start->spawn(); | |
48 | |
634 | 49 // すべての Task が FinishTask を wait_for すると、 |
50 // あらゆる Task が FinishTask の waiting task queue を操作する | |
51 // ことになる。それは、重すぎる。PPE/SPE Task が終了した時点で、 | |
52 // TaskManager が実行する方が安い。 | |
53 // append_waitTask(systask_finish); | |
54 } | |
55 | |
945
a9c7784e5dae
sort example fix ( simple task accepts one param and more compatible with old task)
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
941
diff
changeset
|
56 /** |
a9c7784e5dae
sort example fix ( simple task accepts one param and more compatible with old task)
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
941
diff
changeset
|
57 * Create Simple Task |
a9c7784e5dae
sort example fix ( simple task accepts one param and more compatible with old task)
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
941
diff
changeset
|
58 */ |
634 | 59 HTaskPtr |
897
ad95be23c794
add return address in SimpleTask for debugging.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
855
diff
changeset
|
60 TaskManagerImpl::create_task(int cmd,memaddr rbuf, long r_size, memaddr wbuf, long w_size, void *from) { |
634 | 61 HTaskPtr new_task; |
62 | |
955 | 63 new_task = htaskImpl->create(); |
64 new_task->init(cmd, rbuf, r_size, wbuf, w_size); | |
634 | 65 new_task->post_func = noaction; |
66 new_task->mimpl = this; | |
897
ad95be23c794
add return address in SimpleTask for debugging.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
855
diff
changeset
|
67 new_task->from = (memaddr)from; |
949 | 68 #ifdef EARLY_TOUCH |
69 if (rbuf) { | |
70 if ((unsigned long)rbuf&0xf) { | |
71 printf("Data is not aligned. command = %d, addr = 0x%lx, size = %ld\n", | |
72 cmd, (unsigned long)rbuf, r_size); | |
73 } | |
74 char *p = (char *)rbuf; char b = *p; | |
75 p = (char *)(rbuf+r_size-1); b += *p; | |
76 } | |
77 if (wbuf) { | |
78 if ((unsigned long)wbuf&0xf) { | |
79 printf("Data is not aligned. command = %d, addr = 0x%lx, size = %ld\n", | |
80 cmd, (unsigned long)wbuf, w_size); | |
81 } | |
82 char *p = (char *)wbuf; char b = *p; | |
83 p = (char *)(wbuf+w_size-1); b += *p; | |
84 } | |
85 #endif | |
634 | 86 |
87 return new_task; | |
42 | 88 } |
89 | |
945
a9c7784e5dae
sort example fix ( simple task accepts one param and more compatible with old task)
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
941
diff
changeset
|
90 /** |
a9c7784e5dae
sort example fix ( simple task accepts one param and more compatible with old task)
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
941
diff
changeset
|
91 * Create Compatible Task (TaskArray1) |
a9c7784e5dae
sort example fix ( simple task accepts one param and more compatible with old task)
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
941
diff
changeset
|
92 */ |
3 | 93 HTaskPtr |
897
ad95be23c794
add return address in SimpleTask for debugging.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
855
diff
changeset
|
94 TaskManagerImpl::create_task(int cmd,void *from) |
3 | 95 { |
96 HTaskPtr new_task; | |
97 | |
703 | 98 // for compatibility |
955 | 99 new_task = htaskImpl->create(); new_task->init(TaskArray1); |
703 | 100 new_task->post_func = noaction; |
101 new_task->mimpl = this; | |
736 | 102 new_task->create_task_array(cmd,1,8,8,8); |
713
f725c6455d19
remove SIMPLE_TASK conditional
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
704
diff
changeset
|
103 // rbuf, r_size were set |
704
6d497c098455
Compatibility mode works.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
703
diff
changeset
|
104 new_task->command = TaskArray1; |
897
ad95be23c794
add return address in SimpleTask for debugging.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
855
diff
changeset
|
105 new_task->from = (memaddr)from; |
63 | 106 |
3 | 107 return new_task; |
108 } | |
109 | |
945
a9c7784e5dae
sort example fix ( simple task accepts one param and more compatible with old task)
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
941
diff
changeset
|
110 /** |
a9c7784e5dae
sort example fix ( simple task accepts one param and more compatible with old task)
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
941
diff
changeset
|
111 * Create Task Array |
a9c7784e5dae
sort example fix ( simple task accepts one param and more compatible with old task)
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
941
diff
changeset
|
112 */ |
800
2708c4a7bade
run16 word count ( not yet worked. )
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
736
diff
changeset
|
113 HTaskPtr |
897
ad95be23c794
add return address in SimpleTask for debugging.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
855
diff
changeset
|
114 TaskManagerImpl::create_task_array(int id, int num_task, int num_param, int num_inData, int num_outData, void *from) |
800
2708c4a7bade
run16 word count ( not yet worked. )
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
736
diff
changeset
|
115 { |
897
ad95be23c794
add return address in SimpleTask for debugging.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
855
diff
changeset
|
116 HTaskPtr ta = create_task(TaskArray,0,0,0,0, from); |
800
2708c4a7bade
run16 word count ( not yet worked. )
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
736
diff
changeset
|
117 ta->create_task_array(id, num_task, num_param, num_inData, num_outData) ; |
2708c4a7bade
run16 word count ( not yet worked. )
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
736
diff
changeset
|
118 return ta; |
2708c4a7bade
run16 word count ( not yet worked. )
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
736
diff
changeset
|
119 } |
2708c4a7bade
run16 word count ( not yet worked. )
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
736
diff
changeset
|
120 |
3 | 121 /** |
298 | 122 * task の依存関係を設定 |
123 * master task が終わってから、slave task を実行するように | |
109 | 124 * master->wait_for(slave); |
3 | 125 */ |
126 void | |
127 TaskManagerImpl::set_task_depend(HTaskPtr master, HTaskPtr slave) | |
519 | 128 { |
3 | 129 TaskQueuePtr m, s; |
941
0c11c2fd7e63
add no_auto_free flag on HTask
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
940
diff
changeset
|
130 if (!master->self) return; |
519 | 131 |
955 | 132 m = taskQueueImpl->create(); m->init(master); |
133 s = taskQueueImpl->create(); s->init(slave); | |
519 | 134 |
479
5bda98b0b56d
Double Linked List base TaskQueue
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
475
diff
changeset
|
135 master->wait_me->addLast(s); |
5bda98b0b56d
Double Linked List base TaskQueue
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
475
diff
changeset
|
136 slave->wait_i->addLast(m); |
481
4896dffad67c
Double linked list modification done (tested on Mac OS X)
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
480
diff
changeset
|
137 s->waiter = m; |
519 | 138 } |
139 | |
3 | 140 /** |
298 | 141 * タスクを実行可能キューまたは待機キューへ追加する。 |
142 * 依存関係が満たされていれば active, まだだったら wait へ。 | |
109 | 143 * task->spawn(); |
144 */ | |
3 | 145 void |
18 | 146 TaskManagerImpl::spawn_task(HTaskPtr task) |
3 | 147 { |
109 | 148 // waiter // master |
149 // waitee // slave | |
480
46464727d825
TaskQueueInfo initiaization...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
479
diff
changeset
|
150 if (task->wait_i->empty()) { |
498
cb5ecfc5aaa3
double linked HTaskInfo/HTask
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
497
diff
changeset
|
151 append_activeTask(task); |
3 | 152 } else { |
498
cb5ecfc5aaa3
double linked HTaskInfo/HTask
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
497
diff
changeset
|
153 append_waitTask(task); |
3 | 154 } |
155 } | |
42 | 156 |
800
2708c4a7bade
run16 word count ( not yet worked. )
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
736
diff
changeset
|
157 |
109 | 158 /** |
298 | 159 * Task を実行可能キューに追加する |
109 | 160 */ |
161 void | |
498
cb5ecfc5aaa3
double linked HTaskInfo/HTask
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
497
diff
changeset
|
162 TaskManagerImpl::append_activeTask(HTaskPtr q) |
109 | 163 { |
479
5bda98b0b56d
Double Linked List base TaskQueue
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
475
diff
changeset
|
164 activeTaskQueue->addLast(q); |
109 | 165 } |
166 | |
167 /** | |
298 | 168 * タスクが実行する CPU を選択する |
109 | 169 * |
298 | 170 * 現在は CPU_PPE, CPU_SPE, SPE_ANY, SPE_0, SPE_1, ..., SPE_5 |
171 * types.h に書いてます。 | |
109 | 172 */ |
65 | 173 void |
174 TaskManagerImpl::set_task_cpu(HTaskPtr task, CPU_TYPE type) | |
175 { | |
664 | 176 if (machineNum==0) |
177 task->cpu_type = CPU_PPE ; | |
178 else | |
179 task->cpu_type = type; | |
65 | 180 } |
181 | |
940
0d404f6c36a8
unknown dead lock still...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
939
diff
changeset
|
182 #if 0 |
0d404f6c36a8
unknown dead lock still...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
939
diff
changeset
|
183 static void |
955 | 184 check_wait(TaskManagerImpl *tm, QueueInfo<TaskQueue> *wait_i) { |
940
0d404f6c36a8
unknown dead lock still...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
939
diff
changeset
|
185 for(TaskQueue *t = wait_i->getFirst(); t; t = wait_i->getNext(t)) { |
0d404f6c36a8
unknown dead lock still...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
939
diff
changeset
|
186 if (!tm->waitTaskQueue->find(t->task)) { |
0d404f6c36a8
unknown dead lock still...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
939
diff
changeset
|
187 printf("stray waiting task%d %lx\n",t->task->command, (long)t->task); |
0d404f6c36a8
unknown dead lock still...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
939
diff
changeset
|
188 } else if (tm->activeTaskQueue->find(t->task)) { |
0d404f6c36a8
unknown dead lock still...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
939
diff
changeset
|
189 printf(" active task%d in waiting queue %lx\n",t->task->command, (long)t->task); |
0d404f6c36a8
unknown dead lock still...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
939
diff
changeset
|
190 } else |
0d404f6c36a8
unknown dead lock still...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
939
diff
changeset
|
191 printf("."); |
0d404f6c36a8
unknown dead lock still...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
939
diff
changeset
|
192 } |
0d404f6c36a8
unknown dead lock still...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
939
diff
changeset
|
193 } |
0d404f6c36a8
unknown dead lock still...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
939
diff
changeset
|
194 #endif |
0d404f6c36a8
unknown dead lock still...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
939
diff
changeset
|
195 |
109 | 196 /** |
830 | 197 * @brief 終了したタスクから依存の処理とか |
298 | 198 * post_func() はこのタスクが終了したら実行する関数。 |
109 | 199 * |
298 | 200 * @param [task] 終了したタスク |
109 | 201 */ |
202 void | |
955 | 203 TaskManagerImpl::check_task_finish(HTaskPtr me, QueueInfo<HTask> *wait_queue) |
42 | 204 { |
497 | 205 while(TaskQueue *p = me->wait_me->poll()) { |
499 | 206 HTaskPtr you = p->task; |
955 | 207 QueueInfo<TaskQueue> *wait_i = you->wait_i; |
479
5bda98b0b56d
Double Linked List base TaskQueue
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
475
diff
changeset
|
208 // 相手の wait queue から自分(を指しているTaskQueue)を削除 |
5bda98b0b56d
Double Linked List base TaskQueue
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
475
diff
changeset
|
209 wait_i->remove(p->waiter); |
5bda98b0b56d
Double Linked List base TaskQueue
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
475
diff
changeset
|
210 // queue を free する |
493 | 211 wait_i->free_(p->waiter); |
483
0b933bef0328
renew task worked. but not test_nogl...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
481
diff
changeset
|
212 |
497 | 213 if (wait_i->empty()) { |
647
7c9ded1ea750
MailManager rewrite. not yet worked.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
639
diff
changeset
|
214 wait_queue->remove(you); |
499 | 215 append_activeTask(you); |
497 | 216 } |
217 | |
940
0d404f6c36a8
unknown dead lock still...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
939
diff
changeset
|
218 wait_i->free_(p); // p->wait_i, p->wait_me は再利用される |
479
5bda98b0b56d
Double Linked List base TaskQueue
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
475
diff
changeset
|
219 } |
5bda98b0b56d
Double Linked List base TaskQueue
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
475
diff
changeset
|
220 |
939 | 221 // me を誰かが持っていて、me が finish した後に、 |
222 // me->wait_for(i) とか、やられると気まずい。 | |
223 // 特に、me が他人に再利用されていると。そういう時には、 | |
224 // このfreeをコメントアウトしてみる。 | |
225 | |
226 // id かななんかでチェックした方が良いが... | |
227 | |
228 me->self = 0; | |
941
0c11c2fd7e63
add no_auto_free flag on HTask
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
940
diff
changeset
|
229 if (!me->flag.no_auto_free) |
0c11c2fd7e63
add no_auto_free flag on HTask
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
940
diff
changeset
|
230 htaskImpl->free_(me); |
109 | 231 } |
42 | 232 |
830 | 233 /** |
234 * @brief 終了したタスクリストの依存の処理 | |
235 * @param [task] 終了したタスク | |
236 */ | |
237 void | |
955 | 238 TaskManagerImpl::check_task_list_finish(SchedTask *s, TaskListPtr list, QueueInfo<HTask> *wait_queue) |
830 | 239 { |
855 | 240 for(int i = 0;i<list->length;i++) { |
831
65e9eab53f50
CheckTaskList Mail working
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
830
diff
changeset
|
241 SimpleTaskPtr task = &list->tasks[i]; |
830 | 242 HTask *me = (HTask*)task->self; |
243 me->post_func(s, me->post_arg1, me->post_arg2); | |
244 if (task->command==TaskArray1) { | |
831
65e9eab53f50
CheckTaskList Mail working
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
830
diff
changeset
|
245 int next = ((task->r_size)/sizeof(SimpleTask))+1; |
830 | 246 // assert(next<list->length); |
247 i+=next; | |
248 } | |
832
29094b48d966
poling (may recurse..)
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
831
diff
changeset
|
249 s->polling(); |
830 | 250 check_task_finish(me, wait_queue); |
251 } | |
252 } | |
109 | 253 |
830 | 254 /** |
255 * @brief waitTaskqueue への挿入 。必須ではない。 | |
256 * 現状では、dead lock 検出にしか使ってない | |
257 * | |
258 * @param [task] 終了したタスク | |
259 */ | |
109 | 260 void |
498
cb5ecfc5aaa3
double linked HTaskInfo/HTask
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
497
diff
changeset
|
261 TaskManagerImpl::append_waitTask(HTaskPtr q) |
109 | 262 { |
479
5bda98b0b56d
Double Linked List base TaskQueue
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
475
diff
changeset
|
263 waitTaskQueue ->addLast(q); |
109 | 264 } |
265 | |
830 | 266 /** |
267 @brief htask を DMA でCPUに渡すための TaskList に入れる (copy) | |
268 @param htask | |
269 @param taskList | |
270 TaskList は自動的に延長される | |
271 */ | |
801 | 272 void |
955 | 273 TaskManagerImpl::set_taskList(HTaskPtr htask, QueueInfo<TaskList> * taskList) { |
809 | 274 TaskListPtr list ; |
275 if ( taskList->empty() ) { | |
276 list = taskList->create(); | |
277 taskList->addLast(list); | |
278 } else | |
279 list = taskList->getLast(); | |
801 | 280 SimpleTaskPtr task = &list->tasks[list->length++]; |
281 if (htask->command==TaskArray1) { | |
282 // compatibility | |
283 int next = ((htask->r_size)/sizeof(SimpleTask))+1; | |
284 if (list->length+next>=TASK_MAX_SIZE) { | |
285 list->length--; | |
809 | 286 TaskListPtr newList = taskList->create(); |
801 | 287 taskList->addLast(newList); |
288 list = newList; | |
289 task = &list->tasks[list->length++]; | |
290 } | |
291 Task *array = (Task*)&list->tasks[list->length]; | |
292 list->length += next; | |
293 if (list->length>=TASK_MAX_SIZE) { | |
294 perror("task array1 overflow\n"); | |
295 } | |
296 memcpy(array, htask->rbuf, htask->r_size); | |
297 free(htask->rbuf); | |
831
65e9eab53f50
CheckTaskList Mail working
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
830
diff
changeset
|
298 // htask->rbuf = 0; htask->r_size = 0; we need this... |
801 | 299 *task = *(SimpleTask*)htask; |
300 } else { | |
301 *task = *(SimpleTask*)htask; | |
302 } | |
303 if (list->length >= TASK_MAX_SIZE) { | |
809 | 304 TaskListPtr newList = taskList->create(); |
801 | 305 taskList->addLast(newList); |
306 list = newList; | |
307 } | |
308 } | |
309 | |
54 | 310 |
619 | 311 |
479
5bda98b0b56d
Double Linked List base TaskQueue
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
475
diff
changeset
|
312 /* end */ |