ldd_elfxx.c revision 1.1.2.3
1 1.1.2.3 snj /* $NetBSD: ldd_elfxx.c,v 1.1.2.3 2009/02/25 03:09:31 snj Exp $ */ 2 1.1.2.2 bouyer 3 1.1.2.2 bouyer /*- 4 1.1.2.2 bouyer * Copyright (c) 1998, 2000 The NetBSD Foundation, Inc. 5 1.1.2.2 bouyer * All rights reserved. 6 1.1.2.2 bouyer * 7 1.1.2.2 bouyer * This code is derived from software contributed to The NetBSD Foundation 8 1.1.2.2 bouyer * by Paul Kranenburg. 9 1.1.2.2 bouyer * 10 1.1.2.2 bouyer * Redistribution and use in source and binary forms, with or without 11 1.1.2.2 bouyer * modification, are permitted provided that the following conditions 12 1.1.2.2 bouyer * are met: 13 1.1.2.2 bouyer * 1. Redistributions of source code must retain the above copyright 14 1.1.2.2 bouyer * notice, this list of conditions and the following disclaimer. 15 1.1.2.2 bouyer * 2. Redistributions in binary form must reproduce the above copyright 16 1.1.2.2 bouyer * notice, this list of conditions and the following disclaimer in the 17 1.1.2.2 bouyer * documentation and/or other materials provided with the distribution. 18 1.1.2.2 bouyer * 19 1.1.2.2 bouyer * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 20 1.1.2.2 bouyer * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 21 1.1.2.2 bouyer * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 22 1.1.2.2 bouyer * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 23 1.1.2.2 bouyer * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 24 1.1.2.2 bouyer * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 25 1.1.2.2 bouyer * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 26 1.1.2.2 bouyer * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 27 1.1.2.2 bouyer * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 28 1.1.2.2 bouyer * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 29 1.1.2.2 bouyer * POSSIBILITY OF SUCH DAMAGE. 30 1.1.2.2 bouyer */ 31 1.1.2.2 bouyer 32 1.1.2.2 bouyer /* 33 1.1.2.2 bouyer * Copyright 1996 John D. Polstra. 34 1.1.2.2 bouyer * Copyright 1996 Matt Thomas <matt (at) 3am-software.com> 35 1.1.2.2 bouyer * All rights reserved. 36 1.1.2.2 bouyer * 37 1.1.2.2 bouyer * Redistribution and use in source and binary forms, with or without 38 1.1.2.2 bouyer * modification, are permitted provided that the following conditions 39 1.1.2.2 bouyer * are met: 40 1.1.2.2 bouyer * 1. Redistributions of source code must retain the above copyright 41 1.1.2.2 bouyer * notice, this list of conditions and the following disclaimer. 42 1.1.2.2 bouyer * 2. Redistributions in binary form must reproduce the above copyright 43 1.1.2.2 bouyer * notice, this list of conditions and the following disclaimer in the 44 1.1.2.2 bouyer * documentation and/or other materials provided with the distribution. 45 1.1.2.2 bouyer * 3. All advertising materials mentioning features or use of this software 46 1.1.2.2 bouyer * must display the following acknowledgement: 47 1.1.2.2 bouyer * This product includes software developed by John Polstra. 48 1.1.2.2 bouyer * 4. The name of the author may not be used to endorse or promote products 49 1.1.2.2 bouyer * derived from this software without specific prior written permission. 50 1.1.2.2 bouyer * 51 1.1.2.2 bouyer * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 52 1.1.2.2 bouyer * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 53 1.1.2.2 bouyer * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 54 1.1.2.2 bouyer * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 55 1.1.2.2 bouyer * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 56 1.1.2.2 bouyer * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 57 1.1.2.2 bouyer * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 58 1.1.2.2 bouyer * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 59 1.1.2.2 bouyer * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 60 1.1.2.2 bouyer * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 61 1.1.2.2 bouyer */ 62 1.1.2.2 bouyer 63 1.1.2.2 bouyer #include <sys/cdefs.h> 64 1.1.2.2 bouyer #ifndef lint 65 1.1.2.3 snj __RCSID("$NetBSD: ldd_elfxx.c,v 1.1.2.3 2009/02/25 03:09:31 snj Exp $"); 66 1.1.2.2 bouyer #endif /* not lint */ 67 1.1.2.2 bouyer 68 1.1.2.2 bouyer #include <sys/types.h> 69 1.1.2.2 bouyer #include <sys/mman.h> 70 1.1.2.2 bouyer #include <sys/wait.h> 71 1.1.2.2 bouyer 72 1.1.2.2 bouyer #include <a.out.h> 73 1.1.2.2 bouyer #include <dirent.h> 74 1.1.2.2 bouyer #include <err.h> 75 1.1.2.2 bouyer #include <errno.h> 76 1.1.2.2 bouyer #include <fcntl.h> 77 1.1.2.2 bouyer #include <stdarg.h> 78 1.1.2.2 bouyer #include <stdio.h> 79 1.1.2.2 bouyer #include <stdlib.h> 80 1.1.2.2 bouyer #include <string.h> 81 1.1.2.2 bouyer #include <unistd.h> 82 1.1.2.2 bouyer #include <ctype.h> 83 1.1.2.2 bouyer 84 1.1.2.2 bouyer #include "debug.h" 85 1.1.2.2 bouyer #include "rtld.h" 86 1.1.2.2 bouyer #include "ldd.h" 87 1.1.2.2 bouyer 88 1.1.2.2 bouyer /* 89 1.1.2.2 bouyer * elfxx_ldd() - bit-size independant ELF ldd implementation. 90 1.1.2.2 bouyer * returns 0 on success and -1 on failure. 91 1.1.2.2 bouyer */ 92 1.1.2.2 bouyer int 93 1.1.2.3 snj ELFNAME(ldd)(int fd, char *path, char *fmt1, char *fmt2) 94 1.1.2.2 bouyer { 95 1.1.2.2 bouyer struct stat st; 96 1.1.2.2 bouyer 97 1.1.2.3 snj if (lseek(fd, 0, SEEK_SET) < 0 || 98 1.1.2.3 snj fstat(fd, &st) < 0) { 99 1.1.2.3 snj _rtld_error("%s: %s", path, strerror(errno)); 100 1.1.2.2 bouyer return -1; 101 1.1.2.2 bouyer } 102 1.1.2.2 bouyer 103 1.1.2.2 bouyer _rtld_pagesz = sysconf(_SC_PAGESIZE); 104 1.1.2.2 bouyer 105 1.1.2.2 bouyer #ifdef RTLD_ARCH_SUBDIR 106 1.1.2.2 bouyer _rtld_add_paths(path, &_rtld_default_paths, 107 1.1.2.2 bouyer RTLD_DEFAULT_LIBRARY_PATH "/" RTLD_ARCH_SUBDIR); 108 1.1.2.2 bouyer #endif 109 1.1.2.2 bouyer _rtld_add_paths(path, &_rtld_default_paths, RTLD_DEFAULT_LIBRARY_PATH); 110 1.1.2.2 bouyer 111 1.1.2.2 bouyer _rtld_paths = NULL; 112 1.1.2.2 bouyer _rtld_trust = (st.st_mode & (S_ISUID | S_ISGID)) == 0; 113 1.1.2.2 bouyer if (_rtld_trust) 114 1.1.2.2 bouyer _rtld_add_paths(path, &_rtld_paths, getenv("LD_LIBRARY_PATH")); 115 1.1.2.2 bouyer 116 1.1.2.2 bouyer _rtld_process_hints(path, &_rtld_paths, &_rtld_xforms, _PATH_LD_HINTS); 117 1.1.2.2 bouyer _rtld_objmain = _rtld_map_object(xstrdup(path), fd, &st); 118 1.1.2.3 snj if (_rtld_objmain == NULL) 119 1.1.2.2 bouyer return -1; 120 1.1.2.2 bouyer 121 1.1.2.2 bouyer _rtld_objmain->path = xstrdup(path); 122 1.1.2.2 bouyer _rtld_digest_dynamic(path, _rtld_objmain); 123 1.1.2.2 bouyer 124 1.1.2.2 bouyer /* Link the main program into the list of objects. */ 125 1.1.2.2 bouyer *_rtld_objtail = _rtld_objmain; 126 1.1.2.2 bouyer _rtld_objtail = &_rtld_objmain->next; 127 1.1.2.2 bouyer ++_rtld_objmain->refcount; 128 1.1.2.2 bouyer 129 1.1.2.2 bouyer (void) _rtld_load_needed_objects(_rtld_objmain, 0); 130 1.1.2.2 bouyer 131 1.1.2.2 bouyer if (fmt1 == NULL) 132 1.1.2.2 bouyer printf("%s:\n", _rtld_objmain->path); 133 1.1.2.2 bouyer main_local = path; 134 1.1.2.2 bouyer main_progname = _rtld_objmain->path; 135 1.1.2.2 bouyer print_needed(_rtld_objmain, fmt1, fmt2); 136 1.1.2.2 bouyer 137 1.1.2.2 bouyer while (_rtld_objlist != NULL) { 138 1.1.2.2 bouyer Obj_Entry *obj = _rtld_objlist; 139 1.1.2.2 bouyer _rtld_objlist = obj->next; 140 1.1.2.2 bouyer while (obj->rpaths != NULL) { 141 1.1.2.2 bouyer const Search_Path *rpath = obj->rpaths; 142 1.1.2.2 bouyer obj->rpaths = rpath->sp_next; 143 1.1.2.2 bouyer xfree(__UNCONST(rpath->sp_path)); 144 1.1.2.2 bouyer xfree(__UNCONST(rpath)); 145 1.1.2.2 bouyer } 146 1.1.2.2 bouyer while (obj->needed != NULL) { 147 1.1.2.2 bouyer const Needed_Entry *needed = obj->needed; 148 1.1.2.2 bouyer obj->needed = needed->next; 149 1.1.2.2 bouyer xfree(__UNCONST(needed)); 150 1.1.2.2 bouyer } 151 1.1.2.2 bouyer (void) munmap(obj->mapbase, obj->mapsize); 152 1.1.2.2 bouyer xfree(obj->path); 153 1.1.2.2 bouyer xfree(obj); 154 1.1.2.2 bouyer } 155 1.1.2.2 bouyer 156 1.1.2.2 bouyer _rtld_objmain = NULL; 157 1.1.2.2 bouyer _rtld_objtail = &_rtld_objlist; 158 1.1.2.2 bouyer /* Need to free _rtld_paths? */ 159 1.1.2.2 bouyer 160 1.1.2.2 bouyer return 0; 161 1.1.2.2 bouyer } 162
Indexes created Mon Oct 27 04:09:48 GMT 2025