usr.bin/ldd/ldd_elfxx.c

   1 /*      $NetBSD: ldd_elfxx.c,v 1.4 2009/09/07 04:49:03 dholland 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_elfxx.c,v 1.4 2009/09/07 04:49:03 dholland 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 #define munmap minix_munmap
  88
  89 /*
  90  * elfxx_ldd() - bit-size independant ELF ldd implementation.
  91  * returns 0 on success and -1 on failure.
  92  */
  93 int
  94 ELFNAME(ldd)(int fd, char *path, const char *fmt1, const char *fmt2)
  95 {
  96         struct stat st;
  97
  98         if (lseek(fd, 0, SEEK_SET) < 0 ||
  99             fstat(fd, &st) < 0) {
 100                 _rtld_error("%s: %s", path, strerror(errno));
 101                 return -1;
 102         }
 103
 104         _rtld_pagesz = sysconf(_SC_PAGESIZE);
 105
 106 #ifdef RTLD_ARCH_SUBDIR
 107         _rtld_add_paths(path, &_rtld_default_paths,
 108             RTLD_DEFAULT_LIBRARY_PATH "/" RTLD_ARCH_SUBDIR);
 109 #endif
 110         _rtld_add_paths(path, &_rtld_default_paths, RTLD_DEFAULT_LIBRARY_PATH);
 111
 112         _rtld_paths = NULL;
 113         _rtld_trust = (st.st_mode & (S_ISUID | S_ISGID)) == 0;
 114         if (_rtld_trust)
 115                 _rtld_add_paths(path, &_rtld_paths, getenv("LD_LIBRARY_PATH"));
 116
 117         _rtld_process_hints(path, &_rtld_paths, &_rtld_xforms, _PATH_LD_HINTS);
 118         _rtld_objmain = _rtld_map_object(xstrdup(path), fd, &st);
 119         if (_rtld_objmain == NULL)
 120                 return -1;
 121
 122         _rtld_objmain->path = xstrdup(path);
 123         _rtld_digest_dynamic(path, _rtld_objmain);
 124
 125         /* Link the main program into the list of objects. */
 126         *_rtld_objtail = _rtld_objmain;
 127         _rtld_objtail = &_rtld_objmain->next;
 128         ++_rtld_objmain->refcount;
 129
 130         (void) _rtld_load_needed_objects(_rtld_objmain, 0);
 131
 132         if (fmt1 == NULL)
 133                 printf("%s:\n", _rtld_objmain->path);
 134         main_local = path;
 135         main_progname = _rtld_objmain->path;
 136         print_needed(_rtld_objmain, fmt1, fmt2);
 137
 138         while (_rtld_objlist != NULL) {
 139                 Obj_Entry *obj = _rtld_objlist;
 140                 _rtld_objlist = obj->next;
 141                 while (obj->rpaths != NULL) {
 142                         const Search_Path *rpath = obj->rpaths;
 143                         obj->rpaths = rpath->sp_next;
 144                         xfree(__UNCONST(rpath->sp_path));
 145                         xfree(__UNCONST(rpath));
 146                 }
 147                 while (obj->needed != NULL) {
 148                         const Needed_Entry *needed = obj->needed;
 149                         obj->needed = needed->next;
 150                         xfree(__UNCONST(needed));
 151                 }
 152                 (void) munmap(obj->mapbase, obj->mapsize);
 153                 xfree(obj->path);
 154                 xfree(obj);
 155         }
 156
 157         _rtld_objmain = NULL;
 158         _rtld_objtail = &_rtld_objlist;
 159         /* Need to free _rtld_paths? */
 160
 161         return 0;
 162 }