Mercurial > hg > Game > Cerium
annotate TaskManager/kernel/ppe/TaskManagerImpl.cc @ 1465:fc5b23108608 draft
TaskList on going...
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Sun, 15 Jul 2012 09:56:54 +0900 |
parents | 3f2230d79eba |
children | cb57420a8219 |
rev | line source |
---|---|
1142
801d57ae1e29
cut compile CreatePolygonTask on spe side because not enough spe memory. We have to use code loading.
yutaka@localhost.localdomain
parents:
1064
diff
changeset
|
1 //#include <stdio.h> |
3 | 2 #include "TaskManagerImpl.h" |
46 | 3 #include "types.h" |
4 #include "error.h" | |
546 | 5 #include "SchedTask.h" |
619 | 6 #include "Scheduler.h" |
634 | 7 #include "SysTask.h" |
8 #include "SysFunc.h" | |
1423
515a0f15b5d2
add to log taskdependency
Daichi TOMA <toma@cr.ie.u-ryukyu.ac.jp>
parents:
1230
diff
changeset
|
9 #include "rdtsc.h" |
806 | 10 #include <string.h> |
11 | |
955 | 12 // singleton |
13 QueueInfo<TaskQueue> *taskQueuePool = new QueueInfo<TaskQueue>() ; | |
14 QueueInfo<HTask> *htaskPool = new QueueInfo<HTask>() ; | |
15 QueueInfo<TaskList> *taskListPool = new QueueInfo<TaskList>() ; | |
16 | |
220 | 17 static HTaskPtr systask_start; |
109 | 18 static HTaskPtr systask_finish; |
42 | 19 |
550 | 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); | |
1423
515a0f15b5d2
add to log taskdependency
Daichi TOMA <toma@cr.ie.u-ryukyu.ac.jp>
parents:
1230
diff
changeset
|
35 |
480
75e4afa40da2
TaskQueueInfo initiaization...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
479
diff
changeset
|
36 } |
50 | 37 |
220 | 38 /** |
298 | 39 * 一番最初に PPE で実行される systask_start |
220 | 40 */ |
42 | 41 void |
499 | 42 TaskManagerImpl::systask_init() |
42 | 43 { |
109 | 44 systask_register(); |
897
6bd218d3f643
add return address in SimpleTask for debugging.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
855
diff
changeset
|
45 systask_start = create_task(StartTask,0,0,0,0,__builtin_return_address(0)); |
6bd218d3f643
add return address in SimpleTask for debugging.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
855
diff
changeset
|
46 systask_finish = create_task(FinishTask,0,0,0,0,__builtin_return_address(0)); |
220 | 47 |
48 systask_start->spawn(); | |
49 | |
634 | 50 // すべての Task が FinishTask を wait_for すると、 |
51 // あらゆる Task が FinishTask の waiting task queue を操作する | |
52 // ことになる。それは、重すぎる。PPE/SPE Task が終了した時点で、 | |
53 // TaskManager が実行する方が安い。 | |
54 // append_waitTask(systask_finish); | |
55 } | |
56 | |
945
9ed1c4a877ca
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 /** |
9ed1c4a877ca
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 * Create Simple Task |
9ed1c4a877ca
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
|
59 */ |
634 | 60 HTaskPtr |
897
6bd218d3f643
add return address in SimpleTask for debugging.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
855
diff
changeset
|
61 TaskManagerImpl::create_task(int cmd,memaddr rbuf, long r_size, memaddr wbuf, long w_size, void *from) { |
1465 | 62 HTaskPtr new_task = htaskImpl->create(); |
955 | 63 new_task->init(cmd, rbuf, r_size, wbuf, w_size); |
1465 | 64 new_task->mimpl = this; |
65 new_task->create_task_array(cmd, 1, 8, 8, 8) ; | |
634 | 66 new_task->post_func = noaction; |
897
6bd218d3f643
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; |
1423
515a0f15b5d2
add to log taskdependency
Daichi TOMA <toma@cr.ie.u-ryukyu.ac.jp>
parents:
1230
diff
changeset
|
68 |
515a0f15b5d2
add to log taskdependency
Daichi TOMA <toma@cr.ie.u-ryukyu.ac.jp>
parents:
1230
diff
changeset
|
69 TaskLog *tasklog = new TaskLog(); |
1424
0ce6c6880b4b
change to the queue form the list.
Daichi TOMA <toma@cr.ie.u-ryukyu.ac.jp>
parents:
1423
diff
changeset
|
70 taskLogQueue.addLast(tasklog); |
1423
515a0f15b5d2
add to log taskdependency
Daichi TOMA <toma@cr.ie.u-ryukyu.ac.jp>
parents:
1230
diff
changeset
|
71 new_task->tasklog = tasklog; |
515a0f15b5d2
add to log taskdependency
Daichi TOMA <toma@cr.ie.u-ryukyu.ac.jp>
parents:
1230
diff
changeset
|
72 |
949 | 73 #ifdef EARLY_TOUCH |
74 if (rbuf) { | |
75 if ((unsigned long)rbuf&0xf) { | |
1152 | 76 printf("Data is not aligned. command = %d, addr = 0x%lx, size = %ld\n", |
949 | 77 cmd, (unsigned long)rbuf, r_size); |
78 } | |
79 char *p = (char *)rbuf; char b = *p; | |
80 p = (char *)(rbuf+r_size-1); b += *p; | |
81 } | |
82 if (wbuf) { | |
83 if ((unsigned long)wbuf&0xf) { | |
1152 | 84 printf("Data is not aligned. command = %d, addr = 0x%lx, size = %ld\n", |
949 | 85 cmd, (unsigned long)wbuf, w_size); |
86 } | |
87 char *p = (char *)wbuf; char b = *p; | |
88 p = (char *)(wbuf+w_size-1); b += *p; | |
89 } | |
90 #endif | |
634 | 91 |
92 return new_task; | |
42 | 93 } |
94 | |
945
9ed1c4a877ca
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
|
95 /** |
9ed1c4a877ca
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
|
96 * Create Compatible Task (TaskArray1) |
9ed1c4a877ca
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
|
97 */ |
3 | 98 HTaskPtr |
897
6bd218d3f643
add return address in SimpleTask for debugging.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
855
diff
changeset
|
99 TaskManagerImpl::create_task(int cmd,void *from) |
3 | 100 { |
101 | |
1465 | 102 HTaskPtr new_task = create_task(TaskArray,0,0,0,0, from); |
703 | 103 new_task->post_func = noaction; |
104 new_task->mimpl = this; | |
736 | 105 new_task->create_task_array(cmd,1,8,8,8); |
713
97adb3fe85c6
remove SIMPLE_TASK conditional
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
704
diff
changeset
|
106 // rbuf, r_size were set |
704
ec6c897448ca
Compatibility mode works.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
703
diff
changeset
|
107 new_task->command = TaskArray1; |
897
6bd218d3f643
add return address in SimpleTask for debugging.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
855
diff
changeset
|
108 new_task->from = (memaddr)from; |
63 | 109 |
3 | 110 return new_task; |
111 } | |
112 | |
945
9ed1c4a877ca
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
|
113 /** |
9ed1c4a877ca
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
|
114 * Create Task Array |
9ed1c4a877ca
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
|
115 */ |
800
54f0180cea0f
run16 word count ( not yet worked. )
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
736
diff
changeset
|
116 HTaskPtr |
897
6bd218d3f643
add return address in SimpleTask for debugging.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
855
diff
changeset
|
117 TaskManagerImpl::create_task_array(int id, int num_task, int num_param, int num_inData, int num_outData, void *from) |
800
54f0180cea0f
run16 word count ( not yet worked. )
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
736
diff
changeset
|
118 { |
897
6bd218d3f643
add return address in SimpleTask for debugging.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
855
diff
changeset
|
119 HTaskPtr ta = create_task(TaskArray,0,0,0,0, from); |
800
54f0180cea0f
run16 word count ( not yet worked. )
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
736
diff
changeset
|
120 ta->create_task_array(id, num_task, num_param, num_inData, num_outData) ; |
54f0180cea0f
run16 word count ( not yet worked. )
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
736
diff
changeset
|
121 return ta; |
54f0180cea0f
run16 word count ( not yet worked. )
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
736
diff
changeset
|
122 } |
54f0180cea0f
run16 word count ( not yet worked. )
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
736
diff
changeset
|
123 |
1062
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
124 /* call get_task_name from ppu only */ |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
125 const char * |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
126 TaskManagerImpl::get_task_name(int cmd) { |
1147 | 127 |
128 if (0 <= cmd && cmd < MAX_TASK_OBJECT) { | |
129 | |
130 #ifndef NOT_CHECK | |
131 | |
132 int flag = 0; | |
133 | |
134 for (int i = 0; i < MAX_TASK_OBJECT; i++) { | |
135 if (entry_cmd[i] == cmd) { | |
136 flag = 1; | |
137 break; | |
138 } | |
139 } | |
140 | |
141 if (flag == 0) { | |
142 printf("cmd %d is not registered on task_list\n", cmd); | |
143 return NULL; | |
144 } | |
145 | |
146 #endif | |
147 return task_list[cmd].name; | |
148 } | |
149 else { | |
150 return NULL; | |
151 } | |
1062
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
152 } |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
153 const char * |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
154 TaskManagerImpl::get_task_name(TaskPtr task) { |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
155 return task != NULL ? get_task_name(task->command) : NULL; |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
156 } |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
157 const char * |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
158 TaskManagerImpl::get_task_name(SimpleTaskPtr simple_task) { |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
159 return simple_task != NULL ? get_task_name(simple_task->command) : NULL; |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
160 } |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
161 const char * |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
162 TaskManagerImpl::get_task_name(SchedTaskBase *sched_task) { |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
163 if (sched_task == NULL) return NULL; |
1464
3f2230d79eba
TaskList no compile errors
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
1462
diff
changeset
|
164 if (sched_task->atask != NULL) { |
3f2230d79eba
TaskList no compile errors
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
1462
diff
changeset
|
165 return get_task_name(sched_task->atask->command); |
1062
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
166 } |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
167 return NULL; |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
168 } |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
169 const char * |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
170 TaskManagerImpl::get_task_name(HTaskPtr htask) { |
1147 | 171 |
172 return get_task_name(htask, 0); | |
173 | |
1062
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
174 } |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
175 const char * |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
176 TaskManagerImpl::get_task_name(HTaskPtr htask, int index) { |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
177 if (!htask) return NULL; |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
178 switch (htask->command) { |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
179 case TaskArray1: |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
180 return get_task_name((TaskPtr)htask->rbuf); |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
181 break; |
1064
23dab670c5aa
TaskManagerImpl::get_task_name() fix in header file...
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
1062
diff
changeset
|
182 case TaskArray: { |
1147 | 183 |
184 TaskPtr tmp = (TaskPtr)htask->rbuf; | |
185 return get_task_name(tmp[0].command); | |
186 | |
1064
23dab670c5aa
TaskManagerImpl::get_task_name() fix in header file...
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
1062
diff
changeset
|
187 } |
1062
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
188 default: |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
189 return get_task_name(htask->command); |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
190 } |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
191 return NULL; |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
192 } |
f994f5032299
add TaskManagerImpl::get_task_name()
kazz <kazz@cr.ie.u-ryukyu.ac.jp>
parents:
955
diff
changeset
|
193 |
3 | 194 /** |
298 | 195 * task の依存関係を設定 |
196 * master task が終わってから、slave task を実行するように | |
109 | 197 * master->wait_for(slave); |
3 | 198 */ |
199 void | |
200 TaskManagerImpl::set_task_depend(HTaskPtr master, HTaskPtr slave) | |
547 | 201 { |
3 | 202 TaskQueuePtr m, s; |
941
fc6cfaae6de7
add no_auto_free flag on HTask
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
940
diff
changeset
|
203 if (!master->self) return; |
547 | 204 |
955 | 205 m = taskQueueImpl->create(); m->init(master); |
206 s = taskQueueImpl->create(); s->init(slave); | |
547 | 207 |
479
bf2d2625485e
Double Linked List base TaskQueue
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
475
diff
changeset
|
208 master->wait_me->addLast(s); |
bf2d2625485e
Double Linked List base TaskQueue
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
475
diff
changeset
|
209 slave->wait_i->addLast(m); |
481
f9ffcffb6d09
Double linked list modification done (tested on Mac OS X)
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
480
diff
changeset
|
210 s->waiter = m; |
547 | 211 } |
212 | |
3 | 213 /** |
298 | 214 * タスクを実行可能キューまたは待機キューへ追加する。 |
215 * 依存関係が満たされていれば active, まだだったら wait へ。 | |
109 | 216 * task->spawn(); |
217 */ | |
3 | 218 void |
18 | 219 TaskManagerImpl::spawn_task(HTaskPtr task) |
3 | 220 { |
109 | 221 // waiter // master |
222 // waitee // slave | |
480
75e4afa40da2
TaskQueueInfo initiaization...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
479
diff
changeset
|
223 if (task->wait_i->empty()) { |
498
bce667ff20b9
double linked HTaskInfo/HTask
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
497
diff
changeset
|
224 append_activeTask(task); |
3 | 225 } else { |
498
bce667ff20b9
double linked HTaskInfo/HTask
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
497
diff
changeset
|
226 append_waitTask(task); |
3 | 227 } |
228 } | |
42 | 229 |
800
54f0180cea0f
run16 word count ( not yet worked. )
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
736
diff
changeset
|
230 |
109 | 231 /** |
298 | 232 * Task を実行可能キューに追加する |
109 | 233 */ |
234 void | |
498
bce667ff20b9
double linked HTaskInfo/HTask
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
497
diff
changeset
|
235 TaskManagerImpl::append_activeTask(HTaskPtr q) |
109 | 236 { |
479
bf2d2625485e
Double Linked List base TaskQueue
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
475
diff
changeset
|
237 activeTaskQueue->addLast(q); |
109 | 238 } |
239 | |
240 /** | |
298 | 241 * タスクが実行する CPU を選択する |
109 | 242 * |
298 | 243 * 現在は CPU_PPE, CPU_SPE, SPE_ANY, SPE_0, SPE_1, ..., SPE_5 |
244 * types.h に書いてます。 | |
109 | 245 */ |
65 | 246 void |
247 TaskManagerImpl::set_task_cpu(HTaskPtr task, CPU_TYPE type) | |
248 { | |
664 | 249 if (machineNum==0) |
250 task->cpu_type = CPU_PPE ; | |
251 else | |
252 task->cpu_type = type; | |
65 | 253 } |
254 | |
940
e01b551f25d6
unknown dead lock still...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
939
diff
changeset
|
255 #if 0 |
e01b551f25d6
unknown dead lock still...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
939
diff
changeset
|
256 static void |
955 | 257 check_wait(TaskManagerImpl *tm, QueueInfo<TaskQueue> *wait_i) { |
940
e01b551f25d6
unknown dead lock still...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
939
diff
changeset
|
258 for(TaskQueue *t = wait_i->getFirst(); t; t = wait_i->getNext(t)) { |
e01b551f25d6
unknown dead lock still...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
939
diff
changeset
|
259 if (!tm->waitTaskQueue->find(t->task)) { |
1152 | 260 //this->printf("stray waiting task%d %lx\n",t->task->command, (long)t->task); |
261 printf("stray waiting task%d %lx\n",t->task->command, (long)t->task); | |
940
e01b551f25d6
unknown dead lock still...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
939
diff
changeset
|
262 } else if (tm->activeTaskQueue->find(t->task)) { |
1152 | 263 //this->printf(" active task%d in waiting queue %lx\n",t->task->command, (long)t->task); |
264 printf(" active task%d in waiting queue %lx\n",t->task->command, (long)t->task); | |
940
e01b551f25d6
unknown dead lock still...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
939
diff
changeset
|
265 } else |
1152 | 266 printf("."); |
940
e01b551f25d6
unknown dead lock still...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
939
diff
changeset
|
267 } |
e01b551f25d6
unknown dead lock still...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
939
diff
changeset
|
268 } |
e01b551f25d6
unknown dead lock still...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
939
diff
changeset
|
269 #endif |
e01b551f25d6
unknown dead lock still...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
939
diff
changeset
|
270 |
109 | 271 /** |
830 | 272 * @brief 終了したタスクから依存の処理とか |
298 | 273 * post_func() はこのタスクが終了したら実行する関数。 |
109 | 274 * |
298 | 275 * @param [task] 終了したタスク |
109 | 276 */ |
277 void | |
955 | 278 TaskManagerImpl::check_task_finish(HTaskPtr me, QueueInfo<HTask> *wait_queue) |
42 | 279 { |
1423
515a0f15b5d2
add to log taskdependency
Daichi TOMA <toma@cr.ie.u-ryukyu.ac.jp>
parents:
1230
diff
changeset
|
280 me->tasklog->finish_time = rdtsc(); |
515a0f15b5d2
add to log taskdependency
Daichi TOMA <toma@cr.ie.u-ryukyu.ac.jp>
parents:
1230
diff
changeset
|
281 |
497 | 282 while(TaskQueue *p = me->wait_me->poll()) { |
499 | 283 HTaskPtr you = p->task; |
955 | 284 QueueInfo<TaskQueue> *wait_i = you->wait_i; |
479
bf2d2625485e
Double Linked List base TaskQueue
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
475
diff
changeset
|
285 // 相手の wait queue から自分(を指しているTaskQueue)を削除 |
bf2d2625485e
Double Linked List base TaskQueue
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
475
diff
changeset
|
286 wait_i->remove(p->waiter); |
bf2d2625485e
Double Linked List base TaskQueue
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
475
diff
changeset
|
287 // queue を free する |
493 | 288 wait_i->free_(p->waiter); |
483
5f4ffff2c2aa
renew task worked. but not test_nogl...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
481
diff
changeset
|
289 |
497 | 290 if (wait_i->empty()) { |
647
7ba4ad4538b1
MailManager rewrite. not yet worked.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
639
diff
changeset
|
291 wait_queue->remove(you); |
499 | 292 append_activeTask(you); |
497 | 293 } |
294 | |
940
e01b551f25d6
unknown dead lock still...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
939
diff
changeset
|
295 wait_i->free_(p); // p->wait_i, p->wait_me は再利用される |
479
bf2d2625485e
Double Linked List base TaskQueue
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
475
diff
changeset
|
296 } |
bf2d2625485e
Double Linked List base TaskQueue
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
475
diff
changeset
|
297 |
1169 | 298 // TaskArray1 の場合、Task,rbuf共にtasklistに入る。 |
299 // tasklistはどこかでfreeされてるはずなので、メモリリークしない。 | |
300 // TaskArray の rbuf はfreeされない見たいなので、ここでfreeしてみる。 | |
1227
bb75ee244826
exile free on fifo
Daichi TOMA <e085740@ie.u-ryukyu.ac.jp>
parents:
1169
diff
changeset
|
301 |
1228 | 302 |
1230 | 303 if (me->command == TaskArray) { |
304 free(me->rbuf); | |
305 } | |
1169 | 306 |
939 | 307 // me を誰かが持っていて、me が finish した後に、 |
308 // me->wait_for(i) とか、やられると気まずい。 | |
309 // 特に、me が他人に再利用されていると。そういう時には、 | |
310 // このfreeをコメントアウトしてみる。 | |
311 | |
312 // id かななんかでチェックした方が良いが... | |
313 | |
314 me->self = 0; | |
941
fc6cfaae6de7
add no_auto_free flag on HTask
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
940
diff
changeset
|
315 if (!me->flag.no_auto_free) |
fc6cfaae6de7
add no_auto_free flag on HTask
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
940
diff
changeset
|
316 htaskImpl->free_(me); |
109 | 317 } |
42 | 318 |
830 | 319 /** |
320 * @brief 終了したタスクリストの依存の処理 | |
321 * @param [task] 終了したタスク | |
322 */ | |
323 void | |
955 | 324 TaskManagerImpl::check_task_list_finish(SchedTask *s, TaskListPtr list, QueueInfo<HTask> *wait_queue) |
830 | 325 { |
1462
8cf62aea798f
HTask/TaskList fix (on going)
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
1424
diff
changeset
|
326 HTask *me = list->self; |
8cf62aea798f
HTask/TaskList fix (on going)
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
1424
diff
changeset
|
327 if (me) { |
8cf62aea798f
HTask/TaskList fix (on going)
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
1424
diff
changeset
|
328 me->post_func(s, me->post_arg1, me->post_arg2); |
8cf62aea798f
HTask/TaskList fix (on going)
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
1424
diff
changeset
|
329 check_task_finish(me, wait_queue); |
830 | 330 } |
331 } | |
109 | 332 |
830 | 333 /** |
334 * @brief waitTaskqueue への挿入 。必須ではない。 | |
335 * 現状では、dead lock 検出にしか使ってない | |
336 * | |
337 * @param [task] 終了したタスク | |
338 */ | |
109 | 339 void |
498
bce667ff20b9
double linked HTaskInfo/HTask
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
497
diff
changeset
|
340 TaskManagerImpl::append_waitTask(HTaskPtr q) |
109 | 341 { |
479
bf2d2625485e
Double Linked List base TaskQueue
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
475
diff
changeset
|
342 waitTaskQueue ->addLast(q); |
109 | 343 } |
344 | |
830 | 345 /** |
1462
8cf62aea798f
HTask/TaskList fix (on going)
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
1424
diff
changeset
|
346 @brief htask のTaskListを DMA でCPUに渡すための TaskListQueue に入れる |
830 | 347 @param htask |
348 @param taskList | |
349 */ | |
806 | 350 void |
1423
515a0f15b5d2
add to log taskdependency
Daichi TOMA <toma@cr.ie.u-ryukyu.ac.jp>
parents:
1230
diff
changeset
|
351 TaskManagerImpl::set_taskList(HTaskPtr htask, QueueInfo<TaskList> * taskList) |
515a0f15b5d2
add to log taskdependency
Daichi TOMA <toma@cr.ie.u-ryukyu.ac.jp>
parents:
1230
diff
changeset
|
352 { |
515a0f15b5d2
add to log taskdependency
Daichi TOMA <toma@cr.ie.u-ryukyu.ac.jp>
parents:
1230
diff
changeset
|
353 htask->tasklog->execute_time = rdtsc(); |
515a0f15b5d2
add to log taskdependency
Daichi TOMA <toma@cr.ie.u-ryukyu.ac.jp>
parents:
1230
diff
changeset
|
354 |
1462
8cf62aea798f
HTask/TaskList fix (on going)
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
1424
diff
changeset
|
355 TaskListPtr tl = (TaskList*)htask->rbuf; |
8cf62aea798f
HTask/TaskList fix (on going)
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
1424
diff
changeset
|
356 while(tl->prev) tl=tl->prev; |
8cf62aea798f
HTask/TaskList fix (on going)
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
1424
diff
changeset
|
357 while(tl) { |
8cf62aea798f
HTask/TaskList fix (on going)
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
1424
diff
changeset
|
358 TaskListPtr next = tl->next; |
8cf62aea798f
HTask/TaskList fix (on going)
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
1424
diff
changeset
|
359 taskList->addLast(tl); |
8cf62aea798f
HTask/TaskList fix (on going)
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
1424
diff
changeset
|
360 tl = next; |
806 | 361 } |
362 } | |
363 | |
54 | 364 |
619 | 365 |
479
bf2d2625485e
Double Linked List base TaskQueue
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
475
diff
changeset
|
366 /* end */ |