[linux-block.git] / arch / s390 / kernel / machine_kexec_file.c

// SPDX-License-Identifier: GPL-2.0
/*
 * s390 code for kexec_file_load system call
 *
 * Copyright IBM Corp. 2018
 *
 * Author(s): Philipp Rudo <prudo@linux.vnet.ibm.com>
 */

#define pr_fmt(fmt)	"kexec: " fmt

#include <linux/elf.h>
#include <linux/errno.h>
#include <linux/kexec.h>
#include <linux/module_signature.h>
#include <linux/verification.h>
#include <linux/vmalloc.h>
#include <asm/boot_data.h>
#include <asm/ipl.h>
#include <asm/setup.h>

const struct kexec_file_ops * const kexec_file_loaders[] = {
	&s390_kexec_elf_ops,
	&s390_kexec_image_ops,
	NULL,
};

#ifdef CONFIG_KEXEC_SIG
int s390_verify_sig(const char *kernel, unsigned long kernel_len)
{
	const unsigned long marker_len = sizeof(MODULE_SIG_STRING) - 1;
	struct module_signature *ms;
	unsigned long sig_len;
	int ret;

	/* Skip signature verification when not secure IPLed. */
	if (!ipl_secure_flag)
		return 0;

	if (marker_len > kernel_len)
		return -EKEYREJECTED;

	if (memcmp(kernel + kernel_len - marker_len, MODULE_SIG_STRING,
		   marker_len))
		return -EKEYREJECTED;
	kernel_len -= marker_len;

	ms = (void *)kernel + kernel_len - sizeof(*ms);
	kernel_len -= sizeof(*ms);

	sig_len = be32_to_cpu(ms->sig_len);
	if (sig_len >= kernel_len)
		return -EKEYREJECTED;
	kernel_len -= sig_len;

	if (ms->id_type != PKEY_ID_PKCS7)
		return -EKEYREJECTED;

	if (ms->algo != 0 ||
	    ms->hash != 0 ||
	    ms->signer_len != 0 ||
	    ms->key_id_len != 0 ||
	    ms->__pad[0] != 0 ||
	    ms->__pad[1] != 0 ||
	    ms->__pad[2] != 0) {
		return -EBADMSG;
	}

	ret = verify_pkcs7_signature(kernel, kernel_len,
				     kernel + kernel_len, sig_len,
				     VERIFY_USE_SECONDARY_KEYRING,
				     VERIFYING_MODULE_SIGNATURE,
				     NULL, NULL);
	if (ret == -ENOKEY && IS_ENABLED(CONFIG_INTEGRITY_PLATFORM_KEYRING))
		ret = verify_pkcs7_signature(kernel, kernel_len,
					     kernel + kernel_len, sig_len,
					     VERIFY_USE_PLATFORM_KEYRING,
					     VERIFYING_MODULE_SIGNATURE,
					     NULL, NULL);
	return ret;
}
#endif /* CONFIG_KEXEC_SIG */

static int kexec_file_update_purgatory(struct kimage *image,
				       struct s390_load_data *data)
{
	u64 entry, type;
	int ret;

	if (image->type == KEXEC_TYPE_CRASH) {
		entry = STARTUP_KDUMP_OFFSET;
		type = KEXEC_TYPE_CRASH;
	} else {
		entry = STARTUP_NORMAL_OFFSET;
		type = KEXEC_TYPE_DEFAULT;
	}

	ret = kexec_purgatory_get_set_symbol(image, "kernel_entry", &entry,
					     sizeof(entry), false);
	if (ret)
		return ret;

	ret = kexec_purgatory_get_set_symbol(image, "kernel_type", &type,
					     sizeof(type), false);
	if (ret)
		return ret;

	if (image->type == KEXEC_TYPE_CRASH) {
		u64 crash_size;

		ret = kexec_purgatory_get_set_symbol(image, "crash_start",
						     &crashk_res.start,
						     sizeof(crashk_res.start),
						     false);
		if (ret)
			return ret;

		crash_size = crashk_res.end - crashk_res.start + 1;
		ret = kexec_purgatory_get_set_symbol(image, "crash_size",
						     &crash_size,
						     sizeof(crash_size),
						     false);
	}
	return ret;
}

