1 /* load.c --- loading object files into the M32C simulator. 2 3 Copyright (C) 2005-2019 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 #include "load.h" 31 32 int (*decode_opcode) (void) = 0; 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 58 m32c_load (bfd * prog) 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; 92 bfd_vma base; 93 94 size = bfd_get_section_size (s); 95 if (size <= 0) 96 continue; 97 98 base = bfd_section_lma (prog, s); 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 } 132