1/* 2 * Copyright (c) 1999 Global Technology Associates, Inc. 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS``AS IS'' AND 15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 17 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS 18 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, 19 * OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT 20 * OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR 21 * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, 22 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE 23 * OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, 24 * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 25 * 26 * $FreeBSD$ 27 */ 28 29#include <sys/types.h> 30#include <sys/endian.h> 31#include <sys/wait.h> 32 33#include <err.h> 34#include <fcntl.h> 35#include <stdio.h> 36#include <stdlib.h> 37#include <string.h> 38#include <unistd.h> 39 40#include "aouthdr.h" 41#include "elfhdr.h" 42#include "kgzip.h" 43 44#define align(x, y) (((x) + (y) - 1) & ~((y) - 1)) 45 46/* 47 * Link KGZ file and loader. 48 */ 49void 50kgzld(struct kgz_hdr * kh, const char *f1, const char *f2) 51{ 52 char addr[16]; 53 struct iodesc idi; 54 pid_t pid; 55 size_t n; 56 int status; 57 58 if (strcmp(kh->ident, "KGZ")) { 59 if ((idi.fd = open(idi.fname = f1, O_RDONLY)) == -1) 60 err(1, "%s", idi.fname); 61 if (!format) { 62 union { 63 struct exec ex; 64 Elf32_Ehdr ee; 65 } hdr; 66 n = xread(&idi, &hdr, sizeof(hdr), 0); 67 if (n >= sizeof(hdr.ee) && IS_ELF(hdr.ee)) 68 format = F_ELF; 69 else if (n >= sizeof(hdr.ex) && 70 N_GETMAGIC(hdr.ex) == OMAGIC) 71 format = F_AOUT; 72 if (!format) 73 errx(1, "%s: Format not supported", idi.fname); 74 } 75 n = xread(&idi, kh, sizeof(*kh), 76 format == F_AOUT ? sizeof(struct kgz_aouthdr0) 77 : sizeof(struct kgz_elfhdr)); 78 xclose(&idi); 79 if (n != sizeof(*kh) || strcmp(kh->ident, "KGZ")) 80 errx(1, "%s: Invalid format", idi.fname); 81 } 82 sprintf(addr, "%#x", align(kh->dload + kh->dsize, 0x1000)); 83 switch (pid = fork()) { 84 case -1: 85 err(1, NULL); 86 case 0: 87 if (format == F_AOUT) 88 execlp("ld", "ld", "-aout", "-Z", "-T", addr, "-o", f2, 89 loader, f1, (char *)NULL); 90 else 91 execlp("ld", "ld", "-Ttext", addr, "-o", f2, loader, f1, 92 (char *)NULL); 93 warn(NULL); 94 _exit(1); 95 default: 96 if ((pid = waitpid(pid, &status, 0)) == -1) 97 err(1, NULL); 98 if (WIFSIGNALED(status) || WEXITSTATUS(status)) 99 exit(1); 100 } 101} 102