Commit | Line | Data |
---|---|---|
d45a4bef JB |
1 | /* load.c --- loading object files into the M32C simulator. |
2 | ||
32d0add0 | 3 | Copyright (C) 2005-2015 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 | 20 | |
a6ff997c | 21 | #include "config.h" |
d45a4bef JB |
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" | |
269e9c18 | 30 | #include "load.h" |
d45a4bef | 31 | |
269e9c18 | 32 | int (*decode_opcode) (void) = 0; |
d45a4bef JB |
33 | int default_machine = 0; |
34 | ||
35 | void | |
36 | m32c_set_mach (unsigned long mach) | |
37 | { | |
38 | switch (mach) | |
39 | { | |
40 | case bfd_mach_m16c: | |
41 | m32c_set_cpu (CPU_M16C); | |
42 | if (verbose) | |
43 | fprintf (stderr, "[cpu: r8c/m16c]\n"); | |
44 | break; | |
45 | case bfd_mach_m32c: | |
46 | m32c_set_cpu (CPU_M32C); | |
47 | if (verbose) | |
48 | fprintf (stderr, "[cpu: m32cm/m32c]\n"); | |
49 | break; | |
50 | default: | |
51 | fprintf (stderr, "unknown m32c machine type 0x%lx\n", mach); | |
52 | decode_opcode = 0; | |
53 | break; | |
54 | } | |
55 | } | |
56 | ||
57 | void | |
3877a145 | 58 | m32c_load (bfd * prog) |
d45a4bef JB |
59 | { |
60 | asection *s; | |
61 | unsigned long mach = bfd_get_mach (prog); | |
62 | unsigned long highest_addr_loaded = 0; | |
63 | ||
64 | if (mach == 0 && default_machine != 0) | |
65 | mach = default_machine; | |
66 | ||
67 | m32c_set_mach (mach); | |
68 | ||
69 | for (s = prog->sections; s; s = s->next) | |
70 | { | |
71 | #if 0 | |
72 | /* This was a good idea until we started storing the RAM data in | |
73 | ROM, at which point everything was all messed up. The code | |
74 | remains as a reminder. */ | |
75 | if ((s->flags & SEC_ALLOC) && !(s->flags & SEC_READONLY)) | |
76 | { | |
77 | if (strcmp (bfd_get_section_name (prog, s), ".stack")) | |
78 | { | |
79 | int secend = | |
80 | bfd_get_section_size (s) + bfd_section_lma (prog, s); | |
81 | if (heaptop < secend && bfd_section_lma (prog, s) < 0x10000) | |
82 | { | |
83 | heaptop = heapbottom = secend; | |
84 | } | |
85 | } | |
86 | } | |
87 | #endif | |
88 | if (s->flags & SEC_LOAD) | |
89 | { | |
90 | char *buf; | |
91 | bfd_size_type size; | |
269e9c18 | 92 | bfd_vma base; |
d45a4bef JB |
93 | |
94 | size = bfd_get_section_size (s); | |
95 | if (size <= 0) | |
96 | continue; | |
97 | ||
269e9c18 | 98 | base = bfd_section_lma (prog, s); |
d45a4bef JB |
99 | if (verbose) |
100 | fprintf (stderr, "[load a=%08x s=%08x %s]\n", | |
101 | (int) base, (int) size, bfd_get_section_name (prog, s)); | |
102 | buf = (char *) malloc (size); | |
103 | bfd_get_section_contents (prog, s, buf, 0, size); | |
104 | mem_put_blk (base, buf, size); | |
105 | free (buf); | |
106 | if (highest_addr_loaded < base + size - 1 && size >= 4) | |
107 | highest_addr_loaded = base + size - 1; | |
108 | } | |
109 | } | |
110 | ||
111 | if (strcmp (bfd_get_target (prog), "srec") == 0) | |
112 | { | |
113 | heaptop = heapbottom = 0; | |
114 | switch (mach) | |
115 | { | |
116 | case bfd_mach_m16c: | |
117 | if (highest_addr_loaded > 0x10000) | |
118 | regs.r_pc = mem_get_si (0x000ffffc) & membus_mask; | |
119 | else | |
120 | regs.r_pc = mem_get_si (0x000fffc) & membus_mask; | |
121 | break; | |
122 | case bfd_mach_m32c: | |
123 | regs.r_pc = mem_get_si (0x00fffffc) & membus_mask; | |
124 | break; | |
125 | } | |
126 | } | |
127 | else | |
128 | regs.r_pc = prog->start_address; | |
129 | if (verbose) | |
130 | fprintf (stderr, "[start pc=%08x]\n", (unsigned int) regs.r_pc); | |
131 | } |