static int kexec_file_add_purgatory(struct kimage *image,
				    struct s390_load_data *data)
{
	struct kexec_buf buf;
	int ret;

	buf.image = image;

	data->memsz = ALIGN(data->memsz, PAGE_SIZE);
	buf.mem = data->memsz;
	if (image->type == KEXEC_TYPE_CRASH)
		buf.mem += crashk_res.start;

	ret = kexec_load_purgatory(image, &buf);
	if (ret)
		return ret;
	data->memsz += buf.memsz;

	return kexec_file_update_purgatory(image, data);
}

static int kexec_file_add_initrd(struct kimage *image,
				 struct s390_load_data *data)
{
	struct kexec_buf buf;
	int ret;

	buf.image = image;

	buf.buffer = image->initrd_buf;
	buf.bufsz = image->initrd_buf_len;

	data->memsz = ALIGN(data->memsz, PAGE_SIZE);
	buf.mem = data->memsz;
	if (image->type == KEXEC_TYPE_CRASH)
		buf.mem += crashk_res.start;
	buf.memsz = buf.bufsz;

	data->parm->initrd_start = data->memsz;
	data->parm->initrd_size = buf.memsz;
	data->memsz += buf.memsz;

	ret = kexec_add_buffer(&buf);
	if (ret)
		return ret;

	return ipl_report_add_component(data->report, &buf, 0, 0);
}

static int kexec_file_add_ipl_report(struct kimage *image,
				     struct s390_load_data *data)
{
	__u32 *lc_ipl_parmblock_ptr;
	unsigned int len, ncerts;
	struct kexec_buf buf;
	unsigned long addr;
	void *ptr, *end;
	int ret;

	buf.image = image;

	data->memsz = ALIGN(data->memsz, PAGE_SIZE);
	buf.mem = data->memsz;
	if (image->type == KEXEC_TYPE_CRASH)
		buf.mem += crashk_res.start;

	ptr = (void *)ipl_cert_list_addr;
	end = ptr + ipl_cert_list_size;
	ncerts = 0;
	while (ptr < end) {
		ncerts++;
		len = *(unsigned int *)ptr;
		ptr += sizeof(len);
		ptr += len;
	}

	addr = data->memsz + data->report->size;
	addr += ncerts * sizeof(struct ipl_rb_certificate_entry);
	ptr = (void *)ipl_cert_list_addr;
	while (ptr < end) {
		len = *(unsigned int *)ptr;
		ptr += sizeof(len);
		ipl_report_add_certificate(data->report, ptr, addr, len);
		addr += len;
		ptr += len;
	}

	ret = -ENOMEM;
	buf.buffer = ipl_report_finish(data->report);
	if (!buf.buffer)
		goto out;
	buf.bufsz = data->report->size;
	buf.memsz = buf.bufsz;
	image->arch.ipl_buf = buf.buffer;

	data->memsz += buf.memsz;

	lc_ipl_parmblock_ptr =
		data->kernel_buf + offsetof(struct lowcore, ipl_parmblock_ptr);
	*lc_ipl_parmblock_ptr = (__u32)buf.mem;

	ret = kexec_add_buffer(&buf);
out:
	return ret;
}

void *kexec_file_add_components(struct kimage *image,
				int (*add_kernel)(struct kimage *image,
						  struct s390_load_data *data))
{
	unsigned long max_command_line_size = LEGACY_COMMAND_LINE_SIZE;
	struct s390_load_data data = {0};
	unsigned long minsize;
	int ret;

	data.report = ipl_report_init(&ipl_block);
	if (IS_ERR(data.report))
		return data.report;

	ret = add_kernel(image, &data);
	if (ret)
		goto out;

	ret = -EINVAL;
	minsize = PARMAREA + offsetof(struct parmarea, command_line);
	if (image->kernel_buf_len < minsize)
		goto out;

	if (data.parm->max_command_line_size)
		max_command_line_size = data.parm->max_command_line_size;

