1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
|
/*
* net.c
*
* This file is part of aboot, the SRM bootloader for Linux/Alpha
* Copyright (C) 1996 Dave Larson, and David Mosberger.
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License as
* published by the Free Software Foundation; either version 2 of the
* License, or (at your option) any later version.
*
* This program is distributed in the hope that it will be useful, but
* WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*/
#include <asm/console.h>
#include "system.h"
#include "config.h"
#include "cons.h"
#include "aboot.h"
#include "bootfs.h"
#include "utils.h"
#include "string.h"
#include "netwrap.h"
extern char boot_file[256];
void
dang (void)
{
printf("aboot: oops, unimplemented net-bfs function called!\n");
}
extern char _end;
static char *src = 0;
static char *kern_src=0, *ird_src=0;
static int header_size=0, kern_size=0, ird_size=0;
int
net_bread (int fd, long blkno, long nblks, char * buf)
{
int nbytes;
#ifdef DEBUG
printf("net_bread: %p -> %p (%ld blocks at %ld)\n", src, buf,
nblks, blkno);
#endif
nbytes = bfs->blocksize * nblks;
memcpy(buf, src, nbytes);
src += nbytes;
return nbytes;
}
struct bootfs netfs = {
-1, 512,
(int (*)(long, long, long)) dang, /* mount */
(int (*)(const char *)) dang, /* open */
net_bread, /* bread */
(void (*)(int fd)) dang, /* close */
(const char* (*)(int, int)) dang, /* readdir */
(int (*)(int, struct stat*)) dang, /* fstat */
};
long
read_initrd()
{
int nblocks, nread;
/* put it as high up in memory as possible */
initrd_start = free_mem_ptr - align_pagesize(ird_size);
initrd_size = ird_size;
/* update free_mem_ptr so malloc() still works */
free_mem_ptr = initrd_start;
#ifdef DEBUG
printf("memory_end %x %x\n", free_mem_ptr, initrd_start);
#endif
nblocks = align_512(ird_size)/ 512;
printf("aboot: loading initrd (%d bytes/%d blocks) at %#lx\n",
ird_size, nblocks, initrd_start);
nread = (*bfs->bread)(-1, 0, nblocks, (char*) initrd_start);
return 0;
}
long
load_kernel (void)
{
struct header *header;
bfs = &netfs;
header = (struct header *)align_512( (unsigned long)&_end );
header_size = header->header_size;
kern_src = (char *)align_512((unsigned long)header + header_size);
kern_size = header->kern_size;
ird_src = (char *)align_512((unsigned long)kern_src + kern_size);
ird_size = header->ird_size;
if (!free_mem_ptr)
free_mem_ptr = memory_end();
free_mem_ptr = free_mem_ptr & ~(PAGE_SIZE-1);
#ifdef DEBUG
printf("head %x %x kernel %x %x, initrd %x %x \n", header, header_size, kern_src, kern_size, ird_src, ird_size);
#endif
if (ird_size) {
src = ird_src;
if (read_initrd() < 0) {
return -1;
}
}
strcpy(boot_file, "network");
//Move kernel to safe place before uncompression
src = (char*)free_mem_ptr - align_pagesize(kern_size);
free_mem_ptr = (unsigned long)src;
memcpy(src, kern_src, kern_size);
uncompress_kernel(-1);
memset((char*)bss_start, 0, bss_size); /* clear bss */
if (!kernel_args[0] && header->boot_arg[0]) { //have argument?
strncpy(kernel_args, header->boot_arg, header_size - sizeof(int)*3);
}
while (kernel_args[0] == 'i' && !kernel_args[1]) {
printf("Enter kernel arguments:\n");
printf("aboot> ");
getline(kernel_args, sizeof(kernel_args));
printf("\n");
}
return 0;
}
|
