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 */ 29 30 #include <err.h> 31 #include <objformat.h> 32 #include <stdio.h> 33 #include <stdlib.h> 34 #include <string.h> 35 #include <unistd.h> 36 37 #ifndef CCVER_DEFAULT 38 #define CCVER_DEFAULT "gcc44" 39 #endif 40 41 #ifndef BINUTILSVER_DEFAULT 42 #define BINUTILSVER_DEFAULT "binutils221" 43 #endif 44 45 #ifndef OBJFORMAT_PATH_DEFAULT 46 #define OBJFORMAT_PATH_DEFAULT "" 47 #endif 48 49 #define OBJFORMAT 0 50 #define COMPILER 1 51 #define BINUTILS1 2 52 #define BINUTILS2 3 53 54 #define arysize(ary) (sizeof(ary)/sizeof((ary)[0])) 55 56 struct command { 57 const char *cmd; 58 int type; 59 }; 60 61 static struct command commands[] = { 62 {"CC", COMPILER}, 63 {"c++", COMPILER}, 64 {"c++filt", COMPILER}, 65 {"cc", COMPILER}, 66 {"cpp", COMPILER}, 67 {"g++", COMPILER}, 68 {"gcc", COMPILER}, 69 {"gcov", COMPILER}, 70 {"addr2line", BINUTILS2}, 71 {"ar", BINUTILS2}, 72 {"as", BINUTILS2}, 73 #if 0 74 {"c++filt", BINUTILS2}, 75 #endif 76 {"elfedit", BINUTILS2}, 77 {"ld", BINUTILS2}, 78 {"nm", BINUTILS2}, 79 {"objcopy", BINUTILS2}, 80 {"objdump", BINUTILS2}, 81 {"ranlib", BINUTILS2}, 82 {"readelf", BINUTILS2}, 83 {"size", BINUTILS2}, 84 {"strings", BINUTILS2}, 85 {"strip", BINUTILS2}, 86 {"objformat", OBJFORMAT}, 87 {"", -1} 88 }; 89 90 int 91 main(int argc, char **argv) 92 { 93 struct command *cmds; 94 char objformat[32]; 95 char *path, *chunk; 96 char *cmd, *newcmd = NULL; 97 const char *objformat_path; 98 const char *ccver; 99 const char *buver; 100 const char *env_value = NULL; 101 const char *base_path = NULL; 102 int use_objformat = 0; 103 104 if (getobjformat(objformat, sizeof objformat, &argc, argv) == -1) 105 errx(1, "Invalid object format"); 106 107 /* 108 * Get the last path element of the program name being executed 109 */ 110 cmd = strrchr(argv[0], '/'); 111 if (cmd != NULL) 112 cmd++; 113 else 114 cmd = argv[0]; 115 116 for (cmds = commands; cmds < &commands[arysize(commands) - 1]; ++cmds) { 117 if (strcmp(cmd, cmds->cmd) == 0) 118 break; 119 } 120 121 if ((ccver = getenv("CCVER")) == NULL || ccver[0] == 0) 122 ccver = CCVER_DEFAULT; 123 if ((buver = getenv("BINUTILSVER")) == NULL) { 124 buver = BINUTILSVER_DEFAULT; 125 } 126 127 if (cmds) { 128 switch (cmds->type) { 129 case COMPILER: 130 base_path = "/usr/libexec"; 131 use_objformat = 0; 132 env_value = ccver; 133 break; 134 case BINUTILS2: 135 use_objformat = 1; 136 /* fall through */ 137 case BINUTILS1: 138 env_value = buver; 139 base_path = "/usr/libexec"; 140 break; 141 case OBJFORMAT: 142 break; 143 default: 144 errx(1, "unknown command type"); 145 break; 146 } 147 } 148 149 /* 150 * The objformat command itself doesn't need another exec 151 */ 152 if (cmds->type == OBJFORMAT) { 153 if (argc != 1) { 154 fprintf(stderr, "Usage: objformat\n"); 155 exit(1); 156 } 157 158 printf("%s\n", objformat); 159 exit(0); 160 } 161 162 /* 163 * make buildworld glue and CCVER overrides. 164 */ 165 objformat_path = getenv("OBJFORMAT_PATH"); 166 if (objformat_path == NULL) 167 objformat_path = OBJFORMAT_PATH_DEFAULT; 168 169 again: 170 path = strdup(objformat_path); 171 172 if (setenv("OBJFORMAT", objformat, 1) == -1) 173 err(1, "setenv: cannot set OBJFORMAT=%s", objformat); 174 175 /* 176 * objformat_path could be sequence of colon-separated paths. 177 */ 178 while ((chunk = strsep(&path, ":")) != NULL) { 179 if (newcmd != NULL) { 180 free(newcmd); 181 newcmd = NULL; 182 } 183 if (use_objformat) { 184 asprintf(&newcmd, "%s%s/%s/%s/%s", 185 chunk, base_path, env_value, objformat, cmd); 186 } else { 187 asprintf(&newcmd, "%s%s/%s/%s", 188 chunk, base_path, env_value, cmd); 189 } 190 if (newcmd == NULL) 191 err(1, "cannot allocate memory"); 192 193 argv[0] = newcmd; 194 execv(newcmd, argv); 195 } 196 197 /* 198 * Fallback: if we're searching for a compiler, but didn't 199 * find any, try again using the custom compiler driver. 200 */ 201 if (cmds && cmds->type == COMPILER && 202 strcmp(env_value, "custom") != 0) { 203 env_value = "custom"; 204 goto again; 205 } 206 207 if (use_objformat) { 208 err(1, "in path [%s]%s/%s/%s/%s", 209 objformat_path, base_path, env_value, objformat, cmd); 210 } else { 211 err(1, "in path [%s]%s/%s/%s", 212 objformat_path, base_path, env_value, cmd); 213 } 214 } 215