OpenCores
URL https://opencores.org/ocsvn/or2k/or2k/trunk

Subversion Repositories or2k

[/] [or2k/] [trunk/] [analysis-bin/] [insnanalysis/] [insnanalysis.c] - Diff between revs 19 and 21

Go to most recent revision | Only display areas with differences | Details | Blame | View Log

Rev 19 Rev 21
/*
/*
  File for analysis of an architecture's instructions in binary format
  File for analysis of an architecture's instructions in binary format
 
 
  Julius Baxter, julius.baxter@orsoc.se
  Julius Baxter, julius.baxter@orsoc.se
 
 
*/
*/
 
 
#include<stdio.h>
#include<stdio.h>
#include <stdlib.h>
#include <stdlib.h>
#include <string.h>
#include <string.h>
#include <stdint.h>
#include <stdint.h>
#include <arpa/inet.h> // for htonl()
#include <arpa/inet.h> // for htonl()
 
 
#include "insnanalysis.h"
#include "insnanalysis.h"
 
 
// Access to list management functions
// Access to list management functions
#include "insn-lists.h"
#include "insn-lists.h"
 
 
int analyse_insn(instruction insn,
int analyse_insn(instruction insn,
                 instruction_properties *insn_props)
                 instruction_properties *insn_props)
{
{
  // For now no other instruction sets supported
  // For now no other instruction sets supported
  return or1k_32_analyse_insn(insn, insn_props);
  return or1k_32_analyse_insn(insn, insn_props);
}
}
 
 
 
 
void print_insn(instruction_properties *insn_props)
void print_insn(instruction_properties *insn_props)
{
{
  if (insn_props->insn_string != NULL)
  if (insn_props->insn_string != NULL)
    printf("%s", insn_props->insn_string);
    printf("%s", insn_props->insn_string);
}
}
 
 
void collect_stats(instruction insn,
void collect_stats(instruction insn,
                 instruction_properties *insn_props)
                 instruction_properties *insn_props)
{
{
  or1k_32_collect_stats(insn, insn_props);
  or1k_32_collect_stats(insn, insn_props);
}
}
 
 
 
 
void generate_stats(FILE * stream)
void generate_stats(FILE * stream)
{
{
  or1k_32_generate_stats(stream);
  or1k_32_generate_stats(stream);
}
}
 
 
int main(int argc, char *argv[])
int main(int argc, char *argv[])
{
{
  FILE *fp;
  FILE *fp;
 
 
  char insn_buff[INSN_SIZE_BYTES]; // Buffer for instruction data
  char insn_buff[INSN_SIZE_BYTES]; // Buffer for instruction data
 
 
  int insns_seen_total = 0; // Keep track of total number of instructions read
  int insns_seen_total = 0; // Keep track of total number of instructions read
 
 
  // Try to open the file passed as first parameter
  // Try to open the file passed as first parameter
  if((fp = fopen(argv[ 1 ], "rb"))==NULL) {
  if((fp = fopen(argv[ 1 ], "rb"))==NULL) {
    printf("Cannot open file.\n");
    printf("Cannot open file.\n");
    exit(1);
    exit(1);
  }
  }
 
 
 
  int filesize_bytes, filesize_insns;
 
  // Determine filesize
 
  if ( fseek(fp, 0, SEEK_END))
 
    {
 
      fclose(fp);
 
      fprintf(stderr, "Error detecting filesize\n");
 
      return -1;
 
    }
 
 
 
  filesize_bytes = ftell(fp);
 
  filesize_insns = filesize_bytes / INSN_SIZE_BYTES;
 
 
 
  // Reset pointer
 
  rewind(fp);
 
 
 
 
 
 
  instruction * insn = (instruction *)insn_buff;
  instruction * insn = (instruction *)insn_buff;
 
 
  instruction_properties insn_props;
  instruction_properties insn_props;
 
 
  // Do initial analysis - frequency of each instruction
  // Go through the file, collect stats about instructions
 
 
 
  // What is one-percent of instructions
 
  float file_one_percent = ((float)filesize_insns / 100.0f );
 
  float percent_of_percent=0; int percent;
 
 
  insn_lists_init();
  insn_lists_init();
 
 
  while(!feof(fp)) {
  while(!feof(fp)) {
 
 
    if (fread(insn_buff, INSN_SIZE_BYTES, 1, fp) != 1)
    if (fread(insn_buff, INSN_SIZE_BYTES, 1, fp) != 1)
      break;
      break;
 
 
    // Endianness is little when read in from binary file created with 
    // Endianness is little when read in from binary file created with 
    // or32-elf-objcopy, so swap;
    // or32-elf-objcopy, so swap;
    *insn = htonl(*insn);
    *insn = htonl(*insn);
 
 
    if (*insn == 0) // most probably dead space in binary, skip
    if (*insn == 0) // most probably dead space in binary, skip
      continue;
      continue;
 
 
    reset_instruction_properties(&insn_props);
    reset_instruction_properties(&insn_props);
 
 
    if (analyse_insn(*insn, &insn_props) == 0)
    if (analyse_insn(*insn, &insn_props) == 0)
      {
      {
        /*
 
        print_insn(&insn_props);
 
        printf("\n");
 
        */
 
        insns_seen_total++;
        insns_seen_total++;
 
 
        collect_stats(*insn, &insn_props);
        collect_stats(*insn, &insn_props);
      }
      }
    else
    else
      {
      {
        // Non-zero return from analyse_insn(): problem analysing instruction.
        // Non-zero return from analyse_insn(): problem analysing instruction.
 
 
        // Is a NOP for now, but do something here if needed
        // Is a NOP for now, but do something here if needed
 
 
        do{ } while(0);
        do{ } while(0);
      }
      }
 
 
 
    // Progress indicator
 
    percent_of_percent += 1.0f;
 
    if (percent_of_percent >= file_one_percent)
 
      {
 
        percent++;
 
        fprintf(stderr, "\r%d%%", percent);
 
        percent_of_percent = 0;
 
      }
 
 
 
 
  }
  }
 
 
  fclose(fp);
  fclose(fp);
 
 
  printf("Saw %d instructions\n", insns_seen_total);
  printf("\rSaw %d instructions\n", insns_seen_total);
 
 
  generate_stats(stdout);
  generate_stats(stdout);
 
 
  insn_lists_free();
  insn_lists_free();
 
 
  return 0;
  return 0;
 
 
}
}
 
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.