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_create:
                printf("11 ");
                tsc=1;
                break;

          case FTrace_EVT_server_replenish:
                printf("12 ");
                tsc=1;
                break;
          case FTrace_EVT_server_exhaust:  
                printf("13 ");
                tsc=1;
                break;
          case FTrace_EVT_server_reclaiming:
                printf("14 ");
                tsc=1;
                break;
          case FTrace_EVT_server_remove:
                printf("15 ");      
                tsc=1;
                break;
          case FTrace_EVT_server_active:
                printf("16 ");
                tsc=1;
                break;
          case FTrace_EVT_server_using_rec:
                printf("17 ");
                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_replenish:
            case FTrace_EVT_server_exhaust:
            case FTrace_EVT_server_reclaiming:
            case FTrace_EVT_server_remove:
            case FTrace_EVT_server_active:
                printf("%d ", *(unsigned int *)(p+12));
                break;
            case FTrace_EVT_server_create:
            case FTrace_EVT_server_using_rec:
                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;

}