/* $NetBSD: ldd.c,v 1.27.2.1 2023/01/12 12:05:20 martin Exp $ */ /*- * Copyright (c) 1998, 2000 The NetBSD Foundation, Inc. * All rights reserved. * * This code is derived from software contributed to The NetBSD Foundation * by Paul Kranenburg. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE * POSSIBILITY OF SUCH DAMAGE. */ /* * Copyright 1996 John D. Polstra. * Copyright 1996 Matt Thomas * All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed by John Polstra. * 4. The name of the author may not be used to endorse or promote products * derived from this software without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */ #include #ifndef lint __RCSID("$NetBSD: ldd.c,v 1.27.2.1 2023/01/12 12:05:20 martin Exp $"); #endif /* not lint */ #include #include #include #include #include #include #include #include #include #include #include #include #include #include "debug.h" #include "rtld.h" #include "ldd.h" /* * Data declarations. */ static char *error_message; /* Message for dlopen(), or NULL */ bool _rtld_trust; /* False for setuid and setgid programs */ /* * This may be ELF64 or ELF32 but since they are used opaquely it doesn't * really matter. */ Obj_Entry *_rtld_objlist; /* Head of linked list of shared objects */ Obj_Entry **_rtld_objtail = &_rtld_objlist; /* Link field of last object in list */ u_int _rtld_objcount; /* Number of shared objects */ u_int _rtld_objloads; /* Number of objects loaded */ Obj_Entry *_rtld_objmain; /* The main program shared object */ size_t _rtld_pagesz; Search_Path *_rtld_default_paths; Search_Path *_rtld_paths; Library_Xform *_rtld_xforms; static void usage(void) __dead; char *main_local; char *main_progname; static void usage(void) { fprintf(stderr, "Usage: %s [-f ] [-f ] " " ...\n", getprogname()); exit(1); } int main(int argc, char **argv) { const char *fmt1 = NULL, *fmt2 = NULL; int c, exit_status = EXIT_SUCCESS; char cwd[MAXPATHLEN], path[MAXPATHLEN]; bool verbose = false; #ifdef DEBUG debug = 1; #endif while ((c = getopt(argc, argv, "f:ov")) != -1) { switch (c) { case 'f': if (fmt1) { if (fmt2) errx(1, "Too many formats"); fmt2 = optarg; } else fmt1 = optarg; break; case 'o': if (fmt1 || fmt2) errx(1, "Cannot use -o and -f together"); fmt1 = "%a:-l%o.%m => %p\n"; break; case 'v': verbose = true; break; default: usage(); /*NOTREACHED*/ } } argc -= optind; argv += optind; if (argc <= 0) { usage(); /*NOTREACHED*/ } if (getcwd(cwd, sizeof(cwd)) == NULL) err(EXIT_FAILURE, "Can't get working directory"); for (; argc != 0; argc--, argv++) { int fd; bool failed = false; if (**argv != '/') { strcpy(path, cwd); strlcat(path, "/", sizeof(path)); strlcat(path, *argv, sizeof(path)); } else { strlcpy(path, *argv, sizeof(path)); } fd = open(*argv, O_RDONLY); if (fd == -1) { exit_status = EXIT_FAILURE; warn("%s", *argv); continue; } if (elf_ldd(fd, *argv, path, fmt1, fmt2) == -1) { if (verbose) warnx("%s", error_message); failed = true; } /* Alpha never had 32 bit support. */ #if (defined(_LP64) && !defined(ELF64_ONLY)) || defined(MIPS_N32) if (failed) { if (elf32_ldd(fd, *argv, path, fmt1, fmt2) == -1) { if (verbose) warnx("%s", error_message); } else failed = false; } #if defined(__mips__) && 0 /* XXX this is still hosed for some reason */ if (failed) { if (elf32_ldd_compat(fd, *argv, path, fmt1, fmt2) == -1) { if (verbose) warnx("%s", error_message); } else failed = false; } #endif #endif if (failed) { exit_status = EXIT_FAILURE; if (!verbose) warnx("%s", error_message); } close(fd); } return exit_status; } /* * Error reporting function. Use it like printf. If formats the message * into a buffer, and sets things up so that the next call to dlerror() * will return the message. */ void _rtld_error(const char *fmt, ...) { static char buf[512]; va_list ap; va_start(ap, fmt); xvsnprintf(buf, sizeof buf, fmt, ap); error_message = buf; va_end(ap); } char * dlerror() { char *msg = error_message; error_message = NULL; return msg; } void _rtld_die(void) { const char *msg = dlerror(); if (msg == NULL) msg = "Fatal error"; xerrx(1, "%s", msg); } void _rtld_shared_enter(void) { } void _rtld_shared_exit(void) { } void _rtld_exclusive_enter(sigset_t *mask) { } void _rtld_exclusive_exit(sigset_t *mask) { }