Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 1 | /* |
| 2 | * include/asm-s390/elf.h |
| 3 | * |
| 4 | * S390 version |
| 5 | * |
| 6 | * Derived from "include/asm-i386/elf.h" |
| 7 | */ |
| 8 | |
| 9 | #ifndef __ASMS390_ELF_H |
| 10 | #define __ASMS390_ELF_H |
| 11 | |
| 12 | /* s390 relocations defined by the ABIs */ |
| 13 | #define R_390_NONE 0 /* No reloc. */ |
| 14 | #define R_390_8 1 /* Direct 8 bit. */ |
| 15 | #define R_390_12 2 /* Direct 12 bit. */ |
| 16 | #define R_390_16 3 /* Direct 16 bit. */ |
| 17 | #define R_390_32 4 /* Direct 32 bit. */ |
| 18 | #define R_390_PC32 5 /* PC relative 32 bit. */ |
| 19 | #define R_390_GOT12 6 /* 12 bit GOT offset. */ |
| 20 | #define R_390_GOT32 7 /* 32 bit GOT offset. */ |
| 21 | #define R_390_PLT32 8 /* 32 bit PC relative PLT address. */ |
| 22 | #define R_390_COPY 9 /* Copy symbol at runtime. */ |
| 23 | #define R_390_GLOB_DAT 10 /* Create GOT entry. */ |
| 24 | #define R_390_JMP_SLOT 11 /* Create PLT entry. */ |
| 25 | #define R_390_RELATIVE 12 /* Adjust by program base. */ |
| 26 | #define R_390_GOTOFF32 13 /* 32 bit offset to GOT. */ |
| 27 | #define R_390_GOTPC 14 /* 32 bit PC rel. offset to GOT. */ |
| 28 | #define R_390_GOT16 15 /* 16 bit GOT offset. */ |
| 29 | #define R_390_PC16 16 /* PC relative 16 bit. */ |
| 30 | #define R_390_PC16DBL 17 /* PC relative 16 bit shifted by 1. */ |
| 31 | #define R_390_PLT16DBL 18 /* 16 bit PC rel. PLT shifted by 1. */ |
| 32 | #define R_390_PC32DBL 19 /* PC relative 32 bit shifted by 1. */ |
| 33 | #define R_390_PLT32DBL 20 /* 32 bit PC rel. PLT shifted by 1. */ |
| 34 | #define R_390_GOTPCDBL 21 /* 32 bit PC rel. GOT shifted by 1. */ |
| 35 | #define R_390_64 22 /* Direct 64 bit. */ |
| 36 | #define R_390_PC64 23 /* PC relative 64 bit. */ |
| 37 | #define R_390_GOT64 24 /* 64 bit GOT offset. */ |
| 38 | #define R_390_PLT64 25 /* 64 bit PC relative PLT address. */ |
| 39 | #define R_390_GOTENT 26 /* 32 bit PC rel. to GOT entry >> 1. */ |
| 40 | #define R_390_GOTOFF16 27 /* 16 bit offset to GOT. */ |
| 41 | #define R_390_GOTOFF64 28 /* 64 bit offset to GOT. */ |
| 42 | #define R_390_GOTPLT12 29 /* 12 bit offset to jump slot. */ |
| 43 | #define R_390_GOTPLT16 30 /* 16 bit offset to jump slot. */ |
| 44 | #define R_390_GOTPLT32 31 /* 32 bit offset to jump slot. */ |
| 45 | #define R_390_GOTPLT64 32 /* 64 bit offset to jump slot. */ |
| 46 | #define R_390_GOTPLTENT 33 /* 32 bit rel. offset to jump slot. */ |
| 47 | #define R_390_PLTOFF16 34 /* 16 bit offset from GOT to PLT. */ |
| 48 | #define R_390_PLTOFF32 35 /* 32 bit offset from GOT to PLT. */ |
| 49 | #define R_390_PLTOFF64 36 /* 16 bit offset from GOT to PLT. */ |
| 50 | #define R_390_TLS_LOAD 37 /* Tag for load insn in TLS code. */ |
| 51 | #define R_390_TLS_GDCALL 38 /* Tag for function call in general |
| 52 | dynamic TLS code. */ |
| 53 | #define R_390_TLS_LDCALL 39 /* Tag for function call in local |
| 54 | dynamic TLS code. */ |
| 55 | #define R_390_TLS_GD32 40 /* Direct 32 bit for general dynamic |
| 56 | thread local data. */ |
| 57 | #define R_390_TLS_GD64 41 /* Direct 64 bit for general dynamic |
| 58 | thread local data. */ |
| 59 | #define R_390_TLS_GOTIE12 42 /* 12 bit GOT offset for static TLS |
| 60 | block offset. */ |
| 61 | #define R_390_TLS_GOTIE32 43 /* 32 bit GOT offset for static TLS |
| 62 | block offset. */ |
| 63 | #define R_390_TLS_GOTIE64 44 /* 64 bit GOT offset for static TLS |
| 64 | block offset. */ |
| 65 | #define R_390_TLS_LDM32 45 /* Direct 32 bit for local dynamic |
| 66 | thread local data in LD code. */ |
| 67 | #define R_390_TLS_LDM64 46 /* Direct 64 bit for local dynamic |
| 68 | thread local data in LD code. */ |
| 69 | #define R_390_TLS_IE32 47 /* 32 bit address of GOT entry for |
| 70 | negated static TLS block offset. */ |
| 71 | #define R_390_TLS_IE64 48 /* 64 bit address of GOT entry for |
| 72 | negated static TLS block offset. */ |
| 73 | #define R_390_TLS_IEENT 49 /* 32 bit rel. offset to GOT entry for |
| 74 | negated static TLS block offset. */ |
| 75 | #define R_390_TLS_LE32 50 /* 32 bit negated offset relative to |
| 76 | static TLS block. */ |
| 77 | #define R_390_TLS_LE64 51 /* 64 bit negated offset relative to |
| 78 | static TLS block. */ |
| 79 | #define R_390_TLS_LDO32 52 /* 32 bit offset relative to TLS |
| 80 | block. */ |
| 81 | #define R_390_TLS_LDO64 53 /* 64 bit offset relative to TLS |
| 82 | block. */ |
| 83 | #define R_390_TLS_DTPMOD 54 /* ID of module containing symbol. */ |
| 84 | #define R_390_TLS_DTPOFF 55 /* Offset in TLS block. */ |
| 85 | #define R_390_TLS_TPOFF 56 /* Negate offset in static TLS |
| 86 | block. */ |
| 87 | #define R_390_20 57 /* Direct 20 bit. */ |
| 88 | #define R_390_GOT20 58 /* 20 bit GOT offset. */ |
| 89 | #define R_390_GOTPLT20 59 /* 20 bit offset to jump slot. */ |
| 90 | #define R_390_TLS_GOTIE20 60 /* 20 bit GOT offset for static TLS |
| 91 | block offset. */ |
| 92 | /* Keep this the last entry. */ |
| 93 | #define R_390_NUM 61 |
| 94 | |
| 95 | /* |
| 96 | * ELF register definitions.. |
| 97 | */ |
| 98 | |
Tim Schmielau | 8c65b4a | 2005-11-07 00:59:43 -0800 | [diff] [blame] | 99 | #include <linux/sched.h> /* for task_struct */ |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 100 | #include <asm/ptrace.h> |
| 101 | #include <asm/user.h> |
| 102 | #include <asm/system.h> /* for save_access_regs */ |
| 103 | |
| 104 | |
| 105 | typedef s390_fp_regs elf_fpregset_t; |
| 106 | typedef s390_regs elf_gregset_t; |
| 107 | |
| 108 | /* |
| 109 | * These are used to set parameters in the core dumps. |
| 110 | */ |
| 111 | #ifndef __s390x__ |
| 112 | #define ELF_CLASS ELFCLASS32 |
| 113 | #else /* __s390x__ */ |
| 114 | #define ELF_CLASS ELFCLASS64 |
| 115 | #endif /* __s390x__ */ |
| 116 | #define ELF_DATA ELFDATA2MSB |
| 117 | #define ELF_ARCH EM_S390 |
| 118 | |
| 119 | /* |
| 120 | * This is used to ensure we don't load something for the wrong architecture. |
| 121 | */ |
| 122 | #define elf_check_arch(x) \ |
| 123 | (((x)->e_machine == EM_S390 || (x)->e_machine == EM_S390_OLD) \ |
| 124 | && (x)->e_ident[EI_CLASS] == ELF_CLASS) |
| 125 | |
| 126 | /* For SVR4/S390 the function pointer to be registered with `atexit` is |
| 127 | passed in R14. */ |
| 128 | #define ELF_PLAT_INIT(_r, load_addr) \ |
| 129 | do { \ |
| 130 | _r->gprs[14] = 0; \ |
| 131 | } while (0) |
| 132 | |
| 133 | #define USE_ELF_CORE_DUMP |
| 134 | #define ELF_EXEC_PAGESIZE 4096 |
| 135 | |
| 136 | /* This is the location that an ET_DYN program is loaded if exec'ed. Typical |
| 137 | use of this is to invoke "./ld.so someprog" to test out a new version of |
| 138 | the loader. We need to make sure that it is out of the way of the program |
| 139 | that it will "exec", and that there is sufficient room for the brk. */ |
| 140 | |
| 141 | #ifndef __s390x__ |
| 142 | #define ELF_ET_DYN_BASE ((TASK_SIZE & 0x80000000) \ |
| 143 | ? TASK_SIZE / 3 * 2 \ |
| 144 | : 2 * TASK_SIZE / 3) |
| 145 | #else /* __s390x__ */ |
| 146 | #define ELF_ET_DYN_BASE (TASK_SIZE / 3 * 2) |
| 147 | #endif /* __s390x__ */ |
| 148 | |
| 149 | /* Wow, the "main" arch needs arch dependent functions too.. :) */ |
| 150 | |
| 151 | /* regs is struct pt_regs, pr_reg is elf_gregset_t (which is |
| 152 | now struct_user_regs, they are different) */ |
| 153 | |
| 154 | static inline int dump_regs(struct pt_regs *ptregs, elf_gregset_t *regs) |
| 155 | { |
| 156 | memcpy(®s->psw, &ptregs->psw, sizeof(regs->psw)+sizeof(regs->gprs)); |
| 157 | save_access_regs(regs->acrs); |
| 158 | regs->orig_gpr2 = ptregs->orig_gpr2; |
| 159 | return 1; |
| 160 | } |
| 161 | |
| 162 | #define ELF_CORE_COPY_REGS(pr_reg, regs) dump_regs(regs, &pr_reg); |
| 163 | |
| 164 | static inline int dump_task_regs(struct task_struct *tsk, elf_gregset_t *regs) |
| 165 | { |
Al Viro | c7584fb | 2006-01-12 01:05:49 -0800 | [diff] [blame] | 166 | struct pt_regs *ptregs = task_pt_regs(tsk); |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 167 | memcpy(®s->psw, &ptregs->psw, sizeof(regs->psw)+sizeof(regs->gprs)); |
| 168 | memcpy(regs->acrs, tsk->thread.acrs, sizeof(regs->acrs)); |
| 169 | regs->orig_gpr2 = ptregs->orig_gpr2; |
| 170 | return 1; |
| 171 | } |
| 172 | |
| 173 | #define ELF_CORE_COPY_TASK_REGS(tsk, regs) dump_task_regs(tsk, regs) |
| 174 | |
| 175 | static inline int dump_task_fpu(struct task_struct *tsk, elf_fpregset_t *fpregs) |
| 176 | { |
| 177 | if (tsk == current) |
| 178 | save_fp_regs(fpregs); |
| 179 | else |
| 180 | memcpy(fpregs, &tsk->thread.fp_regs, sizeof(elf_fpregset_t)); |
| 181 | return 1; |
| 182 | } |
| 183 | |
| 184 | #define ELF_CORE_COPY_FPREGS(tsk, fpregs) dump_task_fpu(tsk, fpregs) |
| 185 | |
| 186 | |
| 187 | /* This yields a mask that user programs can use to figure out what |
| 188 | instruction set this CPU supports. */ |
| 189 | |
| 190 | #define ELF_HWCAP (0) |
| 191 | |
| 192 | /* This yields a string that ld.so will use to load implementation |
| 193 | specific libraries for optimization. This is more specific in |
| 194 | intent than poking at uname or /proc/cpuinfo. |
| 195 | |
| 196 | For the moment, we have only optimizations for the Intel generations, |
| 197 | but that could change... */ |
| 198 | |
| 199 | #define ELF_PLATFORM (NULL) |
| 200 | |
| 201 | #ifdef __KERNEL__ |
| 202 | #ifndef __s390x__ |
| 203 | #define SET_PERSONALITY(ex, ibcs2) set_personality((ibcs2)?PER_SVR4:PER_LINUX) |
| 204 | #else /* __s390x__ */ |
| 205 | #define SET_PERSONALITY(ex, ibcs2) \ |
| 206 | do { \ |
| 207 | if (ibcs2) \ |
| 208 | set_personality(PER_SVR4); \ |
| 209 | else if (current->personality != PER_LINUX32) \ |
| 210 | set_personality(PER_LINUX); \ |
| 211 | clear_thread_flag(TIF_31BIT); \ |
| 212 | } while (0) |
| 213 | #endif /* __s390x__ */ |
| 214 | #endif |
| 215 | |
| 216 | #endif |