Subversion Repositories shark

/*

 * Project: S.Ha.R.K.

 *

 * Coordinators:

 *   Giorgio Buttazzo    <giorgio@sssup.it>

 *   Paolo Gai           <pj@gandalf.sssup.it>

 *

 * Authors     :

 *    Giacomo Guidi      <giacomo@gandalf.sssup.it>

 *

 * ReTiS Lab (Scuola Superiore S.Anna - Pisa - Italy)

 *

 * http://www.sssup.it

 * http://retis.sssup.it

 * http://shark.sssup.it

 */

#include <stdio.h>

#include <unistd.h>

#include <stdlib.h>

#include <string.h>

#include <FTrace.h>

#define READ_BUFFER 2000

#define DELTA_BUFFER 100

int main(int argc, char *argv[])

{

  char buffer[READ_BUFFER+DELTA_BUFFER];

  void *p, *last;

  int n,delta,size,tsc;

  unsigned long long ev = 0, tsc_value;

  FILE *input_file;

  if (argc < 2) {

    printf("%s: Enter the input file name [%s filename]\n",argv[0],argv[0]);

    exit(1);

  }

  input_file = fopen(argv[1],"rb");

  last = buffer + READ_BUFFER;

  while(!feof(input_file)) {

    //move remaining byte

    delta = (unsigned int)(buffer) + READ_BUFFER - (unsigned int)(last);

    if (delta > 0) memcpy(buffer,last,delta);

    n = fread(buffer+delta,1,READ_BUFFER+10,input_file);

    fseek(input_file,-(delta+10),SEEK_CUR);

    p = buffer;

    /*

    // specific server events

    #define FTrace_EVT_server_create      0x08 // Par1 [empty] Par2 [server]

    #define FTrace_EVT_server_replenish   0x18 // Par1 [empty] Par2 [server]

    #define FTrace_EVT_server_exhaust     0x28 // Par1 [empty] Par2 [server]

    #define FTrace_EVT_server_reclaiming  0x38 // Par1 [empty] Par2 [server]

    #define FTrace_EVT_server_remove      0x48 // Par1 [empty] Par2 [server]

    #define FTrace_EVT_server_active      0x58 // Par1 [empty] Par2 [server]

    #define FTrace_EVT_server_using_rec   0x68 // Par1 [reclaiming] Par2 [server]

    */

    while ((unsigned int)(p) + 16 <= (unsigned int)(buffer + READ_BUFFER) &&

	   (unsigned int)(p) + 16 <= (unsigned int)(buffer + n + delta)) {

	tsc = 0;

	switch (*(unsigned short int *)(p) & 0x00FF) {

	  case FTrace_EVT_ipoint:

		printf("%d ",*(unsigned short int *)(p+2));

		tsc = 1;

		break;

	  /* Tracer start */

          case FTrace_EVT_trace_start:

                printf("0 ");

		tsc = 1;

                break;

	  /* Tracer stop */

          case FTrace_EVT_trace_stop:

                printf("1 ");

		tsc = 1;

                break;

	  /* Interrupt start (int num) */

	  case FTrace_EVT_timer_wakeup_start:

	  case FTrace_EVT_interrupt_start:

                printf("2 ");

		tsc = 1;

                break;

          /* Interrupt Stop (int num, or context num is int 3) */

	  case FTrace_EVT_timer_wakeup_end:

          case FTrace_EVT_interrupt_end:

                printf("3 ");

		tsc = 1;

                break;

	  /* Context to (context num) */

	  case FTrace_EVT_context_switch:

                printf("4 ");

		tsc = 1;

                break;

	  /* Task Create (context num, pid num) */

	  case FTrace_EVT_task_create:

		printf("5 ");

		tsc = 1;

		break;

	  /* Task Activate (context num) */

	  case FTrace_EVT_task_activate:

		printf("6 ");

		tsc = 1;

		break;

	  /* Task End (context num) */

	  case FTrace_EVT_task_end:

		printf("7 ");

		tsc = 1;

		break;

	  /* Task End-Cycle (context num) */

	  case FTrace_EVT_task_end_cycle:

		printf("8 ");

		tsc = 1;

		break;

	  /* Task Context - PID declaration */

	  case FTrace_EVT_id:

		printf("9 ");

		tsc = 1;

		break;

	  case FTrace_EVT_cycles_per_msec:

		printf("10 ");

		tsc = 1;

                break;

		// specific server events

          case FTrace_EVT_server_active:

                printf("16 ");

                tsc=1;

                break;

	  case FTrace_EVT_task_deadline_miss:

		printf("20 ");

		tsc = 1;

		break;

	  case FTrace_EVT_task_wcet_violation:

                printf("21 ");

                tsc = 1;

                break;

	}

        tsc_value = (unsigned long long)(*(unsigned int *)(p+4)) << 32;

        tsc_value += (unsigned long long)(*(unsigned int *)(p+8));

	if (tsc == 1) {

	  printf("%llu ",tsc_value);

	  switch (*(unsigned short int *)(p) & 0x00FF) {

	    case FTrace_EVT_trace_start:

		printf("%d %d ",*(unsigned short int *)(p+2),*(unsigned int *)(p+12));

		break;

            case FTrace_EVT_interrupt_start:

                printf("%d ",*(unsigned short int *)(p+2));

                break;

	    case FTrace_EVT_timer_wakeup_start:

                printf("%d ",0);

                break;

	    case FTrace_EVT_timer_wakeup_end:

	    case FTrace_EVT_interrupt_end:

                printf("%d ",*(unsigned short int *)(p+2));

                break;

            case FTrace_EVT_context_switch:

                printf("%d ",*(unsigned short int *)(p+2));

                break;

	    case FTrace_EVT_task_create:

		printf("%d %d",*(unsigned short int *)(p+2),*(unsigned int *)(p+12));

		break;

	    case FTrace_EVT_task_deadline_miss:

		printf("%d %d",*(unsigned short int *)(p+2),*(unsigned int *)(p+12));

		break;

	    case FTrace_EVT_task_wcet_violation:

                printf("%d %d",*(unsigned short int *)(p+2),*(unsigned int *)(p+12));

                break;

	    case FTrace_EVT_task_activate:

		printf("%d ",*(unsigned short int *)(p+2));

		break;

	    case FTrace_EVT_task_end_cycle:

		printf("%d ",*(unsigned short int *)(p+2));

		break;

	    case FTrace_EVT_task_end:

		printf("%d ",*(unsigned short int *)(p+2));

		break;

	    case FTrace_EVT_id:

		printf("%d %d",*(unsigned short int *)(p+2),*(unsigned int *)(p+12));

		break;

	    case FTrace_EVT_cycles_per_msec:

                printf("%d ",*(unsigned int *)(p+12));

                break;

  	    case FTrace_EVT_server_active:

	        printf("%d %d",*(unsigned short int *)(p+2),*(unsigned int *)(p+12));

		break;

	  }

	  printf("\n");

	}

	size = 16;

      ev++;

      p += 16;

      if ((unsigned int)(p) + 10 > (unsigned int)(buffer + n + delta)) break;

      last = p;

    }

    if ((unsigned int)(p) + 10 > (unsigned int)(buffer + n + delta)) break;

  }

  fclose(input_file);

  return 0;

}