Mercurial > hg > Members > kono > Cerium

annotate example/word_count/spe/Exec.cc @ 663:8a807e2f64f8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
incremental task creation on word count_test
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Wed, 02 Dec 2009 22:20:32 +0900
parents 6929d888fd69
children 4615489c5faa
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
393
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
1 #include <stdio.h>
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
2 #include <string.h>
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
3 #include "Exec.h"
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
4 #include "Func.h"
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
5
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
6 /* これは必須 */
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
7 SchedDefineTask(Exec);
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
8
663
8a807e2f64f8 incremental task creation on word count_test
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 654
diff changeset
9 // typedef char *cvector __attribute__ ((vector_size (16)));
8a807e2f64f8 incremental task creation on word count_test
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 654
diff changeset
10 typedef char *cvector;
653
94c6b7ea87c2 vectorize word_count.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 626
diff changeset
11
467
44c0bce54dcf fix all examples. test_render is not working now.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 394
diff changeset
12 static int
44c0bce54dcf fix all examples. test_render is not working now.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 394
diff changeset
13 run(SchedTask *s, void *rbuf, void *wbuf)
393
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
14 {
653
94c6b7ea87c2 vectorize word_count.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 626
diff changeset
15 cvector i_data ;
94c6b7ea87c2 vectorize word_count.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 626
diff changeset
16 i_data = (cvector)s->get_input(rbuf, 0);
467
44c0bce54dcf fix all examples. test_render is not working now.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 394
diff changeset
17 unsigned long long *o_data = (unsigned long long*)s->get_output(wbuf, 0);
626
ab866bc8a624 64bit mode compatibility on Cell
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 467
diff changeset
18 int length = (long)s->get_param(0);
ab866bc8a624 64bit mode compatibility on Cell
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 467
diff changeset
19 int word_flag = (long)s->get_param(1);
393
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
20 int word_num = 0;
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
21 int line_num = 0;
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
22 int i;
653
94c6b7ea87c2 vectorize word_count.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 626
diff changeset
23 static char spaces[] = {0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20};
94c6b7ea87c2 vectorize word_count.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 626
diff changeset
24 cvector space = (cvector)spaces;
94c6b7ea87c2 vectorize word_count.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 626
diff changeset
25 static char newlines []= {0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a};
94c6b7ea87c2 vectorize word_count.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 626
diff changeset
26 cvector newline = (cvector)newlines;
94c6b7ea87c2 vectorize word_count.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 626
diff changeset
27
393
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
28
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
29 /*先頭の文字まで、飛ぶルーチン*/
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
30 for(i = 0; i < length; i++) {
653
94c6b7ea87c2 vectorize word_count.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 626
diff changeset
31 if ((i_data[i] != space[i%16]) && (i_data[i] != newline[i%16])) {
467
44c0bce54dcf fix all examples. test_render is not working now.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 394
diff changeset
32 //s->printf("[SPE%d] break[%d] %d\n",id,i,i_data[i]);
393
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
33 break;
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
34 }
467
44c0bce54dcf fix all examples. test_render is not working now.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 394
diff changeset
35 //s->printf("[SPE%d]%c",id,i_data[start_num]);
393
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
36 word_num += word_flag;
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
37 word_flag = 0;
653
94c6b7ea87c2 vectorize word_count.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 626
diff changeset
38 line_num += (i_data[i] == newline[i%16]);
393
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
39 }
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
40
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
41 word_flag = 0;
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
42
653
94c6b7ea87c2 vectorize word_count.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 626
diff changeset
43 for (; i < length; i++) {
393
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
44
467
44c0bce54dcf fix all examples. test_render is not working now.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 394
diff changeset
45 //s->printf("[SPE%d]%c",id,i_data[i]);
393
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
46
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
47
653
94c6b7ea87c2 vectorize word_count.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 626
diff changeset
48 if (i_data[i] == space[i%16]) {
467
44c0bce54dcf fix all examples. test_render is not working now.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 394
diff changeset
49 //s->printf("スペース\n");
393
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
50 word_flag = 1;
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
51 }
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
52
653
94c6b7ea87c2 vectorize word_count.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 626
diff changeset
53 else if (i_data[i] == newline[i%16]) {
467
44c0bce54dcf fix all examples. test_render is not working now.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 394
diff changeset
54 //s->printf("改行\n");
393
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
55 line_num += 1;
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
56 word_flag = 1;
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
57 }
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
58
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
59 else {
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
60 word_num += word_flag;
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
61 word_flag = 0;
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
62 }
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
63
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
64 }
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
65
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
66 word_num += word_flag;
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
67
467
44c0bce54dcf fix all examples. test_render is not working now.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 394
diff changeset
68 //s->printf("%d %d\n",word_num,line_num);
393
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
69
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
70 o_data[0] = (unsigned long long)word_num;
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
71 o_data[1] = (unsigned long long)line_num;
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
72
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
73 return 0;
72b73beb3325 add word_count
e065725@localhost.localdomain
parents:
diff changeset
74 }