BSD 4_4 release

[unix-history] / usr / src / lib / csu / i386 / crt0.c

diff --git a/usr/src/lib/csu/i386/crt0.c b/usr/src/lib/csu/i386/crt0.c
index d175d7d..77f9382 100644 (file)
--- a/usr/src/lib/csu/i386/crt0.c
+++ b/usr/src/lib/csu/i386/crt0.c
@@ -1,42 +1,65 @@
 /*-
 /*-

- * Copyright (c) 1990 The Regents of the University of California.
- * All rights reserved.
+ * Copyright (c) 1990, 1993
+ *     The Regents of the University of California.  All rights reserved.

  *
  *

- * This code is derived from software contributed to Berkeley by
- * William Jolitz.
+ * 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 the University of
+ *     California, Berkeley and its contributors.
+ * 4. Neither the name of the University nor the names of its contributors
+ *    may be used to endorse or promote products derived from this software
+ *    without specific prior written permission.

  *
  *

- * %sccs.include.redist.c%
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND 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 REGENTS OR 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.

  */
 
 #ifndef lint
  */
 
 #ifndef lint

-static char sccsid[] = "@(#)crt0.c     5.1 (Berkeley) %G%";
+static char sccsid[] = "@(#)crt0.c     8.1 (Berkeley) 6/1/93";

 #endif /* not lint */
 
 #endif /* not lint */
 

-

 /*
  *     C start up routine.
  *     Robert Henry, UCB, 20 Oct 81
  *
 /*
  *     C start up routine.
  *     Robert Henry, UCB, 20 Oct 81
  *

- *     We make the following (true) assumptions:
- *     1) The only register variable that we can trust is bp,
+ *     We make the following (true) assumption:
+ *     1) The only register variable that we can trust is ebp,

  *     which points to the base of the kernel calling frame.
  *     which points to the base of the kernel calling frame.

- *     2) We can allocate as many register variables as we want,
- *     and don't have to save them for anybody.

  */
 
  */
 

+#include <stddef.h>
+#include <stdlib.h>
+#include <string.h>
+

 char **environ = (char **)0;
 char **environ = (char **)0;

+static char empty[1];
+char *__progname = empty;

 static int fd;
 
 static int fd;
 

-#ifdef notyet
-asm("#define _start start");
-asm("#define _eprol eprol");
-asm("  .text");
-asm("  .long 0"); /* first instruction should always be 0 (indir thru 0) */
-asm("  .long 0"); /*this means all null pointers return value 0 regardless */
-                       /* of type */
-#endif
+asm(".text");
+asm(".long 0xc000c000");
+

 extern unsigned char   etext;
 extern unsigned char   etext;

-extern unsigned char   eprol;
+extern unsigned char   eprol asm ("eprol");
+extern                 start() asm("start");
+

 start()
 {
        struct kframe {
 start()
 {
        struct kframe {


@@ -52,13 +75,14 @@ start()
        register char **targv;
        register char **argv;
        extern int errno;
        register char **targv;
        register char **argv;
        extern int errno;

+       extern void _mcleanup();

 
 #ifdef lint
        kfp = 0;
        initcode = initcode = 0;
 
 #ifdef lint
        kfp = 0;
        initcode = initcode = 0;

-#else not lint
-       asm("   lea     4(%ebp),%ebx"); /* catch it quick */
-#endif not lint
+#else
+       asm("lea 4(%ebp),%ebx");        /* catch it quick */
+#endif

        for (argv = targv = &kfp->kargv[0]; *targv++; /* void */)
                /* void */ ;
        if (targv >= (char **)(*argv))
        for (argv = targv = &kfp->kargv[0]; *targv++; /* void */)
                /* void */ ;
        if (targv >= (char **)(*argv))


@@ -79,40 +103,28 @@ asm("eprol:");
                fd = open("/dev/null", 2);
        } while (fd >= 0 && fd < 3);
        close(fd);
                fd = open("/dev/null", 2);
        } while (fd >= 0 && fd < 3);
        close(fd);

-#endif paranoid
+#endif

 
 #ifdef MCRT0
 
 #ifdef MCRT0

+       atexit(_mcleanup);

        monstartup(&eprol, &etext);
        monstartup(&eprol, &etext);

-#endif MCRT0
+#endif

        errno = 0;
        errno = 0;

+       if (argv[0])
+               if ((__progname = strrchr(argv[0], '/')) == NULL)
+                       __progname = argv[0];
+               else
+                       ++__progname;

        exit(main(kfp->kargc, argv, environ));
 }
        exit(main(kfp->kargc, argv, environ));
 }

-asm("#undef _start");
-asm("#undef _eprol");
-
-#ifdef MCRT0
-/*ARGSUSED*/
-exit(code)
-       register int code;      /* r11 */
-{
-       monitor(0);
-       _cleanup();
-       asm("   pushl   8(bp)") ;
-       asm("   movl $1,%eax");
-       asm("   .byte 0x9a; .long 0; .word 0");
-}
-#endif MCRT0

 
 #ifdef CRT0
 /*
 
 #ifdef CRT0
 /*

- * null mcount and moncontrol,
- * just in case some routine is compiled for profiling
+ * null moncontrol just in case some routine is compiled for profiling

  */
 moncontrol(val)
        int val;
 {
 
 }
  */
 moncontrol(val)
        int val;
 {
 
 }

-asm("  .globl  mcount");
-asm("mcount:   ret");
-#endif CRT0
+#endif