usr.bin/ldd/ldd_elfxx.c

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