1 /* $NetBSD: fixcoff.c,v 1.11 2009/03/14 15:36:09 dsl Exp $ */ 2 3 /* 4 * Copyright (c) 1999 National Aeronautics & Space Administration 5 * All rights reserved. 6 * 7 * This software was written by William Studenmund of the 8 * Numerical Aerospace Similation Facility, NASA Ames Research Center. 9 * 10 * Redistribution and use in source and binary forms, with or without 11 * modification, are permitted provided that the following conditions 12 * are met: 13 * 1. Redistributions of source code must retain the above copyright 14 * notice, this list of conditions and the following disclaimer. 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 3. Neither the name of the National Aeronautics & Space Administration 19 * nor the names of its contributors may be used to endorse or promote 20 * products derived from this software without specific prior written 21 * permission. 22 * 23 * THIS SOFTWARE IS PROVIDED BY THE NATIONAL AERONAUTICS & SPACE ADMINISTRATION 24 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 25 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 26 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE ADMINISTRATION OR CONTRIB- 27 * UTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, 28 * OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 29 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 30 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 31 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 32 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 33 * POSSIBILITY OF SUCH DAMAGE. 34 */ 35 36 /* 37 * This program fixes up the extended xcoff headers generated when an elf 38 * file is turned into an xcoff one with the current objcopy. It should 39 * go away someday, when objcopy will correctly fix up the output xcoff 40 * 41 * Partially inspired by hack-coff, written by Paul Mackerras. 42 */ 43 44 #if HAVE_NBTOOL_CONFIG_H 45 #include "nbtool_config.h" 46 #endif 47 48 #include <stdio.h> 49 #include <stdlib.h> 50 #include <unistd.h> 51 #include <fcntl.h> 52 53 #if HAVE_NBTOOL_CONFIG_H 54 55 #if WORDS_BIGENDIAN 56 #define htobe16(x) (x) 57 #else 58 static unsigned short 59 __htobe16(unsigned short x) 60 { 61 return (((x & 0xff00) >> 8) | ((x & 0x00ff) << 8)); 62 } 63 #define htobe16(x) __htobe16(x) 64 #endif /* WORDS_BIGENDIAN */ 65 66 #else /* HAVE_NBTOOL_CONFIG_H */ 67 #include <sys/endian.h> 68 #endif /* HAVE_NBTOOL_CONFIG_H */ 69 70 struct filehdr { 71 #define U802WRMAGIC 0730 72 #define U802ROMAGIC 0735 73 #define U802TOCMAGIC 0737 74 char f_magic[2]; 75 char f_nsect[2]; 76 char f_time[4]; 77 char f_symtab[4]; 78 char f_nsyms[4]; 79 char f_opthdr[2]; 80 char f_flags[2]; 81 }; 82 83 struct sectionhdr { 84 char s_name[8]; 85 char s_paddr[4]; 86 char s_vaddr[4]; 87 char s_size[4]; 88 char s_section[4]; 89 char s_reloc[4]; 90 char s_lineno[4]; 91 char s_nreloc[2]; 92 char s_nlineno[2]; 93 char s_flags[4]; 94 }; 95 96 struct aouthdr { 97 char magic[2]; 98 char vstamp[2]; 99 char tsize[4]; 100 char dsize[4]; 101 char bsize[4]; 102 char entry[4]; 103 char text_start[4]; 104 char data_start[4]; 105 #define SMALL_AOUTSZ 28 106 char o_toc[4]; 107 char o_snentry[2]; 108 char o_sntext[2]; 109 char o_sndata[2]; 110 char o_sntoc[2]; 111 char o_snloader[2]; 112 char o_snbss[2]; 113 char o_algntext[2]; 114 char o_algndata[2]; 115 char o_modtype[2]; 116 char o_cputype[2]; 117 char o_maxstack[4]; 118 char o_maxdata[4]; 119 char o_resv2[12]; 120 }; 121 #define RS6K_AOUTHDR_ZMAGIC 0x010B 122 123 void 124 usage(char *prog) 125 { 126 fprintf(stderr, "Usage: %s [-h] | [<file to fix>]\n", prog); 127 } 128 129 void 130 help(char *prog) 131 { 132 fprintf(stderr, "%s\tis designed to fix the xcoff headers in a\n",prog); 133 fprintf(stderr, 134 "\tbinary generated using objcopy from a non-xcoff source.\n"); 135 usage(prog); 136 exit(0); 137 } 138 139 main(int argc, char * const *argv) 140 { 141 int fd, i, n, ch; 142 struct filehdr fh; 143 struct aouthdr aoh; 144 struct sectionhdr sh; 145 146 while ((ch = getopt(argc, argv, "h")) != -1) 147 switch (ch) { 148 case 'h': 149 help(getprogname()); 150 } 151 152 argc -= optind; 153 argv += optind; 154 155 if (argc != 1) { 156 usage(getprogname()); 157 exit(1); 158 } 159 160 if ((fd = open(argv[0], O_RDWR, 0)) == -1) 161 err(i, "%s", argv[0]); 162 163 /* 164 * Make sure it looks like an xcoff file.. 165 */ 166 if (read(fd, &fh, sizeof(fh)) != sizeof(fh)) 167 err(1, "%s reading header", argv[0]); 168 169 i = be16toh(*(uint16_t *)fh.f_magic); 170 if ((i != U802WRMAGIC) && (i != U802ROMAGIC) && (i != U802TOCMAGIC)) 171 errx(1, "%s: not a valid xcoff file", argv[0]); 172 173 /* Does the AOUT "Optional header" make sense? */ 174 i = be16toh(*(uint16_t *)fh.f_opthdr); 175 176 if (i == SMALL_AOUTSZ) 177 errx(1, "%s: file has small \"optional\" header, inappropriate for use with %s", argv[0], getprogname()); 178 else if (i != sizeof(aoh)) 179 errx(1, "%s: invalid \"optional\" header", argv[0]); 180 181 if (read(fd, &aoh, i) != i) 182 err(1, "%s reading \"optional\" header", argv[0]); 183 184 /* Now start filing in the AOUT header */ 185 *(uint16_t *)aoh.magic = htobe16(RS6K_AOUTHDR_ZMAGIC); 186 n = be16toh(*(uint16_t *)fh.f_nsect); 187 188 for (i = 0; i < n; i++) { 189 if (read(fd, &sh, sizeof(sh)) != sizeof(sh)) 190 err(1, "%s reading section headers", argv[0]); 191 if (strcmp(sh.s_name, ".text") == 0) { 192 *(uint16_t *)(aoh.o_snentry) = htobe16(i+1); 193 *(uint16_t *)(aoh.o_sntext) = htobe16(i+1); 194 } else if (strcmp(sh.s_name, ".data") == 0) { 195 *(uint16_t *)(aoh.o_sndata) = htobe16(i+1); 196 } else if (strcmp(sh.s_name, ".bss") == 0) { 197 *(uint16_t *)(aoh.o_snbss) = htobe16(i+1); 198 } 199 } 200 201 /* now write it out */ 202 if (pwrite(fd, &aoh, sizeof(aoh), sizeof(struct filehdr)) 203 != sizeof(aoh)) 204 err(1, "%s writing modified header", argv[0]); 205 close(fd); 206 exit(0); 207 } 208