| 1 | /* load.c --- loading object files into the M32C simulator. |
| 2 | |
| 3 | Copyright (C) 2005, 2007-2012 Free Software Foundation, Inc. |
| 4 | Contributed by Red Hat, Inc. |
| 5 | |
| 6 | This file is part of the GNU simulators. |
| 7 | |
| 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. |
| 12 | |
| 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. |
| 17 | |
| 18 | You should have received a copy of the GNU General Public License |
| 19 | along with this program. If not, see <http://www.gnu.org/licenses/>. */ |
| 20 | |
| 21 | #include "config.h" |
| 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 |
| 57 | m32c_load (bfd * prog) |
| 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 | } |