diff options
| author | Eric Andersen <andersen@codepoet.org> | 2004-07-20 11:43:54 +0000 |
|---|---|---|
| committer | Eric Andersen <andersen@codepoet.org> | 2004-07-20 11:43:54 +0000 |
| commit | ae5d1e62537d415ef375a1b6484c70a6fd270428 (patch) | |
| tree | 3d8b961439b344cf2e674100eb90b57137efcb75 /sources | |
| parent | bd66295fa1c58b4f0e55eb4c484c3916607c5d91 (diff) | |
Remove the unnecessary USE_UCLIBC_LDSO_0_9_24 option
Diffstat (limited to 'sources')
| -rw-r--r-- | sources/uClibc-ldso-0.9.24.patch | 11861 |
1 files changed, 0 insertions, 11861 deletions
diff --git a/sources/uClibc-ldso-0.9.24.patch b/sources/uClibc-ldso-0.9.24.patch deleted file mode 100644 index ee65aa193..000000000 --- a/sources/uClibc-ldso-0.9.24.patch +++ /dev/null @@ -1,11861 +0,0 @@ -diff -urN uClibc/ldso-0.9.24/COPYRIGHT uClibc.ldso.24/ldso-0.9.24/COPYRIGHT ---- uClibc/ldso-0.9.24/COPYRIGHT 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/COPYRIGHT 2001-04-23 12:43:53.000000000 -0500 -@@ -0,0 +1,49 @@ -+/* -+ * Copyright (c) 1994-2000 Eric Youngdale, Peter MacDonald, David Engel, -+ * Hongjiu Lu and Mitch D'Souza -+ * -+ * 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. The name of the above contributors may not be -+ * used to endorse or promote products derived from this software -+ * without specific prior written permission. -+ * -+ * THIS SOFTWARE IS PROVIDED BY THE 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 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. -+ */ -+ -+/* Notice of general intent: -+ * -+ * The linux operating system generally contains large amounts of code -+ * that fall under the GNU General Public License, or GPL for short. -+ * This file contains source code that by it's very nature would always -+ * be linked with an application program, and because of this a GPL -+ * type of copyright on this file would place restrictions upon the -+ * distribution of binary-only commercial software. Since the goal of -+ * the Linux project as a whole is not to discourage the development and -+ * distribution of commercial software for Linux, this file has been -+ * placed under a more relaxed BSD-style of copyright. -+ * -+ * It is the general understanding of the above contributors that a -+ * program executable linked to a library containing code that falls -+ * under the GPL or GLPL style of license is not subject to the terms of -+ * the GPL or GLPL license if the program executable(s) that are supplied -+ * are linked to a shared library form of the GPL or GLPL library, and as -+ * long as the form of the shared library is such that it is possible for -+ * the end user to modify and rebuild the library and use it in -+ * conjunction with the program executable. -+ */ -diff -urN uClibc/ldso-0.9.24/Makefile uClibc.ldso.24/ldso-0.9.24/Makefile ---- uClibc/ldso-0.9.24/Makefile 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/Makefile 2003-11-06 16:38:45.000000000 -0600 -@@ -0,0 +1,52 @@ -+# Makefile for uClibc -+# -+# Copyright (C) 2000,2001 Erik Andersen <andersen@uclibc.org> -+# -+# This program is free software; you can redistribute it and/or modify it under -+# the terms of the GNU Library General Public License as published by the Free -+# Software Foundation; either version 2 of the License, or (at your option) any -+# later version. -+# -+# This program is distributed in the hope that it will be useful, but WITHOUT -+# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS -+# FOR A PARTICULAR PURPOSE. See the GNU Library General Public License for more -+# details. -+# -+# You should have received a copy of the GNU Library General Public License -+# along with this program; if not, write to the Free Software Foundation, Inc., -+# 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA -+# -+# Derived in part from the Linux-8086 C library, the GNU C Library, and several -+# other sundry sources. Files within this library are copyright by their -+# respective copyright holders. -+ -+TOPDIR=../ -+include $(TOPDIR)Rules.mak -+ -+ALL_SUBDIRS = ldso libdl -+ -+ -+all: headers -+ifeq ($(strip $(BUILD_UCLIBC_LDSO)),y) -+ $(MAKE) -C ldso; -+else -+ echo "Not building ld-uClibc" -+endif -+ -+shared: -+ifeq ($(strip $(BUILD_UCLIBC_LDSO)),y) -+ $(MAKE) -C libdl; -+else -+ echo "Not building libdl" -+endif -+ -+headers: -+ $(LN) -fs $(TOPDIR)../include/elf.h include/ -+ $(LN) -fs ../ldso/$(TARGET_ARCH)/boot1_arch.h include/ -+ $(LN) -fs ../ldso/$(TARGET_ARCH)/ld_syscalls.h include/ -+ $(LN) -fs ../ldso/$(TARGET_ARCH)/ld_sysdep.h include/ -+ -+clean: -+ set -e ; for d in $(ALL_SUBDIRS) ; do $(MAKE) -C $$d $@ ; done -+ -find . -name '*~' | xargs $(RM) -+ $(RM) include/elf.h include/boot1_arch.h include/ld_syscalls.h include/ld_sysdep.h -diff -urN uClibc/ldso-0.9.24/README uClibc.ldso.24/ldso-0.9.24/README ---- uClibc/ldso-0.9.24/README 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/README 2001-05-31 16:23:20.000000000 -0500 -@@ -0,0 +1,841 @@ -+ -+Apr 20, 2001 -- Manuel Novoa III -+ -+Inital port for uClibc from debian ld.so_1.9.11-9.tar.gz. -+ -+Removed a.out support. -+ -+****************** original ld.so.lsm file ************************** -+Begin3 -+Title: Linux shared, dynamic linker and utilities. -+Version: 1.9.11 -+Entered-date: 01MAY99 -+Description: This package contains ld.so, ld-linux.so, ldconfig, -+ ldd and libdl. -+Keywords: dynamic linker, shared library, ld.so, ld-linux.so, -+ ldconfig, ldd, libdl -+Author: david@ods.com (David Engel) -+Maintained-by: david@ods.com (David Engel) -+Primary-site: tsx-11.mit.edu /pub/linux/packages/GCC -+ ld.so-1.9.11.tar.gz -+Alternate-site: sunsite.unc.edu /pub/Linux/GCC -+ ld.so-1.9.11.tar.gz -+Platform: Linux 2.0.0 or later. -+Copying-policy: Copyrighted but freely distributable. -+End -+********************************************************************* -+ Original README starts here -+********************************************************************* -+ -+This package contains my ELF dynamic linkers (ld-linux.so.1), dynamic -+linker library (libdl.so.1) and utilities (ldconfig and ldd) for Linux. -+ -+You need Linux kernel 2.0.0 or later with ELF support compiled in -+(i.e. not loaded as a module) to use this package. -+ -+The dynamic linker is used to bootstrap programs and load shared -+libraries at startup. The dynamic linker library is used to -+dynamically load shared libraries after a program is running. -+Ldconfig is used to automatically update the symbolic links to shared -+libraries and build the cache file used by the dynamic linker. Ldd is -+used to list the shared libraries used by a program. -+ -+Please see the included manual pages for further details. -+ -+To install, simply run "sh instldso.sh" as root. Ready-to-go versions -+of all end-products are provided so nothing should need to be compiled -+or linked. If you are still using libc5 as your primary development -+library, you should use the "--devfiles" option when running -+instldso.sh to install the file needed to compile with libdl. -+ -+ELF versions of gcc, binutils and libc are now required to compile -+everything, including the old, unsupported, a.out dynamic linker. -+Finally, an optimization level of O2 or higher must be used to compile -+ld-linux.so and libdl.so due the use of inline functions. -+ -+Notable contributors to this package include Eric Youngdale, Peter -+MacDonald, Hongjiu Lu, Linus Torvalds, Lars Wirzenius, Mitch D'Souza, -+Rik Faith, Andreas Schwab and Adam Richter (not necessarily in that -+order). -+ -+###################### IMPORTANT NOTICES ############################# -+ -+A.OUT SUPPORT: -+ -+As of ld.so-1.9.0, the old, a.out dynamic loader is no longer -+officially supported. The code is still included and built, but I -+make no promises that it will work. I will accept patches for it, -+but they will not be tested by me. -+ -+GLIBC (AKA LIBC6) SUPPORT: -+ -+As of ld.so-1.9.0, the main focus of this package is to ease the -+transition to libc6. No significant, new features are expected to be -+added. If you need new features, switch to libc6. -+ -+Except for libpthread.so, the sonames of the core libraries provided -+with libc6 have been chosen so they do not conflict with those -+provided by libc5 and ld.so. However, the current plan is not use -+new, nonconflicting sonames for other libraries such as ncurses and -+X11. This presents two problems. First, libraries using the same -+soname for both libc5 and libc6 can not be placed in the same -+directory. Second, the dynamic linkers need to make sure not to load -+a library for the wrong version of libc. -+ -+The first problem is easy. Just move the old, libc5-based libraries -+to new directories (e.g. /lib/libc5-compat, /usr/lib/libc5-compat, -+etc.) and add those directories to /etc/ld.so.conf. Then install the -+new, libc6-based versions in the standard places. -+ -+The second problem is more difficult. Ideally, the dynamic linkers -+would be changed to perform a complete dependency analysis on every -+library to be loaded to make sure the wrong versions aren't used. -+This approach doesn't seem worth the added complexity, especially -+since we now have symbol versioning for ELF libraries. Instead a -+simpler approach will be used, at least initially. -+ -+Ldconfig has been modified to perform a (currently simple) dependency -+analysis on libraries and to store an indication in /etc/ld.so.cache -+of whether a library is for libc5, libc6 or an unknown libc. The -+dynamic linkers then only need to make a simple check at run-time to -+make sure they don't load the wrong version of a library. -+ -+The dynamic linker for libc5 provided in this package, has already -+been modified to use the new information in /etc/ld.so.cache. For -+glibc versions 2.0.1 and earlier, the dynamic linker for libc6 needs -+the patch contained in glibc.patch. You should apply the patch and -+rebuild glibc before using the new ldconfig. -+ -+As stated above, the dependency analysis currently done by ldconfig is -+rather simple. Basically, it looks for the sonames used by the -+various versions of libc, libm and libdl. For any approach using a -+dependency analysis such as this to work, it is very important that -+shared libraries be built with complete dependency information. This -+can be done by using the appropriate -l options when running 'gcc -+-shared'. For example, when building libfoo.so which depends on libc -+and libbar, you should add -lbar and -lc gcc command line. -+ -+###################################################################### -+ -+Changes in version 1.9.11: -+ -+ Fixed a bug in ld-linux.so where a reference to an -+ undefined symbol could cause a segfault. -+ -+ Added a clarification for LD_PRELOAD to the ld.so manual -+ page and added a symlink for ld-linux.so (Bug#33123). -+ -+ Don't install ldd for Debian except for the m68k arch -+ because glibc 2.1 now includes it (Bug#35458). -+ -+Changes in version 1.9.10: -+ -+ Changed ldconfig to issue a warning and not overwrite a -+ regular file with a symlink (Bug#30859). -+ -+ Changed Debian packaging to conflict with and replace the -+ ldconfig package (Bug#29398). -+ -+Changes in version 1.9.9: -+ -+ Changed ld-linux.so and libdl.so to match glibc by not -+ allowing user preloads of system libraries into setu/gid -+ binaries unless the library itself is setuid. -+ -+ Fixed problems in ld-linux.so on the sparc architecture -+ (Juan Cespedes). -+ -+Changes in version 1.9.8: -+ -+ Changed ldconfig to allow the expected type for all -+ libraries in a directory to be optionally specified -+ (Mark Phillips). See the ldconfig man page. -+ -+ Changed ldconfig to use the same type names used in the -+ change above when the -p option is used. -+ -+Changes in version 1.9.7: -+ -+ Changed ldd for m68k to use /lib/ld.so.1 instead of -+ /lib/ld-linux.so.2. -+ -+ Added support for dladdr to libdl.so (Eduard Gode). -+ -+ Fixed a small memory leak in libdl.so (Richard Garnish). -+ -+ Fixed a bug in ldconfig when the -l option was used on a -+ filename without a '/' in it. -+ -+ Updated the man pages (Bug#6404, Bug#9721, Bug#10652, -+ Bug#13494 and Bug#14127). They could still use some work. -+ -+ No longer install the info page since it's way out of date. -+ -+ Fixed minor Debian packaging problems (Bug#13160, -+ Bug#15577 and Bug#19345). -+ -+Changes in version 1.9.6: -+ -+ Changed ldd to not use the glibc dynamic linker when run -+ on a libc5-based shared library. -+ -+ Added a -q option to ldconfig which causes warnings not -+ to be printed (Bob Tinsley). -+ -+ Dropped support for the Debian libdl1-dev package. -+ -+ Changed ld-linux.so to be compilable with gcc 2.8.0 (Sven -+ Verdoolaege) -+ -+Changes in version 1.9.5: -+ -+ Fixed a bug in ldd where ld-linux.so.2 was not called -+ correctly when run on shared libraries. -+ -+ Fixed a problem in the previous version where some -+ Makefiles were not architecture independent. -+ -+Changes in version 1.9.4: -+ -+ Fixed a bug in ld.so introduced in the previous version -+ which broke preloads. -+ -+ Turned a.out support back on by default, at least for the -+ time being. There are no promises to keep it. -+ -+Changes in version 1.9.3: -+ -+ Fixed buffer overflow bugs in ld-linux.so and ld.so. -+ -+ Changed the README file a little to clarify a couple of -+ things. -+ -+ Changed ldconfig to chroot to the specified directory when -+ the new -r option is used (Bob Tinsley). -+ -+Changes in version 1.9.2: -+ -+ Removed /usr/local/lib from the default /etc/ld.so.conf -+ for Debian (Bug#8181). -+ -+ Changed ldconfig to be 64-bit clean (H.J. Lu). -+ -+Changes in version 1.9.1: -+ -+ Changed ldconfig to try to determine which libc a -+ library is for even if it doesn't have an soname. -+ -+ Fixed a bug in ldconfig where an older library using -+ the glibc naming convention would be used instead of -+ a newer library. -+ -+ Changed to ld-linux.so and libdl.so to not require the -+ libc5 headers in order to compile. -+ -+ Changed ldconfig and ldd to be compilable with either -+ libc5 or libc6. -+ -+Changes in version 1.9.0: -+ -+ Changed to not build the old, a.out dynamic loader by -+ default. -+ -+ Changed instldso.sh to require the --force option to -+ make sure users read the README file. -+ -+ Changed instldso.sh to not install the libdl.so -+ development files unless the --devfiles option is used. -+ -+ Changed instldso.sh to not strip binaries and libraries -+ if the --no-strip option is used. -+ -+ Changed the Debian packaging to put the development files -+ which conflict with glibc in a new libdl1-dev package. -+ -+ Changed ldd to use the glibc dynamic linker, if it is -+ available, when run on a shared library. -+ -+ Changed ld-linux.so to print the load addresses of -+ libraries, ala glibc, when run by ldd. -+ -+ Changed ld-linux.so to allow the libraries listed in -+ LD_PRELOAD to be separated by white space in addition to -+ colons. -+ -+ Changed ld-linux.so to load the libraries listed in -+ LD_PRELOAD for setu/gid programs as long as they can be -+ loaded securely. -+ -+ Changed ldconfig to update the symlinks for the dynamic -+ linkers. -+ -+ Changed ldconfig to try to determine if an ELF library is -+ intended for libc5 or libc6 and save the infomation in the -+ cache. The mechanism used is rather simplistic and may -+ need to be enhanced. -+ -+ Changed ldconfig to print the type of ELF library when -+ printing the cache. -+ -+ Changed ld-linux.so to only load ELF shared libraries for -+ use with libc5 or an unknown libc. -+ -+Changes in version 1.8.10: -+ -+ Fixed a bug in ldconfig where a symlink could be used -+ instead of a regular file. -+ -+ Fixed a Debian packaging problem for the sparc -+ architecture. -+ -+Changes in version 1.8.9: -+ -+ Changed ldconfig to only cache the symlinks it creates. -+ This make the behavior of the dynamic linkers consistent -+ with how they would behave if a cache was not used. -+ -+ Changed ldconfig to cache the symlinks that it finds but -+ use the name of the symlink as the soname instead of the -+ actual soname. -+ -+Changes in version 1.8.8: -+ -+ Minor documentation updates to reflect recent changes. -+ -+ Changed ld.so and ld-linux.so to perform more complete -+ validation on ld.so.cache before using it. -+ -+ Changed ldconfig to accept libraries with inconsistent -+ sonames since glibc is going to use them. A warning is -+ still printed in debug mode. -+ -+ Changed the install script to not strip _dl_debug_state -+ from ld-linux.so since gdb needs it. -+ -+ More sparc fixes (Derrick Brashear). -+ -+ Changed ldconfig to not issue a warning when a linker -+ script disguised as a shared library is found. -+ -+ Fixed a bug in ld-linux.so where some registers were -+ not preserved on the first call to a function causing -+ problems for non-C-like languages (Tim Renouf). -+ -+ Fixed a bug in ld-linux.so where global variables were -+ not always mapped correctly across dynamically loaded -+ libraries (Mikihiko Nakao). -+ -+ Converted to new Debian source packaging format (Shaya -+ Potter). -+ -+Changes in version 1.8.6/7: -+ -+ Never released as some unofficial patches used these -+ version numbers. -+ -+Changes in version 1.8.5: -+ -+ Fixed a bug in ld.so introduced in the previous changes. -+ -+Changes in version 1.8.4: -+ -+ Changed ldconfig to completely ignore symbolic links. -+ -+ Changed ldconfig to issue the warning concerning an -+ inconsistent soname in non-verbose mode. -+ -+ Changed ld-linux.so back to not keep ld.so.cache mapped -+ at all times. -+ -+ Changed Debian packaging to compress man pages, strip all -+ binaries (Bug#5125) and include a shlibs file. -+ -+Changes in version 1.8.3: -+ -+ Changed ld-linux.so to process LD_PRELOAD before -+ /etc/ld.so.preload. -+ -+ Fixed a Debian packaging problem where libdl might not -+ be available if other packages were upgraded at the same -+ time (Debian Bug#4728). -+ -+ Changed ldd to always exit with status 1 if any errors -+ occur (Debian Bug#4188). -+ -+ Fixed some minor problems in instldso.sh (Mike Castle and -+ Wolfgang Franke). -+ -+ Changed ldconfig to issue a warning in verbose mode when -+ skipping a library because the soname doesn't match. -+ -+ More sparc fixes (Miguel de Icaza). -+ -+ Don't link with -N when building ld.so (Alan Modra). -+ -+ Changed ld-linux.so to better support position-dependant -+ libraries (NIIBE Yutaka). -+ -+Changes in version 1.8.2: -+ -+ Added a texinfo file for ld.so and libdl (Michael -+ Deutschmann). -+ -+ Minor sparc and installation changes (Elliot Lee). -+ -+ Added multiple architecture support for Debian (Leland -+ Lucius). -+ -+ Changed libdl to better support RTLD_NEXT (Eric -+ Youngdale). Note: the exact meaning of ETLD_NEXT is -+ still not clear in all cases. -+ -+ Removed some libc dependencies from libdl. Still need -+ to remove malloc and free. -+ -+Changes in version 1.8.1: -+ -+ Changed ld.so to be compiled as ELF. This also means -+ that ELF support is now required. A.out support is -+ still optional. -+ -+ Changed ld-linux.so and libdl.so to use the rpath in the -+ executable instead of in the invoking shared library. -+ -+ More m68k fixes (Andreas Schwab). -+ -+ Various sparc fixes (Miguel de Icaza). -+ -+ Changed ldcnnfig to ignore libraries ending in '~'. -+ -+ Changed ldconfig to allow alternative conf and cache -+ files to be specified on the command-line. -+ -+ Changed libdl.so to work when dlsym is passed a NULL -+ handle pointer. -+ -+Changes in version 1.8.0: -+ -+ Changed ld-linux.so to be more liberal when checking to -+ see if a library is already loaded. This should avoid -+ the duplicate loading problem for programs linkeed with -+ the -rpath option. -+ -+ Various m68k fixes (Andreas Schwab). -+ -+ Changed ld.so to only use LD_AOUT_LIBRARY_PATH and -+ LD_AOUT_PRELOAD and ld-linux.so to only use -+ LD_LIBRARY_PATH and LD_PRELOAD. LD_ELF_LIBRARY_PATH -+ and LD_ELF_PRELOAD are no longer supported. -+ -+ Changed ld-linux.so to allow debugging of shared and -+ dynamically loaded libraries (H.J. Lu, Andreas Schwab). -+ -+ Changed ld-linux.so to preload ELF shared libraries -+ listed in /etc/ld.so.preload. This allows secure -+ preloads, even for setuid/setgid programs. -+ -+ Changed ld-linux.so to keep ld.so.cache mapped at all -+ times. -+ -+ Changed ldconfig to allow #-style comments in ld.so.conf. -+ -+ Removed various compiler warnings (Richard Sladkey and -+ David Engel). -+ -+ Changed ldd to work on ELF shared libraries. This may -+ need a little more work. -+ -+Changes in version 1.7.14: -+ -+ Changed ldconfig to recognize ELF shared libraries -+ generated by post-2.6 versions of ld (Andreas Schwab). -+ -+ Changed ldconfig to not remove stale links that do not -+ have a version number since they may be needed by ld. -+ -+Changes in version 1.7.13: -+ -+ Fixed a problem in ld-linux.so where a program linked -+ with a shared library that was not used could result in -+ a segmentation fault (H.J. Lu). -+ -+Changes in version 1.7.12: -+ -+ Fixed a problem in libdl.so where the wrong library -+ could be marked as global when RTLD_GLOBAL was used -+ (Lars Heete). -+ -+ Installed dlfcn.h with libdl.so instead of requiring -+ it to be supplied with libc. -+ -+ Removed support for libldso.a since it was nearly -+ impossible to use anyway. -+ -+ Changed ldd to detect when the program being checked -+ exited abnormally. -+ -+Changes in version 1.7.11: -+ -+ Changed ld.so and ld-linux.so to delete all variations -+ of LD_PRELOAD and LD_LIBRARY_PATH for set[ug]id programs, -+ This makes it harder for broken set[ug]id programs to be -+ compromised. -+ -+ Fixed a problem in libdl.so where dlsym would not accept -+ the handle returned from dlopen(0, *). -+ -+Changes in version 1.7.10: -+ -+ Changed ld-linux.so and libdl.so to support RTLD_GLOBAL -+ (Eric Youngdale). -+ -+Changes in version 1.7.9: -+ -+ Fixed a problem in ld-linux.so in detecting when the -+ new user/group information is provided by the kernel. -+ -+ Fixed a problem in ld-linux.so where a buffer could be -+ overflowed if a large number of libraries were loaded -+ (Thomas Moore). -+ -+Changes in version 1.7.8: -+ -+ Changed the Makefiles and install scripts to support -+ a.out- and ELF-only configurations. -+ -+ Changed ld-linux.so to use the user/group information -+ provided by linux 1.3.23+ instead of making syscalls -+ to get it. -+ -+ Changed libdl.so to support RTLD_NEXT (Glenn Fowler). -+ -+ Changed libdl.so to only execute the fini sections -+ instead of completely closing libraries at exit (Glenn -+ Fowler). -+ -+ Changed ld.so and ld-linux.so to print the required -+ cache version when a mismatch is detected. -+ -+ Changed ld-linux.so to not require on /dev/zero (Ralph -+ Loader). -+ -+ Minor m68k cleanups (Andreas Schwab). -+ -+Changes in version 1.7.7: -+ -+ Fixed problems compiling with recent 1.3.x kernels. -+ -+ Changed ld-linux.so to not use MAP_DENYWRITE until the -+ permission issue regarding it is resolved. -+ -+Changes in version 1.7.6: -+ -+ Fixed a bug in ld-linux.so dealing with a zero-length -+ LD_{ELF_}PRELOAD. -+ -+ Changed ld.so and ld-linux.so to truncate all variations -+ of LD_PRELOAD and LD_LIBRARY_PATH for set[ug]id programs. -+ -+Changes in version 1.7.5: -+ -+ Changed ldconfig to recognize libraries without any -+ version number (eg. libXYZ.so). -+ -+ Changed ldconfig to not generate a corrupt cache when -+ the disk is full or other write errors occur. -+ -+ Changed ld-linux.so to map files with MAP_DENYWRITE to -+ keep them from being changed while the file is in use -+ (Rick Sladkey). -+ -+ Changed libdl to not overwrite the scope pointer of a -+ library if it was already loaded (H.J. Lu). -+ -+ Changed ld-linux.so so gdb can be used on constructors -+ (Eric Youngdale). -+ -+ Changed ldconfig to ignore ELF libraries where the soname -+ does not match the file name on the assumption that it is -+ a used at compile-time (eg. libcurses.so -> libncruses.so). -+ -+Changes in version 1.7.4: -+ -+ Changed ld-linux.so and libdl to use the appropriate -+ rpaths when searching for shared libraries (Eric -+ Youngdale). -+ -+ Changed ld-linux.so to search rpath before using the -+ cache. This more closely conforms to the IBCS standard. -+ -+Changes in version 1.7.3: -+ -+ Changed ld-linux.so to only print a library name the -+ first time it is loaded when run from ldd. -+ -+ Fixed a bug in ldconfig where an invalid cache could be -+ generated if a directory was specified multiple times in -+ ld.so.conf. -+ -+ Changed ld-linux.so so it will return the address of a -+ weak symbol when called from dlsym in libdl (Eric -+ Youngdale. -+ -+Changes in version 1.7.2: -+ -+ Changed libdl.so again to fix the undefined foobar -+ problem. -+ -+Changes in version 1.7.1: -+ -+ Changed libdl so it will compile at optimization level -+ O3 or higher. -+ -+ Changed ldconfig to always create the cache file with -+ mode 644. -+ -+ Changed ldconfig to not ingore valid symlinks. -+ -+ Changed ldconfig to use the library name as the soname -+ for ELF libraries that do not have an soname entry. -+ -+ Changed ld-linux.so to print the actual, requested library -+ name at the time it is loaded instead of trying to figure -+ it out after the fact. -+ -+Changes in version 1.7.0: -+ -+ Changed ldconfig to read the actual soname from the image -+ for ELF libraries and make it available to ld-linux.so. -+ The soname for DLL libraries is still determined by -+ truncating the minor numbers from the image file name. -+ -+ Changed ldconfig to no longer support the undocumented -+ sort options. -+ -+ Changed ld.so to require a valid cache to find libraries -+ in directories specified in ld.so.conf. /usr/lib and /lib -+ are still searched as a last resort. Ld-linux.so already -+ operated this way. -+ -+ Fixed a bug in libldso.a where the arguments to -+ shared_loader were not parsed correctly (Wolfram Gloger). -+ -+ Added support for RELA-style relocations under Linux/68k -+ (Andreas Schwab). -+ -+ Changed ld-linux.so to only map the cache once for all -+ libraries instead of individually for each library. -+ -+ Changed ld-linux.so continue searching the cache instead of -+ giving up when failing to load the first entry found. -+ -+ Changed ld-linux.so to produce output similar to ld.so when -+ run from ldd or when errors occur. -+ -+Changes in version 1.6.7: -+ -+ Changed the install scripts to make sure that ld.so and -+ ld-linux.so are always usable. -+ -+ Added support for Linux/Sparc (Eric Youngdale). -+ -+ Added support for Linux/68k (Andreas Schwab). -+ -+ Fixed various bugs in ld-linux.so dealing with closing -+ files, unmapping memory, dereferencing NULL pointers and -+ printing library names (David Engel, Eric Youngdale and -+ Andreas Schwab). -+ -+ Replaced the manual page for libdl with a freely -+ distributable one (Adam Richter). -+ -+ Fixed a bug in ld-linux.so where LD_LIBRARY_PATH and -+ LD_PRELOAD were not cleared for setuid/setgid programs. -+ -+ Fixed a bug in libdl where dlsym would not return the -+ correct address of a symbol if it was redefined in another -+ library (Oleg Kibirev). -+ -+ Changed ld-linux.so to use the following order to search -+ for libraries: LD_{ELF_}LIBRARY_PATH, ld.so.cache, rpath, -+ /usr/lib and /lib. -+ -+ Changed ld-linux.so to not needlessly allocate memory when -+ using ld.so.cache. -+ -+Changes in version 1.6.6: -+ -+ Changed ldconfig to not warn about removing stale links -+ unless the -v option is specified. -+ -+ Added manual pages for libdl (from FreeBSD/Sun) -+ -+ Fixed a bug in ld.so dealing with preloading of objects -+ generated by recent versions of ld (Mitch D'Souza). -+ -+ Fixed bugs in ldd where some errors were either not -+ detected or not printed. -+ -+ Fixed a bug in ld-linux.so where the trailing nul in a -+ library name was not being copied (Owen Taylor). -+ -+Changes in version 1.6.5: -+ -+ Changed ldconfig to remove stale symbolic links. -+ -+ Added debug hooks in ld-linux.so and libdl.so to be used -+ by a future version of gdb (Eric Youngdale). -+ -+Changes in version 1.6.4: -+ -+ Change ld-linux.so to print on stdout instead of stderr -+ when run from ldd. -+ -+ Added support for Debian GNU/Linux packaging. -+ -+Changes in version 1.6.3: -+ -+ Fixed a bug in libdl when closing a library (H.J. Lu). -+ -+Changes in version 1.6.2: -+ -+ Changed the error message printed by ldd when a file is -+ not a.out or ELF. It used to only list a.out formats. -+ -+ Changed ldconfig to no longer cache and set up links for -+ ld-linux.so. -+ -+ Changed ld-linux.so and libdl to not conflict with upcoming -+ changes in kernel header files. -+ -+ Changed ld-linux.so to not print preloaded libraries. -+ -+Changes in version 1.6.1: -+ -+ Updated the installation script. -+ -+ Changed ld.so and ld-linux.so to look for LD_AOUT_PRELOAD -+ and LD_ELF_PRELOAD, respectively, before LD_PRELOAD. -+ -+ Changed ld.so and ld-linux.so to use LD_AOUT_LIBRARY_PATH -+ and LD_ELF_LIBRARY_PATH, respectively, instead of -+ AOUT_LD_LIBRARY_PATH and ELF_LD_LIBRARY_PATH. -+ -+Changes in version 1.6.0: -+ -+ Changed ldconfig to process libraries which do not have -+ a minor version or patch level number. -+ -+ Incorporated ld-linux.so and libdl.so. -+ -+ Changed ld.so and ld-linux.so to not miss entries in the -+ cache when the fully qualified library is requested. -+ -+ Changed ldconfig to use stdout instead of stderr when -+ printing the cache. -+ -+Changes in version 1.5.3: -+ -+ LD_PRELOAD enhancements (Tristan Gigold). -+ -+ LD_PRELOAD patch for linux-68k (Andreas Schwab). -+ -+Changes in version 1.5.2: -+ -+ More ELF changes (Mitch D'Souza). -+ -+ Changed ldconfig to also update the link for ld-linux.so. -+ -+Changes in version 1.5.1: -+ -+ More ELF and LD_PRELOAD changes (Mitch D'Souza). -+ -+Changes in version 1.5.0: -+ -+ Chnaged all executables to QMAGIC (Mitch D'Souza and Rick -+ Sladkey). -+ -+ Added preliminary support for ELF to ldd and ldconfig (Eric -+ Youndale and H.J. Lu). -+ -+ Added support for LD_PRELOAD to ld.so (Mitch D'Souza). -+ -+ Removed the "advertising" clause from the copyright notices -+ in all source files. -+ -+Changes in version 1.4.4: -+ -+ Changed ldconfig to support QMAGIC libraries. -+ -+ Fixed a bug in ld.so where some of the error messages had -+ transposed arguments. -+ -+Changes in version 1.4.3: -+ -+ Fixed an obscure bug in ld.so where an index was not being -+ incremented when a library was not found using the cache. -+ -+Changes in version 1.4.2: -+ -+ Changed ldconfig to issue a warning and continue instead -+ of an error and exiting when a link can't be updated. -+ This is useful when some libraries are imported on read- -+ only file systems, such as an NFS mounted /usr. -+ -+ Changed ld.so to be more robust in searching for libraries. -+ A library is not considered found unless it can actually be -+ loaded. If a library is not found using the cache, the -+ standard directories are searched as in pre-cache versions. -+ -+Changes in version 1.4.1: -+ -+ Fixed minor Makefile problems. -+ -+ Added support for linux-68k. -+ -+ Fixed a bug in ld.so where libraries with absolute paths -+ were not handled correctly. -+ -+ Changed ld.so to ignore the directory in the names of -+ shared libraries by default. This allows older libraries -+ with absolute paths, such as the XView libraries, to take -+ advantage of the cache support. -+ -+ Added a minimal usage message to ldconfig. -+ -+Changes in version 1.4: -+ -+ Fixed bug in ld.so where minor version numbers were not -+ reported correctly when a minor version incompatibility -+ was found. -+ -+ Fixed bug in ldconfig where libraries with subversion -+ numbers greater than 9 were not compared correctly. -+ -+ Added Mitch D'Souza's support for suppressing warning -+ messages from ld.so about minor version incompatibilities. -+ -+ Added Mitch D'Souza's support for using a cache to speed -+ up searching for libraries in the standard directories. -+ -+ Added Mitch D'Souza's support for a debugging version of -+ ld.so. Link with -lldso if you think you are experiencing -+ dynamic linker problems. -+ -+Changes in version 1.3: -+ -+ Added support for libraries using absolute pathnames. If I -+ had known that the XView libraries used them, I would have -+ added this earlier. -+ -+ Fixed a bug handling old libraries using a pathname beginning -+ with '/' or '/lib/'. -+ -+Changes in version 1.2a: -+ -+ Fixed a minor bug in ldd which caused all files, specifically -+ scripts, to be recognized as binaries. Thanks to Olaf Flebbe -+ for reporting it. -+ -+David Engel -+david@sw.ods.com -diff -urN uClibc/ldso-0.9.24/include/.cvsignore uClibc.ldso.24/ldso-0.9.24/include/.cvsignore ---- uClibc/ldso-0.9.24/include/.cvsignore 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/include/.cvsignore 2003-08-19 01:05:30.000000000 -0500 -@@ -0,0 +1,4 @@ -+elf.h -+ld_syscalls.h -+ld_sysdep.h -+boot1_arch.h -diff -urN uClibc/ldso-0.9.24/include/dlfcn.h uClibc.ldso.24/ldso-0.9.24/include/dlfcn.h ---- uClibc/ldso-0.9.24/include/dlfcn.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/include/dlfcn.h 2003-08-19 01:05:30.000000000 -0500 -@@ -0,0 +1,22 @@ -+/* User functions for run-time dynamic loading. libdl version */ -+#ifndef _DLFCN_H -+#define _DLFCN_H 1 -+ -+#include <features.h> -+#include <bits/dlfcn.h> -+ -+#define RTLD_NEXT ((void *) -1l) -+#define RTLD_DEFAULT ((void *) 0) -+ -+/* Structure containing information about object searched using -+ `dladdr'. */ -+typedef struct -+{ -+ __const char *dli_fname; /* File name of defining object. */ -+ void *dli_fbase; /* Load address of that object. */ -+ __const char *dli_sname; /* Name of nearest symbol. */ -+ void *dli_saddr; /* Exact value of nearest symbol. */ -+} Dl_info; -+ -+ -+#endif /* dlfcn.h */ -diff -urN uClibc/ldso-0.9.24/include/ld_elf.h uClibc.ldso.24/ldso-0.9.24/include/ld_elf.h ---- uClibc/ldso-0.9.24/include/ld_elf.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/include/ld_elf.h 2003-11-04 07:07:45.000000000 -0600 -@@ -0,0 +1,93 @@ -+#ifndef LINUXELF_H -+#define LINUXELF_H -+ -+#include <ld_sysdep.h> /* before elf.h to get ELF_USES_RELOCA right */ -+#include <elf.h> -+#include <link.h> -+ -+#ifdef DEBUG -+# define LDSO_CONF "../util/ld.so.conf" -+# define LDSO_CACHE "../util/ld.so.cache" -+# define LDSO_PRELOAD "../util/ld.so.preload" -+#else -+# define LDSO_CONF UCLIBC_RUNTIME_PREFIX "etc/ld.so.conf" -+# define LDSO_CACHE UCLIBC_RUNTIME_PREFIX "etc/ld.so.cache" -+# define LDSO_PRELOAD UCLIBC_RUNTIME_PREFIX "etc/ld.so.preload" -+#endif -+ -+ -+#define LIB_ANY -1 -+#define LIB_DLL 0 -+#define LIB_ELF 1 -+#define LIB_ELF64 0x80 -+#define LIB_ELF_LIBC5 2 -+#define LIB_ELF_LIBC6 3 -+#define LIB_ELF_LIBC0 4 -+ -+/* Forward declarations for stuff defined in ld_hash.h */ -+struct dyn_elf; -+struct elf_resolve; -+ -+ -+/* Definitions and prototypes for cache stuff */ -+#ifdef USE_CACHE -+extern int _dl_map_cache(void); -+extern int _dl_unmap_cache(void); -+ -+#define LDSO_CACHE_MAGIC "ld.so-" -+#define LDSO_CACHE_MAGIC_LEN (sizeof LDSO_CACHE_MAGIC -1) -+#define LDSO_CACHE_VER "1.7.0" -+#define LDSO_CACHE_VER_LEN (sizeof LDSO_CACHE_VER -1) -+ -+typedef struct { -+ char magic [LDSO_CACHE_MAGIC_LEN]; -+ char version [LDSO_CACHE_VER_LEN]; -+ int nlibs; -+} header_t; -+ -+typedef struct { -+ int flags; -+ int sooffset; -+ int liboffset; -+} libentry_t; -+ -+#else -+static inline void _dl_map_cache(void) { } -+static inline void _dl_unmap_cache(void) { } -+#endif -+ -+ -+/* Function prototypes for non-static stuff in readelflib1.c */ -+int _dl_copy_fixups(struct dyn_elf * tpnt); -+extern int _dl_parse_copy_information(struct dyn_elf *rpnt, -+ unsigned long rel_addr, unsigned long rel_size, int type); -+extern void _dl_parse_lazy_relocation_information(struct elf_resolve *tpnt, -+ unsigned long rel_addr, unsigned long rel_size, int type); -+extern int _dl_parse_relocation_information(struct elf_resolve *tpnt, -+ unsigned long rel_addr, unsigned long rel_size, int type); -+extern struct elf_resolve * _dl_load_shared_library(int secure, -+ struct dyn_elf **rpnt, struct elf_resolve *tpnt, char *full_libname); -+extern struct elf_resolve * _dl_load_elf_shared_library(int secure, -+ struct dyn_elf **rpnt, char *libname); -+extern struct elf_resolve *_dl_check_if_named_library_is_loaded(const char *full_libname); -+extern int _dl_linux_resolve(void); -+ -+ -+/* -+ * Datatype of a relocation on this platform -+ */ -+#ifdef ELF_USES_RELOCA -+# define ELF_RELOC ElfW(Rela) -+#else -+# define ELF_RELOC ElfW(Rel) -+#endif -+ -+ -+/* Convert between the Linux flags for page protections and the -+ ones specified in the ELF standard. */ -+#define LXFLAGS(X) ( (((X) & PF_R) ? PROT_READ : 0) | \ -+ (((X) & PF_W) ? PROT_WRITE : 0) | \ -+ (((X) & PF_X) ? PROT_EXEC : 0)) -+ -+ -+#endif /* LINUXELF_H */ -diff -urN uClibc/ldso-0.9.24/include/ld_hash.h uClibc.ldso.24/ldso-0.9.24/include/ld_hash.h ---- uClibc/ldso-0.9.24/include/ld_hash.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/include/ld_hash.h 2003-08-19 08:11:05.000000000 -0500 -@@ -0,0 +1,103 @@ -+#ifndef _LD_HASH_H_ -+#define _LD_HASH_H_ -+ -+#ifndef RTLD_NEXT -+#define RTLD_NEXT ((void*)-1) -+#endif -+ -+struct dyn_elf{ -+ unsigned long flags; -+ struct elf_resolve * dyn; -+ struct dyn_elf * next_handle; /* Used by dlopen et al. */ -+ struct dyn_elf * next; -+ struct dyn_elf * prev; -+}; -+ -+struct elf_resolve{ -+ /* These entries must be in this order to be compatible with the interface used -+ by gdb to obtain the list of symbols. */ -+ ElfW(Addr) loadaddr; /* Base address shared object is loaded at. */ -+ char *libname; /* Absolute file name object was found in. */ -+ ElfW(Dyn) *dynamic_addr; /* Dynamic section of the shared object. */ -+ struct elf_resolve * next; -+ struct elf_resolve * prev; -+ /* Nothing after this address is used by gdb. */ -+ enum {elf_lib, elf_executable,program_interpreter, loaded_file} libtype; -+ struct dyn_elf * symbol_scope; -+ unsigned short usage_count; -+ unsigned short int init_flag; -+ unsigned int nbucket; -+ unsigned long * elf_buckets; -+ /* -+ * These are only used with ELF style shared libraries -+ */ -+ unsigned long nchain; -+ unsigned long * chains; -+ unsigned long dynamic_info[24]; -+ -+ unsigned long dynamic_size; -+ unsigned long n_phent; -+ Elf32_Phdr * ppnt; -+ -+#if defined(__mips__) -+ /* Needed for MIPS relocation */ -+ unsigned long mips_gotsym; -+ unsigned long mips_local_gotno; -+ unsigned long mips_symtabno; -+#endif -+ -+#ifdef __powerpc__ -+ /* this is used to store the address of relocation data words, so -+ * we don't have to calculate it every time, which requires a divide */ -+ unsigned long data_words; -+#endif -+}; -+ -+#define COPY_RELOCS_DONE 1 -+#define RELOCS_DONE 2 -+#define JMP_RELOCS_DONE 4 -+#define INIT_FUNCS_CALLED 8 -+ -+extern struct dyn_elf * _dl_symbol_tables; -+extern struct elf_resolve * _dl_loaded_modules; -+extern struct dyn_elf * _dl_handles; -+ -+extern struct elf_resolve * _dl_check_hashed_files(const char * libname); -+extern struct elf_resolve * _dl_add_elf_hash_table(const char * libname, -+ char * loadaddr, unsigned long * dynamic_info, -+ unsigned long dynamic_addr, unsigned long dynamic_size); -+ -+enum caller_type{symbolrel=0,copyrel=1,resolver=2}; -+extern char * _dl_find_hash(const char * name, struct dyn_elf * rpnt1, -+ struct elf_resolve * f_tpnt, enum caller_type); -+ -+extern int _dl_linux_dynamic_link(void); -+ -+extern char * _dl_library_path; -+extern char * _dl_not_lazy; -+extern unsigned long _dl_elf_hash(const char * name); -+ -+static inline int _dl_symbol(char * name) -+{ -+ if(name[0] != '_' || name[1] != 'd' || name[2] != 'l' || name[3] != '_') -+ return 0; -+ return 1; -+} -+ -+ -+#define LD_ERROR_NOFILE 1 -+#define LD_ERROR_NOZERO 2 -+#define LD_ERROR_NOTELF 3 -+#define LD_ERROR_NOTMAGIC 4 -+#define LD_ERROR_NOTDYN 5 -+#define LD_ERROR_MMAP_FAILED 6 -+#define LD_ERROR_NODYNAMIC 7 -+#define LD_WRONG_RELOCS 8 -+#define LD_BAD_HANDLE 9 -+#define LD_NO_SYMBOL 10 -+ -+ -+ -+#endif /* _LD_HASH_H_ */ -+ -+ -diff -urN uClibc/ldso-0.9.24/include/ld_string.h uClibc.ldso.24/ldso-0.9.24/include/ld_string.h ---- uClibc/ldso-0.9.24/include/ld_string.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/include/ld_string.h 2003-09-29 16:46:00.000000000 -0500 -@@ -0,0 +1,281 @@ -+#ifndef _LINUX_STRING_H_ -+#define _LINUX_STRING_H_ -+ -+extern void *_dl_malloc(int size); -+extern char *_dl_getenv(const char *symbol, char **envp); -+extern void _dl_unsetenv(const char *symbol, char **envp); -+extern char *_dl_strdup(const char *string); -+extern void _dl_dprintf(int, const char *, ...); -+ -+ -+static size_t _dl_strlen(const char * str); -+static char *_dl_strcat(char *dst, const char *src); -+static char * _dl_strcpy(char * dst,const char *src); -+static int _dl_strcmp(const char * s1,const char * s2); -+static int _dl_strncmp(const char * s1,const char * s2,size_t len); -+static char * _dl_strchr(const char * str,int c); -+static char *_dl_strrchr(const char *str, int c); -+static char *_dl_strstr(const char *s1, const char *s2); -+static void * _dl_memcpy(void * dst, const void * src, size_t len); -+static int _dl_memcmp(const void * s1,const void * s2,size_t len); -+static void *_dl_memset(void * str,int c,size_t len); -+static char *_dl_get_last_path_component(char *path); -+static char *_dl_simple_ltoa(char * local, unsigned long i); -+static char *_dl_simple_ltoahex(char * local, unsigned long i); -+ -+#ifndef NULL -+#define NULL ((void *) 0) -+#endif -+ -+static inline size_t _dl_strlen(const char * str) -+{ -+ register char *ptr = (char *) str; -+ -+ while (*ptr) -+ ptr++; -+ return (ptr - str); -+} -+ -+static inline char *_dl_strcat(char *dst, const char *src) -+{ -+ register char *ptr = dst; -+ -+ while (*ptr) -+ ptr++; -+ -+ while (*src) -+ *ptr++ = *src++; -+ *ptr = '\0'; -+ -+ return dst; -+} -+ -+static inline char * _dl_strcpy(char * dst,const char *src) -+{ -+ register char *ptr = dst; -+ -+ while (*src) -+ *dst++ = *src++; -+ *dst = '\0'; -+ -+ return ptr; -+} -+ -+static inline int _dl_strcmp(const char * s1,const char * s2) -+{ -+ register unsigned char c1, c2; -+ -+ do { -+ c1 = (unsigned char) *s1++; -+ c2 = (unsigned char) *s2++; -+ if (c1 == '\0') -+ return c1 - c2; -+ } -+ while (c1 == c2); -+ -+ return c1 - c2; -+} -+ -+static inline int _dl_strncmp(const char * s1,const char * s2,size_t len) -+{ -+ register unsigned char c1 = '\0'; -+ register unsigned char c2 = '\0'; -+ -+ while (len > 0) { -+ c1 = (unsigned char) *s1++; -+ c2 = (unsigned char) *s2++; -+ if (c1 == '\0' || c1 != c2) -+ return c1 - c2; -+ len--; -+ } -+ -+ return c1 - c2; -+} -+ -+static inline char * _dl_strchr(const char * str,int c) -+{ -+ register char ch; -+ -+ do { -+ if ((ch = *str) == c) -+ return (char *) str; -+ str++; -+ } -+ while (ch); -+ -+ return 0; -+} -+ -+static inline char *_dl_strrchr(const char *str, int c) -+{ -+ register char *prev = 0; -+ register char *ptr = (char *) str; -+ -+ while (*ptr != '\0') { -+ if (*ptr == c) -+ prev = ptr; -+ ptr++; -+ } -+ if (c == '\0') -+ return(ptr); -+ return(prev); -+} -+ -+ -+static inline char *_dl_strstr(const char *s1, const char *s2) -+{ -+ register const char *s = s1; -+ register const char *p = s2; -+ -+ do { -+ if (!*p) { -+ return (char *) s1;; -+ } -+ if (*p == *s) { -+ ++p; -+ ++s; -+ } else { -+ p = s2; -+ if (!*s) { -+ return NULL; -+ } -+ s = ++s1; -+ } -+ } while (1); -+} -+ -+static inline void * _dl_memcpy(void * dst, const void * src, size_t len) -+{ -+ register char *a = dst; -+ register const char *b = src; -+ -+ while (len--) -+ *a++ = *b++; -+ -+ return dst; -+} -+ -+ -+static inline int _dl_memcmp(const void * s1,const void * s2,size_t len) -+{ -+ unsigned char *c1 = (unsigned char *)s1; -+ unsigned char *c2 = (unsigned char *)s2; -+ -+ while (len--) { -+ if (*c1 != *c2) -+ return *c1 - *c2; -+ c1++; -+ c2++; -+ } -+ return 0; -+} -+ -+static inline void * _dl_memset(void * str,int c,size_t len) -+{ -+ register char *a = str; -+ -+ while (len--) -+ *a++ = c; -+ -+ return str; -+} -+ -+static inline char *_dl_get_last_path_component(char *path) -+{ -+ char *s; -+ register char *ptr = path; -+ register char *prev = 0; -+ -+ while (*ptr) -+ ptr++; -+ s = ptr - 1; -+ -+ /* strip trailing slashes */ -+ while (s != path && *s == '/') { -+ *s-- = '\0'; -+ } -+ -+ /* find last component */ -+ ptr = path; -+ while (*ptr != '\0') { -+ if (*ptr == '/') -+ prev = ptr; -+ ptr++; -+ } -+ s = prev; -+ -+ if (s == NULL || s[1] == '\0') -+ return path; -+ else -+ return s+1; -+} -+ -+/* Early on, we can't call printf, so use this to print out -+ * numbers using the SEND_STDERR() macro */ -+static inline char *_dl_simple_ltoa(char * local, unsigned long i) -+{ -+ /* 21 digits plus null terminator, good for 64-bit or smaller ints */ -+ char *p = &local[22]; -+ *p-- = '\0'; -+ do { -+ *p-- = '0' + i % 10; -+ i /= 10; -+ } while (i > 0); -+ return p + 1; -+} -+ -+static inline char *_dl_simple_ltoahex(char * local, unsigned long i) -+{ -+ /* 21 digits plus null terminator, good for 64-bit or smaller ints */ -+ char *p = &local[22]; -+ *p-- = '\0'; -+ do { -+ char temp = i % 0x10; -+ if (temp <= 0x09) -+ *p-- = '0' + temp; -+ else -+ *p-- = 'a' - 0x0a + temp; -+ i /= 0x10; -+ } while (i > 0); -+ *p-- = 'x'; -+ *p-- = '0'; -+ return p + 1; -+} -+ -+ -+#if defined(mc68000) || defined(__arm__) || defined(__mips__) || defined(__sh__) || defined(__powerpc__) -+/* On some arches constant strings are referenced through the GOT. */ -+/* XXX Requires load_addr to be defined. */ -+#define SEND_STDERR(X) \ -+ { const char *__s = (X); \ -+ if (__s < (const char *) load_addr) __s += load_addr; \ -+ _dl_write (2, __s, _dl_strlen (__s)); \ -+ } -+#else -+#define SEND_STDERR(X) _dl_write(2, X, _dl_strlen(X)); -+#endif -+ -+#define SEND_ADDRESS_STDERR(X, add_a_newline) { \ -+ char tmp[22], *tmp1; \ -+ _dl_memset(tmp, 0, sizeof(tmp)); \ -+ tmp1=_dl_simple_ltoahex( tmp, (unsigned long)(X)); \ -+ _dl_write(2, tmp1, _dl_strlen(tmp1)); \ -+ if (add_a_newline) { \ -+ tmp[0]='\n'; \ -+ _dl_write(2, tmp, 1); \ -+ } \ -+}; -+ -+#define SEND_NUMBER_STDERR(X, add_a_newline) { \ -+ char tmp[22], *tmp1; \ -+ _dl_memset(tmp, 0, sizeof(tmp)); \ -+ tmp1=_dl_simple_ltoa( tmp, (unsigned long)(X)); \ -+ _dl_write(2, tmp1, _dl_strlen(tmp1)); \ -+ if (add_a_newline) { \ -+ tmp[0]='\n'; \ -+ _dl_write(2, tmp, 1); \ -+ } \ -+}; -+ -+ -+#endif -diff -urN uClibc/ldso-0.9.24/include/ld_syscall.h uClibc.ldso.24/ldso-0.9.24/include/ld_syscall.h ---- uClibc/ldso-0.9.24/include/ld_syscall.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/include/ld_syscall.h 2003-08-19 01:05:30.000000000 -0500 -@@ -0,0 +1,157 @@ -+#ifndef _LD_SYSCALL_H_ -+#define _LD_SYSCALL_H_ -+ -+/* Pull in the arch specific syscall implementation */ -+#include <ld_syscalls.h> -+/* For MAP_ANONYMOUS -- differs between platforms */ -+#include <asm/mman.h> -+/* Pull in whatever this particular arch's kernel thinks the kernel version of -+ * struct stat should look like. It turns out that each arch has a different -+ * opinion on the subject, and different kernel revs use different names... */ -+#define kernel_stat stat -+#include <bits/kernel_stat.h> -+ -+ -+/* Encoding of the file mode. */ -+#define S_IFMT 0170000 /* These bits determine file type. */ -+ -+/* File types. */ -+#define S_IFDIR 0040000 /* Directory. */ -+#define S_IFCHR 0020000 /* Character device. */ -+#define S_IFBLK 0060000 /* Block device. */ -+#define S_IFREG 0100000 /* Regular file. */ -+#define S_IFIFO 0010000 /* FIFO. */ -+#define S_IFLNK 0120000 /* Symbolic link. */ -+#define S_IFSOCK 0140000 /* Socket. */ -+ -+/* Protection bits. */ -+ -+#define S_ISUID 04000 /* Set user ID on execution. */ -+#define S_ISGID 02000 /* Set group ID on execution. */ -+#define S_ISVTX 01000 /* Save swapped text after use (sticky). */ -+#define S_IREAD 0400 /* Read by owner. */ -+#define S_IWRITE 0200 /* Write by owner. */ -+#define S_IEXEC 0100 /* Execute by owner. */ -+ -+ -+/* Here are the definitions for some syscalls that are used -+ by the dynamic linker. The idea is that we want to be able -+ to call these before the errno symbol is dynamicly linked, so -+ we use our own version here. Note that we cannot assume any -+ dynamic linking at all, so we cannot return any error codes. -+ We just punt if there is an error. */ -+ -+ -+#define __NR__dl_exit __NR_exit -+static inline _syscall1(void, _dl_exit, int, status); -+ -+ -+#define __NR__dl_close __NR_close -+static inline _syscall1(int, _dl_close, int, fd); -+ -+ -+#if defined(__powerpc__) || defined(__mips__) || defined(__sh__) -+/* PowerPC, MIPS and SuperH have a different calling convention for mmap(). */ -+#define __NR__dl_mmap __NR_mmap -+static inline _syscall6(void *, _dl_mmap, void *, start, size_t, length, -+ int, prot, int, flags, int, fd, off_t, offset); -+#else -+#define __NR__dl_mmap_real __NR_mmap -+static inline _syscall1(void *, _dl_mmap_real, unsigned long *, buffer); -+ -+static inline void * _dl_mmap(void * addr, unsigned long size, int prot, -+ int flags, int fd, unsigned long offset) -+{ -+ unsigned long buffer[6]; -+ -+ buffer[0] = (unsigned long) addr; -+ buffer[1] = (unsigned long) size; -+ buffer[2] = (unsigned long) prot; -+ buffer[3] = (unsigned long) flags; -+ buffer[4] = (unsigned long) fd; -+ buffer[5] = (unsigned long) offset; -+ return (void *) _dl_mmap_real(buffer); -+} -+#endif -+ -+#ifndef _dl_MAX_ERRNO -+#define _dl_MAX_ERRNO 4096 -+#endif -+#define _dl_mmap_check_error(__res) \ -+ (((int)__res) < 0 && ((int)__res) >= -_dl_MAX_ERRNO) -+#ifndef MAP_ANONYMOUS -+#ifdef __sparc__ -+#define MAP_ANONYMOUS 0x20 -+#else -+#error MAP_ANONYMOUS not defined and suplementary value not known -+#endif -+#endif -+ -+ -+#define __NR__dl_open __NR_open -+#define O_RDONLY 0x0000 -+#define O_WRONLY 01 -+#define O_RDWR 02 -+#define O_CREAT 0100 /* not fcntl */ -+static inline _syscall2(int, _dl_open, const char *, fn, int, flags); -+ -+#define __NR__dl_write __NR_write -+static inline _syscall3(unsigned long, _dl_write, int, fd, -+ const void *, buf, unsigned long, count); -+ -+ -+#define __NR__dl_read __NR_read -+static inline _syscall3(unsigned long, _dl_read, int, fd, -+ const void *, buf, unsigned long, count); -+ -+#define __NR__dl_mprotect __NR_mprotect -+static inline _syscall3(int, _dl_mprotect, const void *, addr, unsigned long, len, int, prot); -+ -+ -+ -+#define __NR__dl_stat __NR_stat -+static inline _syscall2(int, _dl_stat, const char *, file_name, struct stat *, buf); -+ -+ -+#define __NR__dl_munmap __NR_munmap -+static inline _syscall2(int, _dl_munmap, void *, start, unsigned long, length); -+ -+#define __NR__dl_getuid __NR_getuid -+static inline _syscall0(uid_t, _dl_getuid); -+ -+#define __NR__dl_geteuid __NR_geteuid -+static inline _syscall0(uid_t, _dl_geteuid); -+ -+#define __NR__dl_getgid __NR_getgid -+static inline _syscall0(gid_t, _dl_getgid); -+ -+#define __NR__dl_getegid __NR_getegid -+static inline _syscall0(gid_t, _dl_getegid); -+ -+#define __NR__dl_getpid __NR_getpid -+static inline _syscall0(gid_t, _dl_getpid); -+ -+/* -+ * Not an actual syscall, but we need something in assembly to say whether -+ * this is OK or not. -+ */ -+static inline int _dl_suid_ok(void) -+{ -+ uid_t uid, euid, gid, egid; -+ -+ uid = _dl_getuid(); -+ euid = _dl_geteuid(); -+ gid = _dl_getgid(); -+ egid = _dl_getegid(); -+ -+ if(uid == euid && gid == egid) -+ return 1; -+ else -+ return 0; -+} -+ -+#define __NR__dl_readlink __NR_readlink -+static inline _syscall3(int, _dl_readlink, const char *, path, char *, buf, size_t, bufsiz); -+ -+#endif /* _LD_SYSCALL_H_ */ -+ -diff -urN uClibc/ldso-0.9.24/include/ldso.h uClibc.ldso.24/ldso-0.9.24/include/ldso.h ---- uClibc/ldso-0.9.24/include/ldso.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/include/ldso.h 2003-08-19 01:05:30.000000000 -0500 -@@ -0,0 +1,11 @@ -+#include <features.h> -+/* Pull in compiler and arch stuff */ -+#include <stdlib.h> -+#include <stdarg.h> -+/* Pull in the arch specific type information */ -+#include <sys/types.h> -+/* Now the ldso specific headers */ -+#include <ld_elf.h> -+#include <ld_syscall.h> -+#include <ld_hash.h> -+#include <ld_string.h> -diff -urN uClibc/ldso-0.9.24/ldso/.cvsignore uClibc.ldso.24/ldso-0.9.24/ldso/.cvsignore ---- uClibc/ldso-0.9.24/ldso/.cvsignore 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/.cvsignore 2003-08-19 01:05:31.000000000 -0500 -@@ -0,0 +1,2 @@ -+ld-uclibc.so* -+_dl_progname.h -diff -urN uClibc/ldso-0.9.24/ldso/Makefile uClibc.ldso.24/ldso-0.9.24/ldso/Makefile ---- uClibc/ldso-0.9.24/ldso/Makefile 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/Makefile 2004-03-01 02:58:58.000000000 -0600 -@@ -0,0 +1,101 @@ -+# Makefile for uClibc -+# -+# Copyright (C) 2000 by Lineo, inc. -+# Copyright (C) 2000-2002 Erik Andersen <andersen@uclibc.org> -+# -+# This program is free software; you can redistribute it and/or modify it under -+# the terms of the GNU Library General Public License as published by the Free -+# Software Foundation; either version 2 of the License, or (at your option) any -+# later version. -+# -+# This program is distributed in the hope that it will be useful, but WITHOUT -+# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS -+# FOR A PARTICULAR PURPOSE. See the GNU Library General Public License for more -+# details. -+# -+# You should have received a copy of the GNU Library General Public License -+# along with this program; if not, write to the Free Software Foundation, Inc., -+# 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA -+# -+# Derived in part from the Linux-8086 C library, the GNU C Library, and several -+# other sundry sources. Files within this library are copyright by their -+# respective copyright holders. -+ -+ -+TOPDIR=../../ -+include $(TOPDIR)Rules.mak -+LDSO_FULLNAME=ld-uClibc-$(MAJOR_VERSION).$(MINOR_VERSION).$(SUBLEVEL).so -+ -+ -+XXFLAGS=$(XWARNINGS) $(OPTIMIZATION) $(XARCH_CFLAGS) $(CPU_CFLAGS) $(PICFLAG) \ -+ -DUCLIBC_RUNTIME_PREFIX=\"$(RUNTIME_PREFIX)\" \ -+ -fno-builtin -nostdinc -I$(TOPDIR)ldso-0.9.24/include -I. -I$(TOPDIR)include -+ -+ifeq ($(SUPPORT_LD_DEBUG),y) -+XXFLAGS=$(XWARNINGS) $(XARCH_CFLAGS) $(CPU_CFLAGS) $(PICFLAG) \ -+ -DUCLIBC_RUNTIME_PREFIX=\"$(RUNTIME_PREFIX)\" \ -+ -fno-builtin -nostdinc -I$(TOPDIR)ldso-0.9.24/include -I. -I$(TOPDIR)include -+# Not really much point in including debugging info, since gdb -+# can't really debug ldso, since gdb requires help from ldso to -+# debug things.... -+XXFLAGS+=-Os #-g3 -+endif -+ -+# BEWARE!!! At least mips* will die if -O0 is used!!! -+XXFLAGS :=$(XXFLAGS:-O0=-O1) -+ -+XXFLAGS+=$(shell $(CC) -print-search-dirs | sed -ne "s/install: *\(.*\)/-I\1include/gp") -+LDFLAGS=$(CPU_LDFLAGS-y) -shared --warn-common --export-dynamic --sort-common \ -+ -z combreloc --discard-locals --discard-all --no-undefined -+ -+CSRC= ldso.c #hash.c readelflib1.c $(TARGET_ARCH)/elfinterp.c -+COBJS=$(patsubst %.c,%.o, $(CSRC)) -+ASRC=$(shell ls $(TARGET_ARCH)/*.S) -+AOBJS=$(patsubst %.S,%.o, $(ASRC)) -+OBJS=$(AOBJS) $(COBJS) -+ -+ifneq ($(strip $(SUPPORT_LD_DEBUG)),y) -+LDFLAGS+=-s -+endif -+ -+ifeq ($(strip $(SUPPORT_LD_DEBUG)),y) -+XXFLAGS+=-D__SUPPORT_LD_DEBUG__ -+endif -+ -+ifeq ($(strip $(SUPPORT_LD_DEBUG_EARLY)),y) -+XXFLAGS+=-D__SUPPORT_LD_DEBUG_EARLY__ -+endif -+ -+ifeq ($(strip $(FORCE_SHAREABLE_TEXT_SEGMENTS)),y) -+XXFLAGS+=-DFORCE_SHAREABLE_TEXT_SEGMENTS -+endif -+ -+#This stuff will not work with -fomit-frame-pointer -+XXFLAGS := $(XXFLAGS:-fomit-frame-pointer=) -+ -+all: lib -+ -+lib:: _dl_progname.h $(OBJS) $(DLINK_OBJS) -+ $(LD) $(LDFLAGS) -e _dl_boot -soname=$(UCLIBC_LDSO) \ -+ -o $(LDSO_FULLNAME) $(OBJS) $(LIBGCC); -+ $(INSTALL) -d $(TOPDIR)lib -+ $(INSTALL) -m 755 $(LDSO_FULLNAME) $(TOPDIR)lib -+ $(LN) -sf $(LDSO_FULLNAME) $(TOPDIR)lib/$(UCLIBC_LDSO) -+ -+_dl_progname.h: Makefile -+ echo "const char *_dl_progname=\""$(UCLIBC_LDSO)"\";" > _dl_progname.h -+ echo "#include \"$(TARGET_ARCH)/elfinterp.c\"" >> _dl_progname.h -+ -+ -+$(COBJS): %.o : %.c -+ $(CC) $(XXFLAGS) -I../libdl -c $< -o $@ -+ $(STRIPTOOL) -x -R .note -R .comment $*.o -+ -+$(AOBJS): %.o : %.S -+ $(CC) $(XXFLAGS) -I../libdl -c $< -o $@ -+ $(STRIPTOOL) -x -R .note -R .comment $*.o -+ -+ldso.o: ldso.c hash.c readelflib1.c $(TARGET_ARCH)/elfinterp.c _dl_progname.h -+ -+clean: -+ $(RM) $(UCLIBC_LDSO)* $(OBJS) $(LDSO_FULLNAME)* core *.o *.a *.s *.i _dl_progname.h ldso.h *~ -diff -urN uClibc/ldso-0.9.24/ldso/arm/boot1_arch.h uClibc.ldso.24/ldso-0.9.24/ldso/arm/boot1_arch.h ---- uClibc/ldso-0.9.24/ldso/arm/boot1_arch.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/arm/boot1_arch.h 2002-11-13 18:53:49.000000000 -0600 -@@ -0,0 +1,30 @@ -+/* Any assmbly language/system dependent hacks needed to setup boot1.c so it -+ * will work as expected and cope with whatever platform specific wierdness is -+ * needed for this architecture. */ -+ -+/* Overrive the default _dl_boot function, and replace it with a bit of asm. -+ * Then call the real _dl_boot function, which is now named _dl_boot2. */ -+ -+asm("" \ -+" .text\n" \ -+" .globl _dl_boot\n" \ -+"_dl_boot:\n" \ -+" mov r7, sp\n" \ -+" @ldr r0, [sp], #4\n" \ -+" mov r0, sp\n" \ -+" bl _dl_boot2\n" \ -+" mov r6, r0\n" \ -+" mov r0, r7\n" \ -+" mov pc, r6\n" \ -+); -+ -+#define _dl_boot _dl_boot2 -+#define LD_BOOT(X) static void * __attribute__ ((unused)) _dl_boot (X) -+ -+ -+ /* It seems ARM needs an offset here */ -+#undef ELFMAGIC -+#define ELFMAGIC ELFMAG+load_addr -+ -+ -+ -diff -urN uClibc/ldso-0.9.24/ldso/arm/elfinterp.c uClibc.ldso.24/ldso-0.9.24/ldso/arm/elfinterp.c ---- uClibc/ldso-0.9.24/ldso/arm/elfinterp.c 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/arm/elfinterp.c 2002-11-07 21:20:59.000000000 -0600 -@@ -0,0 +1,462 @@ -+/* vi: set sw=4 ts=4: */ -+/* ARM ELF shared library loader suppport -+ * -+ * Copyright (C) 2001-2002, Erik Andersen -+ * -+ * 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. The name of the above contributors may not be -+ * used to endorse or promote products derived from this software -+ * without specific prior written permission. -+ * -+ * THIS SOFTWARE IS PROVIDED BY THE 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 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. -+ */ -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+static const char *_dl_reltypes_tab[] = -+{ -+ [0] "R_ARM_NONE", "R_ARM_PC24", "R_ARM_ABS32", "R_ARM_REL32", -+ [4] "R_ARM_PC13", "R_ARM_ABS16", "R_ARM_ABS12", "R_ARM_THM_ABS5", -+ [8] "R_ARM_ABS8", "R_ARM_SBREL32","R_ARM_THM_PC22", "R_ARM_THM_PC8", -+ [12] "R_ARM_AMP_VCALL9", "R_ARM_SWI24", "R_ARM_THM_SWI8", "R_ARM_XPC25", -+ [16] "R_ARM_THM_XPC22", -+ [20] "R_ARM_COPY", "R_ARM_GLOB_DAT","R_ARM_JUMP_SLOT", "R_ARM_RELATIVE", -+ [24] "R_ARM_GOTOFF", "R_ARM_GOTPC", "R_ARM_GOT32", "R_ARM_PLT32", -+ [32] "R_ARM_ALU_PCREL_7_0","R_ARM_ALU_PCREL_15_8","R_ARM_ALU_PCREL_23_15","R_ARM_LDR_SBREL_11_0", -+ [36] "R_ARM_ALU_SBREL_19_12","R_ARM_ALU_SBREL_27_20", -+ [100] "R_ARM_GNU_VTENTRY","R_ARM_GNU_VTINHERIT","R_ARM_THM_PC11","R_ARM_THM_PC9", -+ [249] "R_ARM_RXPC25", "R_ARM_RSBREL32", "R_ARM_THM_RPC22", "R_ARM_RREL32", -+ [253] "R_ARM_RABS22", "R_ARM_RPC24", "R_ARM_RBASE", -+}; -+ -+static const char * -+_dl_reltypes(int type) -+{ -+ static char buf[22]; -+ const char *str; -+ -+ if (type >= (sizeof (_dl_reltypes_tab)/sizeof(_dl_reltypes_tab[0])) || -+ NULL == (str = _dl_reltypes_tab[type])) -+ { -+ str =_dl_simple_ltoa( buf, (unsigned long)(type)); -+ } -+ return str; -+} -+ -+static -+void debug_sym(Elf32_Sym *symtab,char *strtab,int symtab_index) -+{ -+ if(_dl_debug_symbols) -+ { -+ if(symtab_index){ -+ _dl_dprintf(_dl_debug_file, "\n%s\tvalue=%x\tsize=%x\tinfo=%x\tother=%x\tshndx=%x", -+ strtab + symtab[symtab_index].st_name, -+ symtab[symtab_index].st_value, -+ symtab[symtab_index].st_size, -+ symtab[symtab_index].st_info, -+ symtab[symtab_index].st_other, -+ symtab[symtab_index].st_shndx); -+ } -+ } -+} -+ -+static void debug_reloc(Elf32_Sym *symtab,char *strtab, ELF_RELOC *rpnt) -+{ -+ if(_dl_debug_reloc) -+ { -+ int symtab_index; -+ const char *sym; -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ sym = symtab_index ? strtab + symtab[symtab_index].st_name : "sym=0x0"; -+ -+#ifdef ELF_USES_RELOCA -+ _dl_dprintf(_dl_debug_file, "\n%s\toffset=%x\taddend=%x %s", -+ _dl_reltypes(ELF32_R_TYPE(rpnt->r_info)), -+ rpnt->r_offset, -+ rpnt->r_addend, -+ sym); -+#else -+ _dl_dprintf(_dl_debug_file, "\n%s\toffset=%x %s", -+ _dl_reltypes(ELF32_R_TYPE(rpnt->r_info)), -+ rpnt->r_offset, -+ sym); -+#endif -+ } -+} -+#endif -+ -+/* Program to load an ELF binary on a linux system, and run it. -+ References to symbols in sharable libraries can be resolved by either -+ an ELF sharable library or a linux style of shared library. */ -+ -+/* Disclaimer: I have never seen any AT&T source code for SVr4, nor have -+ I ever taken any courses on internals. This program was developed using -+ information available through the book "UNIX SYSTEM V RELEASE 4, -+ Programmers guide: Ansi C and Programming Support Tools", which did -+ a more than adequate job of explaining everything required to get this -+ working. */ -+ -+extern int _dl_linux_resolve(void); -+ -+unsigned long _dl_linux_resolver(struct elf_resolve *tpnt, int reloc_entry) -+{ -+ int reloc_type; -+ ELF_RELOC *this_reloc; -+ char *strtab; -+ Elf32_Sym *symtab; -+ ELF_RELOC *rel_addr; -+ int symtab_index; -+ char *new_addr; -+ char **got_addr; -+ unsigned long instr_addr; -+ -+ rel_addr = (ELF_RELOC *) (tpnt->dynamic_info[DT_JMPREL] + tpnt->loadaddr); -+ -+ this_reloc = rel_addr + (reloc_entry >> 3); -+ reloc_type = ELF32_R_TYPE(this_reloc->r_info); -+ symtab_index = ELF32_R_SYM(this_reloc->r_info); -+ -+ symtab = (Elf32_Sym *) (tpnt->dynamic_info[DT_SYMTAB] + tpnt->loadaddr); -+ strtab = (char *) (tpnt->dynamic_info[DT_STRTAB] + tpnt->loadaddr); -+ -+ -+ if (reloc_type != R_ARM_JUMP_SLOT) { -+ _dl_dprintf(2, "%s: Incorrect relocation type in jump relocations\n", -+ _dl_progname); -+ _dl_exit(1); -+ }; -+ -+ /* Address of jump instruction to fix up */ -+ instr_addr = ((unsigned long) this_reloc->r_offset + -+ (unsigned long) tpnt->loadaddr); -+ got_addr = (char **) instr_addr; -+ -+ /* Get the address of the GOT entry */ -+ new_addr = _dl_find_hash(strtab + symtab[symtab_index].st_name, -+ tpnt->symbol_scope, tpnt, resolver); -+ if (!new_addr) { -+ _dl_dprintf(2, "%s: can't resolve symbol '%s'\n", -+ _dl_progname, strtab + symtab[symtab_index].st_name); -+ _dl_exit(1); -+ }; -+#if defined (__SUPPORT_LD_DEBUG__) -+ if ((unsigned long) got_addr < 0x40000000) -+ { -+ if (_dl_debug_bindings) -+ { -+ _dl_dprintf(_dl_debug_file, "\nresolve function: %s", -+ strtab + symtab[symtab_index].st_name); -+ if(_dl_debug_detail) _dl_dprintf(_dl_debug_file, -+ "\tpatch %x ==> %x @ %x", *got_addr, new_addr, got_addr); -+ } -+ } -+ if (!_dl_debug_nofixups) { -+ *got_addr = new_addr; -+ } -+#else -+ *got_addr = new_addr; -+#endif -+ -+ return (unsigned long) new_addr; -+} -+ -+static int -+_dl_parse(struct elf_resolve *tpnt, struct dyn_elf *scope, -+ unsigned long rel_addr, unsigned long rel_size, -+ int (*reloc_fnc) (struct elf_resolve *tpnt, struct dyn_elf *scope, -+ ELF_RELOC *rpnt, Elf32_Sym *symtab, char *strtab)) -+{ -+ int i; -+ char *strtab; -+ int goof = 0; -+ Elf32_Sym *symtab; -+ ELF_RELOC *rpnt; -+ int symtab_index; -+ /* Now parse the relocation information */ -+ -+ rpnt = (ELF_RELOC *) (rel_addr + tpnt->loadaddr); -+ rel_size = rel_size / sizeof(ELF_RELOC); -+ -+ symtab = (Elf32_Sym *) (tpnt->dynamic_info[DT_SYMTAB] + tpnt->loadaddr); -+ strtab = (char *) (tpnt->dynamic_info[DT_STRTAB] + tpnt->loadaddr); -+ -+ for (i = 0; i < rel_size; i++, rpnt++) { -+ int res; -+ -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ -+ /* When the dynamic linker bootstrapped itself, it resolved some symbols. -+ Make sure we do not do them again */ -+ if (!symtab_index && tpnt->libtype == program_interpreter) -+ continue; -+ if (symtab_index && tpnt->libtype == program_interpreter && -+ _dl_symbol(strtab + symtab[symtab_index].st_name)) -+ continue; -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ debug_sym(symtab,strtab,symtab_index); -+ debug_reloc(symtab,strtab,rpnt); -+#endif -+ -+ res = reloc_fnc (tpnt, scope, rpnt, symtab, strtab); -+ -+ if (res==0) continue; -+ -+ _dl_dprintf(2, "\n%s: ",_dl_progname); -+ -+ if (symtab_index) -+ _dl_dprintf(2, "symbol '%s': ", strtab + symtab[symtab_index].st_name); -+ -+ if (res <0) -+ { -+ int reloc_type = ELF32_R_TYPE(rpnt->r_info); -+#if defined (__SUPPORT_LD_DEBUG__) -+ _dl_dprintf(2, "can't handle reloc type %s\n ", _dl_reltypes(reloc_type)); -+#else -+ _dl_dprintf(2, "can't handle reloc type %x\n", reloc_type); -+#endif -+ _dl_exit(-res); -+ } -+ else if (res >0) -+ { -+ _dl_dprintf(2, "can't resolve symbol\n"); -+ goof += res; -+ } -+ } -+ return goof; -+} -+ -+static unsigned long -+fix_bad_pc24 (unsigned long *const reloc_addr, unsigned long value) -+{ -+ static void *fix_page; -+ static unsigned int fix_offset; -+ unsigned int *fix_address; -+ if (! fix_page) -+ { -+ fix_page = _dl_mmap (NULL, 4096 , PROT_READ | PROT_WRITE | PROT_EXEC, -+ MAP_PRIVATE | MAP_ANONYMOUS, -1, 0); -+ fix_offset = 0; -+ } -+ -+ fix_address = (unsigned int *)(fix_page + fix_offset); -+ fix_address[0] = 0xe51ff004; /* ldr pc, [pc, #-4] */ -+ fix_address[1] = value; -+ -+ fix_offset += 8; -+ if (fix_offset >= 4096) -+ fix_page = NULL; -+ -+ return (unsigned long)fix_address; -+} -+ -+static int -+_dl_do_reloc (struct elf_resolve *tpnt,struct dyn_elf *scope, -+ ELF_RELOC *rpnt, Elf32_Sym *symtab, char *strtab) -+{ -+ int reloc_type; -+ int symtab_index; -+ unsigned long *reloc_addr; -+ unsigned long symbol_addr; -+ int goof = 0; -+ -+ reloc_addr = (unsigned long *) (tpnt->loadaddr + (unsigned long) rpnt->r_offset); -+ reloc_type = ELF32_R_TYPE(rpnt->r_info); -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ symbol_addr = 0; -+ -+ if (symtab_index) { -+ -+ symbol_addr = (unsigned long) _dl_find_hash(strtab + symtab[symtab_index].st_name, -+ scope, (reloc_type == R_ARM_JUMP_SLOT ? tpnt : NULL), symbolrel); -+ -+ /* -+ * We want to allow undefined references to weak symbols - this might -+ * have been intentional. We should not be linking local symbols -+ * here, so all bases should be covered. -+ */ -+ if (!symbol_addr && ELF32_ST_BIND(symtab[symtab_index].st_info) == STB_GLOBAL) { -+ goof++; -+ } -+ } -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ { -+ unsigned long old_val = *reloc_addr; -+#endif -+ switch (reloc_type) { -+ case R_ARM_NONE: -+ break; -+ case R_ARM_ABS32: -+ *reloc_addr += symbol_addr; -+ break; -+ case R_ARM_PC24: -+ { -+ unsigned long addend; -+ long newvalue, topbits; -+ -+ addend = *reloc_addr & 0x00ffffff; -+ if (addend & 0x00800000) addend |= 0xff000000; -+ -+ newvalue = symbol_addr - (unsigned long)reloc_addr + (addend << 2); -+ topbits = newvalue & 0xfe000000; -+ if (topbits != 0xfe000000 && topbits != 0x00000000) -+ { -+ newvalue = fix_bad_pc24(reloc_addr, symbol_addr) -+ - (unsigned long)reloc_addr + (addend << 2); -+ topbits = newvalue & 0xfe000000; -+ if (topbits != 0xfe000000 && topbits != 0x00000000) -+ { -+ _dl_dprintf(2,"symbol '%s': R_ARM_PC24 relocation out of range.", -+ symtab[symtab_index].st_name); -+ _dl_exit(1); -+ } -+ } -+ newvalue >>= 2; -+ symbol_addr = (*reloc_addr & 0xff000000) | (newvalue & 0x00ffffff); -+ *reloc_addr = symbol_addr; -+ break; -+ } -+ case R_ARM_GLOB_DAT: -+ case R_ARM_JUMP_SLOT: -+ *reloc_addr = symbol_addr; -+ break; -+ case R_ARM_RELATIVE: -+ *reloc_addr += (unsigned long) tpnt->loadaddr; -+ break; -+ case R_ARM_COPY: -+#if 0 -+ /* Do this later */ -+ _dl_dprintf(2, "Doing copy for symbol "); -+ if (symtab_index) _dl_dprintf(2, strtab + symtab[symtab_index].st_name); -+ _dl_dprintf(2, "\n"); -+ _dl_memcpy((void *) symtab[symtab_index].st_value, -+ (void *) symbol_addr, symtab[symtab_index].st_size); -+#endif -+ break; -+ default: -+ return -1; /*call _dl_exit(1) */ -+ } -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug_reloc && _dl_debug_detail) -+ _dl_dprintf(_dl_debug_file, "\tpatch: %x ==> %x @ %x", old_val, *reloc_addr, reloc_addr); -+ } -+ -+#endif -+ -+ return goof; -+} -+ -+static int -+_dl_do_lazy_reloc (struct elf_resolve *tpnt, struct dyn_elf *scope, -+ ELF_RELOC *rpnt, Elf32_Sym *symtab, char *strtab) -+{ -+ int reloc_type; -+ unsigned long *reloc_addr; -+ -+ reloc_addr = (unsigned long *) (tpnt->loadaddr + (unsigned long) rpnt->r_offset); -+ reloc_type = ELF32_R_TYPE(rpnt->r_info); -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ { -+ unsigned long old_val = *reloc_addr; -+#endif -+ switch (reloc_type) { -+ case R_ARM_NONE: -+ break; -+ case R_ARM_JUMP_SLOT: -+ *reloc_addr += (unsigned long) tpnt->loadaddr; -+ break; -+ default: -+ return -1; /*call _dl_exit(1) */ -+ } -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug_reloc && _dl_debug_detail) -+ _dl_dprintf(_dl_debug_file, "\tpatch: %x ==> %x @ %x", old_val, *reloc_addr, reloc_addr); -+ } -+ -+#endif -+ return 0; -+ -+} -+ -+/* This is done as a separate step, because there are cases where -+ information is first copied and later initialized. This results in -+ the wrong information being copied. Someone at Sun was complaining about -+ a bug in the handling of _COPY by SVr4, and this may in fact be what he -+ was talking about. Sigh. */ -+ -+/* No, there are cases where the SVr4 linker fails to emit COPY relocs -+ at all */ -+static int -+_dl_do_copy (struct elf_resolve *tpnt, struct dyn_elf *scope, -+ ELF_RELOC *rpnt, Elf32_Sym *symtab, char *strtab) -+{ -+ int reloc_type; -+ int symtab_index; -+ unsigned long *reloc_addr; -+ unsigned long symbol_addr; -+ int goof = 0; -+ -+ reloc_addr = (unsigned long *) (tpnt->loadaddr + (unsigned long) rpnt->r_offset); -+ reloc_type = ELF32_R_TYPE(rpnt->r_info); -+ if (reloc_type != R_ARM_COPY) -+ return 0; -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ symbol_addr = 0; -+ -+ if (symtab_index) { -+ -+ symbol_addr = (unsigned long) _dl_find_hash(strtab + -+ symtab[symtab_index].st_name, scope, -+ NULL, copyrel); -+ if (!symbol_addr) goof++; -+ } -+ if (!goof) { -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug_move) -+ _dl_dprintf(_dl_debug_file,"\n%s move %x bytes from %x to %x", -+ strtab + symtab[symtab_index].st_name, -+ symtab[symtab_index].st_size, -+ symbol_addr, symtab[symtab_index].st_value); -+#endif -+ _dl_memcpy((char *) symtab[symtab_index].st_value, -+ (char *) symbol_addr, symtab[symtab_index].st_size); -+ } -+ -+ return goof; -+} -+ -+void _dl_parse_lazy_relocation_information(struct elf_resolve *tpnt, -+ unsigned long rel_addr, unsigned long rel_size, int type) -+{ -+ (void)_dl_parse(tpnt, NULL, rel_addr, rel_size, _dl_do_lazy_reloc); -+} -+ -+int _dl_parse_relocation_information(struct elf_resolve *tpnt, -+ unsigned long rel_addr, unsigned long rel_size, int type) -+{ -+ return _dl_parse(tpnt, tpnt->symbol_scope, rel_addr, rel_size, _dl_do_reloc); -+} -+ -+int _dl_parse_copy_information(struct dyn_elf *xpnt, unsigned long rel_addr, -+ unsigned long rel_size, int type) -+{ -+ return _dl_parse(xpnt->dyn, xpnt->next, rel_addr, rel_size, _dl_do_copy); -+} -+ -diff -urN uClibc/ldso-0.9.24/ldso/arm/ld_syscalls.h uClibc.ldso.24/ldso-0.9.24/ldso/arm/ld_syscalls.h ---- uClibc/ldso-0.9.24/ldso/arm/ld_syscalls.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/arm/ld_syscalls.h 2003-09-09 01:11:11.000000000 -0500 -@@ -0,0 +1,19 @@ -+/* Define the __set_errno macro as nothing so that INLINE_SYSCALL -+ * won't set errno, which is important since we make system calls -+ * before the errno symbol is dynamicly linked. */ -+ -+#define __set_errno(X) {(void)(X);} -+ -+/* Prepare for the case that `__builtin_expect' is not available. */ -+#if __GNUC__ == 2 && __GNUC_MINOR__ < 96 -+#define __builtin_expect(x, expected_value) (x) -+#endif -+#ifndef likely -+# define likely(x) __builtin_expect((!!(x)),1) -+#endif -+#ifndef unlikely -+# define unlikely(x) __builtin_expect((!!(x)),0) -+#endif -+ -+#include "sys/syscall.h" -+ -diff -urN uClibc/ldso-0.9.24/ldso/arm/ld_sysdep.h uClibc.ldso.24/ldso-0.9.24/ldso/arm/ld_sysdep.h ---- uClibc/ldso-0.9.24/ldso/arm/ld_sysdep.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/arm/ld_sysdep.h 2002-08-09 09:41:04.000000000 -0500 -@@ -0,0 +1,124 @@ -+/* -+ * Various assmbly language/system dependent hacks that are required -+ * so that we can minimize the amount of platform specific code. -+ */ -+ -+/* -+ * Define this if the system uses RELOCA. -+ */ -+#undef ELF_USES_RELOCA -+ -+/* -+ * Get a pointer to the argv array. On many platforms this can be just -+ * the address if the first argument, on other platforms we need to -+ * do something a little more subtle here. -+ */ -+#define GET_ARGV(ARGVP, ARGS) ARGVP = ((unsigned long*) ARGS) -+ -+/* -+ * Initialization sequence for a GOT. -+ */ -+#define INIT_GOT(GOT_BASE,MODULE) \ -+{ \ -+ GOT_BASE[2] = (unsigned long) _dl_linux_resolve; \ -+ GOT_BASE[1] = (unsigned long) MODULE; \ -+} -+ -+/* -+ * Here is a macro to perform a relocation. This is only used when -+ * bootstrapping the dynamic loader. RELP is the relocation that we -+ * are performing, REL is the pointer to the address we are relocating. -+ * SYMBOL is the symbol involved in the relocation, and LOAD is the -+ * load address. -+ */ -+#define PERFORM_BOOTSTRAP_RELOC(RELP,REL,SYMBOL,LOAD) \ -+ switch(ELF32_R_TYPE((RELP)->r_info)){ \ -+ case R_ARM_ABS32: \ -+ *REL += SYMBOL; \ -+ break; \ -+ case R_ARM_PC24: \ -+ { long newvalue, topbits; \ -+ unsigned long addend = *REL & 0x00ffffff; \ -+ if (addend & 0x00800000) addend |= 0xff000000; \ -+ newvalue=SYMBOL-(unsigned long)REL+(addend<<2); \ -+ topbits = newvalue & 0xfe000000; \ -+ if (topbits!=0xfe000000&&topbits!=0x00000000){ \ -+ newvalue = fix_bad_pc24(REL, SYMBOL) \ -+ -(unsigned long)REL+(addend<<2); \ -+ topbits = newvalue & 0xfe000000; \ -+ if (topbits!=0xfe000000&&topbits!=0x00000000){ \ -+ SEND_STDERR("R_ARM_PC24 relocation out of range\n");\ -+ _dl_exit(1); } } \ -+ newvalue>>=2; \ -+ SYMBOL=(*REL&0xff000000)|(newvalue & 0x00ffffff); \ -+ *REL=SYMBOL; \ -+ } \ -+ break; \ -+ case R_ARM_GLOB_DAT: \ -+ case R_ARM_JUMP_SLOT: \ -+ *REL = SYMBOL; \ -+ break; \ -+ case R_ARM_RELATIVE: \ -+ *REL += (unsigned long) LOAD; \ -+ break; \ -+ case R_ARM_NONE: \ -+ break; \ -+ default: \ -+ SEND_STDERR("Aiieeee!"); \ -+ _dl_exit(1); \ -+ } -+ -+ -+/* -+ * Transfer control to the user's application, once the dynamic loader -+ * is done. This routine has to exit the current function, then -+ * call the _dl_elf_main function. -+ */ -+ -+#define START() return _dl_elf_main; -+ -+ -+ -+/* Here we define the magic numbers that this dynamic loader should accept */ -+ -+#define MAGIC1 EM_ARM -+#undef MAGIC2 -+/* Used for error messages */ -+#define ELF_TARGET "ARM" -+ -+struct elf_resolve; -+unsigned long _dl_linux_resolver(struct elf_resolve * tpnt, int reloc_entry); -+ -+static inline unsigned long arm_modulus(unsigned long m, unsigned long p) { -+ unsigned long i,t,inc; -+ i=p; t=0; -+ while(!(i&(1<<31))) { -+ i<<=1; -+ t++; -+ } -+ t--; -+ for(inc=t;inc>2;inc--) { -+ i=p<<inc; -+ if(i&(1<<31)) -+ break; -+ while(m>=i) { -+ m-=i; -+ i<<=1; -+ if(i&(1<<31)) -+ break; -+ if(i<p) -+ break; -+ } -+ } -+ while(m>=p) { -+ m-=p; -+ } -+ return m; -+} -+ -+#define do_rem(result, n, base) result=arm_modulus(n,base); -+ -+/* 4096 bytes alignment */ -+#define PAGE_ALIGN 0xfffff000 -+#define ADDR_ALIGN 0xfff -+#define OFFS_ALIGN 0x7ffff000 -diff -urN uClibc/ldso-0.9.24/ldso/arm/resolve.S uClibc.ldso.24/ldso-0.9.24/ldso/arm/resolve.S ---- uClibc/ldso-0.9.24/ldso/arm/resolve.S 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/arm/resolve.S 2002-08-12 04:03:30.000000000 -0500 -@@ -0,0 +1,43 @@ -+/* -+ * This function is _not_ called directly. It is jumped to (so no return -+ * address is on the stack) when attempting to use a symbol that has not yet -+ * been resolved. The first time a jump symbol (such as a function call inside -+ * a shared library) is used (before it gets resolved) it will jump here to -+ * _dl_linux_resolve. When we get called the stack looks like this: -+ * reloc_entry -+ * tpnt -+ * -+ * This function saves all the registers, puts a copy of reloc_entry and tpnt -+ * on the stack (as function arguments) then make the function call -+ * _dl_linux_resolver(tpnt, reloc_entry). _dl_linux_resolver() figures out -+ * where the jump symbol is _really_ supposed to have jumped to and returns -+ * that to us. Once we have that, we overwrite tpnt with this fixed up -+ * address. We then clean up after ourselves, put all the registers back how we -+ * found them, then we jump to the fixed up address, which is where the jump -+ * symbol that got us here really wanted to jump to in the first place. -+ * -Erik Andersen -+ */ -+ -+#define sl r10 -+#define fp r11 -+#define ip r12 -+ -+.text -+.globl _dl_linux_resolve -+.type _dl_linux_resolve,%function -+.align 4; -+ -+_dl_linux_resolve: -+ stmdb sp!, {r0, r1, r2, r3, sl, fp} -+ sub r1, ip, lr -+ sub r1, r1, #4 -+ add r1, r1, r1 -+ ldr r0, [lr, #-4] -+ mov r3,r0 -+ -+ bl _dl_linux_resolver -+ -+ mov ip, r0 -+ ldmia sp!, {r0, r1, r2, r3, sl, fp, lr} -+ mov pc,ip -+.size _dl_linux_resolve, .-_dl_linux_resolve -diff -urN uClibc/ldso-0.9.24/ldso/cris/boot1_arch.h uClibc.ldso.24/ldso-0.9.24/ldso/cris/boot1_arch.h ---- uClibc/ldso-0.9.24/ldso/cris/boot1_arch.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/cris/boot1_arch.h 2003-09-19 07:11:43.000000000 -0500 -@@ -0,0 +1,17 @@ -+/* -+ * This code fix the stack pointer so that the dynamic linker -+ * can find argc, argv and auxvt (Auxillary Vector Table). -+ */ -+asm("" \ -+" .text\n" \ -+" .globl _dl_boot\n" \ -+" .type _dl_boot,@function\n" \ -+"_dl_boot:\n" \ -+" move.d $sp,$r10\n" \ -+" move.d $pc,$r9\n" \ -+" add.d _dl_boot2 - ., $r9\n" \ -+" jsr $r9\n" \ -+); -+ -+#define _dl_boot _dl_boot2 -+#define LD_BOOT(X) static void * __attribute__ ((unused)) _dl_boot(X) -diff -urN uClibc/ldso-0.9.24/ldso/cris/elfinterp.c uClibc.ldso.24/ldso-0.9.24/ldso/cris/elfinterp.c ---- uClibc/ldso-0.9.24/ldso/cris/elfinterp.c 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/cris/elfinterp.c 2003-09-30 06:51:11.000000000 -0500 -@@ -0,0 +1,414 @@ -+/* -+ * CRIS ELF shared library loader support. -+ * -+ * Program to load an elf binary on a linux system, and run it. -+ * References to symbols in sharable libraries can be resolved -+ * by either an ELF sharable library or a linux style of shared -+ * library. -+ * -+ * Copyright (C) 2002, Axis Communications AB -+ * All rights reserved -+ * -+ * Author: Tobias Anderberg, <tobiasa@axis.com> -+ * -+ * 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. The name of the above contributors may not be -+ * used to endorse or promote products derived from this software -+ * without specific prior written permission. -+ * -+ * THIS SOFTWARE IS PROVIDED BY THE 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 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. -+ */ -+ -+/* Support for the LD_DEBUG variable. */ -+#if defined (__SUPPORT_LD_DEBUG__) -+static const char *_dl_reltypes_tab[] = { -+ [0] "R_CRIS_NONE", "R_CRIS_8", "R_CRIS_16", "R_CRIS_32", -+ [4] "R_CRIS_8_PCREL", "R_CRIS_16_PCREL", "R_CRIS_32_PCREL", "R_CRIS_GNU_VTINHERIT", -+ [8] "R_CRIS_GNU_VTENTRY", "R_CRIS_COPY", "R_CRIS_GLOB_DAT", "R_CRIS_JUMP_SLOT", -+ [16] "R_CRIS_RELATIVE", "R_CRIS_16_GOT", "R_CRIS_32_GOT", "R_CRIS_16_GOTPLT", -+ [32] "R_CRIS_32_GOTPLT", "R_CRIS_32_GOTREL", "R_CRIS_32_PLT_GOTREL", "R_CRIS_32_PLT_PCREL", -+ -+}; -+ -+ -+static const char * -+_dl_reltypes(int type) -+{ -+ const char *str; -+ static char buf[22]; -+ -+ if (type >= (sizeof(_dl_reltypes_tab)/sizeof(_dl_reltypes_tab[0])) || -+ NULL == (str = _dl_reltypes_tab[type])) -+ str = _dl_simple_ltoa(buf, (unsigned long) (type)); -+ -+ return str; -+} -+ -+static void -+debug_sym(Elf32_Sym *symtab, char *strtab, int symtab_index) -+{ -+ if (_dl_debug_symbols) { -+ if (symtab_index) { -+ _dl_dprintf(_dl_debug_file, -+ "\n%s\tvalue=%x\tsize=%x\tinfo=%x\tother=%x\tshndx=%x", -+ strtab + symtab[symtab_index].st_name, -+ symtab[symtab_index].st_value, -+ symtab[symtab_index].st_size, -+ symtab[symtab_index].st_info, -+ symtab[symtab_index].st_other, -+ symtab[symtab_index].st_shndx); -+ } -+ } -+} -+ -+static void -+debug_reloc(Elf32_Sym *symtab, char *strtab, ELF_RELOC *rpnt) -+{ -+ if (_dl_debug_reloc) { -+ int symtab_index; -+ const char *sym; -+ -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ sym = symtab_index ? strtab + symtab[symtab_index].st_name : "sym=0x0"; -+ -+ if (_dl_debug_symbols) -+ _dl_dprintf(_dl_debug_file, "\n\t"); -+ else -+ _dl_dprintf(_dl_debug_file, "\n%s\n\t", sym); -+ -+#ifdef ELF_USES_RELOCA -+ _dl_dprintf(_dl_debug_file, "%s\toffset=%x\taddend=%x", -+ _dl_reltypes(ELF32_R_TYPE(rpnt->r_info)), -+ rpnt->r_offset, -+ rpnt->r_addend); -+#else -+ _dl_dprintf(_dl_debug_file, "%s\toffset%x\n", -+ _dl_reltypes(ELF32_R_TYPE(rpnt->r_info)), -+ rpnt->r_offset); -+#endif -+ } -+} -+#endif /* __SUPPORT_LD_DEBUG__ */ -+ -+/* Defined in resolve.S. */ -+extern int _dl_linux_resolv(void); -+ -+unsigned long -+_dl_linux_resolver(struct elf_resolve *tpnt, int reloc_entry) -+{ -+ int reloc_type; -+ int symtab_index; -+ char *strtab; -+ char *symname; -+ char *new_addr; -+ char *rel_addr; -+ char **got_addr; -+ Elf32_Sym *symtab; -+ ELF_RELOC *this_reloc; -+ unsigned long instr_addr; -+ -+ rel_addr = (char *) (tpnt->dynamic_info[DT_JMPREL] + tpnt->loadaddr); -+ -+ this_reloc = (ELF_RELOC *) (intptr_t)(rel_addr + reloc_entry); -+ reloc_type = ELF32_R_TYPE(this_reloc->r_info); -+ symtab_index = ELF32_R_SYM(this_reloc->r_info); -+ -+ symtab = (Elf32_Sym *) (intptr_t)(tpnt->dynamic_info[DT_SYMTAB] + tpnt->loadaddr); -+ strtab = (char *)(tpnt->dynamic_info[DT_STRTAB] + tpnt->loadaddr); -+ symname = strtab + symtab[symtab_index].st_name; -+ -+ if (reloc_type != R_CRIS_JUMP_SLOT) { -+ _dl_dprintf(2, "%s: Incorrect relocation type for jump relocations.\n", -+ _dl_progname); -+ _dl_exit(1); -+ } -+ -+ /* Fetch the address of the jump instruction to fix up. */ -+ instr_addr = ((unsigned long) this_reloc->r_offset + (unsigned long) tpnt->loadaddr); -+ got_addr = (char **) instr_addr; -+ -+ /* Fetch the address of the GOT entry. */ -+ new_addr = _dl_find_hash(symname, tpnt->symbol_scope, tpnt, resolver); -+ -+ if (!new_addr) { -+ new_addr = _dl_find_hash(symname, NULL, NULL, resolver); -+ -+ if (new_addr) -+ return (unsigned long) new_addr; -+ -+ _dl_dprintf(2, "%s: Can't resolv symbol '%s'\n", _dl_progname, symname); -+ _dl_exit(1); -+ } -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ if (_dl_debug_bindings) { -+ _dl_dprintf(_dl_debug_file, "\nresolve function: %s", symname); -+ -+ if (_dl_debug_detail) -+ _dl_dprintf(_dl_debug_file, "\tpatch %x ==> %x @ %x", *got_addr, new_addr, got_addr); -+ } -+#endif -+ -+ *got_addr = new_addr; -+ return (unsigned long) new_addr; -+} -+ -+static int -+_dl_parse(struct elf_resolve *tpnt, struct dyn_elf *scope, unsigned long rel_addr, -+ unsigned long rel_size, int (*reloc_fnc)(struct elf_resolve *tpnt, struct dyn_elf *scope, -+ ELF_RELOC *rpnt, Elf32_Sym *symtab, char *strtab)) -+{ -+ int symtab_index; -+ int res; -+ unsigned int i; -+ char *strtab; -+ Elf32_Sym *symtab; -+ ELF_RELOC *rpnt; -+ -+ /* Parse the relocation information. */ -+ rpnt = (ELF_RELOC *) (intptr_t) (rel_addr + tpnt->loadaddr); -+ rel_size /= sizeof(ELF_RELOC); -+ -+ symtab = (Elf32_Sym *) (intptr_t) (tpnt->dynamic_info[DT_SYMTAB] + tpnt->loadaddr); -+ strtab = (char *) (tpnt->dynamic_info[DT_STRTAB] + tpnt->loadaddr); -+ -+ for (i = 0; i < rel_size; i++, rpnt++) { -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ -+ /* -+ * Make sure the same symbols that the linker resolved when it -+ * bootstapped itself isn't resolved again. -+ */ -+ if (!symtab_index && tpnt->libtype == program_interpreter) -+ continue; -+ -+ if (symtab_index && tpnt->libtype == program_interpreter && -+ _dl_symbol(strtab + symtab[symtab_index].st_name)) -+ continue; -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ debug_sym(symtab, strtab, symtab_index); -+ debug_reloc(symtab, strtab, rpnt); -+#endif -+ -+ /* Pass over to actual relocation function. */ -+ res = reloc_fnc(tpnt, scope, rpnt, symtab, strtab); -+ -+ if (res == 0) -+ continue; -+ -+ _dl_dprintf(2, "\n%s: ", _dl_progname); -+ -+ if (symtab_index) -+ _dl_dprintf(2, "symbol '%s': ", strtab + symtab[symtab_index].st_name); -+ -+ if (res < 0) { -+ int reloc_type = ELF32_R_TYPE(rpnt->r_info); -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ _dl_dprintf(2, "can't handle relocation type '%s'\n", _dl_reltypes(reloc_type)); -+#else -+ _dl_dprintf(2, "can't handle relocation type %x\n", reloc_type); -+#endif -+ _dl_exit(-res); -+ } -+ else if (res > 0) { -+ _dl_dprintf(2, "can't resolv symbol\n"); -+ return res; -+ } -+ } -+ -+ return 0; -+} -+ -+static int -+_dl_do_reloc(struct elf_resolve *tpnt, struct dyn_elf *scope, ELF_RELOC *rpnt, -+ Elf32_Sym *symtab, char *strtab) -+{ -+ int reloc_type; -+ int symtab_index; -+ char *symname; -+ unsigned long *reloc_addr; -+ unsigned symbol_addr; -+#if defined (__SUPPORT_LD_DEBUG__) -+ unsigned long old_val; -+#endif -+ -+ reloc_addr = (unsigned long *)(intptr_t)(tpnt->loadaddr + (unsigned long) rpnt->r_offset); -+ reloc_type = ELF32_R_TYPE(rpnt->r_info); -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ symbol_addr = 0; -+ symname = strtab + symtab[symtab_index].st_name; -+ -+ if (symtab_index) { -+ if (symtab[symtab_index].st_shndx != SHN_UNDEF && -+ ELF32_ST_BIND(symtab[symtab_index].st_info) == STB_LOCAL) { -+ symbol_addr = (unsigned long) tpnt->loadaddr; -+ } -+ else { -+ symbol_addr = (unsigned long) _dl_find_hash(symname, scope, -+ (reloc_type == R_CRIS_JUMP_SLOT ? tpnt : NULL), symbolrel); -+ } -+ -+ if (!symbol_addr && ELF32_ST_BIND(symtab[symtab_index].st_info) == STB_GLOBAL) { -+#if defined (__SUPPORT_LD_DEBUG__) -+ _dl_dprintf(2, "\tglobal symbol '%s' already defined in '%s'\n", -+ symname, tpnt->libname); -+#endif -+ return 0; -+ } -+ -+ symbol_addr += rpnt->r_addend; -+ } -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ old_val = *reloc_addr; -+#endif -+ -+ switch (reloc_type) { -+ case R_CRIS_NONE: -+ break; -+ case R_CRIS_GLOB_DAT: -+ case R_CRIS_JUMP_SLOT: -+ case R_CRIS_32: -+ case R_CRIS_COPY: -+ *reloc_addr = symbol_addr; -+ break; -+ case R_CRIS_RELATIVE: -+ *reloc_addr = (unsigned long) tpnt->loadaddr + rpnt->r_addend; -+ break; -+ default: -+ return -1; /* Call _dl_exit(1). */ -+ } -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ if (_dl_debug_reloc && _dl_debug_detail) -+ _dl_dprintf(_dl_debug_file, "\tpatched: %x ==> %x @ %x", old_val, *reloc_addr, reloc_addr); -+#endif -+ -+ return 0; -+} -+ -+static int -+_dl_do_lazy_reloc(struct elf_resolve *tpnt, struct dyn_elf *scope, ELF_RELOC *rpnt, -+ Elf32_Sym *symtab, char *strtab) -+{ -+ int reloc_type; -+ unsigned long *reloc_addr; -+#if defined (__SUPPORT_LD_DEBUG__) -+ unsigned long old_val; -+#endif -+ -+ /* Don't care about these, just keep the compiler happy. */ -+ (void) scope; -+ (void) symtab; -+ (void) strtab; -+ -+ reloc_addr = (unsigned long *)(intptr_t)(tpnt->loadaddr + (unsigned long) rpnt->r_offset); -+ reloc_type = ELF32_R_TYPE(rpnt->r_info); -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ old_val = *reloc_addr; -+#endif -+ -+ switch (reloc_type) { -+ case R_CRIS_NONE: -+ break; -+ case R_CRIS_JUMP_SLOT: -+ *reloc_addr += (unsigned long) tpnt->loadaddr; -+ break; -+ default: -+ return -1; /* Calls _dl_exit(1). */ -+ } -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ if (_dl_debug_reloc && _dl_debug_detail) -+ _dl_dprintf(_dl_debug_file, "\tpatched: %x ==> %x @ %x", old_val, *reloc_addr, reloc_addr); -+#endif -+ -+ return 0; -+} -+ -+static int -+_dl_do_copy_reloc(struct elf_resolve *tpnt, struct dyn_elf *scope, ELF_RELOC *rpnt, -+ Elf32_Sym *symtab, char *strtab) -+{ -+ int goof; -+ int reloc_type; -+ int symtab_index; -+ char *symname; -+ unsigned long *reloc_addr; -+ unsigned long symbol_addr; -+ -+ reloc_addr = (unsigned long *)(intptr_t) (tpnt->loadaddr + (unsigned long) rpnt->r_offset); -+ reloc_type = ELF32_R_TYPE(rpnt->r_info); -+ -+ if (reloc_type != R_CRIS_COPY) -+ return 0; -+ -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ symbol_addr = 0; -+ symname = strtab + symtab[symtab_index].st_name; -+ goof = 0; -+ -+ if (symtab_index) { -+ symbol_addr = (unsigned long) _dl_find_hash(symname, scope, NULL, copyrel); -+ -+ if (!symbol_addr) -+ goof++; -+ } -+ -+ if (!goof) { -+#if defined (__SUPPORT_LD_DEBUG__) -+ if (_dl_debug_move) -+ _dl_dprintf(_dl_debug_file, "\n%s move %x bytes from %x to %x", -+ symname, symtab[symtab_index].st_size, symbol_addr, symtab[symtab_index].st_value); -+#endif -+ _dl_memcpy((char *) symtab[symtab_index].st_value, -+ (char *) symbol_addr, symtab[symtab_index].st_size); -+ } -+ -+ return goof; -+} -+ -+/* External interface to the generic part of the dynamic linker. */ -+ -+int -+_dl_parse_relocation_information(struct elf_resolve *tpnt, unsigned long rel_addr, -+ unsigned long rel_size, int type) -+{ -+ /* Keep the compiler happy. */ -+ (void) type; -+ return _dl_parse(tpnt, tpnt->symbol_scope, rel_addr, rel_size, _dl_do_reloc); -+} -+void -+_dl_parse_lazy_relocation_information(struct elf_resolve *tpnt, unsigned long rel_addr, -+ unsigned long rel_size, int type) -+{ -+ /* Keep the compiler happy. */ -+ (void) type; -+ _dl_parse(tpnt, NULL, rel_addr, rel_size, _dl_do_lazy_reloc); -+} -+ -+int -+_dl_parse_copy_information(struct dyn_elf *xpnt, unsigned long rel_addr, -+ unsigned long rel_size, int type) -+{ -+ /* Keep the compiler happy. */ -+ (void) type; -+ return _dl_parse(xpnt->dyn, xpnt->next, rel_addr, rel_size, _dl_do_copy_reloc); -+} -diff -urN uClibc/ldso-0.9.24/ldso/cris/ld_syscalls.h uClibc.ldso.24/ldso-0.9.24/ldso/cris/ld_syscalls.h ---- uClibc/ldso-0.9.24/ldso/cris/ld_syscalls.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/cris/ld_syscalls.h 2002-09-23 05:37:16.000000000 -0500 -@@ -0,0 +1,7 @@ -+/* -+ * Define the __set_errno macro as nothing so that INLINE_SYSCALL -+ * won't set errno, which is important since we make system calls -+ * before the errno symbol is dynamicly linked. -+ */ -+#define __set_errno(X) {(void)(X);} -+#include "sys/syscall.h" -diff -urN uClibc/ldso-0.9.24/ldso/cris/ld_sysdep.h uClibc.ldso.24/ldso-0.9.24/ldso/cris/ld_sysdep.h ---- uClibc/ldso-0.9.24/ldso/cris/ld_sysdep.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/cris/ld_sysdep.h 2003-08-27 07:59:23.000000000 -0500 -@@ -0,0 +1,112 @@ -+/* CRIS can never use Elf32_Rel relocations. */ -+#define ELF_USES_RELOCA -+ -+/* -+ * Get a pointer to the argv array. On many platforms this can be just -+ * the address if the first argument, on other platforms we need to -+ * do something a little more subtle here. -+ */ -+#define GET_ARGV(ARGVP, ARGS) ARGVP = ((unsigned long *) ARGS) -+ -+/* -+ * Initialization sequence for a GOT. -+ */ -+#define INIT_GOT(GOT_BASE,MODULE) \ -+{ \ -+ GOT_BASE[1] = (unsigned long) MODULE; \ -+ GOT_BASE[2] = (unsigned long) _dl_linux_resolve; \ -+} -+ -+/* -+ * Here is a macro to perform a relocation. This is only used when -+ * bootstrapping the dynamic loader. RELP is the relocation that we -+ * are performing, REL is the pointer to the address we are relocating. -+ * SYMBOL is the symbol involved in the relocation, and LOAD is the -+ * load address. -+ */ -+#define PERFORM_BOOTSTRAP_RELOC(RELP, REL, SYMBOL, LOAD) \ -+ switch (ELF32_R_TYPE((RELP)->r_info)) { \ -+ case R_CRIS_GLOB_DAT: \ -+ case R_CRIS_JUMP_SLOT: \ -+ case R_CRIS_32: \ -+ *REL = SYMBOL; \ -+ break; \ -+ case R_CRIS_16_PCREL: \ -+ *(short *) *REL = SYMBOL + (RELP)->r_addend - *REL - 2; \ -+ break; \ -+ case R_CRIS_32_PCREL: \ -+ *REL = SYMBOL + (RELP)->r_addend - *REL - 4; \ -+ break; \ -+ case R_CRIS_NONE: \ -+ break; \ -+ case R_CRIS_RELATIVE: \ -+ *REL = (unsigned long) LOAD + (RELP)->r_addend; \ -+ break; \ -+ default: \ -+ _dl_exit(1); \ -+ break; \ -+ } -+ -+/* -+ * Transfer control to the user's application once the dynamic loader -+ * is done. This routine has to exit the current function, then call -+ * _dl_elf_main. -+ */ -+#define START() __asm__ volatile ("moveq 0,$r8\n\t" \ -+ "move $r8,$srp\n\t" \ -+ "move.d %1,$sp\n\t" \ -+ "jump %0\n\t" \ -+ : : "r" (_dl_elf_main), "r" (args)) -+ -+/* Defined some magic numbers that this ld.so should accept. */ -+#define MAGIC1 EM_CRIS -+#undef MAGIC2 -+#define ELF_TARGET "CRIS" -+ -+struct elf_resolve; -+extern unsigned long _dl_linux_resolver(struct elf_resolve *tpnt, int reloc_entry); -+ -+/* Cheap modulo implementation, taken from arm/ld_sysdep.h. */ -+static inline unsigned long -+cris_mod(unsigned long m, unsigned long p) -+{ -+ unsigned long i, t, inc; -+ -+ i = p; -+ t = 0; -+ -+ while (!(i & (1 << 31))) { -+ i <<= 1; -+ t++; -+ } -+ -+ t--; -+ -+ for (inc = t; inc > 2; inc--) { -+ i = p << inc; -+ -+ if (i & (1 << 31)) -+ break; -+ -+ while (m >= i) { -+ m -= i; -+ i <<= 1; -+ if (i & (1 << 31)) -+ break; -+ if (i < p) -+ break; -+ } -+ } -+ -+ while (m >= p) -+ m -= p; -+ -+ return m; -+} -+ -+#define do_rem(result, n, base) result = cris_mod(n, base); -+ -+/* 8192 bytes alignment */ -+#define PAGE_ALIGN 0xffffe000 -+#define ADDR_ALIGN 0x1fff -+#define OFFS_ALIGN 0xffffe000 -diff -urN uClibc/ldso-0.9.24/ldso/cris/resolve.S uClibc.ldso.24/ldso-0.9.24/ldso/cris/resolve.S ---- uClibc/ldso-0.9.24/ldso/cris/resolve.S 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/cris/resolve.S 2002-09-16 03:11:43.000000000 -0500 -@@ -0,0 +1,48 @@ -+/* -+ * This function is _not_ called directly. It is jumped to from PLT when -+ * attempting to use a symbol that has not yet been resolved. The first -+ * time a jump symbol (such as a function call inside a shared library) -+ * is used (before it gets resolved) it will jump here. When we get called -+ * the stack contains reloc_offset and tpnt is in MOF. -+ * -+ * We save all the registers, setup R10 and R11 with the right arguments -+ * then call _dl_linux_resolver(tpnt, reloc_offset). _dl_linux_resolver() -+ * figures out where the jump symbol is _really_ supposed to have jumped to -+ * and returns that to us. Once we have that, we overwrite tpnt with this -+ * fixed up address. We then clean up after ourselves, put all the registers -+ * back how we found them, then we jump to where the fixed up address, which -+ * is where the jump symbol that got us here really wanted to jump to in the -+ * first place. -+ */ -+ -+.globl _dl_linux_resolve -+.type _dl_linux_resolve,@function -+ -+_dl_linux_resolve: -+ push $r13 -+ push $r12 -+ push $r11 -+ push $r10 -+ push $r9 -+ push $srp -+ move.d [$sp+6*4],$r11 -+ move $mof,$r10 -+#ifdef __PIC__ -+ move.d $pc,$r0 -+ sub.d .:GOTOFF,$r0 -+ move.d _dl_linux_resolver:PLTG,$r9 -+ add.d $r0,$r9 -+ jsr $r9 -+#else -+ jsr _dl_linux_resolver -+#endif -+ move.d $r10,[$sp+6*4] -+ pop $srp -+ pop $r9 -+ pop $r10 -+ pop $r11 -+ pop $r12 -+ pop $r13 -+ jump [$sp+] -+ -+ .size _dl_linux_resolve, . - _dl_linux_resolve -diff -urN uClibc/ldso-0.9.24/ldso/hash.c uClibc.ldso.24/ldso-0.9.24/ldso/hash.c ---- uClibc/ldso-0.9.24/ldso/hash.c 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/hash.c 2003-08-19 08:11:06.000000000 -0500 -@@ -0,0 +1,327 @@ -+/* vi: set sw=4 ts=4: */ -+/* Program to load an ELF binary on a linux system, and run it -+ * after resolving ELF shared library symbols -+ * -+ * Copyright (c) 1994-2000 Eric Youngdale, Peter MacDonald, -+ * David Engel, Hongjiu Lu and Mitch D'Souza -+ * Copyright (C) 2001-2002, Erik Andersen -+ * -+ * 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. The name of the above contributors may not be -+ * used to endorse or promote products derived from this software -+ * without specific prior written permission. -+ * -+ * THIS SOFTWARE IS PROVIDED BY THE 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 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. -+ */ -+ -+ -+/* Various symbol table handling functions, including symbol lookup */ -+ -+/* -+ * This is the start of the linked list that describes all of the files present -+ * in the system with pointers to all of the symbol, string, and hash tables, -+ * as well as all of the other good stuff in the binary. -+ */ -+ -+struct elf_resolve *_dl_loaded_modules = NULL; -+ -+/* -+ * This is the list of modules that are loaded when the image is first -+ * started. As we add more via dlopen, they get added into other -+ * chains. -+ */ -+struct dyn_elf *_dl_symbol_tables = NULL; -+ -+/* -+ * This is the list of modules that are loaded via dlopen. We may need -+ * to search these for RTLD_GLOBAL files. -+ */ -+struct dyn_elf *_dl_handles = NULL; -+ -+ -+/* -+ * This is the hash function that is used by the ELF linker to generate -+ * the hash table that each executable and library is required to -+ * have. We need it to decode the hash table. -+ */ -+ -+unsigned long _dl_elf_hash(const char *name) -+{ -+ unsigned long hash = 0; -+ unsigned long tmp; -+ -+ while (*name) { -+ hash = (hash << 4) + *name++; -+ if ((tmp = hash & 0xf0000000)) -+ hash ^= tmp >> 24; -+ hash &= ~tmp; -+ }; -+ return hash; -+} -+ -+/* -+ * Check to see if a library has already been added to the hash chain. -+ */ -+struct elf_resolve *_dl_check_hashed_files(const char *libname) -+{ -+ struct elf_resolve *tpnt; -+ int len = _dl_strlen(libname); -+ -+ for (tpnt = _dl_loaded_modules; tpnt; tpnt = tpnt->next) { -+ if (_dl_strncmp(tpnt->libname, libname, len) == 0 && -+ (tpnt->libname[len] == '\0' || tpnt->libname[len] == '.')) -+ return tpnt; -+ } -+ -+ return NULL; -+} -+ -+/* -+ * We call this function when we have just read an ELF library or executable. -+ * We add the relevant info to the symbol chain, so that we can resolve all -+ * externals properly. -+ */ -+ -+struct elf_resolve *_dl_add_elf_hash_table(const char *libname, -+ char *loadaddr, unsigned long *dynamic_info, unsigned long dynamic_addr, -+ unsigned long dynamic_size) -+{ -+ unsigned long *hash_addr; -+ struct elf_resolve *tpnt; -+ int i; -+ -+ if (!_dl_loaded_modules) { -+ tpnt = _dl_loaded_modules = -+ (struct elf_resolve *) _dl_malloc(sizeof(struct elf_resolve)); -+ _dl_memset(tpnt, 0, sizeof(struct elf_resolve)); -+ } else { -+ tpnt = _dl_loaded_modules; -+ while (tpnt->next) -+ tpnt = tpnt->next; -+ tpnt->next = (struct elf_resolve *) _dl_malloc(sizeof(struct elf_resolve)); -+ _dl_memset(tpnt->next, 0, sizeof(struct elf_resolve)); -+ tpnt->next->prev = tpnt; -+ tpnt = tpnt->next; -+ }; -+ -+ tpnt->next = NULL; -+ tpnt->init_flag = 0; -+ tpnt->libname = _dl_strdup(libname); -+ tpnt->dynamic_addr = (ElfW(Dyn) *)dynamic_addr; -+ tpnt->dynamic_size = dynamic_size; -+ tpnt->libtype = loaded_file; -+ -+ if (dynamic_info[DT_HASH] != 0) { -+ hash_addr = (unsigned long *) (intptr_t)(dynamic_info[DT_HASH] + loadaddr); -+ tpnt->nbucket = *hash_addr++; -+ tpnt->nchain = *hash_addr++; -+ tpnt->elf_buckets = hash_addr; -+ hash_addr += tpnt->nbucket; -+ tpnt->chains = hash_addr; -+ } -+ tpnt->loadaddr = (ElfW(Addr))loadaddr; -+ for (i = 0; i < 24; i++) -+ tpnt->dynamic_info[i] = dynamic_info[i]; -+#ifdef __mips__ -+ { -+ Elf32_Dyn *dpnt = (Elf32_Dyn *) dynamic_addr; -+ -+ while(dpnt->d_tag) { -+ if (dpnt->d_tag == DT_MIPS_GOTSYM) -+ tpnt->mips_gotsym = dpnt->d_un.d_val; -+ if (dpnt->d_tag == DT_MIPS_LOCAL_GOTNO) -+ tpnt->mips_local_gotno = dpnt->d_un.d_val; -+ if (dpnt->d_tag == DT_MIPS_SYMTABNO) -+ tpnt->mips_symtabno = dpnt->d_un.d_val; -+ dpnt++; -+ } -+ } -+#endif -+ return tpnt; -+} -+ -+ -+/* -+ * This function resolves externals, and this is either called when we process -+ * relocations or when we call an entry in the PLT table for the first time. -+ */ -+ -+char *_dl_find_hash(const char *name, struct dyn_elf *rpnt1, -+ struct elf_resolve *f_tpnt, enum caller_type caller_type) -+{ -+ struct elf_resolve *tpnt; -+ int si; -+ char *pnt; -+ int pass; -+ char *strtab; -+ Elf32_Sym *symtab; -+ unsigned long elf_hash_number, hn; -+ char *weak_result; -+ struct elf_resolve *first_def; -+ struct dyn_elf *rpnt, first; -+ char *data_result = 0; /* nakao */ -+ -+ weak_result = 0; -+ elf_hash_number = _dl_elf_hash(name); -+ -+ /* A quick little hack to make sure that any symbol in the executable -+ will be preferred to one in a shared library. This is necessary so -+ that any shared library data symbols referenced in the executable -+ will be seen at the same address by the executable, shared libraries -+ and dynamically loaded code. -Rob Ryan (robr@cmu.edu) */ -+ if (_dl_symbol_tables && !caller_type && rpnt1) { -+ first = (*_dl_symbol_tables); -+ first.next = rpnt1; -+ rpnt1 = (&first); -+ } -+ -+ /* -+ * The passes are so that we can first search the regular symbols -+ * for whatever module was specified, and then search anything -+ * loaded with RTLD_GLOBAL. When pass is 1, it means we are just -+ * starting the first dlopened module, and anything above that -+ * is just the next one in the chain. -+ */ -+ for (pass = 0; (1 == 1); pass++) { -+ -+ /* -+ * If we are just starting to search for RTLD_GLOBAL, setup -+ * the pointer for the start of the search. -+ */ -+ if (pass == 1) { -+ rpnt1 = _dl_handles; -+ } -+ -+ /* -+ * Anything after this, we need to skip to the next module. -+ */ -+ else if (pass >= 2) { -+ rpnt1 = rpnt1->next_handle; -+ } -+ -+ /* -+ * Make sure we still have a module, and make sure that this -+ * module was loaded with RTLD_GLOBAL. -+ */ -+ if (pass != 0) { -+ if (rpnt1 == NULL) -+ break; -+ if ((rpnt1->flags & RTLD_GLOBAL) == 0) -+ continue; -+ } -+ -+ for (rpnt = (rpnt1 ? rpnt1 : _dl_symbol_tables); rpnt; rpnt = rpnt->next) { -+ tpnt = rpnt->dyn; -+ -+ /* -+ * The idea here is that if we are using dlsym, we want to -+ * first search the entire chain loaded from dlopen, and -+ * return a result from that if we found anything. If this -+ * fails, then we continue the search into the stuff loaded -+ * when the image was activated. For normal lookups, we start -+ * with rpnt == NULL, so we should never hit this. -+ */ -+ if (tpnt->libtype == elf_executable && weak_result != 0) { -+ break; -+ } -+ -+ /* -+ * Avoid calling .urem here. -+ */ -+ do_rem(hn, elf_hash_number, tpnt->nbucket); -+ symtab = (Elf32_Sym *) (intptr_t) (tpnt->dynamic_info[DT_SYMTAB] + tpnt->loadaddr); -+ strtab = (char *) (tpnt->dynamic_info[DT_STRTAB] + tpnt->loadaddr); -+ /* -+ * This crap is required because the first instance of a -+ * symbol on the chain will be used for all symbol references. -+ * Thus this instance must be resolved to an address that -+ * contains the actual function, -+ */ -+ -+ first_def = NULL; -+ -+ for (si = tpnt->elf_buckets[hn]; si; si = tpnt->chains[si]) { -+ pnt = strtab + symtab[si].st_name; -+ -+ if (_dl_strcmp(pnt, name) == 0 && -+ symtab[si].st_value != 0) -+ { -+ if ((ELF32_ST_TYPE(symtab[si].st_info) == STT_FUNC || -+ ELF32_ST_TYPE(symtab[si].st_info) == STT_NOTYPE || -+ ELF32_ST_TYPE(symtab[si].st_info) == STT_OBJECT) && -+ symtab[si].st_shndx != SHN_UNDEF) { -+ -+ /* Here we make sure that we find a module where the symbol is -+ * actually defined. -+ */ -+ -+ if (f_tpnt) { -+ if (!first_def) -+ first_def = tpnt; -+ if (first_def == f_tpnt -+ && symtab[si].st_shndx == 0) -+ continue; -+ } -+ -+ switch (ELF32_ST_BIND(symtab[si].st_info)) { -+ case STB_GLOBAL: -+ if (tpnt->libtype != elf_executable && -+ ELF32_ST_TYPE(symtab[si].st_info) -+ == STT_NOTYPE) -+ { /* nakao */ -+ data_result = (char *)tpnt->loadaddr + -+ symtab[si].st_value; /* nakao */ -+ break; /* nakao */ -+ } else /* nakao */ -+ return (char*)tpnt->loadaddr + symtab[si].st_value; -+ case STB_WEAK: -+ if (!weak_result) -+ weak_result = (char *)tpnt->loadaddr + symtab[si].st_value; -+ break; -+ default: /* Do local symbols need to be examined? */ -+ break; -+ } -+ } -+#ifndef __mips__ -+ /* -+ * References to the address of a function from an executable file and -+ * the shared objects associated with it might not resolve to the same -+ * value. To allow comparisons of function addresses we must resolve -+ * to the address of the plt entry of the executable instead of the -+ * real function address. -+ * see "TIS ELF Specification Version 1.2, Book 3, A-11 (Function -+ * Adresses) -+ */ -+ if (resolver != caller_type && -+ NULL==f_tpnt && /*trick: don't handle R_??_JMP_SLOT reloc type*/ -+ tpnt->libtype == elf_executable && -+ ELF32_ST_TYPE(symtab[si].st_info) == STT_FUNC && -+ symtab[si].st_shndx == SHN_UNDEF) -+ { -+ return (char*)symtab[si].st_value; -+ } -+#endif -+ } -+ } -+ } -+ } -+ if (data_result) -+ return data_result; /* nakao */ -+ return weak_result; -+} -diff -urN uClibc/ldso-0.9.24/ldso/i386/boot1_arch.h uClibc.ldso.24/ldso-0.9.24/ldso/i386/boot1_arch.h ---- uClibc/ldso-0.9.24/ldso/i386/boot1_arch.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/i386/boot1_arch.h 2002-08-08 09:35:31.000000000 -0500 -@@ -0,0 +1,7 @@ -+/* Any assmbly language/system dependent hacks needed to setup boot1.c so it -+ * will work as expected and cope with whatever platform specific wierdness is -+ * needed for this architecture. See arm/boot1_arch.h for an example of what -+ * can be done. -+ */ -+ -+#define LD_BOOT(X) void _dl_boot (X) -diff -urN uClibc/ldso-0.9.24/ldso/i386/elfinterp.c uClibc.ldso.24/ldso-0.9.24/ldso/i386/elfinterp.c ---- uClibc/ldso-0.9.24/ldso/i386/elfinterp.c 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/i386/elfinterp.c 2003-11-06 16:09:38.000000000 -0600 -@@ -0,0 +1,415 @@ -+/* vi: set sw=4 ts=4: */ -+/* i386 ELF shared library loader suppport -+ * -+ * Copyright (c) 1994-2000 Eric Youngdale, Peter MacDonald, -+ * David Engel, Hongjiu Lu and Mitch D'Souza -+ * Copyright (C) 2001-2002, Erik Andersen -+ * -+ * 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. The name of the above contributors may not be -+ * used to endorse or promote products derived from this software -+ * without specific prior written permission. -+ * -+ * THIS SOFTWARE IS PROVIDED BY THE 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 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. -+ */ -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+static const char *_dl_reltypes_tab[] = -+{ -+ [0] "R_386_NONE", "R_386_32", "R_386_PC32", "R_386_GOT32", -+ [4] "R_386_PLT32", "R_386_COPY", "R_386_GLOB_DAT", "R_386_JMP_SLOT", -+ [8] "R_386_RELATIVE", "R_386_GOTOFF", "R_386_GOTPC", -+}; -+ -+static const char * -+_dl_reltypes(int type) -+{ -+ static char buf[22]; -+ const char *str; -+ -+ if (type >= (int)(sizeof (_dl_reltypes_tab)/sizeof(_dl_reltypes_tab[0])) || -+ NULL == (str = _dl_reltypes_tab[type])) -+ { -+ str =_dl_simple_ltoa( buf, (unsigned long)(type)); -+ } -+ return str; -+} -+ -+static -+void debug_sym(Elf32_Sym *symtab,char *strtab,int symtab_index) -+{ -+ if(_dl_debug_symbols) -+ { -+ if(symtab_index){ -+ _dl_dprintf(_dl_debug_file, "\n%s\n\tvalue=%x\tsize=%x\tinfo=%x\tother=%x\tshndx=%x", -+ strtab + symtab[symtab_index].st_name, -+ symtab[symtab_index].st_value, -+ symtab[symtab_index].st_size, -+ symtab[symtab_index].st_info, -+ symtab[symtab_index].st_other, -+ symtab[symtab_index].st_shndx); -+ } -+ } -+} -+ -+static void debug_reloc(Elf32_Sym *symtab,char *strtab, ELF_RELOC *rpnt) -+{ -+ if(_dl_debug_reloc) -+ { -+ int symtab_index; -+ const char *sym; -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ sym = symtab_index ? strtab + symtab[symtab_index].st_name : "sym=0x0"; -+ -+ if(_dl_debug_symbols) -+ _dl_dprintf(_dl_debug_file, "\n\t"); -+ else -+ _dl_dprintf(_dl_debug_file, "\n%s\n\t", sym); -+#ifdef ELF_USES_RELOCA -+ _dl_dprintf(_dl_debug_file, "%s\toffset=%x\taddend=%x", -+ _dl_reltypes(ELF32_R_TYPE(rpnt->r_info)), -+ rpnt->r_offset, -+ rpnt->r_addend); -+#else -+ _dl_dprintf(_dl_debug_file, "%s\toffset=%x\n", -+ _dl_reltypes(ELF32_R_TYPE(rpnt->r_info)), -+ rpnt->r_offset); -+#endif -+ } -+} -+#endif -+ -+/* Program to load an ELF binary on a linux system, and run it. -+ References to symbols in sharable libraries can be resolved by either -+ an ELF sharable library or a linux style of shared library. */ -+ -+/* Disclaimer: I have never seen any AT&T source code for SVr4, nor have -+ I ever taken any courses on internals. This program was developed using -+ information available through the book "UNIX SYSTEM V RELEASE 4, -+ Programmers guide: Ansi C and Programming Support Tools", which did -+ a more than adequate job of explaining everything required to get this -+ working. */ -+ -+extern int _dl_linux_resolve(void); -+ -+unsigned long _dl_linux_resolver(struct elf_resolve *tpnt, int reloc_entry) -+{ -+ int reloc_type; -+ ELF_RELOC *this_reloc; -+ char *strtab; -+ Elf32_Sym *symtab; -+ int symtab_index; -+ char *rel_addr; -+ char *new_addr; -+ char **got_addr; -+ unsigned long instr_addr; -+ char *symname; -+ -+ rel_addr = (char *) (tpnt->dynamic_info[DT_JMPREL] + tpnt->loadaddr); -+ -+ this_reloc = (ELF_RELOC *)(intptr_t)(rel_addr + reloc_entry); -+ reloc_type = ELF32_R_TYPE(this_reloc->r_info); -+ symtab_index = ELF32_R_SYM(this_reloc->r_info); -+ -+ symtab = (Elf32_Sym *)(intptr_t) (tpnt->dynamic_info[DT_SYMTAB] + tpnt->loadaddr); -+ strtab = (char *) (tpnt->dynamic_info[DT_STRTAB] + tpnt->loadaddr); -+ symname= strtab + symtab[symtab_index].st_name; -+ -+ if (reloc_type != R_386_JMP_SLOT) { -+ _dl_dprintf(2, "%s: Incorrect relocation type in jump relocations\n", -+ _dl_progname); -+ _dl_exit(1); -+ } -+ -+ /* Address of jump instruction to fix up */ -+ instr_addr = ((unsigned long) this_reloc->r_offset + -+ (unsigned long) tpnt->loadaddr); -+ got_addr = (char **) instr_addr; -+ -+ /* Get the address of the GOT entry */ -+ new_addr = _dl_find_hash(symname, tpnt->symbol_scope, tpnt, resolver); -+ if (!new_addr) { -+ new_addr = _dl_find_hash(symname, NULL, NULL, resolver); -+ if (new_addr) { -+ return (unsigned long) new_addr; -+ } -+ _dl_dprintf(2, "%s: can't resolve symbol '%s'\n", _dl_progname, symname); -+ _dl_exit(1); -+ } -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ if ((unsigned long) got_addr < 0x40000000) -+ { -+ if (_dl_debug_bindings) -+ { -+ _dl_dprintf(_dl_debug_file, "\nresolve function: %s", symname); -+ if(_dl_debug_detail) _dl_dprintf(_dl_debug_file, -+ "\n\tpatched %x ==> %x @ %x\n", *got_addr, new_addr, got_addr); -+ } -+ } -+ if (!_dl_debug_nofixups) { -+ *got_addr = new_addr; -+ } -+#else -+ *got_addr = new_addr; -+#endif -+ -+ return (unsigned long) new_addr; -+} -+ -+static int -+_dl_parse(struct elf_resolve *tpnt, struct dyn_elf *scope, -+ unsigned long rel_addr, unsigned long rel_size, -+ int (*reloc_fnc) (struct elf_resolve *tpnt, struct dyn_elf *scope, -+ ELF_RELOC *rpnt, Elf32_Sym *symtab, char *strtab)) -+{ -+ unsigned int i; -+ char *strtab; -+ Elf32_Sym *symtab; -+ ELF_RELOC *rpnt; -+ int symtab_index; -+ -+ /* Now parse the relocation information */ -+ rpnt = (ELF_RELOC *)(intptr_t) (rel_addr + tpnt->loadaddr); -+ rel_size = rel_size / sizeof(ELF_RELOC); -+ -+ symtab = (Elf32_Sym *)(intptr_t) (tpnt->dynamic_info[DT_SYMTAB] + tpnt->loadaddr); -+ strtab = (char *) (tpnt->dynamic_info[DT_STRTAB] + tpnt->loadaddr); -+ -+ for (i = 0; i < rel_size; i++, rpnt++) { -+ int res; -+ -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ -+ /* When the dynamic linker bootstrapped itself, it resolved some symbols. -+ Make sure we do not do them again */ -+ if (!symtab_index && tpnt->libtype == program_interpreter) -+ continue; -+ if (symtab_index && tpnt->libtype == program_interpreter && -+ _dl_symbol(strtab + symtab[symtab_index].st_name)) -+ continue; -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ debug_sym(symtab,strtab,symtab_index); -+ debug_reloc(symtab,strtab,rpnt); -+#endif -+ -+ res = reloc_fnc (tpnt, scope, rpnt, symtab, strtab); -+ -+ if (res==0) continue; -+ -+ _dl_dprintf(2, "\n%s: ",_dl_progname); -+ -+ if (symtab_index) -+ _dl_dprintf(2, "symbol '%s': ", strtab + symtab[symtab_index].st_name); -+ -+ if (res <0) -+ { -+ int reloc_type = ELF32_R_TYPE(rpnt->r_info); -+#if defined (__SUPPORT_LD_DEBUG__) -+ _dl_dprintf(2, "can't handle reloc type %s\n ", _dl_reltypes(reloc_type)); -+#else -+ _dl_dprintf(2, "can't handle reloc type %x\n", reloc_type); -+#endif -+ _dl_exit(-res); -+ } -+ else if (res >0) -+ { -+ _dl_dprintf(2, "can't resolve symbol\n"); -+ return res; -+ } -+ } -+ return 0; -+} -+ -+ -+static int -+_dl_do_reloc (struct elf_resolve *tpnt,struct dyn_elf *scope, -+ ELF_RELOC *rpnt, Elf32_Sym *symtab, char *strtab) -+{ -+ int reloc_type; -+ int symtab_index; -+ char *symname; -+ unsigned long *reloc_addr; -+ unsigned long symbol_addr; -+#if defined (__SUPPORT_LD_DEBUG__) -+ unsigned long old_val; -+#endif -+ -+ reloc_addr = (unsigned long *)(intptr_t) (tpnt->loadaddr + (unsigned long) rpnt->r_offset); -+ reloc_type = ELF32_R_TYPE(rpnt->r_info); -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ symbol_addr = 0; -+ symname = strtab + symtab[symtab_index].st_name; -+ -+ if (symtab_index) { -+ -+ symbol_addr = (unsigned long) _dl_find_hash(symname, scope, -+ (reloc_type == R_386_JMP_SLOT ? tpnt : NULL), symbolrel); -+ -+ /* -+ * We want to allow undefined references to weak symbols - this might -+ * have been intentional. We should not be linking local symbols -+ * here, so all bases should be covered. -+ */ -+ -+ if (!symbol_addr && ELF32_ST_BIND(symtab[symtab_index].st_info) == STB_GLOBAL) { -+#if defined (__SUPPORT_LD_DEBUG__) -+ _dl_dprintf(2, "\tglobal symbol '%s' already defined in '%s'\n", -+ symname, tpnt->libname); -+#endif -+ return 0; -+ } -+ } -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ old_val = *reloc_addr; -+#endif -+ switch (reloc_type) { -+ case R_386_NONE: -+ break; -+ case R_386_32: -+ *reloc_addr += symbol_addr; -+ break; -+ case R_386_PC32: -+ *reloc_addr += symbol_addr - (unsigned long) reloc_addr; -+ break; -+ case R_386_GLOB_DAT: -+ case R_386_JMP_SLOT: -+ *reloc_addr = symbol_addr; -+ break; -+ case R_386_RELATIVE: -+ *reloc_addr += (unsigned long) tpnt->loadaddr; -+ break; -+ case R_386_COPY: -+ /* handled later on */ -+ break; -+ default: -+ return -1; /*call _dl_exit(1) */ -+ } -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug_reloc && _dl_debug_detail) -+ _dl_dprintf(_dl_debug_file, "\tpatched: %x ==> %x @ %x", old_val, *reloc_addr, reloc_addr); -+#endif -+ -+ return 0; -+} -+ -+static int -+_dl_do_lazy_reloc (struct elf_resolve *tpnt, struct dyn_elf *scope, -+ ELF_RELOC *rpnt, Elf32_Sym *symtab, char *strtab) -+{ -+ int reloc_type; -+ unsigned long *reloc_addr; -+#if defined (__SUPPORT_LD_DEBUG__) -+ unsigned long old_val; -+#endif -+ (void)scope; -+ (void)symtab; -+ (void)strtab; -+ -+ reloc_addr = (unsigned long *)(intptr_t) (tpnt->loadaddr + (unsigned long) rpnt->r_offset); -+ reloc_type = ELF32_R_TYPE(rpnt->r_info); -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ old_val = *reloc_addr; -+#endif -+ switch (reloc_type) { -+ case R_386_NONE: -+ break; -+ case R_386_JMP_SLOT: -+ *reloc_addr += (unsigned long) tpnt->loadaddr; -+ break; -+ default: -+ return -1; /*call _dl_exit(1) */ -+ } -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug_reloc && _dl_debug_detail) -+ _dl_dprintf(_dl_debug_file, "\tpatched: %x ==> %x @ %x", old_val, *reloc_addr, reloc_addr); -+#endif -+ return 0; -+ -+} -+ -+/* This is done as a separate step, because there are cases where -+ information is first copied and later initialized. This results in -+ the wrong information being copied. Someone at Sun was complaining about -+ a bug in the handling of _COPY by SVr4, and this may in fact be what he -+ was talking about. Sigh. */ -+ -+/* No, there are cases where the SVr4 linker fails to emit COPY relocs -+ at all */ -+static int -+_dl_do_copy (struct elf_resolve *tpnt, struct dyn_elf *scope, -+ ELF_RELOC *rpnt, Elf32_Sym *symtab, char *strtab) -+{ -+ int reloc_type; -+ int symtab_index; -+ unsigned long *reloc_addr; -+ unsigned long symbol_addr; -+ int goof = 0; -+ char *symname; -+ -+ reloc_addr = (unsigned long *)(intptr_t) (tpnt->loadaddr + (unsigned long) rpnt->r_offset); -+ reloc_type = ELF32_R_TYPE(rpnt->r_info); -+ if (reloc_type != R_386_COPY) -+ return 0; -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ symbol_addr = 0; -+ symname = strtab + symtab[symtab_index].st_name; -+ -+ if (symtab_index) { -+ symbol_addr = (unsigned long) _dl_find_hash(symname, scope, NULL, copyrel); -+ if (!symbol_addr) goof++; -+ } -+ if (!goof) { -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug_move) -+ _dl_dprintf(_dl_debug_file,"\n%s move %x bytes from %x to %x", -+ symname, symtab[symtab_index].st_size, -+ symbol_addr, symtab[symtab_index].st_value); -+#endif -+ _dl_memcpy((char *) symtab[symtab_index].st_value, -+ (char *) symbol_addr, symtab[symtab_index].st_size); -+ } -+ -+ return goof; -+} -+ -+void _dl_parse_lazy_relocation_information(struct elf_resolve *tpnt, -+ unsigned long rel_addr, unsigned long rel_size, int type) -+{ -+ (void) type; -+ (void)_dl_parse(tpnt, NULL, rel_addr, rel_size, _dl_do_lazy_reloc); -+} -+ -+int _dl_parse_relocation_information(struct elf_resolve *tpnt, -+ unsigned long rel_addr, unsigned long rel_size, int type) -+{ -+ (void) type; -+ return _dl_parse(tpnt, tpnt->symbol_scope, rel_addr, rel_size, _dl_do_reloc); -+} -+ -+int _dl_parse_copy_information(struct dyn_elf *xpnt, unsigned long rel_addr, -+ unsigned long rel_size, int type) -+{ -+ (void) type; -+ return _dl_parse(xpnt->dyn, xpnt->next, rel_addr, rel_size, _dl_do_copy); -+} -+ -diff -urN uClibc/ldso-0.9.24/ldso/i386/ld_syscalls.h uClibc.ldso.24/ldso-0.9.24/ldso/i386/ld_syscalls.h ---- uClibc/ldso-0.9.24/ldso/i386/ld_syscalls.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/i386/ld_syscalls.h 2002-08-09 07:20:21.000000000 -0500 -@@ -0,0 +1,7 @@ -+/* Define the __set_errno macro as nothing so that INLINE_SYSCALL -+ * won't set errno, which is important since we make system calls -+ * before the errno symbol is dynamicly linked. */ -+ -+#define __set_errno(X) {(void)(X);} -+#include "sys/syscall.h" -+ -diff -urN uClibc/ldso-0.9.24/ldso/i386/ld_sysdep.h uClibc.ldso.24/ldso-0.9.24/ldso/i386/ld_sysdep.h ---- uClibc/ldso-0.9.24/ldso/i386/ld_sysdep.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/i386/ld_sysdep.h 2002-05-28 16:33:32.000000000 -0500 -@@ -0,0 +1,81 @@ -+/* -+ * Various assmbly language/system dependent hacks that are required -+ * so that we can minimize the amount of platform specific code. -+ */ -+ -+/* -+ * Define this if the system uses RELOCA. -+ */ -+#undef ELF_USES_RELOCA -+ -+/* -+ * Get a pointer to the argv array. On many platforms this can be just -+ * the address if the first argument, on other platforms we need to -+ * do something a little more subtle here. -+ */ -+#define GET_ARGV(ARGVP, ARGS) ARGVP = ((unsigned long*) & ARGS) -+ -+/* -+ * Initialization sequence for a GOT. -+ */ -+#define INIT_GOT(GOT_BASE,MODULE) \ -+{ \ -+ GOT_BASE[2] = (unsigned long) _dl_linux_resolve; \ -+ GOT_BASE[1] = (unsigned long) MODULE; \ -+} -+ -+/* -+ * Here is a macro to perform a relocation. This is only used when -+ * bootstrapping the dynamic loader. RELP is the relocation that we -+ * are performing, REL is the pointer to the address we are relocating. -+ * SYMBOL is the symbol involved in the relocation, and LOAD is the -+ * load address. -+ */ -+#define PERFORM_BOOTSTRAP_RELOC(RELP,REL,SYMBOL,LOAD) \ -+ switch(ELF32_R_TYPE((RELP)->r_info)){ \ -+ case R_386_32: \ -+ *REL += SYMBOL; \ -+ break; \ -+ case R_386_PC32: \ -+ *REL += SYMBOL - (unsigned long) REL; \ -+ break; \ -+ case R_386_GLOB_DAT: \ -+ case R_386_JMP_SLOT: \ -+ *REL = SYMBOL; \ -+ break; \ -+ case R_386_RELATIVE: \ -+ *REL += (unsigned long) LOAD; \ -+ break; \ -+ default: \ -+ _dl_exit(1); \ -+ } -+ -+ -+/* -+ * Transfer control to the user's application, once the dynamic loader -+ * is done. This routine has to exit the current function, then -+ * call the _dl_elf_main function. -+ */ -+#define START() \ -+ __asm__ volatile ("leave\n\t" \ -+ "jmp *%%eax\n\t" \ -+ : "=a" (status) : "a" (_dl_elf_main)) -+ -+ -+ -+/* Here we define the magic numbers that this dynamic loader should accept */ -+ -+#define MAGIC1 EM_386 -+#undef MAGIC2 -+/* Used for error messages */ -+#define ELF_TARGET "386" -+ -+struct elf_resolve; -+extern unsigned long _dl_linux_resolver(struct elf_resolve * tpnt, int reloc_entry); -+ -+#define do_rem(result, n, base) result = (n % base) -+ -+/* 4096 bytes alignment */ -+#define PAGE_ALIGN 0xfffff000 -+#define ADDR_ALIGN 0xfff -+#define OFFS_ALIGN 0x7ffff000 -diff -urN uClibc/ldso-0.9.24/ldso/i386/resolve.S uClibc.ldso.24/ldso-0.9.24/ldso/i386/resolve.S ---- uClibc/ldso-0.9.24/ldso/i386/resolve.S 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/i386/resolve.S 2001-06-14 16:51:51.000000000 -0500 -@@ -0,0 +1,52 @@ -+/* -+ * This function is _not_ called directly. It is jumped to (so no return -+ * address is on the stack) when attempting to use a symbol that has not yet -+ * been resolved. The first time a jump symbol (such as a function call inside -+ * a shared library) is used (before it gets resolved) it will jump here to -+ * _dl_linux_resolve. When we get called the stack looks like this: -+ * reloc_entry -+ * tpnt -+ * -+ * This function saves all the registers, puts a copy of reloc_entry and tpnt -+ * on the stack (as function arguments) then make the function call -+ * _dl_linux_resolver(tpnt, reloc_entry). _dl_linux_resolver() figures out -+ * where the jump symbol is _really_ supposed to have jumped to and returns -+ * that to us. Once we have that, we overwrite tpnt with this fixed up -+ * address. We then clean up after ourselves, put all the registers back how we -+ * found them, then we jump to where the fixed up address, which is where the -+ * jump symbol that got us here really wanted to jump to in the first place. -+ * found them, then we jump to the fixed up address, which is where the jump -+ * symbol that got us here really wanted to jump to in the first place. -+ * -Erik Andersen -+ */ -+ -+.text -+.align 4 -+ -+.globl _dl_linux_resolve -+.type _dl_linux_resolve,@function -+ -+_dl_linux_resolve: -+ pusha /* preserve all regs */ -+ lea 0x20(%esp),%eax /* eax = tpnt and reloc_entry params */ -+ pushl 4(%eax) /* push copy of reloc_entry param */ -+ pushl (%eax) /* push copy of tpnt param */ -+ -+#ifdef __PIC__ -+ call .L24 -+.L24: -+ popl %ebx -+ addl $_GLOBAL_OFFSET_TABLE_+[.-.L24],%ebx -+ movl _dl_linux_resolver@GOT(%ebx),%ebx /* eax = resolved func */ -+ call *%ebx -+#else -+ call _dl_linux_resolver -+#endif -+ movl %eax,0x28(%esp) /* store func addr over original -+ * tpnt param */ -+ addl $0x8,%esp /* remove copy parameters */ -+ popa /* restore regs */ -+ ret $4 /* jump to func removing original -+ * reloc_entry param from stack */ -+.LFE2: -+ .size _dl_linux_resolve,.LFE2-_dl_linux_resolve -diff -urN uClibc/ldso-0.9.24/ldso/ldso.c uClibc.ldso.24/ldso-0.9.24/ldso/ldso.c ---- uClibc/ldso-0.9.24/ldso/ldso.c 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/ldso.c 2003-12-05 14:24:26.000000000 -0600 -@@ -0,0 +1,1296 @@ -+/* vi: set sw=4 ts=4: */ -+/* Program to load an ELF binary on a linux system, and run it -+ * after resolving ELF shared library symbols -+ * -+ * Copyright (c) 1994-2000 Eric Youngdale, Peter MacDonald, -+ * David Engel, Hongjiu Lu and Mitch D'Souza -+ * Copyright (C) 2001-2002, Erik Andersen -+ * -+ * 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. The name of the above contributors may not be -+ * used to endorse or promote products derived from this software -+ * without specific prior written permission. -+ * -+ * THIS SOFTWARE IS PROVIDED BY THE 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 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. -+ */ -+ -+// Support a list of library preloads in /etc/ld.so.preload -+//#define SUPPORT_LDSO_PRELOAD_FILE -+ -+ -+/* Disclaimer: I have never seen any AT&T source code for SVr4, nor have -+ I ever taken any courses on internals. This program was developed using -+ information available through the book "UNIX SYSTEM V RELEASE 4, -+ Programmers guide: Ansi C and Programming Support Tools", which did -+ a more than adequate job of explaining everything required to get this -+ working. */ -+ -+/* -+ * The main trick with this program is that initially, we ourselves are -+ * not dynamicly linked. This means that we cannot access any global -+ * variables or call any functions. No globals initially, since the -+ * Global Offset Table (GOT) is initialized by the linker assuming a -+ * virtual address of 0, and no function calls initially since the -+ * Procedure Linkage Table (PLT) is not yet initialized. -+ * -+ * There are additional initial restrictions - we cannot use large -+ * switch statements, since the compiler generates tables of addresses -+ * and jumps through them. We can use inline functions, because these -+ * do not transfer control to a new address, but they must be static so -+ * that they are not exported from the modules. We cannot use normal -+ * syscall stubs, because these all reference the errno global variable -+ * which is not yet initialized. We can use all of the local stack -+ * variables that we want. -+ * -+ * Life is further complicated by the fact that initially we do not -+ * want to do a complete dynamic linking. We want to allow the user to -+ * supply new functions to override symbols (i.e. weak symbols and/or -+ * LD_PRELOAD). So initially, we only perform relocations for -+ * variables that start with "_dl_" since ANSI specifies that the user -+ * is not supposed to redefine any of these variables. -+ * -+ * Fortunately, the linker itself leaves a few clues lying around, and -+ * when the kernel starts the image, there are a few further clues. -+ * First of all, there is Auxiliary Vector Table information sitting on -+ * which is provided to us by the kernel, and which includes -+ * information about the load address that the program interpreter was -+ * loaded at, the number of sections, the address the application was -+ * loaded at and so forth. Here this information is stored in the -+ * array auxvt. For details see linux/fs/binfmt_elf.c where it calls -+ * NEW_AUX_ENT() a bunch of time.... -+ * -+ * Next, we need to find the GOT. On most arches there is a register -+ * pointing to the GOT, but just in case (and for new ports) I've added -+ * some (slow) C code to locate the GOT for you. -+ * -+ * This code was originally written for SVr4, and there the kernel -+ * would load all text pages R/O, so they needed to call mprotect a -+ * zillion times to mark all text pages as writable so dynamic linking -+ * would succeed. Then when they were done, they would change the -+ * protections for all the pages back again. Well, under Linux -+ * everything is loaded writable (since Linux does copy on write -+ * anyways) so all the mprotect stuff has been disabled. -+ * -+ * Initially, we do not have access to _dl_malloc since we can't yet -+ * make function calls, so we mmap one page to use as scratch space. -+ * Later on, when we can call _dl_malloc we reuse this this memory. -+ * This is also beneficial, since we do not want to use the same memory -+ * pool as malloc anyway - esp if the user redefines malloc to do -+ * something funky. -+ * -+ * Our first task is to perform a minimal linking so that we can call -+ * other portions of the dynamic linker. Once we have done this, we -+ * then build the list of modules that the application requires, using -+ * LD_LIBRARY_PATH if this is not a suid program (/usr/lib otherwise). -+ * Once this is done, we can do the dynamic linking as required, and we -+ * must omit the things we did to get the dynamic linker up and running -+ * in the first place. After we have done this, we just have a few -+ * housekeeping chores and we can transfer control to the user's -+ * application. -+ */ -+ -+#include "ldso.h" -+ -+ -+#define ALLOW_ZERO_PLTGOT -+ -+/* Some arches may need to override this in boot1_arch.h */ -+#define ELFMAGIC ELFMAG -+ -+/* This is a poor man's malloc, used prior to resolving our internal poor man's malloc */ -+#define LD_MALLOC(SIZE) ((void *) (malloc_buffer += SIZE, malloc_buffer - SIZE)) ; REALIGN(); -+/* -+ * Make sure that the malloc buffer is aligned on 4 byte boundary. For 64 bit -+ * platforms we may need to increase this to 8, but this is good enough for -+ * now. This is typically called after LD_MALLOC. -+ */ -+#define REALIGN() malloc_buffer = (char *) (((unsigned long) malloc_buffer + 3) & ~(3)) -+ -+char *_dl_library_path = 0; /* Where we look for libraries */ -+char *_dl_preload = 0; /* Things to be loaded before the libs. */ -+char *_dl_ldsopath = 0; -+static int _dl_be_lazy = RTLD_LAZY; -+#ifdef __SUPPORT_LD_DEBUG__ -+char *_dl_debug = 0; -+char *_dl_debug_symbols = 0; -+char *_dl_debug_move = 0; -+char *_dl_debug_reloc = 0; -+char *_dl_debug_detail = 0; -+char *_dl_debug_nofixups = 0; -+char *_dl_debug_bindings = 0; -+int _dl_debug_file = 2; -+#else -+#define _dl_debug_file 2 -+#endif -+static char *_dl_malloc_addr, *_dl_mmap_zero; -+ -+static char *_dl_trace_loaded_objects = 0; -+static int (*_dl_elf_main) (int, char **, char **); -+struct r_debug *_dl_debug_addr = NULL; -+unsigned long *_dl_brkp; -+unsigned long *_dl_envp; -+int _dl_fixup(struct elf_resolve *tpnt, int lazy); -+void _dl_debug_state(void); -+char *_dl_get_last_path_component(char *path); -+static void _dl_get_ready_to_run(struct elf_resolve *tpnt, struct elf_resolve *app_tpnt, -+ unsigned long load_addr, unsigned long *hash_addr, Elf32_auxv_t auxvt[AT_EGID + 1], -+ char **envp, struct r_debug *debug_addr); -+ -+#include "boot1_arch.h" -+#include "_dl_progname.h" /* Pull in the value of _dl_progname */ -+ -+/* When we enter this piece of code, the program stack looks like this: -+ argc argument counter (integer) -+ argv[0] program name (pointer) -+ argv[1...N] program args (pointers) -+ argv[argc-1] end of args (integer) -+ NULL -+ env[0...N] environment variables (pointers) -+ NULL -+ auxvt[0...N] Auxiliary Vector Table elements (mixed types) -+*/ -+ -+#ifdef __SUPPORT_LD_DEBUG_EARLY__ -+/* Debugging is especially tricky on PowerPC, since string literals -+ * require relocations. Thus, you can't use _dl_dprintf() for -+ * anything until the bootstrap relocations are finished. */ -+static inline void hexprint(unsigned long x) -+{ -+ int i; -+ char c; -+ -+ for (i = 0; i < 8; i++) { -+ c = ((x >> 28) + '0'); -+ if (c > '9') -+ c += 'a' - '9' - 1; -+ _dl_write(1, &c, 1); -+ x <<= 4; -+ } -+ c = '\n'; -+ _dl_write(1, &c, 1); -+} -+#endif -+ -+LD_BOOT(unsigned long args) __attribute__ ((unused)); -+ -+LD_BOOT(unsigned long args) -+{ -+ unsigned int argc; -+ char **argv, **envp; -+ unsigned long load_addr; -+ unsigned long *got; -+ unsigned long *aux_dat; -+ int goof = 0; -+ ElfW(Ehdr) *header; -+ struct elf_resolve *tpnt; -+ struct elf_resolve *app_tpnt; -+ Elf32_auxv_t auxvt[AT_EGID + 1]; -+ unsigned char *malloc_buffer, *mmap_zero; -+ Elf32_Dyn *dpnt; -+ unsigned long *hash_addr; -+ struct r_debug *debug_addr = NULL; -+ int indx; -+ int status; -+ -+ -+ /* WARNING! -- we cannot make _any_ funtion calls until we have -+ * taken care of fixing up our own relocations. Making static -+ * inline calls is ok, but _no_ function calls. Not yet -+ * anyways. */ -+ -+ /* First obtain the information on the stack that tells us more about -+ what binary is loaded, where it is loaded, etc, etc */ -+ GET_ARGV(aux_dat, args); -+#if defined (__arm__) || defined (__mips__) || defined (__cris__) -+ aux_dat += 1; -+#endif -+ argc = *(aux_dat - 1); -+ argv = (char **) aux_dat; -+ aux_dat += argc; /* Skip over the argv pointers */ -+ aux_dat++; /* Skip over NULL at end of argv */ -+ envp = (char **) aux_dat; -+ while (*aux_dat) -+ aux_dat++; /* Skip over the envp pointers */ -+ aux_dat++; /* Skip over NULL at end of envp */ -+ -+ /* Place -1 here as a checkpoint. We later check if it was changed -+ * when we read in the auxvt */ -+ auxvt[AT_UID].a_type = -1; -+ -+ /* The junk on the stack immediately following the environment is -+ * the Auxiliary Vector Table. Read out the elements of the auxvt, -+ * sort and store them in auxvt for later use. */ -+ while (*aux_dat) { -+ Elf32_auxv_t *auxv_entry = (Elf32_auxv_t *) aux_dat; -+ -+ if (auxv_entry->a_type <= AT_EGID) { -+ _dl_memcpy(&(auxvt[auxv_entry->a_type]), auxv_entry, sizeof(Elf32_auxv_t)); -+ } -+ aux_dat += 2; -+ } -+ -+ /* locate the ELF header. We need this done as soon as possible -+ * (esp since SEND_STDERR() needs this on some platforms... */ -+ load_addr = auxvt[AT_BASE].a_un.a_val; -+ header = (ElfW(Ehdr) *) auxvt[AT_BASE].a_un.a_ptr; -+ -+ /* Check the ELF header to make sure everything looks ok. */ -+ if (!header || header->e_ident[EI_CLASS] != ELFCLASS32 || -+ header->e_ident[EI_VERSION] != EV_CURRENT -+#if !defined(__powerpc__) && !defined(__mips__) && !defined(__sh__) -+ || _dl_strncmp((void *) header, ELFMAGIC, SELFMAG) != 0 -+#else -+ || header->e_ident[EI_MAG0] != ELFMAG0 -+ || header->e_ident[EI_MAG1] != ELFMAG1 -+ || header->e_ident[EI_MAG2] != ELFMAG2 -+ || header->e_ident[EI_MAG3] != ELFMAG3 -+#endif -+ ) { -+ SEND_STDERR("Invalid ELF header\n"); -+ _dl_exit(0); -+ } -+#ifdef __SUPPORT_LD_DEBUG_EARLY__ -+ SEND_STDERR("ELF header="); -+ SEND_ADDRESS_STDERR(load_addr, 1); -+#endif -+ -+ -+ /* Locate the global offset table. Since this code must be PIC -+ * we can take advantage of the magic offset register, if we -+ * happen to know what that is for this architecture. If not, -+ * we can always read stuff out of the ELF file to find it... */ -+#if defined(__i386__) -+ __asm__("\tmovl %%ebx,%0\n\t":"=a"(got)); -+#elif defined(__m68k__) -+ __asm__("movel %%a5,%0":"=g"(got)) -+#elif defined(__sparc__) -+ __asm__("\tmov %%l7,%0\n\t":"=r"(got)) -+#elif defined(__arm__) -+ __asm__("\tmov %0, r10\n\t":"=r"(got)); -+#elif defined(__powerpc__) -+ __asm__("\tbl _GLOBAL_OFFSET_TABLE_-4@local\n\t":"=l"(got)); -+#elif defined(__mips__) -+ __asm__("\tmove %0, $28\n\tsubu %0,%0,0x7ff0\n\t":"=r"(got)); -+#elif defined(__sh__) -+ __asm__( -+" mov.l 1f, %0\n" -+" mova 1f, r0\n" -+" bra 2f\n" -+" add r0, %0\n" -+" .balign 4\n" -+"1: .long _GLOBAL_OFFSET_TABLE_\n" -+"2:" : "=r" (got) : : "r0"); -+#elif defined(__cris__) -+ __asm__("\tmove.d $pc,%0\n\tsub.d .:GOTOFF,%0\n\t":"=r"(got)); -+#else -+ /* Do things the slow way in C */ -+ { -+ unsigned long tx_reloc; -+ Elf32_Dyn *dynamic = NULL; -+ Elf32_Shdr *shdr; -+ Elf32_Phdr *pt_load; -+ -+#ifdef __SUPPORT_LD_DEBUG_EARLY__ -+ SEND_STDERR("Finding the GOT using C code to read the ELF file\n"); -+#endif -+ /* Find where the dynamic linking information section is hiding */ -+ shdr = (Elf32_Shdr *) (header->e_shoff + (char *) header); -+ for (indx = header->e_shnum; --indx >= 0; ++shdr) { -+ if (shdr->sh_type == SHT_DYNAMIC) { -+ goto found_dynamic; -+ } -+ } -+ SEND_STDERR("missing dynamic linking information section \n"); -+ _dl_exit(0); -+ -+ found_dynamic: -+ dynamic = (Elf32_Dyn *) (shdr->sh_offset + (char *) header); -+ -+ /* Find where PT_LOAD is hiding */ -+ pt_load = (Elf32_Phdr *) (header->e_phoff + (char *) header); -+ for (indx = header->e_phnum; --indx >= 0; ++pt_load) { -+ if (pt_load->p_type == PT_LOAD) { -+ goto found_pt_load; -+ } -+ } -+ SEND_STDERR("missing loadable program segment\n"); -+ _dl_exit(0); -+ -+ found_pt_load: -+ /* Now (finally) find where DT_PLTGOT is hiding */ -+ tx_reloc = pt_load->p_vaddr - pt_load->p_offset; -+ for (; DT_NULL != dynamic->d_tag; ++dynamic) { -+ if (dynamic->d_tag == DT_PLTGOT) { -+ goto found_got; -+ } -+ } -+ SEND_STDERR("missing global offset table\n"); -+ _dl_exit(0); -+ -+ found_got: -+ got = (unsigned long *) (dynamic->d_un.d_val - tx_reloc + -+ (char *) header); -+ } -+#endif -+ -+ /* Now, finally, fix up the location of the dynamic stuff */ -+ dpnt = (Elf32_Dyn *) (*got + load_addr); -+#ifdef __SUPPORT_LD_DEBUG_EARLY__ -+ SEND_STDERR("First Dynamic section entry="); -+ SEND_ADDRESS_STDERR(dpnt, 1); -+#endif -+ -+ -+ /* Call mmap to get a page of writable memory that can be used -+ * for _dl_malloc throughout the shared lib loader. */ -+ mmap_zero = malloc_buffer = _dl_mmap((void *) 0, 4096, -+ PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_ANONYMOUS, 0, 0); -+ if (_dl_mmap_check_error(mmap_zero)) { -+ SEND_STDERR("dl_boot: mmap of a spare page failed!\n"); -+ _dl_exit(13); -+ } -+ -+ tpnt = LD_MALLOC(sizeof(struct elf_resolve)); -+ _dl_memset(tpnt, 0, sizeof(struct elf_resolve)); -+ app_tpnt = LD_MALLOC(sizeof(struct elf_resolve)); -+ _dl_memset(app_tpnt, 0, sizeof(struct elf_resolve)); -+ -+ /* -+ * This is used by gdb to locate the chain of shared libraries that are currently loaded. -+ */ -+ debug_addr = LD_MALLOC(sizeof(struct r_debug)); -+ _dl_memset(debug_addr, 0, sizeof(struct r_debug)); -+ -+ /* OK, that was easy. Next scan the DYNAMIC section of the image. -+ We are only doing ourself right now - we will have to do the rest later */ -+#ifdef __SUPPORT_LD_DEBUG_EARLY__ -+ SEND_STDERR("scanning DYNAMIC section\n"); -+#endif -+ while (dpnt->d_tag) { -+#if defined(__mips__) -+ if (dpnt->d_tag == DT_MIPS_GOTSYM) -+ tpnt->mips_gotsym = (unsigned long) dpnt->d_un.d_val; -+ if (dpnt->d_tag == DT_MIPS_LOCAL_GOTNO) -+ tpnt->mips_local_gotno = (unsigned long) dpnt->d_un.d_val; -+ if (dpnt->d_tag == DT_MIPS_SYMTABNO) -+ tpnt->mips_symtabno = (unsigned long) dpnt->d_un.d_val; -+#endif -+ if (dpnt->d_tag < 24) { -+ tpnt->dynamic_info[dpnt->d_tag] = dpnt->d_un.d_val; -+ if (dpnt->d_tag == DT_TEXTREL) { -+ tpnt->dynamic_info[DT_TEXTREL] = 1; -+ } -+ } -+ dpnt++; -+ } -+ -+ { -+ ElfW(Phdr) *ppnt; -+ int i; -+ -+ ppnt = (ElfW(Phdr) *) auxvt[AT_PHDR].a_un.a_ptr; -+ for (i = 0; i < auxvt[AT_PHNUM].a_un.a_val; i++, ppnt++) -+ if (ppnt->p_type == PT_DYNAMIC) { -+ dpnt = (Elf32_Dyn *) ppnt->p_vaddr; -+ while (dpnt->d_tag) { -+#if defined(__mips__) -+ if (dpnt->d_tag == DT_MIPS_GOTSYM) -+ app_tpnt->mips_gotsym = -+ (unsigned long) dpnt->d_un.d_val; -+ if (dpnt->d_tag == DT_MIPS_LOCAL_GOTNO) -+ app_tpnt->mips_local_gotno = -+ (unsigned long) dpnt->d_un.d_val; -+ if (dpnt->d_tag == DT_MIPS_SYMTABNO) -+ app_tpnt->mips_symtabno = -+ (unsigned long) dpnt->d_un.d_val; -+ if (dpnt->d_tag > DT_JMPREL) { -+ dpnt++; -+ continue; -+ } -+ app_tpnt->dynamic_info[dpnt->d_tag] = dpnt->d_un.d_val; -+ -+#warning "Debugging threads on mips won't work till someone fixes this..." -+#if 0 -+ if (dpnt->d_tag == DT_DEBUG) { -+ dpnt->d_un.d_val = (unsigned long) debug_addr; -+ } -+#endif -+ -+#else -+ if (dpnt->d_tag > DT_JMPREL) { -+ dpnt++; -+ continue; -+ } -+ app_tpnt->dynamic_info[dpnt->d_tag] = dpnt->d_un.d_val; -+ if (dpnt->d_tag == DT_DEBUG) { -+ dpnt->d_un.d_val = (unsigned long) debug_addr; -+ } -+#endif -+ if (dpnt->d_tag == DT_TEXTREL) -+ app_tpnt->dynamic_info[DT_TEXTREL] = 1; -+ dpnt++; -+ } -+ } -+ } -+ -+#ifdef __SUPPORT_LD_DEBUG_EARLY__ -+ SEND_STDERR("done scanning DYNAMIC section\n"); -+#endif -+ -+ /* Get some more of the information that we will need to dynamicly link -+ this module to itself */ -+ -+ hash_addr = (unsigned long *) (tpnt->dynamic_info[DT_HASH] + load_addr); -+ tpnt->nbucket = *hash_addr++; -+ tpnt->nchain = *hash_addr++; -+ tpnt->elf_buckets = hash_addr; -+ hash_addr += tpnt->nbucket; -+ -+#ifdef __SUPPORT_LD_DEBUG_EARLY__ -+ SEND_STDERR("done grabbing link information\n"); -+#endif -+ -+#ifndef FORCE_SHAREABLE_TEXT_SEGMENTS -+ /* Ugly, ugly. We need to call mprotect to change the protection of -+ the text pages so that we can do the dynamic linking. We can set the -+ protection back again once we are done */ -+ -+ { -+ ElfW(Phdr) *ppnt; -+ int i; -+ -+#ifdef __SUPPORT_LD_DEBUG_EARLY__ -+ SEND_STDERR("calling mprotect on the shared library/dynamic linker\n"); -+#endif -+ -+ /* First cover the shared library/dynamic linker. */ -+ if (tpnt->dynamic_info[DT_TEXTREL]) { -+ header = (ElfW(Ehdr) *) auxvt[AT_BASE].a_un.a_ptr; -+ ppnt = (ElfW(Phdr) *) ((int)auxvt[AT_BASE].a_un.a_ptr + -+ header->e_phoff); -+ for (i = 0; i < header->e_phnum; i++, ppnt++) { -+ if (ppnt->p_type == PT_LOAD && !(ppnt->p_flags & PF_W)) { -+ _dl_mprotect((void *) (load_addr + (ppnt->p_vaddr & PAGE_ALIGN)), -+ (ppnt->p_vaddr & ADDR_ALIGN) + (unsigned long) ppnt->p_filesz, -+ PROT_READ | PROT_WRITE | PROT_EXEC); -+ } -+ } -+ } -+ -+#ifdef __SUPPORT_LD_DEBUG_EARLY__ -+ SEND_STDERR("calling mprotect on the application program\n"); -+#endif -+ /* Now cover the application program. */ -+ if (app_tpnt->dynamic_info[DT_TEXTREL]) { -+ ppnt = (ElfW(Phdr) *) auxvt[AT_PHDR].a_un.a_ptr; -+ for (i = 0; i < auxvt[AT_PHNUM].a_un.a_val; i++, ppnt++) { -+ if (ppnt->p_type == PT_LOAD && !(ppnt->p_flags & PF_W)) -+ _dl_mprotect((void *) (ppnt->p_vaddr & PAGE_ALIGN), -+ (ppnt->p_vaddr & ADDR_ALIGN) + -+ (unsigned long) ppnt->p_filesz, -+ PROT_READ | PROT_WRITE | PROT_EXEC); -+ } -+ } -+ } -+#endif -+ -+#if defined(__mips__) -+#ifdef __SUPPORT_LD_DEBUG_EARLY__ -+ SEND_STDERR("About to do MIPS specific GOT bootstrap\n"); -+#endif -+ /* For MIPS we have to do stuff to the GOT before we do relocations. */ -+ PERFORM_BOOTSTRAP_GOT(got); -+#endif -+ -+ /* OK, now do the relocations. We do not do a lazy binding here, so -+ that once we are done, we have considerably more flexibility. */ -+#ifdef __SUPPORT_LD_DEBUG_EARLY__ -+ SEND_STDERR("About to do library loader relocations\n"); -+#endif -+ -+ goof = 0; -+ for (indx = 0; indx < 2; indx++) { -+ unsigned int i; -+ ELF_RELOC *rpnt; -+ unsigned long *reloc_addr; -+ unsigned long symbol_addr; -+ int symtab_index; -+ unsigned long rel_addr, rel_size; -+ -+ -+#ifdef ELF_USES_RELOCA -+ rel_addr = (indx ? tpnt->dynamic_info[DT_JMPREL] : tpnt-> -+ dynamic_info[DT_RELA]); -+ rel_size = (indx ? tpnt->dynamic_info[DT_PLTRELSZ] : tpnt-> -+ dynamic_info[DT_RELASZ]); -+#else -+ rel_addr = (indx ? tpnt->dynamic_info[DT_JMPREL] : tpnt-> -+ dynamic_info[DT_REL]); -+ rel_size = (indx ? tpnt->dynamic_info[DT_PLTRELSZ] : tpnt-> -+ dynamic_info[DT_RELSZ]); -+#endif -+ -+ if (!rel_addr) -+ continue; -+ -+ /* Now parse the relocation information */ -+ rpnt = (ELF_RELOC *) (rel_addr + load_addr); -+ for (i = 0; i < rel_size; i += sizeof(ELF_RELOC), rpnt++) { -+ reloc_addr = (unsigned long *) (load_addr + (unsigned long) rpnt->r_offset); -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ symbol_addr = 0; -+ if (symtab_index) { -+ char *strtab; -+ Elf32_Sym *symtab; -+ -+ symtab = (Elf32_Sym *) (tpnt->dynamic_info[DT_SYMTAB] + load_addr); -+ strtab = (char *) (tpnt->dynamic_info[DT_STRTAB] + load_addr); -+ -+ /* We only do a partial dynamic linking right now. The user -+ is not supposed to redefine any symbols that start with -+ a '_', so we can do this with confidence. */ -+ if (!_dl_symbol(strtab + symtab[symtab_index].st_name)) -+ continue; -+ symbol_addr = load_addr + symtab[symtab_index].st_value; -+ -+ if (!symbol_addr) { -+ /* This will segfault - you cannot call a function until -+ * we have finished the relocations. -+ */ -+ SEND_STDERR("ELF dynamic loader - unable to self-bootstrap - symbol "); -+ SEND_STDERR(strtab + symtab[symtab_index].st_name); -+ SEND_STDERR(" undefined.\n"); -+ goof++; -+ } -+#ifdef __SUPPORT_LD_DEBUG_EARLY__ -+ SEND_STDERR("About to fixup symbol: "); -+ SEND_STDERR(strtab + symtab[symtab_index].st_name); -+ SEND_STDERR("\n"); -+#endif -+ } -+ /* -+ * Use this machine-specific macro to perform the actual relocation. -+ */ -+ PERFORM_BOOTSTRAP_RELOC(rpnt, reloc_addr, symbol_addr, load_addr); -+ } -+ } -+ -+ if (goof) { -+ _dl_exit(14); -+ } -+#ifdef __SUPPORT_LD_DEBUG_EARLY__ -+ /* Wahoo!!! */ -+ _dl_dprintf(_dl_debug_file, "Done relocating library loader, so we can now\n\tuse globals and make function calls!\n"); -+#endif -+ -+ if (argv[0]) { -+ _dl_progname = argv[0]; -+ } -+ -+ /* Start to build the tables of the modules that are required for -+ * this beast to run. We start with the basic executable, and then -+ * go from there. Eventually we will run across ourself, and we -+ * will need to properly deal with that as well. */ -+ -+ /* Make it so _dl_malloc can use the page of memory we have already -+ * allocated, so we shouldn't need to grab any more memory */ -+ _dl_malloc_addr = malloc_buffer; -+ _dl_mmap_zero = mmap_zero; -+ -+ -+ -+ /* Now we have done the mandatory linking of some things. We are now -+ free to start using global variables, since these things have all been -+ fixed up by now. Still no function calls outside of this library , -+ since the dynamic resolver is not yet ready. */ -+ _dl_get_ready_to_run(tpnt, app_tpnt, load_addr, hash_addr, auxvt, envp, debug_addr); -+ -+ -+ /* Notify the debugger that all objects are now mapped in. */ -+ _dl_debug_addr->r_state = RT_CONSISTENT; -+ _dl_debug_state(); -+ -+ -+ /* OK we are done here. Turn out the lights, and lock up. */ -+ _dl_elf_main = (int (*)(int, char **, char **)) auxvt[AT_ENTRY].a_un.a_fcn; -+ -+ /* -+ * Transfer control to the application. -+ */ -+ status = 0; /* Used on x86, but not on other arches */ -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug) _dl_dprintf(_dl_debug_file,"\ntransfering control: %s\n\n", _dl_progname); -+#endif -+ START(); -+} -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+static void debug_fini (int status, void *arg) -+{ -+ (void)status; -+ _dl_dprintf(_dl_debug_file,"\ncalling fini: %s\n\n", (const char*)arg); -+} -+#endif -+ -+static void _dl_get_ready_to_run(struct elf_resolve *tpnt, struct elf_resolve *app_tpnt, -+ unsigned long load_addr, unsigned long *hash_addr, Elf32_auxv_t auxvt[AT_EGID + 1], -+ char **envp, struct r_debug *debug_addr) -+{ -+ ElfW(Phdr) *ppnt; -+ char *lpntstr; -+ int i, _dl_secure, goof = 0; -+ struct dyn_elf *rpnt; -+ struct elf_resolve *tcurr; -+ struct elf_resolve *tpnt1; -+ unsigned long brk_addr, *lpnt; -+ int (*_dl_atexit) (void *); -+#if defined (__SUPPORT_LD_DEBUG__) -+ int (*_dl_on_exit) (void (*FUNCTION)(int STATUS, void *ARG),void*); -+#endif -+ -+ /* Now we have done the mandatory linking of some things. We are now -+ free to start using global variables, since these things have all been -+ fixed up by now. Still no function calls outside of this library , -+ since the dynamic resolver is not yet ready. */ -+ lpnt = (unsigned long *) (tpnt->dynamic_info[DT_PLTGOT] + load_addr); -+ -+ tpnt->chains = hash_addr; -+ tpnt->next = 0; -+ tpnt->libname = 0; -+ tpnt->libtype = program_interpreter; -+ tpnt->loadaddr = (ElfW(Addr)) load_addr; -+ -+#ifdef ALLOW_ZERO_PLTGOT -+ if (tpnt->dynamic_info[DT_PLTGOT]) -+#endif -+ { -+ INIT_GOT(lpnt, tpnt); -+#ifdef __SUPPORT_LD_DEBUG_EARLY__ -+ _dl_dprintf(_dl_debug_file, "GOT found at %x\n", lpnt); -+#endif -+ } -+ -+ /* OK, this was a big step, now we need to scan all of the user images -+ and load them properly. */ -+ -+ { -+ ElfW(Ehdr) *epnt; -+ ElfW(Phdr) *myppnt; -+ int j; -+ -+ epnt = (ElfW(Ehdr) *) auxvt[AT_BASE].a_un.a_ptr; -+ tpnt->n_phent = epnt->e_phnum; -+ tpnt->ppnt = myppnt = (ElfW(Phdr) *) (load_addr + epnt->e_phoff); -+ for (j = 0; j < epnt->e_phnum; j++, myppnt++) { -+ if (myppnt->p_type == PT_DYNAMIC) { -+ tpnt->dynamic_addr = (ElfW(Dyn) *)myppnt->p_vaddr + load_addr; -+ tpnt->dynamic_size = myppnt->p_filesz; -+ } -+ } -+ } -+ -+ brk_addr = 0; -+ rpnt = NULL; -+ -+ /* At this point we are now free to examine the user application, -+ and figure out which libraries are supposed to be called. Until -+ we have this list, we will not be completely ready for dynamic linking */ -+ -+ ppnt = (ElfW(Phdr) *) auxvt[AT_PHDR].a_un.a_ptr; -+ for (i = 0; i < auxvt[AT_PHNUM].a_un.a_val; i++, ppnt++) { -+ if (ppnt->p_type == PT_LOAD) { -+ if (ppnt->p_vaddr + ppnt->p_memsz > brk_addr) -+ brk_addr = ppnt->p_vaddr + ppnt->p_memsz; -+ } -+ if (ppnt->p_type == PT_DYNAMIC) { -+#ifndef ALLOW_ZERO_PLTGOT -+ /* make sure it's really there. */ -+ if (app_tpnt->dynamic_info[DT_PLTGOT] == 0) -+ continue; -+#endif -+ /* OK, we have what we need - slip this one into the list. */ -+ app_tpnt = _dl_add_elf_hash_table("", 0, -+ app_tpnt->dynamic_info, ppnt->p_vaddr, ppnt->p_filesz); -+ _dl_loaded_modules->libtype = elf_executable; -+ _dl_loaded_modules->ppnt = (ElfW(Phdr) *) auxvt[AT_PHDR].a_un.a_ptr; -+ _dl_loaded_modules->n_phent = auxvt[AT_PHNUM].a_un.a_val; -+ _dl_symbol_tables = rpnt = (struct dyn_elf *) _dl_malloc(sizeof(struct dyn_elf)); -+ _dl_memset(rpnt, 0, sizeof(struct dyn_elf)); -+ rpnt->dyn = _dl_loaded_modules; -+ app_tpnt->usage_count++; -+ app_tpnt->symbol_scope = _dl_symbol_tables; -+ lpnt = (unsigned long *) (app_tpnt->dynamic_info[DT_PLTGOT]); -+#ifdef ALLOW_ZERO_PLTGOT -+ if (lpnt) -+#endif -+ INIT_GOT(lpnt, _dl_loaded_modules); -+ } -+ -+ /* OK, fill this in - we did not have this before */ -+ if (ppnt->p_type == PT_INTERP) { -+ int readsize = 0; -+ char *pnt, *pnt1, buf[1024]; -+ tpnt->libname = _dl_strdup((char *) ppnt->p_offset + -+ (auxvt[AT_PHDR].a_un.a_val & PAGE_ALIGN)); -+ -+ /* Determine if the shared lib loader is a symlink */ -+ _dl_memset(buf, 0, sizeof(buf)); -+ readsize = _dl_readlink(tpnt->libname, buf, sizeof(buf)); -+ if (readsize > 0 && readsize < (int)(sizeof(buf)-1)) { -+ pnt1 = _dl_strrchr(buf, '/'); -+ if (pnt1 && buf != pnt1) { -+#ifdef __SUPPORT_LD_DEBUG_EARLY__ -+ _dl_dprintf(_dl_debug_file, "changing tpnt->libname from '%s' to '%s'\n", tpnt->libname, buf); -+#endif -+ tpnt->libname = _dl_strdup(buf); -+ } -+ } -+ -+ /* Store the path where the shared lib loader was found for -+ * later use */ -+ pnt = _dl_strdup(tpnt->libname); -+ pnt1 = _dl_strrchr(pnt, '/'); -+ if (pnt != pnt1) { -+ *pnt1 = '\0'; -+ _dl_ldsopath = pnt; -+ } else { -+ _dl_ldsopath = tpnt->libname; -+ } -+#ifdef __SUPPORT_LD_DEBUG_EARLY__ -+ _dl_dprintf(_dl_debug_file, "Lib Loader:\t(%x) %s\n", tpnt->loadaddr, tpnt->libname); -+#endif -+ } -+ } -+ -+ -+ /* Now we need to figure out what kind of options are selected. -+ Note that for SUID programs we ignore the settings in LD_LIBRARY_PATH */ -+ { -+ if (_dl_getenv("LD_BIND_NOW", envp)) -+ _dl_be_lazy = 0; -+ -+ if ((auxvt[AT_UID].a_un.a_val == -1 && _dl_suid_ok()) || -+ (auxvt[AT_UID].a_un.a_val != -1 && -+ auxvt[AT_UID].a_un.a_val == auxvt[AT_EUID].a_un.a_val -+ && auxvt[AT_GID].a_un.a_val== auxvt[AT_EGID].a_un.a_val)) { -+ _dl_secure = 0; -+ _dl_preload = _dl_getenv("LD_PRELOAD", envp); -+ _dl_library_path = _dl_getenv("LD_LIBRARY_PATH", envp); -+ } else { -+ _dl_secure = 1; -+ _dl_preload = _dl_getenv("LD_PRELOAD", envp); -+ _dl_unsetenv("LD_AOUT_PRELOAD", envp); -+ _dl_unsetenv("LD_LIBRARY_PATH", envp); -+ _dl_unsetenv("LD_AOUT_LIBRARY_PATH", envp); -+ _dl_library_path = NULL; -+ } -+ } -+ -+#ifdef __SUPPORT_LD_DEBUG__ -+ _dl_debug = _dl_getenv("LD_DEBUG", envp); -+ if (_dl_debug) -+ { -+ if (_dl_strstr(_dl_debug, "all")) { -+ _dl_debug_detail = _dl_debug_move = _dl_debug_symbols -+ = _dl_debug_reloc = _dl_debug_bindings = _dl_debug_nofixups = _dl_strstr(_dl_debug, "all"); -+ } -+ else { -+ _dl_debug_detail = _dl_strstr(_dl_debug, "detail"); -+ _dl_debug_move = _dl_strstr(_dl_debug, "move"); -+ _dl_debug_symbols = _dl_strstr(_dl_debug, "sym"); -+ _dl_debug_reloc = _dl_strstr(_dl_debug, "reloc"); -+ _dl_debug_nofixups = _dl_strstr(_dl_debug, "nofix"); -+ _dl_debug_bindings = _dl_strstr(_dl_debug, "bind"); -+ } -+ } -+ { -+ const char *dl_debug_output; -+ -+ dl_debug_output = _dl_getenv("LD_DEBUG_OUTPUT", envp); -+ -+ if (dl_debug_output) -+ { -+ char tmp[22], *tmp1, *filename; -+ int len1, len2; -+ -+ _dl_memset(tmp, 0, sizeof(tmp)); -+ tmp1=_dl_simple_ltoa( tmp, (unsigned long)_dl_getpid()); -+ -+ len1 = _dl_strlen(dl_debug_output); -+ len2 = _dl_strlen(tmp1); -+ -+ filename = _dl_malloc(len1+len2+2); -+ -+ if (filename) -+ { -+ _dl_strcpy (filename, dl_debug_output); -+ filename[len1] = '.'; -+ _dl_strcpy (&filename[len1+1], tmp1); -+ -+ _dl_debug_file= _dl_open (filename, O_WRONLY|O_CREAT); -+ if (_dl_debug_file<0) -+ { -+ _dl_debug_file = 2; -+ _dl_dprintf (2, "can't open file: '%s'\n",filename); -+ } -+ } -+ } -+ } -+ -+ -+#endif -+ _dl_trace_loaded_objects = _dl_getenv("LD_TRACE_LOADED_OBJECTS", envp); -+#ifndef __LDSO_LDD_SUPPORT__ -+ if (_dl_trace_loaded_objects) { -+ _dl_dprintf(_dl_debug_file, "Use the ldd provided by uClibc\n"); -+ _dl_exit(1); -+ } -+#endif -+ -+ /* -+ * OK, fix one more thing - set up debug_addr so it will point -+ * to our chain. Later we may need to fill in more fields, but this -+ * should be enough for now. -+ */ -+ debug_addr->r_map = (struct link_map *) _dl_loaded_modules; -+ debug_addr->r_version = 1; -+ debug_addr->r_ldbase = load_addr; -+ debug_addr->r_brk = (unsigned long) &_dl_debug_state; -+ _dl_debug_addr = debug_addr; -+ -+ /* Notify the debugger we are in a consistant state */ -+ _dl_debug_addr->r_state = RT_CONSISTENT; -+ _dl_debug_state(); -+ -+ /* OK, we now have the application in the list, and we have some -+ basic stuff in place. Now search through the list for other shared -+ libraries that should be loaded, and insert them on the list in the -+ correct order. */ -+ -+ _dl_map_cache(); -+ -+ -+ if (_dl_preload) -+ { -+ char c, *str, *str2; -+ -+ str = _dl_preload; -+ while (*str == ':' || *str == ' ' || *str == '\t') -+ str++; -+ while (*str) -+ { -+ str2 = str; -+ while (*str2 && *str2 != ':' && *str2 != ' ' && *str2 != '\t') -+ str2++; -+ c = *str2; -+ *str2 = '\0'; -+ if (!_dl_secure || _dl_strchr(str, '/') == NULL) -+ { -+ if ((tpnt1 = _dl_check_if_named_library_is_loaded(str))) -+ { -+ continue; -+ } -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug) _dl_dprintf(_dl_debug_file, "\tfile='%s'; needed by '%s'\n", -+ str, _dl_progname); -+#endif -+ tpnt1 = _dl_load_shared_library(_dl_secure, &rpnt, NULL, str); -+ if (!tpnt1) { -+#ifdef __LDSO_LDD_SUPPORT__ -+ if (_dl_trace_loaded_objects) -+ _dl_dprintf(1, "\t%s => not found\n", str); -+ else -+#endif -+ { -+ _dl_dprintf(2, "%s: can't load " "library '%s'\n", _dl_progname, str); -+ _dl_exit(15); -+ } -+ } else { -+#ifdef __SUPPORT_LD_DEBUG_EARLY__ -+ _dl_dprintf(_dl_debug_file, "Loading:\t(%x) %s\n", tpnt1->loadaddr, tpnt1->libname); -+#endif -+#ifdef __LDSO_LDD_SUPPORT__ -+ if (_dl_trace_loaded_objects && tpnt1->usage_count==1) { -+ /* this is a real hack to make ldd not print -+ * the library itself when run on a library. */ -+ if (_dl_strcmp(_dl_progname, str) != 0) -+ _dl_dprintf(1, "\t%s => %s (%x)\n", str, tpnt1->libname, -+ (unsigned) tpnt1->loadaddr); -+ } -+#endif -+ } -+ } -+ *str2 = c; -+ str = str2; -+ while (*str == ':' || *str == ' ' || *str == '\t') -+ str++; -+ } -+ } -+ -+#ifdef SUPPORT_LDSO_PRELOAD_FILE -+ { -+ int fd; -+ struct stat st; -+ char *preload; -+ if (!_dl_stat(LDSO_PRELOAD, &st) && st.st_size > 0) { -+ if ((fd = _dl_open(LDSO_PRELOAD, O_RDONLY)) < 0) { -+ _dl_dprintf(2, "%s: can't open file '%s'\n", -+ _dl_progname, LDSO_PRELOAD); -+ } else { -+ preload = (caddr_t) _dl_mmap(0, st.st_size + 1, -+ PROT_READ | PROT_WRITE, MAP_PRIVATE, fd, 0); -+ _dl_close(fd); -+ if (preload == (caddr_t) - 1) { -+ _dl_dprintf(2, "%s: can't map file '%s'\n", -+ _dl_progname, LDSO_PRELOAD); -+ } else { -+ char c, *cp, *cp2; -+ -+ /* convert all separators and comments to spaces */ -+ for (cp = preload; *cp; /*nada */ ) { -+ if (*cp == ':' || *cp == '\t' || *cp == '\n') { -+ *cp++ = ' '; -+ } else if (*cp == '#') { -+ do -+ *cp++ = ' '; -+ while (*cp != '\n' && *cp != '\0'); -+ } else { -+ cp++; -+ } -+ } -+ -+ /* find start of first library */ -+ for (cp = preload; *cp && *cp == ' '; cp++) -+ /*nada */ ; -+ -+ while (*cp) { -+ /* find end of library */ -+ for (cp2 = cp; *cp && *cp != ' '; cp++) -+ /*nada */ ; -+ c = *cp; -+ *cp = '\0'; -+ -+ if ((tpnt1 = _dl_check_if_named_library_is_loaded(cp2))) -+ { -+ continue; -+ } -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug) _dl_dprintf(_dl_debug_file, "\tfile='%s'; needed by '%s'\n", -+ cp2, _dl_progname); -+#endif -+ tpnt1 = _dl_load_shared_library(0, &rpnt, NULL, cp2); -+ if (!tpnt1) { -+#ifdef __LDSO_LDD_SUPPORT__ -+ if (_dl_trace_loaded_objects) -+ _dl_dprintf(1, "\t%s => not found\n", cp2); -+ else -+#endif -+ { -+ _dl_dprintf(2, "%s: can't load library '%s'\n", _dl_progname, cp2); -+ _dl_exit(15); -+ } -+ } else { -+#ifdef __SUPPORT_LD_DEBUG_EARLY__ -+ _dl_dprintf(_dl_debug_file, "Loading:\t(%x) %s\n", tpnt1->loadaddr, tpnt1->libname); -+#endif -+#ifdef __LDSO_LDD_SUPPORT__ -+ if (_dl_trace_loaded_objects && tpnt1->usage_count==1) { -+ _dl_dprintf(1, "\t%s => %s (%x)\n", cp2, -+ tpnt1->libname, (unsigned) tpnt1->loadaddr); -+ } -+#endif -+ } -+ -+ /* find start of next library */ -+ *cp = c; -+ for ( /*nada */ ; *cp && *cp == ' '; cp++) -+ /*nada */ ; -+ } -+ -+ _dl_munmap(preload, st.st_size + 1); -+ } -+ } -+ } -+ } -+#endif -+ -+ for (tcurr = _dl_loaded_modules; tcurr; tcurr = tcurr->next) -+ { -+ Elf32_Dyn *dpnt; -+ for (dpnt = (Elf32_Dyn *) tcurr->dynamic_addr; dpnt->d_tag; dpnt++) -+ { -+ if (dpnt->d_tag == DT_NEEDED) -+ { -+ char *name; -+ lpntstr = (char*) (tcurr->loadaddr + tcurr->dynamic_info[DT_STRTAB] + dpnt->d_un.d_val); -+ name = _dl_get_last_path_component(lpntstr); -+ -+ if ((tpnt1 = _dl_check_if_named_library_is_loaded(name))) -+ { -+ continue; -+ } -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug) _dl_dprintf(_dl_debug_file, "\tfile='%s'; needed by '%s'\n", -+ lpntstr, _dl_progname); -+#endif -+ if (!(tpnt1 = _dl_load_shared_library(0, &rpnt, tcurr, lpntstr))) -+ { -+#ifdef __LDSO_LDD_SUPPORT__ -+ if (_dl_trace_loaded_objects) { -+ _dl_dprintf(1, "\t%s => not found\n", lpntstr); -+ continue; -+ } else -+#endif -+ { -+ _dl_dprintf(2, "%s: can't load library '%s'\n", _dl_progname, lpntstr); -+ _dl_exit(16); -+ } -+ } else { -+#ifdef __SUPPORT_LD_DEBUG_EARLY__ -+ _dl_dprintf(_dl_debug_file, "Loading:\t(%x) %s\n", tpnt1->loadaddr, tpnt1->libname); -+#endif -+#ifdef __LDSO_LDD_SUPPORT__ -+ if (_dl_trace_loaded_objects && tpnt1->usage_count==1) { -+ _dl_dprintf(1, "\t%s => %s (%x)\n", lpntstr, tpnt1->libname, -+ (unsigned) tpnt1->loadaddr); -+ } -+#endif -+ } -+ } -+ } -+ } -+ -+ -+ _dl_unmap_cache(); -+ -+ /* -+ * If the program interpreter is not in the module chain, add it. This will -+ * be required for dlopen to be able to access the internal functions in the -+ * dynamic linker. -+ */ -+ if (tpnt) { -+ tcurr = _dl_loaded_modules; -+ if (tcurr) -+ while (tcurr->next) -+ tcurr = tcurr->next; -+ tpnt->next = NULL; -+ tpnt->usage_count++; -+ -+ if (tcurr) { -+ tcurr->next = tpnt; -+ tpnt->prev = tcurr; -+ } else { -+ _dl_loaded_modules = tpnt; -+ tpnt->prev = NULL; -+ } -+ if (rpnt) { -+ rpnt->next = (struct dyn_elf *) _dl_malloc(sizeof(struct dyn_elf)); -+ _dl_memset(rpnt->next, 0, sizeof(struct dyn_elf)); -+ rpnt->next->prev = rpnt; -+ rpnt = rpnt->next; -+ } else { -+ rpnt = (struct dyn_elf *) _dl_malloc(sizeof(struct dyn_elf)); -+ _dl_memset(rpnt, 0, sizeof(struct dyn_elf)); -+ } -+ rpnt->dyn = tpnt; -+ tpnt = NULL; -+ } -+ -+#ifdef __LDSO_LDD_SUPPORT__ -+ /* End of the line for ldd.... */ -+ if (_dl_trace_loaded_objects) { -+ _dl_dprintf(1, "\t%s => %s (%x)\n", rpnt->dyn->libname + (_dl_strlen(_dl_ldsopath)) + 1, -+ rpnt->dyn->libname, rpnt->dyn->loadaddr); -+ _dl_exit(0); -+ } -+#endif -+ -+ -+#ifdef __mips__ -+ /* -+ * Relocation of the GOT entries for MIPS have to be done -+ * after all the libraries have been loaded. -+ */ -+ _dl_perform_mips_global_got_relocations(_dl_loaded_modules); -+#endif -+ -+#ifdef __SUPPORT_LD_DEBUG_EARLY__ -+ _dl_dprintf(_dl_debug_file, "Beginning relocation fixups\n"); -+#endif -+ /* -+ * OK, now all of the kids are tucked into bed in their proper addresses. -+ * Now we go through and look for REL and RELA records that indicate fixups -+ * to the GOT tables. We need to do this in reverse order so that COPY -+ * directives work correctly */ -+ goof = _dl_loaded_modules ? _dl_fixup(_dl_loaded_modules, _dl_be_lazy) : 0; -+ -+ -+ /* Some flavors of SVr4 do not generate the R_*_COPY directive, -+ and we have to manually search for entries that require fixups. -+ Solaris gets this one right, from what I understand. */ -+ -+#ifdef __SUPPORT_LD_DEBUG_EARLY__ -+ _dl_dprintf(_dl_debug_file, "Beginning copy fixups\n"); -+#endif -+ if (_dl_symbol_tables) -+ goof += _dl_copy_fixups(_dl_symbol_tables); -+ -+ /* OK, at this point things are pretty much ready to run. Now we -+ need to touch up a few items that are required, and then -+ we can let the user application have at it. Note that -+ the dynamic linker itself is not guaranteed to be fully -+ dynamicly linked if we are using ld.so.1, so we have to look -+ up each symbol individually. */ -+ -+ -+ _dl_brkp = (unsigned long *) (intptr_t) _dl_find_hash("___brk_addr", NULL, NULL, symbolrel); -+ -+ if (_dl_brkp) { -+ *_dl_brkp = brk_addr; -+ } -+ _dl_envp = (unsigned long *) (intptr_t) _dl_find_hash("__environ", NULL, NULL, symbolrel); -+ -+ if (_dl_envp) { -+ *_dl_envp = (unsigned long) envp; -+ } -+ -+#ifndef FORCE_SHAREABLE_TEXT_SEGMENTS -+ { -+ unsigned int j; -+ ElfW(Phdr) *myppnt; -+ -+ /* We had to set the protections of all pages to R/W for dynamic linking. -+ Set text pages back to R/O */ -+ for (tpnt = _dl_loaded_modules; tpnt; tpnt = tpnt->next) { -+ for (myppnt = tpnt->ppnt, j = 0; j < tpnt->n_phent; j++, myppnt++) { -+ if (myppnt->p_type == PT_LOAD && !(myppnt->p_flags & PF_W) && tpnt->dynamic_info[DT_TEXTREL]) { -+ _dl_mprotect((void *) (tpnt->loadaddr + (myppnt->p_vaddr & PAGE_ALIGN)), -+ (myppnt->p_vaddr & ADDR_ALIGN) + (unsigned long) myppnt->p_filesz, LXFLAGS(myppnt->p_flags)); -+ } -+ } -+ } -+ -+ } -+#endif -+ _dl_atexit = (int (*)(void *)) (intptr_t) _dl_find_hash("atexit", NULL, NULL, symbolrel); -+#if defined (__SUPPORT_LD_DEBUG__) -+ _dl_on_exit = (int (*)(void (*)(int, void *),void*)) -+ (intptr_t) _dl_find_hash("on_exit", NULL, NULL, symbolrel); -+#endif -+ -+ /* Notify the debugger we have added some objects. */ -+ _dl_debug_addr->r_state = RT_ADD; -+ _dl_debug_state(); -+ -+ for (rpnt = _dl_symbol_tables; rpnt!=NULL&& rpnt->next!=NULL; rpnt=rpnt->next) -+ ; -+ -+ for (;rpnt!=NULL; rpnt=rpnt->prev) -+ { -+ tpnt = rpnt->dyn; -+ -+ if (tpnt->libtype == program_interpreter) -+ continue; -+ -+ /* Apparently crt0/1 for the application is responsible for handling this. -+ * We only need to run the init/fini for shared libraries -+ */ -+ if (tpnt->libtype == elf_executable) -+ break; /* at this point all shared libs are initialized !! */ -+ -+ if (tpnt->init_flag & INIT_FUNCS_CALLED) -+ continue; -+ tpnt->init_flag |= INIT_FUNCS_CALLED; -+ -+ if (tpnt->dynamic_info[DT_INIT]) { -+ void (*dl_elf_func) (void); -+ dl_elf_func = (void (*)(void)) (intptr_t) (tpnt->loadaddr + tpnt->dynamic_info[DT_INIT]); -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug) _dl_dprintf(_dl_debug_file,"\ncalling init: %s\n\n", tpnt->libname); -+#endif -+ (*dl_elf_func) (); -+ } -+ if (_dl_atexit && tpnt->dynamic_info[DT_FINI]) { -+ void (*dl_elf_func) (void); -+ dl_elf_func = (void (*)(void)) (intptr_t) (tpnt->loadaddr + tpnt->dynamic_info[DT_FINI]); -+ (*_dl_atexit) (dl_elf_func); -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug && _dl_on_exit) -+ { -+ (*_dl_on_exit)(debug_fini, tpnt->libname); -+ } -+#endif -+ } -+#if defined (__SUPPORT_LD_DEBUG__) -+ else { -+ if (!_dl_atexit) -+ _dl_dprintf(_dl_debug_file, "%s: The address of atexit () is 0x0.\n", tpnt->libname); -+#if 0 -+ if (!tpnt->dynamic_info[DT_FINI]) -+ _dl_dprintf(_dl_debug_file, "%s: Invalid .fini section.\n", tpnt->libname); -+#endif -+ } -+#endif -+ } -+} -+ -+/* -+ * This stub function is used by some debuggers. The idea is that they -+ * can set an internal breakpoint on it, so that we are notified when the -+ * address mapping is changed in some way. -+ */ -+void _dl_debug_state(void) -+{ -+} -+ -+char *_dl_getenv(const char *symbol, char **envp) -+{ -+ char *pnt; -+ const char *pnt1; -+ -+ while ((pnt = *envp++)) { -+ pnt1 = symbol; -+ while (*pnt && *pnt == *pnt1) -+ pnt1++, pnt++; -+ if (!*pnt || *pnt != '=' || *pnt1) -+ continue; -+ return pnt + 1; -+ } -+ return 0; -+} -+ -+void _dl_unsetenv(const char *symbol, char **envp) -+{ -+ char *pnt; -+ const char *pnt1; -+ char **newenvp = envp; -+ -+ for (pnt = *envp; pnt; pnt = *++envp) { -+ pnt1 = symbol; -+ while (*pnt && *pnt == *pnt1) -+ pnt1++, pnt++; -+ if (!*pnt || *pnt != '=' || *pnt1) -+ *newenvp++ = *envp; -+ } -+ *newenvp++ = *envp; -+ return; -+} -+ -+#include "hash.c" -+#include "readelflib1.c" -diff -urN uClibc/ldso-0.9.24/ldso/m68k/boot1_arch.h uClibc.ldso.24/ldso-0.9.24/ldso/m68k/boot1_arch.h ---- uClibc/ldso-0.9.24/ldso/m68k/boot1_arch.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/m68k/boot1_arch.h 2002-08-08 09:35:37.000000000 -0500 -@@ -0,0 +1,7 @@ -+/* Any assmbly language/system dependent hacks needed to setup boot1.c so it -+ * will work as expected and cope with whatever platform specific wierdness is -+ * needed for this architecture. See arm/boot1_arch.h for an example of what -+ * can be done. -+ */ -+ -+#define LD_BOOT(X) void _dl_boot (X) -diff -urN uClibc/ldso-0.9.24/ldso/m68k/elfinterp.c uClibc.ldso.24/ldso-0.9.24/ldso/m68k/elfinterp.c ---- uClibc/ldso-0.9.24/ldso/m68k/elfinterp.c 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/m68k/elfinterp.c 2002-11-05 12:21:04.000000000 -0600 -@@ -0,0 +1,359 @@ -+/* vi: set sw=4 ts=4: */ -+/* m68k ELF shared library loader suppport -+ * -+ * Copyright (c) 1994-2000 Eric Youngdale, Peter MacDonald, -+ * David Engel, Hongjiu Lu and Mitch D'Souza -+ * Adapted to ELF/68k by Andreas Schwab. -+ * -+ * 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. The name of the above contributors may not be -+ * used to endorse or promote products derived from this software -+ * without specific prior written permission. -+ * -+ * THIS SOFTWARE IS PROVIDED BY THE 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 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. -+ */ -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+static const char *_dl_reltypes[] = -+{ -+ "R_68K_NONE", -+ "R_68K_32", "R_68K_16", "R_68K_8", -+ "R_68K_PC32", "R_68K_PC16", "R_68K_PC8", -+ "R_68K_GOT32", "R_68K_GOT16", "R_68K_GOT8", -+ "R_68K_GOT32O", "R_68K_GOT16O", "R_68K_GOT8O", -+ "R_68K_PLT32", "R_68K_PLT16", "R_68K_PLT8", -+ "R_68K_PLT32O", "R_68K_PLT16O", "R_68K_PLT8O", -+ "R_68K_COPY", "R_68K_GLOB_DAT", "R_68K_JMP_SLOT", "R_68K_RELATIVE", -+ "R_68K_NUM" -+}; -+#endif -+ -+/* Program to load an ELF binary on a linux system, and run it. -+ References to symbols in sharable libraries can be resolved by either -+ an ELF sharable library or a linux style of shared library. */ -+ -+/* Disclaimer: I have never seen any AT&T source code for SVr4, nor have -+ I ever taken any courses on internals. This program was developed using -+ information available through the book "UNIX SYSTEM V RELEASE 4, -+ Programmers guide: Ansi C and Programming Support Tools", which did -+ a more than adequate job of explaining everything required to get this -+ working. */ -+ -+ -+unsigned int _dl_linux_resolver (int dummy1, int dummy2, -+ struct elf_resolve *tpnt, int reloc_entry) -+{ -+ int reloc_type; -+ Elf32_Rela *this_reloc; -+ char *strtab; -+ Elf32_Sym *symtab; -+ char *rel_addr; -+ int symtab_index; -+ char *new_addr; -+ char **got_addr; -+ unsigned int instr_addr; -+ -+ rel_addr = tpnt->loadaddr + tpnt->dynamic_info[DT_JMPREL]; -+ this_reloc = (Elf32_Rela *) (rel_addr + reloc_entry); -+ reloc_type = ELF32_R_TYPE (this_reloc->r_info); -+ symtab_index = ELF32_R_SYM (this_reloc->r_info); -+ -+ symtab = (Elf32_Sym *) (tpnt->dynamic_info[DT_SYMTAB] -+ + tpnt->loadaddr); -+ strtab = (char *) (tpnt->dynamic_info[DT_STRTAB] + tpnt->loadaddr); -+ -+ -+ if (reloc_type != R_68K_JMP_SLOT) -+ { -+ _dl_dprintf (2, "%s: incorrect relocation type in jump relocations\n", -+ _dl_progname); -+ _dl_exit (1); -+ } -+ -+ /* Address of jump instruction to fix up. */ -+ instr_addr = (int) this_reloc->r_offset + (int) tpnt->loadaddr; -+ got_addr = (char **) instr_addr; -+ -+#ifdef __SUPPORT_LD_DEBUG__ -+ if (_dl_debug_symbols) { -+ _dl_dprintf (2, "Resolving symbol %s\n", strtab + symtab[symtab_index].st_name); -+ } -+#endif -+ -+ /* Get the address of the GOT entry. */ -+ new_addr = _dl_find_hash (strtab + symtab[symtab_index].st_name, -+ tpnt->symbol_scope, tpnt, resolver); -+ if (!new_addr) -+ { -+ _dl_dprintf (2, "%s: can't resolve symbol '%s'\n", -+ _dl_progname, strtab + symtab[symtab_index].st_name); -+ _dl_exit (1); -+ } -+#if defined (__SUPPORT_LD_DEBUG__) -+ if ((unsigned long) got_addr < 0x40000000) -+ { -+ if (_dl_debug_bindings) -+ { -+ _dl_dprintf(_dl_debug_file, "\nresolve function: %s", -+ strtab + symtab[symtab_index].st_name); -+ if(_dl_debug_detail) _dl_dprintf(_dl_debug_file, -+ "\tpatch %x ==> %x @ %x", *got_addr, new_addr, got_addr); -+ } -+ } -+ if (!_dl_debug_nofixups) { -+ *got_addr = new_addr; -+ } -+#else -+ *got_addr = new_addr; -+#endif -+ -+ return (unsigned int) new_addr; -+} -+ -+void -+_dl_parse_lazy_relocation_information (struct elf_resolve *tpnt, -+ unsigned long rel_addr, unsigned long rel_size, int type) -+{ -+ int i; -+ char *strtab; -+ int reloc_type; -+ int symtab_index; -+ Elf32_Sym *symtab; -+ Elf32_Rela *rpnt; -+ unsigned int *reloc_addr; -+ -+ /* Now parse the relocation information. */ -+ rpnt = (Elf32_Rela *) (rel_addr + tpnt->loadaddr); -+ rel_size = rel_size / sizeof (Elf32_Rela); -+ -+ symtab = (Elf32_Sym *) (tpnt->dynamic_info[DT_SYMTAB] -+ + tpnt->loadaddr); -+ strtab = (char *) (tpnt->dynamic_info[DT_STRTAB] + tpnt->loadaddr); -+ -+ for (i = 0; i < rel_size; i++, rpnt++) -+ { -+ reloc_addr = (int *) (tpnt->loadaddr + (int) rpnt->r_offset); -+ reloc_type = ELF32_R_TYPE (rpnt->r_info); -+ symtab_index = ELF32_R_SYM (rpnt->r_info); -+ -+ /* When the dynamic linker bootstrapped itself, it resolved some symbols. -+ Make sure we do not do them again. */ -+ if (tpnt->libtype == program_interpreter -+ && (!symtab_index -+ || _dl_symbol (strtab + symtab[symtab_index].st_name))) -+ continue; -+ -+ switch (reloc_type) -+ { -+ case R_68K_NONE: -+ break; -+ case R_68K_JMP_SLOT: -+ *reloc_addr += (unsigned int) tpnt->loadaddr; -+ break; -+ default: -+ _dl_dprintf (2, "%s: (LAZY) can't handle reloc type ", _dl_progname); -+#if defined (__SUPPORT_LD_DEBUG__) -+ _dl_dprintf (2, "%s ", _dl_reltypes[reloc_type]); -+#endif -+ if (symtab_index) -+ _dl_dprintf (2, "'%s'", strtab + symtab[symtab_index].st_name); -+ _dl_dprintf (2, "\n"); -+ _dl_exit (1); -+ } -+ } -+} -+ -+int -+_dl_parse_relocation_information (struct elf_resolve *tpnt, -+ unsigned long rel_addr, unsigned long rel_size, int type) -+{ -+ int i; -+ char *strtab; -+ int reloc_type; -+ int goof = 0; -+ Elf32_Sym *symtab; -+ Elf32_Rela *rpnt; -+ unsigned int *reloc_addr; -+ unsigned int symbol_addr; -+ int symtab_index; -+ /* Now parse the relocation information */ -+ -+ rpnt = (Elf32_Rela *) (rel_addr + tpnt->loadaddr); -+ rel_size = rel_size / sizeof (Elf32_Rela); -+ -+ symtab = (Elf32_Sym *) (tpnt->dynamic_info[DT_SYMTAB] -+ + tpnt->loadaddr); -+ strtab = (char *) (tpnt->dynamic_info[DT_STRTAB] + tpnt->loadaddr); -+ -+ for (i = 0; i < rel_size; i++, rpnt++) -+ { -+ reloc_addr = (int *) (tpnt->loadaddr + (int) rpnt->r_offset); -+ reloc_type = ELF32_R_TYPE (rpnt->r_info); -+ symtab_index = ELF32_R_SYM (rpnt->r_info); -+ symbol_addr = 0; -+ -+ if (tpnt->libtype == program_interpreter -+ && (!symtab_index -+ || _dl_symbol (strtab + symtab[symtab_index].st_name))) -+ continue; -+ -+ if (symtab_index) -+ { -+ symbol_addr = (unsigned int) -+ _dl_find_hash (strtab + symtab[symtab_index].st_name, -+ tpnt->symbol_scope, -+ reloc_type == R_68K_JMP_SLOT ? tpnt : NULL, symbolrel); -+ -+ /* We want to allow undefined references to weak symbols - -+ this might have been intentional. We should not be -+ linking local symbols here, so all bases should be -+ covered. */ -+ if (!symbol_addr -+ && ELF32_ST_BIND (symtab[symtab_index].st_info) == STB_GLOBAL) -+ { -+ _dl_dprintf (2, "%s: can't resolve symbol '%s'\n", -+ _dl_progname, strtab + symtab[symtab_index].st_name); -+ goof++; -+ } -+ } -+ switch (reloc_type) -+ { -+ case R_68K_NONE: -+ break; -+ case R_68K_8: -+ *(char *) reloc_addr = symbol_addr + rpnt->r_addend; -+ break; -+ case R_68K_16: -+ *(short *) reloc_addr = symbol_addr + rpnt->r_addend; -+ break; -+ case R_68K_32: -+ *reloc_addr = symbol_addr + rpnt->r_addend; -+ break; -+ case R_68K_PC8: -+ *(char *) reloc_addr = (symbol_addr + rpnt->r_addend -+ - (unsigned int) reloc_addr); -+ break; -+ case R_68K_PC16: -+ *(short *) reloc_addr = (symbol_addr + rpnt->r_addend -+ - (unsigned int) reloc_addr); -+ break; -+ case R_68K_PC32: -+ *reloc_addr = (symbol_addr + rpnt->r_addend -+ - (unsigned int) reloc_addr); -+ break; -+ case R_68K_GLOB_DAT: -+ case R_68K_JMP_SLOT: -+ *reloc_addr = symbol_addr; -+ break; -+ case R_68K_RELATIVE: -+ *reloc_addr = ((unsigned int) tpnt->loadaddr -+ /* Compatibility kludge. */ -+ + (rpnt->r_addend ? : *reloc_addr)); -+ break; -+ case R_68K_COPY: -+#if 0 /* Do this later. */ -+ _dl_dprintf (2, "Doing copy"); -+ if (symtab_index) -+ _dl_dprintf (2, " for symbol %s", -+ strtab + symtab[symtab_index].st_name); -+ _dl_dprintf (2, "\n"); -+ _dl_memcpy ((void *) symtab[symtab_index].st_value, -+ (void *) symbol_addr, -+ symtab[symtab_index].st_size); -+#endif -+ break; -+ default: -+ _dl_dprintf (2, "%s: can't handle reloc type ", _dl_progname); -+#if defined (__SUPPORT_LD_DEBUG__) -+ _dl_dprintf (2, "%s ", _dl_reltypes[reloc_type]); -+#endif -+ if (symtab_index) -+ _dl_dprintf (2, "'%s'", strtab + symtab[symtab_index].st_name); -+ _dl_dprintf (2, "\n"); -+ _dl_exit (1); -+ } -+ -+ } -+ return goof; -+} -+ -+/* This is done as a separate step, because there are cases where -+ information is first copied and later initialized. This results in -+ the wrong information being copied. Someone at Sun was complaining about -+ a bug in the handling of _COPY by SVr4, and this may in fact be what he -+ was talking about. Sigh. */ -+ -+/* No, there are cases where the SVr4 linker fails to emit COPY relocs -+ at all. */ -+ -+int -+_dl_parse_copy_information (struct dyn_elf *xpnt, unsigned long rel_addr, -+ unsigned long rel_size, int type) -+{ -+ int i; -+ char *strtab; -+ int reloc_type; -+ int goof = 0; -+ Elf32_Sym *symtab; -+ Elf32_Rela *rpnt; -+ unsigned int *reloc_addr; -+ unsigned int symbol_addr; -+ struct elf_resolve *tpnt; -+ int symtab_index; -+ /* Now parse the relocation information */ -+ -+ tpnt = xpnt->dyn; -+ -+ rpnt = (Elf32_Rela *) (rel_addr + tpnt->loadaddr); -+ rel_size = rel_size / sizeof (Elf32_Rela); -+ -+ symtab = (Elf32_Sym *) (tpnt->dynamic_info[DT_SYMTAB] -+ + tpnt->loadaddr); -+ strtab = (char *) (tpnt->dynamic_info[DT_STRTAB] + tpnt->loadaddr); -+ -+ for (i = 0; i < rel_size; i++, rpnt++) -+ { -+ reloc_addr = (int *) (tpnt->loadaddr + (int) rpnt->r_offset); -+ reloc_type = ELF32_R_TYPE (rpnt->r_info); -+ if (reloc_type != R_68K_COPY) -+ continue; -+ symtab_index = ELF32_R_SYM (rpnt->r_info); -+ symbol_addr = 0; -+ if (tpnt->libtype == program_interpreter -+ && (!symtab_index -+ || _dl_symbol (strtab + symtab[symtab_index].st_name))) -+ continue; -+ if (symtab_index) -+ { -+ symbol_addr = (unsigned int) -+ _dl_find_hash (strtab + symtab[symtab_index].st_name, -+ xpnt->next, NULL, copyrel); -+ if (!symbol_addr) -+ { -+ _dl_dprintf (2, "%s: can't resolve symbol '%s'\n", -+ _dl_progname, strtab + symtab[symtab_index].st_name); -+ goof++; -+ } -+ } -+ if (!goof) -+ _dl_memcpy ((void *) symtab[symtab_index].st_value, (void *) symbol_addr, -+ symtab[symtab_index].st_size); -+ } -+ return goof; -+} -diff -urN uClibc/ldso-0.9.24/ldso/m68k/ld_syscalls.h uClibc.ldso.24/ldso-0.9.24/ldso/m68k/ld_syscalls.h ---- uClibc/ldso-0.9.24/ldso/m68k/ld_syscalls.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/m68k/ld_syscalls.h 2002-03-19 04:43:32.000000000 -0600 -@@ -0,0 +1,174 @@ -+/* -+ * This file contains the system call macros and syscall -+ * numbers used by the shared library loader. -+ */ -+ -+#define __NR_exit 1 -+#define __NR_read 3 -+#define __NR_write 4 -+#define __NR_open 5 -+#define __NR_close 6 -+#define __NR_getuid 24 -+#define __NR_geteuid 49 -+#define __NR_getgid 47 -+#define __NR_getegid 50 -+#define __NR_readlink 85 -+#define __NR_mmap 90 -+#define __NR_munmap 91 -+#define __NR_stat 106 -+#define __NR_mprotect 125 -+ -+ -+/* Here are the macros which define how this platform makes -+ * system calls. This particular variant does _not_ set -+ * errno (note how it is disabled in __syscall_return) since -+ * these will get called before the errno symbol is dynamicly -+ * linked. */ -+ -+ -+#define __syscall_return(type, res) \ -+do { \ -+ if ((unsigned long)(res) >= (unsigned long)(-125)) { \ -+ /* avoid using res which is declared to be in register d0; \ -+ errno might expand to a function call and clobber it. */ \ -+ /* int __err = -(res); \ -+ errno = __err; */ \ -+ res = -1; \ -+ } \ -+ return (type) (res); \ -+} while (0) -+ -+#define _syscall0(type, name) \ -+type name(void) \ -+{ \ -+ long __res; \ -+ __asm__ __volatile__ ("movel %1, %%d0\n\t" \ -+ "trap #0\n\t" \ -+ "movel %%d0, %0" \ -+ : "=g" (__res) \ -+ : "i" (__NR_##name) \ -+ : "cc", "%d0"); \ -+ if ((unsigned long)(__res) >= (unsigned long)(-125)) { \ -+ /* errno = -__res; */ \ -+ __res = -1; \ -+ } \ -+ return (type)__res; \ -+} -+ -+#define _syscall1(type, name, atype, a) \ -+type name(atype a) \ -+{ \ -+ long __res; \ -+ __asm__ __volatile__ ("movel %2, %%d1\n\t" \ -+ "movel %1, %%d0\n\t" \ -+ "trap #0\n\t" \ -+ "movel %%d0, %0" \ -+ : "=g" (__res) \ -+ : "i" (__NR_##name), \ -+ "g" ((long)a) \ -+ : "cc", "%d0", "%d1"); \ -+ if ((unsigned long)(__res) >= (unsigned long)(-125)) { \ -+ /* errno = -__res; */ \ -+ __res = -1; \ -+ } \ -+ return (type)__res; \ -+} -+ -+#define _syscall2(type, name, atype, a, btype, b) \ -+type name(atype a, btype b) \ -+{ \ -+ long __res; \ -+ __asm__ __volatile__ ("movel %3, %%d2\n\t" \ -+ "movel %2, %%d1\n\t" \ -+ "movel %1, %%d0\n\t" \ -+ "trap #0\n\t" \ -+ "movel %%d0, %0" \ -+ : "=g" (__res) \ -+ : "i" (__NR_##name), \ -+ "a" ((long)a), \ -+ "g" ((long)b) \ -+ : "cc", "%d0", "%d1", "%d2"); \ -+ if ((unsigned long)(__res) >= (unsigned long)(-125)) { \ -+ /* errno = -__res; */ \ -+ __res = -1; \ -+ } \ -+ return (type)__res; \ -+} -+ -+#define _syscall3(type, name, atype, a, btype, b, ctype, c) \ -+type name(atype a, btype b, ctype c) \ -+{ \ -+ long __res; \ -+ __asm__ __volatile__ ("movel %4, %%d3\n\t" \ -+ "movel %3, %%d2\n\t" \ -+ "movel %2, %%d1\n\t" \ -+ "movel %1, %%d0\n\t" \ -+ "trap #0\n\t" \ -+ "movel %%d0, %0" \ -+ : "=g" (__res) \ -+ : "i" (__NR_##name), \ -+ "a" ((long)a), \ -+ "a" ((long)b), \ -+ "g" ((long)c) \ -+ : "cc", "%d0", "%d1", "%d2", "%d3"); \ -+ if ((unsigned long)(__res) >= (unsigned long)(-125)) { \ -+ /* errno = -__res; */ \ -+ __res = -1; \ -+ } \ -+ return (type)__res; \ -+} -+ -+#define _syscall4(type, name, atype, a, btype, b, ctype, c, dtype, d) \ -+type name(atype a, btype b, ctype c, dtype d) \ -+{ \ -+ long __res; \ -+ __asm__ __volatile__ ("movel %5, %%d4\n\t" \ -+ "movel %4, %%d3\n\t" \ -+ "movel %3, %%d2\n\t" \ -+ "movel %2, %%d1\n\t" \ -+ "movel %1, %%d0\n\t" \ -+ "trap #0\n\t" \ -+ "movel %%d0, %0" \ -+ : "=g" (__res) \ -+ : "i" (__NR_##name), \ -+ "a" ((long)a), \ -+ "a" ((long)b), \ -+ "a" ((long)c), \ -+ "g" ((long)d) \ -+ : "cc", "%d0", "%d1", "%d2", "%d3", \ -+ "%d4"); \ -+ if ((unsigned long)(__res) >= (unsigned long)(-125)) { \ -+ /* errno = -__res; */ \ -+ __res = -1; \ -+ } \ -+ return (type)__res; \ -+} -+ -+#define _syscall5(type, name, atype, a, btype, b, ctype, c, dtype, d, etype, e)\ -+type name(atype a, btype b, ctype c, dtype d, etype e) \ -+{ \ -+ long __res; \ -+ __asm__ __volatile__ ("movel %6, %%d5\n\t" \ -+ "movel %5, %%d4\n\t" \ -+ "movel %4, %%d3\n\t" \ -+ "movel %3, %%d2\n\t" \ -+ "movel %2, %%d1\n\t" \ -+ "movel %1, %%d0\n\t" \ -+ "trap #0\n\t" \ -+ "movel %%d0, %0" \ -+ : "=g" (__res) \ -+ : "i" (__NR_##name), \ -+ "a" ((long)a), \ -+ "a" ((long)b), \ -+ "a" ((long)c), \ -+ "a" ((long)d), \ -+ "g" ((long)e) \ -+ : "cc", "%d0", "%d1", "%d2", "%d3", \ -+ "%d4", "%d5"); \ -+ if ((unsigned long)(__res) >= (unsigned long)(-125)) { \ -+ /* errno = -__res; */ \ -+ __res = -1; \ -+ } \ -+ return (type)__res; \ -+} -+ -diff -urN uClibc/ldso-0.9.24/ldso/m68k/ld_sysdep.h uClibc.ldso.24/ldso-0.9.24/ldso/m68k/ld_sysdep.h ---- uClibc/ldso-0.9.24/ldso/m68k/ld_sysdep.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/m68k/ld_sysdep.h 2002-05-28 16:33:34.000000000 -0500 -@@ -0,0 +1,88 @@ -+ -+/* Various assmbly language/system dependent hacks that are required -+ so that we can minimize the amount of platform specific code. */ -+ -+/* Define this if the system uses RELOCA. */ -+#define ELF_USES_RELOCA -+ -+/* Get a pointer to the argv array. On many platforms this can be -+ just the address if the first argument, on other platforms we need -+ to do something a little more subtle here. */ -+#define GET_ARGV(ARGVP, ARGS) ((ARGVP) = ((unsigned int *) &(ARGS))) -+ -+/* Initialization sequence for a GOT. */ -+#define INIT_GOT(GOT_BASE,MODULE) \ -+{ \ -+ GOT_BASE[2] = (int) _dl_linux_resolve; \ -+ GOT_BASE[1] = (int) (MODULE); \ -+} -+ -+/* Here is a macro to perform a relocation. This is only used when -+ bootstrapping the dynamic loader. RELP is the relocation that we -+ are performing, REL is the pointer to the address we are -+ relocating. SYMBOL is the symbol involved in the relocation, and -+ LOAD is the load address. */ -+#define PERFORM_BOOTSTRAP_RELOC(RELP,REL,SYMBOL,LOAD) \ -+ switch (ELF32_R_TYPE ((RELP)->r_info)) \ -+ { \ -+ case R_68K_8: \ -+ *(char *) (REL) = (SYMBOL) + (RELP)->r_addend; \ -+ break; \ -+ case R_68K_16: \ -+ *(short *) (REL) = (SYMBOL) + (RELP)->r_addend; \ -+ break; \ -+ case R_68K_32: \ -+ *(REL) = (SYMBOL) + (RELP)->r_addend; \ -+ break; \ -+ case R_68K_PC8: \ -+ *(char *) (REL) = ((SYMBOL) + (RELP)->r_addend \ -+ - (unsigned int) (REL)); \ -+ break; \ -+ case R_68K_PC16: \ -+ *(short *) (REL) = ((SYMBOL) + (RELP)->r_addend \ -+ - (unsigned int) (REL)); \ -+ break; \ -+ case R_68K_PC32: \ -+ *(REL) = ((SYMBOL) + (RELP)->r_addend \ -+ - (unsigned int) (REL)); \ -+ break; \ -+ case R_68K_GLOB_DAT: \ -+ case R_68K_JMP_SLOT: \ -+ *(REL) = (SYMBOL); \ -+ break; \ -+ case R_68K_RELATIVE: /* Compatibility kludge */ \ -+ *(REL) = ((unsigned int) (LOAD) + ((RELP)->r_addend ? : *(REL))); \ -+ break; \ -+ default: \ -+ _dl_exit (1); \ -+ } -+ -+ -+/* Transfer control to the user's application, once the dynamic loader -+ is done. */ -+ -+#define START() \ -+ __asm__ volatile ("unlk %%a6\n\t" \ -+ "jmp %0@" \ -+ : : "a" (_dl_elf_main)); -+ -+ -+ -+/* Here we define the magic numbers that this dynamic loader should accept */ -+ -+#define MAGIC1 EM_68K -+#undef MAGIC2 -+/* Used for error messages */ -+#define ELF_TARGET "m68k" -+ -+struct elf_resolve; -+extern unsigned int _dl_linux_resolver (int, int, struct elf_resolve *, int); -+ -+/* Define this because we do not want to call .udiv in the library. -+ Not needed for m68k. */ -+#define do_rem(result, n, base) ((result) = (n) % (base)) -+ -+/* 4096 bytes alignment */ -+#define PAGE_ALIGN 0xfffff000 -+#define ADDR_ALIGN 0xfff -+#define OFFS_ALIGN 0x7ffff000 -diff -urN uClibc/ldso-0.9.24/ldso/m68k/resolve.S uClibc.ldso.24/ldso-0.9.24/ldso/m68k/resolve.S ---- uClibc/ldso-0.9.24/ldso/m68k/resolve.S 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/m68k/resolve.S 2001-04-27 12:23:26.000000000 -0500 -@@ -0,0 +1,21 @@ -+/* -+ * These are various helper routines that are needed to run an ELF image. -+ */ -+ -+.text -+.even -+ -+.globl _dl_linux_resolve -+ .type _dl_linux_resolve,@function -+_dl_linux_resolve: -+ moveml %a0/%a1,%sp@- -+#ifdef __PIC__ -+ bsrl _dl_linux_resolver@PLTPC -+#else -+ jbsr _dl_linux_resolver -+#endif -+ moveml %sp@+,%a0/%a1 -+ addql #8,%sp -+ jmp @(%d0) -+.LFE2: -+ .size _dl_linux_resolve,.LFE2-_dl_linux_resolve -diff -urN uClibc/ldso-0.9.24/ldso/mips/README uClibc.ldso.24/ldso-0.9.24/ldso/mips/README ---- uClibc/ldso-0.9.24/ldso/mips/README 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/mips/README 2002-07-25 16:15:59.000000000 -0500 -@@ -0,0 +1,52 @@ -+Almost all of the code present in these source files was taken -+from GLIBC. In the descriptions below, all files mentioned are -+with respect to the top level GLIBC source directory accept for -+code taken from the Linux kernel. -+ -+boot1_arch.h -+------------ -+Contains code to fix up the stack pointer so that the dynamic -+linker can find argc, argv and Auxillary Vector Table (AVT). -+The code is taken from the function 'RTLD_START' in the file -+'sysdeps/mips/dl-machine.h'. -+ -+elfinterp.c -+----------- -+Contains the runtime resolver code taken from the function -+'__dl_runtime_resolve' in 'sysdeps/mips/dl-machine.h'. Also -+contains the function to perform relocations for objects -+other than the linker itself. The code was taken from the -+function 'elf_machine_rel' in 'sysdeps/mips/dl-machine.h'. -+ -+ld_syscalls.h -+------------- -+Used to contain all the macro functions for the system calls -+as well as the list of system calls supported. We now include -+<sys/syscall.h> but with the __set_errno macro defined empty -+so we can use the same file for the linker as well as userspace. -+Original code was taken from the Linux kernel source 2.4.17 and -+can be found in the file 'include/asm-mips/unistd.h'. -+ -+ld_sysdep.h -+----------- -+Contains bootstrap code for the dynamic linker, magic numbers -+for detecting MIPS target types and some macros. The macro -+function 'PERFORM_BOOTSTRAP_GOT' is used to relocate the dynamic -+linker's GOT so that function calls can be made. The code is -+taken from the function 'ELF_MACHINE_BEFORE_RTLD_RELOC' in the -+file 'sysdeps/mips/dl-machine.h'. The other macro function -+'PERFORM_BOOTSTRAP_RELOC' is used to do the relocations for -+the dynamic loader. The code is taken from the function -+'elf_machine_rel' in the file 'sysdeps/mips/dl-machine.h'. The -+final macro function is 'INIT_GOT' which initializes the GOT -+for the application being dynamically linked and loaded. The -+code is taken from the functions 'elf_machine_runtime_setup' -+and 'elf_machine_got_rel' in 'sysdeps/mips/dl-machine.h'. -+ -+resolve.S -+--------- -+Contains the low-level assembly code for the dynamic runtime -+resolver. The code is taken from the assembly code function -+'_dl_runtime_resolve' in the file 'sysdeps/mips/dl-machine.h'. -+The code looks a bit different since we only need to pass the -+symbol index and the old GP register. -diff -urN uClibc/ldso-0.9.24/ldso/mips/boot1_arch.h uClibc.ldso.24/ldso-0.9.24/ldso/mips/boot1_arch.h ---- uClibc/ldso-0.9.24/ldso/mips/boot1_arch.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/mips/boot1_arch.h 2003-06-12 16:39:10.000000000 -0500 -@@ -0,0 +1,38 @@ -+/* Any assmbly language/system dependent hacks needed to setup boot1.c so it -+ * will work as expected and cope with whatever platform specific wierdness is -+ * needed for this architecture. -+ */ -+ -+asm("" \ -+" .text\n" \ -+" .globl _dl_boot\n" \ -+"_dl_boot:\n" \ -+" .set noreorder\n" \ -+" bltzal $0, 0f\n" \ -+" nop\n" \ -+"0: .cpload $31\n" \ -+" .set reorder\n" \ -+" la $4, _DYNAMIC\n" \ -+" sw $4, -0x7ff0($28)\n" \ -+" move $4, $29\n" \ -+" la $8, coff\n" \ -+" .set noreorder\n" \ -+" bltzal $0, coff\n" \ -+" nop\n" \ -+"coff: subu $8, $31, $8\n" \ -+" .set reorder\n" \ -+" la $25, _dl_boot2\n" \ -+" addu $25, $8\n" \ -+" jalr $25\n" \ -+" lw $4, 0($29)\n" \ -+" la $5, 4($29)\n" \ -+" sll $6, $4, 2\n" \ -+" addu $6, $6, $5\n" \ -+" addu $6, $6, 4\n" \ -+" la $7, _dl_elf_main\n" \ -+" lw $25, 0($7)\n" \ -+" jr $25\n" \ -+); -+ -+#define _dl_boot _dl_boot2 -+#define LD_BOOT(X) static void __attribute__ ((unused)) _dl_boot (X) -diff -urN uClibc/ldso-0.9.24/ldso/mips/elfinterp.c uClibc.ldso.24/ldso-0.9.24/ldso/mips/elfinterp.c ---- uClibc/ldso-0.9.24/ldso/mips/elfinterp.c 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/mips/elfinterp.c 2003-08-22 02:04:16.000000000 -0500 -@@ -0,0 +1,301 @@ -+/* vi: set sw=4 ts=4: */ -+/* mips/mipsel ELF shared library loader suppport -+ * -+ Copyright (C) 2002, Steven J. Hill (sjhill@realitydiluted.com) -+ * -+ * 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. The name of the above contributors may not be -+ * used to endorse or promote products derived from this software -+ * without specific prior written permission. -+ * -+ * THIS SOFTWARE IS PROVIDED BY THE 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 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. -+ */ -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+static const char *_dl_reltypes_tab[] = -+{ -+ [0] "R_MIPS_NONE", "R_MIPS_16", "R_MIPS_32", -+ [3] "R_MIPS_REL32", "R_MIPS_26", "R_MIPS_HI16", -+ [6] "R_MIPS_LO16", "R_MIPS_GPREL16", "R_MIPS_LITERAL", -+ [9] "R_MIPS_GOT16", "R_MIPS_PC16", "R_MIPS_CALL16", -+ [12] "R_MIPS_GPREL32", -+ [16] "R_MIPS_SHIFT5", "R_MIPS_SHIFT6", "R_MIPS_64", -+ [19] "R_MIPS_GOT_DISP", "R_MIPS_GOT_PAGE", "R_MIPS_GOT_OFST", -+ [22] "R_MIPS_GOT_HI16", "R_MIPS_GOT_LO16", "R_MIPS_SUB", -+ [25] "R_MIPS_INSERT_A", "R_MIPS_INSERT_B", "R_MIPS_DELETE", -+ [28] "R_MIPS_HIGHER", "R_MIPS_HIGHEST", "R_MIPS_CALL_HI16", -+ [31] "R_MIPS_CALL_LO16", "R_MIPS_SCN_DISP", "R_MIPS_REL16", -+ [34] "R_MIPS_ADD_IMMEDIATE", "R_MIPS_PJUMP", "R_MIPS_RELGOT", -+ [37] "R_MIPS_JALR", -+}; -+ -+static const char * -+_dl_reltypes(int type) -+{ -+ static char buf[22]; -+ const char *str; -+ -+ if (type >= (int)(sizeof (_dl_reltypes_tab)/sizeof(_dl_reltypes_tab[0])) || -+ NULL == (str = _dl_reltypes_tab[type])) -+ { -+ str =_dl_simple_ltoa( buf, (unsigned long)(type)); -+ } -+ return str; -+} -+ -+static -+void debug_sym(Elf32_Sym *symtab,char *strtab,int symtab_index) -+{ -+ if(_dl_debug_symbols) -+ { -+ if(symtab_index){ -+ _dl_dprintf(_dl_debug_file, "\n%s\n\tvalue=%x\tsize=%x\tinfo=%x\tother=%x\tshndx=%x", -+ strtab + symtab[symtab_index].st_name, -+ symtab[symtab_index].st_value, -+ symtab[symtab_index].st_size, -+ symtab[symtab_index].st_info, -+ symtab[symtab_index].st_other, -+ symtab[symtab_index].st_shndx); -+ } -+ } -+} -+ -+static void debug_reloc(Elf32_Sym *symtab,char *strtab, ELF_RELOC *rpnt) -+{ -+ if(_dl_debug_reloc) -+ { -+ int symtab_index; -+ const char *sym; -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ sym = symtab_index ? strtab + symtab[symtab_index].st_name : "sym=0x0"; -+ -+ if(_dl_debug_symbols) -+ _dl_dprintf(_dl_debug_file, "\n\t"); -+ else -+ _dl_dprintf(_dl_debug_file, "\n%s\n\t", sym); -+#ifdef ELF_USES_RELOCA -+ _dl_dprintf(_dl_debug_file, "%s\toffset=%x\taddend=%x", -+ _dl_reltypes(ELF32_R_TYPE(rpnt->r_info)), -+ rpnt->r_offset, -+ rpnt->r_addend); -+#else -+ _dl_dprintf(_dl_debug_file, "%s\toffset=%x\n", -+ _dl_reltypes(ELF32_R_TYPE(rpnt->r_info)), -+ rpnt->r_offset); -+#endif -+ } -+} -+#endif -+ -+extern int _dl_linux_resolve(void); -+ -+#define OFFSET_GP_GOT 0x7ff0 -+ -+unsigned long _dl_linux_resolver(unsigned long sym_index, -+ unsigned long old_gpreg) -+{ -+ unsigned long *got = (unsigned long *) (old_gpreg - OFFSET_GP_GOT); -+ struct elf_resolve *tpnt = (struct elf_resolve *) got[1]; -+ Elf32_Sym *sym; -+ char *strtab; -+ unsigned long local_gotno; -+ unsigned long gotsym; -+ unsigned long new_addr; -+ unsigned long instr_addr; -+ char **got_addr; -+ char *symname; -+ -+ gotsym = tpnt->mips_gotsym; -+ local_gotno = tpnt->mips_local_gotno; -+ -+ sym = ((Elf32_Sym *) (tpnt->dynamic_info[DT_SYMTAB] + tpnt->loadaddr)) + sym_index; -+ strtab = (char *) (tpnt->dynamic_info[DT_STRTAB] + tpnt->loadaddr); -+ symname = strtab + sym->st_name; -+ -+ new_addr = (unsigned long) _dl_find_hash(strtab + sym->st_name, -+ tpnt->symbol_scope, tpnt, resolver); -+ -+ /* Address of jump instruction to fix up */ -+ instr_addr = (unsigned long) (got + local_gotno + sym_index - gotsym); -+ got_addr = (char **) instr_addr; -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ if (_dl_debug_bindings) -+ { -+ _dl_dprintf(_dl_debug_file, "\nresolve function: %s", symname); -+ if(_dl_debug_detail) _dl_dprintf(_dl_debug_file, -+ "\n\tpatched %x ==> %x @ %x\n", *got_addr, new_addr, got_addr); -+ } -+ if (!_dl_debug_nofixups) { -+ *got_addr = (char*)new_addr; -+ } -+#else -+ *got_addr = (char*)new_addr; -+#endif -+ -+ return new_addr; -+} -+ -+void _dl_parse_lazy_relocation_information(struct elf_resolve *tpnt, -+ unsigned long rel_addr, unsigned long rel_size, int type) -+{ -+ /* Nothing to do */ -+ return; -+} -+ -+int _dl_parse_copy_information(struct dyn_elf *xpnt, unsigned long rel_addr, -+ unsigned long rel_size, int type) -+{ -+ /* Nothing to do */ -+ return 0; -+} -+ -+ -+int _dl_parse_relocation_information(struct elf_resolve *tpnt, -+ unsigned long rel_addr, unsigned long rel_size, int type) -+{ -+ Elf32_Sym *symtab; -+ Elf32_Rel *rpnt; -+ char *strtab; -+ unsigned long *got; -+ unsigned long *reloc_addr=NULL, old_val=0; -+ unsigned long symbol_addr; -+ int i, reloc_type, symtab_index; -+ -+ /* Now parse the relocation information */ -+ rel_size = rel_size / sizeof(Elf32_Rel); -+ rpnt = (Elf32_Rel *) (rel_addr + tpnt->loadaddr); -+ -+ symtab = (Elf32_Sym *) (tpnt->dynamic_info[DT_SYMTAB] + tpnt->loadaddr); -+ strtab = (char *) (tpnt->dynamic_info[DT_STRTAB] + tpnt->loadaddr); -+ got = (unsigned long *) (tpnt->dynamic_info[DT_PLTGOT] + tpnt->loadaddr); -+ -+ for (i = 0; i < rel_size; i++, rpnt++) { -+ reloc_addr = (unsigned long *) (tpnt->loadaddr + -+ (unsigned long) rpnt->r_offset); -+ reloc_type = ELF32_R_TYPE(rpnt->r_info); -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ symbol_addr = 0; -+ -+ if (!symtab_index && tpnt->libtype == program_interpreter) -+ continue; -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ debug_sym(symtab,strtab,symtab_index); -+ debug_reloc(symtab,strtab,rpnt); -+ old_val = *reloc_addr; -+#endif -+ -+ switch (reloc_type) { -+ case R_MIPS_REL32: -+ if (symtab_index) { -+ if (symtab_index < tpnt->mips_gotsym) -+ *reloc_addr += -+ symtab[symtab_index].st_value + -+ (unsigned long) tpnt->loadaddr; -+ else { -+ *reloc_addr += got[symtab_index + tpnt->mips_local_gotno - -+ tpnt->mips_gotsym]; -+ } -+ } -+ else { -+ *reloc_addr += (unsigned long) tpnt->loadaddr; -+ } -+ break; -+ case R_MIPS_NONE: -+ break; -+ default: -+ { -+ int reloc_type = ELF32_R_TYPE(rpnt->r_info); -+ _dl_dprintf(2, "\n%s: ",_dl_progname); -+ -+ if (symtab_index) -+ _dl_dprintf(2, "symbol '%s': ", strtab + symtab[symtab_index].st_name); -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ _dl_dprintf(2, "can't handle reloc type %s\n ", _dl_reltypes(reloc_type)); -+#else -+ _dl_dprintf(2, "can't handle reloc type %x\n", reloc_type); -+#endif -+ _dl_exit(1); -+ } -+ }; -+ -+ }; -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug_reloc && _dl_debug_detail) -+ _dl_dprintf(_dl_debug_file, "\tpatched: %x ==> %x @ %x\n", old_val, *reloc_addr, reloc_addr); -+#endif -+ -+ return 0; -+} -+ -+void _dl_perform_mips_global_got_relocations(struct elf_resolve *tpnt) -+{ -+ Elf32_Sym *sym; -+ char *strtab; -+ unsigned long i; -+ unsigned long *got_entry; -+ -+ for (; tpnt ; tpnt = tpnt->next) { -+ -+ /* We don't touch the dynamic linker */ -+ if (tpnt->libtype == program_interpreter) -+ continue; -+ -+ /* Setup the loop variables */ -+ got_entry = (unsigned long *) (tpnt->loadaddr + -+ tpnt->dynamic_info[DT_PLTGOT]) + tpnt->mips_local_gotno; -+ sym = (Elf32_Sym *) (tpnt->dynamic_info[DT_SYMTAB] + -+ (unsigned long) tpnt->loadaddr) + tpnt->mips_gotsym; -+ strtab = (char *) (tpnt->dynamic_info[DT_STRTAB] + -+ (unsigned long) tpnt->loadaddr); -+ i = tpnt->mips_symtabno - tpnt->mips_gotsym; -+ -+ /* Relocate the global GOT entries for the object */ -+ while(i--) { -+ if (sym->st_shndx == SHN_UNDEF) { -+ if (ELF32_ST_TYPE(sym->st_info) == STT_FUNC && sym->st_value) -+ *got_entry = sym->st_value + (unsigned long) tpnt->loadaddr; -+ else { -+ *got_entry = (unsigned long) _dl_find_hash(strtab + -+ sym->st_name, tpnt->symbol_scope, NULL, copyrel); -+ } -+ } -+ else if (sym->st_shndx == SHN_COMMON) { -+ *got_entry = (unsigned long) _dl_find_hash(strtab + -+ sym->st_name, tpnt->symbol_scope, NULL, copyrel); -+ } -+ else if (ELF32_ST_TYPE(sym->st_info) == STT_FUNC && -+ *got_entry != sym->st_value) -+ *got_entry += (unsigned long) tpnt->loadaddr; -+ else if (ELF32_ST_TYPE(sym->st_info) == STT_SECTION) { -+ if (sym->st_other == 0) -+ *got_entry += (unsigned long) tpnt->loadaddr; -+ } -+ else { -+ *got_entry = (unsigned long) _dl_find_hash(strtab + -+ sym->st_name, tpnt->symbol_scope, NULL, copyrel); -+ } -+ -+ got_entry++; -+ sym++; -+ } -+ } -+} -diff -urN uClibc/ldso-0.9.24/ldso/mips/ld_syscalls.h uClibc.ldso.24/ldso-0.9.24/ldso/mips/ld_syscalls.h ---- uClibc/ldso-0.9.24/ldso/mips/ld_syscalls.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/mips/ld_syscalls.h 2002-08-09 07:20:20.000000000 -0500 -@@ -0,0 +1,7 @@ -+/* Define the __set_errno macro as nothing so that we don't bother -+ * setting errno, which is important since we make system calls -+ * before the errno symbol is dynamicly linked. */ -+ -+#define __set_errno(X) {(void)(X);} -+#include "sys/syscall.h" -+ -diff -urN uClibc/ldso-0.9.24/ldso/mips/ld_sysdep.h uClibc.ldso.24/ldso-0.9.24/ldso/mips/ld_sysdep.h ---- uClibc/ldso-0.9.24/ldso/mips/ld_sysdep.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/mips/ld_sysdep.h 2002-05-28 16:33:36.000000000 -0500 -@@ -0,0 +1,136 @@ -+/* vi: set sw=4 ts=4: */ -+ -+/* -+ * Various assmbly language/system dependent hacks that are required -+ * so that we can minimize the amount of platform specific code. -+ */ -+ -+/* -+ * Define this if the system uses RELOCA. -+ */ -+#undef ELF_USES_RELOCA -+ -+ -+/* -+ * Get a pointer to the argv array. On many platforms this can be just -+ * the address if the first argument, on other platforms we need to -+ * do something a little more subtle here. -+ */ -+#define GET_ARGV(ARGVP, ARGS) ARGVP = ((unsigned long *) ARGS) -+ -+ -+/* -+ * Initialization sequence for the application/library GOT. -+ */ -+#define INIT_GOT(GOT_BASE,MODULE) \ -+do { \ -+ unsigned long i; \ -+ \ -+ /* Check if this is the dynamic linker itself */ \ -+ if (MODULE->libtype == program_interpreter) \ -+ continue; \ -+ \ -+ /* Fill in first two GOT entries according to the ABI */ \ -+ GOT_BASE[0] = (unsigned long) _dl_linux_resolve; \ -+ GOT_BASE[1] = (unsigned long) MODULE; \ -+ \ -+ /* Add load address displacement to all local GOT entries */ \ -+ i = 2; \ -+ while (i < MODULE->mips_local_gotno) \ -+ GOT_BASE[i++] += (unsigned long) MODULE->loadaddr; \ -+ \ -+} while (0) -+ -+ -+/* -+ * Here is a macro to perform the GOT relocation. This is only -+ * used when bootstrapping the dynamic loader. -+ */ -+#define PERFORM_BOOTSTRAP_GOT(got) \ -+do { \ -+ Elf32_Sym *sym; \ -+ unsigned long i; \ -+ \ -+ /* Add load address displacement to all local GOT entries */ \ -+ i = 2; \ -+ while (i < tpnt->mips_local_gotno) \ -+ got[i++] += load_addr; \ -+ \ -+ /* Handle global GOT entries */ \ -+ got += tpnt->mips_local_gotno; \ -+ sym = (Elf32_Sym *) (tpnt->dynamic_info[DT_SYMTAB] + \ -+ load_addr) + tpnt->mips_gotsym; \ -+ i = tpnt->mips_symtabno - tpnt->mips_gotsym; \ -+ \ -+ while (i--) { \ -+ if (sym->st_shndx == SHN_UNDEF || \ -+ sym->st_shndx == SHN_COMMON) \ -+ *got = load_addr + sym->st_value; \ -+ else if (ELF32_ST_TYPE(sym->st_info) == STT_FUNC && \ -+ *got != sym->st_value) \ -+ *got += load_addr; \ -+ else if (ELF32_ST_TYPE(sym->st_info) == STT_SECTION) { \ -+ if (sym->st_other == 0) \ -+ *got += load_addr; \ -+ } \ -+ else \ -+ *got = load_addr + sym->st_value; \ -+ \ -+ got++; \ -+ sym++; \ -+ } \ -+} while (0) -+ -+ -+/* -+ * Here is a macro to perform a relocation. This is only used when -+ * bootstrapping the dynamic loader. -+ */ -+#define PERFORM_BOOTSTRAP_RELOC(RELP,REL,SYMBOL,LOAD) \ -+ switch(ELF32_R_TYPE((RELP)->r_info)) { \ -+ case R_MIPS_REL32: \ -+ if (symtab_index) { \ -+ if (symtab_index < tpnt->mips_gotsym) \ -+ *REL += SYMBOL; \ -+ } \ -+ else { \ -+ *REL += LOAD; \ -+ } \ -+ break; \ -+ case R_MIPS_NONE: \ -+ break; \ -+ default: \ -+ SEND_STDERR("Aiieeee!"); \ -+ _dl_exit(1); \ -+ } -+ -+ -+/* -+ * Transfer control to the user's application, once the dynamic loader -+ * is done. This routine has to exit the current function, then -+ * call the _dl_elf_main function. For MIPS, we do it in assembly -+ * because the stack doesn't get properly restored otherwise. Got look -+ * at boot1_arch.h -+ */ -+#define START() -+ -+ -+/* Here we define the magic numbers that this dynamic loader should accept */ -+#define MAGIC1 EM_MIPS -+#define MAGIC2 EM_MIPS_RS3_LE -+ -+ -+/* Used for error messages */ -+#define ELF_TARGET "MIPS" -+ -+ -+unsigned long _dl_linux_resolver(unsigned long sym_index, -+ unsigned long old_gpreg); -+ -+ -+#define do_rem(result, n, base) result = (n % base) -+ -+/* 4096 bytes alignment */ -+#define PAGE_ALIGN 0xfffff000 -+#define ADDR_ALIGN 0xfff -+#define OFFS_ALIGN 0x7ffff000 -diff -urN uClibc/ldso-0.9.24/ldso/mips/resolve.S uClibc.ldso.24/ldso-0.9.24/ldso/mips/resolve.S ---- uClibc/ldso-0.9.24/ldso/mips/resolve.S 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/mips/resolve.S 2003-01-30 10:40:26.000000000 -0600 -@@ -0,0 +1,45 @@ -+ /* -+ * Linux dynamic resolving code for MIPS. Fixes up the GOT entry as -+ * indicated in register t8 and jumps to the resolved address. Shamelessly -+ * ripped from 'sysdeps/mips/dl-machine.h' in glibc-2.2.5. -+ * -+ * This file is subject to the terms and conditions of the GNU Lesser General -+ * Public License. See the file "COPYING.LIB" in the main directory of this -+ * archive for more details. -+ * -+ * Copyright (C) 1996-2001 Kazumoto Kojima <kkojima@info.kanagawa-u.ac.jp> -+ * Copyright (C) 2002 Steven J. Hill <sjhill@realitydiluted.com> -+ * -+ */ -+.text -+.align 2 -+.globl _dl_linux_resolve -+.type _dl_linux_resolve,@function -+.ent _dl_linux_resolve -+_dl_linux_resolve: -+ .frame $29, 40, $31 -+ .set noreorder -+ move $3, $28 # Save GP -+ addu $25, 8 # t9 ($25) now points at .cpload instruction -+ .cpload $25 # Compute GP -+ .set reorder -+ subu $29, 40 -+ .cprestore 32 -+ sw $15, 36($29) -+ sw $4, 16($29) -+ sw $5, 20($29) -+ sw $6, 24($29) -+ sw $7, 28($29) -+ move $4, $24 -+ move $5, $3 -+ jal _dl_linux_resolver -+ lw $31, 36($29) -+ lw $4, 16($29) -+ lw $5, 20($29) -+ lw $6, 24($29) -+ lw $7, 28($29) -+ addu $29, 40 -+ move $25, $2 -+ jr $25 -+.size _dl_linux_resolve,.-_dl_linux_resolve -+.end _dl_linux_resolve -diff -urN uClibc/ldso-0.9.24/ldso/powerpc/boot1_arch.h uClibc.ldso.24/ldso-0.9.24/ldso/powerpc/boot1_arch.h ---- uClibc/ldso-0.9.24/ldso/powerpc/boot1_arch.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/powerpc/boot1_arch.h 2003-02-15 19:22:41.000000000 -0600 -@@ -0,0 +1,20 @@ -+/* Any assmbly language/system dependent hacks needed to setup boot1.c so it -+ * will work as expected and cope with whatever platform specific wierdness is -+ * needed for this architecture. */ -+ -+/* Overrive the default _dl_boot function, and replace it with a bit of asm. -+ * Then call the real _dl_boot function, which is now named _dl_boot2. */ -+ -+asm("" \ -+" .text\n" \ -+" .globl _dl_boot\n" \ -+"_dl_boot:\n" \ -+" mr 3,1\n" \ -+" addi 1,1,-16\n" \ -+" bl _dl_boot2\n" \ -+".previous\n" \ -+); -+ -+#define _dl_boot _dl_boot2 -+#define LD_BOOT(X) static void * __attribute__ ((unused)) _dl_boot (X) -+ -diff -urN uClibc/ldso-0.9.24/ldso/powerpc/elfinterp.c uClibc.ldso.24/ldso-0.9.24/ldso/powerpc/elfinterp.c ---- uClibc/ldso-0.9.24/ldso/powerpc/elfinterp.c 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/powerpc/elfinterp.c 2003-12-03 17:28:33.000000000 -0600 -@@ -0,0 +1,621 @@ -+/* vi: set sw=4 ts=4: */ -+/* powerpc shared library loader suppport -+ * -+ * Copyright (C) 2001-2002, David A. Schleef -+ * Copyright (C) 2003, Erik Andersen -+ * -+ * 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. The name of the above contributors may not be -+ * used to endorse or promote products derived from this software -+ * without specific prior written permission. -+ * -+ * THIS SOFTWARE IS PROVIDED BY THE 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 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. -+ */ -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+static const char *_dl_reltypes_tab[] = -+ { "R_PPC_NONE", "R_PPC_ADDR32", "R_PPC_ADDR24", "R_PPC_ADDR16", -+ "R_PPC_ADDR16_LO", "R_PPC_ADDR16_HI", "R_PPC_ADDR16_HA", -+ "R_PPC_ADDR14", "R_PPC_ADDR14_BRTAKEN", "R_PPC_ADDR14_BRNTAKEN", -+ "R_PPC_REL24", "R_PPC_REL14", "R_PPC_REL14_BRTAKEN", -+ "R_PPC_REL14_BRNTAKEN", "R_PPC_GOT16", "R_PPC_GOT16_LO", -+ "R_PPC_GOT16_HI", "R_PPC_GOT16_HA", "R_PPC_PLTREL24", -+ "R_PPC_COPY", "R_PPC_GLOB_DAT", "R_PPC_JMP_SLOT", "R_PPC_RELATIVE", -+ "R_PPC_LOCAL24PC", "R_PPC_UADDR32", "R_PPC_UADDR16", "R_PPC_REL32", -+ "R_PPC_PLT32", "R_PPC_PLTREL32", "R_PPC_PLT16_LO", "R_PPC_PLT16_HI", -+ "R_PPC_PLT16_HA", "R_PPC_SDAREL16", "R_PPC_SECTOFF", -+ "R_PPC_SECTOFF_LO", "R_PPC_SECTOFF_HI", "R_PPC_SECTOFF_HA", -+}; -+ -+static const char * -+_dl_reltypes(int type) -+{ -+ static char buf[22]; -+ const char *str; -+ -+ if (type >= (int)(sizeof (_dl_reltypes_tab)/sizeof(_dl_reltypes_tab[0])) || -+ NULL == (str = _dl_reltypes_tab[type])) -+ { -+ str =_dl_simple_ltoa( buf, (unsigned long)(type)); -+ } -+ return str; -+} -+ -+static -+void debug_sym(Elf32_Sym *symtab,char *strtab,int symtab_index) -+{ -+ if(_dl_debug_symbols) -+ { -+ if(symtab_index){ -+ _dl_dprintf(_dl_debug_file, "\n%s\n\tvalue=%x\tsize=%x\tinfo=%x\tother=%x\tshndx=%x", -+ strtab + symtab[symtab_index].st_name, -+ symtab[symtab_index].st_value, -+ symtab[symtab_index].st_size, -+ symtab[symtab_index].st_info, -+ symtab[symtab_index].st_other, -+ symtab[symtab_index].st_shndx); -+ } -+ } -+} -+ -+static -+void debug_reloc(Elf32_Sym *symtab,char *strtab, ELF_RELOC *rpnt) -+{ -+ if(_dl_debug_reloc) -+ { -+ int symtab_index; -+ const char *sym; -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ sym = symtab_index ? strtab + symtab[symtab_index].st_name : "sym=0x0"; -+ -+ if(_dl_debug_symbols) -+ _dl_dprintf(_dl_debug_file, "\n\t"); -+ else -+ _dl_dprintf(_dl_debug_file, "\n%s\n\t", sym); -+#ifdef ELF_USES_RELOCA -+ _dl_dprintf(_dl_debug_file, "%s\toffset=%x\taddend=%x", -+ _dl_reltypes(ELF32_R_TYPE(rpnt->r_info)), -+ rpnt->r_offset, -+ rpnt->r_addend); -+#else -+ _dl_dprintf(_dl_debug_file, "%s\toffset=%x\n", -+ _dl_reltypes(ELF32_R_TYPE(rpnt->r_info)), -+ rpnt->r_offset); -+#endif -+ } -+} -+#endif -+ -+extern int _dl_linux_resolve(void); -+ -+void _dl_init_got(unsigned long *plt,struct elf_resolve *tpnt) -+{ -+ unsigned long target_addr = (unsigned long)_dl_linux_resolve; -+ unsigned int n_plt_entries; -+ unsigned long *tramp; -+ unsigned long data_words; -+ unsigned int rel_offset_words; -+ -+ //DPRINTF("init_got plt=%x, tpnt=%x\n", (unsigned long)plt,(unsigned long)tpnt); -+ -+ n_plt_entries = tpnt->dynamic_info[DT_PLTRELSZ] / sizeof(ELF_RELOC); -+ //DPRINTF("n_plt_entries %d\n",n_plt_entries); -+ -+ rel_offset_words = PLT_DATA_START_WORDS(n_plt_entries); -+ //DPRINTF("rel_offset_words %x\n",rel_offset_words); -+ data_words = (unsigned long)(plt + rel_offset_words); -+ //DPRINTF("data_words %x\n",data_words); -+ -+ tpnt->data_words = data_words; -+ -+ plt[PLT_LONGBRANCH_ENTRY_WORDS] = OPCODE_ADDIS_HI(11, 11, data_words); -+ plt[PLT_LONGBRANCH_ENTRY_WORDS+1] = OPCODE_LWZ(11,data_words,11); -+ -+ plt[PLT_LONGBRANCH_ENTRY_WORDS+2] = OPCODE_MTCTR(11); -+ plt[PLT_LONGBRANCH_ENTRY_WORDS+3] = OPCODE_BCTR(); -+ -+ /* [4] */ -+ /* [5] */ -+ -+ tramp = plt + PLT_TRAMPOLINE_ENTRY_WORDS; -+ tramp[0] = OPCODE_ADDIS_HI(11,11,-data_words); -+ tramp[1] = OPCODE_ADDI(11,11,-data_words); -+ tramp[2] = OPCODE_SLWI(12,11,1); -+ tramp[3] = OPCODE_ADD(11,12,11); -+ tramp[4] = OPCODE_LI(12,target_addr); -+ tramp[5] = OPCODE_ADDIS_HI(12,12,target_addr); -+ tramp[6] = OPCODE_MTCTR(12); -+ tramp[7] = OPCODE_LI(12,(unsigned long)tpnt); -+ tramp[8] = OPCODE_ADDIS_HI(12,12,(unsigned long)tpnt); -+ tramp[9] = OPCODE_BCTR(); -+ -+ /* [16] unused */ -+ /* [17] unused */ -+ -+ /* instructions were modified */ -+ PPC_DCBST(plt); -+ PPC_DCBST(plt+4); -+ PPC_DCBST(plt+8); -+ PPC_DCBST(plt+12); -+ PPC_DCBST(plt+16-1); -+ PPC_SYNC; -+ PPC_ICBI(plt); -+ PPC_ICBI(plt+4); /* glibc thinks this is not needed */ -+ PPC_ICBI(plt+8); /* glibc thinks this is not needed */ -+ PPC_ICBI(plt+12); /* glibc thinks this is not needed */ -+ PPC_ICBI(plt+16-1); -+ PPC_ISYNC; -+} -+ -+unsigned long _dl_linux_resolver(struct elf_resolve *tpnt, int reloc_entry) -+{ -+ int reloc_type; -+ ELF_RELOC *this_reloc; -+ char *strtab; -+ Elf32_Sym *symtab; -+ ELF_RELOC *rel_addr; -+ int symtab_index; -+ char *symname; -+ unsigned long insn_addr; -+ unsigned long *insns; -+ unsigned long new_addr; -+ unsigned long delta; -+ -+ rel_addr = (ELF_RELOC *) (tpnt->dynamic_info[DT_JMPREL] + tpnt->loadaddr); -+ -+ this_reloc = (void *)rel_addr + reloc_entry; -+ reloc_type = ELF32_R_TYPE(this_reloc->r_info); -+ symtab_index = ELF32_R_SYM(this_reloc->r_info); -+ -+ symtab = (Elf32_Sym *) (tpnt->dynamic_info[DT_SYMTAB] + tpnt->loadaddr); -+ strtab = (char *) (tpnt->dynamic_info[DT_STRTAB] + tpnt->loadaddr); -+ symname = strtab + symtab[symtab_index].st_name; -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ debug_sym(symtab,strtab,symtab_index); -+ debug_reloc(symtab,strtab,this_reloc); -+#endif -+ -+ if (reloc_type != R_PPC_JMP_SLOT) { -+ _dl_dprintf(2, "%s: Incorrect relocation type in jump relocation\n", _dl_progname); -+ _dl_exit(1); -+ }; -+ -+ /* Address of dump instruction to fix up */ -+ insn_addr = (unsigned long) tpnt->loadaddr + -+ (unsigned long) this_reloc->r_offset; -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug_reloc && _dl_debug_detail) -+ _dl_dprintf(_dl_debug_file, "\n\tResolving symbol %s %x --> ", symname, insn_addr); -+#endif -+ -+ /* Get the address of the GOT entry */ -+ new_addr = (unsigned long) _dl_find_hash( -+ strtab + symtab[symtab_index].st_name, -+ tpnt->symbol_scope, tpnt, resolver); -+ if (!new_addr) { -+ _dl_dprintf(2, "%s: can't resolve symbol '%s'\n", -+ _dl_progname, symname); -+ _dl_exit(1); -+ }; -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug_reloc && _dl_debug_detail) -+ _dl_dprintf(_dl_debug_file, "%x\n", new_addr); -+#endif -+ -+ insns = (unsigned long *)insn_addr; -+ delta = new_addr - insn_addr; -+ -+ if(delta<<6>>6 == delta){ -+ insns[0] = OPCODE_B(delta); -+ }else if (new_addr <= 0x01fffffc || new_addr >= 0xfe000000){ -+ insns[0] = OPCODE_BA (new_addr); -+ }else{ -+ /* Warning: we don't handle double-sized PLT entries */ -+ unsigned long plt_addr; -+ unsigned long *ptr; -+ int index; -+ -+ plt_addr = (unsigned long)tpnt->dynamic_info[DT_PLTGOT] + -+ (unsigned long)tpnt->loadaddr; -+ -+ delta = PLT_LONGBRANCH_ENTRY_WORDS*4 - (insn_addr-plt_addr+4); -+ -+ index = (insn_addr - plt_addr - PLT_INITIAL_ENTRY_WORDS*4)/8; -+ -+ ptr = (unsigned long *)tpnt->data_words; -+ //DPRINTF("plt_addr=%x delta=%x index=%x ptr=%x\n", plt_addr, delta, index, ptr); -+ insns += 1; -+ -+ ptr[index] = new_addr; -+ PPC_SYNC; -+ /* icache sync is not necessary, since this will be a data load */ -+ //PPC_DCBST(ptr+index); -+ //PPC_SYNC; -+ //PPC_ICBI(ptr+index); -+ //PPC_ISYNC; -+ -+ insns[0] = OPCODE_B(delta); -+ -+ } -+ -+ /* instructions were modified */ -+ PPC_DCBST(insns); -+ PPC_SYNC; -+ PPC_ICBI(insns); -+ PPC_ISYNC; -+ -+ return new_addr; -+} -+ -+static int -+_dl_parse(struct elf_resolve *tpnt, struct dyn_elf *scope, -+ unsigned long rel_addr, unsigned long rel_size, -+ int (*reloc_fnc) (struct elf_resolve *tpnt, struct dyn_elf *scope, -+ ELF_RELOC *rpnt, Elf32_Sym *symtab, char *strtab)) -+{ -+ unsigned int i; -+ char *strtab; -+ Elf32_Sym *symtab; -+ ELF_RELOC *rpnt; -+ int symtab_index; -+ -+ /* Now parse the relocation information */ -+ rpnt = (ELF_RELOC *)(intptr_t) (rel_addr + tpnt->loadaddr); -+ rel_size = rel_size / sizeof(ELF_RELOC); -+ -+ symtab = (Elf32_Sym *)(intptr_t) (tpnt->dynamic_info[DT_SYMTAB] + tpnt->loadaddr); -+ strtab = (char *) (tpnt->dynamic_info[DT_STRTAB] + tpnt->loadaddr); -+ -+ for (i = 0; i < rel_size; i++, rpnt++) { -+ int res; -+ -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ -+ /* When the dynamic linker bootstrapped itself, it resolved some symbols. -+ Make sure we do not do them again */ -+ if (!symtab_index && tpnt->libtype == program_interpreter) -+ continue; -+ if (symtab_index && tpnt->libtype == program_interpreter && -+ _dl_symbol(strtab + symtab[symtab_index].st_name)) -+ continue; -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ debug_sym(symtab,strtab,symtab_index); -+ debug_reloc(symtab,strtab,rpnt); -+#endif -+ -+ res = reloc_fnc (tpnt, scope, rpnt, symtab, strtab); -+ -+ if (res==0) continue; -+ -+ _dl_dprintf(2, "\n%s: ",_dl_progname); -+ -+ if (symtab_index) -+ _dl_dprintf(2, "symbol '%s': ", strtab + symtab[symtab_index].st_name); -+ -+ if (res <0) -+ { -+ int reloc_type = ELF32_R_TYPE(rpnt->r_info); -+#if defined (__SUPPORT_LD_DEBUG__) -+ _dl_dprintf(2, "can't handle reloc type %s\n ", _dl_reltypes(reloc_type)); -+#else -+ _dl_dprintf(2, "can't handle reloc type %x\n", reloc_type); -+#endif -+ _dl_exit(-res); -+ } -+ else if (res >0) -+ { -+ _dl_dprintf(2, "can't resolve symbol\n"); -+ return res; -+ } -+ } -+ return 0; -+} -+ -+static int -+_dl_do_lazy_reloc (struct elf_resolve *tpnt, struct dyn_elf *scope, -+ ELF_RELOC *rpnt, Elf32_Sym *symtab, char *strtab) -+{ -+ int reloc_type; -+ unsigned long reloc_addr; -+#if defined (__SUPPORT_LD_DEBUG__) -+ unsigned long old_val; -+#endif -+ (void)scope; -+ (void)symtab; -+ (void)strtab; -+ -+ reloc_addr = (unsigned long)tpnt->loadaddr + (unsigned long) rpnt->r_offset; -+ reloc_type = ELF32_R_TYPE(rpnt->r_info); -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ old_val = reloc_addr; -+#endif -+ -+ switch (reloc_type) { -+ case R_PPC_NONE: -+ return 0; -+ break; -+ case R_PPC_JMP_SLOT: -+ { -+ int index; -+ unsigned long delta; -+ unsigned long *plt; -+ unsigned long *insns; -+ -+ plt = (unsigned long *)(tpnt->dynamic_info[DT_PLTGOT] + tpnt->loadaddr); -+ -+ delta = (unsigned long)(plt+PLT_TRAMPOLINE_ENTRY_WORDS+2) - (reloc_addr+4); -+ -+ index = (reloc_addr - (unsigned long)(plt+PLT_INITIAL_ENTRY_WORDS)) -+ /sizeof(unsigned long); -+ index /= 2; -+ //DPRINTF(" index %x delta %x\n",index,delta); -+ insns = (unsigned long *)reloc_addr; -+ insns[0] = OPCODE_LI(11,index*4); -+ insns[1] = OPCODE_B(delta); -+ break; -+ } -+ default: -+#if 0 -+ _dl_dprintf(2, "%s: (LAZY) can't handle reloc type ", -+ _dl_progname); -+#if defined (__SUPPORT_LD_DEBUG__) -+ _dl_dprintf(2, "%s ", _dl_reltypes[reloc_type]); -+#endif -+ if (symtab_index) -+ _dl_dprintf(2, "'%s'\n", strtab + symtab[symtab_index].st_name); -+#endif -+ //_dl_exit(1); -+ return -1; -+ }; -+ -+ /* instructions were modified */ -+ PPC_DCBST(reloc_addr); -+ PPC_DCBST(reloc_addr+4); -+ PPC_SYNC; -+ PPC_ICBI(reloc_addr); -+ PPC_ICBI(reloc_addr+4); -+ PPC_ISYNC; -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug_reloc && _dl_debug_detail) -+ _dl_dprintf(_dl_debug_file, "\tpatched: %x ==> %x", old_val, reloc_addr); -+#endif -+ return 0; -+ -+} -+ -+static int -+_dl_do_reloc (struct elf_resolve *tpnt,struct dyn_elf *scope, -+ ELF_RELOC *rpnt, Elf32_Sym *symtab, char *strtab) -+{ -+ int reloc_type; -+ int symtab_index; -+ char *symname; -+ unsigned long *reloc_addr; -+ unsigned long symbol_addr; -+#if defined (__SUPPORT_LD_DEBUG__) -+ unsigned long old_val; -+#endif -+ -+ reloc_addr = (unsigned long *)(intptr_t) (tpnt->loadaddr + (unsigned long) rpnt->r_offset); -+ reloc_type = ELF32_R_TYPE(rpnt->r_info); -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ symbol_addr = 0; -+ symname = strtab + symtab[symtab_index].st_name; -+ -+ if (symtab_index) { -+ -+ symbol_addr = (unsigned long) _dl_find_hash(symname, scope, -+ (reloc_type == R_PPC_JMP_SLOT ? tpnt : NULL), symbolrel); -+ -+ /* -+ * We want to allow undefined references to weak symbols - this might -+ * have been intentional. We should not be linking local symbols -+ * here, so all bases should be covered. -+ */ -+ -+ if (!symbol_addr && ELF32_ST_BIND(symtab[symtab_index].st_info) == STB_GLOBAL) { -+#if defined (__SUPPORT_LD_DEBUG__) -+ _dl_dprintf(2, "\tglobal symbol '%s' already defined in '%s'\n", -+ symname, tpnt->libname); -+#endif -+ return 0; -+ } -+ } -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ old_val = *reloc_addr; -+#endif -+ switch (reloc_type) { -+ case R_PPC_NONE: -+ return 0; -+ break; -+ case R_PPC_REL24: -+#if 0 -+ { -+ unsigned long delta = symbol_addr - (unsigned long)reloc_addr; -+ if(delta<<6>>6 != delta){ -+ _dl_dprintf(2,"R_PPC_REL24: Reloc out of range\n"); -+ _dl_exit(1); -+ } -+ *reloc_addr &= 0xfc000003; -+ *reloc_addr |= delta&0x03fffffc; -+ } -+ break; -+#else -+ _dl_dprintf(2, "%s: symbol '%s' is type R_PPC_REL24\n\tCompile shared libraries with -fPIC!\n", -+ _dl_progname, symname); -+ _dl_exit(1); -+#endif -+ case R_PPC_RELATIVE: -+ *reloc_addr = (unsigned long)tpnt->loadaddr + (unsigned long)rpnt->r_addend; -+ break; -+ case R_PPC_ADDR32: -+ *reloc_addr += symbol_addr; -+ break; -+ case R_PPC_ADDR16_HA: -+ /* XXX is this correct? */ -+ *(short *)reloc_addr += (symbol_addr+0x8000)>>16; -+ break; -+ case R_PPC_ADDR16_HI: -+ *(short *)reloc_addr += symbol_addr>>16; -+ break; -+ case R_PPC_ADDR16_LO: -+ *(short *)reloc_addr += symbol_addr; -+ break; -+ case R_PPC_JMP_SLOT: -+ { -+ unsigned long targ_addr = (unsigned long)*reloc_addr; -+ unsigned long delta = targ_addr - (unsigned long)reloc_addr; -+ if(delta<<6>>6 == delta){ -+ *reloc_addr = OPCODE_B(delta); -+ }else if (targ_addr <= 0x01fffffc || targ_addr >= 0xfe000000){ -+ *reloc_addr = OPCODE_BA (targ_addr); -+ }else{ -+ { -+ int index; -+ unsigned long delta2; -+ unsigned long *plt, *ptr; -+ plt = (unsigned long *)(tpnt->dynamic_info[DT_PLTGOT] + tpnt->loadaddr); -+ -+ delta2 = (unsigned long)(plt+PLT_LONGBRANCH_ENTRY_WORDS) -+ - (unsigned long)(reloc_addr+1); -+ -+ index = ((unsigned long)reloc_addr - -+ (unsigned long)(plt+PLT_INITIAL_ENTRY_WORDS)) -+ /sizeof(unsigned long); -+ index /= 2; -+ //DPRINTF(" index %x delta %x\n",index,delta2); -+ ptr = (unsigned long *)tpnt->data_words; -+ ptr[index] = targ_addr; -+ reloc_addr[0] = OPCODE_LI(11,index*4); -+ reloc_addr[1] = OPCODE_B(delta2); -+ -+ /* instructions were modified */ -+ PPC_DCBST(reloc_addr+1); -+ PPC_SYNC; -+ PPC_ICBI(reloc_addr+1); -+ } -+ } -+ break; -+ } -+ case R_PPC_GLOB_DAT: -+ *reloc_addr += symbol_addr; -+ break; -+ case R_PPC_COPY: -+ // handled later -+ return 0; -+ break; -+ default: -+#if 0 -+ _dl_dprintf(2, "%s: can't handle reloc type ", _dl_progname); -+#if defined (__SUPPORT_LD_DEBUG__) -+ _dl_dprintf(2, "%s ", _dl_reltypes[reloc_type]); -+#endif -+ if (symtab_index) -+ _dl_dprintf(2, "'%s'\n", strtab + symtab[symtab_index].st_name); -+#endif -+ //_dl_exit(1); -+ return -1; -+ }; -+ -+ /* instructions were modified */ -+ PPC_DCBST(reloc_addr); -+ PPC_SYNC; -+ PPC_ICBI(reloc_addr); -+ PPC_ISYNC; -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug_reloc && _dl_debug_detail) -+ _dl_dprintf(_dl_debug_file, "\tpatched: %x ==> %x @ %x", old_val, *reloc_addr, reloc_addr); -+#endif -+ -+ return 0; -+} -+ -+ -+/* This is done as a separate step, because there are cases where -+ information is first copied and later initialized. This results in -+ the wrong information being copied. Someone at Sun was complaining about -+ a bug in the handling of _COPY by SVr4, and this may in fact be what he -+ was talking about. Sigh. */ -+static int -+_dl_do_copy (struct elf_resolve *tpnt, struct dyn_elf *scope, -+ ELF_RELOC *rpnt, Elf32_Sym *symtab, char *strtab) -+{ -+ int reloc_type; -+ int symtab_index; -+ unsigned long *reloc_addr; -+ unsigned long symbol_addr; -+ int goof = 0; -+ char *symname; -+ -+ reloc_addr = (unsigned long *)(intptr_t) (tpnt->loadaddr + (unsigned long) rpnt->r_offset); -+ reloc_type = ELF32_R_TYPE(rpnt->r_info); -+ if (reloc_type != R_PPC_COPY) -+ return 0; -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ symbol_addr = 0; -+ symname = strtab + symtab[symtab_index].st_name; -+ -+ if (symtab_index) { -+ symbol_addr = (unsigned long) _dl_find_hash(symname, scope, NULL, copyrel); -+ if (!symbol_addr) goof++; -+ } -+ if (!goof) { -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug_move) -+ _dl_dprintf(_dl_debug_file,"\n%s move %x bytes from %x to %x", -+ symname, symtab[symtab_index].st_size, -+ symbol_addr, symtab[symtab_index].st_value); -+#endif -+ _dl_memcpy((char *) reloc_addr, -+ (char *) symbol_addr, symtab[symtab_index].st_size); -+ } -+ -+ return goof; -+} -+ -+void _dl_parse_lazy_relocation_information(struct elf_resolve *tpnt, -+ unsigned long rel_addr, unsigned long rel_size, int type) -+{ -+ (void) type; -+ (void)_dl_parse(tpnt, NULL, rel_addr, rel_size, _dl_do_lazy_reloc); -+} -+ -+int _dl_parse_relocation_information(struct elf_resolve *tpnt, -+ unsigned long rel_addr, unsigned long rel_size, int type) -+{ -+ (void) type; -+ return _dl_parse(tpnt, tpnt->symbol_scope, rel_addr, rel_size, _dl_do_reloc); -+} -+ -+int _dl_parse_copy_information(struct dyn_elf *xpnt, unsigned long rel_addr, -+ unsigned long rel_size, int type) -+{ -+ (void) type; -+ return _dl_parse(xpnt->dyn, xpnt->next, rel_addr, rel_size, _dl_do_copy); -+} -+ -+ -diff -urN uClibc/ldso-0.9.24/ldso/powerpc/ld_syscalls.h uClibc.ldso.24/ldso-0.9.24/ldso/powerpc/ld_syscalls.h ---- uClibc/ldso-0.9.24/ldso/powerpc/ld_syscalls.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/powerpc/ld_syscalls.h 2003-06-14 20:08:43.000000000 -0500 -@@ -0,0 +1,244 @@ -+/* -+ * This file contains the system call macros and syscall -+ * numbers used by the shared library loader. -+ */ -+ -+#define __NR_exit 1 -+#define __NR_read 3 -+#define __NR_write 4 -+#define __NR_open 5 -+#define __NR_close 6 -+#define __NR_getpid 20 -+#define __NR_getuid 24 -+#define __NR_geteuid 49 -+#define __NR_getgid 47 -+#define __NR_getegid 50 -+#define __NR_readlink 85 -+#define __NR_mmap 90 -+#define __NR_munmap 91 -+#define __NR_stat 106 -+#define __NR_mprotect 125 -+ -+/* Here are the macros which define how this platform makes -+ * system calls. This particular variant does _not_ set -+ * errno (note how it is disabled in __syscall_return) since -+ * these will get called before the errno symbol is dynamicly -+ * linked. */ -+ -+#undef __syscall_return -+#define __syscall_return(type) \ -+ return (__sc_err & 0x10000000 ? /*errno = __sc_ret,*/ __sc_ret = -1 : 0), \ -+ (type) __sc_ret -+ -+#undef __syscall_clobbers -+#define __syscall_clobbers \ -+ "r9", "r10", "r11", "r12" -+ //"r4", "r5", "r6", "r7", "r8", "r9", "r10", "r11", "r12" -+ -+#undef _syscall0 -+#define _syscall0(type,name) \ -+type name(void) \ -+{ \ -+ unsigned long __sc_ret, __sc_err; \ -+ { \ -+ register unsigned long __sc_0 __asm__ ("r0"); \ -+ register unsigned long __sc_3 __asm__ ("r3"); \ -+ \ -+ __sc_0 = __NR_##name; \ -+ __asm__ __volatile__ \ -+ ("sc \n\t" \ -+ "mfcr %1 " \ -+ : "=&r" (__sc_3), "=&r" (__sc_0) \ -+ : "0" (__sc_3), "1" (__sc_0) \ -+ : "r4", "r5", "r6", "r7", "r8", "r9", "r10", "r11", "r12" ); \ -+ __sc_ret = __sc_3; \ -+ __sc_err = __sc_0; \ -+ } \ -+ __syscall_return (type); \ -+} -+ -+#undef _syscall1 -+#define _syscall1(type,name,type1,arg1) \ -+type name(type1 arg1) \ -+{ \ -+ unsigned long __sc_ret, __sc_err; \ -+ { \ -+ register unsigned long __sc_0 __asm__ ("r0"); \ -+ register unsigned long __sc_3 __asm__ ("r3"); \ -+ \ -+ __sc_3 = (unsigned long) (arg1); \ -+ __sc_0 = __NR_##name; \ -+ __asm__ __volatile__ \ -+ ("sc \n\t" \ -+ "mfcr %1 " \ -+ : "=&r" (__sc_3), "=&r" (__sc_0) \ -+ : "0" (__sc_3), "1" (__sc_0) \ -+ : "r4", "r5", "r6", "r7", "r8", "r9", "r10", "r11", "r12" ); \ -+ __sc_ret = __sc_3; \ -+ __sc_err = __sc_0; \ -+ } \ -+ __syscall_return (type); \ -+} -+ -+#undef _syscall2 -+#define _syscall2(type,name,type1,arg1,type2,arg2) \ -+type name(type1 arg1, type2 arg2) \ -+{ \ -+ unsigned long __sc_ret, __sc_err; \ -+ { \ -+ register unsigned long __sc_0 __asm__ ("r0"); \ -+ register unsigned long __sc_3 __asm__ ("r3"); \ -+ register unsigned long __sc_4 __asm__ ("r4"); \ -+ \ -+ __sc_3 = (unsigned long) (arg1); \ -+ __sc_4 = (unsigned long) (arg2); \ -+ __sc_0 = __NR_##name; \ -+ __asm__ __volatile__ \ -+ ("sc \n\t" \ -+ "mfcr %1 " \ -+ : "=&r" (__sc_3), "=&r" (__sc_0) \ -+ : "0" (__sc_3), "1" (__sc_0), \ -+ "r" (__sc_4) \ -+ : "r5", "r6", "r7", "r8", "r9", "r10", "r11", "r12" ); \ -+ __sc_ret = __sc_3; \ -+ __sc_err = __sc_0; \ -+ } \ -+ __syscall_return (type); \ -+} -+ -+#undef _syscall3 -+#define _syscall3(type,name,type1,arg1,type2,arg2,type3,arg3) \ -+type name(type1 arg1, type2 arg2, type3 arg3) \ -+{ \ -+ unsigned long __sc_ret, __sc_err; \ -+ { \ -+ register unsigned long __sc_0 __asm__ ("r0"); \ -+ register unsigned long __sc_3 __asm__ ("r3"); \ -+ register unsigned long __sc_4 __asm__ ("r4"); \ -+ register unsigned long __sc_5 __asm__ ("r5"); \ -+ \ -+ __sc_3 = (unsigned long) (arg1); \ -+ __sc_4 = (unsigned long) (arg2); \ -+ __sc_5 = (unsigned long) (arg3); \ -+ __sc_0 = __NR_##name; \ -+ __asm__ __volatile__ \ -+ ("sc \n\t" \ -+ "mfcr %1 " \ -+ : "=&r" (__sc_3), "=&r" (__sc_0) \ -+ : "0" (__sc_3), "1" (__sc_0), \ -+ "r" (__sc_4), \ -+ "r" (__sc_5) \ -+ : "r6", "r7", "r8", "r9", "r10", "r11", "r12" ); \ -+ __sc_ret = __sc_3; \ -+ __sc_err = __sc_0; \ -+ } \ -+ __syscall_return (type); \ -+} -+ -+#undef _syscall4 -+#define _syscall4(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4) \ -+type name(type1 arg1, type2 arg2, type3 arg3, type4 arg4) \ -+{ \ -+ unsigned long __sc_ret, __sc_err; \ -+ { \ -+ register unsigned long __sc_0 __asm__ ("r0"); \ -+ register unsigned long __sc_3 __asm__ ("r3"); \ -+ register unsigned long __sc_4 __asm__ ("r4"); \ -+ register unsigned long __sc_5 __asm__ ("r5"); \ -+ register unsigned long __sc_6 __asm__ ("r6"); \ -+ \ -+ __sc_3 = (unsigned long) (arg1); \ -+ __sc_4 = (unsigned long) (arg2); \ -+ __sc_5 = (unsigned long) (arg3); \ -+ __sc_6 = (unsigned long) (arg4); \ -+ __sc_0 = __NR_##name; \ -+ __asm__ __volatile__ \ -+ ("sc \n\t" \ -+ "mfcr %1 " \ -+ : "=&r" (__sc_3), "=&r" (__sc_0) \ -+ : "0" (__sc_3), "1" (__sc_0), \ -+ "r" (__sc_4), \ -+ "r" (__sc_5), \ -+ "r" (__sc_6) \ -+ : "r7", "r8", "r9", "r10", "r11", "r12" ); \ -+ __sc_ret = __sc_3; \ -+ __sc_err = __sc_0; \ -+ } \ -+ __syscall_return (type); \ -+} -+ -+#undef _syscall5 -+#define _syscall5(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4,type5,arg5) \ -+type name(type1 arg1, type2 arg2, type3 arg3, type4 arg4, type5 arg5) \ -+{ \ -+ unsigned long __sc_ret, __sc_err; \ -+ { \ -+ register unsigned long __sc_0 __asm__ ("r0"); \ -+ register unsigned long __sc_3 __asm__ ("r3"); \ -+ register unsigned long __sc_4 __asm__ ("r4"); \ -+ register unsigned long __sc_5 __asm__ ("r5"); \ -+ register unsigned long __sc_6 __asm__ ("r6"); \ -+ register unsigned long __sc_7 __asm__ ("r7"); \ -+ \ -+ __sc_3 = (unsigned long) (arg1); \ -+ __sc_4 = (unsigned long) (arg2); \ -+ __sc_5 = (unsigned long) (arg3); \ -+ __sc_6 = (unsigned long) (arg4); \ -+ __sc_7 = (unsigned long) (arg5); \ -+ __sc_0 = __NR_##name; \ -+ __asm__ __volatile__ \ -+ ("sc \n\t" \ -+ "mfcr %1 " \ -+ : "=&r" (__sc_3), "=&r" (__sc_0) \ -+ : "0" (__sc_3), "1" (__sc_0), \ -+ "r" (__sc_4), \ -+ "r" (__sc_5), \ -+ "r" (__sc_6), \ -+ "r" (__sc_7) \ -+ : "r8", "r9", "r10", "r11", "r12" ); \ -+ __sc_ret = __sc_3; \ -+ __sc_err = __sc_0; \ -+ } \ -+ __syscall_return (type); \ -+} -+ -+ -+#undef _syscall6 -+#define _syscall6(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4,type5,arg5,type6,arg6) \ -+type name(type1 arg1, type2 arg2, type3 arg3, type4 arg4, type5 arg5, type6 arg6) \ -+{ \ -+ unsigned long __sc_ret, __sc_err; \ -+ { \ -+ register unsigned long __sc_0 __asm__ ("r0"); \ -+ register unsigned long __sc_3 __asm__ ("r3"); \ -+ register unsigned long __sc_4 __asm__ ("r4"); \ -+ register unsigned long __sc_5 __asm__ ("r5"); \ -+ register unsigned long __sc_6 __asm__ ("r6"); \ -+ register unsigned long __sc_7 __asm__ ("r7"); \ -+ register unsigned long __sc_8 __asm__ ("r8"); \ -+ \ -+ __sc_3 = (unsigned long) (arg1); \ -+ __sc_4 = (unsigned long) (arg2); \ -+ __sc_5 = (unsigned long) (arg3); \ -+ __sc_6 = (unsigned long) (arg4); \ -+ __sc_7 = (unsigned long) (arg5); \ -+ __sc_8 = (unsigned long) (arg6); \ -+ __sc_0 = __NR_##name; \ -+ __asm__ __volatile__ \ -+ ("sc \n\t" \ -+ "mfcr %1 " \ -+ : "=&r" (__sc_3), "=&r" (__sc_0) \ -+ : "0" (__sc_3), "1" (__sc_0), \ -+ "r" (__sc_4), \ -+ "r" (__sc_5), \ -+ "r" (__sc_6), \ -+ "r" (__sc_7), \ -+ "r" (__sc_8) \ -+ : "r9", "r10", "r11", "r12" ); \ -+ __sc_ret = __sc_3; \ -+ __sc_err = __sc_0; \ -+ } \ -+ __syscall_return (type); \ -+} -+ -+ -diff -urN uClibc/ldso-0.9.24/ldso/powerpc/ld_sysdep.h uClibc.ldso.24/ldso-0.9.24/ldso/powerpc/ld_sysdep.h ---- uClibc/ldso-0.9.24/ldso/powerpc/ld_sysdep.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/powerpc/ld_sysdep.h 2003-12-03 17:38:43.000000000 -0600 -@@ -0,0 +1,136 @@ -+/* -+ * Various assmbly language/system dependent hacks that are required -+ * so that we can minimize the amount of platform specific code. -+ */ -+ -+/* -+ * Define this if the system uses RELOCA. -+ */ -+#define ELF_USES_RELOCA -+ -+/* -+ * Get a pointer to the argv array. On many platforms this can be just -+ * the address if the first argument, on other platforms we need to -+ * do something a little more subtle here. -+ */ -+#define GET_ARGV(ARGVP, ARGS) ARGVP = (((unsigned long*) ARGS)+1) -+ -+/* -+ * Initialization sequence for a GOT. -+ */ -+#define INIT_GOT(GOT_BASE,MODULE) _dl_init_got(GOT_BASE,MODULE) -+ -+/* Stuff for the PLT. */ -+#define PLT_INITIAL_ENTRY_WORDS 18 -+#define PLT_LONGBRANCH_ENTRY_WORDS 0 -+#define PLT_TRAMPOLINE_ENTRY_WORDS 6 -+#define PLT_DOUBLE_SIZE (1<<13) -+#define PLT_ENTRY_START_WORDS(entry_number) \ -+ (PLT_INITIAL_ENTRY_WORDS + (entry_number)*2 \ -+ + ((entry_number) > PLT_DOUBLE_SIZE \ -+ ? ((entry_number) - PLT_DOUBLE_SIZE)*2 \ -+ : 0)) -+#define PLT_DATA_START_WORDS(num_entries) PLT_ENTRY_START_WORDS(num_entries) -+ -+/* Macros to build PowerPC opcode words. */ -+#define OPCODE_ADDI(rd,ra,simm) \ -+ (0x38000000 | (rd) << 21 | (ra) << 16 | ((simm) & 0xffff)) -+#define OPCODE_ADDIS(rd,ra,simm) \ -+ (0x3c000000 | (rd) << 21 | (ra) << 16 | ((simm) & 0xffff)) -+#define OPCODE_ADD(rd,ra,rb) \ -+ (0x7c000214 | (rd) << 21 | (ra) << 16 | (rb) << 11) -+#define OPCODE_B(target) (0x48000000 | ((target) & 0x03fffffc)) -+#define OPCODE_BA(target) (0x48000002 | ((target) & 0x03fffffc)) -+#define OPCODE_BCTR() 0x4e800420 -+#define OPCODE_LWZ(rd,d,ra) \ -+ (0x80000000 | (rd) << 21 | (ra) << 16 | ((d) & 0xffff)) -+#define OPCODE_LWZU(rd,d,ra) \ -+ (0x84000000 | (rd) << 21 | (ra) << 16 | ((d) & 0xffff)) -+#define OPCODE_MTCTR(rd) (0x7C0903A6 | (rd) << 21) -+#define OPCODE_RLWINM(ra,rs,sh,mb,me) \ -+ (0x54000000 | (rs) << 21 | (ra) << 16 | (sh) << 11 | (mb) << 6 | (me) << 1) -+ -+#define OPCODE_LI(rd,simm) OPCODE_ADDI(rd,0,simm) -+#define OPCODE_ADDIS_HI(rd,ra,value) \ -+ OPCODE_ADDIS(rd,ra,((value) + 0x8000) >> 16) -+#define OPCODE_LIS_HI(rd,value) OPCODE_ADDIS_HI(rd,0,value) -+#define OPCODE_SLWI(ra,rs,sh) OPCODE_RLWINM(ra,rs,sh,0,31-sh) -+ -+ -+#define PPC_DCBST(where) asm volatile ("dcbst 0,%0" : : "r"(where) : "memory") -+#define PPC_SYNC asm volatile ("sync" : : : "memory") -+#define PPC_ISYNC asm volatile ("sync; isync" : : : "memory") -+#define PPC_ICBI(where) asm volatile ("icbi 0,%0" : : "r"(where) : "memory") -+#define PPC_DIE asm volatile ("tweq 0,0") -+ -+/* -+ * Here is a macro to perform a relocation. This is only used when -+ * bootstrapping the dynamic loader. RELP is the relocation that we -+ * are performing, REL is the pointer to the address we are relocating. -+ * SYMBOL is the symbol involved in the relocation, and LOAD is the -+ * load address. -+ */ -+// finaladdr = LOAD ? -+#define PERFORM_BOOTSTRAP_RELOC(RELP,REL,SYMBOL,LOAD) \ -+ {int type=ELF32_R_TYPE((RELP)->r_info); \ -+ if(type==R_PPC_NONE){ \ -+ }else if(type==R_PPC_ADDR32){ \ -+ *REL += (SYMBOL); \ -+ }else if(type==R_PPC_RELATIVE){ \ -+ *REL = (Elf32_Word)(LOAD) + (RELP)->r_addend; \ -+ }else if(type==R_PPC_REL24){ \ -+ Elf32_Sword delta = (Elf32_Word)(SYMBOL) - (Elf32_Word)(REL); \ -+ *REL &= 0xfc000003; \ -+ *REL |= (delta & 0x03fffffc); \ -+ }else if(type==R_PPC_JMP_SLOT){ \ -+ Elf32_Sword delta = (Elf32_Word)(SYMBOL) - (Elf32_Word)(REL); \ -+ /*if (delta << 6 >> 6 != delta)_dl_exit(99);*/ \ -+ *REL = OPCODE_B(delta); \ -+ }else{ \ -+ _dl_exit(100+ELF32_R_TYPE((RELP)->r_info)); \ -+ } \ -+ if(type!=R_PPC_NONE){ \ -+ PPC_DCBST(REL); PPC_SYNC; PPC_ICBI(REL);\ -+ } \ -+ } -+ -+/* -+ * Transfer control to the user's application, once the dynamic loader -+ * is done. This routine has to exit the current function, then -+ * call the _dl_elf_main function. -+ */ -+ -+/* hgb@ifi.uio.no: -+ * Adding a clobber list consisting of r0 for %1. addi on PowerPC -+ * takes a register as the second argument, but if the register is -+ * r0, the value 0 is used instead. If r0 is used here, the stack -+ * pointer (r1) will be zeroed, and the dynamically linked -+ * application will seg.fault immediatly when receiving control. -+ */ -+#define START() \ -+ __asm__ volatile ( \ -+ "addi 1,%1,0\n\t" \ -+ "mtlr %0\n\t" \ -+ "blrl\n\t" \ -+ : : "r" (_dl_elf_main), "r" (args) \ -+ : "r0") -+ -+ -+/* Here we define the magic numbers that this dynamic loader should accept */ -+ -+#define MAGIC1 EM_PPC -+#undef MAGIC2 -+/* Used for error messages */ -+#define ELF_TARGET "powerpc" -+ -+struct elf_resolve; -+extern unsigned long _dl_linux_resolver(struct elf_resolve * tpnt, int reloc_entry); -+void _dl_init_got(unsigned long *lpnt,struct elf_resolve *tpnt); -+ -+ -+#define do_rem(result, n, base) result = (n % base) -+ -+/* 4096 bytes alignment */ -+#define PAGE_ALIGN 0xfffff000 -+#define ADDR_ALIGN 0xfff -+#define OFFS_ALIGN 0x7ffff000 -diff -urN uClibc/ldso-0.9.24/ldso/powerpc/resolve.S uClibc.ldso.24/ldso-0.9.24/ldso/powerpc/resolve.S ---- uClibc/ldso-0.9.24/ldso/powerpc/resolve.S 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/powerpc/resolve.S 2001-07-12 05:14:09.000000000 -0500 -@@ -0,0 +1,82 @@ -+/* -+ * Stolen from glibc-2.2.2 by David Schleef <ds@schleef.org> -+ */ -+ -+.text -+.align 4 -+ -+.globl _dl_linux_resolver -+ -+.globl _dl_linux_resolve -+.type _dl_linux_resolve,@function -+ -+_dl_linux_resolve: -+// We need to save the registers used to pass parameters, and register 0, -+// which is used by _mcount; the registers are saved in a stack frame. -+ stwu 1,-64(1) -+ stw 0,12(1) -+ stw 3,16(1) -+ stw 4,20(1) -+// The code that calls this has put parameters for 'fixup' in r12 and r11. -+ mr 3,12 -+ stw 5,24(1) -+ mr 4,11 -+ stw 6,28(1) -+ mflr 0 -+// We also need to save some of the condition register fields. -+ stw 7,32(1) -+ stw 0,48(1) -+ stw 8,36(1) -+ mfcr 0 -+ stw 9,40(1) -+ stw 10,44(1) -+ stw 0,8(1) -+ bl _dl_linux_resolver@local -+// 'fixup' returns the address we want to branch to. -+ mtctr 3 -+// Put the registers back... -+ lwz 0,48(1) -+ lwz 10,44(1) -+ lwz 9,40(1) -+ mtlr 0 -+ lwz 8,36(1) -+ lwz 0,8(1) -+ lwz 7,32(1) -+ lwz 6,28(1) -+ mtcrf 0xFF,0 -+ lwz 5,24(1) -+ lwz 4,20(1) -+ lwz 3,16(1) -+ lwz 0,12(1) -+// ...unwind the stack frame, and jump to the PLT entry we updated. -+ addi 1,1,64 -+ bctr -+ -+.LFE2: -+ .size _dl_linux_resolve,.LFE2-_dl_linux_resolve -+ -+#if 0 -+ -+ pusha /* preserve all regs */ -+ lea 0x20(%esp),%eax /* eax = tpnt and reloc_entry params */ -+ pushl 4(%eax) /* push copy of reloc_entry param */ -+ pushl (%eax) /* push copy of tpnt param */ -+ -+#ifdef __PIC__ -+ call .L24 -+.L24: -+ popl %ebx -+ addl $_GLOBAL_OFFSET_TABLE_+[.-.L24],%ebx -+ movl _dl_linux_resolver@GOT(%ebx),%ebx /* eax = resolved func */ -+ call *%ebx -+#else -+ call _dl_linux_resolver -+#endif -+ movl %eax,0x28(%esp) /* store func addr over original -+ * tpnt param */ -+ addl $0x8,%esp /* remove copy parameters */ -+ popa /* restore regs */ -+ ret $4 /* jump to func removing original -+ * reloc_entry param from stack */ -+#endif -+ -diff -urN uClibc/ldso-0.9.24/ldso/readelflib1.c uClibc.ldso.24/ldso-0.9.24/ldso/readelflib1.c ---- uClibc/ldso-0.9.24/ldso/readelflib1.c 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/readelflib1.c 2003-12-05 14:24:26.000000000 -0600 -@@ -0,0 +1,971 @@ -+/* vi: set sw=4 ts=4: */ -+/* Program to load an ELF binary on a linux system, and run it -+ * after resolving ELF shared library symbols -+ * -+ * Copyright (c) 1994-2000 Eric Youngdale, Peter MacDonald, -+ * David Engel, Hongjiu Lu and Mitch D'Souza -+ * Copyright (C) 2001-2003, Erik Andersen -+ * -+ * 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. The name of the above contributors may not be -+ * used to endorse or promote products derived from this software -+ * without specific prior written permission. -+ * -+ * THIS SOFTWARE IS PROVIDED BY THE 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 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. -+ */ -+ -+ -+/* This file contains the helper routines to load an ELF sharable -+ library into memory and add the symbol table info to the chain. */ -+ -+#ifdef USE_CACHE -+ -+static caddr_t _dl_cache_addr = NULL; -+static size_t _dl_cache_size = 0; -+ -+int _dl_map_cache(void) -+{ -+ int fd; -+ struct stat st; -+ header_t *header; -+ libentry_t *libent; -+ int i, strtabsize; -+ -+ if (_dl_cache_addr == (caddr_t) - 1) -+ return -1; -+ else if (_dl_cache_addr != NULL) -+ return 0; -+ -+ if (_dl_stat(LDSO_CACHE, &st) -+ || (fd = _dl_open(LDSO_CACHE, O_RDONLY)) < 0) { -+ _dl_dprintf(2, "%s: can't open cache '%s'\n", _dl_progname, LDSO_CACHE); -+ _dl_cache_addr = (caddr_t) - 1; /* so we won't try again */ -+ return -1; -+ } -+ -+ _dl_cache_size = st.st_size; -+ _dl_cache_addr = (caddr_t) _dl_mmap(0, _dl_cache_size, PROT_READ, MAP_SHARED, fd, 0); -+ _dl_close(fd); -+ if (_dl_mmap_check_error(_dl_cache_addr)) { -+ _dl_dprintf(2, "%s: can't map cache '%s'\n", -+ _dl_progname, LDSO_CACHE); -+ return -1; -+ } -+ -+ header = (header_t *) _dl_cache_addr; -+ -+ if (_dl_cache_size < sizeof(header_t) || -+ _dl_memcmp(header->magic, LDSO_CACHE_MAGIC, LDSO_CACHE_MAGIC_LEN) -+ || _dl_memcmp(header->version, LDSO_CACHE_VER, LDSO_CACHE_VER_LEN) -+ || _dl_cache_size < -+ (sizeof(header_t) + header->nlibs * sizeof(libentry_t)) -+ || _dl_cache_addr[_dl_cache_size - 1] != '\0') -+ { -+ _dl_dprintf(2, "%s: cache '%s' is corrupt\n", _dl_progname, -+ LDSO_CACHE); -+ goto fail; -+ } -+ -+ strtabsize = _dl_cache_size - sizeof(header_t) - -+ header->nlibs * sizeof(libentry_t); -+ libent = (libentry_t *) & header[1]; -+ -+ for (i = 0; i < header->nlibs; i++) { -+ if (libent[i].sooffset >= strtabsize || -+ libent[i].liboffset >= strtabsize) -+ { -+ _dl_dprintf(2, "%s: cache '%s' is corrupt\n", _dl_progname, LDSO_CACHE); -+ goto fail; -+ } -+ } -+ -+ return 0; -+ -+ fail: -+ _dl_munmap(_dl_cache_addr, _dl_cache_size); -+ _dl_cache_addr = (caddr_t) - 1; -+ return -1; -+} -+ -+int _dl_unmap_cache(void) -+{ -+ if (_dl_cache_addr == NULL || _dl_cache_addr == (caddr_t) - 1) -+ return -1; -+ -+#if 1 -+ _dl_munmap(_dl_cache_addr, _dl_cache_size); -+ _dl_cache_addr = NULL; -+#endif -+ -+ return 0; -+} -+ -+#endif -+ -+/* This function's behavior must exactly match that -+ * in uClibc/ldso/util/ldd.c */ -+static struct elf_resolve * -+search_for_named_library(const char *name, int secure, const char *path_list, -+ struct dyn_elf **rpnt) -+{ -+ int i, count = 1; -+ char *path, *path_n; -+ char mylibname[2050]; -+ struct elf_resolve *tpnt1; -+ -+ if (path_list==NULL) -+ return NULL; -+ -+ /* We need a writable copy of this string */ -+ path = _dl_strdup(path_list); -+ if (!path) { -+ _dl_dprintf(2, "Out of memory!\n"); -+ _dl_exit(0); -+ } -+ -+ -+ /* Unlike ldd.c, don't bother to eliminate double //s */ -+ -+ -+ /* Replace colons with zeros in path_list and count them */ -+ for(i=_dl_strlen(path); i > 0; i--) { -+ if (path[i]==':') { -+ path[i]=0; -+ count++; -+ } -+ } -+ -+ path_n = path; -+ for (i = 0; i < count; i++) { -+ _dl_strcpy(mylibname, path_n); -+ _dl_strcat(mylibname, "/"); -+ _dl_strcat(mylibname, name); -+ if ((tpnt1 = _dl_load_elf_shared_library(secure, rpnt, mylibname)) != NULL) -+ { -+ return tpnt1; -+ } -+ path_n += (_dl_strlen(path_n) + 1); -+ } -+ return NULL; -+} -+ -+/* Check if the named library is already loaded... */ -+struct elf_resolve *_dl_check_if_named_library_is_loaded(const char *full_libname) -+{ -+ const char *pnt, *pnt1; -+ struct elf_resolve *tpnt1; -+ const char *libname, *libname2; -+ static const char *libc = "libc.so."; -+ static const char *aborted_wrong_lib = "%s: aborted attempt to load %s!\n"; -+ -+ pnt = libname = full_libname; -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug) -+ _dl_dprintf(_dl_debug_file, "Checking if '%s' is already loaded\n", full_libname); -+#endif -+ /* quick hack to ensure mylibname buffer doesn't overflow. don't -+ allow full_libname or any directory to be longer than 1024. */ -+ if (_dl_strlen(full_libname) > 1024) -+ return NULL; -+ -+ /* Skip over any initial initial './' and '/' stuff to -+ * get the short form libname with no path garbage */ -+ pnt1 = _dl_strrchr(pnt, '/'); -+ if (pnt1) { -+ libname = pnt1 + 1; -+ } -+ -+ /* Make sure they are not trying to load the wrong C library! -+ * This sometimes happens esp with shared libraries when the -+ * library path is somehow wrong! */ -+#define isdigit(c) (c >= '0' && c <= '9') -+ if ((_dl_strncmp(libname, libc, 8) == 0) && _dl_strlen(libname) >=8 && -+ isdigit(libname[8])) -+ { -+ /* Abort attempts to load glibc, libc5, etc */ -+ if ( libname[8]!='0') { -+ if (!_dl_trace_loaded_objects) { -+ _dl_dprintf(2, aborted_wrong_lib, libname, _dl_progname); -+ _dl_exit(1); -+ } -+ return NULL; -+ } -+ } -+ -+ /* Critical step! Weed out duplicates early to avoid -+ * function aliasing, which wastes memory, and causes -+ * really bad things to happen with weaks and globals. */ -+ for (tpnt1 = _dl_loaded_modules; tpnt1; tpnt1 = tpnt1->next) { -+ -+ /* Skip over any initial initial './' and '/' stuff to -+ * get the short form libname with no path garbage */ -+ libname2 = tpnt1->libname; -+ pnt1 = _dl_strrchr(libname2, '/'); -+ if (pnt1) { -+ libname2 = pnt1 + 1; -+ } -+ -+ if (_dl_strcmp(libname2, libname) == 0) { -+ /* Well, that was certainly easy */ -+ return tpnt1; -+ } -+ } -+ -+ return NULL; -+} -+ -+ -+ -+/* -+ * Used to return error codes back to dlopen et. al. -+ */ -+ -+unsigned long _dl_error_number; -+unsigned long _dl_internal_error_number; -+extern char *_dl_ldsopath; -+ -+struct elf_resolve *_dl_load_shared_library(int secure, struct dyn_elf **rpnt, -+ struct elf_resolve *tpnt, char *full_libname) -+{ -+ char *pnt, *pnt1; -+ struct elf_resolve *tpnt1; -+ char *libname; -+ -+ _dl_internal_error_number = 0; -+ libname = full_libname; -+ -+ /* quick hack to ensure mylibname buffer doesn't overflow. don't -+ allow full_libname or any directory to be longer than 1024. */ -+ if (_dl_strlen(full_libname) > 1024) -+ goto goof; -+ -+ /* Skip over any initial initial './' and '/' stuff to -+ * get the short form libname with no path garbage */ -+ pnt1 = _dl_strrchr(libname, '/'); -+ if (pnt1) { -+ libname = pnt1 + 1; -+ } -+ -+ /* Critical step! Weed out duplicates early to avoid -+ * function aliasing, which wastes memory, and causes -+ * really bad things to happen with weaks and globals. */ -+ if ((tpnt1=_dl_check_if_named_library_is_loaded(libname))!=NULL) -+ return tpnt1; -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug) _dl_dprintf(_dl_debug_file, "\tfind library='%s'; searching\n", libname); -+#endif -+ /* If the filename has any '/', try it straight and leave it at that. -+ For IBCS2 compatibility under linux, we substitute the string -+ /usr/i486-sysv4/lib for /usr/lib in library names. */ -+ -+ if (libname != full_libname) { -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug) _dl_dprintf(_dl_debug_file, "\ttrying file='%s'\n", full_libname); -+#endif -+ tpnt1 = _dl_load_elf_shared_library(secure, rpnt, full_libname); -+ if (tpnt1) { -+ return tpnt1; -+ } -+ //goto goof; -+ } -+ -+ /* -+ * The ABI specifies that RPATH is searched before LD_*_PATH or -+ * the default path of /usr/lib. Check in rpath directories. -+ */ -+ for (tpnt = _dl_loaded_modules; tpnt; tpnt = tpnt->next) { -+ if (tpnt->libtype == elf_executable) { -+ pnt = (char *) tpnt->dynamic_info[DT_RPATH]; -+ if (pnt) { -+ pnt += (unsigned long) tpnt->loadaddr + tpnt->dynamic_info[DT_STRTAB]; -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug) _dl_dprintf(_dl_debug_file, "\tsearching RPATH='%s'\n", pnt); -+#endif -+ if ((tpnt1 = search_for_named_library(libname, secure, pnt, rpnt)) != NULL) -+ { -+ return tpnt1; -+ } -+ } -+ } -+ } -+ -+ /* Check in LD_{ELF_}LIBRARY_PATH, if specified and allowed */ -+ if (_dl_library_path) { -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug) _dl_dprintf(_dl_debug_file, "\tsearching LD_LIBRARY_PATH='%s'\n", _dl_library_path); -+#endif -+ if ((tpnt1 = search_for_named_library(libname, secure, _dl_library_path, rpnt)) != NULL) -+ { -+ return tpnt1; -+ } -+ } -+ -+ /* -+ * Where should the cache be searched? There is no such concept in the -+ * ABI, so we have some flexibility here. For now, search it before -+ * the hard coded paths that follow (i.e before /lib and /usr/lib). -+ */ -+#ifdef USE_CACHE -+ if (_dl_cache_addr != NULL && _dl_cache_addr != (caddr_t) - 1) { -+ int i; -+ header_t *header = (header_t *) _dl_cache_addr; -+ libentry_t *libent = (libentry_t *) & header[1]; -+ char *strs = (char *) &libent[header->nlibs]; -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug) _dl_dprintf(_dl_debug_file, "\tsearching cache='%s'\n", LDSO_CACHE); -+#endif -+ for (i = 0; i < header->nlibs; i++) { -+ if ((libent[i].flags == LIB_ELF || -+ libent[i].flags == LIB_ELF_LIBC5) && -+ _dl_strcmp(libname, strs + libent[i].sooffset) == 0 && -+ (tpnt1 = _dl_load_elf_shared_library(secure, -+ rpnt, strs + libent[i].liboffset))) -+ return tpnt1; -+ } -+ } -+#endif -+ -+ /* Look for libraries wherever the shared library loader -+ * was installed */ -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug) _dl_dprintf(_dl_debug_file, "\tsearching ldso dir='%s'\n", _dl_ldsopath); -+#endif -+ if ((tpnt1 = search_for_named_library(libname, secure, _dl_ldsopath, rpnt)) != NULL) -+ { -+ return tpnt1; -+ } -+ -+ -+ /* Lastly, search the standard list of paths for the library. -+ This list must exactly match the list in uClibc/ldso/util/ldd.c */ -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug) _dl_dprintf(_dl_debug_file, "\tsearching full lib path list\n"); -+#endif -+ if ((tpnt1 = search_for_named_library(libname, secure, -+ UCLIBC_RUNTIME_PREFIX "usr/X11R6/lib:" -+ UCLIBC_RUNTIME_PREFIX "usr/lib:" -+ UCLIBC_RUNTIME_PREFIX "lib:" -+ "/usr/lib:" -+ "/lib", rpnt) -+ ) != NULL) -+ { -+ return tpnt1; -+ } -+ -+goof: -+ /* Well, we shot our wad on that one. All we can do now is punt */ -+ if (_dl_internal_error_number) -+ _dl_error_number = _dl_internal_error_number; -+ else -+ _dl_error_number = LD_ERROR_NOFILE; -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug) _dl_dprintf(2, "Bummer: could not find '%s'!\n", libname); -+#endif -+ return NULL; -+} -+ -+ -+/* -+ * Read one ELF library into memory, mmap it into the correct locations and -+ * add the symbol info to the symbol chain. Perform any relocations that -+ * are required. -+ */ -+ -+struct elf_resolve *_dl_load_elf_shared_library(int secure, -+ struct dyn_elf **rpnt, char *libname) -+{ -+ ElfW(Ehdr) *epnt; -+ unsigned long dynamic_addr = 0; -+ unsigned long dynamic_size = 0; -+ Elf32_Dyn *dpnt; -+ struct elf_resolve *tpnt; -+ ElfW(Phdr) *ppnt; -+ char *status, *header; -+ unsigned long dynamic_info[24]; -+ unsigned long *lpnt; -+ unsigned long libaddr; -+ unsigned long minvma = 0xffffffff, maxvma = 0; -+ int i, flags, piclib, infile; -+ -+ /* If this file is already loaded, skip this step */ -+ tpnt = _dl_check_hashed_files(libname); -+ if (tpnt) { -+ if (*rpnt) { -+ (*rpnt)->next = (struct dyn_elf *) _dl_malloc(sizeof(struct dyn_elf)); -+ _dl_memset((*rpnt)->next, 0, sizeof(struct dyn_elf)); -+ (*rpnt)->next->prev = (*rpnt); -+ *rpnt = (*rpnt)->next; -+ (*rpnt)->dyn = tpnt; -+ tpnt->symbol_scope = _dl_symbol_tables; -+ } -+ tpnt->usage_count++; -+ tpnt->libtype = elf_lib; -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug) _dl_dprintf(2, "file='%s'; already loaded\n", libname); -+#endif -+ return tpnt; -+ } -+ -+ /* If we are in secure mode (i.e. a setu/gid binary using LD_PRELOAD), -+ we don't load the library if it isn't setuid. */ -+ -+ if (secure) { -+ struct stat st; -+ -+ if (_dl_stat(libname, &st) || !(st.st_mode & S_ISUID)) -+ return NULL; -+ } -+ -+ libaddr = 0; -+ infile = _dl_open(libname, O_RDONLY); -+ if (infile < 0) { -+#if 0 -+ /* -+ * NO! When we open shared libraries we may search several paths. -+ * it is inappropriate to generate an error here. -+ */ -+ _dl_dprintf(2, "%s: can't open '%s'\n", _dl_progname, libname); -+#endif -+ _dl_internal_error_number = LD_ERROR_NOFILE; -+ return NULL; -+ } -+ -+ header = _dl_mmap((void *) 0, 4096, PROT_READ | PROT_WRITE, -+ MAP_PRIVATE | MAP_ANONYMOUS, 0, 0); -+ if (_dl_mmap_check_error(header)) { -+ _dl_dprintf(2, "%s: can't map '%s'\n", _dl_progname, libname); -+ _dl_internal_error_number = LD_ERROR_MMAP_FAILED; -+ _dl_close(infile); -+ return NULL; -+ }; -+ -+ _dl_read(infile, header, 4096); -+ epnt = (ElfW(Ehdr) *) (intptr_t) header; -+ if (epnt->e_ident[0] != 0x7f || -+ epnt->e_ident[1] != 'E' || -+ epnt->e_ident[2] != 'L' || -+ epnt->e_ident[3] != 'F') -+ { -+ _dl_dprintf(2, "%s: '%s' is not an ELF file\n", _dl_progname, -+ libname); -+ _dl_internal_error_number = LD_ERROR_NOTELF; -+ _dl_close(infile); -+ _dl_munmap(header, 4096); -+ return NULL; -+ }; -+ -+ if ((epnt->e_type != ET_DYN) || (epnt->e_machine != MAGIC1 -+#ifdef MAGIC2 -+ && epnt->e_machine != MAGIC2 -+#endif -+ )) -+ { -+ _dl_internal_error_number = -+ (epnt->e_type != ET_DYN ? LD_ERROR_NOTDYN : LD_ERROR_NOTMAGIC); -+ _dl_dprintf(2, "%s: '%s' is not an ELF executable for " ELF_TARGET -+ "\n", _dl_progname, libname); -+ _dl_close(infile); -+ _dl_munmap(header, 4096); -+ return NULL; -+ }; -+ -+ ppnt = (ElfW(Phdr) *)(intptr_t) & header[epnt->e_phoff]; -+ -+ piclib = 1; -+ for (i = 0; i < epnt->e_phnum; i++) { -+ -+ if (ppnt->p_type == PT_DYNAMIC) { -+ if (dynamic_addr) -+ _dl_dprintf(2, "%s: '%s' has more than one dynamic section\n", -+ _dl_progname, libname); -+ dynamic_addr = ppnt->p_vaddr; -+ dynamic_size = ppnt->p_filesz; -+ }; -+ -+ if (ppnt->p_type == PT_LOAD) { -+ /* See if this is a PIC library. */ -+ if (i == 0 && ppnt->p_vaddr > 0x1000000) { -+ piclib = 0; -+ minvma = ppnt->p_vaddr; -+ } -+ if (piclib && ppnt->p_vaddr < minvma) { -+ minvma = ppnt->p_vaddr; -+ } -+ if (((unsigned long) ppnt->p_vaddr + ppnt->p_memsz) > maxvma) { -+ maxvma = ppnt->p_vaddr + ppnt->p_memsz; -+ } -+ } -+ ppnt++; -+ }; -+ -+ maxvma = (maxvma + ADDR_ALIGN) & ~ADDR_ALIGN; -+ minvma = minvma & ~0xffffU; -+ -+ flags = MAP_PRIVATE /*| MAP_DENYWRITE */ ; -+ if (!piclib) -+ flags |= MAP_FIXED; -+ -+ status = (char *) _dl_mmap((char *) (piclib ? 0 : minvma), -+ maxvma - minvma, PROT_NONE, flags | MAP_ANONYMOUS, -1, 0); -+ if (_dl_mmap_check_error(status)) { -+ _dl_dprintf(2, "%s: can't map %s\n", _dl_progname, libname); -+ _dl_internal_error_number = LD_ERROR_MMAP_FAILED; -+ _dl_close(infile); -+ _dl_munmap(header, 4096); -+ return NULL; -+ }; -+ libaddr = (unsigned long) status; -+ flags |= MAP_FIXED; -+ -+ /* Get the memory to store the library */ -+ ppnt = (ElfW(Phdr) *)(intptr_t) & header[epnt->e_phoff]; -+ -+ for (i = 0; i < epnt->e_phnum; i++) { -+ if (ppnt->p_type == PT_LOAD) { -+ -+ /* See if this is a PIC library. */ -+ if (i == 0 && ppnt->p_vaddr > 0x1000000) { -+ piclib = 0; -+ /* flags |= MAP_FIXED; */ -+ } -+ -+ -+ -+ if (ppnt->p_flags & PF_W) { -+ unsigned long map_size; -+ char *cpnt; -+ -+ status = (char *) _dl_mmap((char *) ((piclib ? libaddr : 0) + -+ (ppnt->p_vaddr & PAGE_ALIGN)), (ppnt->p_vaddr & ADDR_ALIGN) -+ + ppnt->p_filesz, LXFLAGS(ppnt->p_flags), flags, infile, -+ ppnt->p_offset & OFFS_ALIGN); -+ -+ if (_dl_mmap_check_error(status)) { -+ _dl_dprintf(2, "%s: can't map '%s'\n", -+ _dl_progname, libname); -+ _dl_internal_error_number = LD_ERROR_MMAP_FAILED; -+ _dl_munmap((char *) libaddr, maxvma - minvma); -+ _dl_close(infile); -+ _dl_munmap(header, 4096); -+ return NULL; -+ }; -+ -+ /* Pad the last page with zeroes. */ -+ cpnt = (char *) (status + (ppnt->p_vaddr & ADDR_ALIGN) + -+ ppnt->p_filesz); -+ while (((unsigned long) cpnt) & ADDR_ALIGN) -+ *cpnt++ = 0; -+ -+ /* I am not quite sure if this is completely -+ * correct to do or not, but the basic way that -+ * we handle bss segments is that we mmap -+ * /dev/zero if there are any pages left over -+ * that are not mapped as part of the file */ -+ -+ map_size = (ppnt->p_vaddr + ppnt->p_filesz + ADDR_ALIGN) & PAGE_ALIGN; -+ -+ if (map_size < ppnt->p_vaddr + ppnt->p_memsz) -+ status = (char *) _dl_mmap((char *) map_size + -+ (piclib ? libaddr : 0), -+ ppnt->p_vaddr + ppnt->p_memsz - map_size, -+ LXFLAGS(ppnt->p_flags), flags | MAP_ANONYMOUS, -1, 0); -+ } else -+ status = (char *) _dl_mmap((char *) (ppnt->p_vaddr & PAGE_ALIGN) -+ + (piclib ? libaddr : 0), (ppnt->p_vaddr & ADDR_ALIGN) + -+ ppnt->p_filesz, LXFLAGS(ppnt->p_flags), flags, -+ infile, ppnt->p_offset & OFFS_ALIGN); -+ if (_dl_mmap_check_error(status)) { -+ _dl_dprintf(2, "%s: can't map '%s'\n", _dl_progname, libname); -+ _dl_internal_error_number = LD_ERROR_MMAP_FAILED; -+ _dl_munmap((char *) libaddr, maxvma - minvma); -+ _dl_close(infile); -+ _dl_munmap(header, 4096); -+ return NULL; -+ }; -+ -+ /* if(libaddr == 0 && piclib) { -+ libaddr = (unsigned long) status; -+ flags |= MAP_FIXED; -+ }; */ -+ }; -+ ppnt++; -+ }; -+ _dl_close(infile); -+ -+ /* For a non-PIC library, the addresses are all absolute */ -+ if (piclib) { -+ dynamic_addr += (unsigned long) libaddr; -+ } -+ -+ /* -+ * OK, the ELF library is now loaded into VM in the correct locations -+ * The next step is to go through and do the dynamic linking (if needed). -+ */ -+ -+ /* Start by scanning the dynamic section to get all of the pointers */ -+ -+ if (!dynamic_addr) { -+ _dl_internal_error_number = LD_ERROR_NODYNAMIC; -+ _dl_dprintf(2, "%s: '%s' is missing a dynamic section\n", -+ _dl_progname, libname); -+ _dl_munmap(header, 4096); -+ return NULL; -+ } -+ -+ dpnt = (Elf32_Dyn *) dynamic_addr; -+ -+ dynamic_size = dynamic_size / sizeof(Elf32_Dyn); -+ _dl_memset(dynamic_info, 0, sizeof(dynamic_info)); -+ -+#if defined(__mips__) -+ { -+ -+ int indx = 1; -+ Elf32_Dyn *dpnt = (Elf32_Dyn *) dynamic_addr; -+ -+ while(dpnt->d_tag) { -+ dpnt++; -+ indx++; -+ } -+ dynamic_size = indx; -+ } -+#endif -+ -+ { -+ unsigned long indx; -+ -+ for (indx = 0; indx < dynamic_size; indx++) -+ { -+ if (dpnt->d_tag > DT_JMPREL) { -+ dpnt++; -+ continue; -+ } -+ dynamic_info[dpnt->d_tag] = dpnt->d_un.d_val; -+ if (dpnt->d_tag == DT_TEXTREL) -+ dynamic_info[DT_TEXTREL] = 1; -+ dpnt++; -+ }; -+ } -+ -+ /* If the TEXTREL is set, this means that we need to make the pages -+ writable before we perform relocations. Do this now. They get set -+ back again later. */ -+ -+ if (dynamic_info[DT_TEXTREL]) { -+#ifndef FORCE_SHAREABLE_TEXT_SEGMENTS -+ ppnt = (ElfW(Phdr) *)(intptr_t) & header[epnt->e_phoff]; -+ for (i = 0; i < epnt->e_phnum; i++, ppnt++) { -+ if (ppnt->p_type == PT_LOAD && !(ppnt->p_flags & PF_W)) -+ _dl_mprotect((void *) ((piclib ? libaddr : 0) + -+ (ppnt->p_vaddr & PAGE_ALIGN)), -+ (ppnt->p_vaddr & ADDR_ALIGN) + (unsigned long) ppnt->p_filesz, -+ PROT_READ | PROT_WRITE | PROT_EXEC); -+ } -+#else -+ _dl_dprintf(_dl_debug_file, "Can't modify %s's text section. Use GCC option -fPIC for shared objects, please.\n",libname); -+ _dl_exit(1); -+#endif -+ } -+ -+ tpnt = _dl_add_elf_hash_table(libname, (char *) libaddr, dynamic_info, -+ dynamic_addr, dynamic_size); -+ -+ tpnt->ppnt = (ElfW(Phdr) *)(intptr_t) (tpnt->loadaddr + epnt->e_phoff); -+ tpnt->n_phent = epnt->e_phnum; -+ -+ /* -+ * Add this object into the symbol chain -+ */ -+ if (*rpnt) { -+ (*rpnt)->next = (struct dyn_elf *) _dl_malloc(sizeof(struct dyn_elf)); -+ _dl_memset((*rpnt)->next, 0, sizeof(struct dyn_elf)); -+ (*rpnt)->next->prev = (*rpnt); -+ *rpnt = (*rpnt)->next; -+ (*rpnt)->dyn = tpnt; -+ tpnt->symbol_scope = _dl_symbol_tables; -+ } -+ tpnt->usage_count++; -+ tpnt->libtype = elf_lib; -+ -+ /* -+ * OK, the next thing we need to do is to insert the dynamic linker into -+ * the proper entry in the GOT so that the PLT symbols can be properly -+ * resolved. -+ */ -+ -+ lpnt = (unsigned long *) dynamic_info[DT_PLTGOT]; -+ -+ if (lpnt) { -+ lpnt = (unsigned long *) (dynamic_info[DT_PLTGOT] + -+ ((int) libaddr)); -+ INIT_GOT(lpnt, tpnt); -+ }; -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug) { -+ _dl_dprintf(2, "\n\tfile='%s'; generating link map\n", libname); -+ _dl_dprintf(2, "\t\tdynamic: %x base: %x size: %x\n", -+ dynamic_addr, libaddr, dynamic_size); -+ _dl_dprintf(2, "\t\t entry: %x phdr: %x phnum: %d\n\n", -+ epnt->e_entry + libaddr, tpnt->ppnt, tpnt->n_phent); -+ -+ } -+#endif -+ _dl_munmap(header, 4096); -+ -+ return tpnt; -+} -+ -+/* Ugly, ugly. Some versions of the SVr4 linker fail to generate COPY -+ relocations for global variables that are present both in the image and -+ the shared library. Go through and do it manually. If the images -+ are guaranteed to be generated by a trustworthy linker, then this -+ step can be skipped. */ -+ -+int _dl_copy_fixups(struct dyn_elf *rpnt) -+{ -+ int goof = 0; -+ struct elf_resolve *tpnt; -+ -+ if (rpnt->next) -+ goof += _dl_copy_fixups(rpnt->next); -+ else -+ return 0; -+ -+ tpnt = rpnt->dyn; -+ -+ if (tpnt->init_flag & COPY_RELOCS_DONE) -+ return goof; -+ tpnt->init_flag |= COPY_RELOCS_DONE; -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug) _dl_dprintf(_dl_debug_file,"\nrelocation copy fixups: %s", tpnt->libname); -+#endif -+ -+#ifdef ELF_USES_RELOCA -+ goof += _dl_parse_copy_information(rpnt, -+ tpnt->dynamic_info[DT_RELA], tpnt->dynamic_info[DT_RELASZ], 0); -+ -+#else -+ goof += _dl_parse_copy_information(rpnt, tpnt->dynamic_info[DT_REL], -+ tpnt->dynamic_info[DT_RELSZ], 0); -+ -+#endif -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug) _dl_dprintf(_dl_debug_file,"\nrelocation copy fixups: %s; finished\n\n", tpnt->libname); -+#endif -+ return goof; -+} -+ -+/* Minimal printf which handles only %s, %d, and %x */ -+void _dl_dprintf(int fd, const char *fmt, ...) -+{ -+ int num; -+ va_list args; -+ char *start, *ptr, *string; -+ static char *buf; -+ -+ buf = _dl_mmap((void *) 0, 4096, PROT_READ | PROT_WRITE, -+ MAP_PRIVATE | MAP_ANONYMOUS, 0, 0); -+ if (_dl_mmap_check_error(buf)) { -+ _dl_dprintf(2, "%s: mmap of a spare page failed!\n", _dl_progname); -+ _dl_exit(20); -+ } -+ -+ start = ptr = buf; -+ -+ if (!fmt) -+ return; -+ -+ if (_dl_strlen(fmt) >= (sizeof(buf) - 1)) -+ _dl_write(fd, "(overflow)\n", 10); -+ -+ _dl_strcpy(buf, fmt); -+ va_start(args, fmt); -+ -+ while (start) { -+ while (*ptr != '%' && *ptr) { -+ ptr++; -+ } -+ -+ if (*ptr == '%') { -+ *ptr++ = '\0'; -+ _dl_write(fd, start, _dl_strlen(start)); -+ -+ switch (*ptr++) { -+ case 's': -+ string = va_arg(args, char *); -+ -+ if (!string) -+ _dl_write(fd, "(null)", 6); -+ else -+ _dl_write(fd, string, _dl_strlen(string)); -+ break; -+ -+ case 'i': -+ case 'd': -+ { -+ char tmp[22]; -+ num = va_arg(args, int); -+ -+ string = _dl_simple_ltoa(tmp, num); -+ _dl_write(fd, string, _dl_strlen(string)); -+ break; -+ } -+ case 'x': -+ case 'X': -+ { -+ char tmp[22]; -+ num = va_arg(args, int); -+ -+ string = _dl_simple_ltoahex(tmp, num); -+ _dl_write(fd, string, _dl_strlen(string)); -+ break; -+ } -+ default: -+ _dl_write(fd, "(null)", 6); -+ break; -+ } -+ -+ start = ptr; -+ } else { -+ _dl_write(fd, start, _dl_strlen(start)); -+ start = NULL; -+ } -+ } -+ _dl_munmap(buf, 4096); -+ return; -+} -+ -+char *_dl_strdup(const char *string) -+{ -+ char *retval; -+ int len; -+ -+ len = _dl_strlen(string); -+ retval = _dl_malloc(len + 1); -+ _dl_strcpy(retval, string); -+ return retval; -+} -+ -+void *(*_dl_malloc_function) (size_t size) = NULL; -+void *_dl_malloc(int size) -+{ -+ void *retval; -+ -+#if 0 -+#ifdef __SUPPORT_LD_DEBUG_EARLY__ -+ _dl_dprintf(2, "malloc: request for %d bytes\n", size); -+#endif -+#endif -+ -+ if (_dl_malloc_function) -+ return (*_dl_malloc_function) (size); -+ -+ if (_dl_malloc_addr - _dl_mmap_zero + size > 4096) { -+#ifdef __SUPPORT_LD_DEBUG_EARLY__ -+ _dl_dprintf(2, "malloc: mmapping more memory\n"); -+#endif -+ _dl_mmap_zero = _dl_malloc_addr = _dl_mmap((void *) 0, size, -+ PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_ANONYMOUS, 0, 0); -+ if (_dl_mmap_check_error(_dl_mmap_zero)) { -+ _dl_dprintf(2, "%s: mmap of a spare page failed!\n", _dl_progname); -+ _dl_exit(20); -+ } -+ } -+ retval = _dl_malloc_addr; -+ _dl_malloc_addr += size; -+ -+ /* -+ * Align memory to 4 byte boundary. Some platforms require this, others -+ * simply get better performance. -+ */ -+ _dl_malloc_addr = (char *) (((unsigned long) _dl_malloc_addr + 3) & ~(3)); -+ return retval; -+} -+ -+int _dl_fixup(struct elf_resolve *tpnt, int flag) -+{ -+ int goof = 0; -+ -+ if (tpnt->next) -+ goof += _dl_fixup(tpnt->next, flag); -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug) _dl_dprintf(_dl_debug_file,"\nrelocation processing: %s", tpnt->libname); -+#endif -+ -+ if (tpnt->dynamic_info[DT_REL]) { -+#ifdef ELF_USES_RELOCA -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug) _dl_dprintf(2, "%s: can't handle REL relocation records\n", _dl_progname); -+#endif -+ goof++; -+ return goof; -+#else -+ if (tpnt->init_flag & RELOCS_DONE) -+ return goof; -+ tpnt->init_flag |= RELOCS_DONE; -+ goof += _dl_parse_relocation_information(tpnt, -+ tpnt->dynamic_info[DT_REL], -+ tpnt->dynamic_info[DT_RELSZ], 0); -+#endif -+ } -+ if (tpnt->dynamic_info[DT_RELA]) { -+#ifndef ELF_USES_RELOCA -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug) _dl_dprintf(2, "%s: can't handle RELA relocation records\n", _dl_progname); -+#endif -+ goof++; -+ return goof; -+#else -+ if (tpnt->init_flag & RELOCS_DONE) -+ return goof; -+ tpnt->init_flag |= RELOCS_DONE; -+ goof += _dl_parse_relocation_information(tpnt, -+ tpnt->dynamic_info[DT_RELA], -+ tpnt->dynamic_info[DT_RELASZ], 0); -+#endif -+ } -+ if (tpnt->dynamic_info[DT_JMPREL]) { -+ if (tpnt->init_flag & JMP_RELOCS_DONE) -+ return goof; -+ tpnt->init_flag |= JMP_RELOCS_DONE; -+ if (flag & RTLD_LAZY) { -+ _dl_parse_lazy_relocation_information(tpnt, -+ tpnt->dynamic_info[DT_JMPREL], -+ tpnt->dynamic_info [DT_PLTRELSZ], 0); -+ } else { -+ goof += _dl_parse_relocation_information(tpnt, -+ tpnt->dynamic_info[DT_JMPREL], -+ tpnt->dynamic_info[DT_PLTRELSZ], 0); -+ } -+ } -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug) { -+ _dl_dprintf(_dl_debug_file,"\nrelocation processing: %s", tpnt->libname); -+ _dl_dprintf(_dl_debug_file,"; finished\n\n"); -+ } -+#endif -+ return goof; -+} -+ -+ -diff -urN uClibc/ldso-0.9.24/ldso/sh/boot1_arch.h uClibc.ldso.24/ldso-0.9.24/ldso/sh/boot1_arch.h ---- uClibc/ldso-0.9.24/ldso/sh/boot1_arch.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/sh/boot1_arch.h 2002-11-03 08:12:29.000000000 -0600 -@@ -0,0 +1,22 @@ -+/* Any assmbly language/system dependent hacks needed to setup boot1.c so it -+ * will work as expected and cope with whatever platform specific wierdness is -+ * needed for this architecture. */ -+ -+asm("" \ -+" .text\n" \ -+" .globl _dl_boot\n" \ -+"_dl_boot:\n" \ -+" mov r15, r4\n" \ -+" mov.l .L_dl_boot2, r0\n" \ -+" bsrf r0\n" \ -+" add #4, r4\n" \ -+".jmp_loc:\n" \ -+" jmp @r0\n" \ -+" mov #0, r4 !call _start with arg == 0\n" \ -+".L_dl_boot2:\n" \ -+" .long _dl_boot2-.jmp_loc\n" \ -+" .previous\n" \ -+); -+ -+#define _dl_boot _dl_boot2 -+#define LD_BOOT(X) static void * __attribute__ ((unused)) _dl_boot (X) -diff -urN uClibc/ldso-0.9.24/ldso/sh/elfinterp.c uClibc.ldso.24/ldso-0.9.24/ldso/sh/elfinterp.c ---- uClibc/ldso-0.9.24/ldso/sh/elfinterp.c 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/sh/elfinterp.c 2003-09-11 05:26:16.000000000 -0500 -@@ -0,0 +1,427 @@ -+/* vi: set sw=4 ts=4: */ -+/* SuperH ELF shared library loader suppport -+ * -+ * Copyright (C) 2002, Stefan Allius <allius@atecom.com> and -+ * Eddie C. Dost <ecd@atecom.com> -+ * -+ * 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. The name of the above contributors may not be -+ * used to endorse or promote products derived from this software -+ * without specific prior written permission. -+ * -+ * THIS SOFTWARE IS PROVIDED BY THE 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 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. -+ */ -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+static const char *_dl_reltypes_tab[] = -+{ -+ [0] "R_SH_NONE", "R_SH_DIR32", "R_SH_REL32", "R_SH_DIR8WPN", -+ [4] "R_SH_IND12W", "R_SH_DIR8WPL", "R_SH_DIR8WPZ", "R_SH_DIR8BP", -+ [8] "R_SH_DIR8W", "R_SH_DIR8L", -+ [25] "R_SH_SWITCH16","R_SH_SWITCH32","R_SH_USES", -+ [28] "R_SH_COUNT", "R_SH_ALIGN", "R_SH_CODE", "R_SH_DATA", -+ [32] "R_SH_LABEL", "R_SH_SWITCH8", "R_SH_GNU_VTINHERIT","R_SH_GNU_VTENTRY", -+[160] "R_SH_GOT32", "R_SH_PLT32", "R_SH_COPY", "R_SH_GLOB_DAT", -+[164] "R_SH_JMP_SLOT","R_SH_RELATIVE","R_SH_GOTOFF", "R_SH_GOTPC", -+}; -+ -+static const char * -+_dl_reltypes(int type) -+{ -+ static char buf[22]; -+ const char *str; -+ -+ if (type >= (int)(sizeof (_dl_reltypes_tab)/sizeof(_dl_reltypes_tab[0])) || -+ NULL == (str = _dl_reltypes_tab[type])) -+ { -+ str =_dl_simple_ltoa( buf, (unsigned long)(type)); -+ } -+ return str; -+} -+ -+static -+void debug_sym(Elf32_Sym *symtab,char *strtab,int symtab_index) -+{ -+ if(_dl_debug_symbols) -+ { -+ if(symtab_index){ -+ _dl_dprintf(_dl_debug_file, "\n%s\tvalue=%x\tsize=%x\tinfo=%x\tother=%x\tshndx=%x", -+ strtab + symtab[symtab_index].st_name, -+ symtab[symtab_index].st_value, -+ symtab[symtab_index].st_size, -+ symtab[symtab_index].st_info, -+ symtab[symtab_index].st_other, -+ symtab[symtab_index].st_shndx); -+ } -+ } -+} -+ -+static void debug_reloc(Elf32_Sym *symtab,char *strtab, ELF_RELOC *rpnt) -+{ -+ if(_dl_debug_reloc) -+ { -+ int symtab_index; -+ const char *sym; -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ sym = symtab_index ? strtab + symtab[symtab_index].st_name : "sym=0x0"; -+ -+ if(_dl_debug_symbols) -+ _dl_dprintf(_dl_debug_file, "\n\t"); -+ else -+ _dl_dprintf(_dl_debug_file, "\n%s\n\t", sym); -+ -+#ifdef ELF_USES_RELOCA -+ _dl_dprintf(_dl_debug_file, "%s\toffset=%x\taddend=%x", -+ _dl_reltypes(ELF32_R_TYPE(rpnt->r_info)), -+ rpnt->r_offset, -+ rpnt->r_addend); -+#else -+ _dl_dprintf(_dl_debug_file, "%s\toffset=%x\n", -+ _dl_reltypes(ELF32_R_TYPE(rpnt->r_info)), -+ rpnt->r_offset); -+#endif -+ } -+} -+#endif -+ -+/* Program to load an ELF binary on a linux system, and run it. -+ References to symbols in sharable libraries can be resolved by either -+ an ELF sharable library or a linux style of shared library. */ -+ -+/* Disclaimer: I have never seen any AT&T source code for SVr4, nor have -+ I ever taken any courses on internals. This program was developed using -+ information available through the book "UNIX SYSTEM V RELEASE 4, -+ Programmers guide: Ansi C and Programming Support Tools", which did -+ a more than adequate job of explaining everything required to get this -+ working. */ -+ -+extern int _dl_linux_resolve(void); -+ -+unsigned long _dl_linux_resolver(struct elf_resolve *tpnt, int reloc_entry) -+{ -+ int reloc_type; -+ ELF_RELOC *this_reloc; -+ char *strtab; -+ Elf32_Sym *symtab; -+ int symtab_index; -+ char *rel_addr; -+ char *new_addr; -+ char **got_addr; -+ unsigned long instr_addr; -+ char *symname; -+ -+ rel_addr = (char *) (tpnt->dynamic_info[DT_JMPREL] + tpnt->loadaddr); -+ -+ this_reloc = (ELF_RELOC *)(intptr_t)(rel_addr + reloc_entry); -+ reloc_type = ELF32_R_TYPE(this_reloc->r_info); -+ symtab_index = ELF32_R_SYM(this_reloc->r_info); -+ -+ symtab = (Elf32_Sym *)(intptr_t) (tpnt->dynamic_info[DT_SYMTAB] + tpnt->loadaddr); -+ strtab = (char *) (tpnt->dynamic_info[DT_STRTAB] + tpnt->loadaddr); -+ symname = strtab + symtab[symtab_index].st_name; -+ -+ if (reloc_type != R_SH_JMP_SLOT) { -+ _dl_dprintf(2, "%s: Incorrect relocation type in jump relocations\n", -+ _dl_progname); -+ _dl_exit(1); -+ } -+ -+ /* Address of jump instruction to fix up */ -+ instr_addr = ((unsigned long) this_reloc->r_offset + -+ (unsigned long) tpnt->loadaddr); -+ got_addr = (char **) instr_addr; -+ -+ -+ /* Get the address of the GOT entry */ -+ new_addr = _dl_find_hash(symname, tpnt->symbol_scope, tpnt, resolver); -+ if (!new_addr) { -+ new_addr = _dl_find_hash(symname, NULL, NULL, resolver); -+ if (new_addr) { -+ return (unsigned long) new_addr; -+ } -+ -+ _dl_dprintf(2, "%s: can't resolve symbol '%s'\n", _dl_progname, symname); -+ _dl_exit(1); -+ } -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ if ((unsigned long) got_addr < 0x20000000) -+ { -+ if (_dl_debug_bindings) -+ { -+ _dl_dprintf(_dl_debug_file, "\nresolve function: %s", symname); -+ if(_dl_debug_detail) _dl_dprintf(_dl_debug_file, -+ "\n\tpatched %x ==> %x @ %x\n", *got_addr, new_addr, got_addr); -+ } -+ } -+ if (!_dl_debug_nofixups) { -+ *got_addr = new_addr; -+ } -+#else -+ *got_addr = new_addr; -+#endif -+ -+ return (unsigned long) new_addr; -+} -+ -+ -+static int -+_dl_parse(struct elf_resolve *tpnt, struct dyn_elf *scope, -+ unsigned long rel_addr, unsigned long rel_size, -+ int (*reloc_fnc) (struct elf_resolve *tpnt, struct dyn_elf *scope, -+ ELF_RELOC *rpnt, Elf32_Sym *symtab, char *strtab)) -+{ -+ unsigned int i; -+ char *strtab; -+ Elf32_Sym *symtab; -+ ELF_RELOC *rpnt; -+ int symtab_index; -+ /* Now parse the relocation information */ -+ -+ rpnt = (ELF_RELOC *)(intptr_t) (rel_addr + tpnt->loadaddr); -+ rel_size = rel_size / sizeof(ELF_RELOC); -+ -+ symtab = (Elf32_Sym *)(intptr_t) (tpnt->dynamic_info[DT_SYMTAB] + tpnt->loadaddr); -+ strtab = (char *) (tpnt->dynamic_info[DT_STRTAB] + tpnt->loadaddr); -+ -+ for (i = 0; i < rel_size; i++, rpnt++) { -+ int res; -+ -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ -+ /* When the dynamic linker bootstrapped itself, it resolved some symbols. -+ Make sure we do not do them again */ -+ if (!symtab_index && tpnt->libtype == program_interpreter) -+ continue; -+ if (symtab_index && tpnt->libtype == program_interpreter && -+ _dl_symbol(strtab + symtab[symtab_index].st_name)) -+ continue; -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ debug_sym(symtab,strtab,symtab_index); -+ debug_reloc(symtab,strtab,rpnt); -+#endif -+ -+ res = reloc_fnc (tpnt, scope, rpnt, symtab, strtab); -+ -+ if (res==0) continue; -+ -+ _dl_dprintf(2, "\n%s: ",_dl_progname); -+ -+ if (symtab_index) -+ _dl_dprintf(2, "symbol '%s': ", strtab + symtab[symtab_index].st_name); -+ -+ if (res <0) -+ { -+ int reloc_type = ELF32_R_TYPE(rpnt->r_info); -+#if defined (__SUPPORT_LD_DEBUG__) -+ _dl_dprintf(2, "can't handle reloc type %s\n ", _dl_reltypes(reloc_type)); -+#else -+ _dl_dprintf(2, "can't handle reloc type %x\n", reloc_type); -+#endif -+ _dl_exit(-res); -+ } -+ else if (res >0) -+ { -+ _dl_dprintf(2, "can't resolve symbol\n"); -+ return res; -+ } -+ } -+ return 0; -+} -+ -+ -+static int -+_dl_do_reloc (struct elf_resolve *tpnt,struct dyn_elf *scope, -+ ELF_RELOC *rpnt, Elf32_Sym *symtab, char *strtab) -+{ -+ int reloc_type; -+ int symtab_index; -+ char *symname; -+ unsigned long *reloc_addr; -+ unsigned long symbol_addr; -+#if defined (__SUPPORT_LD_DEBUG__) -+ unsigned long old_val; -+#endif -+ -+ reloc_addr = (unsigned long *)(intptr_t) (tpnt->loadaddr + (unsigned long) rpnt->r_offset); -+ reloc_type = ELF32_R_TYPE(rpnt->r_info); -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ symbol_addr = 0; -+ symname = strtab + symtab[symtab_index].st_name; -+ -+ if (symtab_index) { -+ -+ -+ symbol_addr = (unsigned long) _dl_find_hash(symname, scope, -+ (reloc_type == R_SH_JMP_SLOT ? tpnt : NULL), symbolrel); -+ -+ /* -+ * We want to allow undefined references to weak symbols - this might -+ * have been intentional. We should not be linking local symbols -+ * here, so all bases should be covered. -+ */ -+ if (!symbol_addr && ELF32_ST_BIND(symtab[symtab_index].st_info) == STB_GLOBAL) { -+#if defined (__SUPPORT_LD_DEBUG__) -+ _dl_dprintf(2, "\tglobal symbol '%s' already defined in '%s'\n", -+ symname, tpnt->libname); -+#endif -+ return 0; -+ } -+ } -+ -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ old_val = *reloc_addr; -+#endif -+ switch (reloc_type) { -+ case R_SH_NONE: -+ break; -+ case R_SH_COPY: -+ /* handled later on */ -+ break; -+ case R_SH_DIR32: -+ case R_SH_GLOB_DAT: -+ case R_SH_JMP_SLOT: -+ *reloc_addr = symbol_addr + rpnt->r_addend; -+ break; -+ case R_SH_REL32: -+ *reloc_addr = symbol_addr + rpnt->r_addend - -+ (unsigned long) reloc_addr; -+ break; -+ case R_SH_RELATIVE: -+ *reloc_addr = (unsigned long) tpnt->loadaddr + rpnt->r_addend; -+ break; -+ default: -+ return -1; /*call _dl_exit(1) */ -+ } -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug_reloc && _dl_debug_detail) -+ _dl_dprintf(_dl_debug_file, "\tpatched: %x ==> %x @ %x", old_val, *reloc_addr, reloc_addr); -+#endif -+ -+ return 0; -+} -+ -+ -+static int -+_dl_do_lazy_reloc (struct elf_resolve *tpnt, struct dyn_elf *scope, -+ ELF_RELOC *rpnt, Elf32_Sym *symtab, char *strtab) -+{ -+ int reloc_type; -+ unsigned long *reloc_addr; -+#if defined (__SUPPORT_LD_DEBUG__) -+ unsigned long old_val; -+#endif -+ (void)scope; -+ (void)symtab; -+ (void)strtab; -+ -+ reloc_addr = (unsigned long *)(intptr_t) (tpnt->loadaddr + (unsigned long) rpnt->r_offset); -+ reloc_type = ELF32_R_TYPE(rpnt->r_info); -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ old_val = *reloc_addr; -+#endif -+ switch (reloc_type) { -+ case R_SH_NONE: -+ break; -+ case R_SH_JMP_SLOT: -+ *reloc_addr += (unsigned long) tpnt->loadaddr; -+ break; -+ default: -+ return -1; /*call _dl_exit(1) */ -+ } -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug_reloc && _dl_debug_detail) -+ _dl_dprintf(_dl_debug_file, "\tpatched: %x ==> %x @ %x", old_val, *reloc_addr, reloc_addr); -+#endif -+ return 0; -+ -+} -+ -+/* This is done as a separate step, because there are cases where -+ information is first copied and later initialized. This results in -+ the wrong information being copied. Someone at Sun was complaining about -+ a bug in the handling of _COPY by SVr4, and this may in fact be what he -+ was talking about. Sigh. */ -+ -+/* No, there are cases where the SVr4 linker fails to emit COPY relocs -+ at all */ -+static int -+_dl_do_copy (struct elf_resolve *tpnt, struct dyn_elf *scope, -+ ELF_RELOC *rpnt, Elf32_Sym *symtab, char *strtab) -+{ -+ int reloc_type; -+ int symtab_index; -+ unsigned long *reloc_addr; -+ unsigned long symbol_addr; -+ int goof = 0; -+ char*symname; -+ -+ reloc_addr = (unsigned long *)(intptr_t) (tpnt->loadaddr + (unsigned long) rpnt->r_offset); -+ reloc_type = ELF32_R_TYPE(rpnt->r_info); -+ if (reloc_type != R_SH_COPY) -+ return 0; -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ symbol_addr = 0; -+ symname = strtab + symtab[symtab_index].st_name; -+ -+ if (symtab_index) { -+ -+ symbol_addr = (unsigned long) _dl_find_hash(symname, scope, NULL, copyrel); -+ if (!symbol_addr) goof++; -+ } -+ if (!goof) { -+#if defined (__SUPPORT_LD_DEBUG__) -+ if(_dl_debug_move) -+ _dl_dprintf(_dl_debug_file,"\n%s move %x bytes from %x to %x", -+ symname, symtab[symtab_index].st_size, -+ symbol_addr, symtab[symtab_index].st_value); -+#endif -+ _dl_memcpy((char *) symtab[symtab_index].st_value, -+ (char *) symbol_addr, symtab[symtab_index].st_size); -+ } -+ -+ return goof; -+} -+ -+ -+void _dl_parse_lazy_relocation_information(struct elf_resolve *tpnt, -+ unsigned long rel_addr, unsigned long rel_size, int type) -+{ -+ (void) type; -+ (void)_dl_parse(tpnt, NULL, rel_addr, rel_size, _dl_do_lazy_reloc); -+} -+ -+int _dl_parse_relocation_information(struct elf_resolve *tpnt, -+ unsigned long rel_addr, unsigned long rel_size, int type) -+{ -+ (void) type; -+ return _dl_parse(tpnt, tpnt->symbol_scope, rel_addr, rel_size, _dl_do_reloc); -+} -+ -+int _dl_parse_copy_information(struct dyn_elf *xpnt, unsigned long rel_addr, -+ unsigned long rel_size, int type) -+{ -+ (void) type; -+ return _dl_parse(xpnt->dyn, xpnt->next, rel_addr, rel_size, _dl_do_copy); -+} -+ -+ -diff -urN uClibc/ldso-0.9.24/ldso/sh/ld_syscalls.h uClibc.ldso.24/ldso-0.9.24/ldso/sh/ld_syscalls.h ---- uClibc/ldso-0.9.24/ldso/sh/ld_syscalls.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/sh/ld_syscalls.h 2002-08-09 07:20:19.000000000 -0500 -@@ -0,0 +1,7 @@ -+/* Define the __set_errno macro as nothing so that we don't bother -+ * setting errno, which is important since we make system calls -+ * before the errno symbol is dynamicly linked. */ -+ -+#define __set_errno(X) {(void)(X);} -+#include "sys/syscall.h" -+ -diff -urN uClibc/ldso-0.9.24/ldso/sh/ld_sysdep.h uClibc.ldso.24/ldso-0.9.24/ldso/sh/ld_sysdep.h ---- uClibc/ldso-0.9.24/ldso/sh/ld_sysdep.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/sh/ld_sysdep.h 2002-11-07 20:18:16.000000000 -0600 -@@ -0,0 +1,144 @@ -+/* -+ * Various assmbly language/system dependent hacks that are required -+ * so that we can minimize the amount of platform specific code. -+ */ -+ -+/* -+ * Define this if the system uses RELOCA. -+ */ -+#define ELF_USES_RELOCA -+ -+/* -+ * Get a pointer to the argv array. On many platforms this can be just -+ * the address if the first argument, on other platforms we need to -+ * do something a little more subtle here. -+ */ -+#define GET_ARGV(ARGVP, ARGS) ARGVP = ((unsigned long*) ARGS) -+ -+/* -+ * Initialization sequence for a GOT. -+ */ -+#define INIT_GOT(GOT_BASE,MODULE) \ -+{ \ -+ GOT_BASE[2] = (unsigned long) _dl_linux_resolve; \ -+ GOT_BASE[1] = (unsigned long) (MODULE); \ -+} -+ -+/* -+ * Here is a macro to perform a relocation. This is only used when -+ * bootstrapping the dynamic loader. RELP is the relocation that we -+ * are performing, REL is the pointer to the address we are relocating. -+ * SYMBOL is the symbol involved in the relocation, and LOAD is the -+ * load address. -+ */ -+#define PERFORM_BOOTSTRAP_RELOC(RELP,REL,SYMBOL,LOAD) \ -+ switch(ELF32_R_TYPE((RELP)->r_info)){ \ -+ case R_SH_REL32: \ -+ *(REL) = (SYMBOL) + (RELP)->r_addend \ -+ - (unsigned long)(REL); \ -+ break; \ -+ case R_SH_DIR32: \ -+ case R_SH_GLOB_DAT: \ -+ case R_SH_JMP_SLOT: \ -+ *(REL) = (SYMBOL) + (RELP)->r_addend; \ -+ break; \ -+ case R_SH_RELATIVE: \ -+ *(REL) = (LOAD) + (RELP)->r_addend; \ -+ break; \ -+ case R_SH_NONE: \ -+ break; \ -+ default: \ -+ SEND_STDERR("BOOTSTRAP_RELOC: unhandled reloc type "); \ -+ SEND_NUMBER_STDERR(ELF32_R_TYPE((RELP)->r_info), 1); \ -+ SEND_STDERR("REL, SYMBOL, LOAD: "); \ -+ SEND_ADDRESS_STDERR(REL, 0); \ -+ SEND_STDERR(", "); \ -+ SEND_ADDRESS_STDERR(SYMBOL, 0); \ -+ SEND_STDERR(", "); \ -+ SEND_ADDRESS_STDERR(LOAD, 1); \ -+ _dl_exit(1); \ -+ } -+ -+ -+/* -+ * Transfer control to the user's application, once the dynamic loader -+ * is done. This routine has to exit the current function, then -+ * call the _dl_elf_main function. -+ */ -+ -+#define START() return _dl_elf_main; -+ -+ -+ -+/* Here we define the magic numbers that this dynamic loader should accept */ -+ -+#define MAGIC1 EM_SH -+#undef MAGIC2 -+/* Used for error messages */ -+#define ELF_TARGET "sh" -+ -+struct elf_resolve; -+extern unsigned long _dl_linux_resolver(struct elf_resolve * tpnt, int reloc_entry); -+ -+static __inline__ unsigned int -+_dl_urem(unsigned int n, unsigned int base) -+{ -+ int res; -+ -+ __asm__ (""\ -+ "mov #0, r0\n\t" \ -+ "div0u\n\t" \ -+ "" \ -+ "! get one bit from the msb of the numerator into the T\n\t" \ -+ "! bit and divide it by whats in %2. Put the answer bit\n\t" \ -+ "! into the T bit so it can come out again at the bottom\n\t" \ -+ "" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1 ; div1 %2, r0\n\t" \ -+ "rotcl %1\n\t" -+ : "=r" (res) -+ : "0" (n), "r" (base) -+ : "r0","cc"); -+ -+ return n - (base * res); -+} -+ -+#define do_rem(result, n, base) ((result) = _dl_urem((n), (base))) -+ -+/* 4096 bytes alignment */ -+#define PAGE_ALIGN 0xfffff000 -+#define ADDR_ALIGN 0xfff -+#define OFFS_ALIGN 0x7ffff000 -diff -urN uClibc/ldso-0.9.24/ldso/sh/resolve.S uClibc.ldso.24/ldso-0.9.24/ldso/sh/resolve.S ---- uClibc/ldso-0.9.24/ldso/sh/resolve.S 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/sh/resolve.S 2002-11-07 20:18:16.000000000 -0600 -@@ -0,0 +1,91 @@ -+/* -+ * Stolen from glibc-2.2.2 by Eddie C. Dost <ecd@atecom.com> -+ */ -+ -+ .text -+ .globl _dl_linux_resolver -+ .globl _dl_linux_resolve -+ .type _dl_linux_resolve, @function -+ .balign 16 -+_dl_linux_resolve: -+ mov.l r3, @-r15 -+ mov.l r4, @-r15 -+ mov.l r5, @-r15 -+ mov.l r6, @-r15 -+ mov.l r7, @-r15 -+ mov.l r12, @-r15 -+ movt r3 ! Save T flag -+ mov.l r3, @-r15 -+ -+#ifdef HAVE_FPU -+ sts.l fpscr, @-r15 -+ mov #8,r3 -+ swap.w r3, r3 -+ lds r3, fpscr -+ fmov.s fr11, @-r15 -+ fmov.s fr10, @-r15 -+ fmov.s fr9, @-r15 -+ fmov.s fr8, @-r15 -+ fmov.s fr7, @-r15 -+ fmov.s fr6, @-r15 -+ fmov.s fr5, @-r15 -+ fmov.s fr4, @-r15 -+#endif -+ sts.l pr, @-r15 -+/* Note - The PLT entries have been "optimised" not to use r2. r2 is used by -+ GCC to return the address of large structures, so it should not be -+ corrupted here. This does mean however, that those PLTs does not conform -+ to the SH PIC ABI. That spec says that r0 contains the type of the PLT -+ and r2 contains the GOT id. The GNU Plt version stores the GOT id in r0 and -+ ignores the type. We can easily detect this difference however, -+ since the type will always be 0 or 8, and the GOT ids will always be -+ greater than or equal to 12. -+ -+ Found in binutils/bfd/elf32-sh.c by Stefan Allius <allius@atecom.com> -+ */ -+ mov #8 ,r5 -+ cmp/gt r5, r0 -+ bt 1f -+ mov r2, r0 ! link map address in r2 (SH PIC ABI) -+1: -+ mov r0, r4 ! link map address in r0 (GNUs PLT) -+ mova .LG, r0 -+ mov.l .LG, r5 -+ add r5, r0 -+ mov.l 3f, r5 -+ mov.l @(r0, r5),r5 -+ jsr @r5 -+ mov r1, r5 ! Reloc offset -+ -+ lds.l @r15+, pr ! Get register content back -+ -+#ifdef HAVE_FPU -+ fmov.s @r15+, fr4 -+ fmov.s @r15+, fr5 -+ fmov.s @r15+, fr6 -+ fmov.s @r15+, fr7 -+ fmov.s @r15+, fr8 -+ fmov.s @r15+, fr9 -+ fmov.s @r15+, fr10 -+ fmov.s @r15+, fr11 -+ lds.l @r15+, fpscr -+#endif -+ -+ mov.l @r15+, r3 -+ shal r3 ! Load T flag -+ mov.l @r15+, r12 -+ mov.l @r15+, r7 -+ mov.l @r15+, r6 -+ mov.l @r15+, r5 -+ mov.l @r15+, r4 -+ jmp @r0 ! Jump to function address -+ mov.l @r15+, r3 -+ -+ .balign 4 -+ -+3: -+ .long _dl_linux_resolver@GOT -+.LG: -+ .long _GLOBAL_OFFSET_TABLE_ -+ .size _dl_linux_resolve, . - _dl_linux_resolve -+ -diff -urN uClibc/ldso-0.9.24/ldso/sparc/boot1_arch.h uClibc.ldso.24/ldso-0.9.24/ldso/sparc/boot1_arch.h ---- uClibc/ldso-0.9.24/ldso/sparc/boot1_arch.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/sparc/boot1_arch.h 2002-08-08 09:35:49.000000000 -0500 -@@ -0,0 +1,7 @@ -+/* Any assmbly language/system dependent hacks needed to setup boot1.c so it -+ * will work as expected and cope with whatever platform specific wierdness is -+ * needed for this architecture. See arm/boot1_arch.h for an example of what -+ * can be done. -+ */ -+ -+#define LD_BOOT(X) void _dl_boot (X) -diff -urN uClibc/ldso-0.9.24/ldso/sparc/elfinterp.c uClibc.ldso.24/ldso-0.9.24/ldso/sparc/elfinterp.c ---- uClibc/ldso-0.9.24/ldso/sparc/elfinterp.c 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/sparc/elfinterp.c 2002-11-05 12:21:12.000000000 -0600 -@@ -0,0 +1,357 @@ -+/* vi: set sw=4 ts=4: */ -+/* sparc ELF shared library loader suppport -+ * -+ * Copyright (c) 1994-2000 Eric Youngdale, Peter MacDonald, -+ * David Engel, Hongjiu Lu and Mitch D'Souza -+ * -+ * 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. The name of the above contributors may not be -+ * used to endorse or promote products derived from this software -+ * without specific prior written permission. -+ * -+ * THIS SOFTWARE IS PROVIDED BY THE 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 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. -+ */ -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+static const char * _dl_reltypes[] = { "R_SPARC_NONE", "R_SPARC_8", -+ "R_SPARC_16", "R_SPARC_32", "R_SPARC_DISP8", "R_SPARC_DISP16", -+ "R_SPARC_DISP32", "R_SPARC_WDISP30", "R_SPARC_WDISP22", -+ "R_SPARC_HI22", "R_SPARC_22", "R_SPARC_13", "R_SPARC_LO10", -+ "R_SPARC_GOT10", "R_SPARC_GOT13", "R_SPARC_GOT22", "R_SPARC_PC10", -+ "R_SPARC_PC22", "R_SPARC_WPLT30", "R_SPARC_COPY", -+ "R_SPARC_GLOB_DAT", "R_SPARC_JMP_SLOT", "R_SPARC_RELATIVE", -+ "R_SPARC_UA32"}; -+#endif -+ -+/* Program to load an ELF binary on a linux system, and run it. -+References to symbols in sharable libraries can be resolved by either -+an ELF sharable library or a linux style of shared library. */ -+ -+/* Disclaimer: I have never seen any AT&T source code for SVr4, nor have -+ I ever taken any courses on internals. This program was developed using -+ information available through the book "UNIX SYSTEM V RELEASE 4, -+ Programmers guide: Ansi C and Programming Support Tools", which did -+ a more than adequate job of explaining everything required to get this -+ working. */ -+ -+extern _dl_linux_resolve(void); -+ -+unsigned int _dl_linux_resolver(unsigned int reloc_entry, unsigned int * plt) -+{ -+ int reloc_type; -+ Elf32_Rela * this_reloc; -+ char * strtab; -+ Elf32_Sym * symtab; -+ Elf32_Rela * rel_addr; -+ struct elf_resolve * tpnt; -+ int symtab_index; -+ char * new_addr; -+ char ** got_addr; -+ unsigned int instr_addr; -+ tpnt = (struct elf_resolve *) plt[2]; -+ -+ rel_addr = (Elf32_Rela *) (tpnt->dynamic_info[DT_JMPREL] + -+ tpnt->loadaddr); -+ -+ /* -+ * Generate the correct relocation index into the .rela.plt section. -+ */ -+ reloc_entry = (reloc_entry >> 12) - 0xc; -+ -+ this_reloc = (Elf32_Rela *) ((char *) rel_addr + reloc_entry); -+ -+ reloc_type = ELF32_R_TYPE(this_reloc->r_info); -+ symtab_index = ELF32_R_SYM(this_reloc->r_info); -+ -+ symtab = (Elf32_Sym *) (tpnt->dynamic_info[DT_SYMTAB] + tpnt->loadaddr); -+ strtab = (char *) (tpnt->dynamic_info[DT_STRTAB] + tpnt->loadaddr); -+ -+ _dl_dprintf(2, "tpnt = %x\n", tpnt); -+ _dl_dprintf(2, "reloc = %x\n", this_reloc); -+ _dl_dprintf(2, "symtab = %x\n", symtab); -+ _dl_dprintf(2, "strtab = %x\n", strtab); -+ -+ -+ if (reloc_type != R_SPARC_JMP_SLOT) { -+ _dl_dprintf(2, "%s: incorrect relocation type in jump relocations (%d)\n", -+ _dl_progname, reloc_type); -+ _dl_exit(30); -+ }; -+ -+ /* Address of jump instruction to fix up */ -+ instr_addr = ((int)this_reloc->r_offset + (int)tpnt->loadaddr); -+ got_addr = (char **) instr_addr; -+ -+ _dl_dprintf(2, "symtab_index %d\n", symtab_index); -+ -+#ifdef __SUPPORT_LD_DEBUG__ -+ if (_dl_debug_symbols) { -+ _dl_dprintf(2, "Resolving symbol %s\n", -+ strtab + symtab[symtab_index].st_name); -+ } -+#endif -+ -+ /* Get the address of the GOT entry */ -+ new_addr = _dl_find_hash(strtab + symtab[symtab_index].st_name, -+ tpnt->symbol_scope, tpnt, resolver); -+ if(!new_addr) { -+ _dl_dprintf(2, "%s: can't resolve symbol '%s'\n", -+ _dl_progname, strtab + symtab[symtab_index].st_name); -+ _dl_exit(31); -+ }; -+ -+#if defined (__SUPPORT_LD_DEBUG__) -+ if ((unsigned long) got_addr < 0x40000000) -+ { -+ if (_dl_debug_bindings) -+ { -+ _dl_dprintf(_dl_debug_file, "\nresolve function: %s", -+ strtab + symtab[symtab_index].st_name); -+ if(_dl_debug_detail) _dl_dprintf(_dl_debug_file, -+ "\tpatch %x ==> %x @ %x", *got_addr, new_addr, got_addr); -+ } -+ } -+ if (!_dl_debug_nofixups) { -+ got_addr[1] = (char *) (0x03000000 | (((unsigned int) new_addr >> 10) & 0x3fffff)); -+ got_addr[2] = (char *) (0x81c06000 | ((unsigned int) new_addr & 0x3ff)); -+ } -+#else -+ got_addr[1] = (char *) (0x03000000 | (((unsigned int) new_addr >> 10) & 0x3fffff)); -+ got_addr[2] = (char *) (0x81c06000 | ((unsigned int) new_addr & 0x3ff)); -+#endif -+ -+ _dl_dprintf(2, "Address = %x\n",new_addr); -+ _dl_exit(32); -+ -+ return (unsigned int) new_addr; -+} -+ -+void _dl_parse_lazy_relocation_information(struct elf_resolve * tpnt, int rel_addr, -+ int rel_size, int type){ -+ int i; -+ char * strtab; -+ int reloc_type; -+ int symtab_index; -+ Elf32_Sym * symtab; -+ Elf32_Rela * rpnt; -+ unsigned int * reloc_addr; -+ -+ /* Now parse the relocation information */ -+ rpnt = (Elf32_Rela *) (rel_addr + tpnt->loadaddr); -+ -+ symtab = (Elf32_Sym *) (tpnt->dynamic_info[DT_SYMTAB] + tpnt->loadaddr); -+ strtab = ( char *) (tpnt->dynamic_info[DT_STRTAB] + tpnt->loadaddr); -+ -+ for(i=0; i< rel_size; i += sizeof(Elf32_Rela), rpnt++){ -+ reloc_addr = (int *) (tpnt->loadaddr + (int)rpnt->r_offset); -+ reloc_type = ELF32_R_TYPE(rpnt->r_info); -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ -+ /* When the dynamic linker bootstrapped itself, it resolved some symbols. -+ Make sure we do not do them again */ -+ if(!symtab_index && tpnt->libtype == program_interpreter) continue; -+ if(symtab_index && tpnt->libtype == program_interpreter && -+ _dl_symbol(strtab + symtab[symtab_index].st_name)) -+ continue; -+ -+ switch(reloc_type){ -+ case R_SPARC_NONE: -+ break; -+ case R_SPARC_JMP_SLOT: -+ break; -+ default: -+ _dl_dprintf(2, "%s: (LAZY) can't handle reloc type ", _dl_progname); -+#if defined (__SUPPORT_LD_DEBUG__) -+ _dl_dprintf(2, "%s ", _dl_reltypes[reloc_type]); -+#endif -+ if(symtab_index) _dl_dprintf(2, "'%s'\n", -+ strtab + symtab[symtab_index].st_name); -+ _dl_exit(33); -+ }; -+ }; -+} -+ -+int _dl_parse_relocation_information(struct elf_resolve * tpnt, int rel_addr, -+ int rel_size, int type){ -+ int i; -+ char * strtab; -+ int reloc_type; -+ int goof = 0; -+ Elf32_Sym * symtab; -+ Elf32_Rela * rpnt; -+ unsigned int * reloc_addr; -+ unsigned int symbol_addr; -+ int symtab_index; -+ /* Now parse the relocation information */ -+ -+ rpnt = (Elf32_Rela *) (rel_addr + tpnt->loadaddr); -+ -+ symtab = (Elf32_Sym *) (tpnt->dynamic_info[DT_SYMTAB] + tpnt->loadaddr); -+ strtab = ( char *) (tpnt->dynamic_info[DT_STRTAB] + tpnt->loadaddr); -+ -+ for(i=0; i< rel_size; i+= sizeof(Elf32_Rela), rpnt++){ -+ reloc_addr = (int *) (tpnt->loadaddr + (int)rpnt->r_offset); -+ reloc_type = ELF32_R_TYPE(rpnt->r_info); -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ symbol_addr = 0; -+ -+ if(!symtab_index && tpnt->libtype == program_interpreter) continue; -+ -+ if(symtab_index) { -+ -+ if(tpnt->libtype == program_interpreter && -+ _dl_symbol(strtab + symtab[symtab_index].st_name)) -+ continue; -+ -+ symbol_addr = (unsigned int) -+ _dl_find_hash(strtab + symtab[symtab_index].st_name, -+ tpnt->symbol_scope, -+ (reloc_type == R_SPARC_JMP_SLOT ? tpnt : NULL), symbolrel); -+ -+ if(!symbol_addr && -+ ELF32_ST_BIND(symtab [symtab_index].st_info) == STB_GLOBAL) { -+ _dl_dprintf(2, "%s: can't resolve symbol '%s'\n", -+ _dl_progname, strtab + symtab[symtab_index].st_name); -+ goof++; -+ }; -+ }; -+ switch(reloc_type){ -+ case R_SPARC_NONE: -+ break; -+ case R_SPARC_32: -+ *reloc_addr = symbol_addr + rpnt->r_addend; -+ break; -+ case R_SPARC_DISP32: -+ *reloc_addr = symbol_addr + rpnt->r_addend - (unsigned int) reloc_addr; -+ break; -+ case R_SPARC_GLOB_DAT: -+ *reloc_addr = symbol_addr + rpnt->r_addend; -+ break; -+ case R_SPARC_JMP_SLOT: -+ reloc_addr[1] = 0x03000000 | ((symbol_addr >> 10) & 0x3fffff); -+ reloc_addr[2] = 0x81c06000 | (symbol_addr & 0x3ff); -+ break; -+ case R_SPARC_RELATIVE: -+ *reloc_addr += (unsigned int) tpnt->loadaddr + rpnt->r_addend; -+ break; -+ case R_SPARC_HI22: -+ if (!symbol_addr) -+ symbol_addr = tpnt->loadaddr + rpnt->r_addend; -+ else -+ symbol_addr += rpnt->r_addend; -+ *reloc_addr = (*reloc_addr & 0xffc00000)|(symbol_addr >> 10); -+ break; -+ case R_SPARC_LO10: -+ if (!symbol_addr) -+ symbol_addr = tpnt->loadaddr + rpnt->r_addend; -+ else -+ symbol_addr += rpnt->r_addend; -+ *reloc_addr = (*reloc_addr & ~0x3ff)|(symbol_addr & 0x3ff); -+ break; -+ case R_SPARC_WDISP30: -+ *reloc_addr = (*reloc_addr & 0xc0000000)| -+ ((symbol_addr - (unsigned int) reloc_addr) >> 2); -+ break; -+ case R_SPARC_COPY: -+#if 0 /* This one is done later */ -+ _dl_dprintf(2, "Doing copy for symbol "); -+ if(symtab_index) _dl_dprintf(2, strtab + symtab[symtab_index].st_name); -+ _dl_dprintf(2, "\n"); -+ _dl_memcpy((void *) symtab[symtab_index].st_value, -+ (void *) symbol_addr, -+ symtab[symtab_index].st_size); -+#endif -+ break; -+ default: -+ _dl_dprintf(2, "%s: can't handle reloc type ", _dl_progname); -+#if defined (__SUPPORT_LD_DEBUG__) -+ _dl_dprintf(2, "%s ", _dl_reltypes[reloc_type]); -+#endif -+ if (symtab_index) -+ _dl_dprintf(2, "'%s'\n", strtab + symtab[symtab_index].st_name); -+ _dl_exit(34); -+ }; -+ -+ }; -+ return goof; -+} -+ -+ -+/* This is done as a separate step, because there are cases where -+ information is first copied and later initialized. This results in -+ the wrong information being copied. Someone at Sun was complaining about -+ a bug in the handling of _COPY by SVr4, and this may in fact be what he -+ was talking about. Sigh. */ -+ -+/* No, there are cases where the SVr4 linker fails to emit COPY relocs -+ at all */ -+ -+int _dl_parse_copy_information(struct dyn_elf * xpnt, int rel_addr, -+ int rel_size, int type) -+{ -+ int i; -+ char * strtab; -+ int reloc_type; -+ int goof = 0; -+ Elf32_Sym * symtab; -+ Elf32_Rela * rpnt; -+ unsigned int * reloc_addr; -+ unsigned int symbol_addr; -+ struct elf_resolve *tpnt; -+ int symtab_index; -+ /* Now parse the relocation information */ -+ -+ tpnt = xpnt->dyn; -+ -+ rpnt = (Elf32_Rela *) (rel_addr + tpnt->loadaddr); -+ -+ symtab = (Elf32_Sym *) (tpnt->dynamic_info[DT_SYMTAB] + tpnt->loadaddr); -+ strtab = ( char *) (tpnt->dynamic_info[DT_STRTAB] + tpnt->loadaddr); -+ -+ for(i=0; i< rel_size; i+= sizeof(Elf32_Rela), rpnt++){ -+ reloc_addr = (int *) (tpnt->loadaddr + (int)rpnt->r_offset); -+ reloc_type = ELF32_R_TYPE(rpnt->r_info); -+ if(reloc_type != R_SPARC_COPY) continue; -+ symtab_index = ELF32_R_SYM(rpnt->r_info); -+ symbol_addr = 0; -+ if(!symtab_index && tpnt->libtype == program_interpreter) continue; -+ if(symtab_index) { -+ -+ if(tpnt->libtype == program_interpreter && -+ _dl_symbol(strtab + symtab[symtab_index].st_name)) -+ continue; -+ -+ symbol_addr = (unsigned int) -+ _dl_find_hash(strtab + symtab[symtab_index].st_name, -+ xpnt->next, NULL, copyrel); -+ if(!symbol_addr) { -+ _dl_dprintf(2, "%s: can't resolve symbol '%s'\n", -+ _dl_progname, strtab + symtab[symtab_index].st_name); -+ goof++; -+ }; -+ }; -+ if (!goof) -+ _dl_memcpy((char *) symtab[symtab_index].st_value, -+ (char *) symbol_addr, -+ symtab[symtab_index].st_size); -+ }; -+ return goof; -+} -+ -+ -diff -urN uClibc/ldso-0.9.24/ldso/sparc/ld_syscalls.h uClibc.ldso.24/ldso-0.9.24/ldso/sparc/ld_syscalls.h ---- uClibc/ldso-0.9.24/ldso/sparc/ld_syscalls.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/sparc/ld_syscalls.h 2002-03-19 04:43:35.000000000 -0600 -@@ -0,0 +1,155 @@ -+/* -+ * This file contains the system call macros and syscall -+ * numbers used by the shared library loader. -+ */ -+ -+#define __NR_exit 1 -+#define __NR_read 3 -+#define __NR_write 4 -+#define __NR_open 5 -+#define __NR_close 6 -+#define __NR_getuid 24 -+#define __NR_getgid 47 -+#define __NR_geteuid 49 -+#define __NR_getegid 50 -+#define __NR_readlink 58 -+#define __NR_mmap 71 -+#define __NR_munmap 73 -+#define __NR_stat 38 -+#define __NR_mprotect 74 -+ -+/* Here are the macros which define how this platform makes -+ * system calls. This particular variant does _not_ set -+ * errno (note how it is disabled in __syscall_return) since -+ * these will get called before the errno symbol is dynamicly -+ * linked. */ -+ -+#define _syscall0(type,name) \ -+type name(void) \ -+{ \ -+long __res; \ -+register long __g1 __asm__ ("g1") = __NR_##name; \ -+__asm__ __volatile__ ("t 0x10\n\t" \ -+ "bcc 1f\n\t" \ -+ "mov %%o0, %0\n\t" \ -+ "sub %%g0, %%o0, %0\n\t" \ -+ "1:\n\t" \ -+ : "=r" (__res)\ -+ : "r" (__g1) \ -+ : "o0", "cc"); \ -+if (__res < -255 || __res >= 0) \ -+ return (type) __res; \ -+/*errno = -__res; */\ -+return -1; \ -+} -+ -+#define _syscall1(type,name,type1,arg1) \ -+type name(type1 arg1) \ -+{ \ -+long __res; \ -+register long __g1 __asm__ ("g1") = __NR_##name; \ -+register long __o0 __asm__ ("o0") = (long)(arg1); \ -+__asm__ __volatile__ ("t 0x10\n\t" \ -+ "bcc 1f\n\t" \ -+ "mov %%o0, %0\n\t" \ -+ "sub %%g0, %%o0, %0\n\t" \ -+ "1:\n\t" \ -+ : "=r" (__res), "=&r" (__o0) \ -+ : "1" (__o0), "r" (__g1) \ -+ : "cc"); \ -+if (__res < -255 || __res >= 0) \ -+ return (type) __res; \ -+/*errno = -__res;*/ \ -+return -1; \ -+} -+ -+#define _syscall2(type,name,type1,arg1,type2,arg2) \ -+type name(type1 arg1,type2 arg2) \ -+{ \ -+long __res; \ -+register long __g1 __asm__ ("g1") = __NR_##name; \ -+register long __o0 __asm__ ("o0") = (long)(arg1); \ -+register long __o1 __asm__ ("o1") = (long)(arg2); \ -+__asm__ __volatile__ ("t 0x10\n\t" \ -+ "bcc 1f\n\t" \ -+ "mov %%o0, %0\n\t" \ -+ "sub %%g0, %%o0, %0\n\t" \ -+ "1:\n\t" \ -+ : "=r" (__res), "=&r" (__o0) \ -+ : "1" (__o0), "r" (__o1), "r" (__g1) \ -+ : "cc"); \ -+if (__res < -255 || __res >= 0) \ -+ return (type) __res; \ -+/*errno = -__res;*/ \ -+return -1; \ -+} -+ -+#define _syscall3(type,name,type1,arg1,type2,arg2,type3,arg3) \ -+type name(type1 arg1,type2 arg2,type3 arg3) \ -+{ \ -+long __res; \ -+register long __g1 __asm__ ("g1") = __NR_##name; \ -+register long __o0 __asm__ ("o0") = (long)(arg1); \ -+register long __o1 __asm__ ("o1") = (long)(arg2); \ -+register long __o2 __asm__ ("o2") = (long)(arg3); \ -+__asm__ __volatile__ ("t 0x10\n\t" \ -+ "bcc 1f\n\t" \ -+ "mov %%o0, %0\n\t" \ -+ "sub %%g0, %%o0, %0\n\t" \ -+ "1:\n\t" \ -+ : "=r" (__res), "=&r" (__o0) \ -+ : "1" (__o0), "r" (__o1), "r" (__o2), "r" (__g1) \ -+ : "cc"); \ -+if (__res < -255 || __res>=0) \ -+ return (type) __res; \ -+/*errno = -__res;*/ \ -+return -1; \ -+} -+ -+#define _syscall4(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4) \ -+type name (type1 arg1, type2 arg2, type3 arg3, type4 arg4) \ -+{ \ -+long __res; \ -+register long __g1 __asm__ ("g1") = __NR_##name; \ -+register long __o0 __asm__ ("o0") = (long)(arg1); \ -+register long __o1 __asm__ ("o1") = (long)(arg2); \ -+register long __o2 __asm__ ("o2") = (long)(arg3); \ -+register long __o3 __asm__ ("o3") = (long)(arg4); \ -+__asm__ __volatile__ ("t 0x10\n\t" \ -+ "bcc 1f\n\t" \ -+ "mov %%o0, %0\n\t" \ -+ "sub %%g0, %%o0, %0\n\t" \ -+ "1:\n\t" \ -+ : "=r" (__res), "=&r" (__o0) \ -+ : "1" (__o0), "r" (__o1), "r" (__o2), "r" (__o3), "r" (__g1) \ -+ : "cc"); \ -+if (__res < -255 || __res>=0) \ -+ return (type) __res; \ -+/*errno = -__res;*/ \ -+return -1; \ -+} -+ -+#define _syscall5(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4, \ -+ type5,arg5) \ -+type name (type1 arg1,type2 arg2,type3 arg3,type4 arg4,type5 arg5) \ -+{ \ -+long __res; \ -+register long __g1 __asm__ ("g1") = __NR_##name; \ -+register long __o0 __asm__ ("o0") = (long)(arg1); \ -+register long __o1 __asm__ ("o1") = (long)(arg2); \ -+register long __o2 __asm__ ("o2") = (long)(arg3); \ -+register long __o3 __asm__ ("o3") = (long)(arg4); \ -+register long __o4 __asm__ ("o4") = (long)(arg5); \ -+__asm__ __volatile__ ("t 0x10\n\t" \ -+ "bcc 1f\n\t" \ -+ "mov %%o0, %0\n\t" \ -+ "sub %%g0, %%o0, %0\n\t" \ -+ "1:\n\t" \ -+ : "=r" (__res), "=&r" (__o0) \ -+ : "1" (__o0), "r" (__o1), "r" (__o2), "r" (__o3), "r" (__o4), "r" (__g1) \ -+ : "cc"); \ -+if (__res < -255 || __res>=0) \ -+ return (type) __res; \ -+/*errno = -__res; */\ -+return -1; \ -+} -diff -urN uClibc/ldso-0.9.24/ldso/sparc/ld_sysdep.h uClibc.ldso.24/ldso-0.9.24/ldso/sparc/ld_sysdep.h ---- uClibc/ldso-0.9.24/ldso/sparc/ld_sysdep.h 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/sparc/ld_sysdep.h 2002-08-09 08:05:29.000000000 -0500 -@@ -0,0 +1,112 @@ -+ -+/* -+ * Various assmbly language/system dependent hacks that are required -+ * so that we can minimize the amount of platform specific code. -+ */ -+#define LINUXBIN -+ -+/* -+ * Define this if the system uses RELOCA. -+ */ -+#define ELF_USES_RELOCA -+ -+/* -+ * Get a pointer to the argv array. On many platforms this can be just -+ * the address if the first argument, on other platforms we need to -+ * do something a little more subtle here. We assume that argc is stored -+ * at the word just below the argvp that we return here. -+ */ -+#define GET_ARGV(ARGVP, ARGS) __asm__("\tadd %%fp,68,%0\n" : "=r" (ARGVP)); -+ -+/* -+ * Initialization sequence for a GOT. For the Sparc, this points to the -+ * PLT, and we need to initialize a couple of the slots. The PLT should -+ * look like: -+ * -+ * save %sp, -64, %sp -+ * call _dl_linux_resolve -+ * nop -+ * .word implementation_dependent -+ */ -+#define INIT_GOT(GOT_BASE,MODULE) \ -+{ \ -+ GOT_BASE[0] = 0x9de3bfc0; /* save %sp, -64, %sp */ \ -+ GOT_BASE[1] = 0x40000000 | (((unsigned int) _dl_linux_resolve - (unsigned int) GOT_BASE - 4) >> 2); \ -+ GOT_BASE[2] = 0x01000000; /* nop */ \ -+ GOT_BASE[3] = (int) MODULE; \ -+} -+ -+/* -+ * Here is a macro to perform a relocation. This is only used when -+ * bootstrapping the dynamic loader. -+ */ -+#define PERFORM_BOOTSTRAP_RELOC(RELP,REL,SYMBOL,LOAD) \ -+ switch(ELF32_R_TYPE((RELP)->r_info)) { \ -+ case R_SPARC_32: \ -+ *REL = SYMBOL + (RELP)->r_addend; \ -+ break; \ -+ case R_SPARC_GLOB_DAT: \ -+ *REL = SYMBOL + (RELP)->r_addend; \ -+ break; \ -+ case R_SPARC_JMP_SLOT: \ -+ REL[1] = 0x03000000 | ((SYMBOL >> 10) & 0x3fffff); \ -+ REL[2] = 0x81c06000 | (SYMBOL & 0x3ff); \ -+ break; \ -+ case R_SPARC_NONE: \ -+ break; \ -+ case R_SPARC_WDISP30: \ -+ break; \ -+ case R_SPARC_RELATIVE: \ -+ *REL += (unsigned int) LOAD + (RELP)->r_addend; \ -+ break; \ -+ default: \ -+ _dl_exit(1); \ -+ } -+ -+ -+/* -+ * Transfer control to the user's application, once the dynamic loader -+ * is done. The crt calls atexit with $g1 if not null, so we need to -+ * ensure that it contains NULL. -+ */ -+ -+#define START() \ -+ __asm__ volatile ( \ -+ "add %%g0,%%g0,%%g1\n\t" \ -+ "jmpl %0, %%o7\n\t" \ -+ "restore %%g0,%%g0,%%g0\n\t" \ -+ : /*"=r" (status) */ : \ -+ "r" (_dl_elf_main): "g1", "o0", "o1") -+ -+ -+ -+/* Here we define the magic numbers that this dynamic loader should accept */ -+ -+#define MAGIC1 EM_SPARC -+#undef MAGIC2 -+/* Used for error messages */ -+#define ELF_TARGET "Sparc" -+ -+#ifndef COMPILE_ASM -+extern unsigned int _dl_linux_resolver(unsigned int reloc_entry, -+ unsigned int * i); -+#endif -+ -+/* -+ * Define this if you want a dynamic loader that works on Solaris. -+ */ -+#define SOLARIS_COMPATIBLE -+ -+#define do_rem(result, n, base) result = (n % base) -+ -+/* -+ * dbx wants the binder to have a specific name. Mustn't disappoint it. -+ */ -+#ifdef SOLARIS_COMPATIBLE -+#define _dl_linux_resolve _elf_rtbndr -+#endif -+ -+/* 4096 bytes alignment */ -+#define PAGE_ALIGN 0xfffff000 -+#define ADDR_ALIGN 0xfff -+#define OFFS_ALIGN 0x7ffff000 -diff -urN uClibc/ldso-0.9.24/ldso/sparc/resolve.S uClibc.ldso.24/ldso-0.9.24/ldso/sparc/resolve.S ---- uClibc/ldso-0.9.24/ldso/sparc/resolve.S 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/ldso/sparc/resolve.S 2002-01-11 13:57:41.000000000 -0600 -@@ -0,0 +1,25 @@ -+/* -+ * These are various helper routines that are needed to run an ELF image. -+ */ -+#define COMPILE_ASM -+#include "ld_sysdep.h" -+ -+.text -+ .align 16 -+ -+.globl _dl_linux_resolve -+_dl_linux_resolve: -+ /* -+ * Call the resolver - pass the address of the PLT so that we can -+ * figure out which module we are in. -+ */ -+ mov %o7,%o1 -+ call _dl_linux_resolver -+ mov %g1,%o0 -+ -+ jmpl %o0,%o7 -+ restore -+.LFE2: -+ -+ .type _dl_linux_resolve,#function -+ .size _dl_linux_resolve,.LFE2-_dl_linux_resolve -diff -urN uClibc/ldso-0.9.24/libdl/.cvsignore uClibc.ldso.24/ldso-0.9.24/libdl/.cvsignore ---- uClibc/ldso-0.9.24/libdl/.cvsignore 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/libdl/.cvsignore 2001-04-26 11:12:47.000000000 -0500 -@@ -0,0 +1,2 @@ -+libdl.so* -+ -diff -urN uClibc/ldso-0.9.24/libdl/Makefile uClibc.ldso.24/ldso-0.9.24/libdl/Makefile ---- uClibc/ldso-0.9.24/libdl/Makefile 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/libdl/Makefile 2004-03-01 03:05:53.000000000 -0600 -@@ -0,0 +1,86 @@ -+# Makefile for uClibc -+# -+# Copyright (C) 2000 by Lineo, inc. -+# Copyright (C) 2000-2002 Erik Andersen <andersen@uclibc.org> -+# -+# This program is free software; you can redistribute it and/or modify it under -+# the terms of the GNU Library General Public License as published by the Free -+# Software Foundation; either version 2 of the License, or (at your option) any -+# later version. -+# -+# This program is distributed in the hope that it will be useful, but WITHOUT -+# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS -+# FOR A PARTICULAR PURPOSE. See the GNU Library General Public License for more -+# details. -+# -+# You should have received a copy of the GNU Library General Public License -+# along with this program; if not, write to the Free Software Foundation, Inc., -+# 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA -+ -+ -+TOPDIR=../../ -+include $(TOPDIR)Rules.mak -+ -+XXFLAGS=$(XWARNINGS) $(OPTIMIZATION) $(XARCH_CFLAGS) $(CPU_CFLAGS) \ -+ -DUCLIBC_RUNTIME_PREFIX=\"$(RUNTIME_PREFIX)\" \ -+ -fno-builtin -nostdinc -D_LIBC -I$(TOPDIR)ldso-0.9.24/include -I. -I$(TOPDIR)include -+ -+ifeq ($(DODEBUG),y) -+XXFLAGS=$(XWARNINGS) -O0 -g3 $(XARCH_CFLAGS) $(CPU_CFLAGS) \ -+ -DUCLIBC_RUNTIME_PREFIX=\"$(RUNTIME_PREFIX)\" \ -+ -fno-builtin -nostdinc -D_LIBC -I$(TOPDIR)ldso-0.9.24/include -I. -I$(TOPDIR)include -+endif -+ -+XXFLAGS+=$(shell $(CC) -print-search-dirs | sed -ne "s/install: *\(.*\)/-I\1include/gp") -+XXFLAGS_NOPIC:=$(XXFLAGS) -+ifeq ($(DOPIC),y) -+ XXFLAGS += $(PICFLAG) -D__LIBDL_SHARED__ -+endif -+ifeq ($(strip $(SUPPORT_LD_DEBUG)),y) -+XXFLAGS+=-D__SUPPORT_LD_DEBUG__ -+endif -+ -+LIBDL=libdl.a -+LIBDL_PIC=libdl_pic.a -+LIBDL_SHARED=libdl.so -+LIBDL_SHARED_FULLNAME=libdl-$(MAJOR_VERSION).$(MINOR_VERSION).$(SUBLEVEL).so -+ -+CSRC=dlib.c -+OBJS=dlib.o -+PIC_OBJS=dlib_pic.o -+ -+all: $(OBJS) $(LIBDL) shared -+ -+$(LIBDL): ar-target -+ -+ar-target: $(OBJS) $(PIC_OBJS) -+ $(AR) $(ARFLAGS) $(LIBDL) ../ldso/$(TARGET_ARCH)/resolve.o $(OBJS) -+ $(AR) $(ARFLAGS) $(LIBDL_PIC) $(PIC_OBJS) -+ $(INSTALL) -d $(TOPDIR)lib -+ $(RM) $(TOPDIR)lib/$(LIBDL) -+ $(INSTALL) -m 644 $(LIBDL) $(TOPDIR)lib -+ -+ -+dlib.o: dlib.c -+ $(CC) $(XXFLAGS_NOPIC) -c dlib.c -o dlib.o -+ $(STRIPTOOL) -x -R .note -R .comment $*.o -+ -+dlib_pic.o: dlib.c -+ $(CC) $(XXFLAGS) -c dlib.c -o dlib_pic.o -+ $(STRIPTOOL) -x -R .note -R .comment $*.o -+ -+$(OBJ): Makefile -+ -+shared: -+ $(LD) $(LDFLAGS) -soname=$(LIBDL_SHARED).$(MAJOR_VERSION) \ -+ -o $(LIBDL_SHARED_FULLNAME) --whole-archive $(LIBDL_PIC) \ -+ --no-whole-archive $(TOPDIR)/libc/misc/internals/interp.o \ -+ -L$(TOPDIR)/lib -lc $(LDADD_LIBFLOAT) $(LIBGCC); -+ $(INSTALL) -d $(TOPDIR)lib -+ $(RM) $(TOPDIR)lib/$(LIBDL_SHARED_FULLNAME) $(TOPDIR)lib/$(LIBDL_SHARED).$(MAJOR_VERSION) -+ $(INSTALL) -m 644 $(LIBDL_SHARED_FULLNAME) $(TOPDIR)lib -+ $(LN) -sf $(LIBDL_SHARED_FULLNAME) $(TOPDIR)lib/$(LIBDL_SHARED) -+ $(LN) -sf $(LIBDL_SHARED_FULLNAME) $(TOPDIR)lib/$(LIBDL_SHARED).$(MAJOR_VERSION) -+ -+clean: -+ $(RM) .depend $(LIBDL_SHARED)* $(LIBDL_SHARED_FULLNAME) core *.o *.a *.s *.i tmp_make foo *~ -diff -urN uClibc/ldso-0.9.24/libdl/dlib.c uClibc.ldso.24/ldso-0.9.24/libdl/dlib.c ---- uClibc/ldso-0.9.24/libdl/dlib.c 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/libdl/dlib.c 2004-03-01 03:04:42.000000000 -0600 -@@ -0,0 +1,664 @@ -+/* -+ * libdl.c -+ * -+ * Functions required for dlopen et. al. -+ */ -+ -+#include <ldso.h> -+ -+ -+/* The public interfaces */ -+void *dlopen(const char *, int) __attribute__ ((__weak__, __alias__ ("_dlopen"))); -+int dlclose(void *) __attribute__ ((__weak__, __alias__ ("_dlclose"))); -+void *dlsym(void *, const char *) __attribute__ ((__weak__, __alias__ ("_dlsym"))); -+const char *dlerror(void) __attribute__ ((__weak__, __alias__ ("_dlerror"))); -+int dladdr(void *, Dl_info *) __attribute__ ((__weak__, __alias__ ("_dladdr"))); -+void _dlinfo(void); -+ -+ -+#ifdef __LIBDL_SHARED__ -+/* This is a real hack. We need access to the dynamic linker, but we -+also need to make it possible to link against this library without any -+unresolved externals. We provide these weak symbols to make the link -+possible, but at run time the normal symbols are accessed. */ -+static void __attribute__ ((unused)) foobar(void) -+{ -+ const char msg[]="libdl library not correctly linked\n"; -+ _dl_write(2, msg, _dl_strlen(msg)); -+ _dl_exit(1); -+} -+ -+static int __attribute__ ((unused)) foobar1 = (int) foobar; /* Use as pointer */ -+extern void _dl_dprintf(int, const char *, ...) __attribute__ ((__weak__, __alias__ ("foobar"))); -+extern char *_dl_find_hash(const char *, struct dyn_elf *, struct elf_resolve *, enum caller_type) -+ __attribute__ ((__weak__, __alias__ ("foobar"))); -+extern struct elf_resolve * _dl_load_shared_library(int, struct dyn_elf **, struct elf_resolve *, char *) -+ __attribute__ ((__weak__, __alias__ ("foobar"))); -+extern struct elf_resolve * _dl_check_if_named_library_is_loaded(const char *full_libname) -+ __attribute__ ((__weak__, __alias__ ("foobar"))); -+extern int _dl_fixup(struct elf_resolve *tpnt, int lazy) -+ __attribute__ ((__weak__, __alias__ ("foobar"))); -+extern int _dl_copy_fixups(struct dyn_elf * tpnt) -+ __attribute__ ((__weak__, __alias__ ("foobar"))); -+#ifdef __mips__ -+extern void _dl_perform_mips_global_got_relocations(struct elf_resolve *tpnt) -+ __attribute__ ((__weak__, __alias__ ("foobar"))); -+#endif -+#ifdef USE_CACHE -+int _dl_map_cache(void) __attribute__ ((__weak__, __alias__ ("foobar"))); -+int _dl_unmap_cache(void) __attribute__ ((__weak__, __alias__ ("foobar"))); -+#endif -+ -+extern struct dyn_elf *_dl_symbol_tables __attribute__ ((__weak__, __alias__ ("foobar1"))); -+extern struct dyn_elf *_dl_handles __attribute__ ((__weak__, __alias__ ("foobar1"))); -+extern struct elf_resolve *_dl_loaded_modules __attribute__ ((__weak__, __alias__ ("foobar1"))); -+extern struct r_debug *_dl_debug_addr __attribute__ ((__weak__, __alias__ ("foobar1"))); -+extern unsigned long _dl_error_number __attribute__ ((__weak__, __alias__ ("foobar1"))); -+extern void *(*_dl_malloc_function)(size_t) __attribute__ ((__weak__, __alias__ ("foobar1"))); -+#ifdef __SUPPORT_LD_DEBUG__ -+extern char *_dl_debug __attribute__ ((__weak__, __alias__ ("foobar1"))); -+extern char *_dl_debug_symbols __attribute__ ((__weak__, __alias__ ("foobar1"))); -+extern char *_dl_debug_move __attribute__ ((__weak__, __alias__ ("foobar1"))); -+extern char *_dl_debug_reloc __attribute__ ((__weak__, __alias__ ("foobar1"))); -+extern char *_dl_debug_detail __attribute__ ((__weak__, __alias__ ("foobar1"))); -+extern char *_dl_debug_nofixups __attribute__ ((__weak__, __alias__ ("foobar1"))); -+extern char *_dl_debug_bindings __attribute__ ((__weak__, __alias__ ("foobar1"))); -+extern int _dl_debug_file __attribute__ ((__weak__, __alias__ ("foobar1"))); -+#endif -+ -+#else /* __LIBDL_SHARED__ */ -+ -+#ifdef __SUPPORT_LD_DEBUG__ -+char *_dl_debug = 0; -+char *_dl_debug_symbols = 0; -+char *_dl_debug_move = 0; -+char *_dl_debug_reloc = 0; -+char *_dl_debug_detail = 0; -+char *_dl_debug_nofixups = 0; -+char *_dl_debug_bindings = 0; -+int _dl_debug_file = 2; -+#endif -+char *_dl_library_path = 0; -+char *_dl_ldsopath = 0; -+struct r_debug *_dl_debug_addr = NULL; -+static char *_dl_malloc_addr, *_dl_mmap_zero; -+#include "../ldso/_dl_progname.h" /* Pull in the name of ld.so */ -+#include "../ldso/hash.c" -+#define _dl_trace_loaded_objects 0 -+#include "../ldso/readelflib1.c" -+void *(*_dl_malloc_function) (size_t size); -+int _dl_fixup(struct elf_resolve *tpnt, int lazy); -+#endif -+ -+static int do_dlclose(void *, int need_fini); -+ -+ -+static const char *dl_error_names[] = { -+ "", -+ "File not found", -+ "Unable to open /dev/zero", -+ "Not an ELF file", -+#if defined (__i386__) -+ "Not i386 binary", -+#elif defined (__sparc__) -+ "Not sparc binary", -+#elif defined (__mc68000__) -+ "Not m68k binary", -+#else -+ "Unrecognized binary type", -+#endif -+ "Not an ELF shared library", -+ "Unable to mmap file", -+ "No dynamic section", -+#ifdef ELF_USES_RELOCA -+ "Unable to process REL relocs", -+#else -+ "Unable to process RELA relocs", -+#endif -+ "Bad handle", -+ "Unable to resolve symbol" -+}; -+ -+static void __attribute__ ((destructor)) dl_cleanup(void) -+{ -+ struct dyn_elf *d; -+ -+ for (d = _dl_handles; d; d = d->next_handle) -+ if (d->dyn->libtype == loaded_file && d->dyn->dynamic_info[DT_FINI]) { -+ (* ((int (*)(void)) (d->dyn->loadaddr + d->dyn->dynamic_info[DT_FINI]))) (); -+ d->dyn->dynamic_info[DT_FINI] = 0; -+ } -+} -+ -+void *_dlopen(const char *libname, int flag) -+{ -+ struct elf_resolve *tpnt, *tfrom, *tcurr; -+ struct dyn_elf *dyn_chain, *rpnt = NULL; -+ struct dyn_elf *dpnt; -+ static int dl_init = 0; -+ ElfW(Addr) from; -+ struct elf_resolve *tpnt1; -+ void (*dl_brk) (void); -+ -+ /* A bit of sanity checking... */ -+ if (!(flag & (RTLD_LAZY|RTLD_NOW))) { -+ _dl_error_number = LD_BAD_HANDLE; -+ return NULL; -+ } -+ -+ from = (ElfW(Addr)) __builtin_return_address(0); -+ -+ /* Have the dynamic linker use the regular malloc function now */ -+ if (!dl_init) { -+ dl_init++; -+ _dl_malloc_function = malloc; -+ } -+ -+ /* Cover the trivial case first */ -+ if (!libname) -+ return _dl_symbol_tables; -+ -+ _dl_map_cache(); -+ -+ /* -+ * Try and locate the module we were called from - we -+ * need this so that we get the correct RPATH. Note that -+ * this is the current behavior under Solaris, but the -+ * ABI+ specifies that we should only use the RPATH from -+ * the application. Thus this may go away at some time -+ * in the future. -+ */ -+ tfrom = NULL; -+ for (dpnt = _dl_symbol_tables; dpnt; dpnt = dpnt->next) { -+ tpnt = dpnt->dyn; -+ if (tpnt->loadaddr < from -+ && (tfrom == NULL || tfrom->loadaddr < tpnt->loadaddr)) -+ tfrom = tpnt; -+ } -+ -+ /* Try to load the specified library */ -+#ifdef __SUPPORT_LD_DEBUG__ -+ if(_dl_debug) -+ _dl_dprintf(_dl_debug_file, "Trying to dlopen '%s'\n", (char*)libname); -+#endif -+ tpnt = _dl_load_shared_library(0, &rpnt, tfrom, (char*)libname); -+ if (tpnt == NULL) { -+ _dl_unmap_cache(); -+ return NULL; -+ } -+ -+ dyn_chain = (struct dyn_elf *) malloc(sizeof(struct dyn_elf)); -+ _dl_memset(dyn_chain, 0, sizeof(struct dyn_elf)); -+ dyn_chain->dyn = tpnt; -+ dyn_chain->flags = flag; -+ if (!tpnt->symbol_scope) -+ tpnt->symbol_scope = dyn_chain; -+ -+ dyn_chain->next_handle = _dl_handles; -+ _dl_handles = rpnt = dyn_chain; -+ -+ if (tpnt->init_flag & INIT_FUNCS_CALLED) { -+ /* If the init and fini stuff has already been run, that means -+ * the dlopen'd library has already been loaded, and nothing -+ * further needs to be done. */ -+ return (void *) dyn_chain; -+ } -+ -+ -+#ifdef __SUPPORT_LD_DEBUG__ -+ if(_dl_debug) -+ _dl_dprintf(_dl_debug_file, "Looking for needed libraries\n"); -+#endif -+ -+ for (tcurr = tpnt; tcurr; tcurr = tcurr->next) -+ { -+ Elf32_Dyn *dpnt; -+ char *lpntstr; -+ for (dpnt = (Elf32_Dyn *) tcurr->dynamic_addr; dpnt->d_tag; dpnt++) { -+ if (dpnt->d_tag == DT_NEEDED) { -+ -+ char *name; -+ lpntstr = (char*) (tcurr->loadaddr + tcurr->dynamic_info[DT_STRTAB] + -+ dpnt->d_un.d_val); -+ name = _dl_get_last_path_component(lpntstr); -+ -+#ifdef __SUPPORT_LD_DEBUG__ -+ if(_dl_debug) -+ _dl_dprintf(_dl_debug_file, "Trying to load '%s', needed by '%s'\n", -+ lpntstr, tcurr->libname); -+#endif -+ -+ if (!(tpnt1 = _dl_load_shared_library(0, &rpnt, tcurr, lpntstr))) { -+ goto oops; -+ } -+ -+#if 1 -+//FIXME: Enabling this is _so_ wrong.... -+ /* We need global symbol resolution for everything -+ * in the dependent chain */ -+ dyn_chain->flags |= RTLD_GLOBAL; -+#endif -+ -+ rpnt->next = (struct dyn_elf *) malloc(sizeof(struct dyn_elf)); -+ _dl_memset (rpnt->next, 0, sizeof (struct dyn_elf)); -+ rpnt = rpnt->next; -+ if (!tpnt1->symbol_scope) tpnt1->symbol_scope = rpnt; -+ rpnt->dyn = tpnt1; -+ -+ } -+ } -+ } -+ -+ /* -+ * OK, now attach the entire chain at the end -+ */ -+ rpnt->next = _dl_symbol_tables; -+ -+#ifdef __mips__ -+ /* -+ * Relocation of the GOT entries for MIPS have to be done -+ * after all the libraries have been loaded. -+ */ -+ _dl_perform_mips_global_got_relocations(tpnt); -+#endif -+ -+#ifdef __SUPPORT_LD_DEBUG__ -+ if(_dl_debug) -+ _dl_dprintf(_dl_debug_file, "Beginning dlopen relocation fixups\n"); -+#endif -+ /* -+ * OK, now all of the kids are tucked into bed in their proper addresses. -+ * Now we go through and look for REL and RELA records that indicate fixups -+ * to the GOT tables. We need to do this in reverse order so that COPY -+ * directives work correctly */ -+ if (_dl_fixup(dyn_chain->dyn, dyn_chain->flags)) -+ goto oops; -+ -+#ifdef __SUPPORT_LD_DEBUG__ -+ if(_dl_debug) -+ _dl_dprintf(_dl_debug_file, "Beginning dlopen copy fixups\n"); -+#endif -+ if (_dl_symbol_tables) { -+ if (_dl_copy_fixups(dyn_chain)) -+ goto oops; -+ } -+ -+ -+ /* TODO: Should we set the protections of all pages back to R/O now ? */ -+ -+ -+ /* Notify the debugger we have added some objects. */ -+ _dl_debug_addr->r_state = RT_ADD; -+ if (_dl_debug_addr) { -+ dl_brk = (void (*)(void)) _dl_debug_addr->r_brk; -+ if (dl_brk != NULL) { -+ _dl_debug_addr->r_state = RT_ADD; -+ (*dl_brk) (); -+ -+ _dl_debug_addr->r_state = RT_CONSISTENT; -+ (*dl_brk) (); -+ } -+ } -+ -+#if 0 //def __SUPPORT_LD_DEBUG__ -+ if(_dl_debug) -+ _dlinfo(); -+#endif -+ -+#ifdef __LIBDL_SHARED__ -+ /* Find the last library so we can run things in the right order */ -+ for (tpnt = dyn_chain->dyn; tpnt->next!=NULL; tpnt = tpnt->next) -+ ; -+ -+ /* Run the ctors and set up the dtors */ -+ for (; tpnt != dyn_chain->dyn->prev; tpnt=tpnt->prev) -+ { -+ /* Apparently crt1 for the application is responsible for handling this. -+ * We only need to run the init/fini for shared libraries -+ */ -+ if (tpnt->libtype == program_interpreter) -+ continue; -+ if (tpnt->libtype == elf_executable) -+ continue; -+ if (tpnt->init_flag & INIT_FUNCS_CALLED) -+ continue; -+ tpnt->init_flag |= INIT_FUNCS_CALLED; -+ -+ if (tpnt->dynamic_info[DT_INIT]) { -+ void (*dl_elf_func) (void); -+ dl_elf_func = (void (*)(void)) (tpnt->loadaddr + tpnt->dynamic_info[DT_INIT]); -+ if (dl_elf_func && *dl_elf_func != NULL) { -+#ifdef __SUPPORT_LD_DEBUG__ -+ if(_dl_debug) -+ _dl_dprintf(2, "running ctors for library %s at '%x'\n", tpnt->libname, dl_elf_func); -+#endif -+ (*dl_elf_func) (); -+ } -+ } -+ if (tpnt->dynamic_info[DT_FINI]) { -+ void (*dl_elf_func) (void); -+ dl_elf_func = (void (*)(void)) (tpnt->loadaddr + tpnt->dynamic_info[DT_FINI]); -+ if (dl_elf_func && *dl_elf_func != NULL) { -+#ifdef __SUPPORT_LD_DEBUG__ -+ if(_dl_debug) -+ _dl_dprintf(2, "setting up dtors for library %s at '%x'\n", tpnt->libname, dl_elf_func); -+#endif -+ atexit(dl_elf_func); -+ } -+ } -+ } -+#endif -+ return (void *) dyn_chain; -+ -+oops: -+ /* Something went wrong. Clean up and return NULL. */ -+ _dl_unmap_cache(); -+ do_dlclose(dyn_chain, 0); -+ return NULL; -+} -+ -+void *_dlsym(void *vhandle, const char *name) -+{ -+ struct elf_resolve *tpnt, *tfrom; -+ struct dyn_elf *handle; -+ ElfW(Addr) from; -+ struct dyn_elf *rpnt; -+ void *ret; -+ -+ handle = (struct dyn_elf *) vhandle; -+ -+ /* First of all verify that we have a real handle -+ of some kind. Return NULL if not a valid handle. */ -+ -+ if (handle == NULL) -+ handle = _dl_symbol_tables; -+ else if (handle != RTLD_NEXT && handle != _dl_symbol_tables) { -+ for (rpnt = _dl_handles; rpnt; rpnt = rpnt->next_handle) -+ if (rpnt == handle) -+ break; -+ if (!rpnt) { -+ _dl_error_number = LD_BAD_HANDLE; -+ return NULL; -+ } -+ } else if (handle == RTLD_NEXT) { -+ /* -+ * Try and locate the module we were called from - we -+ * need this so that we know where to start searching -+ * from. We never pass RTLD_NEXT down into the actual -+ * dynamic loader itself, as it doesn't know -+ * how to properly treat it. -+ */ -+ from = (ElfW(Addr)) __builtin_return_address(0); -+ -+ tfrom = NULL; -+ for (rpnt = _dl_symbol_tables; rpnt; rpnt = rpnt->next) { -+ tpnt = rpnt->dyn; -+ if (tpnt->loadaddr < from -+ && (tfrom == NULL || tfrom->loadaddr < tpnt->loadaddr)) { -+ tfrom = tpnt; -+ handle = rpnt->next; -+ } -+ } -+ } -+ -+ ret = _dl_find_hash((char*)name, handle, NULL, copyrel); -+ -+ /* -+ * Nothing found. -+ */ -+ if (!ret) -+ _dl_error_number = LD_NO_SYMBOL; -+ return ret; -+} -+ -+int _dlclose(void *vhandle) -+{ -+ return do_dlclose(vhandle, 1); -+} -+ -+static int do_dlclose(void *vhandle, int need_fini) -+{ -+ struct dyn_elf *rpnt, *rpnt1; -+ struct dyn_elf *spnt, *spnt1; -+ ElfW(Phdr) *ppnt; -+ struct elf_resolve *tpnt; -+ int (*dl_elf_fini) (void); -+ void (*dl_brk) (void); -+ struct dyn_elf *handle; -+ unsigned int end; -+ int i = 0; -+ -+ handle = (struct dyn_elf *) vhandle; -+ rpnt1 = NULL; -+ for (rpnt = _dl_handles; rpnt; rpnt = rpnt->next_handle) { -+ if (rpnt == handle) { -+ break; -+ } -+ rpnt1 = rpnt; -+ } -+ -+ if (!rpnt) { -+ _dl_error_number = LD_BAD_HANDLE; -+ return 1; -+ } -+ -+ /* OK, this is a valid handle - now close out the file. -+ * We check if we need to call fini () on the handle. */ -+ spnt = need_fini ? handle : handle->next; -+ for (; spnt; spnt = spnt1) { -+ spnt1 = spnt->next; -+ -+ /* We appended the module list to the end - when we get back here, -+ quit. The access counts were not adjusted to account for being here. */ -+ if (spnt == _dl_symbol_tables) -+ break; -+ if (spnt->dyn->usage_count == 1 -+ && spnt->dyn->libtype == loaded_file) { -+ tpnt = spnt->dyn; -+ /* Apparently crt1 for the application is responsible for handling this. -+ * We only need to run the init/fini for shared libraries -+ */ -+ -+ if (tpnt->dynamic_info[DT_FINI]) { -+ dl_elf_fini = (int (*)(void)) (tpnt->loadaddr + -+ tpnt->dynamic_info[DT_FINI]); -+ (*dl_elf_fini) (); -+ } -+ } -+ } -+ if (rpnt1) -+ rpnt1->next_handle = rpnt->next_handle; -+ else -+ _dl_handles = rpnt->next_handle; -+ -+ /* OK, this is a valid handle - now close out the file */ -+ for (rpnt = handle; rpnt; rpnt = rpnt1) { -+ rpnt1 = rpnt->next; -+ -+ /* We appended the module list to the end - when we get back here, -+ quit. The access counts were not adjusted to account for being here. */ -+ if (rpnt == _dl_symbol_tables) -+ break; -+ -+ rpnt->dyn->usage_count--; -+ if (rpnt->dyn->usage_count == 0 -+ && rpnt->dyn->libtype == loaded_file) { -+ tpnt = rpnt->dyn; -+ /* Apparently crt1 for the application is responsible for handling this. -+ * We only need to run the init/fini for shared libraries -+ */ -+#if 0 -+ -+ /* We have to do this above, before we start closing objects. -+ * Otherwise when the needed symbols for _fini handling are -+ * resolved a coredump would occur. Rob Ryan (robr@cmu.edu)*/ -+ if (tpnt->dynamic_info[DT_FINI]) { -+ dl_elf_fini = (int (*)(void)) (tpnt->loadaddr + tpnt->dynamic_info[DT_FINI]); -+ (*dl_elf_fini) (); -+ } -+#endif -+ end = 0; -+ for (i = 0, ppnt = rpnt->dyn->ppnt; -+ i < rpnt->dyn->n_phent; ppnt++, i++) { -+ if (ppnt->p_type != PT_LOAD) -+ continue; -+ if (end < ppnt->p_vaddr + ppnt->p_memsz) -+ end = ppnt->p_vaddr + ppnt->p_memsz; -+ } -+ _dl_munmap((void*)rpnt->dyn->loadaddr, end); -+ /* Next, remove rpnt->dyn from the loaded_module list */ -+ if (_dl_loaded_modules == rpnt->dyn) { -+ _dl_loaded_modules = rpnt->dyn->next; -+ if (_dl_loaded_modules) -+ _dl_loaded_modules->prev = 0; -+ } else -+ for (tpnt = _dl_loaded_modules; tpnt; tpnt = tpnt->next) -+ if (tpnt->next == rpnt->dyn) { -+ tpnt->next = tpnt->next->next; -+ if (tpnt->next) -+ tpnt->next->prev = tpnt; -+ break; -+ } -+ free(rpnt->dyn->libname); -+ free(rpnt->dyn); -+ } -+ free(rpnt); -+ } -+ -+ -+ if (_dl_debug_addr) { -+ dl_brk = (void (*)(void)) _dl_debug_addr->r_brk; -+ if (dl_brk != NULL) { -+ _dl_debug_addr->r_state = RT_DELETE; -+ (*dl_brk) (); -+ -+ _dl_debug_addr->r_state = RT_CONSISTENT; -+ (*dl_brk) (); -+ } -+ } -+ -+ return 0; -+} -+ -+const char *_dlerror(void) -+{ -+ const char *retval; -+ -+ if (!_dl_error_number) -+ return NULL; -+ retval = dl_error_names[_dl_error_number]; -+ _dl_error_number = 0; -+ return retval; -+} -+ -+/* -+ * Dump information to stderrr about the current loaded modules -+ */ -+static char *type[] = { "Lib", "Exe", "Int", "Mod" }; -+ -+void _dlinfo(void) -+{ -+ struct elf_resolve *tpnt; -+ struct dyn_elf *rpnt, *hpnt; -+ -+ _dl_dprintf(2, "List of loaded modules\n"); -+ /* First start with a complete list of all of the loaded files. */ -+ for (tpnt = _dl_loaded_modules; tpnt; tpnt = tpnt->next) { -+ _dl_dprintf(2, "\t%x %x %x %s %d %s\n", -+ (unsigned) tpnt->loadaddr, (unsigned) tpnt, -+ (unsigned) tpnt->symbol_scope, -+ type[tpnt->libtype], -+ tpnt->usage_count, tpnt->libname); -+ } -+ -+ /* Next dump the module list for the application itself */ -+ _dl_dprintf(2, "\nModules for application (%x):\n", -+ (unsigned) _dl_symbol_tables); -+ for (rpnt = _dl_symbol_tables; rpnt; rpnt = rpnt->next) -+ _dl_dprintf(2, "\t%x %s\n", (unsigned) rpnt->dyn, rpnt->dyn->libname); -+ -+ for (hpnt = _dl_handles; hpnt; hpnt = hpnt->next_handle) { -+ _dl_dprintf(2, "Modules for handle %x\n", (unsigned) hpnt); -+ for (rpnt = hpnt; rpnt; rpnt = rpnt->next) -+ _dl_dprintf(2, "\t%x %s\n", (unsigned) rpnt->dyn, -+ rpnt->dyn->libname); -+ } -+} -+ -+int _dladdr(void *__address, Dl_info * __dlip) -+{ -+ struct elf_resolve *pelf; -+ struct elf_resolve *rpnt; -+ -+ _dl_map_cache(); -+ -+ /* -+ * Try and locate the module address is in -+ */ -+ pelf = NULL; -+ -+#if 0 -+ _dl_dprintf(2, "dladdr( %x, %x )\n", __address, __dlip); -+#endif -+ -+ for (rpnt = _dl_loaded_modules; rpnt; rpnt = rpnt->next) { -+ struct elf_resolve *tpnt; -+ -+ tpnt = rpnt; -+#if 0 -+ _dl_dprintf(2, "Module \"%s\" at %x\n", -+ tpnt->libname, tpnt->loadaddr); -+#endif -+ if (tpnt->loadaddr < (ElfW(Addr)) __address -+ && (pelf == NULL || pelf->loadaddr < tpnt->loadaddr)) { -+ pelf = tpnt; -+ } -+ } -+ -+ if (!pelf) { -+ return 0; -+ } -+ -+ /* -+ * Try and locate the symbol of address -+ */ -+ -+ { -+ char *strtab; -+ Elf32_Sym *symtab; -+ int hn, si; -+ int sf; -+ int sn = 0; -+ ElfW(Addr) sa; -+ -+ sa = 0; -+ symtab = (Elf32_Sym *) (pelf->dynamic_info[DT_SYMTAB] + pelf->loadaddr); -+ strtab = (char *) (pelf->dynamic_info[DT_STRTAB] + pelf->loadaddr); -+ -+ sf = 0; -+ for (hn = 0; hn < pelf->nbucket; hn++) { -+ for (si = pelf->elf_buckets[hn]; si; si = pelf->chains[si]) { -+ ElfW(Addr) symbol_addr; -+ -+ symbol_addr = pelf->loadaddr + symtab[si].st_value; -+ if (symbol_addr <= (ElfW(Addr))__address && (!sf || sa < symbol_addr)) { -+ sa = symbol_addr; -+ sn = si; -+ sf = 1; -+ } -+#if 0 -+ _dl_dprintf(2, "Symbol \"%s\" at %x\n", -+ strtab + symtab[si].st_name, symbol_addr); -+#endif -+ } -+ } -+ -+ if (sf) { -+ __dlip->dli_fname = pelf->libname; -+ __dlip->dli_fbase = (void *)pelf->loadaddr; -+ __dlip->dli_sname = strtab + symtab[sn].st_name; -+ __dlip->dli_saddr = (void *)sa; -+ } -+ return 1; -+ } -+} -diff -urN uClibc/ldso-0.9.24/man/Makefile uClibc.ldso.24/ldso-0.9.24/man/Makefile ---- uClibc/ldso-0.9.24/man/Makefile 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/man/Makefile 2003-10-18 05:18:37.000000000 -0500 -@@ -0,0 +1,33 @@ -+# Makefile for uClibc -+# -+# Copyright (C) 2000,2001 Erik Andersen <andersen@uclibc.org> -+# -+# This program is free software; you can redistribute it and/or modify it under -+# the terms of the GNU Library General Public License as published by the Free -+# Software Foundation; either version 2 of the License, or (at your option) any -+# later version. -+# -+# This program is distributed in the hope that it will be useful, but WITHOUT -+# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS -+# FOR A PARTICULAR PURPOSE. See the GNU Library General Public License for more -+# details. -+# -+# You should have received a copy of the GNU Library General Public License -+# along with this program; if not, write to the Free Software Foundation, Inc., -+# 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA -+# -+# Derived in part from the Linux-8086 C library, the GNU C Library, and several -+# other sundry sources. Files within this library are copyright by their -+# respective copyright holders. -+ -+include ../Config.mk -+ -+ALL = #ld.so.info -+ -+all: $(ALL) -+ -+ld.so.info: ld.so.texi -+ makeinfo $< -+ -+clean: -+ $(RM) $(ALL) *~ -diff -urN uClibc/ldso-0.9.24/man/dlopen.3 uClibc.ldso.24/ldso-0.9.24/man/dlopen.3 ---- uClibc/ldso-0.9.24/man/dlopen.3 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/man/dlopen.3 2001-04-23 12:43:54.000000000 -0500 -@@ -0,0 +1,218 @@ -+.\" -*- nroff -*- -+.\" Copyright 1995 Yggdrasil Computing, Incorporated. -+.\" written by Adam J. Richter (adam@yggdrasil.com), -+.\" with typesetting help from Daniel Quinlan (quinlan@yggdrasil.com). -+.\" -+.\" This is free documentation; you can redistribute it and/or -+.\" modify it under the terms of the GNU General Public License as -+.\" published by the Free Software Foundation; either version 2 of -+.\" the License, or (at your option) any later version. -+.\" -+.\" The GNU General Public License's references to "object code" -+.\" and "executables" are to be interpreted as the output of any -+.\" document formatting or typesetting system, including -+.\" intermediate and printed output. -+.\" -+.\" This manual is distributed in the hope that it will be useful, -+.\" but WITHOUT ANY WARRANTY; without even the implied warranty of -+.\" MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -+.\" GNU General Public License for more details. -+.\" -+.\" You should have received a copy of the GNU General Public -+.\" License along with this manual; if not, write to the Free -+.\" Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, -+.\" USA. -+.\" -+.TH DLOPEN 3 "16 May 1995" "Linux" "Linux Programmer's Manual" -+.SH NAME -+dlclose, dlerror, dlopen, dlsym \- Programming interface to dynamic linking loader. -+.SH SYNOPSIS -+.B #include <dlfcn.h> -+.sp -+.BI "void *dlopen (const char *" "filename" ", int " flag "); -+.br -+.BI "const char *dlerror(void);" -+.br -+.BI "void *dlsym(void *"handle ", char *"symbol ");" -+.br -+.BI "int dladdr(void *"address ", Dl_info *"dlip ");" -+.br -+.BI "int dlclose (void *"handle "); -+.sp -+Special symbols: -+.BR "_init" ", " "_fini" ". " -+.SH DESCRIPTION -+.B dlopen -+loads a dynamic library from the file named by the null terminated -+string -+.I filename -+and returns an opaque "handle" for the dynamic library. -+If -+.I filename -+is not an absolute path (i.e., it does not begin with a "/"), then the -+file is searched for in the following locations: -+.RS -+.PP -+A colon-separated list of directories in the user's -+\fBLD_LIBRARY\fP path environment variable. -+.PP -+The list of libraries specified in \fI/etc/ld.so.cache\fP. -+.PP -+\fI/usr/lib\fP, followed by \fI/lib\fP. -+.RE -+.PP -+If -+.I filename -+is a NULL pointer, then the returned handle is for the main program. -+.PP -+External references in the library are resolved using the libraries -+in that library's dependency list and any other libraries previously -+opened with the -+.B RTLD_GLOBAL -+flag. -+If the executable was linked -+with the flag "-rdynamic", then the global symbols in the executable -+will also be used to resolve references in a dynamically loaded -+library. -+.PP -+.I flag -+must be either -+.BR RTLD_LAZY , -+meaning resolve undefined symbols as code from the dynamic library is -+executed, or -+.BR RTLD_NOW , -+meaning resolve all undefined symbols before -+.B dlopen -+returns, and fail if this cannot be done. -+Optionally, -+.B RTLD_GLOBAL -+may be or'ed with -+.IR flag, -+in which case the external symbols defined in the library will be -+made available to subsequently loaded libraries. -+.PP -+If the library exports a routine named -+.BR _init , -+then that code is executed before dlopen returns. -+If the same library is loaded twice with -+.BR dlopen() , -+the same file handle is returned. The dl library maintains link -+counts for dynamic file handles, so a dynamic library is not -+deallocated until -+.B dlclose -+has been called on it as many times as -+.B dlopen -+has succeeded on it. -+.PP -+If -+.B dlopen -+fails for any reason, it returns NULL. -+A human readable string describing the most recent error that occurred -+from any of the dl routines (dlopen, dlsym or dlclose) can be -+extracted with -+.BR dlerror() . -+.B dlerror -+returns NULL if no errors have occurred since initialization or since -+it was last called. (Calling -+.B dlerror() -+twice consecutively, will always result in the second call returning -+NULL.) -+ -+.B dlsym -+takes a "handle" of a dynamic library returned by dlopen and the null -+terminated symbol name, returning the address where that symbol is -+loaded. If the symbol is not found, -+.B dlsym -+returns NULL; however, the correct way to test for an error from -+.B dlsym -+is to save the result of -+.B dlerror -+into a variable, and then check if saved value is not NULL. -+This is because the value of the symbol could actually be NULL. -+It is also necessary to save the results of -+.B dlerror -+into a variable because if -+.B dlerror -+is called again, it will return NULL. -+.PP -+.B dladdr -+returns information about the shared library containing the memory -+location specified by -+.IR address . -+.B dladdr -+returns zero on success and non-zero on error. -+.PP -+.B dlclose -+decrements the reference count on the dynamic library handle -+.IR handle . -+If the reference count drops to zero and no other loaded libraries use -+symbols in it, then the dynamic library is unloaded. If the dynamic -+library exports a routine named -+.BR _fini , -+then that routine is called just before the library is unloaded. -+.SH EXAMPLES -+.B Load the math library, and print the cosine of 2.0: -+.RS -+.nf -+.if t .ft CW -+#include <dlfcn.h> -+ -+int main(int argc, char **argv) { -+ void *handle = dlopen ("/lib/libm.so", RTLD_LAZY); -+ double (*cosine)(double) = dlsym(handle, "cos"); -+ printf ("%f\\n", (*cosine)(2.0)); -+ dlclose(handle); -+} -+.if t .ft P -+.fi -+.PP -+If this program were in a file named "foo.c", you would build the program -+with the following command: -+.RS -+.LP -+gcc -rdynamic -o foo foo.c -ldl -+.RE -+.RE -+.LP -+.B Do the same thing, but check for errors at every step: -+.RS -+.nf -+.if t .ft CW -+#include <stdio.h> -+#include <dlfcn.h> -+ -+int main(int argc, char **argv) { -+ void *handle; -+ double (*cosine)(double); -+ char *error; -+ -+ handle = dlopen ("/lib/libm.so", RTLD_LAZY); -+ if (!handle) { -+ fputs (dlerror(), stderr); -+ exit(1); -+ } -+ -+ cosine = dlsym(handle, "cos"); -+ if ((error = dlerror()) != NULL) { -+ fputs(error, stderr); -+ exit(1); -+ } -+ -+ printf ("%f\\n", (*cosine)(2.0)); -+ dlclose(handle); -+} -+.if t .ft P -+.fi -+.RE -+.SH ACKNOWLEDGEMENTS -+The dlopen interface standard comes from Solaris. -+The Linux dlopen implementation was primarily written by -+Eric Youngdale with help from Mitch D'Souza, David Engel, -+Hongjiu Lu, Andreas Schwab and others. -+The manual page was written by Adam Richter. -+.SH SEE ALSO -+.BR ld(1) , -+.BR ld.so(8) , -+.BR ldconfig(8) , -+.BR ldd(1) , -+.BR ld.so.info . -diff -urN uClibc/ldso-0.9.24/man/ld.so.8 uClibc.ldso.24/ldso-0.9.24/man/ld.so.8 ---- uClibc/ldso-0.9.24/man/ld.so.8 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/man/ld.so.8 2001-04-23 12:43:54.000000000 -0500 -@@ -0,0 +1,113 @@ -+.TH ld.so 8 "14 March 1998" -+.SH NAME -+ld.so/ld-linux.so \- dynamic linker/loader -+.SH DESCRIPTION -+.B ld.so -+loads the shared libraries needed by a program, prepares the program -+to run, and then runs it. -+Unless explicitly specified via the -+.B \-static -+option to -+.B ld -+during compilation, all Linux programs are incomplete and require -+further linking at run time. -+.PP -+The necessary shared libraries needed by the program are searched for -+in the following order -+.IP o -+Using the environment variable -+.B LD_LIBRARY_PATH -+.RB ( LD_AOUT_LIBRARY_PATH -+for a.out programs). -+Except if the executable is a setuid/setgid binary, in which case it -+is ignored. -+.IP o -+From the cache file -+.BR /etc/ld.so.cache -+which contains a compiled list of candidate libraries previously found -+in the augmented library path. -+.IP o -+In the default path -+.BR /usr/lib , -+and then -+.BR /lib . -+.SH ENVIRONMENT -+.TP -+.B LD_LIBRARY_PATH -+A colon-separated list of directories in which to search for -+ELF libraries at execution-time. -+Similar to the -+.B PATH -+environment variable. -+.TP -+.B LD_PRELOAD -+A whitespace-separated list of additional, user-specified, ELF shared -+libraries to be loaded before all others. -+This can be used to selectively override functions in other shared libraries. -+For setuid/setgid ELF binaries, only libraries in the standard search -+directories that are also setgid will be loaded. -+.TP -+.B LD_TRACE_LOADED_OBJECTS -+If present, causes the program to list its dynamic library dependencies, -+as if run by ldd, instead of running normally. -+.TP -+.B LD_BIND_NOW -+If present, causes the dynamic linker to resolve all symbols at program -+startup instead of when they are first referenced. -+.TP -+.B LD_AOUT_LIBRARY_PATH -+A colon-separated list of directories in which to search for -+a.out libraries at execution-time. -+Similar to the -+.B PATH -+environment variable. -+.TP -+.B LD_AOUT_PRELOAD -+The name of an additional, user-specified, a.out shared library to be loaded -+after all others. -+This can be used to selectively override functions in other shared libraries. -+.TP -+.B LD_NOWARN -+Suppress warnings about a.out libraries with incompatible minor -+version numbers. -+.TP -+.B LD_KEEPDIR -+Don't ignore the directory in the names of a.out libraries to be loaded. -+Use of this option is strongly discouraged. -+.SH FILES -+.PD 0 -+.TP 20 -+.B /lib/ld.so -+a.out dynamic linker/loader -+.TP 20 -+.B /lib/ld-linux.so.* -+ELF dynamic linker/loader -+.TP -+.B /etc/ld.so.cache -+File containing a compiled list of directories in which to search for -+libraries and an ordered list of candidate libraries. -+.TP -+.B /etc/ld.so.preload -+File containing a whitespace separated list of ELF shared libraries to -+be loaded before the program. -+libraries and an ordered list of candidate libraries. -+.TP -+.B lib*.so* -+shared libraries -+.PD -+.SH SEE ALSO -+.BR ldd (1), -+.BR ldconfig (8). -+.SH BUGS -+.LP -+Currently -+.B ld.so -+has no means of unloading and searching for compatible or newer version of -+libraries. -+.PP -+.B ld.so -+functionality is only available for executables compiled using libc version -+4.4.3 or greater. -+.SH AUTHORS -+David Engel, Eric Youngdale, Peter MacDonald, Hongjiu Lu, Linus -+Torvalds, Lars Wirzenius and Mitch D'Souza (not necessarily in that order). -diff -urN uClibc/ldso-0.9.24/man/ld.so.texi uClibc.ldso.24/ldso-0.9.24/man/ld.so.texi ---- uClibc/ldso-0.9.24/man/ld.so.texi 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/man/ld.so.texi 2001-04-23 12:43:54.000000000 -0500 -@@ -0,0 +1,411 @@ -+\input texinfo @c -*-texinfo-*- -+@c %**start of header -+@setfilename ld.so.info -+@settitle ld.so : Dynamic-Link Library support -+@c %**end of header -+ -+@ifinfo -+This file documents the dynamic-link support libraries and utilities for the -+Linux OS, version 1.8.1. -+ -+Copyright 1996 Michael Deutschmann -+ -+This document is subject to the GNU General Public License as published by -+the Free Software foundation, version 2 or later (your choice). -+ -+Note: The software described in this document is under a different copyright -+and license. -+ -+@end ifinfo -+ -+@titlepage -+@title ld.so -+@subtitle Dynamic Link library support for the Linux OS. -+@author David Engel -+@author Eric Youngdale -+@author Peter Macdonald -+@author Hongjiu Lu -+@author Mitch D'Souza -+@author Michael Deutschmann (this documentation) -+ -+@page -+Copyright @copyright{} 1996 Michael Deutschmann -+ -+This document is subject to the GNU General Public License as published by -+the Free Software foundation, version 2 or later (your choice). -+ -+Note: The software described in this document is under a different copyright -+and license. -+@end titlepage -+ -+@ifinfo -+@node Top -+@top -+ -+The @code{ld.so} module provides dynamic linked library support in Linux. -+This file documents @code{ld.so} and its companion software. -+ -+@menu -+* intro:: Introduction -+ -+* ld.so:: The dynamic linker core program -+* ldd:: A utility to print out dependencies -+* ldconfig:: A utility to maintain the cache and symlinks -+* libdl:: Manual dynamic linking library -+@end menu -+ -+@end ifinfo -+ -+@node intro -+@unnumbered Introduction -+ -+The @code{ld.so} suite contains special files and utilities needed for linux -+to handle @dfn{dynamic libraries}. -+ -+Ordinary static libraries (@file{lib*.a} files) are included into executables -+that use their functions. A file that only uses static libraries needs less -+intelligence to load, but takes up more space. If many executables use the -+same library, there can be much wastage of storage space, since multiple -+copies of the library functions are scattered across the executables. -+However, static libraries are easier to make. -+ -+Dynamic libraries (@file{lib*.so*} files) are not copied into executables --- -+the executable is written in such a way that it will automatically load the -+libraries. In linux, the executable will first load the special library -+@code{ld.so} or @code{ld-linux.so}, which contains the intelligence -+to load further dynamic libraries. Since multiple files end up getting -+executable data from the same file, dynamic libraries are also known as -+shared libraries. -+ -+Linux executables come in two flavors, @sc{elf} and a.out. -+ -+a.out is the original executable format used by Linux. It has somewhat less -+overhead than @sc{elf}. However creating shared libraries for a.out is -+@emph{very} involved, and each a.out shared library must be explicitly -+registered. -+ -+@sc{elf} is a more recent format, which supports a much simpler method of -+creating libraries. @sc{elf} libraries may also be linked manually -+(@pxref{libdl}). -+ -+Since many library authors prefer @sc{elf} and no longer release shared a.out -+libraries, a.out is moribund on Linux. This version of the @code{ld.so} can -+be compiled to support only @sc{elf}, or to support both formats. (The last -+release of ld.so to support a.out alone was 1.8.0.) -+ -+@node ld.so -+@chapter @code{ld.so}: Dynamic linker core -+ -+@code{ld.so} works behind the scenes to handle dynamic libraries in Linux. -+Users will almost never have to deal with it directly, but in special cases -+one can send instructions to it through environment variables. Also, if -+something is wrong with your libraries (usually an incorrect version) ld.so -+will give error messages. -+ -+Actually @code{ld.so} is the a.out linker. The new @sc{elf} executables are -+handled by a related program @code{ld-linux.so}. -+ -+@menu -+* files:: Configuration files used by the suite -+* environment:: Environment settings that tweak @code{ld.so} -+* errors:: Complaints @code{ld.so} might make -+@end menu -+ -+@node files -+@section Configuration Files -+ -+@table @file -+@item /etc/ld.so.cache -+A file created by @code{ldconfig} and used to speed linking. It's structure -+is private to the suite. -+ -+@item /etc/ld.so.conf -+A simple list of directories to scan for libraries, in addition to -+@file{/usr/lib} and @file{/lib}, which are hardwired. It may contain -+comments started with a @samp{#}. -+ -+@item /etc/ld.so.preload -+A list of libraries to preload. This allows preloading libraries for -+setuid/setgid executables securely. It may contain comments. -+@end table -+ -+@node environment -+@section Environment Variables -+ -+@table @code -+@item LD_AOUT_LIBRARY_PATH -+@itemx LD_LIBRARY_PATH -+These variables supply a library path for finding dynamic libraries, in the -+standard colon seperated format. These variables are ignored when executing -+setuid/setgid programs, because otherwise they would be a security hazard. -+@code{ld.so} will use @code{LD_AOUT_LIBRARY_PATH} and @code{ld-linux.so} will -+use @code{LD_LIBRARY_PATH}. -+ -+@item LD_AOUT_PRELOAD -+@itemx LD_PRELOAD -+These variables allow an extra library not specified in the executable to be -+loaded. Generally this is only useful if you want to override a function. -+These are also ignored when running setuid/setgid executables. @code{ld.so} -+will use @code{LD_AOUT_PRELOAD} and @code{ld-linux.so} will use -+@code{LD_PRELOAD}. -+ -+@item LD_NOWARN -+If non-empty, errors about incompatible minor revisions are suppressed. -+ -+@item LD_KEEPDIR -+If non-empty, allow executables to specify absolute library names. This -+option is deprecated. -+@c FIXME: -+@c The following are things I noticed in the ld-linux.so source. -+@c I don't really understand 'em. Could someone help me? -+@c -+@c @item LD_BIND_NOW -+@c This option is used by the @code{ld-linux.so} only. I don't know -+@c what it does. (I suspect, looking at the code, that it specifies -+@c "RTLD_NOW" rather than "RTLD_LAZY" mode for the shared libraries.) -+@c -+@c @item LD_TRACE_LOADED_OBJECTS -+@c @itemx LD_WARN -+@c These seem to have something to do with the communication between the -+@c @code{ld-linux.so} and @code{ldd}. I don't know more. -+@end table -+ -+@node errors -+@section Errors -+ -+@table @samp -+@item Can't find library @var{library} -+The executable required a dynamically linked library that ld.so cannot find. -+Your symbolic links may be not set right, or you may have not installed a -+library needed by the program. -+ -+@item Can't load library @var{library} -+The library is corrupt. -+ -+@item Incompatible library @var{library} -+@itemx Require major version @var{x} and found @var{y} -+Your version of the library is incompatible with the executable. Recompiling -+the executable, or upgrading the library will fix the problem. -+ -+@item using incompatible library @var{library} -+@itemx Desire minor version >= @var{x} and found @var{y}. -+Your version of the library is older than that expected by the executable, -+but not so old that the library interface has radically changed, so the -+linker will attempt to run anyway. There is a chance that it will work, but -+you should upgrade the library or recompile the software. The environment -+variable @code{LD_NOWARN} can be used to supress this message. -+ -+@item too many directories in library path -+The linker only supports up to 32 library directories. You have too many. -+ -+@item dynamic linker error in @var{blah} -+The linker is having trouble handling a binary - it is probably corrupt. -+ -+@item can't map cache file @var{cache-file} -+@itemx cache file @var{cache-file} @var{blah} -+The linker cache file (generally @file{/etc/ld.so.cache}) is corrupt or -+non-existent. These errors can be ignored, and can be prevented by -+regenerating the cache file with @code{ldconfig}. -+@end table -+ -+@node ldd -+@chapter @code{ldd}: Dependency scanner -+ -+@code{ldd} is a utility that prints out the dynamic libraries that an -+executable is linked to. -+ -+Actually @code{ldd} works by signalling ld.so to print the dependencies. -+For a.out executables this is done by starting the executable with -+@code{argc} equal to 0. The linker detects this and prints the dependencies. -+(This can cause problems with @emph{very} old binaries, which would run as -+normal only with an inappropriate @code{argc}.) -+ -+For @sc{elf} executables, special environment variables are used to tell the -+linker to print the dependencies. -+ -+@code{ldd} has a few options: -+ -+@table @samp -+@item -v -+Print the version number of @code{ldd} itself -+ -+@item -V -+Print the version number of the dynamic linker -+ -+@item -d -+Report missing functions. This is only supported for @sc{elf} executables. -+ -+@item -r -+Report missing objects. This is also only available for @sc{elf} -+executables. -+@end table -+ -+@node ldconfig -+@chapter @code{ldconfig}: Setup program -+ -+This utility is used by the system administrator to automatically set up -+symbolic links needed by the libraries, and also to set up the cache file. -+ -+@code{ldconfig} is run after new dynamic libraries are installed, and if the -+cache file or links are damaged. It is also run when upgrading the -+@code{ld.so} suite itself. -+ -+The @file{/lib} and @file{/usr/lib} directories, and any listed in the file -+@file{/etc/ld.so.conf} are scanned by default unless @samp{-n} is used. -+Additional directories may be specified on the command line. -+ -+It has the following options: -+ -+@table @samp -+@item -D -+Enter debug mode. Implies @samp{-N} and @samp{-X}. -+ -+@item -v -+Verbose. Print out links created and directories scanned. -+ -+@item -n -+Check directories specified on the commandline @emph{only}. -+ -+@item -N -+Do not regenerate the cache. -+ -+@item -X -+Do not rebuild symbolic links. -+ -+@item -l -+Set up symbolic links for only libraries presented on the command line. -+ -+@item -p -+Print out the library pathnames in the cache file (@file{/etc/ld.so.cache}) -+@end table -+ -+@node libdl -+@chapter User dynamic linking library -+ -+The @code{ld.so} package includes a small library of functions -+(@code{libdl}) to allow manual dynamic linking. Normally programs are linked -+so that dynamic functions and objects are automagically available. These -+functions allow one to manually load and access a symbol from a library. -+They are only available for @sc{elf} executables. -+ -+@menu -+* using libdl:: General points -+* functions:: How to use the functions -+* example:: A sample program -+@end menu -+ -+@node using libdl -+@section Overview -+ -+To access this library, add the flag @samp{-ldl} to your compile command when -+linking the executable. You also must include the header file -+@code{dlfcn.h}. You may also need the flag @samp{-rdynamic}, which enables -+resolving references in the loaded libraries against your executable. -+ -+Generally, you will first use @code{dlopen} to open a library. Then you use -+@code{dlsym} one or more times to access symbols. Finally you use -+@code{dlclose} to close the library. -+ -+These facilities are most useful for language interpreters that provide -+access to external libraries. Without @code{libdl}, it would be neccessary -+to link the interpreter executable with any and all external libraries -+needed by the programs it runs. With @code{libdl}, the interpreter only -+needs to be linked with the libraries it uses itself, and can dynamically -+load in additional ones if programs need it. -+ -+@node functions -+@section Functions -+ -+@deftypefun void *dlopen ( const char @var{filename}, int @var{flags} ) -+ -+This function opens the dynamic library specified by @var{filename} -+and returns an abstract handle, which can be used in subsequent calls to -+@code{dlsym}. The function will respect the @code{LD_ELF_LIBRARY_PATH} and -+@code{LD_LIBRARY_PATH} environment variables. -+ -+@end deftypefun -+ -+The following flags can be used with @code{dlopen}: -+ -+@deftypevr Macro int RTLD_LAZY -+Resolve symbols in the library as they are needed. -+@end deftypevr -+ -+@deftypevr Macro int RTLD_NOW -+Resolve all symbols in the library before returning, and fail if not all can -+be resolved. This is mutually exclusive with @code{RTLD_LAZY}. -+@end deftypevr -+ -+@deftypevr Macro int RTLD_GLOBAL -+Make symbols in this library available for resolving symbols in other -+libraries loaded with @code{dlopen}. -+@end deftypevr -+ -+@deftypefun int dlclose ( void *@var{handle} ) -+ -+This function releases a library handle. -+ -+Note that if a library opened twice, the handle will be the same. However, -+a reference count is used, so you should still close the library as many -+times as you open it. -+ -+@end deftypefun -+ -+@deftypefun void *dlsym (void *@var{handle},char *@var{symbol-name}) -+ -+This function looks up the name @var{symbol-name} in the library and returns -+it in the void pointer. -+ -+If there is an error, a null pointer will be returned. However, it is -+possible for a valid name in the library to have a null value, so -+@code{dlerror} should be used to check if there was an error. -+ -+@end deftypefun -+ -+@deftypefun {libdl function} {const char} *dlerror( void ) -+ -+This function is used to read the error state. It returns a human-readable -+string describing the last error, or null, meaning no error. -+ -+The function resets the error value each time it is called, so the result -+should be copied into a variable. If the function is called more than once -+after an error, the second and subsequent calls will return null. -+ -+@end deftypefun -+ -+@node example -+@section Example program -+ -+Here is an example program that prints the cosine of two by manually linking -+to the math library: -+ -+@example -+@c The following was snarfed verbatim from the dlopen.3 man file. -+#include <stdio.h> -+#include <dlfcn.h> -+ -+int main(int argc, char **argv) @{ -+ void *handle; -+ double (*cosine)(double); -+ char *error; -+ -+ handle = dlopen ("/lib/libm.so", RTLD_LAZY); -+ if (!handle) @{ -+ fputs (dlerror(), stderr); -+ exit(1); -+ @} -+ -+ cosine = dlsym(handle, "cos"); -+ if ((error = dlerror()) != NULL) @{ -+ fputs(error, stderr); -+ exit(1); -+ @} -+ -+ printf ("%f\\n", (*cosine)(2.0)); -+ dlclose(handle); -+@} -+@end example -+ -+@contents -+ -+@bye -diff -urN uClibc/ldso-0.9.24/man/ldconfig.8 uClibc.ldso.24/ldso-0.9.24/man/ldconfig.8 ---- uClibc/ldso-0.9.24/man/ldconfig.8 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/man/ldconfig.8 2001-04-23 12:43:54.000000000 -0500 -@@ -0,0 +1,189 @@ -+.TH ldconfig 8 "14 March 1998" -+.SH NAME -+ldconfig \- determine run-time link bindings -+.SH SYNOPSIS -+ldconfig -+.RB [ \-DvqnNX ] -+.RB [ \-f\ conf ] -+.RB [ \-C\ cache ] -+.RB [ \-r\ root ] -+.IR directory \ ... -+.PD 0 -+.PP -+.PD -+ldconfig -+.B \-l -+.RB [ \-Dvq ] -+.IR library \ ... -+.PD 0 -+.PP -+.PD -+ldconfig -+.B \-p -+.SH DESCRIPTION -+.B ldconfig -+creates the necessary links and cache (for use by the run-time linker, -+.IR ld.so ) -+to the most recent shared libraries found in the directories specified -+on the command line, in the file -+.IR /etc/ld.so.conf , -+and in the trusted directories -+.RI ( /usr/lib -+and -+.IR /lib ). -+.B ldconfig -+checks the header and file names of the libraries it encounters when -+determining which versions should have their links updated. -+.B ldconfig -+ignores symbolic links when scanning for libraries. -+.PP -+.B ldconfig -+will attempt to deduce the type of ELF libs (ie. libc5 or libc6/glibc) -+based on what C libs if any the library was linked against, therefore when -+making dynamic libraries, it is wise to explicitly link against libc (use -lc). -+.PP -+Some existing libs do not contain enough information to allow the deduction of -+their type, therefore the -+.IR /etc/ld.so.conf -+file format allows the specification of an expected type. This is -+.B only -+used for those ELF libs which we can not work out. The format -+is like this "dirname=TYPE", where type can be libc4, libc5 or libc6. -+(This syntax also works on the command line). Spaces are -+.B not -+allowed. Also see the -+.B -p -+option. -+.PP -+Directory names containing an -+.B = are no longer legal -+unless they also have an expected type specifier. -+.PP -+.B ldconfig -+should normally be run by the super-user as it may require write -+permission on some root owned directories and files. -+It is normally run automatically at bootup, from /etc/rc, or manually -+whenever new DLL's are installed. -+.SH OPTIONS -+.TP -+.B \-D -+Debug mode. -+Implies -+.B \-N -+and -+.BR \-X . -+.TP -+.B \-v -+Verbose mode. -+Print current version number, the name of each directory as it -+is scanned and any links that are created. -+Overrides quiet mode. -+.TP -+.B \-q -+Quiet mode. -+Don't print warnings. -+.TP -+.B \-n -+Only process directories specified on the command line. -+Don't process the trusted directories -+.RI ( /usr/lib -+and -+.IR /lib ) -+nor those specified in -+.IR /etc/ld.so.conf . -+Implies -+.BR \-N . -+.TP -+.B \-N -+Don't rebuild the cache. -+Unless -+.B \-X -+is also specified, links are still updated. -+.TP -+.B \-X -+Don't update links. -+Unless -+.B \-N -+is also specified, the cache is still rebuilt. -+.TP -+.B \-f conf -+Use -+.B conf -+instead of -+.IR /etc/ld.so.conf . -+.TP -+.B \-C cache -+Use -+.B cache -+instead of -+.IR /etc/ld.so.cache . -+.TP -+.B \-r root -+Change to and use -+.B root -+as the root directory. -+.TP -+.B \-l -+Library mode. -+Manually link individual libraries. -+Intended for use by experts only. -+.TP -+.B \-p -+Print the lists of directories and candidate libraries stored in -+the current cache. -+.SH EXAMPLES -+In the bootup file -+.I /etc/rc -+having the line -+.RS -+ -+/sbin/ldconfig -v -+ -+.RE -+will set up the correct links for the shared binaries and rebuild -+the cache. -+.TP -+On the command line -+.RS -+ -+# /sbin/ldconfig -n /lib -+ -+.RE -+as root after the installation of a new DLL, will properly update the -+shared library symbolic links in /lib. -+ -+.SH FILES -+.PD 0 -+.TP 20 -+.B /lib/ld.so -+execution time linker/loader -+.TP 20 -+.B /etc/ld.so.conf -+File containing a list of colon, space, tab, newline, or comma spearated -+directories in which to search for libraries. -+.TP 20 -+.B /etc/ld.so.cache -+File containing an ordered list of libraries found in the directories -+specified in -+.BR /etc/ld.so.conf . -+.TP -+.B lib*.so.version -+shared libraries -+.PD -+.SH SEE ALSO -+.BR ldd (1), -+.BR ld.so (8). -+.SH BUGS -+.LP -+.BR ldconfig 's -+functionality, in conjunction with -+.BR ld.so , -+is only available for executables compiled using libc version 4.4.3 or greater. -+.PP -+.BR ldconfig , -+being a user process, must be run manually and has no means of dynamically -+determining and relinking shared libraries for use by -+.BR ld.so -+when a new DLL is installed. -+.SH AUTHORS -+David Engel and Mitch D'Souza. -diff -urN uClibc/ldso-0.9.24/man/ldd.1 uClibc.ldso.24/ldso-0.9.24/man/ldd.1 ---- uClibc/ldso-0.9.24/man/ldd.1 1969-12-31 18:00:00.000000000 -0600 -+++ uClibc.ldso.24/ldso-0.9.24/man/ldd.1 2001-04-23 12:43:54.000000000 -0500 -@@ -0,0 +1,59 @@ -+.\" Copyright 1995-2000 David Engel (david@ods.com) -+.\" Copyright 1995 Rickard E. Faith (faith@cs.unc.edu) -+.\" Most of this was copied from the README file. Do not restrict distribution. -+.\" May be distributed under the GNU General Public License -+.TH LDD 1 "14 March 1998" -+.SH NAME -+ldd \- print shared library dependencies -+.SH SYNOPSIS -+.B ldd -+.RB [ \-vVdr ] -+program|library ... -+.SH DESCRIPTION -+.B ldd -+prints the shared libraries required by each program or shared library -+specified on the command line. -+If a shared library name does not contain a '/', -+.B ldd -+attempts to locate the library in the standard locations. -+To run -+.B ldd -+on a shared library in the current directory, a "./" must be prepended -+to its name. -+.SH OPTIONS -+.TP -+.B \-v -+Print the version number of -+.BR ldd . -+.TP -+.B \-V -+Print the version number of the dynamic linker, -+.BR ld.so . -+.TP -+.B \-d -+Perform relocations and report any missing functions (ELF only). -+.TP -+.B \-r -+Perform relocations for both data objects and functions, and -+report any missing objects (ELF only). -+.SH BUGS -+.B ldd -+does not work very well on libc.so.5 itself. -+.PP -+.B ldd -+does not work on a.out shared libraries. -+.PP -+.B ldd -+does not work with some extremely old a.out programs which were -+built before -+.B ldd -+support was added to the compiler releases. -+If you use -+.B ldd -+on one of these programs, the program will attempt to run with argc = 0 and -+the results will be unpredictable. -+.SH AUTHOR -+David Engel. -+.SH SEE ALSO -+.BR ldconfig (8), -+.BR ld.so (8). |