Subversion Repositories shark

/* Event Generator

 *

 * Giacomo Guidi

 */

#include <stdio.h>

#include <stdlib.h>

#include "parser.h"

#include "time.h"

#define EVENT_HEADER "eventh.h"

#define EVENT_DEFINE "eventc.c"

#define ACT_LIST "act_list.h"

int act_number;

int write_struct(void)

{

  FILE *file_event_header;

  file_event_header = fopen(EVENT_DEFINE,"w");

  if (file_event_header == NULL) return 1;

  fprintf(file_event_header, "\n#include \"event_gen.h\"\n");

  fprintf(file_event_header, "#include \"%s\"\n",ACT_LIST);

  fprintf(file_event_header, "struct loader_task loader_task_list[] = {\n");

  fclose(file_event_header);

  return 0;

}

int write_basic_par(struct loader_task *c)

{

  FILE *file_event_header;

  file_event_header = fopen(EVENT_DEFINE,"a+");

  if (file_event_header == NULL) return 1;

  fprintf(file_event_header, "  {\"%s\",%d,%d,%d,%d,%d,{%d,%d},{%d,%d},%d,0,act_%s,exec_%s},\n",

                             c->name,c->task_type,c->server,c->local_scheduler,c->number,c->group,

                             c->deadline.tv_sec, c->deadline.tv_nsec,c->act_number,

                             c->wcet.tv_sec, c->wcet.tv_nsec, c->name, c->name, c->name);

  fclose(file_event_header);

  return 0;  

}

int close_loader()

{

  FILE *file_event_header;

  file_event_header = fopen(EVENT_DEFINE,"a+");

  if (file_event_header == NULL) return 1;

  fprintf(file_event_header,"};\n\n");

  fclose(file_event_header);

  return 0;

}

int write_single_act(struct timespec *t, struct loader_task *c)

{

  FILE *file_act_header;

  file_act_header = fopen(ACT_LIST,"a+");

  if (file_act_header == NULL) return 1;

  if (TIMESPEC_A_GT_B(t,&c->act_par_1)) {

    fprintf(file_act_header,"struct timespec act_%s[] = {{%d,%d}};\n\n",c->name,

          c->act_par_1.tv_sec,c->act_par_1.tv_nsec);

    c->act_number = 1;

  } else {

    fprintf(file_act_header,"struct timespec act_%s[] = {{0,0}};\n\n",c->name);

    c->act_number = 0;

  }

  fclose(file_act_header);

  return 0;

}

int write_periodic_act(struct timespec *t, struct loader_task *c)

{

  FILE *file_act_header;

  int i;

  struct timespec tot_time;

  int period;

  file_act_header = fopen(ACT_LIST,"a+");

  if (file_act_header == NULL) return 1;

  fprintf(file_act_header,"struct timespec act_%s[] = {{%d,%d},\n",c->name,

          c->act_par_1.tv_sec,c->act_par_1.tv_nsec);

  c->act_number = 1;

  TIMESPEC_ASSIGN(&tot_time,&c->act_par_1);

  period = TIMESPEC2USEC(&c->act_par_2);

  while (TIMESPEC_A_GT_B(t, &tot_time)) {

    c->act_number++;

    ADDUSEC2TIMESPEC(period,&tot_time);

    fprintf(file_act_header,"  {%d,%d},\n",

            c->act_par_2.tv_sec,c->act_par_2.tv_nsec);

  }

  fprintf(file_act_header,"  };\n\n");

  fclose(file_act_header);

  return 0;

}

int write_mean_act(struct timespec *t,struct loader_task *c)

