---

disasm.c

Go to the documentation of this file.

/*
 Copyright (c) 1992-1993 The Regents of the University of California.
 All rights reserved.  See copyright.h for copyright notice and limitation 
 of liability and disclaimer of warranty provisions.
 */

#include "copyright.h"

/* MIPS instruction disassembler */

#include <stdio.h>
#include <filehdr.h>
#include <scnhdr.h>
#include <syms.h>
#include <ldfcn.h>
#include "int.h"

static FILE *fp;
static LDFILE *ldptr;
static SCNHDR texthead, rdatahead, datahead, sdatahead, sbsshead, bsshead;

static char filename[1000] = "a.out";   /* default a.out file */
static char self[256];                  /* name of invoking program */

char mem[MEMSIZE];              /* main memory. use malloc later */
int TRACE, Traptrace, Regtrace;
int NROWS=64, ASSOC=1, LINESIZE=4, RAND=0, LRD=0;
int pc;

extern char *strcpy();

main(argc, argv)
int argc;
char *argv[];
{
        register char *s;
        char *fakeargv[3];

        strcpy(self, argv[0]);
        while  ( argc > 1  &&  argv[1][0] == '-' )
        {
                --argc; ++argv;
                for  ( s=argv[0]+1; *s != '\0'; ++s )
                        switch  ( *s )
                        {
                        }
        }

        if (argc >= 2)
                strcpy(filename, argv[1]);
        fp = fopen(filename, "r");
        if (fp == NULL)
        {
                fprintf(stderr, "%s: Could not open '%s'\n", self, filename);
                exit(0);
        }
        fclose(fp);
        load_program(filename);
        if  ( argv[1] == NULL )
        {
                fakeargv[1] = "a.out";
                fakeargv[2] = NULL;
                argv = fakeargv;
                ++argc;
        }
        disasm(memoffset, argc-1, argv+1); /* where things normally start */
}

#define LOADSECTION(head) load_section(&head);

load_section(hd)
register SCNHDR *hd;
{
  register int pc, i;
  if  ( hd->s_scnptr != 0 ) {
    /* printf("loading %s\n", hd->s_name); */
    pc = hd->s_vaddr;
    FSEEK(ldptr, hd->s_scnptr, 0);
    for  ( i=0; i<hd->s_size; ++i ) {
      if (pc-memoffset >= MEMSIZE)
        { printf("MEMSIZE too small. Fix and recompile.\n");
          exit(1); }
      *(char *) ((mem-memoffset)+pc++) = getc(fp);
    }
  }
}

load_program(filename)
char *filename;
{
        ldptr = ldopen(filename, NULL);
        if  ( ldptr == NULL )
        {
                fprintf(stderr, "%s: Load read error on %s\n", self, filename);
                exit(0);
        }
        if  ( TYPE(ldptr) != 0x162 )
        {
                fprintf(stderr,
                        "big-endian object file (little-endian interp)\n");
                exit(0);
        }

        if  ( ldnshread(ldptr, ".text", &texthead) != 1 )
                printf("text section header missing\n");
        else
                LOADSECTION(texthead)

        if  ( ldnshread(ldptr, ".rdata", &rdatahead) != 1 )
                printf("rdata section header missing\n");
        else
                LOADSECTION(rdatahead)

        if  ( ldnshread(ldptr, ".data", &datahead) != 1 )
                printf("data section header missing\n");
        else
                LOADSECTION(datahead)

        if  ( ldnshread(ldptr, ".sdata", &sdatahead) != 1 )
                printf("sdata section header missing\n");
        else
                LOADSECTION(sdatahead)

        if  ( ldnshread(ldptr, ".sbss", &sbsshead) != 1 )
                printf("sbss section header missing\n");
        else
                LOADSECTION(sbsshead)

        if  ( ldnshread(ldptr, ".bss", &bsshead) != 1 )
                printf("bss section header missing\n");
        else
                LOADSECTION(bsshead)


        /* BSS is already zeroed (statically-allocated mem) */
        /* this version ignores relocation info */
}


int *m_alloc(n)
int n;
{
        extern char *malloc();

        return (int *) (int) malloc((unsigned) n);
}

disasm(startpc, argc, argv)
int startpc, argc;
char *argv[];
{
        int i;

        pc = memoffset;
        for  ( i=0; i<texthead.s_size; i += 4 ) 
        {
                dis1(pc);
                pc = pc + 4;
        }
}

dis1(xpc)
int xpc;
{
        register int instr;

        instr = fetch(pc);
        dump_ascii(instr, pc);
        printf("\n");
}

---

The University of Southern California does not screen or control the content on this website and thus does not guarantee the accuracy, integrity, or quality of such content. All content on this website is provided by and is the sole responsibility of the person from which such content originated, and such content does not necessarily reflect the opinions of the University administration or the Board of Trustees