	if (minsize + max_command_line_size < minsize)
		goto out;

	if (image->kernel_buf_len < minsize + max_command_line_size)
		goto out;

	if (image->cmdline_buf_len >= max_command_line_size)
		goto out;

	memcpy(data.parm->command_line, image->cmdline_buf,
	       image->cmdline_buf_len);

	if (image->type == KEXEC_TYPE_CRASH) {
		data.parm->oldmem_base = crashk_res.start;
		data.parm->oldmem_size = crashk_res.end - crashk_res.start + 1;
	}

	if (image->initrd_buf) {
		ret = kexec_file_add_initrd(image, &data);
		if (ret)
			goto out;
	}

	ret = kexec_file_add_purgatory(image, &data);
	if (ret)
		goto out;

	if (data.kernel_mem == 0) {
		unsigned long restart_psw =  0x0008000080000000UL;
		restart_psw += image->start;
		memcpy(data.kernel_buf, &restart_psw, sizeof(restart_psw));
		image->start = 0;
	}

	ret = kexec_file_add_ipl_report(image, &data);
out:
	ipl_report_free(data.report);
	return ERR_PTR(ret);
}

int arch_kexec_apply_relocations_add(struct purgatory_info *pi,
				     Elf_Shdr *section,
				     const Elf_Shdr *relsec,
				     const Elf_Shdr *symtab)
{
	const char *strtab, *name, *shstrtab;
	const Elf_Shdr *sechdrs;
	Elf_Rela *relas;
	int i, r_type;
	int ret;

	/* String & section header string table */
	sechdrs = (void *)pi->ehdr + pi->ehdr->e_shoff;
	strtab = (char *)pi->ehdr + sechdrs[symtab->sh_link].sh_offset;
	shstrtab = (char *)pi->ehdr + sechdrs[pi->ehdr->e_shstrndx].sh_offset;

	relas = (void *)pi->ehdr + relsec->sh_offset;

	for (i = 0; i < relsec->sh_size / sizeof(*relas); i++) {
		const Elf_Sym *sym;	/* symbol to relocate */
		unsigned long addr;	/* final location after relocation */
		unsigned long val;	/* relocated symbol value */
		void *loc;		/* tmp location to modify */

		sym = (void *)pi->ehdr + symtab->sh_offset;
		sym += ELF64_R_SYM(relas[i].r_info);

		if (sym->st_name)
			name = strtab + sym->st_name;
		else
			name = shstrtab + sechdrs[sym->st_shndx].sh_name;

		if (sym->st_shndx == SHN_UNDEF) {
			pr_err("Undefined symbol: %s\n", name);
			return -ENOEXEC;
		}

		if (sym->st_shndx == SHN_COMMON) {
			pr_err("symbol '%s' in common section\n", name);
			return -ENOEXEC;
		}

		if (sym->st_shndx >= pi->ehdr->e_shnum &&
		    sym->st_shndx != SHN_ABS) {
			pr_err("Invalid section %d for symbol %s\n",
			       sym->st_shndx, name);
			return -ENOEXEC;
		}

		loc = pi->purgatory_buf;
		loc += section->sh_offset;
		loc += relas[i].r_offset;

		val = sym->st_value;
		if (sym->st_shndx != SHN_ABS)
			val += pi->sechdrs[sym->st_shndx].sh_addr;
		val += relas[i].r_addend;

		addr = section->sh_addr + relas[i].r_offset;

		r_type = ELF64_R_TYPE(relas[i].r_info);

		if (r_type == R_390_PLT32DBL)
			r_type = R_390_PC32DBL;

		ret = arch_kexec_do_relocs(r_type, loc, val, addr);
		if (ret) {
			pr_err("Unknown rela relocation: %d\n", r_type);
			return -ENOEXEC;
		}
	}
	return 0;
}

