015780c6233eded8592014da121f812f13bd6f7a
[kopensolaris-gnu/glibc.git] / sysdeps / unix / sysv / linux / arm / register-dump.h
1 /* Dump registers.
2    Copyright (C) 1998 Free Software Foundation, Inc.
3    This file is part of the GNU C Library.
4    Contributed by Philip Blundell <pb@nexus.co.uk>, 1998.
5
6    The GNU C Library is free software; you can redistribute it and/or
7    modify it under the terms of the GNU Library General Public License as
8    published by the Free Software Foundation; either version 2 of the
9    License, or (at your option) any later version.
10
11    The GNU C Library is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14    Library General Public License for more details.
15
16    You should have received a copy of the GNU Library General Public
17    License along with the GNU C Library; see the file COPYING.LIB.  If not,
18    write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
19    Boston, MA 02111-1307, USA.  */
20
21 #include <sys/uio.h>
22 #include <stdio-common/_itoa.h>
23 #include <bits/armsigctx.h>
24
25 /* We will print the register dump in this format:
26
27  R0: XXXXXXXX   R1: XXXXXXXX   R2: XXXXXXXX   R3: XXXXXXXX
28  R4: XXXXXXXX   R5: XXXXXXXX   R6: XXXXXXXX   R7: XXXXXXXX
29  R8: XXXXXXXX   R9: XXXXXXXX   SL: XXXXXXXX   FP: XXXXXXXX
30  IP: XXXXXXXX   SP: XXXXXXXX   LR: XXXXXXXX   PC: XXXXXXXX
31
32  CPSR: XXXXXXXX
33
34  Trap: XXXXXXXX   Error: XXXXXXXX   OldMask: XXXXXXXX
35
36  */
37
38 static void
39 hexvalue (unsigned long int value, char *buf, size_t len)
40 {
41   char *cp = _itoa_word (value, buf + len, 16, 0);
42   while (cp > buf)
43     *--cp = '0';
44 }
45
46 static void
47 register_dump (int fd, union k_sigcontext *ctx)
48 {
49   char regs[20][8];
50   struct iovec iov[97];
51   size_t nr = 0;
52
53 #define ADD_STRING(str) \
54   iov[nr].iov_base = (char *) str;                                            \
55   iov[nr].iov_len = strlen (str);                                             \
56   ++nr
57 #define ADD_MEM(str, len) \
58   iov[nr].iov_base = str;                                                     \
59   iov[nr].iov_len = len;                                                      \
60   ++nr
61
62   /* Generate strings of register contents.  */
63   if (ctx->v20.magic == SIGCONTEXT_2_0_MAGIC)
64     {
65       hexvalue (ctx->v20.reg.ARM_r0, regs[0], 8);
66       hexvalue (ctx->v20.reg.ARM_r1, regs[1], 8);
67       hexvalue (ctx->v20.reg.ARM_r2, regs[2], 8);
68       hexvalue (ctx->v20.reg.ARM_r3, regs[3], 8);
69       hexvalue (ctx->v20.reg.ARM_r4, regs[4], 8);
70       hexvalue (ctx->v20.reg.ARM_r5, regs[5], 8);
71       hexvalue (ctx->v20.reg.ARM_r6, regs[6], 8);
72       hexvalue (ctx->v20.reg.ARM_r7, regs[7], 8);
73       hexvalue (ctx->v20.reg.ARM_r8, regs[8], 8);
74       hexvalue (ctx->v20.reg.ARM_r9, regs[9], 8);
75       hexvalue (ctx->v20.reg.ARM_r10, regs[10], 4);
76       hexvalue (ctx->v20.reg.ARM_fp, regs[11], 4);
77       hexvalue (ctx->v20.reg.ARM_ip, regs[12], 4);
78       hexvalue (ctx->v20.reg.ARM_sp, regs[13], 4);
79       hexvalue (ctx->v20.reg.ARM_lr, regs[14], 4);
80       hexvalue (ctx->v20.reg.ARM_pc, regs[15], 4);
81       hexvalue (ctx->v20.reg.ARM_cpsr, regs[16], 8);
82       hexvalue (ctx->v20.trap_no, regs[17], 8);
83       hexvalue (ctx->v20.error_code, regs[18], 8);
84       hexvalue (ctx->v20.oldmask, regs[19], 8);
85     }
86   else
87     {
88       hexvalue (ctx->v21.arm_r0, regs[0], 8);
89       hexvalue (ctx->v21.arm_r1, regs[1], 8);
90       hexvalue (ctx->v21.arm_r2, regs[2], 8);
91       hexvalue (ctx->v21.arm_r3, regs[3], 8);
92       hexvalue (ctx->v21.arm_r4, regs[4], 8);
93       hexvalue (ctx->v21.arm_r5, regs[5], 8);
94       hexvalue (ctx->v21.arm_r6, regs[6], 8);
95       hexvalue (ctx->v21.arm_r7, regs[7], 8);
96       hexvalue (ctx->v21.arm_r8, regs[8], 8);
97       hexvalue (ctx->v21.arm_r9, regs[9], 8);
98       hexvalue (ctx->v21.arm_r10, regs[10], 4);
99       hexvalue (ctx->v21.arm_fp, regs[11], 4);
100       hexvalue (ctx->v21.arm_ip, regs[12], 4);
101       hexvalue (ctx->v21.arm_sp, regs[13], 4);
102       hexvalue (ctx->v21.arm_lr, regs[14], 4);
103       hexvalue (ctx->v21.arm_pc, regs[15], 4);
104       hexvalue (ctx->v21.arm_cpsr, regs[16], 8);
105       hexvalue (ctx->v21.trap_no, regs[17], 8);
106       hexvalue (ctx->v21.error_code, regs[18], 8);
107       hexvalue (ctx->v21.oldmask, regs[19], 8);
108     }
109
110   /* Generate the output.  */
111   ADD_STRING ("Register dump:\n\n R0: ");
112   ADD_MEM (regs[0], 8);
113   ADD_STRING ("   R1: ");
114   ADD_MEM (regs[1], 8);
115   ADD_STRING ("   R2: ");
116   ADD_MEM (regs[2], 8);
117   ADD_STRING ("   R3: ");
118   ADD_MEM (regs[3], 8);
119   ADD_STRING ("\n R4: ");
120   ADD_MEM (regs[4], 8);
121   ADD_STRING ("   R5: ");
122   ADD_MEM (regs[5], 8);
123   ADD_STRING ("   R6: ");
124   ADD_MEM (regs[6], 8);
125   ADD_STRING ("   R7: ");
126   ADD_MEM (regs[7], 8);
127   ADD_STRING ("\n R8: ");
128   ADD_MEM (regs[8], 8);
129   ADD_STRING ("   R9: ");
130   ADD_MEM (regs[9], 8);
131   ADD_STRING ("   SL: ");
132   ADD_MEM (regs[10], 8);
133   ADD_STRING ("   FP: ");
134   ADD_MEM (regs[11], 8);
135   ADD_STRING ("\n IP: ");
136   ADD_MEM (regs[12], 8);
137   ADD_STRING ("   SP: ");
138   ADD_MEM (regs[13], 8);
139   ADD_STRING ("   LR: ");
140   ADD_MEM (regs[14], 8);
141   ADD_STRING ("   PC: ");
142   ADD_MEM (regs[15], 8);
143   ADD_STRING ("\n\n CPSR: ");
144   ADD_MEM (regs[16], 8);
145   ADD_STRING ("\n\n Trap: ");
146   ADD_MEM (regs[17], 8);
147   ADD_STRING ("   Error: ");
148   ADD_MEM (regs[18], 8);
149   ADD_STRING ("   OldMask: ");
150   ADD_MEM (regs[19], 8);
151
152   ADD_STRING ("\n");
153
154   /* Write the stuff out.  */
155   writev (fd, iov, nr);
156 }
157
158
159 #define REGISTER_DUMP register_dump (fd, &ctx)