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

   1 /*
   2  * Copyright (C) 2000, 2001, 2002 Jeff Dike (jdike@karaya.com)
   3  * Licensed under the GPL
   4  */
   5
   6 #ifndef __SYSDEP_I386_PTRACE_H
   7 #define __SYSDEP_I386_PTRACE_H
   8
   9 #include "uml-config.h"
  10
  11 #ifdef UML_CONFIG_MODE_TT
  12 #include "sysdep/sc.h"
  13 #endif
  14
  15 #ifdef UML_CONFIG_MODE_SKAS
  16
  17 /* syscall emulation path in ptrace */
  18
  19 #ifndef PTRACE_SYSEMU
  20 #define PTRACE_SYSEMU 31
  21 #endif
  22
  23 void set_using_sysemu(int value);
  24 int get_using_sysemu(void);
  25 extern int sysemu_supported;
  26
  27 #include "skas_ptregs.h"
  28
  29 #define HOST_FRAME_SIZE 17
  30
  31 #define REGS_IP(r) ((r)[HOST_IP])
  32 #define REGS_SP(r) ((r)[HOST_SP])
  33 #define REGS_EFLAGS(r) ((r)[HOST_EFLAGS])
  34 #define REGS_EAX(r) ((r)[HOST_EAX])
  35 #define REGS_EBX(r) ((r)[HOST_EBX])
  36 #define REGS_ECX(r) ((r)[HOST_ECX])
  37 #define REGS_EDX(r) ((r)[HOST_EDX])
  38 #define REGS_ESI(r) ((r)[HOST_ESI])
  39 #define REGS_EDI(r) ((r)[HOST_EDI])
  40 #define REGS_EBP(r) ((r)[HOST_EBP])
  41 #define REGS_CS(r) ((r)[HOST_CS])
  42 #define REGS_SS(r) ((r)[HOST_SS])
  43 #define REGS_DS(r) ((r)[HOST_DS])
  44 #define REGS_ES(r) ((r)[HOST_ES])
  45 #define REGS_FS(r) ((r)[HOST_FS])
  46 #define REGS_GS(r) ((r)[HOST_GS])
  47
  48 #define REGS_SET_SYSCALL_RETURN(r, res) REGS_EAX(r) = (res)
  49
  50 #define REGS_RESTART_SYSCALL(r) IP_RESTART_SYSCALL(REGS_IP(r))
  51
  52 #define REGS_SEGV_IS_FIXABLE(r) SEGV_IS_FIXABLE((r)->trap_type)
  53
  54 #define REGS_FAULT_ADDR(r) ((r)->fault_addr)
  55
  56 #define REGS_FAULT_WRITE(r) FAULT_WRITE((r)->fault_type)
  57
  58 #endif
  59 #ifndef PTRACE_SYSEMU_SINGLESTEP
  60 #define PTRACE_SYSEMU_SINGLESTEP 32
  61 #endif
  62
  63 #include "choose-mode.h"
  64
  65 union uml_pt_regs {
  66 #ifdef UML_CONFIG_MODE_TT
  67         struct tt_regs {
  68                 long syscall;
  69                 void *sc;
  70         } tt;
  71 #endif
  72 #ifdef UML_CONFIG_MODE_SKAS
  73         struct skas_regs {
  74                 unsigned long regs[HOST_FRAME_SIZE];
  75                 unsigned long fp[HOST_FP_SIZE];
  76                 unsigned long xfp[HOST_XFP_SIZE];
  77                 unsigned long fault_addr;
  78                 unsigned long fault_type;
  79                 unsigned long trap_type;
  80                 long syscall;
  81                 int is_user;
  82         } skas;
  83 #endif
  84 };
  85
  86 #define EMPTY_UML_PT_REGS { }
  87
  88 extern int mode_tt;
  89
  90 #define UPT_SC(r) ((r)->tt.sc)
  91 #define UPT_IP(r) \
  92         CHOOSE_MODE(SC_IP(UPT_SC(r)), REGS_IP((r)->skas.regs))
  93 #define UPT_SP(r) \
  94         CHOOSE_MODE(SC_SP(UPT_SC(r)), REGS_SP((r)->skas.regs))
  95 #define UPT_EFLAGS(r) \
  96         CHOOSE_MODE(SC_EFLAGS(UPT_SC(r)), REGS_EFLAGS((r)->skas.regs))
  97 #define UPT_EAX(r) \
  98         CHOOSE_MODE(SC_EAX(UPT_SC(r)), REGS_EAX((r)->skas.regs))
  99 #define UPT_EBX(r) \
 100         CHOOSE_MODE(SC_EBX(UPT_SC(r)), REGS_EBX((r)->skas.regs))
 101 #define UPT_ECX(r) \
 102         CHOOSE_MODE(SC_ECX(UPT_SC(r)), REGS_ECX((r)->skas.regs))
 103 #define UPT_EDX(r) \
 104         CHOOSE_MODE(SC_EDX(UPT_SC(r)), REGS_EDX((r)->skas.regs))
 105 #define UPT_ESI(r) \
 106         CHOOSE_MODE(SC_ESI(UPT_SC(r)), REGS_ESI((r)->skas.regs))
 107 #define UPT_EDI(r) \
 108         CHOOSE_MODE(SC_EDI(UPT_SC(r)), REGS_EDI((r)->skas.regs))
 109 #define UPT_EBP(r) \
 110         CHOOSE_MODE(SC_EBP(UPT_SC(r)), REGS_EBP((r)->skas.regs))
 111 #define UPT_ORIG_EAX(r) \
 112         CHOOSE_MODE((r)->tt.syscall, (r)->skas.syscall)
 113 #define UPT_CS(r) \
 114         CHOOSE_MODE(SC_CS(UPT_SC(r)), REGS_CS((r)->skas.regs))
 115 #define UPT_SS(r) \
 116         CHOOSE_MODE(SC_SS(UPT_SC(r)), REGS_SS((r)->skas.regs))
 117 #define UPT_DS(r) \
 118         CHOOSE_MODE(SC_DS(UPT_SC(r)), REGS_DS((r)->skas.regs))
 119 #define UPT_ES(r) \
 120         CHOOSE_MODE(SC_ES(UPT_SC(r)), REGS_ES((r)->skas.regs))
 121 #define UPT_FS(r) \
 122         CHOOSE_MODE(SC_FS(UPT_SC(r)), REGS_FS((r)->skas.regs))
 123 #define UPT_GS(r) \
 124         CHOOSE_MODE(SC_GS(UPT_SC(r)), REGS_GS((r)->skas.regs))
 125
 126 #define UPT_SYSCALL_ARG1(r) UPT_EBX(r)
 127 #define UPT_SYSCALL_ARG2(r) UPT_ECX(r)
 128 #define UPT_SYSCALL_ARG3(r) UPT_EDX(r)
 129 #define UPT_SYSCALL_ARG4(r) UPT_ESI(r)
 130 #define UPT_SYSCALL_ARG5(r) UPT_EDI(r)
 131 #define UPT_SYSCALL_ARG6(r) UPT_EBP(r)
 132
 133 extern int user_context(unsigned long sp);
 134
 135 #define UPT_IS_USER(r) \
 136         CHOOSE_MODE(user_context(UPT_SP(r)), (r)->skas.is_user)
 137
 138 struct syscall_args {
 139         unsigned long args[6];
 140 };
 141
 142 #define SYSCALL_ARGS(r) ((struct syscall_args) \
 143                         { .args = { UPT_SYSCALL_ARG1(r), \
 144                                     UPT_SYSCALL_ARG2(r), \
 145                                     UPT_SYSCALL_ARG3(r), \
 146                                     UPT_SYSCALL_ARG4(r), \
 147                                     UPT_SYSCALL_ARG5(r), \
 148                                     UPT_SYSCALL_ARG6(r) } } )
 149
 150 #define UPT_REG(regs, reg) \
 151         ({      unsigned long val; \
 152                 switch(reg){ \
 153                 case EIP: val = UPT_IP(regs); break; \
 154                 case UESP: val = UPT_SP(regs); break; \
 155                 case EAX: val = UPT_EAX(regs); break; \
 156                 case EBX: val = UPT_EBX(regs); break; \
 157                 case ECX: val = UPT_ECX(regs); break; \
 158                 case EDX: val = UPT_EDX(regs); break; \
 159                 case ESI: val = UPT_ESI(regs); break; \
 160                 case EDI: val = UPT_EDI(regs); break; \
 161                 case EBP: val = UPT_EBP(regs); break; \
 162                 case ORIG_EAX: val = UPT_ORIG_EAX(regs); break; \
 163                 case CS: val = UPT_CS(regs); break; \
 164                 case SS: val = UPT_SS(regs); break; \
 165                 case DS: val = UPT_DS(regs); break; \
 166                 case ES: val = UPT_ES(regs); break; \
 167                 case FS: val = UPT_FS(regs); break; \
 168                 case GS: val = UPT_GS(regs); break; \
 169                 case EFL: val = UPT_EFLAGS(regs); break; \
 170                 default :  \
 171                         panic("Bad register in UPT_REG : %d\n", reg);  \
 172                         val = -1; \
 173                 } \
 174                 val; \
 175         })
 176
 177
 178 #define UPT_SET(regs, reg, val) \
 179         do { \
 180                 switch(reg){ \
 181                 case EIP: UPT_IP(regs) = val; break; \
 182                 case UESP: UPT_SP(regs) = val; break; \
 183                 case EAX: UPT_EAX(regs) = val; break; \
 184                 case EBX: UPT_EBX(regs) = val; break; \
 185                 case ECX: UPT_ECX(regs) = val; break; \
 186                 case EDX: UPT_EDX(regs) = val; break; \
 187                 case ESI: UPT_ESI(regs) = val; break; \
 188                 case EDI: UPT_EDI(regs) = val; break; \
 189                 case EBP: UPT_EBP(regs) = val; break; \
 190                 case ORIG_EAX: UPT_ORIG_EAX(regs) = val; break; \
 191                 case CS: UPT_CS(regs) = val; break; \
 192                 case SS: UPT_SS(regs) = val; break; \
 193                 case DS: UPT_DS(regs) = val; break; \
 194                 case ES: UPT_ES(regs) = val; break; \
 195                 case FS: UPT_FS(regs) = val; break; \
 196                 case GS: UPT_GS(regs) = val; break; \
 197                 case EFL: UPT_EFLAGS(regs) = val; break; \
 198                 default :  \
 199                         panic("Bad register in UPT_SET : %d\n", reg);  \
 200                         break; \
 201                 } \
 202         } while (0)
 203
 204 #define UPT_SET_SYSCALL_RETURN(r, res) \
 205         CHOOSE_MODE(SC_SET_SYSCALL_RETURN(UPT_SC(r), (res)), \
 206                     REGS_SET_SYSCALL_RETURN((r)->skas.regs, (res)))
 207
 208 #define UPT_RESTART_SYSCALL(r) \
 209         CHOOSE_MODE(SC_RESTART_SYSCALL(UPT_SC(r)), \
 210                     REGS_RESTART_SYSCALL((r)->skas.regs))
 211
 212 #define UPT_ORIG_SYSCALL(r) UPT_EAX(r)
 213 #define UPT_SYSCALL_NR(r) UPT_ORIG_EAX(r)
 214 #define UPT_SYSCALL_RET(r) UPT_EAX(r)
 215
 216 #define UPT_SEGV_IS_FIXABLE(r) \
 217         CHOOSE_MODE(SC_SEGV_IS_FIXABLE(UPT_SC(r)), \
 218                     REGS_SEGV_IS_FIXABLE(&r->skas))
 219
 220 #define UPT_FAULT_ADDR(r) \
 221         CHOOSE_MODE(SC_FAULT_ADDR(UPT_SC(r)), REGS_FAULT_ADDR(&r->skas))
 222
 223 #define UPT_FAULT_WRITE(r) \
 224         CHOOSE_MODE(SC_FAULT_WRITE(UPT_SC(r)), REGS_FAULT_WRITE(&r->skas))
 225
 226 #endif
 227
 228 /*
 229  * Overrides for Emacs so that we follow Linus's tabbing style.
 230  * Emacs will notice this stuff at the end of the file and automatically
 231  * adjust the settings for this buffer only.  This must remain at the end
 232  * of the file.
 233  * ---------------------------------------------------------------------------
 234  * Local variables:
 235  * c-file-style: "linux"
 236  * End:
 237  */