Subversion Repositories t48

/*
 * $Id: main.c 295 2009-04-01 19:32:48Z arniml $
 *
 * Copyright (c) 2004, Arnim Laeuger (arniml@opencores.org)
 *
 * All rights reserved
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version. See also the file COPYING which
 *  came with this application.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *
 */
 
#include <stdio.h>
#include <unistd.h>
#include <string.h>
 
#include "types.h"
#include "memory.h"
#include "i8039.h"
 
 
void logerror(char *msg, UINT16 address, UINT8 opcode)
{
}
 
 
void print_usage(void) {
  printf("Usage:\n");
  printf(" i8039 -f <hex file> [-x <hex file>] [-d] [-h]\n");
  printf("  -f : Name of hex file for internal ROM\n");
  printf("  -x : Name of hex file for external ROM (optional)\n");
  printf("  -d : Dump machine state\n");
  printf("  -h : Print this help\n");
}
 
 
int main(int argc, char *argv[])
{
  int  do_cycles, real_cycles, total_cycles;
  char *hex_file = "";
  char *ext_hex_file = "";
  int  c;
  int  dump = 0;
 
  /* process options */
  while ((c = getopt(argc, argv, "df:hx:")) != -1) {
    switch (c) {
      case 'd':
        dump = 1;
        break;
 
      case 'f':
        hex_file = optarg;
        break;
 
      case 'x':
        ext_hex_file = optarg;
        break;
 
      case 'h':
        /* fallthrough */
 
      default:
        print_usage();
        return(0);
        break;
    }
  }
 
  /* check options */
  if (strlen(hex_file) == 0) {
    print_usage();
    return(1);
  }
 
  /* read hex file for internal ROM */
  printf("Reading %s\n", hex_file);
  if (!read_hex_file(hex_file, 0)) {
    printf("Error reading file!\n");
    return(1);
  }
 
  /* read hex fiel for external ROM */
  if (strlen(ext_hex_file) > 0) {
    printf("Reading %s\n", ext_hex_file);
    if (!read_hex_file(ext_hex_file, 0x800)) {
      printf("Error reading file!\n");
      return(1);
    }
  }
 
  printf("Resetting 8039\n");
  i8039_reset(NULL);
 
  do_cycles = 52;
 
  total_cycles = 0;
 
  do {
    real_cycles = i8039_execute(do_cycles, dump);
 
    /* activate interrupt */
    set_irq_line(0, HOLD_LINE);
    /* hold interrupt for 3 machine cycles */
    real_cycles += i8039_execute(3, dump);
    set_irq_line(0, CLEAR_LINE);
 
    if (real_cycles > 0)
      total_cycles += real_cycles;
  } while (real_cycles > 0);
 
  printf("Emulated %i cycles\n", total_cycles);
  printf("Simulation Result: %s\n", real_cycles == 0 ? "PASS" : "FAIL");
 
  return(0);
}