aboutsummaryrefslogtreecommitdiff
path: root/sim/h8300/run.c
blob: 80780258daa8c23bf92c3e207fc8d591c9751e76 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
/* front end to the simulator.

   Written by Steve Chamberlain of Cygnus Support.
   sac@cygnus.com

   This file is part of H8/300 sim


		THIS SOFTWARE IS NOT COPYRIGHTED

   Cygnus offers the following for use in the public domain.  Cygnus
   makes no warranty with regard to the software or it's performance
   and the user accepts the software "AS IS" with all faults.

   CYGNUS DISCLAIMS ANY WARRANTIES, EXPRESS OR IMPLIED, WITH REGARD TO
   THIS SOFTWARE INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
   MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.

*/

#include <varargs.h>
#include <stdio.h>
#include "bfd.h"
#include "sysdep.h"
#include "remote-sim.h"

void usage();
extern int optind;
extern char *optarg;

int
main (ac, av)
     int ac;
     char **av;
{
  bfd *abfd;
  bfd_vma start_address;
  asection *s;
  int i;
  int verbose = 0;
  int trace = 0;
  char *name = "";

  while ((i = getopt (ac, av, "c:htv")) != EOF)
    switch (i) 
      {
      case 'c':
	sim_csize (atoi (optarg));
	break;
      case 'h':
	set_h8300h (1);
	break;
      case 't':
	trace = 1;
	break;
      case 'v':
	verbose = 1;
	break;
      default:
	usage();
      }
  ac -= optind;
  av += optind;

  if (ac != 1)
    usage();

  name = *av;

  if (verbose)
    printf ("run %s\n", name);

  abfd = bfd_openr (name, "coff-h8300");
  if (abfd) 
    {
      if (bfd_check_format(abfd, bfd_object)) 
	{
	  if (abfd->arch_info->mach == bfd_mach_h8300h)
	    set_h8300h (1);

	  for (s = abfd->sections; s; s=s->next) 
	    {
	      char *buffer = malloc(bfd_section_size(abfd,s));
	      bfd_get_section_contents(abfd, s, buffer, 0, bfd_section_size(abfd,s));
	      sim_write(s->vma, buffer, bfd_section_size(abfd,s));
	    }

	  start_address = bfd_get_start_address(abfd);
	  sim_create_inferior (start_address, NULL, NULL);
	  sim_resume(0,0);
	  if (verbose)
	    sim_info (verbose - 1);
	  return 0;
	}
    }

  return 1;
}

void
printf_filtered (va_alist)
     va_dcl
{
  char *msg;
  va_list args;

  va_start (args);
  msg = va_arg (args, char *);
  vfprintf (stdout, msg, args);
  va_end (args);
}

void
usage()
{
  fprintf (stderr, "usage: run [-tv] program\n");
  exit (1);
}