1/*	$NetBSD: inkernel.c,v 1.2 2008/04/28 20:23:34 martin 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
42void
43init_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
64int
65inopen(struct open_file *p)
66{
67
68	if (kern_len)
69		return (0);
70	return (EINVAL);
71}
72
73int
74inclose(struct open_file *p)
75{
76
77	return (0);
78}
79
80int
81instrategy(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