Home | History | Annotate | Line # | Download | only in ldd
ldd_elfxx.c revision 1.2
      1 /*	$NetBSD: ldd_elfxx.c,v 1.2 2009/02/03 03:01:02 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 (at) 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.2 2009/02/03 03:01:02 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 <a.out.h>
     73 #include <dirent.h>
     74 #include <err.h>
     75 #include <errno.h>
     76 #include <fcntl.h>
     77 #include <stdarg.h>
     78 #include <stdio.h>
     79 #include <stdlib.h>
     80 #include <string.h>
     81 #include <unistd.h>
     82 #include <ctype.h>
     83 
     84 #include "debug.h"
     85 #include "rtld.h"
     86 #include "ldd.h"
     87 
     88 /*
     89  * elfxx_ldd() - bit-size independant ELF ldd implementation.
     90  * returns 0 on success and -1 on failure.
     91  */
     92 int
     93 ELFNAME(ldd)(int fd, char *path, char *fmt1, char *fmt2)
     94 {
     95 	struct stat st;
     96 
     97 	if (lseek(fd, 0, SEEK_SET) < 0 ||
     98 	    fstat(fd, &st) < 0) {
     99 		_rtld_error("%s: %s", path, strerror(errno));
    100 		return -1;
    101 	}
    102 
    103 	_rtld_pagesz = sysconf(_SC_PAGESIZE);
    104 
    105 #ifdef RTLD_ARCH_SUBDIR
    106 	_rtld_add_paths(path, &_rtld_default_paths,
    107 	    RTLD_DEFAULT_LIBRARY_PATH "/" RTLD_ARCH_SUBDIR);
    108 #endif
    109 	_rtld_add_paths(path, &_rtld_default_paths, RTLD_DEFAULT_LIBRARY_PATH);
    110 
    111 	_rtld_paths = NULL;
    112 	_rtld_trust = (st.st_mode & (S_ISUID | S_ISGID)) == 0;
    113 	if (_rtld_trust)
    114 		_rtld_add_paths(path, &_rtld_paths, getenv("LD_LIBRARY_PATH"));
    115 
    116 	_rtld_process_hints(path, &_rtld_paths, &_rtld_xforms, _PATH_LD_HINTS);
    117 	_rtld_objmain = _rtld_map_object(xstrdup(path), fd, &st);
    118 	if (_rtld_objmain == NULL)
    119 		return -1;
    120 
    121 	_rtld_objmain->path = xstrdup(path);
    122 	_rtld_digest_dynamic(path, _rtld_objmain);
    123 
    124 	/* Link the main program into the list of objects. */
    125 	*_rtld_objtail = _rtld_objmain;
    126 	_rtld_objtail = &_rtld_objmain->next;
    127 	++_rtld_objmain->refcount;
    128 
    129 	(void) _rtld_load_needed_objects(_rtld_objmain, 0);
    130 
    131 	if (fmt1 == NULL)
    132 		printf("%s:\n", _rtld_objmain->path);
    133 	main_local = path;
    134 	main_progname = _rtld_objmain->path;
    135 	print_needed(_rtld_objmain, fmt1, fmt2);
    136 
    137 	while (_rtld_objlist != NULL) {
    138 		Obj_Entry *obj = _rtld_objlist;
    139 		_rtld_objlist = obj->next;
    140 		while (obj->rpaths != NULL) {
    141 			const Search_Path *rpath = obj->rpaths;
    142 			obj->rpaths = rpath->sp_next;
    143 			xfree(__UNCONST(rpath->sp_path));
    144 			xfree(__UNCONST(rpath));
    145 		}
    146 		while (obj->needed != NULL) {
    147 			const Needed_Entry *needed = obj->needed;
    148 			obj->needed = needed->next;
    149 			xfree(__UNCONST(needed));
    150 		}
    151 		(void) munmap(obj->mapbase, obj->mapsize);
    152 		xfree(obj->path);
    153 		xfree(obj);
    154 	}
    155 
    156 	_rtld_objmain = NULL;
    157 	_rtld_objtail = &_rtld_objlist;
    158 	/* Need to free _rtld_paths? */
    159 
    160 	return 0;
    161 }
    162