1// SPDX-License-Identifier: GPL-2.0
 2#include <linux/elf.h>
 3#include <asm/kexec.h>
 4
 5int arch_kexec_do_relocs(int r_type, void *loc, unsigned long val,
 6			 unsigned long addr)
 7{
 8	switch (r_type) {
 9	case R_390_NONE:
10		break;
11	case R_390_8:		/* Direct 8 bit.   */
12		*(u8 *)loc = val;
13		break;
14	case R_390_12:		/* Direct 12 bit.  */
15		*(u16 *)loc &= 0xf000;
16		*(u16 *)loc |= val & 0xfff;
17		break;
18	case R_390_16:		/* Direct 16 bit.  */
19		*(u16 *)loc = val;
20		break;
21	case R_390_20:		/* Direct 20 bit.  */
22		*(u32 *)loc &= 0xf00000ff;
23		*(u32 *)loc |= (val & 0xfff) << 16;	/* DL */
24		*(u32 *)loc |= (val & 0xff000) >> 4;	/* DH */
25		break;
26	case R_390_32:		/* Direct 32 bit.  */
27		*(u32 *)loc = val;
28		break;
29	case R_390_64:		/* Direct 64 bit.  */
30	case R_390_GLOB_DAT:
31		*(u64 *)loc = val;
32		break;
33	case R_390_PC16:	/* PC relative 16 bit.	*/
34		*(u16 *)loc = (val - addr);
35		break;
36	case R_390_PC16DBL:	/* PC relative 16 bit shifted by 1.  */
37		*(u16 *)loc = (val - addr) >> 1;
38		break;
39	case R_390_PC32DBL:	/* PC relative 32 bit shifted by 1.  */
40		*(u32 *)loc = (val - addr) >> 1;
41		break;
42	case R_390_PC32:	/* PC relative 32 bit.	*/
43		*(u32 *)loc = (val - addr);
44		break;
45	case R_390_PC64:	/* PC relative 64 bit.	*/
46		*(u64 *)loc = (val - addr);
47		break;
48	case R_390_RELATIVE:
49		*(unsigned long *) loc = val;
50		break;
51	default:
52		return 1;
53	}
54	return 0;
55}