2004-02-17 Ulrich Weigand <Ulrich.Weigand@de.ibm.com>
[deliverable/binutils-gdb.git] / gdb / gdbserver / linux-s390-low.c
1 /* GNU/Linux S/390 specific low level interface, for the remote server
2 for GDB.
3 Copyright 2001, 2002
4 Free Software Foundation, Inc.
5
6 This file is part of GDB.
7
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
12
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
17
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 59 Temple Place - Suite 330,
21 Boston, MA 02111-1307, USA. */
22
23 /* This file is used for both 31-bit and 64-bit S/390 systems. */
24
25 #include "server.h"
26 #include "linux-low.h"
27
28 #include <asm/ptrace.h>
29
30 #define s390_num_regs 51
31
32 static int s390_regmap[] = {
33 PT_PSWMASK, PT_PSWADDR,
34
35 PT_GPR0, PT_GPR1, PT_GPR2, PT_GPR3,
36 PT_GPR4, PT_GPR5, PT_GPR6, PT_GPR7,
37 PT_GPR8, PT_GPR9, PT_GPR10, PT_GPR11,
38 PT_GPR12, PT_GPR13, PT_GPR14, PT_GPR15,
39
40 PT_ACR0, PT_ACR1, PT_ACR2, PT_ACR3,
41 PT_ACR4, PT_ACR5, PT_ACR6, PT_ACR7,
42 PT_ACR8, PT_ACR9, PT_ACR10, PT_ACR11,
43 PT_ACR12, PT_ACR13, PT_ACR14, PT_ACR15,
44
45 PT_FPC,
46
47 #ifndef __s390x__
48 PT_FPR0_HI, PT_FPR1_HI, PT_FPR2_HI, PT_FPR3_HI,
49 PT_FPR4_HI, PT_FPR5_HI, PT_FPR6_HI, PT_FPR7_HI,
50 PT_FPR8_HI, PT_FPR9_HI, PT_FPR10_HI, PT_FPR11_HI,
51 PT_FPR12_HI, PT_FPR13_HI, PT_FPR14_HI, PT_FPR15_HI,
52 #else
53 PT_FPR0, PT_FPR1, PT_FPR2, PT_FPR3,
54 PT_FPR4, PT_FPR5, PT_FPR6, PT_FPR7,
55 PT_FPR8, PT_FPR9, PT_FPR10, PT_FPR11,
56 PT_FPR12, PT_FPR13, PT_FPR14, PT_FPR15,
57 #endif
58 };
59
60 static int
61 s390_cannot_fetch_register (int regno)
62 {
63 if (s390_regmap[regno] == -1)
64 return 1;
65
66 return 0;
67 }
68
69 static int
70 s390_cannot_store_register (int regno)
71 {
72 if (s390_regmap[regno] == -1)
73 return 1;
74
75 return 0;
76 }
77
78 struct linux_target_ops the_low_target = {
79 s390_num_regs,
80 s390_regmap,
81 s390_cannot_fetch_register,
82 s390_cannot_store_register,
83 };
This page took 0.035989 seconds and 5 git commands to generate.