arch/s390/include/asm/ptrace.h

   1 /* SPDX-License-Identifier: GPL-2.0 */
   2 /*
   3  *  S390 version
   4  *    Copyright IBM Corp. 1999, 2000
   5  *    Author(s): Denis Joseph Barrow (djbarrow@de.ibm.com,barrow_dj@yahoo.com)
   6  */
   7 #ifndef _S390_PTRACE_H
   8 #define _S390_PTRACE_H
   9
  10 #include <linux/const.h>
  11 #include <uapi/asm/ptrace.h>
  12
  13 #define PIF_SYSCALL             0       /* inside a system call */
  14 #define PIF_PER_TRAP            1       /* deliver sigtrap on return to user */
  15 #define PIF_SYSCALL_RESTART     2       /* restart the current system call */
  16
  17 #define _PIF_SYSCALL            _BITUL(PIF_SYSCALL)
  18 #define _PIF_PER_TRAP           _BITUL(PIF_PER_TRAP)
  19 #define _PIF_SYSCALL_RESTART    _BITUL(PIF_SYSCALL_RESTART)
  20
  21 #ifndef __ASSEMBLY__
  22
  23 #define PSW_KERNEL_BITS (PSW_DEFAULT_KEY | PSW_MASK_BASE | PSW_ASC_HOME | \
  24                          PSW_MASK_EA | PSW_MASK_BA)
  25 #define PSW_USER_BITS   (PSW_MASK_DAT | PSW_MASK_IO | PSW_MASK_EXT | \
  26                          PSW_DEFAULT_KEY | PSW_MASK_BASE | PSW_MASK_MCHECK | \
  27                          PSW_MASK_PSTATE | PSW_ASC_PRIMARY)
  28
  29 struct psw_bits {
  30         unsigned long        :  1;
  31         unsigned long per    :  1; /* PER-Mask */
  32         unsigned long        :  3;
  33         unsigned long dat    :  1; /* DAT Mode */
  34         unsigned long io     :  1; /* Input/Output Mask */
  35         unsigned long ext    :  1; /* External Mask */
  36         unsigned long key    :  4; /* PSW Key */
  37         unsigned long        :  1;
  38         unsigned long mcheck :  1; /* Machine-Check Mask */
  39         unsigned long wait   :  1; /* Wait State */
  40         unsigned long pstate :  1; /* Problem State */
  41         unsigned long as     :  2; /* Address Space Control */
  42         unsigned long cc     :  2; /* Condition Code */
  43         unsigned long pm     :  4; /* Program Mask */
  44         unsigned long ri     :  1; /* Runtime Instrumentation */
  45         unsigned long        :  6;
  46         unsigned long eaba   :  2; /* Addressing Mode */
  47         unsigned long        : 31;
  48         unsigned long ia     : 64; /* Instruction Address */
  49 };
  50
  51 enum {
  52         PSW_BITS_AMODE_24BIT = 0,
  53         PSW_BITS_AMODE_31BIT = 1,
  54         PSW_BITS_AMODE_64BIT = 3
  55 };
  56
  57 enum {
  58         PSW_BITS_AS_PRIMARY     = 0,
  59         PSW_BITS_AS_ACCREG      = 1,
  60         PSW_BITS_AS_SECONDARY   = 2,
  61         PSW_BITS_AS_HOME        = 3
  62 };
  63
  64 #define psw_bits(__psw) (*({                    \
  65         typecheck(psw_t, __psw);                \
  66         &(*(struct psw_bits *)(&(__psw)));      \
  67 }))
  68
  69 /*
  70  * The pt_regs struct defines the way the registers are stored on
  71  * the stack during a system call.
  72  */
  73 struct pt_regs
  74 {
  75         unsigned long args[1];
  76         psw_t psw;
  77         unsigned long gprs[NUM_GPRS];
  78         unsigned long orig_gpr2;
  79         unsigned int int_code;
  80         unsigned int int_parm;
  81         unsigned long int_parm_long;
  82         unsigned long flags;
  83 };
  84
  85 /*
  86  * Program event recording (PER) register set.
  87  */
  88 struct per_regs {
  89         unsigned long control;          /* PER control bits */
  90         unsigned long start;            /* PER starting address */
  91         unsigned long end;              /* PER ending address */
  92 };
  93
  94 /*
  95  * PER event contains information about the cause of the last PER exception.
  96  */
  97 struct per_event {
  98         unsigned short cause;           /* PER code, ATMID and AI */
  99         unsigned long address;          /* PER address */
 100         unsigned char paid;             /* PER access identification */
 101 };
 102
 103 /*
 104  * Simplified per_info structure used to decode the ptrace user space ABI.
 105  */
 106 struct per_struct_kernel {
 107         unsigned long cr9;              /* PER control bits */
 108         unsigned long cr10;             /* PER starting address */
 109         unsigned long cr11;             /* PER ending address */
 110         unsigned long bits;             /* Obsolete software bits */
 111         unsigned long starting_addr;    /* User specified start address */
 112         unsigned long ending_addr;      /* User specified end address */
 113         unsigned short perc_atmid;      /* PER trap ATMID */
 114         unsigned long address;          /* PER trap instruction address */
 115         unsigned char access_id;        /* PER trap access identification */
 116 };
 117
 118 #define PER_EVENT_MASK                  0xEB000000UL
 119
 120 #define PER_EVENT_BRANCH                0x80000000UL
 121 #define PER_EVENT_IFETCH                0x40000000UL
 122 #define PER_EVENT_STORE                 0x20000000UL
 123 #define PER_EVENT_STORE_REAL            0x08000000UL
 124 #define PER_EVENT_TRANSACTION_END       0x02000000UL
 125 #define PER_EVENT_NULLIFICATION         0x01000000UL
 126
 127 #define PER_CONTROL_MASK                0x00e00000UL
 128
 129 #define PER_CONTROL_BRANCH_ADDRESS      0x00800000UL
 130 #define PER_CONTROL_SUSPENSION          0x00400000UL
 131 #define PER_CONTROL_ALTERATION          0x00200000UL
 132
 133 static inline void set_pt_regs_flag(struct pt_regs *regs, int flag)
 134 {
 135         regs->flags |= (1UL << flag);
 136 }
 137
 138 static inline void clear_pt_regs_flag(struct pt_regs *regs, int flag)
 139 {
 140         regs->flags &= ~(1UL << flag);
 141 }
 142
 143 static inline int test_pt_regs_flag(struct pt_regs *regs, int flag)
 144 {
 145         return !!(regs->flags & (1UL << flag));
 146 }
 147
 148 /*
 149  * These are defined as per linux/ptrace.h, which see.
 150  */
 151 #define arch_has_single_step()  (1)
 152 #define arch_has_block_step()   (1)
 153
 154 #define user_mode(regs) (((regs)->psw.mask & PSW_MASK_PSTATE) != 0)
 155 #define instruction_pointer(regs) ((regs)->psw.addr)
 156 #define user_stack_pointer(regs)((regs)->gprs[15])
 157 #define profile_pc(regs) instruction_pointer(regs)
 158
 159 static inline long regs_return_value(struct pt_regs *regs)
 160 {
 161         return regs->gprs[2];
 162 }
 163
 164 static inline void instruction_pointer_set(struct pt_regs *regs,
 165                                            unsigned long val)
 166 {
 167         regs->psw.addr = val;
 168 }
 169
 170 int regs_query_register_offset(const char *name);
 171 const char *regs_query_register_name(unsigned int offset);
 172 unsigned long regs_get_register(struct pt_regs *regs, unsigned int offset);
 173 unsigned long regs_get_kernel_stack_nth(struct pt_regs *regs, unsigned int n);
 174
 175 static inline unsigned long kernel_stack_pointer(struct pt_regs *regs)
 176 {
 177         return regs->gprs[15];
 178 }
 179
 180 #endif /* __ASSEMBLY__ */
 181 #endif /* _S390_PTRACE_H */