228 lines
6.6 KiB
C
228 lines
6.6 KiB
C
/*
|
|
* Copyright (C) 2000, 2001, 2002 Jeff Dike (jdike@karaya.com)
|
|
* Licensed under the GPL
|
|
*/
|
|
|
|
#ifndef __SYSDEP_I386_PTRACE_H
|
|
#define __SYSDEP_I386_PTRACE_H
|
|
|
|
#include "uml-config.h"
|
|
#include "user_constants.h"
|
|
#include "sysdep/faultinfo.h"
|
|
#include "choose-mode.h"
|
|
|
|
#define MAX_REG_NR (UM_FRAME_SIZE / sizeof(unsigned long))
|
|
#define MAX_REG_OFFSET (UM_FRAME_SIZE)
|
|
|
|
extern void update_debugregs(int seq);
|
|
|
|
/* syscall emulation path in ptrace */
|
|
|
|
#ifndef PTRACE_SYSEMU
|
|
#define PTRACE_SYSEMU 31
|
|
#endif
|
|
|
|
void set_using_sysemu(int value);
|
|
int get_using_sysemu(void);
|
|
extern int sysemu_supported;
|
|
|
|
#ifdef UML_CONFIG_MODE_TT
|
|
#include "sysdep/sc.h"
|
|
#endif
|
|
|
|
#ifdef UML_CONFIG_MODE_SKAS
|
|
|
|
#include "skas_ptregs.h"
|
|
|
|
#define REGS_IP(r) ((r)[HOST_IP])
|
|
#define REGS_SP(r) ((r)[HOST_SP])
|
|
#define REGS_EFLAGS(r) ((r)[HOST_EFLAGS])
|
|
#define REGS_EAX(r) ((r)[HOST_EAX])
|
|
#define REGS_EBX(r) ((r)[HOST_EBX])
|
|
#define REGS_ECX(r) ((r)[HOST_ECX])
|
|
#define REGS_EDX(r) ((r)[HOST_EDX])
|
|
#define REGS_ESI(r) ((r)[HOST_ESI])
|
|
#define REGS_EDI(r) ((r)[HOST_EDI])
|
|
#define REGS_EBP(r) ((r)[HOST_EBP])
|
|
#define REGS_CS(r) ((r)[HOST_CS])
|
|
#define REGS_SS(r) ((r)[HOST_SS])
|
|
#define REGS_DS(r) ((r)[HOST_DS])
|
|
#define REGS_ES(r) ((r)[HOST_ES])
|
|
#define REGS_FS(r) ((r)[HOST_FS])
|
|
#define REGS_GS(r) ((r)[HOST_GS])
|
|
|
|
#define REGS_SET_SYSCALL_RETURN(r, res) REGS_EAX(r) = (res)
|
|
|
|
#define REGS_RESTART_SYSCALL(r) IP_RESTART_SYSCALL(REGS_IP(r))
|
|
|
|
#endif
|
|
#ifndef PTRACE_SYSEMU_SINGLESTEP
|
|
#define PTRACE_SYSEMU_SINGLESTEP 32
|
|
#endif
|
|
|
|
union uml_pt_regs {
|
|
#ifdef UML_CONFIG_MODE_TT
|
|
struct tt_regs {
|
|
long syscall;
|
|
void *sc;
|
|
struct faultinfo faultinfo;
|
|
} tt;
|
|
#endif
|
|
#ifdef UML_CONFIG_MODE_SKAS
|
|
struct skas_regs {
|
|
unsigned long regs[HOST_FRAME_SIZE];
|
|
unsigned long fp[HOST_FP_SIZE];
|
|
unsigned long xfp[HOST_XFP_SIZE];
|
|
struct faultinfo faultinfo;
|
|
long syscall;
|
|
int is_user;
|
|
} skas;
|
|
#endif
|
|
};
|
|
|
|
#define EMPTY_UML_PT_REGS { }
|
|
|
|
extern int mode_tt;
|
|
|
|
#define UPT_SC(r) ((r)->tt.sc)
|
|
#define UPT_IP(r) \
|
|
__CHOOSE_MODE(SC_IP(UPT_SC(r)), REGS_IP((r)->skas.regs))
|
|
#define UPT_SP(r) \
|
|
__CHOOSE_MODE(SC_SP(UPT_SC(r)), REGS_SP((r)->skas.regs))
|
|
#define UPT_EFLAGS(r) \
|
|
__CHOOSE_MODE(SC_EFLAGS(UPT_SC(r)), REGS_EFLAGS((r)->skas.regs))
|
|
#define UPT_EAX(r) \
|
|
__CHOOSE_MODE(SC_EAX(UPT_SC(r)), REGS_EAX((r)->skas.regs))
|
|
#define UPT_EBX(r) \
|
|
__CHOOSE_MODE(SC_EBX(UPT_SC(r)), REGS_EBX((r)->skas.regs))
|
|
#define UPT_ECX(r) \
|
|
__CHOOSE_MODE(SC_ECX(UPT_SC(r)), REGS_ECX((r)->skas.regs))
|
|
#define UPT_EDX(r) \
|
|
__CHOOSE_MODE(SC_EDX(UPT_SC(r)), REGS_EDX((r)->skas.regs))
|
|
#define UPT_ESI(r) \
|
|
__CHOOSE_MODE(SC_ESI(UPT_SC(r)), REGS_ESI((r)->skas.regs))
|
|
#define UPT_EDI(r) \
|
|
__CHOOSE_MODE(SC_EDI(UPT_SC(r)), REGS_EDI((r)->skas.regs))
|
|
#define UPT_EBP(r) \
|
|
__CHOOSE_MODE(SC_EBP(UPT_SC(r)), REGS_EBP((r)->skas.regs))
|
|
#define UPT_ORIG_EAX(r) \
|
|
__CHOOSE_MODE((r)->tt.syscall, (r)->skas.syscall)
|
|
#define UPT_CS(r) \
|
|
__CHOOSE_MODE(SC_CS(UPT_SC(r)), REGS_CS((r)->skas.regs))
|
|
#define UPT_SS(r) \
|
|
__CHOOSE_MODE(SC_SS(UPT_SC(r)), REGS_SS((r)->skas.regs))
|
|
#define UPT_DS(r) \
|
|
__CHOOSE_MODE(SC_DS(UPT_SC(r)), REGS_DS((r)->skas.regs))
|
|
#define UPT_ES(r) \
|
|
__CHOOSE_MODE(SC_ES(UPT_SC(r)), REGS_ES((r)->skas.regs))
|
|
#define UPT_FS(r) \
|
|
__CHOOSE_MODE(SC_FS(UPT_SC(r)), REGS_FS((r)->skas.regs))
|
|
#define UPT_GS(r) \
|
|
__CHOOSE_MODE(SC_GS(UPT_SC(r)), REGS_GS((r)->skas.regs))
|
|
|
|
#define UPT_SYSCALL_ARG1(r) UPT_EBX(r)
|
|
#define UPT_SYSCALL_ARG2(r) UPT_ECX(r)
|
|
#define UPT_SYSCALL_ARG3(r) UPT_EDX(r)
|
|
#define UPT_SYSCALL_ARG4(r) UPT_ESI(r)
|
|
#define UPT_SYSCALL_ARG5(r) UPT_EDI(r)
|
|
#define UPT_SYSCALL_ARG6(r) UPT_EBP(r)
|
|
|
|
extern int user_context(unsigned long sp);
|
|
|
|
#define UPT_IS_USER(r) \
|
|
CHOOSE_MODE(user_context(UPT_SP(r)), (r)->skas.is_user)
|
|
|
|
struct syscall_args {
|
|
unsigned long args[6];
|
|
};
|
|
|
|
#define SYSCALL_ARGS(r) ((struct syscall_args) \
|
|
{ .args = { UPT_SYSCALL_ARG1(r), \
|
|
UPT_SYSCALL_ARG2(r), \
|
|
UPT_SYSCALL_ARG3(r), \
|
|
UPT_SYSCALL_ARG4(r), \
|
|
UPT_SYSCALL_ARG5(r), \
|
|
UPT_SYSCALL_ARG6(r) } } )
|
|
|
|
#define UPT_REG(regs, reg) \
|
|
({ unsigned long val; \
|
|
switch(reg){ \
|
|
case EIP: val = UPT_IP(regs); break; \
|
|
case UESP: val = UPT_SP(regs); break; \
|
|
case EAX: val = UPT_EAX(regs); break; \
|
|
case EBX: val = UPT_EBX(regs); break; \
|
|
case ECX: val = UPT_ECX(regs); break; \
|
|
case EDX: val = UPT_EDX(regs); break; \
|
|
case ESI: val = UPT_ESI(regs); break; \
|
|
case EDI: val = UPT_EDI(regs); break; \
|
|
case EBP: val = UPT_EBP(regs); break; \
|
|
case ORIG_EAX: val = UPT_ORIG_EAX(regs); break; \
|
|
case CS: val = UPT_CS(regs); break; \
|
|
case SS: val = UPT_SS(regs); break; \
|
|
case DS: val = UPT_DS(regs); break; \
|
|
case ES: val = UPT_ES(regs); break; \
|
|
case FS: val = UPT_FS(regs); break; \
|
|
case GS: val = UPT_GS(regs); break; \
|
|
case EFL: val = UPT_EFLAGS(regs); break; \
|
|
default : \
|
|
panic("Bad register in UPT_REG : %d\n", reg); \
|
|
val = -1; \
|
|
} \
|
|
val; \
|
|
})
|
|
|
|
|
|
#define UPT_SET(regs, reg, val) \
|
|
do { \
|
|
switch(reg){ \
|
|
case EIP: UPT_IP(regs) = val; break; \
|
|
case UESP: UPT_SP(regs) = val; break; \
|
|
case EAX: UPT_EAX(regs) = val; break; \
|
|
case EBX: UPT_EBX(regs) = val; break; \
|
|
case ECX: UPT_ECX(regs) = val; break; \
|
|
case EDX: UPT_EDX(regs) = val; break; \
|
|
case ESI: UPT_ESI(regs) = val; break; \
|
|
case EDI: UPT_EDI(regs) = val; break; \
|
|
case EBP: UPT_EBP(regs) = val; break; \
|
|
case ORIG_EAX: UPT_ORIG_EAX(regs) = val; break; \
|
|
case CS: UPT_CS(regs) = val; break; \
|
|
case SS: UPT_SS(regs) = val; break; \
|
|
case DS: UPT_DS(regs) = val; break; \
|
|
case ES: UPT_ES(regs) = val; break; \
|
|
case FS: UPT_FS(regs) = val; break; \
|
|
case GS: UPT_GS(regs) = val; break; \
|
|
case EFL: UPT_EFLAGS(regs) = val; break; \
|
|
default : \
|
|
panic("Bad register in UPT_SET : %d\n", reg); \
|
|
break; \
|
|
} \
|
|
} while (0)
|
|
|
|
#define UPT_SET_SYSCALL_RETURN(r, res) \
|
|
CHOOSE_MODE(SC_SET_SYSCALL_RETURN(UPT_SC(r), (res)), \
|
|
REGS_SET_SYSCALL_RETURN((r)->skas.regs, (res)))
|
|
|
|
#define UPT_RESTART_SYSCALL(r) \
|
|
CHOOSE_MODE(SC_RESTART_SYSCALL(UPT_SC(r)), \
|
|
REGS_RESTART_SYSCALL((r)->skas.regs))
|
|
|
|
#define UPT_ORIG_SYSCALL(r) UPT_EAX(r)
|
|
#define UPT_SYSCALL_NR(r) UPT_ORIG_EAX(r)
|
|
#define UPT_SYSCALL_RET(r) UPT_EAX(r)
|
|
|
|
#define UPT_FAULTINFO(r) \
|
|
CHOOSE_MODE((&(r)->tt.faultinfo), (&(r)->skas.faultinfo))
|
|
|
|
#endif
|
|
|
|
/*
|
|
* Overrides for Emacs so that we follow Linus's tabbing style.
|
|
* Emacs will notice this stuff at the end of the file and automatically
|
|
* adjust the settings for this buffer only. This must remain at the end
|
|
* of the file.
|
|
* ---------------------------------------------------------------------------
|
|
* Local variables:
|
|
* c-file-style: "linux"
|
|
* End:
|
|
*/
|