Import the ELF dynamic linker. This is the ElfKit version with

quite a few enhancements and bug fixes.  There are still some known
deficiencies, but it should be adequate to get us started with ELF.

Submitted by:	John Polstra <jdp@polstra.com>

1 files changed, 122 insertions, 0 deletions

diff --git a/libexec/rtld-elf/rtld.h b/libexec/rtld-elf/rtld.h
new file mode 100644
index 0000000..cbd7d8b
--- /dev/null
+++ b/libexec/rtld-elf/rtld.h
@@ -0,0 +1,122 @@
+/*-
+ * Copyright 1996-1998 John D. Polstra.
+ * 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. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``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 AUTHOR 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.
+ *
+ *      $Id: rtld.h,v 1.3 1998/03/06 14:00:09 jdp Exp $
+ */
+
+#ifndef RTLD_H /* { */
+#define RTLD_H 1
+
+#include <sys/types.h>
+
+#include <elf.h>
+#include <stddef.h>
+
+#ifndef STANDARD_LIBRARY_PATH
+#define STANDARD_LIBRARY_PATH	"/usr/lib/elf:/usr/lib"
+#endif
+
+#define NEW(type)	((type *) xmalloc(sizeof(type)))
+#define CNEW(type)	((type *) xcalloc(sizeof(type)))
+
+/* We might as well do booleans like C++. */
+typedef unsigned char bool;
+#define false	0
+#define true	1
+
+struct Struct_Obj_Entry;
+
+typedef struct Struct_Needed_Entry {
+    struct Struct_Needed_Entry *next;
+    struct Struct_Obj_Entry *obj;
+    unsigned long name;		/* Offset of name in string table */
+} Needed_Entry;
+
+/*
+ * Shared object descriptor.
+ *
+ * Items marked with "(%)" are dynamically allocated, and must be freed
+ * when the structure is destroyed.
+ */
+typedef struct Struct_Obj_Entry {
+    /*
+     * These two items have to be set right for compatibility with the
+     * original ElfKit crt1.o.
+     */
+    Elf32_Word magic;		/* Magic number (sanity check) */
+    Elf32_Word version;		/* Version number of struct format */
+
+    struct Struct_Obj_Entry *next;
+    char *path;			/* Pathname of underlying file (%) */
+    int refcount;
+    int dl_refcount;		/* Number of times loaded by dlopen */
+
+    /* These items are computed by map_object() or by digest_phdr(). */
+    caddr_t mapbase;		/* Base address of mapped region */
+    size_t mapsize;		/* Size of mapped region in bytes */
+    size_t textsize;		/* Size of text segment in bytes */
+    Elf32_Addr vaddrbase;	/* Base address in shared object file */
+    caddr_t relocbase;		/* Relocation constant = mapbase - vaddrbase */
+    const Elf32_Dyn *dynamic;	/* Dynamic section */
+    caddr_t entry;		/* Entry point */
+    const Elf32_Phdr *phdr;	/* Program header if it is mapped, else NULL */
+    size_t phsize;		/* Size of program header in bytes */
+
+    /* Items from the dynamic section. */
+    Elf32_Addr *got;		/* GOT table */
+    const Elf32_Rel *rel;	/* Relocation entries */
+    unsigned long relsize;	/* Size in bytes of relocation info */
+    const Elf32_Rel *pltrel;	/* PLT relocation entries */
+    unsigned long pltrelsize;	/* Size in bytes of PLT relocation info */
+    const Elf32_Sym *symtab;	/* Symbol table */
+    const char *strtab;		/* String table */
+    unsigned long strsize;	/* Size in bytes of string table */
+
+    const Elf32_Word *buckets;	/* Hash table buckets array */
+    unsigned long nbuckets;	/* Number of buckets */
+    const Elf32_Word *chains;	/* Hash table chain array */
+    unsigned long nchains;	/* Number of chains */
+
+    const char *rpath;		/* Search path specified in object */
+    Needed_Entry *needed;	/* Shared objects needed by this one (%) */
+
+    void (*init)(void);		/* Initialization function to call */
+    void (*fini)(void);		/* Termination function to call */
+
+    bool mainprog;		/* True if this is the main program */
+    bool rtld;			/* True if this is the dynamic linker */
+    bool textrel;		/* True if there are relocations to text seg */
+    bool symbolic;		/* True if generated with "-Bsymbolic" */
+} Obj_Entry;
+
+#define RTLD_MAGIC	0xd550b87a
+#define RTLD_VERSION	1
+
+extern void _rtld_error(const char *, ...);
+extern Obj_Entry *map_object(int);
+extern void *xcalloc(size_t);
+extern void *xmalloc(size_t);
+extern char *xstrdup(const char *);
+
+#endif /* } */