int arch_kimage_file_post_load_cleanup(struct kimage *image)
{
	vfree(image->arch.ipl_buf);
	image->arch.ipl_buf = NULL;

	return kexec_image_post_load_cleanup_default(image);
}
Commit	Line	Data
71406883 PR	1	// SPDX-License-Identifier: GPL-2.0
	2	/*
	3	* s390 code for kexec_file_load system call
	4	*
	5	* Copyright IBM Corp. 2018
	6	*
	7	* Author(s): Philipp Rudo <prudo@linux.vnet.ibm.com>
	8	*/
	9
edce10ee PR	10	#define pr_fmt(fmt) "kexec: " fmt
edce10ee PR	11
71406883	12	#include <linux/elf.h>
e23a8020	13	#include <linux/errno.h>
71406883	14	#include <linux/kexec.h>
c8424e77	15	#include <linux/module_signature.h>
e23a8020	16	#include <linux/verification.h>
4aa93405	17	#include <linux/vmalloc.h>
99feaa71	18	#include <asm/boot_data.h>
e23a8020	19	#include <asm/ipl.h>
71406883 PR	20	#include <asm/setup.h>
	21
	22	const struct kexec_file_ops * const kexec_file_loaders[] = {
8be01882	23	&s390_kexec_elf_ops,
e49bb0a2	24	&s390_kexec_image_ops,
71406883 PR	25	NULL,
	26	};
	27
99d5cadf	28	#ifdef CONFIG_KEXEC_SIG
e23a8020 PR	29	int s390_verify_sig(const char *kernel, unsigned long kernel_len)
	30	{
	31	const unsigned long marker_len = sizeof(MODULE_SIG_STRING) - 1;
	32	struct module_signature *ms;
	33	unsigned long sig_len;
0828c4a3	34	int ret;
e23a8020 PR	35
	36	/* Skip signature verification when not secure IPLed. */
	37	if (!ipl_secure_flag)
	38	return 0;
	39
	40	if (marker_len > kernel_len)
	41	return -EKEYREJECTED;
	42
	43	if (memcmp(kernel + kernel_len - marker_len, MODULE_SIG_STRING,
	44	marker_len))
	45	return -EKEYREJECTED;
	46	kernel_len -= marker_len;
	47
	48	ms = (void )kernel + kernel_len - sizeof(ms);
	49	kernel_len -= sizeof(*ms);
	50
	51	sig_len = be32_to_cpu(ms->sig_len);
	52	if (sig_len >= kernel_len)
	53	return -EKEYREJECTED;
	54	kernel_len -= sig_len;
	55
	56	if (ms->id_type != PKEY_ID_PKCS7)
	57	return -EKEYREJECTED;
	58
	59	if (ms->algo != 0 \|\|
	60	ms->hash != 0 \|\|
	61	ms->signer_len != 0 \|\|
	62	ms->key_id_len != 0 \|\|
	63	ms->__pad[0] != 0 \|\|
	64	ms->__pad[1] != 0 \|\|
	65	ms->__pad[2] != 0) {
	66	return -EBADMSG;
	67	}
	68
0828c4a3 MS	69	ret = verify_pkcs7_signature(kernel, kernel_len,
	70	kernel + kernel_len, sig_len,
	71	VERIFY_USE_SECONDARY_KEYRING,
	72	VERIFYING_MODULE_SIGNATURE,
	73	NULL, NULL);
	74	if (ret == -ENOKEY && IS_ENABLED(CONFIG_INTEGRITY_PLATFORM_KEYRING))
	75	ret = verify_pkcs7_signature(kernel, kernel_len,
	76	kernel + kernel_len, sig_len,
	77	VERIFY_USE_PLATFORM_KEYRING,
	78	VERIFYING_MODULE_SIGNATURE,
	79	NULL, NULL);
	80	return ret;
e23a8020	81	}
99d5cadf	82	#endif /* CONFIG_KEXEC_SIG */
e23a8020	83
653beba2 PR	84	static int kexec_file_update_purgatory(struct kimage *image,
653beba2 PR	85	struct s390_load_data *data)
e49bb0a2 PR	86	{
	87	u64 entry, type;
	88	int ret;
	89
ee337f54 PR	90	if (image->type == KEXEC_TYPE_CRASH) {
	91	entry = STARTUP_KDUMP_OFFSET;
	92	type = KEXEC_TYPE_CRASH;
	93	} else {
	94	entry = STARTUP_NORMAL_OFFSET;
	95	type = KEXEC_TYPE_DEFAULT;
	96	}
	97
e49bb0a2 PR	98	ret = kexec_purgatory_get_set_symbol(image, "kernel_entry", &entry,
e49bb0a2 PR	99	sizeof(entry), false);
ee337f54 PR	100	if (ret)
	101	return ret;
	102
	103	ret = kexec_purgatory_get_set_symbol(image, "kernel_type", &type,
	104	sizeof(type), false);
	105	if (ret)
	106	return ret;
	107
	108	if (image->type == KEXEC_TYPE_CRASH) {
	109	u64 crash_size;
	110
	111	ret = kexec_purgatory_get_set_symbol(image, "crash_start",
	112	&crashk_res.start,
	113	sizeof(crashk_res.start),
	114	false);
	115	if (ret)
	116	return ret;
	117
	118	crash_size = crashk_res.end - crashk_res.start + 1;
	119	ret = kexec_purgatory_get_set_symbol(image, "crash_size",
	120	&crash_size,
	121	sizeof(crash_size),
	122	false);
	123	}
e49bb0a2 PR	124	return ret;
	125	}
	126
