1 /* $NetBSD: inkernel.c,v 1.3 2009/01/12 07:16:17 tsutsui Exp $ */
2
3 /*-
4 * Copyright (c) 1996, 1997 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Kazuki Sakamoto.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 * POSSIBILITY OF SUCH DAMAGE.
30 */
31
32 #include <lib/libsa/stand.h>
33 #include <sys/param.h>
34
35 #include "boot.h"
36 #include "magic.h"
37
38 #define KERNENTRY (RELOC - 0x200000)
39 /*#define KERNENTRY (0x800000)*/
40 /* Note that the iplcb lives in the 0x700000 range, so we need to avoid that*/
41
42 void
init_in(u_long ladr)43 init_in(u_long ladr)
44 {
45 extern char _start[], _edata[], _end[];
46 /*char *p = (char *)(ladr + _end); for loadaddr 0x0*/
47 char *p = (char *)(ladr + (_end - ladr));
48 u_int i;
49
50 printf("p=%p start %p edata %p end %p ladr %lx\n", p, _start, _edata, _end, ladr);
51
52 for (i = 0; i < 4096; i++, p++) {
53 if (memcmp(p, rs6000_magic, RS6000_MAGICSIZE) == 0) {
54 kern_len = *(int *)(p + RS6000_MAGICSIZE);
55 printf("Found magic at 0x%x, kernel is size 0x%x\n", i, kern_len);
56 memmove((char *)KERNENTRY,
57 p + RS6000_MAGICSIZE + KERNLENSIZE, kern_len);
58 return;
59 }
60 }
61 printf("magic is not found.\n");
62 }
63
64 int
inopen(struct open_file * p)65 inopen(struct open_file *p)
66 {
67
68 if (kern_len)
69 return (0);
70 return (EINVAL);
71 }
72
73 int
inclose(struct open_file * p)74 inclose(struct open_file *p)
75 {
76
77 return (0);
78 }
79
80 int
instrategy(void * devdata,int func,daddr_t blk,size_t size,void * buf,size_t * rsize)81 instrategy(void *devdata, int func, daddr_t blk, size_t size, void *buf,
82 size_t *rsize)
83 {
84
85 memcpy(buf, (char *)KERNENTRY + ((long)blk * DEV_BSIZE), size);
86 *rsize = size;
87 return (0);
88 }
89