1 /*
2 * Copyright (c) 2010 The FreeBSD Foundation
3 * All rights reserved.
4 *
5 * This software was developed by Rui Paulo under sponsorship from the
6 * FreeBSD Foundation.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 *
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27 * SUCH DAMAGE.
28 */
29
30 #include <sys/cdefs.h>
31 __FBSDID("$FreeBSD$");
32
33 #include <sys/types.h>
34 #include <sys/ptrace.h>
35
36 #include <err.h>
37 #include <stdio.h>
38 #include <string.h>
39 #include <errno.h>
40 #include "_libproc.h"
41
42 int
proc_regget(struct proc_handle * phdl,proc_reg_t reg,unsigned long * regvalue)43 proc_regget(struct proc_handle *phdl, proc_reg_t reg, unsigned long *regvalue)
44 {
45 struct reg regs;
46
47 if (phdl->status == PS_DEAD || phdl->status == PS_UNDEAD ||
48 phdl->status == PS_IDLE) {
49 errno = ENOENT;
50 return (-1);
51 }
52 memset(®s, 0, sizeof(regs));
53 if (ptrace(PT_GETREGS, proc_getpid(phdl), (caddr_t)®s, 0) < 0)
54 return (-1);
55 switch (reg) {
56 case REG_PC:
57 #if defined(__amd64__)
58 *regvalue = regs.r_rip;
59 #elif defined(__i386__)
60 *regvalue = regs.r_eip;
61 #elif defined(__mips__)
62 *regvalue = regs.r_regs[PC];
63 #elif defined(__powerpc__)
64 *regvalue = regs.pc;
65 #endif
66 break;
67 case REG_SP:
68 #if defined(__amd64__)
69 *regvalue = regs.r_rsp;
70 #elif defined(__i386__)
71 *regvalue = regs.r_esp;
72 #elif defined(__mips__)
73 *regvalue = regs.r_regs[SP];
74 #elif defined(__powerpc__)
75 *regvalue = regs.fixreg[1];
76 #endif
77 break;
78 default:
79 DPRINTFX("ERROR: no support for reg number %d", reg);
80 return (-1);
81 }
82
83 return (0);
84 }
85
86 int
proc_regset(struct proc_handle * phdl,proc_reg_t reg,unsigned long regvalue)87 proc_regset(struct proc_handle *phdl, proc_reg_t reg, unsigned long regvalue)
88 {
89 struct reg regs;
90
91 if (phdl->status == PS_DEAD || phdl->status == PS_UNDEAD ||
92 phdl->status == PS_IDLE) {
93 errno = ENOENT;
94 return (-1);
95 }
96 if (ptrace(PT_GETREGS, proc_getpid(phdl), (caddr_t)®s, 0) < 0)
97 return (-1);
98 switch (reg) {
99 case REG_PC:
100 #if defined(__amd64__)
101 regs.r_rip = regvalue;
102 #elif defined(__i386__)
103 regs.r_eip = regvalue;
104 #elif defined(__mips__)
105 regs.r_regs[PC] = regvalue;
106 #elif defined(__powerpc__)
107 regs.pc = regvalue;
108 #endif
109 break;
110 case REG_SP:
111 #if defined(__amd64__)
112 regs.r_rsp = regvalue;
113 #elif defined(__i386__)
114 regs.r_esp = regvalue;
115 #elif defined(__mips__)
116 regs.r_regs[PC] = regvalue;
117 #elif defined(__powerpc__)
118 regs.fixreg[1] = regvalue;
119 #endif
120 break;
121 default:
122 DPRINTFX("ERROR: no support for reg number %d", reg);
123 return (-1);
124 }
125 if (ptrace(PT_SETREGS, proc_getpid(phdl), (caddr_t)®s, 0) < 0)
126 return (-1);
127
128 return (0);
129 }
130