8e496426 PR	127	static int kexec_file_add_purgatory(struct kimage *image,
8e496426 PR	128	struct s390_load_data *data)
e49bb0a2 PR	129	{
	130	struct kexec_buf buf;
	131	int ret;
	132
	133	buf.image = image;
	134
	135	data->memsz = ALIGN(data->memsz, PAGE_SIZE);
	136	buf.mem = data->memsz;
ee337f54 PR	137	if (image->type == KEXEC_TYPE_CRASH)
ee337f54 PR	138	buf.mem += crashk_res.start;
e49bb0a2 PR	139
	140	ret = kexec_load_purgatory(image, &buf);
	141	if (ret)
	142	return ret;
99feaa71	143	data->memsz += buf.memsz;
e49bb0a2	144
99feaa71	145	return kexec_file_update_purgatory(image, data);
e49bb0a2 PR	146	}
e49bb0a2 PR	147
8e496426 PR	148	static int kexec_file_add_initrd(struct kimage *image,
8e496426 PR	149	struct s390_load_data *data)
e49bb0a2 PR	150	{
	151	struct kexec_buf buf;
	152	int ret;
	153
	154	buf.image = image;
	155
8e496426 PR	156	buf.buffer = image->initrd_buf;
8e496426 PR	157	buf.bufsz = image->initrd_buf_len;
e49bb0a2 PR	158
	159	data->memsz = ALIGN(data->memsz, PAGE_SIZE);
	160	buf.mem = data->memsz;
ee337f54 PR	161	if (image->type == KEXEC_TYPE_CRASH)
ee337f54 PR	162	buf.mem += crashk_res.start;
e49bb0a2 PR	163	buf.memsz = buf.bufsz;
e49bb0a2 PR	164
70b69054	165	data->parm->initrd_start = data->memsz;
d0d249d7	166	data->parm->initrd_size = buf.memsz;
e49bb0a2 PR	167	data->memsz += buf.memsz;
	168
	169	ret = kexec_add_buffer(&buf);
99feaa71 PR	170	if (ret)
	171	return ret;
	172
	173	return ipl_report_add_component(data->report, &buf, 0, 0);
	174	}
	175
	176	static int kexec_file_add_ipl_report(struct kimage *image,
	177	struct s390_load_data *data)
	178	{
	179	__u32 *lc_ipl_parmblock_ptr;
	180	unsigned int len, ncerts;
	181	struct kexec_buf buf;
	182	unsigned long addr;
	183	void ptr, end;
20c76e24	184	int ret;
99feaa71 PR	185
	186	buf.image = image;
	187
	188	data->memsz = ALIGN(data->memsz, PAGE_SIZE);
	189	buf.mem = data->memsz;
	190	if (image->type == KEXEC_TYPE_CRASH)
	191	buf.mem += crashk_res.start;
	192
	193	ptr = (void *)ipl_cert_list_addr;
	194	end = ptr + ipl_cert_list_size;
	195	ncerts = 0;
	196	while (ptr < end) {
	197	ncerts++;
	198	len = (unsigned int )ptr;
	199	ptr += sizeof(len);
	200	ptr += len;
	201	}
	202
	203	addr = data->memsz + data->report->size;
	204	addr += ncerts * sizeof(struct ipl_rb_certificate_entry);
	205	ptr = (void *)ipl_cert_list_addr;
	206	while (ptr < end) {
	207	len = (unsigned int )ptr;
	208	ptr += sizeof(len);
	209	ipl_report_add_certificate(data->report, ptr, addr, len);
	210	addr += len;
	211	ptr += len;
	212	}
	213
20c76e24	214	ret = -ENOMEM;
99feaa71	215	buf.buffer = ipl_report_finish(data->report);
20c76e24 HC	216	if (!buf.buffer)
20c76e24 HC	217	goto out;
99feaa71 PR	218	buf.bufsz = data->report->size;
99feaa71 PR	219	buf.memsz = buf.bufsz;
4aa93405	220	image->arch.ipl_buf = buf.buffer;
99feaa71 PR	221
	222	data->memsz += buf.memsz;
	223
	224	lc_ipl_parmblock_ptr =
	225	data->kernel_buf + offsetof(struct lowcore, ipl_parmblock_ptr);
	226	*lc_ipl_parmblock_ptr = (__u32)buf.mem;
	227
20c76e24 HC	228	ret = kexec_add_buffer(&buf);
	229	out:
	230	return ret;
e49bb0a2 PR	231	}
e49bb0a2 PR	232
8e496426 PR	233	void kexec_file_add_components(struct kimage image,
	234	int (add_kernel)(struct kimage image,
	235	struct s390_load_data *data))
	236	{
5ecb2da6	237	unsigned long max_command_line_size = LEGACY_COMMAND_LINE_SIZE;
8e496426	238	struct s390_load_data data = {0};
5ecb2da6	239	unsigned long minsize;
8e496426 PR	240	int ret;
8e496426 PR	241
99feaa71 PR	242	data.report = ipl_report_init(&ipl_block);
	243	if (IS_ERR(data.report))
	244	return data.report;
	245
8e496426 PR	246	ret = add_kernel(image, &data);
8e496426 PR	247	if (ret)
99feaa71	248	goto out;
8e496426	249
5ecb2da6 SS	250	ret = -EINVAL;
	251	minsize = PARMAREA + offsetof(struct parmarea, command_line);
	252	if (image->kernel_buf_len < minsize)
99feaa71	253	goto out;
5ecb2da6 SS	254
	255	if (data.parm->max_command_line_size)
	256	max_command_line_size = data.parm->max_command_line_size;
	257
	258	if (minsize + max_command_line_size < minsize)
	259	goto out;
	260
	261	if (image->kernel_buf_len < minsize + max_command_line_size)
	262	goto out;
	263
	264	if (image->cmdline_buf_len >= max_command_line_size)
	265	goto out;
	266
8e496426 PR	267	memcpy(data.parm->command_line, image->cmdline_buf,
	268	image->cmdline_buf_len);
	269
	270	if (image->type == KEXEC_TYPE_CRASH) {
	271	data.parm->oldmem_base = crashk_res.start;
	272	data.parm->oldmem_size = crashk_res.end - crashk_res.start + 1;
	273	}
	274
	275	if (image->initrd_buf) {
	276	ret = kexec_file_add_initrd(image, &data);
	277	if (ret)
99feaa71	278	goto out;
8e496426 PR	279	}
	280
	281	ret = kexec_file_add_purgatory(image, &data);
	282	if (ret)
99feaa71	283	goto out;
8e496426	284
653beba2 PR	285	if (data.kernel_mem == 0) {
	286	unsigned long restart_psw = 0x0008000080000000UL;
	287	restart_psw += image->start;
	288	memcpy(data.kernel_buf, &restart_psw, sizeof(restart_psw));
	289	image->start = 0;
	290	}
	291
99feaa71 PR	292	ret = kexec_file_add_ipl_report(image, &data);
	293	out:
	294	ipl_report_free(data.report);
	295	return ERR_PTR(ret);
8e496426 PR	296	}
8e496426 PR	297
71406883 PR	298	int arch_kexec_apply_relocations_add(struct purgatory_info *pi,
	299	Elf_Shdr *section,
	300	const Elf_Shdr *relsec,
	301	const Elf_Shdr *symtab)
	302	{
edce10ee PR	303	const char strtab, name, *shstrtab;
edce10ee PR	304	const Elf_Shdr *sechdrs;
71406883	305	Elf_Rela *relas;
805bc0bc	306	int i, r_type;
41967a37	307	int ret;
71406883	308
edce10ee PR	309	/* String & section header string table */
	310	sechdrs = (void *)pi->ehdr + pi->ehdr->e_shoff;
	311	strtab = (char *)pi->ehdr + sechdrs[symtab->sh_link].sh_offset;
	312	shstrtab = (char *)pi->ehdr + sechdrs[pi->ehdr->e_shstrndx].sh_offset;
	313
71406883 PR	314	relas = (void *)pi->ehdr + relsec->sh_offset;
	315
	316	for (i = 0; i < relsec->sh_size / sizeof(*relas); i++) {
	317	const Elf_Sym sym; / symbol to relocate */
	318	unsigned long addr; /* final location after relocation */
	319	unsigned long val; /* relocated symbol value */
	320	void loc; / tmp location to modify */
	321
	322	sym = (void *)pi->ehdr + symtab->sh_offset;
	323	sym += ELF64_R_SYM(relas[i].r_info);
	324
edce10ee PR	325	if (sym->st_name)
	326	name = strtab + sym->st_name;
	327	else
	328	name = shstrtab + sechdrs[sym->st_shndx].sh_name;
	329
	330	if (sym->st_shndx == SHN_UNDEF) {
	331	pr_err("Undefined symbol: %s\n", name);
71406883	332	return -ENOEXEC;
edce10ee	333	}
71406883	334
edce10ee PR	335	if (sym->st_shndx == SHN_COMMON) {
edce10ee PR	336	pr_err("symbol '%s' in common section\n", name);
71406883	337	return -ENOEXEC;
edce10ee	338	}
71406883 PR	339
71406883 PR	340	if (sym->st_shndx >= pi->ehdr->e_shnum &&
edce10ee PR	341	sym->st_shndx != SHN_ABS) {
	342	pr_err("Invalid section %d for symbol %s\n",
	343	sym->st_shndx, name);
71406883	344	return -ENOEXEC;
edce10ee	345	}
71406883 PR	346
	347	loc = pi->purgatory_buf;
	348	loc += section->sh_offset;
	349	loc += relas[i].r_offset;
	350
	351	val = sym->st_value;
	352	if (sym->st_shndx != SHN_ABS)
	353	val += pi->sechdrs[sym->st_shndx].sh_addr;
	354	val += relas[i].r_addend;
	355
	356	addr = section->sh_addr + relas[i].r_offset;
	357
805bc0bc	358	r_type = ELF64_R_TYPE(relas[i].r_info);
abf0e8e4 AE	359
	360	if (r_type == R_390_PLT32DBL)
	361	r_type = R_390_PC32DBL;
	362
41967a37 PR	363	ret = arch_kexec_do_relocs(r_type, loc, val, addr);
	364	if (ret) {
	365	pr_err("Unknown rela relocation: %d\n", r_type);
	366	return -ENOEXEC;
	367	}
71406883 PR	368	}
	369	return 0;
	370	}
4aa93405 BH	371
	372	int arch_kimage_file_post_load_cleanup(struct kimage *image)
	373	{
	374	vfree(image->arch.ipl_buf);
	375	image->arch.ipl_buf = NULL;
	376
	377	return kexec_image_post_load_cleanup_default(image);
	378	}