{

  FILE *file_act_header;

  int i,first_time_usec,mean_time_usec,delta_time_usec;

  struct timespec tot_time;

  int next_act;          

  file_act_header = fopen(ACT_LIST,"a+");

  if (file_act_header == NULL) return 1;

  fprintf(file_act_header,"struct timespec act_%s[] = {{%d,%d},\n",c->name,

          c->act_par_1.tv_sec,c->act_par_1.tv_nsec);

  c->act_number = 1;                                                                                                        

  TIMESPEC_ASSIGN(&tot_time,&c->act_par_1);

  while (TIMESPEC_A_GT_B(t, &tot_time)) {

    c->act_number++;

    next_act = TIMESPEC2USEC(&c->act_par_2) + random() % TIMESPEC2USEC(&c->act_par_3) - TIMESPEC2USEC(&c->act_par_3) / 2;

    ADDUSEC2TIMESPEC(next_act,&tot_time);

    fprintf(file_act_header,"  {%d,%d},\n",

            next_act / 1000000, next_act % 1000000 * 1000);

  }

  fprintf(file_act_header,"  };\n\n");

  fclose(file_act_header);

  return 0;

}

int write_exec_const(struct loader_task *c)

{

  FILE *file_exec_header;

  int exec_time_usec,i;

  file_exec_header = fopen(ACT_LIST,"a+");

  if (file_exec_header == NULL) return 1;

  fprintf(file_exec_header,"struct timespec exec_%s[] =  {{%d,%d},\n",c->name,

          c->exec_par_1.tv_sec,c->exec_par_1.tv_nsec);

  for (i=0; i< act_number-1; i++)  

    fprintf(file_exec_header,"  {%d,%d},\n",

          c->exec_par_1.tv_sec,c->exec_par_1.tv_nsec);

  fprintf(file_exec_header,"  };\n\n");

  fclose(file_exec_header);

  return 0;

}

int write_exec_mean(struct loader_task *c)

{

  FILE *file_exec_header;

  struct timespec exec_time;

  int i;

  file_exec_header = fopen(ACT_LIST,"a+");

  if (file_exec_header == NULL) return 1;

  //exec_time_usec = mean_time_usec + random() % delta_time_usec - delta_time_usec / 2; 

  fprintf(file_exec_header,"struct timespec exec_%s[] = {{%d,%d},\n",

          c->exec_par_1.tv_sec,c->exec_par_1.tv_nsec);

  TIMESPEC_ASSIGN(&exec_time,&c->exec_par_1);                                                                                  for (i=0; i< act_number-1; i++) {

    //exec_time_usec = mean_time_usec + random() % delta_time_usec - delta_time_usec / 2;

    fprintf(file_exec_header,"  {%d,%d},\n",

          exec_time.tv_sec,exec_time.tv_nsec);

  }

  fprintf(file_exec_header,"  };\n\n");

  fclose(file_exec_header);

  return 0;

}

void *start;

void *end;

int main(void) {

  char task_name[100];

  char act_type,exec_type;

  struct timespec total_time;

  struct loader_task *start_loader_task, *current;

  int err,ldnum;

  printf("\nEvent Generator\n");

  printf("Read loader file\n");

  dos_preload("loadfile.txt",100000,&start,&end);

  printf("Parsing file\n");

  line_reader(start, end, &total_time, &start_loader_task);

  srandom(12354132);

  write_struct();

  current = start_loader_task;

  ldnum = 0;

  while(current != NULL) {

    sprintf(current->name,"ltask%d",ldnum);    

    current->group = ldnum;

    write_basic_par(current);

    switch (current->act_type) {

     case PAR_ACT_SINGLE:

       err = write_single_act(&total_time,current);

        if (err != 0) {

          printf("Error writing activation header\n");

          exit(1);

        }

        break;

      case PAR_ACT_PERIODIC:

        err = write_periodic_act(&total_time,current);

        if (err != 0) {

          printf("Error writing activation header\n");

          exit(1);

        }

        break;

      case PAR_ACT_MEAN:

        err = write_mean_act(&total_time,current);

        if (err != 0) {

          printf("Error writing activation header\n");

          exit(1);

        }

        break;

    }

    switch (current->exec_type) {

      case PAR_EXEC_CONST:

        err = write_exec_const(current);

        if (err != 0) {

          printf("Error writing exec header\n");

          exit(1);

        }

        break;

      case PAR_EXEC_MEAN:

        err = write_exec_mean(current);

        if (err != 0) {

          printf("Error writing exec header\n");

          exit(1);

        }

        break;

    }

    current = current->next;

  }

  close_loader();

  return 0;

}