#include <stdio.h>
#include <string.h>
#include "Exec.h"
#include "Func.h"

/* これは必須 */
SchedDefineTask(Exec);

// typedef char *cvector __attribute__ ((vector_size (16)));
//
typedef char *cvector;

static int
run(SchedTask *s, void *rbuf, void *wbuf)
{
    cvector i_data ;
    i_data = (cvector)s->get_input(rbuf, 0);
    unsigned long long *o_data = (unsigned long long*)s->get_output(wbuf, 0);
    int length = (long)s->get_param(0);
    int word_flag = (long)s->get_param(1);
    int word_num = 0;
    int line_num = 0;
    int i;
    static char spaces[] = {0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20};
    cvector space = (cvector)spaces;
    static char  newlines []= {0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a};
    cvector newline = (cvector)newlines;


    /*先頭の文字まで、飛ぶルーチン*/
    for(i = 0; i < length; i++) {
	if ((i_data[i] != space[i%16]) && (i_data[i] != newline[i%16])) {
	    //s->printf("[SPE%d] break[%d] %d\n",id,i,i_data[i]);
	    break;
	}
	//s->printf("[SPE%d]%c",id,i_data[start_num]);
	word_num += word_flag;
	word_flag = 0;
	line_num += (i_data[i] == newline[i%16]);
    }

    word_flag = 0;

    for (; i < length; i++) {

	    //s->printf("[SPE%d]%c",id,i_data[i]);


	if (i_data[i] == space[i%16]) {
	    //s->printf("スペース\n");
	    word_flag = 1;
	}

	else if (i_data[i] == newline[i%16]) {
	    //s->printf("改行\n");
	    line_num += 1;
	    word_flag = 1;
	}

	else {
	    word_num += word_flag;
	    word_flag = 0;
	}

    }

    word_num += word_flag;

    //s->printf("%d %d\n",word_num,line_num);

    o_data[0] = (unsigned long long)word_num;
    o_data[1] = (unsigned long long)line_num;

    return 0;
}