1 /* $NetBSD: ldd.c,v 1.28 2023/01/04 03:33:54 mrg Exp $ */ 2 3 /*- 4 * Copyright (c) 1998, 2000 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Paul Kranenburg. 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 * 19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 29 * POSSIBILITY OF SUCH DAMAGE. 30 */ 31 32 /* 33 * Copyright 1996 John D. Polstra. 34 * Copyright 1996 Matt Thomas <matt@3am-software.com> 35 * All rights reserved. 36 * 37 * Redistribution and use in source and binary forms, with or without 38 * modification, are permitted provided that the following conditions 39 * are met: 40 * 1. Redistributions of source code must retain the above copyright 41 * notice, this list of conditions and the following disclaimer. 42 * 2. Redistributions in binary form must reproduce the above copyright 43 * notice, this list of conditions and the following disclaimer in the 44 * documentation and/or other materials provided with the distribution. 45 * 3. All advertising materials mentioning features or use of this software 46 * must display the following acknowledgement: 47 * This product includes software developed by John Polstra. 48 * 4. The name of the author may not be used to endorse or promote products 49 * derived from this software without specific prior written permission. 50 * 51 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 52 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 53 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 54 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 55 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 56 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 57 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 58 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 59 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 60 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 61 */ 62 63 #include <sys/cdefs.h> 64 #ifndef lint 65 __RCSID("$NetBSD: ldd.c,v 1.28 2023/01/04 03:33:54 mrg Exp $"); 66 #endif /* not lint */ 67 68 #include <sys/types.h> 69 #include <sys/mman.h> 70 #include <sys/wait.h> 71 72 #include <dirent.h> 73 #include <err.h> 74 #include <errno.h> 75 #include <fcntl.h> 76 #include <stdarg.h> 77 #include <stdio.h> 78 #include <stdlib.h> 79 #include <string.h> 80 #include <unistd.h> 81 #include <ctype.h> 82 83 #include "debug.h" 84 #include "rtld.h" 85 #include "ldd.h" 86 87 /* 88 * Data declarations. 89 */ 90 static char *error_message; /* Message for dlopen(), or NULL */ 91 bool _rtld_trust; /* False for setuid and setgid programs */ 92 /* 93 * This may be ELF64 or ELF32 but since they are used opaquely it doesn't 94 * really matter. 95 */ 96 Obj_Entry *_rtld_objlist; /* Head of linked list of shared objects */ 97 Obj_Entry **_rtld_objtail = &_rtld_objlist; 98 /* Link field of last object in list */ 99 u_int _rtld_objcount; /* Number of shared objects */ 100 u_int _rtld_objloads; /* Number of objects loaded */ 101 102 Obj_Entry *_rtld_objmain; /* The main program shared object */ 103 size_t _rtld_pagesz; 104 105 Search_Path *_rtld_default_paths; 106 Search_Path *_rtld_paths; 107 Library_Xform *_rtld_xforms; 108 109 static void usage(void) __dead; 110 char *main_local; 111 char *main_progname; 112 113 static void 114 usage(void) 115 { 116 fprintf(stderr, "Usage: %s [-f <format 1>] [-f <format 2>] <filename>" 117 " ...\n", getprogname()); 118 exit(1); 119 } 120 121 int 122 main(int argc, char **argv) 123 { 124 const char *fmt1 = NULL, *fmt2 = NULL; 125 int c, exit_status = EXIT_SUCCESS; 126 char cwd[MAXPATHLEN], path[MAXPATHLEN]; 127 bool verbose = false; 128 129 #ifdef DEBUG 130 debug = 1; 131 #endif 132 while ((c = getopt(argc, argv, "f:ov")) != -1) { 133 switch (c) { 134 case 'f': 135 if (fmt1) { 136 if (fmt2) 137 errx(1, "Too many formats"); 138 fmt2 = optarg; 139 } else 140 fmt1 = optarg; 141 break; 142 case 'o': 143 if (fmt1 || fmt2) 144 errx(1, "Cannot use -o and -f together"); 145 fmt1 = "%a:-l%o.%m => %p\n"; 146 break; 147 case 'v': 148 verbose = true; 149 break; 150 default: 151 usage(); 152 /*NOTREACHED*/ 153 } 154 } 155 argc -= optind; 156 argv += optind; 157 158 if (argc <= 0) { 159 usage(); 160 /*NOTREACHED*/ 161 } 162 if (getcwd(cwd, sizeof(cwd)) == NULL) 163 err(EXIT_FAILURE, "Can't get working directory"); 164 165 for (; argc != 0; argc--, argv++) { 166 int fd; 167 bool failed = false; 168 169 if (**argv != '/') { 170 strcpy(path, cwd); 171 strlcat(path, "/", sizeof(path)); 172 strlcat(path, *argv, sizeof(path)); 173 } else { 174 strlcpy(path, *argv, sizeof(path)); 175 } 176 fd = open(*argv, O_RDONLY); 177 if (fd == -1) { 178 exit_status = EXIT_FAILURE; 179 warn("%s", *argv); 180 continue; 181 } 182 if (elf_ldd(fd, *argv, path, fmt1, fmt2) == -1) { 183 if (verbose) 184 warnx("%s", error_message); 185 failed = true; 186 } 187 /* Alpha never had 32 bit support. */ 188 #if (defined(_LP64) && !defined(ELF64_ONLY)) || defined(MIPS_N32) 189 if (failed) { 190 if (elf32_ldd(fd, *argv, path, fmt1, fmt2) == -1) { 191 if (verbose) 192 warnx("%s", error_message); 193 } else 194 failed = false; 195 } 196 #if defined(__mips__) && 0 /* XXX this is still hosed for some reason */ 197 if (failed) { 198 if (elf32_ldd_compat(fd, *argv, path, fmt1, fmt2) == -1) { 199 if (verbose) 200 warnx("%s", error_message); 201 } else 202 failed = false; 203 } 204 #endif 205 #endif 206 207 if (failed) { 208 exit_status = EXIT_FAILURE; 209 if (!verbose) 210 warnx("%s", error_message); 211 } 212 close(fd); 213 } 214 215 return exit_status; 216 } 217 218 /* 219 * Error reporting function. Use it like printf. If formats the message 220 * into a buffer, and sets things up so that the next call to dlerror() 221 * will return the message. 222 */ 223 void 224 _rtld_error(const char *fmt, ...) 225 { 226 static char buf[512]; 227 va_list ap; 228 va_start(ap, fmt); 229 xvsnprintf(buf, sizeof buf, fmt, ap); 230 error_message = buf; 231 va_end(ap); 232 } 233 234 char * 235 dlerror() 236 { 237 char *msg = error_message; 238 error_message = NULL; 239 return msg; 240 } 241 242 void 243 _rtld_die(void) 244 { 245 const char *msg = dlerror(); 246 247 if (msg == NULL) 248 msg = "Fatal error"; 249 xerrx(1, "%s", msg); 250 } 251 252 void 253 _rtld_shared_enter(void) 254 { 255 } 256 257 void 258 _rtld_shared_exit(void) 259 { 260 } 261 262 void 263 _rtld_exclusive_enter(sigset_t *mask) 264 { 265 } 266 267 void 268 _rtld_exclusive_exit(sigset_t *mask) 269 { 270 } 271