1e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata/*
2e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * This file is part of ltrace.
344ae188c8dcd2727e383dcac0d46c3f784d0da5fPetr Machata * Copyright (C) 2013 Petr Machata, Red Hat Inc.
4e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * Copyright (C) 1998,2002,2004,2008,2009 Juan Cespedes
5e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata *
6e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * This program is free software; you can redistribute it and/or
7e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * modify it under the terms of the GNU General Public License as
8e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * published by the Free Software Foundation; either version 2 of the
9e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * License, or (at your option) any later version.
10e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata *
11e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * This program is distributed in the hope that it will be useful, but
12e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * WITHOUT ANY WARRANTY; without even the implied warranty of
13e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * General Public License for more details.
15e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata *
16e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * You should have received a copy of the GNU General Public License
17e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * along with this program; if not, write to the Free Software
18e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA
19e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * 02110-1301 USA
20e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata */
21e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata
22d44c6b8b090b8b7aa9d971d9e0bfd848732a3071Juan Cespedes#include "config.h"
23d44c6b8b090b8b7aa9d971d9e0bfd848732a3071Juan Cespedes
24d44c6b8b090b8b7aa9d971d9e0bfd848732a3071Juan Cespedes#include <sys/types.h>
25d44c6b8b090b8b7aa9d971d9e0bfd848732a3071Juan Cespedes#include <sys/ptrace.h>
26d44c6b8b090b8b7aa9d971d9e0bfd848732a3071Juan Cespedes#include <asm/ptrace.h>
27d44c6b8b090b8b7aa9d971d9e0bfd848732a3071Juan Cespedes
28366c2f46d844f040458df9b7e35fc3b8527ed2d3Petr Machata#include "proc.h"
29f728123bd75a65a6a1536e198c3c30719e494e71Juan Cespedes#include "common.h"
305c3fe0697b202cc7d95e90459de0fb312b297b27Juan Cespedes
31d44c6b8b090b8b7aa9d971d9e0bfd848732a3071Juan Cespedes#if (!defined(PTRACE_PEEKUSER) && defined(PTRACE_PEEKUSR))
32d44c6b8b090b8b7aa9d971d9e0bfd848732a3071Juan Cespedes# define PTRACE_PEEKUSER PTRACE_PEEKUSR
33d44c6b8b090b8b7aa9d971d9e0bfd848732a3071Juan Cespedes#endif
34d44c6b8b090b8b7aa9d971d9e0bfd848732a3071Juan Cespedes
35d44c6b8b090b8b7aa9d971d9e0bfd848732a3071Juan Cespedes#if (!defined(PTRACE_POKEUSER) && defined(PTRACE_POKEUSR))
36d44c6b8b090b8b7aa9d971d9e0bfd848732a3071Juan Cespedes# define PTRACE_POKEUSER PTRACE_POKEUSR
37d44c6b8b090b8b7aa9d971d9e0bfd848732a3071Juan Cespedes#endif
38d44c6b8b090b8b7aa9d971d9e0bfd848732a3071Juan Cespedes
39f13505251e6402460f6cc7ec84e0d8ca91607b4fJuan Cespedesvoid *
40929bd57ca202fd2f2e8485ebf65d683e664f67b5Petr Machataget_instruction_pointer(struct process *proc)
41929bd57ca202fd2f2e8485ebf65d683e664f67b5Petr Machata{
422d45b1a8e26a36a9f85dc49e721c4390ca93dc40Ian Wienand	return (void *)ptrace(PTRACE_PEEKUSER, proc->pid, 4 * PT_PC, 0);
43d44c6b8b090b8b7aa9d971d9e0bfd848732a3071Juan Cespedes}
44d44c6b8b090b8b7aa9d971d9e0bfd848732a3071Juan Cespedes
45f13505251e6402460f6cc7ec84e0d8ca91607b4fJuan Cespedesvoid
46929bd57ca202fd2f2e8485ebf65d683e664f67b5Petr Machataset_instruction_pointer(struct process *proc, void *addr)
47929bd57ca202fd2f2e8485ebf65d683e664f67b5Petr Machata{
482d45b1a8e26a36a9f85dc49e721c4390ca93dc40Ian Wienand	ptrace(PTRACE_POKEUSER, proc->pid, 4 * PT_PC, addr);
498f8282f72eaeadc5419cd5470100e8dcaba5b7fdJuan Cespedes}
508f8282f72eaeadc5419cd5470100e8dcaba5b7fdJuan Cespedes
51f13505251e6402460f6cc7ec84e0d8ca91607b4fJuan Cespedesvoid *
52929bd57ca202fd2f2e8485ebf65d683e664f67b5Petr Machataget_stack_pointer(struct process *proc)
53929bd57ca202fd2f2e8485ebf65d683e664f67b5Petr Machata{
542d45b1a8e26a36a9f85dc49e721c4390ca93dc40Ian Wienand	return (void *)ptrace(PTRACE_PEEKUSER, proc->pid, 4 * PT_USP, 0);
55d44c6b8b090b8b7aa9d971d9e0bfd848732a3071Juan Cespedes}
56d44c6b8b090b8b7aa9d971d9e0bfd848732a3071Juan Cespedes
57f13505251e6402460f6cc7ec84e0d8ca91607b4fJuan Cespedesvoid *
58929bd57ca202fd2f2e8485ebf65d683e664f67b5Petr Machataget_return_addr(struct process *proc, void *stack_pointer)
59929bd57ca202fd2f2e8485ebf65d683e664f67b5Petr Machata{
605c3fe0697b202cc7d95e90459de0fb312b297b27Juan Cespedes	return (void *)ptrace(PTRACE_PEEKTEXT, proc->pid, stack_pointer, 0);
61d44c6b8b090b8b7aa9d971d9e0bfd848732a3071Juan Cespedes}
62