Commit | Line | Data |
---|---|---|
d45a4bef JB |
1 | /* load.c --- loading object files into the M32C simulator. |
2 | ||
e4d013fc | 3 | Copyright (C) 2005, 2007, 2008, 2009 Free Software Foundation, Inc. |
d45a4bef JB |
4 | Contributed by Red Hat, Inc. |
5 | ||
6 | This file is part of the GNU simulators. | |
7 | ||
4744ac1b JB |
8 | This program is free software; you can redistribute it and/or modify |
9 | it under the terms of the GNU General Public License as published by | |
10 | the Free Software Foundation; either version 3 of the License, or | |
11 | (at your option) any later version. | |
d45a4bef | 12 | |
4744ac1b JB |
13 | This program is distributed in the hope that it will be useful, |
14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
15 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
16 | GNU General Public License for more details. | |
d45a4bef JB |
17 | |
18 | You should have received a copy of the GNU General Public License | |
4744ac1b | 19 | along with this program. If not, see <http://www.gnu.org/licenses/>. */ |
d45a4bef JB |
20 | |
21 | ||
22 | #include <stdlib.h> | |
23 | #include <stdio.h> | |
24 | #include <string.h> | |
25 | ||
26 | #include "bfd.h" | |
27 | ||
28 | #include "cpu.h" | |
29 | #include "mem.h" | |
30 | ||
31 | int (*decode_opcode) () = 0; | |
32 | int default_machine = 0; | |
33 | ||
34 | void | |
35 | m32c_set_mach (unsigned long mach) | |
36 | { | |
37 | switch (mach) | |
38 | { | |
39 | case bfd_mach_m16c: | |
40 | m32c_set_cpu (CPU_M16C); | |
41 | if (verbose) | |
42 | fprintf (stderr, "[cpu: r8c/m16c]\n"); | |
43 | break; | |
44 | case bfd_mach_m32c: | |
45 | m32c_set_cpu (CPU_M32C); | |
46 | if (verbose) | |
47 | fprintf (stderr, "[cpu: m32cm/m32c]\n"); | |
48 | break; | |
49 | default: | |
50 | fprintf (stderr, "unknown m32c machine type 0x%lx\n", mach); | |
51 | decode_opcode = 0; | |
52 | break; | |
53 | } | |
54 | } | |
55 | ||
56 | void | |
3877a145 | 57 | m32c_load (bfd * prog) |
d45a4bef JB |
58 | { |
59 | asection *s; | |
60 | unsigned long mach = bfd_get_mach (prog); | |
61 | unsigned long highest_addr_loaded = 0; | |
62 | ||
63 | if (mach == 0 && default_machine != 0) | |
64 | mach = default_machine; | |
65 | ||
66 | m32c_set_mach (mach); | |
67 | ||
68 | for (s = prog->sections; s; s = s->next) | |
69 | { | |
70 | #if 0 | |
71 | /* This was a good idea until we started storing the RAM data in | |
72 | ROM, at which point everything was all messed up. The code | |
73 | remains as a reminder. */ | |
74 | if ((s->flags & SEC_ALLOC) && !(s->flags & SEC_READONLY)) | |
75 | { | |
76 | if (strcmp (bfd_get_section_name (prog, s), ".stack")) | |
77 | { | |
78 | int secend = | |
79 | bfd_get_section_size (s) + bfd_section_lma (prog, s); | |
80 | if (heaptop < secend && bfd_section_lma (prog, s) < 0x10000) | |
81 | { | |
82 | heaptop = heapbottom = secend; | |
83 | } | |
84 | } | |
85 | } | |
86 | #endif | |
87 | if (s->flags & SEC_LOAD) | |
88 | { | |
89 | char *buf; | |
90 | bfd_size_type size; | |
91 | ||
92 | size = bfd_get_section_size (s); | |
93 | if (size <= 0) | |
94 | continue; | |
95 | ||
96 | bfd_vma base = bfd_section_lma (prog, s); | |
97 | if (verbose) | |
98 | fprintf (stderr, "[load a=%08x s=%08x %s]\n", | |
99 | (int) base, (int) size, bfd_get_section_name (prog, s)); | |
100 | buf = (char *) malloc (size); | |
101 | bfd_get_section_contents (prog, s, buf, 0, size); | |
102 | mem_put_blk (base, buf, size); | |
103 | free (buf); | |
104 | if (highest_addr_loaded < base + size - 1 && size >= 4) | |
105 | highest_addr_loaded = base + size - 1; | |
106 | } | |
107 | } | |
108 | ||
109 | if (strcmp (bfd_get_target (prog), "srec") == 0) | |
110 | { | |
111 | heaptop = heapbottom = 0; | |
112 | switch (mach) | |
113 | { | |
114 | case bfd_mach_m16c: | |
115 | if (highest_addr_loaded > 0x10000) | |
116 | regs.r_pc = mem_get_si (0x000ffffc) & membus_mask; | |
117 | else | |
118 | regs.r_pc = mem_get_si (0x000fffc) & membus_mask; | |
119 | break; | |
120 | case bfd_mach_m32c: | |
121 | regs.r_pc = mem_get_si (0x00fffffc) & membus_mask; | |
122 | break; | |
123 | } | |
124 | } | |
125 | else | |
126 | regs.r_pc = prog->start_address; | |
127 | if (verbose) | |
128 | fprintf (stderr, "[start pc=%08x]\n", (unsigned int) regs.r_pc); | |
129 | } |