diff options
Diffstat (limited to 'lib/csu')
| -rw-r--r-- | lib/csu/alpha/Makefile | 41 | ||||
| -rw-r--r-- | lib/csu/alpha/crt0.c | 243 | ||||
| -rw-r--r-- | lib/csu/amd64/Makefile | 24 | ||||
| -rw-r--r-- | lib/csu/amd64/crt1.c | 77 | ||||
| -rw-r--r-- | lib/csu/amd64/crti.S | 38 | ||||
| -rw-r--r-- | lib/csu/amd64/crtn.S | 32 | ||||
| -rw-r--r-- | lib/csu/common/crtbegin.c | 61 | ||||
| -rw-r--r-- | lib/csu/common/crtend.c | 31 | ||||
| -rw-r--r-- | lib/csu/i386-elf/Makefile | 24 | ||||
| -rw-r--r-- | lib/csu/i386-elf/crt1.c | 77 | ||||
| -rw-r--r-- | lib/csu/i386-elf/crtbegin.c | 61 | ||||
| -rw-r--r-- | lib/csu/i386-elf/crtend.c | 31 | ||||
| -rw-r--r-- | lib/csu/i386-elf/crti.S | 38 | ||||
| -rw-r--r-- | lib/csu/i386-elf/crtn.S | 32 | ||||
| -rw-r--r-- | lib/csu/i386/Makefile | 49 | ||||
| -rw-r--r-- | lib/csu/i386/c++rt0.c | 107 | ||||
| -rw-r--r-- | lib/csu/i386/crt0.c | 359 |
17 files changed, 1325 insertions, 0 deletions
diff --git a/lib/csu/alpha/Makefile b/lib/csu/alpha/Makefile new file mode 100644 index 0000000..7a3291d --- /dev/null +++ b/lib/csu/alpha/Makefile @@ -0,0 +1,41 @@ +# $Id$ +# From: NetBSD: Makefile,v 1.15 1997/10/24 21:18:25 thorpej Exp + +CPPFLAGS+= -DLIBC_SCCS -DPIC -DDYNAMIC -DELFSIZE=64 +CPPFLAGS+= -I${.CURDIR}/../../../libexec/ld.elf_so +COPT+= -fPIC + +OBJS= crt0.o gcrt0.o crtbegin.o crtend.o + +CLEANFILES+= core a.out + +all: ${OBJS} + +crt0.o: crt0.c + ${CC} -DCRT0 -c ${.CURDIR}/crt0.c -o ${.TARGET}.o + @${LD} -x -r -o ${.TARGET} ${.TARGET}.o + @rm -f ${.TARGET}.o + +gcrt0.o: crt0.c + ${CC} -DMCRT0 -c ${.CURDIR}/crt0.c -o ${.TARGET}.o + @${LD} -x -r -o ${.TARGET} ${.TARGET}.o + @rm -f ${.TARGET}.o + +crtbegin.o: crtbegin.c + ${CC} -c ${.CURDIR}/crtbegin.c -o ${.TARGET}.o + @${LD} -x -r -o ${.TARGET} ${.TARGET}.o + @rm -f ${.TARGET}.o + +crtend.o: crtend.c + ${CC} -c ${.CURDIR}/crtend.c -o ${.TARGET}.o + @${LD} -x -r -o ${.TARGET} ${.TARGET}.o + @rm -f ${.TARGET}.o + +install: + ${INSTALL} ${COPY} -o ${BINOWN} -g ${BINGRP} -m 444 ${OBJS} \ + ${DESTDIR}/usr/lib + rm -f ${DESTDIR}/usr/lib/crtbeginS.o ${DESTDIR}/usr/lib/crtendS.o + ln ${DESTDIR}/usr/lib/crtbegin.o ${DESTDIR}/usr/lib/crtbeginS.o + ln ${DESTDIR}/usr/lib/crtend.o ${DESTDIR}/usr/lib/crtendS.o + +.include <bsd.prog.mk> diff --git a/lib/csu/alpha/crt0.c b/lib/csu/alpha/crt0.c new file mode 100644 index 0000000..0e5688e --- /dev/null +++ b/lib/csu/alpha/crt0.c @@ -0,0 +1,243 @@ +/* $Id$ */ +/* From: NetBSD: crt0.c,v 1.11 1997/10/20 20:41:09 thorpej Exp */ + +/* + * Copyright (c) 1995 Christopher G. Demetriou + * 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. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by Christopher G. Demetriou + * for the NetBSD Project. + * 4. The name of the author may not be used to endorse or promote products + * derived from this software without specific prior written permission + * + * 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. + */ + +#ifdef ECOFF_COMPAT +#undef DYNAMIC +#endif + +#include <sys/param.h> +#include <sys/exec.h> +#include <sys/syscall.h> +#include <vm/vm.h> + +#include <stdlib.h> +#ifdef DYNAMIC +#include <dlfcn.h> +#include "rtld.h" +#else +typedef void Obj_Entry; +#endif + +/* + * Lots of the chunks of this file cobbled together from pieces of + * other NetBSD crt files, including the common code. + */ + +extern int __syscall __P((int, ...)); +#define _exit(v) __syscall(SYS_exit, (v)) +#define write(fd, s, n) __syscall(SYS_write, (fd), (s), (n)) + +#define _FATAL(str) \ + do { \ + write(2, str, sizeof(str)); \ + _exit(1); \ + } while (0) + +static char *_strrchr __P((char *, char)); + + +char **environ; +char *__progname = ""; +struct ps_strings *__ps_strings = 0; + +#ifndef ECOFF_COMPAT +extern void __init __P((void)); +extern void __fini __P((void)); +#endif /* ECOFF_COMPAT */ + +#ifdef DYNAMIC +void rtld_setup __P((void (*)(void), const Obj_Entry *obj)); + +const Obj_Entry *__mainprog_obj; + +/* + * Arrange for _DYNAMIC to be weak and undefined (and therefore to show up + * as being at address zero, unless something else defines it). That way, + * if we happen to be compiling without -static but with without any + * shared libs present, things will still work. + */ +asm(".weak _DYNAMIC"); +extern int _DYNAMIC; +#endif /* DYNAMIC */ + +#ifdef MCRT0 +extern void monstartup __P((u_long, u_long)); +extern void _mcleanup __P((void)); +extern unsigned char _etext, _eprol; +#endif /* MCRT0 */ + +void __start __P((char **, void (*cleanup) __P((void)), const Obj_Entry *, + struct ps_strings *)); +int main __P((int, char **, char **)); + +void +__start(sp, cleanup, obj, ps_strings) + char **sp; + void (*cleanup) __P((void)); /* from shared loader */ + const Obj_Entry *obj; /* from shared loader */ + struct ps_strings *ps_strings; +{ + long argc; + char **argv, *namep; + + argc = *(long *)sp; + argv = sp + 1; + environ = sp + 2 + argc; /* 2: argc + NULL ending argv */ + + if ((namep = argv[0]) != NULL) { /* NULL ptr if argc = 0 */ + if ((__progname = _strrchr(namep, '/')) == NULL) + __progname = namep; + else + __progname++; + } + + if (ps_strings != (struct ps_strings *)0 && + ps_strings != (struct ps_strings *)0xbabefacedeadbeef) + __ps_strings = ps_strings; + +#ifdef DYNAMIC + if (&_DYNAMIC != NULL) + rtld_setup(cleanup, obj); +#endif + +#ifdef MCRT0 + atexit(_mcleanup); + monstartup((u_long)&_eprol, (u_long)&_etext); +#endif + +#ifndef ECOFF_COMPAT + atexit(__fini); + __init(); +#endif /* ECOFF_COMPAT */ + + exit(main(argc, argv, environ)); +} + +/* + * NOTE: Leave the RCS ID _after_ __start(), in case it gets placed in .text. + */ +#if defined(LIBC_SCCS) && !defined(lint) +__RCSID("$NetBSD: crt0.c,v 1.11 1997/10/20 20:41:09 thorpej Exp $"); +#endif /* LIBC_SCCS and not lint */ + +static char * +_strrchr(p, ch) +register char *p, ch; +{ + register char *save; + + for (save = NULL;; ++p) { + if (*p == ch) + save = (char *)p; + if (!*p) + return(save); + } +/* NOTREACHED */ +} + +#ifdef MCRT0 +asm (" .text"); +asm ("_eprol:"); +#endif + +#ifdef DYNAMIC +void +rtld_setup(cleanup, obj) + void (*cleanup) __P((void)); + const Obj_Entry *obj; +{ + + if ((obj == NULL) || (obj->magic != RTLD_MAGIC)) + _FATAL("Corrupt Obj_Entry pointer in GOT"); + if (obj->version != RTLD_VERSION) + _FATAL("Dynamic linker version mismatch"); + + __mainprog_obj = obj; + atexit(cleanup); +} + +void * +dlopen(name, mode) + const char *name; + int mode; +{ + + if (__mainprog_obj == NULL) + return NULL; + return (__mainprog_obj->dlopen)(name, mode); +} + +int +dlclose(fd) + void *fd; +{ + + if (__mainprog_obj == NULL) + return -1; + return (__mainprog_obj->dlclose)(fd); +} + +void * +dlsym(fd, name) + void *fd; + const char *name; +{ + + if (__mainprog_obj == NULL) + return NULL; + return (__mainprog_obj->dlsym)(fd, name); +} + +#if 0 /* not supported for ELF shlibs, apparently */ +int +dlctl(fd, cmd, arg) + void *fd, *arg; + int cmd; +{ + + if (__mainprog_obj == NULL) + return -1; + return (__mainprog_obj->dlctl)(fd, cmd, arg); +} +#endif + +char * +dlerror() +{ + + if (__mainprog_obj == NULL) + return NULL; + return (__mainprog_obj->dlerror)(); +} +#endif /* DYNAMIC */ diff --git a/lib/csu/amd64/Makefile b/lib/csu/amd64/Makefile new file mode 100644 index 0000000..a4c72b3 --- /dev/null +++ b/lib/csu/amd64/Makefile @@ -0,0 +1,24 @@ +# +# $Id: Makefile,v 1.6 1996/04/12 02:24:34 jdp Exp $ +# + +SRCS= crt1.c crtbegin.c crtend.c crti.S crtn.S +OBJS= ${SRCS:N*.h:R:S/$/.o/g} +SOBJS= crtbegin.so crtend.so +CFLAGS+= -elf +CFLAGS+= -Wall -Wno-unused +LDFLAGS+= -elf +NOMAN= true +NOPIC= true +NOPROFILE= true +INTERNALLIB= true + +all: ${OBJS} ${SOBJS} + +realinstall: +.for file in ${OBJS} ${SOBJS} + ${INSTALL} ${COPY} -o ${LIBOWN} -g ${LIBGRP} -m ${LIBMODE} \ + ${file} ${DESTDIR}${LIBDIR}/${file:S/.so$/S.o/} +.endfor + +.include <bsd.lib.mk> diff --git a/lib/csu/amd64/crt1.c b/lib/csu/amd64/crt1.c new file mode 100644 index 0000000..d89d501 --- /dev/null +++ b/lib/csu/amd64/crt1.c @@ -0,0 +1,77 @@ +/*- + * 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: crt1.c,v 1.4 1996/04/12 02:24:35 jdp Exp $ + */ + +#ifndef __GNUC__ +#error "GCC is needed to compile this file" +#endif + +#include <stdlib.h> + +typedef void (*fptr)(void); + +extern void _fini(void); +extern void _init(void); +extern int main(int, char **, char **); + +extern int _DYNAMIC; +#pragma weak _DYNAMIC + +#ifdef __i386__ +#define get_rtld_cleanup() \ + ({ fptr __value; \ + __asm__("movl %%edx,%0" : "=rm"(__value)); \ + __value; }) +#else +#error "This file only supports the i386 architecture" +#endif + +char **environ; +char *__progname = ""; + +void +_start(char *arguments, ...) +{ + fptr rtld_cleanup; + int argc; + char **argv; + char **env; + + rtld_cleanup = get_rtld_cleanup(); + argv = &arguments; + argc = * (int *) (argv - 1); + env = argv + argc + 1; + environ = env; + if(argc > 0) + __progname = argv[0]; + + if(&_DYNAMIC != 0) + atexit(rtld_cleanup); + + atexit(_fini); + _init(); + exit( main(argc, argv, env) ); +} diff --git a/lib/csu/amd64/crti.S b/lib/csu/amd64/crti.S new file mode 100644 index 0000000..94e947d --- /dev/null +++ b/lib/csu/amd64/crti.S @@ -0,0 +1,38 @@ +/*- + * 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: crti.S,v 1.2 1997/08/28 00:27:08 jdp Exp $ + */ + + .section .init,"ax",@progbits + .align 4 + .globl _init + .type _init,@function +_init: + + .section .fini,"ax",@progbits + .align 4 + .globl _fini + .type _fini,@function +_fini: diff --git a/lib/csu/amd64/crtn.S b/lib/csu/amd64/crtn.S new file mode 100644 index 0000000..8f280b2 --- /dev/null +++ b/lib/csu/amd64/crtn.S @@ -0,0 +1,32 @@ +/*- + * 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: crtn.S,v 1.2 1997/08/28 00:27:09 jdp Exp $ + */ + + .section .init,"ax",@progbits + ret + + .section .fini,"ax",@progbits + ret diff --git a/lib/csu/common/crtbegin.c b/lib/csu/common/crtbegin.c new file mode 100644 index 0000000..9970d85 --- /dev/null +++ b/lib/csu/common/crtbegin.c @@ -0,0 +1,61 @@ +/*- + * 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: crtbegin.c,v 1.3 1996/04/12 02:24:35 jdp Exp $ + */ + +typedef void (*fptr)(void); + +static fptr ctor_list[1] __attribute__((section(".ctors"))) = { (fptr) -1 }; +static fptr dtor_list[1] __attribute__((section(".dtors"))) = { (fptr) -1 }; + +static void +do_ctors(void) +{ + fptr *fpp; + + for(fpp = ctor_list + 1; *fpp != 0; ++fpp) + (**fpp)(); +} + +static void +do_dtors(void) +{ + fptr *fpp; + + for(fpp = dtor_list + 1; *fpp != 0; ++fpp) + ; + while(--fpp > dtor_list) + (**fpp)(); +} + +static void +function_skeleton(void) +{ + __asm__(".section .init,\"ax\",@progbits"); + do_ctors(); + __asm__(".section .fini,\"ax\",@progbits"); + do_dtors(); + __asm__(".text"); +} diff --git a/lib/csu/common/crtend.c b/lib/csu/common/crtend.c new file mode 100644 index 0000000..e1f2293 --- /dev/null +++ b/lib/csu/common/crtend.c @@ -0,0 +1,31 @@ +/*- + * 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: crtend.c,v 1.3 1996/04/12 02:24:36 jdp Exp $ + */ + +typedef void (*fptr)(void); + +static fptr ctor_end[1] __attribute__((section(".ctors"))) = { 0 }; +static fptr dtor_end[1] __attribute__((section(".dtors"))) = { 0 }; diff --git a/lib/csu/i386-elf/Makefile b/lib/csu/i386-elf/Makefile new file mode 100644 index 0000000..a4c72b3 --- /dev/null +++ b/lib/csu/i386-elf/Makefile @@ -0,0 +1,24 @@ +# +# $Id: Makefile,v 1.6 1996/04/12 02:24:34 jdp Exp $ +# + +SRCS= crt1.c crtbegin.c crtend.c crti.S crtn.S +OBJS= ${SRCS:N*.h:R:S/$/.o/g} +SOBJS= crtbegin.so crtend.so +CFLAGS+= -elf +CFLAGS+= -Wall -Wno-unused +LDFLAGS+= -elf +NOMAN= true +NOPIC= true +NOPROFILE= true +INTERNALLIB= true + +all: ${OBJS} ${SOBJS} + +realinstall: +.for file in ${OBJS} ${SOBJS} + ${INSTALL} ${COPY} -o ${LIBOWN} -g ${LIBGRP} -m ${LIBMODE} \ + ${file} ${DESTDIR}${LIBDIR}/${file:S/.so$/S.o/} +.endfor + +.include <bsd.lib.mk> diff --git a/lib/csu/i386-elf/crt1.c b/lib/csu/i386-elf/crt1.c new file mode 100644 index 0000000..d89d501 --- /dev/null +++ b/lib/csu/i386-elf/crt1.c @@ -0,0 +1,77 @@ +/*- + * 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: crt1.c,v 1.4 1996/04/12 02:24:35 jdp Exp $ + */ + +#ifndef __GNUC__ +#error "GCC is needed to compile this file" +#endif + +#include <stdlib.h> + +typedef void (*fptr)(void); + +extern void _fini(void); +extern void _init(void); +extern int main(int, char **, char **); + +extern int _DYNAMIC; +#pragma weak _DYNAMIC + +#ifdef __i386__ +#define get_rtld_cleanup() \ + ({ fptr __value; \ + __asm__("movl %%edx,%0" : "=rm"(__value)); \ + __value; }) +#else +#error "This file only supports the i386 architecture" +#endif + +char **environ; +char *__progname = ""; + +void +_start(char *arguments, ...) +{ + fptr rtld_cleanup; + int argc; + char **argv; + char **env; + + rtld_cleanup = get_rtld_cleanup(); + argv = &arguments; + argc = * (int *) (argv - 1); + env = argv + argc + 1; + environ = env; + if(argc > 0) + __progname = argv[0]; + + if(&_DYNAMIC != 0) + atexit(rtld_cleanup); + + atexit(_fini); + _init(); + exit( main(argc, argv, env) ); +} diff --git a/lib/csu/i386-elf/crtbegin.c b/lib/csu/i386-elf/crtbegin.c new file mode 100644 index 0000000..9970d85 --- /dev/null +++ b/lib/csu/i386-elf/crtbegin.c @@ -0,0 +1,61 @@ +/*- + * 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: crtbegin.c,v 1.3 1996/04/12 02:24:35 jdp Exp $ + */ + +typedef void (*fptr)(void); + +static fptr ctor_list[1] __attribute__((section(".ctors"))) = { (fptr) -1 }; +static fptr dtor_list[1] __attribute__((section(".dtors"))) = { (fptr) -1 }; + +static void +do_ctors(void) +{ + fptr *fpp; + + for(fpp = ctor_list + 1; *fpp != 0; ++fpp) + (**fpp)(); +} + +static void +do_dtors(void) +{ + fptr *fpp; + + for(fpp = dtor_list + 1; *fpp != 0; ++fpp) + ; + while(--fpp > dtor_list) + (**fpp)(); +} + +static void +function_skeleton(void) +{ + __asm__(".section .init,\"ax\",@progbits"); + do_ctors(); + __asm__(".section .fini,\"ax\",@progbits"); + do_dtors(); + __asm__(".text"); +} diff --git a/lib/csu/i386-elf/crtend.c b/lib/csu/i386-elf/crtend.c new file mode 100644 index 0000000..e1f2293 --- /dev/null +++ b/lib/csu/i386-elf/crtend.c @@ -0,0 +1,31 @@ +/*- + * 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: crtend.c,v 1.3 1996/04/12 02:24:36 jdp Exp $ + */ + +typedef void (*fptr)(void); + +static fptr ctor_end[1] __attribute__((section(".ctors"))) = { 0 }; +static fptr dtor_end[1] __attribute__((section(".dtors"))) = { 0 }; diff --git a/lib/csu/i386-elf/crti.S b/lib/csu/i386-elf/crti.S new file mode 100644 index 0000000..94e947d --- /dev/null +++ b/lib/csu/i386-elf/crti.S @@ -0,0 +1,38 @@ +/*- + * 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: crti.S,v 1.2 1997/08/28 00:27:08 jdp Exp $ + */ + + .section .init,"ax",@progbits + .align 4 + .globl _init + .type _init,@function +_init: + + .section .fini,"ax",@progbits + .align 4 + .globl _fini + .type _fini,@function +_fini: diff --git a/lib/csu/i386-elf/crtn.S b/lib/csu/i386-elf/crtn.S new file mode 100644 index 0000000..8f280b2 --- /dev/null +++ b/lib/csu/i386-elf/crtn.S @@ -0,0 +1,32 @@ +/*- + * 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: crtn.S,v 1.2 1997/08/28 00:27:09 jdp Exp $ + */ + + .section .init,"ax",@progbits + ret + + .section .fini,"ax",@progbits + ret diff --git a/lib/csu/i386/Makefile b/lib/csu/i386/Makefile new file mode 100644 index 0000000..e672c07 --- /dev/null +++ b/lib/csu/i386/Makefile @@ -0,0 +1,49 @@ +# from: @(#)Makefile 5.6 (Berkeley) 5/22/91 +# $Id: Makefile,v 1.35 1998/02/09 06:05:07 jdp Exp $ + +CFLAGS+= -DLIBC_SCCS -fno-omit-frame-pointer +OBJS= crt0.o c++rt0.o gcrt0.o scrt0.o sgcrt0.o +CLEANFILES+= a.out + +all: ${OBJS} + +crt0.o: crt0.c + ${CC} ${CFLAGS} -c -DCRT0 -DDYNAMIC ${.CURDIR}/crt0.c -o ${.TARGET} + ${LD} -O ${.TARGET} -x -r ${.TARGET} + +c++rt0.o: c++rt0.c + ${CC} ${CFLAGS} -fpic -c ${.CURDIR}/c++rt0.c + @${LD} -O ${.TARGET} -x -r ${.TARGET} + +# +# gcrt0.o doesn't really depend on crt0.o, but this is the easiest way +# to get the dependencies mostly correct. +# +gcrt0.o: crt0.o + ${CC} ${CFLAGS} -c -DMCRT0 -DDYNAMIC ${.CURDIR}/crt0.c -o ${.TARGET} + ${LD} -O ${.TARGET} -x -r ${.TARGET} + +# dependencies fudged as for gcrt0.o +scrt0.o: crt0.o + ${CC} ${CFLAGS} -c -DCRT0 ${.CURDIR}/crt0.c -o ${.TARGET} + ${LD} -O ${.TARGET} -x -r ${.TARGET} + +# dependencies fudged as for gcrt0.o +sgcrt0.o: scrt0.o + ${CC} ${CFLAGS} -c -DMCRT0 ${.CURDIR}/crt0.c -o ${.TARGET} + ${LD} -O ${.TARGET} -x -r ${.TARGET} + +realinstall: + ${INSTALL} ${COPY} -o ${BINOWN} -g ${BINGRP} -m 444 ${OBJS} \ + ${DESTDIR}/usr/lib + +depend: .depend + +.depend: crt0.c c++rt0.c + rm -f .depend + mkdep ${CFLAGS} -DCRT0 -DDYNAMIC ${.CURDIR}/crt0.c + mkdep -a ${CFLAGS} ${.CURDIR}/c++rt0.c + +lint tags: + +.include <bsd.prog.mk> diff --git a/lib/csu/i386/c++rt0.c b/lib/csu/i386/c++rt0.c new file mode 100644 index 0000000..413524f --- /dev/null +++ b/lib/csu/i386/c++rt0.c @@ -0,0 +1,107 @@ +/* + * Copyright (c) 1993 Paul Kranenburg + * 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. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by Paul Kranenburg. + * 4. The name of the author may not be used to endorse or promote products + * derived from this software without specific prior written permission + * + * 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: c++rt0.c,v 1.7 1997/02/22 14:57:42 peter Exp $ + */ + +/* + * Run-time module for GNU C++ compiled shared libraries. + * + * The linker constructs the following arrays of pointers to global + * constructors and destructors. The first element contains the + * number of pointers in each. + * The tables are also null-terminated. + */ +extern void (*__CTOR_LIST__[])(void); +extern void (*__DTOR_LIST__[])(void); + +static void +__dtors(void) +{ + unsigned long i = (unsigned long) __DTOR_LIST__[0]; + void (**p)(void) = __DTOR_LIST__ + i; + + while (i--) + (**p--)(); +} + +static void +__ctors(void) +{ + void (**p)(void) = __CTOR_LIST__ + 1; + + while (*p) + (**p++)(); +} + +extern void __init() asm(".init"); +extern void __fini() asm(".fini"); + +void +__init(void) +{ + static int initialized = 0; + + /* + * Call global constructors. + * Arrange to call global destructors at exit. + */ + if (!initialized) { + initialized = 1; + __ctors(); + } + +} + +void +__fini(void) +{ + __dtors(); +} + +/* + * Make sure there is at least one constructor and one destructor in the + * shared library. Otherwise, the linker does not realize that the + * constructor and destructor lists are linker sets. It treats them as + * commons and resolves them to the lists from the main program. That + * causes multiple invocations of the main program's static constructors + * and destructors, which is very bad. + */ + +static void +do_nothing(void) +{ +} + +/* Linker magic to add an element to a constructor or destructor list. */ +#define TEXT_SET(set, sym) \ + asm(".stabs \"_" #set "\", 23, 0, 0, _" #sym) + +TEXT_SET(__CTOR_LIST__, do_nothing); +TEXT_SET(__DTOR_LIST__, do_nothing); diff --git a/lib/csu/i386/crt0.c b/lib/csu/i386/crt0.c new file mode 100644 index 0000000..8286e74 --- /dev/null +++ b/lib/csu/i386/crt0.c @@ -0,0 +1,359 @@ +/* + * Copyright (c) 1993 Paul Kranenburg + * 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. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by Paul Kranenburg. + * 4. The name of the author may not be used to endorse or promote products + * derived from this software without specific prior written permission + * + * 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: crt0.c,v 1.33 1998/02/09 06:05:09 jdp Exp $ + */ + +#include <sys/param.h> + +#include <stdlib.h> + +#ifdef DYNAMIC +#include <sys/types.h> +#include <sys/syscall.h> +#include <a.out.h> +#include <string.h> +#include <sys/mman.h> +#include <link.h> + +/* !!! + * This is gross, ld.so is a ZMAGIC a.out, but has `sizeof(hdr)' for + * an entry point and not at PAGSIZ as the N_*ADDR macros assume. + */ +#undef N_DATADDR +#define N_DATADDR(x) ((x).a_text) + +#undef N_BSSADDR +#define N_BSSADDR(x) ((x).a_text + (x).a_data) + +#ifndef N_GETMAGIC +#define N_GETMAGIC(x) ((x).a_magic) +#endif /* N_GETMAGIC */ + +#ifndef MAP_PRIVATE +#define MAP_PRIVATE MAP_COPY +#endif /* MAP_PRIVATE */ + +#ifndef MAP_FILE +#define MAP_FILE 0 +#endif /* MAP_FILE */ + +#ifndef MAP_ANON +#define MAP_ANON 0 +#endif /* MAP_ANON */ + +#ifdef DEBUG +/* + * We need these two because we are going to call them before the ld.so is + * finished (as a matter of fact before we know if it exists !) so we must + * provide these versions for them + */ +static char *_getenv(); +static int _strncmp(); +#endif /* DEBUG */ + +#ifndef LDSO +#define LDSO "/usr/libexec/ld.so" +#endif /* LDSO */ + +extern struct _dynamic _DYNAMIC; +static void __do_dynamic_link(char **argv); +#endif /* DYNAMIC */ + +int _callmain(); +int errno; +static char empty[1]; +char *__progname = empty; +char **environ; + +/* Globals used by dlopen() and related functions in libc */ +struct ld_entry *__ldso_entry; +int __ldso_version; + +extern unsigned char etext; +extern unsigned char eprol asm ("eprol"); +extern start() asm("start"); +extern mcount() asm ("mcount"); +extern int main(int argc, char **argv, char **envp); +int __syscall(int syscall,...); +#ifdef MCRT0 +void monstartup(void *low, void *high); +#endif /* MCRT0 */ + + +/* + * We need these system calls, but can't use library stubs because the are + * not accessible until we have done the ld.so stunt. + */ + +#define _exit(v) \ + __syscall(SYS_exit, (int)(v)) +#define _open(name, f, m) \ + __syscall(SYS_open, (char *)(name), (int)(f), (int)(m)) +#define _read(fd, s, n) \ + __syscall(SYS_read, (int)(fd), (void *)(s), (size_t)(n)) +#define _write(fd, s, n) \ + __syscall(SYS_write, (int)(fd), (void *)(s), (size_t)(n)) +#define _mmap(addr, len, prot, flags, fd, off) \ + (caddr_t) __syscall(SYS_mmap, (caddr_t)(addr), (size_t)(len), \ + (int)(prot), (int)(flags), (int)(fd), (long)0L, (off_t)(off)) + +#define _PUTNMSG(str, len) _write(2, (str), (len)) +#define _PUTMSG(str) _PUTNMSG((str), sizeof (str) - 1) +#define _FATAL(str) ( _PUTMSG(str), _exit(1) ) + + +int +start() +{ + struct kframe { + int kargc; + char *kargv[1]; /* size depends on kargc */ + char kargstr[1]; /* size varies */ + char kenvstr[1]; /* size varies */ + }; + /* + * ALL REGISTER VARIABLES!!! + */ + register struct kframe *kfp; + register char **targv; + register char **argv; + extern void _mcleanup(); +#ifdef DYNAMIC + volatile caddr_t x; +#endif + +#ifdef lint + kfp = 0; +#else /* not lint */ + /* just above the saved frame pointer */ + asm ("lea 4(%%ebp), %0" : "=r" (kfp) ); +#endif /* not lint */ + for (argv = targv = &kfp->kargv[0]; *targv++; /* void */) + /* void */ ; + if (targv >= (char **)(*argv)) + --targv; + environ = targv; + + if (argv[0]) { + register char *s; + __progname = argv[0]; + for (s=__progname; *s != '\0'; s++) + if (*s == '/') + __progname = s+1; + } + +#ifdef DYNAMIC + /* ld(1) convention: if DYNAMIC = 0 then statically linked */ + /* sometimes GCC is too smart/stupid for its own good */ + x = (caddr_t)&_DYNAMIC; + if (x) + __do_dynamic_link(argv); +#endif /* DYNAMIC */ + +asm("eprol:"); + +#ifdef MCRT0 + atexit(_mcleanup); + monstartup(&eprol, &etext); +#endif /* MCRT0 */ + +asm ("__callmain:"); /* Defined for the benefit of debuggers */ + exit(main(kfp->kargc, argv, environ)); +} + +#ifdef DYNAMIC +static void +__do_dynamic_link(argv) + char **argv; +{ + struct crt_ldso crt; + struct exec hdr; + char *ldso; + int (*entry)(); + +#ifdef DEBUG + /* Provision for alternate ld.so - security risk! */ + if (!(ldso = _getenv("LDSO"))) +#endif + ldso = LDSO; + + crt.crt_ldfd = _open(ldso, 0, 0); + if (crt.crt_ldfd == -1) { + _PUTMSG("Couldn't open "); + _PUTMSG(LDSO); + _FATAL(".\n"); + } + + /* Read LDSO exec header */ + if (_read(crt.crt_ldfd, &hdr, sizeof hdr) < sizeof hdr) { + _FATAL("Failure reading ld.so\n"); + } + if ((N_GETMAGIC_NET(hdr) != ZMAGIC) && (N_GETMAGIC(hdr) != QMAGIC)) { + _FATAL("Bad magic: ld.so\n"); + } + + /* We use MAP_ANON */ + crt.crt_dzfd = -1; + + /* Map in ld.so */ + crt.crt_ba = (int)_mmap(0, hdr.a_text, + PROT_READ|PROT_EXEC, + MAP_FILE|MAP_PRIVATE, + crt.crt_ldfd, N_TXTOFF(hdr)); + if (crt.crt_ba == -1) { + _FATAL("Cannot map ld.so (text)\n"); + } + + /* Map in data segment of ld.so writable */ + if ((int)_mmap((caddr_t)(crt.crt_ba+N_DATADDR(hdr)), hdr.a_data, + PROT_READ|PROT_WRITE, + MAP_FIXED|MAP_FILE|MAP_PRIVATE, + crt.crt_ldfd, N_DATOFF(hdr)) == -1) { + _FATAL("Cannot map ld.so (data)\n"); + } + + /* Map bss segment of ld.so zero */ + if (hdr.a_bss && (int)_mmap((caddr_t)(crt.crt_ba+N_BSSADDR(hdr)), + hdr.a_bss, + PROT_READ|PROT_WRITE, + MAP_FIXED|MAP_ANON|MAP_PRIVATE, + crt.crt_dzfd, 0) == -1) { + _FATAL("Cannot map ld.so (bss)\n"); + } + + crt.crt_dp = &_DYNAMIC; + crt.crt_ep = environ; + crt.crt_bp = (caddr_t)_callmain; + crt.crt_prog = __progname; + crt.crt_ldso = ldso; + crt.crt_ldentry = NULL; + crt.crt_argv = argv; + + entry = (int (*)())(crt.crt_ba + sizeof hdr); + __ldso_version = (*entry)(CRT_VERSION_BSD_5, &crt); + __ldso_entry = crt.crt_ldentry; + if (__ldso_version == -1 && __ldso_entry == NULL) { + /* If version 5 not recognised, try version 4 */ + __ldso_version = (*entry)(CRT_VERSION_BSD_4, &crt); + __ldso_entry = crt.crt_ldentry; + if (__ldso_version == -1 && __ldso_entry == NULL) { + /* if version 4 not recognised, try version 3 */ + __ldso_version = (*entry)(CRT_VERSION_BSD_3, &crt); + __ldso_entry = _DYNAMIC.d_entry; + } + } + if (__ldso_version == -1) { + _PUTMSG("ld.so failed"); + if (__ldso_entry != NULL) { + const char *msg = (__ldso_entry->dlerror)(); + if(msg != NULL) { + const char *endp; + _PUTMSG(": "); + for(endp = msg; *endp != '\0'; ++endp) + ; /* Find the end */ + _PUTNMSG(msg, endp - msg); + } + } + _FATAL("\n"); + } + + + if (__ldso_version >= LDSO_VERSION_HAS_DLEXIT) + atexit(__ldso_entry->dlexit); + + return; +} + +/* + * Support routines + */ + +#ifdef DEBUG +static int +_strncmp(s1, s2, n) + register char *s1, *s2; + register n; +{ + + if (n == 0) + return (0); + do { + if (*s1 != *s2++) + return (*(unsigned char *)s1 - *(unsigned char *)--s2); + if (*s1++ == 0) + break; + } while (--n != 0); + return (0); +} + +static char * +_getenv(name) + register char *name; +{ + extern char **environ; + register int len; + register char **P, *C; + + for (C = name, len = 0; *C && *C != '='; ++C, ++len); + for (P = environ; *P; ++P) + if (!_strncmp(*P, name, len)) + if (*(C = *P + len) == '=') { + return(++C); + } + return (char *)0; +} + +#endif /* DEBUG */ + + asm(" ___syscall:"); + asm(" popl %ecx"); + asm(" popl %eax"); + asm(" pushl %ecx"); + asm(" .byte 0x9a"); + asm(" .long 0"); + asm(" .word 7"); + asm(" pushl %ecx"); + asm(" jc 1f"); + asm(" ret"); + asm(" 1:"); + asm(" movl $-1,%eax"); + asm(" ret"); + +#endif /* DYNAMIC */ + + +/* + * Support routines + */ + +#ifdef MCRT0 +asm (" .text"); +asm ("_eprol:"); +#endif |
