Attachment 228901 Details for Bug 325451 – Modified debugger.c

Modified debugger.c

debugger.c (text/plain), 4.79 KB, created by Brad Hinson on 2007-10-16 15:45:19 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Brad Hinson

Created: 2007-10-16 15:45:19 UTC

Size: 4.79 KB

patch

obsolete

>#include <unistd.h>
>#include <stdio.h>
>#include <stdlib.h>
>#include <string.h>
>#include <errno.h>
>#include <sys/wait.h>
>#include <sys/types.h>
>#include <sys/ptrace.h>
>#include <asm/ptrace.h>
>
>#define TARGET_		"./debuggee"
>#define PTRACE_IGNORED	(void *)0
>#define USE_PEEKUSR
>
>typedef struct _390_regs {
>    char reg_name[6];
>    int  reg_id;
>} R_390_regs_t;
>
>static R_390_regs_t r390[35] = {
>	{"MASK\0", 0},
>	{"ADDR\0", 1},
>	{"GPR0\0", 2},
>	{"GPR1\0", 3},
>	{"GPR2\0", 4},
>	{"GPR3\0", 5},
>	{"GPR4\0", 6},
>	{"GPR5\0", 7},
>	{"GPR6\0", 8},
>	{"GPR7\0", 9},
>	{"GPR8\0", 10},
>	{"GPR9\0", 11},
>	{"GPR10\0", 12},
>	{"GPR11\0", 13},
>	{"GPR12\0", 14},
>	{"GPR13\0", 15},
>	{"GPR14\0", 16},
>	{"GPR15\0", 17},
>	{"ACR0\0", 18},
>	{"ACR1\0", 19},
>	{"ACR2\0", 20},
>	{"ACR3\0", 21},
>	{"ACR4\0", 22},
>	{"ACR5\0", 23},
>	{"ACR6\0", 24},
>	{"ACR7\0", 25},
>	{"ACR8\0", 26},
>	{"ACR9\0", 27},
>	{"ACR10\0", 28},
>	{"ACR11\0", 29},
>	{"ACR12\0", 30},
>	{"ACR13\0", 31},
>	{"ACR14\0", 32},
>	{"ACR15\0", 33}
>};
>
>static ptrace_area * pt_area = (ptrace_area *)0;
>static struct user_regs_struct * pregs = (struct user_regs_struct *)0;
>
>static void writepc(pid_t pid, unsigned long new_pc)
>{
>    int rv;
>
>#ifdef USE_PEEKUSR
>    int regcount = 34;
>    int index;
>    long val;
>    long * p_pregs = (long *)pregs;
>    for(index = 0; index < regcount; index++)
>    {
>	val = ptrace(PTRACE_PEEKUSER, pid, (index * sizeof(long)), PTRACE_IGNORED);
>	if(val == -1 && errno)
>	{
>	    printf("Failed to read register %s\n", r390[index].reg_name);
>	}
>	p_pregs[index] = val;
>    }
>    pregs->psw.addr = new_pc;
>    for(index = 0; index < regcount; index++)
>    {
>	val = p_pregs[index];
>	if(ptrace(PTRACE_POKEUSER, pid, index * sizeof(unsigned long), val) ==-1)
>	{
>	    printf("Failed to write register %s\n", r390[index].reg_name);
>	}
>    }
>#else
>    memset(pt_area,0, sizeof(ptrace_area));
>    memset(pregs,0, sizeof(struct user_regs_struct));
>    pt_area->len = sizeof(struct user_regs_struct);
>    pt_area->kernel_addr = (unsigned long)0;
>    pt_area->process_addr = (unsigned long)pregs;
>    rv = ptrace(PTRACE_PEEKUSR_AREA, pid, pt_area, 0);
>    if(rv == -1)
>    {
>	perror("PTRACE_PEEKUSR_AREA, failed\n");
>	return;
>    }
>    pregs->psw.addr = new_pc;
>    rv = ptrace(PTRACE_POKEUSR_AREA, pid, pt_area, 0);
>    if(rv == -1)
>    {
>	perror("PTRACE_POKEUSR_AREA, failed\n");
>	return;
>    }
>#endif
>}
>
>static unsigned long readpc(pid_t pid)
>{
>    int rv;
>#ifdef USE_PEEKUSR
>    int regcount = 34;
>    int index;
>    unsigned long val;
>    unsigned long * p_pregs = (unsigned long *)pregs;;
>    for(index = 0; index < regcount; index++)
>    {
>	val = ptrace(PTRACE_PEEKUSER, pid, index * sizeof(unsigned long), 0);
>	if(val == -1 && errno)
>	{
>	    printf("Failed to read register %s\n", r390[index].reg_name);
>	}
>	p_pregs[index] = val;
>    }
>#else
>    memset(pt_area,0, sizeof(ptrace_area));
>    memset(pregs,0, sizeof(struct user_regs_struct));
>    pt_area->len = sizeof(struct user_regs_struct);
>    pt_area->kernel_addr = (unsigned long)0;
>    pt_area->process_addr = (unsigned long)pregs;
>    rv = ptrace(PTRACE_PEEKUSR_AREA, pid, pt_area, 0);
>    if(rv == -1)
>    {
>	perror("PTRACE_PEEKUSR_AREA, failed\n");
>	return 0;
>    }
>#endif
>    return pregs->psw.addr & 0x7fffffff;
>}
>
>int main()
>{
>    int rv, status;
>    pid_t pid;
>    unsigned long pc, new_pc;
>
>    pid = fork();
>    switch(pid)
>    {
>	case -1:	/* failed fork		*/
>	    return -1;
>	case 0:		/* child process	*/
>	    ptrace(PTRACE_TRACEME,
>			PTRACE_IGNORED, PTRACE_IGNORED, PTRACE_IGNORED);
>	    execl(TARGET_, TARGET_, (const char *)0);
>	    _exit(-1);
>	    break;
>	default:	/* parent process	*/
>	    break;
>    }
>
>    pt_area = (ptrace_area *)malloc(sizeof(ptrace_area));
>    if(!pt_area)
>    {
>	ptrace(PTRACE_DETACH, pid, PTRACE_IGNORED,PTRACE_IGNORED);
>	return -1;
>    }
>    pregs = (struct user_regs_struct *)malloc(sizeof(struct user_regs_struct));
>    if(!pregs)
>    {
>	free(pt_area);
>	ptrace(PTRACE_DETACH, pid, PTRACE_IGNORED,PTRACE_IGNORED);
>	return -1;
>    }
>
>    ptrace(PTRACE_CONT, pid, PTRACE_IGNORED,PTRACE_IGNORED);
>    /* wait for process to stop 	*/
>    rv = waitpid(pid, &status, 0);
>    if(rv == -1)
>    {
>	printf("waitpid failed\n");
>	kill(pid, 9);
>	return -1;
>    }
>    if(WIFSTOPPED(status))
>    {
>	printf("process stopped\n");
>    }
>    /* adjust PC			*/
>    pc = readpc(pid);
>    new_pc = pc + 4;
>    printf("read PC = %8.8p\n", pc);
>    writepc(pid, new_pc);
>    printf("wrote PC = %8.8p\n", new_pc);
>    pc = readpc(pid);
>    printf("read PC = %8.8p\n", pc);
>
>    ptrace(PTRACE_CONT, pid, PTRACE_IGNORED,PTRACE_IGNORED);
>
>    /* did it work ?			*/
>
>    rv = waitpid(pid, &status, 0);
>    if(rv == -1)
>    {
>	printf("waitpid failed\n");
>	kill(pid, 9);
>	return -1;
>    }
>    if(!WIFEXITED(status))
>    {
>	pc = readpc(pid);
>	printf("read PC = %8.8p\n", pc);
>	ptrace(PTRACE_DETACH, pid, PTRACE_IGNORED,PTRACE_IGNORED);
>    }
>    free(pt_area);
>    free(pregs);
>
>    return 0;
>}
>

Actions: View

Attachments on bug 325451: 221671 | 221681 | 221691 | 228891 | 228901 | 228911 | 251071