Home | History | Annotate | Line # | Download | only in bootxx_ffs 
      1 /*
      2  * $NetBSD: main.c,v 1.10 2022/04/29 07:18:17 rin Exp $
      3  *
      4  *
      5  * Copyright (c) 1996,1999 Ignatios Souvatzis
      6  * Copyright (c) 1994 Michael L. Hitch
      7  * All rights reserved.
      8  *
      9  * Redistribution and use in source and binary forms, with or without
     10  * modification, are permitted provided that the following conditions
     11  * are met:
     12  * 1. Redistributions of source code must retain the above copyright
     13  *    notice, this list of conditions and the following disclaimer.
     14  * 2. Redistributions in binary form must reproduce the above copyright
     15  *    notice, this list of conditions and the following disclaimer in the
     16  *    documentation and/or other materials provided with the distribution.
     17  *
     18  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     19  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     20  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     21  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     22  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     23  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     24  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     25  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     26  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     27  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     28  *
     29  */
     30 
     31 #include <sys/cdefs.h>
     32 #include <sys/reboot.h>
     33 #include <sys/types.h>
     34 
     35 #include <sys/exec_aout.h>
     36 
     37 #include <amiga/cfdev.h>
     38 #include <amiga/memlist.h>
     39 #include <include/cpu.h>
     40 
     41 #include <saerrno.h>
     42 #include <lib/libsa/stand.h>
     43 #include <lib/libkern/libkern.h>
     44 
     45 #include "libstubs.h"
     46 #include "samachdep.h"
     47 
     48 #undef AOUT_LDPGSZ
     49 #define AOUT_LDPGSZ 8192
     50 #define __PGSZ 8192
     51 
     52 #define DRACOREVISION	(*(u_int8_t *)0x02000009)
     53 #define DRACOMMUMARGIN	0x200000
     54 #define DRACOZ2OFFSET	0x3000000
     55 #define DRACOZ2MAX	0x1000000
     56 
     57 #define EXECMIN 36
     58 
     59 /*
     60  * vers.c (generated by newvers.sh)
     61  */
     62 extern const char bootprog_rev[];
     63 
     64 void startit(void *, void *, void *);
     65 
     66 int consclose(void);
     67 
     68 extern void *ConsoleBase;
     69 
     70 int
     71 pain(void *aio)
     72 {
     73 	long int io = 0;
     74 	void *kp;
     75 	int ksize;
     76 	struct stat sb;
     77 
     78 	extern u_int16_t timelimit;
     79 
     80 	xdinit(aio);
     81 
     82 	if (consinit(NULL))		/* Initialize fresh console */
     83 		return(1);
     84 
     85 #ifdef PPCBOOTER
     86 	printf("NetBSD/AmigaPPC " NETBSD_VERS " Primary Bootstrap %s\n", bootprog_rev);
     87 #else
     88 	printf("NetBSD/Amiga " NETBSD_VERS " Primary Bootstrap %s\n", bootprog_rev);
     89 #endif
     90 	io = open("/boot.amiga", 0);	/* Try /boot.amiga first */
     91 	if (io < 0) {
     92 		io = open("/boot", 0);	/* Fallback to /boot */
     93 		if (io < 0) {
     94 			io = open("/boot.ami", 0);	/* 8.3 name? */
     95 			if (io < 0) {
     96 				goto err;
     97 			}
     98 		}
     99 	}
    100 
    101 	/* get size of file? */
    102 	if (fstat(io, &sb))
    103 		goto err;
    104 	/* allocate memory for file */
    105 	ksize = sb.st_size;
    106 	if (ksize == 0) {
    107 		printf("Bad size, using 32K\n");	/* XXX debug? */
    108 		ksize = 32 * 1024;
    109 	}
    110 	kp = alloc(ksize);
    111 	if (kp == 0) {
    112 		errno = ENOMEM;
    113 		goto err;
    114 	}
    115 	/* read file into memory */
    116 	if (read(io, kp, ksize) != ksize) {
    117 		errno = ENOEXEC;
    118 		goto freeall;
    119 	}
    120 	/* validate boot: DOS\0 and checksum? */
    121 	if (strcmp(kp, "DOS") != 0 &&
    122 	    (*(u_int32_t *)kp) != 0x424f4f54) {
    123 		errno = ENOEXEC;
    124 		goto freeall;
    125 	}
    126 	/* call boot+12(aio, sysbase); */
    127 	close(io);
    128 	startit(kp, aio, ConsoleBase);
    129 	errno = -1;
    130 
    131 freeall:
    132 	dealloc(kp, ksize);
    133 err:
    134 	printf("Error %ld\n", (long)errno);
    135 	close(io);
    136 
    137 	timelimit = 10;
    138 	(void)getchar();
    139 	consclose();
    140 	return 1;
    141 }
    142 
    143 void
    144 twiddle(void)
    145 {
    146 
    147 	/* Keep silence; boot.amiga should be small enough. */
    148 }
    149