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
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
|
/*
* kexec: Linux boots Linux
*
* Copyright (C) 2003-2005 Eric Biederman (ebiederm@xmission.com)
* Copyright (C) 2004 Albert Herranz
* Copyright (C) 2004 Silicon Graphics, Inc.
* Jesse Barnes <jbarnes@sgi.com>
*
* 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 (version 2 of the License).
*
* 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.
*/
#define _GNU_SOURCE
#include <stddef.h>
#include <stdio.h>
#include <errno.h>
#include <stdint.h>
#include <string.h>
#include <getopt.h>
#include <sched.h>
#include <limits.h>
#include "../../kexec.h"
#include "../../kexec-syscall.h"
#include "elf.h"
#include "kexec-ia64.h"
#include <arch/options.h>
/* The number of entries in memory_range array is always smaller than
* the number of entries in the file returned by proc_iomem(),
* stored in max_memory_ranges. */
static struct memory_range *memory_range;
int max_memory_ranges;
static int memory_ranges;
unsigned long saved_efi_memmap_size;
/* Reserve range for EFI memmap and Boot parameter */
static int split_range(int range, unsigned long start, unsigned long end)
{
unsigned long ram_end = memory_range[range - 1].end;
unsigned int type = memory_range[range - 1].type;
int i;
//align end and start to page size of EFI
start = _ALIGN_DOWN(start, 1UL<<12);
end = _ALIGN(end, 1UL<<12);
for (i = 0; i < range; i++)
if(memory_range[i].start <= start && memory_range[i].end >=end)
break;
if (i >= range)
return range;
range = i;
if (memory_range[range].start < start) {
memory_range[range].end = start;
range++;
}
memory_range[range].start = start;
memory_range[range].end = end;
memory_range[range].type = RANGE_RESERVED;
range++;
if (end < ram_end) {
memory_range[range].start = end;
memory_range[range].end = ram_end;
memory_range[range].type = type;
range++;
}
return range;
}
/* Return a sorted list of available memory ranges. */
int get_memory_ranges(struct memory_range **range, int *ranges,
unsigned long kexec_flags)
{
const char *iomem = proc_iomem();
char line[MAX_LINE];
FILE *fp;
fp = fopen(iomem, "r");
if (!fp) {
fprintf(stderr, "Cannot open %s: %s\n",
iomem, strerror(errno));
return -1;
}
/* allocate memory_range dynamically */
max_memory_ranges = 0;
while(fgets(line, sizeof(line), fp) != 0) {
max_memory_ranges++;
}
memory_range = xmalloc(sizeof(struct memory_range) *
max_memory_ranges);
rewind(fp);
while(fgets(line, sizeof(line), fp) != 0) {
unsigned long start, end;
char *str;
unsigned type;
int consumed;
int count;
if (memory_ranges >= max_memory_ranges)
break;
count = sscanf(line, "%lx-%lx : %n",
&start, &end, &consumed);
if (count != 2)
continue;
str = line + consumed;
end = end + 1;
if (memcmp(str, "System RAM\n", 11) == 0) {
type = RANGE_RAM;
}
else if (memcmp(str, "reserved\n", 9) == 0) {
type = RANGE_RESERVED;
}
else if (memcmp(str, "Crash kernel\n", 13) == 0) {
/* Redefine the memory region boundaries if kernel
* exports the limits and if it is panic kernel.
* Override user values only if kernel exported
* values are subset of user defined values.
*/
if (kexec_flags & KEXEC_ON_CRASH) {
if (start > mem_min)
mem_min = start;
if (end < mem_max)
mem_max = end;
}
continue;
} else if (memcmp(str, "Boot parameter\n", 14) == 0) {
memory_ranges = split_range(memory_ranges, start, end);
continue;
} else if (memcmp(str, "EFI Memory Map\n", 14) == 0) {
memory_ranges = split_range(memory_ranges, start, end);
saved_efi_memmap_size = end - start;
continue;
} else if (memcmp(str, "Uncached RAM\n", 13) == 0) {
type = RANGE_UNCACHED;
} else {
continue;
}
/*
* Check if this memory range can be coalesced with
* the previous range
*/
if ((memory_ranges > 0) &&
(start == memory_range[memory_ranges-1].end) &&
(type == memory_range[memory_ranges-1].type)) {
memory_range[memory_ranges-1].end = end;
}
else {
memory_range[memory_ranges].start = start;
memory_range[memory_ranges].end = end;
memory_range[memory_ranges].type = type;
memory_ranges++;
}
}
fclose(fp);
*range = memory_range;
*ranges = memory_ranges;
return 0;
}
/* Supported file types and callbacks */
struct file_type file_type[] = {
{"elf-ia64", elf_ia64_probe, elf_ia64_load, elf_ia64_usage},
};
int file_types = sizeof(file_type) / sizeof(file_type[0]);
void arch_usage(void)
{
}
int arch_process_options(int argc, char **argv)
{
/* This doesn't belong here! Some sort of arch_init() ? */
/* execute from monarch processor */
cpu_set_t affinity;
CPU_ZERO(&affinity);
CPU_SET(0, &affinity);
sched_setaffinity(0, sizeof(affinity), &affinity);
return 0;
}
const struct arch_map_entry arches[] = {
{ "ia64", KEXEC_ARCH_IA_64 },
{ NULL, 0 },
};
int arch_compat_trampoline(struct kexec_info *UNUSED(info))
{
return 0;
}
int update_loaded_segments(struct mem_ehdr *ehdr)
{
int i;
unsigned u;
struct mem_phdr *phdr;
unsigned long start_addr = ULONG_MAX, end_addr = 0;
unsigned long align = 1UL<<26; /* 64M */
unsigned long start, end;
for (u = 0; u < ehdr->e_phnum; u++) {
phdr = &ehdr->e_phdr[u];
if (phdr->p_type != PT_LOAD)
continue;
if (phdr->p_paddr < start_addr)
start_addr = phdr->p_paddr;
if ((phdr->p_paddr + phdr->p_memsz) > end_addr)
end_addr = phdr->p_paddr + phdr->p_memsz;
}
for (i = 0; i < memory_ranges && memory_range[i].start <= start_addr;
i++) {
if (memory_range[i].type == RANGE_RAM &&
memory_range[i].end > end_addr)
return 0;
}
for (i = 0; i < memory_ranges; i++) {
if (memory_range[i].type != RANGE_RAM)
continue;
start = _ALIGN(memory_range[i].start, align);
end = memory_range[i].end;
if (end > start && (end - start) > (end_addr - start_addr)) {
move_loaded_segments(ehdr, start);
return 0;
}
}
return -1;
}
void arch_update_purgatory(struct kexec_info *UNUSED(info))
{
}
|
