OpenE2K
/
binutils-gdb
12
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

* linux-s390-low.c (s390_breakpoint, s390_breakpoint_len): Define. 

(s390_get_pc, s390_set_pc, s390_breakpoint_at): New functions.
	(the_low_target): Add new members.
This commit is contained in:
Ulrich Weigand 2005-05-10 13:48:59 +00:00
parent 20d7ce9bf2
commit b0ded00b3f
2 changed files with 49 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gdb/gdbserver/ChangeLog
View File

@ -1,3 +1,9 @@
2005-05-10 Ulrich Weigand <uweigand@de.ibm.com>
* linux-s390-low.c (s390_breakpoint, s390_breakpoint_len): Define.
(s390_get_pc, s390_set_pc, s390_breakpoint_at): New functions.
(the_low_target): Add new members.
2005-05-04 Daniel Jacobowitz <dan@codesourcery.com>
* proc-service.c (ps_lgetregs): Search all_processes instead of

44
gdb/gdbserver/linux-s390-low.c
View File

@ -1,6 +1,6 @@
/* GNU/Linux S/390 specific low level interface, for the remote server
for GDB.
Copyright 2001, 2002
Copyright 2001, 2002, 2005
Free Software Foundation, Inc.
This file is part of GDB.
@ -75,9 +75,51 @@ s390_cannot_store_register (int regno)
return 0;
}
static const char s390_breakpoint[] = { 0, 1 };
#define s390_breakpoint_len 2
static CORE_ADDR
s390_get_pc ()
{
unsigned long pc;
collect_register_by_name ("pswa", &pc);
#ifndef __s390x__
pc &= 0x7fffffff;
#endif
return pc;
}
static void
s390_set_pc (CORE_ADDR newpc)
{
unsigned long pc = newpc;
#ifndef __s390x__
pc |= 0x80000000;
#endif
supply_register_by_name ("pswa", &pc);
}
static int
s390_breakpoint_at (CORE_ADDR pc)
{
unsigned char c[s390_breakpoint_len];
read_inferior_memory (pc, c, s390_breakpoint_len);
return memcmp (c, s390_breakpoint, s390_breakpoint_len) == 0;
}
struct linux_target_ops the_low_target = {
s390_num_regs,
s390_regmap,
s390_cannot_fetch_register,
s390_cannot_store_register,
s390_get_pc,
s390_set_pc,
s390_breakpoint,
s390_breakpoint_len,
NULL,
s390_breakpoint_len,
s390_breakpoint_at,
};