home *** CD-ROM | disk | FTP | other *** search
/ PC Welt 2006 November (DVD) / PCWELT_11_2006.ISO / casper / filesystem.squashfs / usr / lib / perl / 5.8.8 / asm-x86_64 / ptrace.ph < prev    next >
Encoding:
Text File  |  2006-07-07  |  2.1 KB  |  46 lines
  1. require '_h2ph_pre.ph';
  2.  
  3. no warnings 'redefine';
  4.  
  5. unless(defined(&_X86_64_PTRACE_H)) {
  6.     eval 'sub _X86_64_PTRACE_H () {1;}' unless defined(&_X86_64_PTRACE_H);
  7.     if(defined( &__ASSEMBLY__) || defined( &__FRAME_OFFSETS) ) {
  8.     eval 'sub R15 () {0;}' unless defined(&R15);
  9.     eval 'sub R14 () {8;}' unless defined(&R14);
  10.     eval 'sub R13 () {16;}' unless defined(&R13);
  11.     eval 'sub R12 () {24;}' unless defined(&R12);
  12.     eval 'sub RBP () {32;}' unless defined(&RBP);
  13.     eval 'sub RBX () {40;}' unless defined(&RBX);
  14.     eval 'sub R11 () {48;}' unless defined(&R11);
  15.     eval 'sub R10 () {56;}' unless defined(&R10);
  16.     eval 'sub R9 () {64;}' unless defined(&R9);
  17.     eval 'sub R8 () {72;}' unless defined(&R8);
  18.     eval 'sub RAX () {80;}' unless defined(&RAX);
  19.     eval 'sub RCX () {88;}' unless defined(&RCX);
  20.     eval 'sub RDX () {96;}' unless defined(&RDX);
  21.     eval 'sub RSI () {104;}' unless defined(&RSI);
  22.     eval 'sub RDI () {112;}' unless defined(&RDI);
  23.     eval 'sub ORIG_RAX () {120;}' unless defined(&ORIG_RAX);
  24.     eval 'sub RIP () {128;}' unless defined(&RIP);
  25.     eval 'sub CS () {136;}' unless defined(&CS);
  26.     eval 'sub EFLAGS () {144;}' unless defined(&EFLAGS);
  27.     eval 'sub RSP () {152;}' unless defined(&RSP);
  28.     eval 'sub SS () {160;}' unless defined(&SS);
  29.     eval 'sub ARGOFFSET () { &R11;}' unless defined(&ARGOFFSET);
  30.     }
  31.     eval 'sub FRAME_SIZE () {168;}' unless defined(&FRAME_SIZE);
  32.     eval 'sub PTRACE_OLDSETOPTIONS () {21;}' unless defined(&PTRACE_OLDSETOPTIONS);
  33.     unless(defined(&__ASSEMBLY__)) {
  34.     }
  35.     eval 'sub PTRACE_GETREGS () {12;}' unless defined(&PTRACE_GETREGS);
  36.     eval 'sub PTRACE_SETREGS () {13;}' unless defined(&PTRACE_SETREGS);
  37.     eval 'sub PTRACE_GETFPREGS () {14;}' unless defined(&PTRACE_GETFPREGS);
  38.     eval 'sub PTRACE_SETFPREGS () {15;}' unless defined(&PTRACE_SETFPREGS);
  39.     eval 'sub PTRACE_GETFPXREGS () {18;}' unless defined(&PTRACE_GETFPXREGS);
  40.     eval 'sub PTRACE_SETFPXREGS () {19;}' unless defined(&PTRACE_SETFPXREGS);
  41.     eval 'sub PTRACE_GET_THREAD_AREA () {25;}' unless defined(&PTRACE_GET_THREAD_AREA);
  42.     eval 'sub PTRACE_SET_THREAD_AREA () {26;}' unless defined(&PTRACE_SET_THREAD_AREA);
  43.     eval 'sub PTRACE_ARCH_PRCTL () {30;}' unless defined(&PTRACE_ARCH_PRCTL);
  44. }
  45. 1;
  46.