arch/um/include/sysdep-x86_64/ptrace.h

   1 /*
   2  * Copyright 2003 PathScale, Inc.
   3  *
   4  * Licensed under the GPL
   5  */
   6
   7 #ifndef __SYSDEP_X86_64_PTRACE_H
   8 #define __SYSDEP_X86_64_PTRACE_H
   9
  10 #include "uml-config.h"
  11
  12 #ifdef UML_CONFIG_MODE_TT
  13 #include "sysdep/sc.h"
  14 #endif
  15
  16 #ifdef UML_CONFIG_MODE_SKAS
  17 #include "skas_ptregs.h"
  18
  19 #define REGS_IP(r) ((r)[HOST_IP])
  20 #define REGS_SP(r) ((r)[HOST_SP])
  21
  22 #define REGS_RBX(r) ((r)[HOST_RBX])
  23 #define REGS_RCX(r) ((r)[HOST_RCX])
  24 #define REGS_RDX(r) ((r)[HOST_RDX])
  25 #define REGS_RSI(r) ((r)[HOST_RSI])
  26 #define REGS_RDI(r) ((r)[HOST_RDI])
  27 #define REGS_RBP(r) ((r)[HOST_RBP])
  28 #define REGS_RAX(r) ((r)[HOST_RAX])
  29 #define REGS_R8(r) ((r)[HOST_R8])
  30 #define REGS_R9(r) ((r)[HOST_R9])
  31 #define REGS_R10(r) ((r)[HOST_R10])
  32 #define REGS_R11(r) ((r)[HOST_R11])
  33 #define REGS_R12(r) ((r)[HOST_R12])
  34 #define REGS_R13(r) ((r)[HOST_R13])
  35 #define REGS_R14(r) ((r)[HOST_R14])
  36 #define REGS_R15(r) ((r)[HOST_R15])
  37 #define REGS_CS(r) ((r)[HOST_CS])
  38 #define REGS_EFLAGS(r) ((r)[HOST_EFLAGS])
  39 #define REGS_SS(r) ((r)[HOST_SS])
  40
  41 #define HOST_FS_BASE 21
  42 #define HOST_GS_BASE 22
  43 #define HOST_DS 23
  44 #define HOST_ES 24
  45 #define HOST_FS 25
  46 #define HOST_GS 26
  47
  48 #define REGS_FS_BASE(r) ((r)[HOST_FS_BASE])
  49 #define REGS_GS_BASE(r) ((r)[HOST_GS_BASE])
  50 #define REGS_DS(r) ((r)[HOST_DS])
  51 #define REGS_ES(r) ((r)[HOST_ES])
  52 #define REGS_FS(r) ((r)[HOST_FS])
  53 #define REGS_GS(r) ((r)[HOST_GS])
  54
  55 #define REGS_ORIG_RAX(r) ((r)[HOST_ORIG_RAX])
  56
  57 #define REGS_SET_SYSCALL_RETURN(r, res) REGS_RAX(r) = (res)
  58
  59 #define REGS_RESTART_SYSCALL(r) IP_RESTART_SYSCALL(REGS_IP(r))
  60
  61 #define REGS_SEGV_IS_FIXABLE(r) SEGV_IS_FIXABLE((r)->trap_type)
  62
  63 #define REGS_FAULT_ADDR(r) ((r)->fault_addr)
  64
  65 #define REGS_FAULT_WRITE(r) FAULT_WRITE((r)->fault_type)
  66
  67 #define REGS_TRAP(r) ((r)->trap_type)
  68
  69 #define REGS_ERR(r) ((r)->fault_type)
  70
  71 #endif
  72
  73 #include "choose-mode.h"
  74
  75 /* XXX */
  76 union uml_pt_regs {
  77 #ifdef UML_CONFIG_MODE_TT
  78         struct tt_regs {
  79                 long syscall;
  80                 unsigned long orig_rax;
  81                 void *sc;
  82         } tt;
  83 #endif
  84 #ifdef UML_CONFIG_MODE_SKAS
  85         struct skas_regs {
  86                 /* XXX */
  87                 unsigned long regs[27];
  88                 unsigned long fp[65];
  89                 unsigned long fault_addr;
  90                 unsigned long fault_type;
  91                 unsigned long trap_type;
  92                 long syscall;
  93                 int is_user;
  94         } skas;
  95 #endif
  96 };
  97
  98 #define EMPTY_UML_PT_REGS { }
  99
 100 /* XXX */
 101 extern int mode_tt;
 102
 103 #define UPT_RBX(r) CHOOSE_MODE(SC_RBX(UPT_SC(r)), REGS_RBX((r)->skas.regs))
 104 #define UPT_RCX(r) CHOOSE_MODE(SC_RCX(UPT_SC(r)), REGS_RCX((r)->skas.regs))
 105 #define UPT_RDX(r) CHOOSE_MODE(SC_RDX(UPT_SC(r)), REGS_RDX((r)->skas.regs))
 106 #define UPT_RSI(r) CHOOSE_MODE(SC_RSI(UPT_SC(r)), REGS_RSI((r)->skas.regs))
 107 #define UPT_RDI(r) CHOOSE_MODE(SC_RDI(UPT_SC(r)), REGS_RDI((r)->skas.regs))
 108 #define UPT_RBP(r) CHOOSE_MODE(SC_RBP(UPT_SC(r)), REGS_RBP((r)->skas.regs))
 109 #define UPT_RAX(r) CHOOSE_MODE(SC_RAX(UPT_SC(r)), REGS_RAX((r)->skas.regs))
 110 #define UPT_R8(r) CHOOSE_MODE(SC_R8(UPT_SC(r)), REGS_R8((r)->skas.regs))
 111 #define UPT_R9(r) CHOOSE_MODE(SC_R9(UPT_SC(r)), REGS_R9((r)->skas.regs))
 112 #define UPT_R10(r) CHOOSE_MODE(SC_R10(UPT_SC(r)), REGS_R10((r)->skas.regs))
 113 #define UPT_R11(r) CHOOSE_MODE(SC_R11(UPT_SC(r)), REGS_R11((r)->skas.regs))
 114 #define UPT_R12(r) CHOOSE_MODE(SC_R12(UPT_SC(r)), REGS_R12((r)->skas.regs))
 115 #define UPT_R13(r) CHOOSE_MODE(SC_R13(UPT_SC(r)), REGS_R13((r)->skas.regs))
 116 #define UPT_R14(r) CHOOSE_MODE(SC_R14(UPT_SC(r)), REGS_R14((r)->skas.regs))
 117 #define UPT_R15(r) CHOOSE_MODE(SC_R15(UPT_SC(r)), REGS_R15((r)->skas.regs))
 118 #define UPT_CS(r) CHOOSE_MODE(SC_CS(UPT_SC(r)), REGS_CS((r)->skas.regs))
 119 #define UPT_FS(r) CHOOSE_MODE(SC_FS(UPT_SC(r)), REGS_FS((r)->skas.regs))
 120 #define UPT_GS(r) CHOOSE_MODE(SC_GS(UPT_SC(r)), REGS_GS((r)->skas.regs))
 121 #define UPT_DS(r) CHOOSE_MODE(SC_DS(UPT_SC(r)), REGS_DS((r)->skas.regs))
 122 #define UPT_ES(r) CHOOSE_MODE(SC_ES(UPT_SC(r)), REGS_ES((r)->skas.regs))
 123 #define UPT_CS(r) CHOOSE_MODE(SC_CS(UPT_SC(r)), REGS_CS((r)->skas.regs))
 124 #define UPT_ORIG_RAX(r) \
 125         CHOOSE_MODE((r)->tt.orig_rax, REGS_ORIG_RAX((r)->skas.regs))
 126
 127 #define UPT_IP(r) CHOOSE_MODE(SC_IP(UPT_SC(r)), REGS_IP((r)->skas.regs))
 128 #define UPT_SP(r) CHOOSE_MODE(SC_SP(UPT_SC(r)), REGS_SP((r)->skas.regs))
 129
 130 #define UPT_EFLAGS(r) \
 131         CHOOSE_MODE(SC_EFLAGS(UPT_SC(r)), REGS_EFLAGS((r)->skas.regs))
 132 #define UPT_SC(r) ((r)->tt.sc)
 133 #define UPT_SYSCALL_NR(r) CHOOSE_MODE((r)->tt.syscall, (r)->skas.syscall)
 134
 135 extern int user_context(unsigned long sp);
 136
 137 #define UPT_IS_USER(r) \
 138         CHOOSE_MODE(user_context(UPT_SP(r)), (r)->skas.is_user)
 139
 140 #define UPT_SYSCALL_ARG1(r) UPT_RDI(r)
 141 #define UPT_SYSCALL_ARG2(r) UPT_RSI(r)
 142 #define UPT_SYSCALL_ARG3(r) UPT_RDX(r)
 143 #define UPT_SYSCALL_ARG4(r) UPT_R10(r)
 144 #define UPT_SYSCALL_ARG5(r) UPT_R8(r)
 145 #define UPT_SYSCALL_ARG6(r) UPT_R9(r)
 146
 147 struct syscall_args {
 148         unsigned long args[6];
 149 };
 150
 151 #define SYSCALL_ARGS(r) ((struct syscall_args) \
 152                         { .args = { UPT_SYSCALL_ARG1(r), \
 153                                     UPT_SYSCALL_ARG2(r), \
 154                                     UPT_SYSCALL_ARG3(r), \
 155                                     UPT_SYSCALL_ARG4(r), \
 156                                     UPT_SYSCALL_ARG5(r), \
 157                                     UPT_SYSCALL_ARG6(r) } } )
 158
 159 #define UPT_REG(regs, reg) \
 160         ({      unsigned long val; \
 161                 switch(reg){ \
 162                 case R8: val = UPT_R8(regs); break; \
 163                 case R9: val = UPT_R9(regs); break; \
 164                 case R10: val = UPT_R10(regs); break; \
 165                 case R11: val = UPT_R11(regs); break; \
 166                 case R12: val = UPT_R12(regs); break; \
 167                 case R13: val = UPT_R13(regs); break; \
 168                 case R14: val = UPT_R14(regs); break; \
 169                 case R15: val = UPT_R15(regs); break; \
 170                 case RIP: val = UPT_IP(regs); break; \
 171                 case RSP: val = UPT_SP(regs); break; \
 172                 case RAX: val = UPT_RAX(regs); break; \
 173                 case RBX: val = UPT_RBX(regs); break; \
 174                 case RCX: val = UPT_RCX(regs); break; \
 175                 case RDX: val = UPT_RDX(regs); break; \
 176                 case RSI: val = UPT_RSI(regs); break; \
 177                 case RDI: val = UPT_RDI(regs); break; \
 178                 case RBP: val = UPT_RBP(regs); break; \
 179                 case ORIG_RAX: val = UPT_ORIG_RAX(regs); break; \
 180                 case CS: val = UPT_CS(regs); break; \
 181                 case DS: val = UPT_DS(regs); break; \
 182                 case ES: val = UPT_ES(regs); break; \
 183                 case FS: val = UPT_FS(regs); break; \
 184                 case GS: val = UPT_GS(regs); break; \
 185                 case EFLAGS: val = UPT_EFLAGS(regs); break; \
 186                 default :  \
 187                         panic("Bad register in UPT_REG : %d\n", reg);  \
 188                         val = -1; \
 189                 } \
 190                 val; \
 191         })
 192
 193
 194 #define UPT_SET(regs, reg, val) \
 195         ({      unsigned long val; \
 196                 switch(reg){ \
 197                 case R8: UPT_R8(regs) = val; break; \
 198                 case R9: UPT_R9(regs) = val; break; \
 199                 case R10: UPT_R10(regs) = val; break; \
 200                 case R11: UPT_R11(regs) = val; break; \
 201                 case R12: UPT_R12(regs) = val; break; \
 202                 case R13: UPT_R13(regs) = val; break; \
 203                 case R14: UPT_R14(regs) = val; break; \
 204                 case R15: UPT_R15(regs) = val; break; \
 205                 case RIP: UPT_IP(regs) = val; break; \
 206                 case RSP: UPT_SP(regs) = val; break; \
 207                 case RAX: UPT_RAX(regs) = val; break; \
 208                 case RBX: UPT_RBX(regs) = val; break; \
 209                 case RCX: UPT_RCX(regs) = val; break; \
 210                 case RDX: UPT_RDX(regs) = val; break; \
 211                 case RSI: UPT_RSI(regs) = val; break; \
 212                 case RDI: UPT_RDI(regs) = val; break; \
 213                 case RBP: UPT_RBP(regs) = val; break; \
 214                 case ORIG_RAX: UPT_ORIG_RAX(regs) = val; break; \
 215                 case CS: UPT_CS(regs) = val; break; \
 216                 case DS: UPT_DS(regs) = val; break; \
 217                 case ES: UPT_ES(regs) = val; break; \
 218                 case FS: UPT_FS(regs) = val; break; \
 219                 case GS: UPT_GS(regs) = val; break; \
 220                 case EFLAGS: UPT_EFLAGS(regs) = val; break; \
 221                 default :  \
 222                         panic("Bad register in UPT_SET : %d\n", reg);  \
 223                         break; \
 224                 } \
 225                 val; \
 226         })
 227
 228 #define UPT_SET_SYSCALL_RETURN(r, res) \
 229         CHOOSE_MODE(SC_SET_SYSCALL_RETURN(UPT_SC(r), (res)), \
 230                     REGS_SET_SYSCALL_RETURN((r)->skas.regs, (res)))
 231
 232 #define UPT_RESTART_SYSCALL(r) \
 233         CHOOSE_MODE(SC_RESTART_SYSCALL(UPT_SC(r)), \
 234                     REGS_RESTART_SYSCALL((r)->skas.regs))
 235
 236 #define UPT_SEGV_IS_FIXABLE(r) \
 237         CHOOSE_MODE(SC_SEGV_IS_FIXABLE(UPT_SC(r)), \
 238                     REGS_SEGV_IS_FIXABLE(&r->skas))
 239
 240 #define UPT_FAULT_ADDR(r) \
 241         CHOOSE_MODE(SC_FAULT_ADDR(UPT_SC(r)), REGS_FAULT_ADDR(&r->skas))
 242
 243 #define UPT_FAULT_WRITE(r) \
 244         CHOOSE_MODE(SC_FAULT_WRITE(UPT_SC(r)), REGS_FAULT_WRITE(&r->skas))
 245
 246 #define UPT_TRAP(r) CHOOSE_MODE(SC_TRAP_TYPE(UPT_SC(r)), REGS_TRAP(&r->skas))
 247 #define UPT_ERR(r) CHOOSE_MODE(SC_FAULT_TYPE(UPT_SC(r)), REGS_ERR(&r->skas))
 248
 249 #endif
 250
 251 /*
 252  * Overrides for Emacs so that we follow Linus's tabbing style.
 253  * Emacs will notice this stuff at the end of the file and automatically
 254  * adjust the settings for this buffer only.  This must remain at the end
 255  * of the file.
 256  * ---------------------------------------------------------------------------
 257  * Local variables:
 258  * c-file-style: "linux"
 259  * End:
 260  */