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