1 /*- 2 * Copyright (c) 2004, The DragonFly Project. All rights reserved. 3 * Copyright (c) 1998, Peter Wemm <peter@netplex.com.au> 4 * All rights reserved. 5 * 6 * Redistribution and use in source and binary forms, with or without 7 * modification, are permitted provided that the following conditions 8 * are met: 9 * 1. Redistributions of source code must retain the above copyright 10 * notice, this list of conditions and the following disclaimer. 11 * 2. Redistributions in binary form must reproduce the above copyright 12 * notice, this list of conditions and the following disclaimer in the 13 * documentation and/or other materials provided with the distribution. 14 * 15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 16 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 17 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 18 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 19 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 20 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 21 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 22 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 23 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 24 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 25 * SUCH DAMAGE. 26 * 27 * $FreeBSD: src/usr.bin/objformat/objformat.c,v 1.6 1998/10/24 02:01:30 jdp Exp $ 28 * $DragonFly: src/usr.bin/objformat/objformat.c,v 1.17 2005/04/20 21:39:00 joerg Exp $ 29 */ 30 31 #include <err.h> 32 #include <objformat.h> 33 #include <stdio.h> 34 #include <stdlib.h> 35 #include <string.h> 36 #include <unistd.h> 37 38 #ifndef CCVER_DEFAULT 39 #define CCVER_DEFAULT "gcc34" 40 #endif 41 42 #ifndef BINUTILSVER_DEFAULT 43 #define BINUTILSVER_DEFAULT "binutils215" 44 #endif 45 #define BINUTILSVER_GCC2 "binutils212" 46 #define BINUTILSVER_GCC34 "binutils215" 47 48 #define OBJFORMAT 0 49 #define COMPILER 1 50 #define BINUTILS1 2 51 #define BINUTILS2 3 52 53 #define arysize(ary) (sizeof(ary)/sizeof((ary)[0])) 54 55 struct command { 56 const char *cmd; 57 int type; 58 }; 59 60 static struct command commands[] = { 61 {"CC", COMPILER}, 62 {"c++", COMPILER}, 63 {"c++filt", COMPILER}, 64 {"cc", COMPILER}, 65 {"cpp", COMPILER}, 66 {"f77", COMPILER}, 67 {"g++", COMPILER}, 68 {"gcc", COMPILER}, 69 {"gcov", COMPILER}, 70 {"addr2line", BINUTILS2}, 71 {"ar", BINUTILS2}, 72 {"as", BINUTILS2}, 73 {"gasp", BINUTILS2}, 74 {"gdb", BINUTILS2}, 75 {"ld", BINUTILS2}, 76 {"nm", BINUTILS2}, 77 {"objcopy", BINUTILS2}, 78 {"objdump", BINUTILS2}, 79 {"ranlib", BINUTILS2}, 80 {"size", BINUTILS2}, 81 {"strings", BINUTILS2}, 82 {"strip", BINUTILS2}, 83 {"objformat", OBJFORMAT} 84 }; 85 86 int 87 main(int argc, char **argv) 88 { 89 struct command *cmds; 90 char objformat[32]; 91 char *path, *chunk; 92 char *cmd, *newcmd = NULL; 93 char *objformat_path; 94 char *ccver; 95 char *buver; 96 const char *env_value = NULL; 97 const char *base_path = NULL; 98 int use_objformat = 0; 99 100 if (getobjformat(objformat, sizeof objformat, &argc, argv) == -1) 101 errx(1, "Invalid object format"); 102 103 /* 104 * Get the last path elemenet of the program name being executed 105 */ 106 cmd = strrchr(argv[0], '/'); 107 if (cmd != NULL) 108 cmd++; 109 else 110 cmd = argv[0]; 111 112 for (cmds = commands; cmds < &commands[arysize(commands)]; ++cmds) { 113 if (strcmp(cmd, cmds->cmd) == 0) 114 break; 115 } 116 117 if ((ccver = getenv("CCVER")) == NULL || ccver[0] == 0) 118 ccver = CCVER_DEFAULT; 119 if ((buver = getenv("BINUTILSVER")) == NULL) { 120 if (strcmp(ccver, "gcc2") == 0) 121 buver = BINUTILSVER_GCC2; 122 else if (strcmp(ccver, "gcc34") == 0) 123 buver = BINUTILSVER_GCC34; 124 else 125 buver = BINUTILSVER_DEFAULT; /* fall through */ 126 } 127 128 if (cmds) { 129 switch (cmds->type) { 130 case COMPILER: 131 base_path = "/usr/libexec"; 132 use_objformat = 0; 133 env_value = ccver; 134 break; 135 case BINUTILS2: 136 use_objformat = 1; 137 /* fall through */ 138 case BINUTILS1: 139 env_value = buver; 140 base_path = "/usr/libexec"; 141 break; 142 case OBJFORMAT: 143 break; 144 default: 145 err(1, "unknown command type"); 146 break; 147 } 148 } 149 150 /* 151 * The objformat command itself doesn't need another exec 152 */ 153 if (cmds->type == OBJFORMAT) { 154 if (argc != 1) { 155 fprintf(stderr, "Usage: objformat\n"); 156 exit(1); 157 } 158 159 printf("%s\n", objformat); 160 exit(0); 161 } 162 163 /* 164 * make buildworld glue and CCVER overrides. 165 */ 166 objformat_path = getenv("OBJFORMAT_PATH"); 167 if (objformat_path == NULL) 168 objformat_path = ""; 169 170 path = strdup(objformat_path); 171 172 setenv("OBJFORMAT", objformat, 1); 173 174 /* 175 * objformat_path could be sequence of colon-separated paths. 176 */ 177 while ((chunk = strsep(&path, ":")) != NULL) { 178 if (newcmd != NULL) { 179 free(newcmd); 180 newcmd = NULL; 181 } 182 if (use_objformat) { 183 asprintf(&newcmd, "%s%s/%s/%s/%s", 184 chunk, base_path, env_value, objformat, cmd); 185 } else { 186 asprintf(&newcmd, "%s%s/%s/%s", 187 chunk, base_path, env_value, cmd); 188 } 189 if (newcmd == NULL) 190 err(1, "cannot allocate memory"); 191 192 argv[0] = newcmd; 193 execv(newcmd, argv); 194 } 195 if (use_objformat) { 196 err(1, "in path [%s]%s/%s/%s/%s", 197 objformat_path, base_path, env_value, objformat, cmd); 198 } else { 199 err(1, "in path [%s]%s/%s/%s", 200 objformat_path, base_path, env_value, cmd); 201 } 202 } 203 204