1e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata/* 2e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * This file is part of ltrace. 344ae188c8dcd2727e383dcac0d46c3f784d0da5fPetr Machata * Copyright (C) 2013 Petr Machata, Red Hat Inc. 4e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * Copyright (C) 2002,2008,2009 Juan Cespedes 5e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * Copyright (C) 2009 Juan Cespedes 6e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * Copyright (C) 2008 Luis Machado, IBM Corporation 7e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * 8e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * This program is free software; you can redistribute it and/or 9e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * modify it under the terms of the GNU General Public License as 10e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * published by the Free Software Foundation; either version 2 of the 11e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * License, or (at your option) any later version. 12e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * 13e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * This program is distributed in the hope that it will be useful, but 14e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * WITHOUT ANY WARRANTY; without even the implied warranty of 15e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 16e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * General Public License for more details. 17e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * 18e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * You should have received a copy of the GNU General Public License 19e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * along with this program; if not, write to the Free Software 20e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 21e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * 02110-1301 USA 22e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata */ 23e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata 24f1bfe203f5f1c0e11a614f9d593a68406f5cb47eJuan Cespedes#include "config.h" 25f1bfe203f5f1c0e11a614f9d593a68406f5cb47eJuan Cespedes 26f1bfe203f5f1c0e11a614f9d593a68406f5cb47eJuan Cespedes#include <sys/types.h> 27f1bfe203f5f1c0e11a614f9d593a68406f5cb47eJuan Cespedes#include <sys/ptrace.h> 28f1bfe203f5f1c0e11a614f9d593a68406f5cb47eJuan Cespedes#include <asm/ptrace.h> 29f04d032e298c410e45553223a979c1f26f280259Petr Machata#include <errno.h> 30f04d032e298c410e45553223a979c1f26f280259Petr Machata#include <error.h> 31f1bfe203f5f1c0e11a614f9d593a68406f5cb47eJuan Cespedes 32366c2f46d844f040458df9b7e35fc3b8527ed2d3Petr Machata#include "proc.h" 33f728123bd75a65a6a1536e198c3c30719e494e71Juan Cespedes#include "common.h" 345c3fe0697b202cc7d95e90459de0fb312b297b27Juan Cespedes 35f1bfe203f5f1c0e11a614f9d593a68406f5cb47eJuan Cespedes#if (!defined(PTRACE_PEEKUSER) && defined(PTRACE_PEEKUSR)) 36f1bfe203f5f1c0e11a614f9d593a68406f5cb47eJuan Cespedes# define PTRACE_PEEKUSER PTRACE_PEEKUSR 37f1bfe203f5f1c0e11a614f9d593a68406f5cb47eJuan Cespedes#endif 38f1bfe203f5f1c0e11a614f9d593a68406f5cb47eJuan Cespedes 39f1bfe203f5f1c0e11a614f9d593a68406f5cb47eJuan Cespedes#if (!defined(PTRACE_POKEUSER) && defined(PTRACE_POKEUSR)) 40f1bfe203f5f1c0e11a614f9d593a68406f5cb47eJuan Cespedes# define PTRACE_POKEUSER PTRACE_POKEUSR 41f1bfe203f5f1c0e11a614f9d593a68406f5cb47eJuan Cespedes#endif 42f1bfe203f5f1c0e11a614f9d593a68406f5cb47eJuan Cespedes 43f13505251e6402460f6cc7ec84e0d8ca91607b4fJuan Cespedesvoid * 44929bd57ca202fd2f2e8485ebf65d683e664f67b5Petr Machataget_instruction_pointer(struct process *proc) 45929bd57ca202fd2f2e8485ebf65d683e664f67b5Petr Machata{ 4661da33723c5fb09762e38bd39a26ee15d62ffebcJuan Cespedes return (void *)ptrace(PTRACE_PEEKUSER, proc->pid, sizeof(long)*PT_NIP, 0); 47f1bfe203f5f1c0e11a614f9d593a68406f5cb47eJuan Cespedes} 48f1bfe203f5f1c0e11a614f9d593a68406f5cb47eJuan Cespedes 49f13505251e6402460f6cc7ec84e0d8ca91607b4fJuan Cespedesvoid 50929bd57ca202fd2f2e8485ebf65d683e664f67b5Petr Machataset_instruction_pointer(struct process *proc, void *addr) 51f04d032e298c410e45553223a979c1f26f280259Petr Machata{ 52f04d032e298c410e45553223a979c1f26f280259Petr Machata if (ptrace(PTRACE_POKEUSER, proc->pid, sizeof(long)*PT_NIP, addr) != 0) 53f04d032e298c410e45553223a979c1f26f280259Petr Machata error(0, errno, "set_instruction_pointer"); 54f1bfe203f5f1c0e11a614f9d593a68406f5cb47eJuan Cespedes} 55f1bfe203f5f1c0e11a614f9d593a68406f5cb47eJuan Cespedes 56f13505251e6402460f6cc7ec84e0d8ca91607b4fJuan Cespedesvoid * 57929bd57ca202fd2f2e8485ebf65d683e664f67b5Petr Machataget_stack_pointer(struct process *proc) 58929bd57ca202fd2f2e8485ebf65d683e664f67b5Petr Machata{ 5961da33723c5fb09762e38bd39a26ee15d62ffebcJuan Cespedes return (void *)ptrace(PTRACE_PEEKUSER, proc->pid, sizeof(long)*PT_R1, 0); 60f1bfe203f5f1c0e11a614f9d593a68406f5cb47eJuan Cespedes} 61f1bfe203f5f1c0e11a614f9d593a68406f5cb47eJuan Cespedes 62f13505251e6402460f6cc7ec84e0d8ca91607b4fJuan Cespedesvoid * 63929bd57ca202fd2f2e8485ebf65d683e664f67b5Petr Machataget_return_addr(struct process *proc, void *stack_pointer) 64929bd57ca202fd2f2e8485ebf65d683e664f67b5Petr Machata{ 652a61d19bd244dadcde5009f1632cf14b95623e3dJuan Cespedes return (void *)ptrace(PTRACE_PEEKUSER, proc->pid, sizeof(long)*PT_LNK, 0); 662a61d19bd244dadcde5009f1632cf14b95623e3dJuan Cespedes} 67