xref: /titanic_52/usr/src/cmd/sgs/librtld_db/demo/sparcv9/regs.c (revision 20c1c3551cb3b3117591ae38463d16aada597c48)
1 /*
2  * CDDL HEADER START
3  *
4  * The contents of this file are subject to the terms of the
5  * Common Development and Distribution License (the "License").
6  * You may not use this file except in compliance with the License.
7  *
8  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9  * or http://www.opensolaris.org/os/licensing.
10  * See the License for the specific language governing permissions
11  * and limitations under the License.
12  *
13  * When distributing Covered Code, include this CDDL HEADER in each
14  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15  * If applicable, add the following below this CDDL HEADER, with the
16  * fields enclosed by brackets "[]" replaced with your own identifying
17  * information: Portions Copyright [yyyy] [name of copyright owner]
18  *
19  * CDDL HEADER END
20  */
21 
22 /*
23  * Copyright (c) 1995, 2010, Oracle and/or its affiliates. All rights reserved.
24  */
25 
26 #include <stdio.h>
27 #include <unistd.h>
28 #include <string.h>
29 #include <sys/param.h>
30 
31 #include "rdb.h"
32 
33 static void
34 disp_reg_line(struct ps_prochandle *ph, pstatus_t *prst, char *r1, int ind1,
35     char *r2, int ind2)
36 {
37 	char	str1[MAXPATHLEN], str2[MAXPATHLEN];
38 
39 	(void) strcpy(str1, print_address_ps(ph, prst->pr_lwp.pr_reg[ind1],
40 	    FLG_PAP_NOHEXNAME));
41 
42 	(void) strcpy(str2, print_address_ps(ph, prst->pr_lwp.pr_reg[ind2],
43 	    FLG_PAP_NOHEXNAME));
44 
45 	if (ph->pp_dmodel == PR_MODEL_LP64) {
46 		/*
47 		 *  In 64-bits, the display gets too wide when
48 		 *  you have both a 64-bit address and a symbol
49 		 *  name, e.g. _GLOBAL_OFFSET_TABLE;  therefore,
50 		 *  each is put on a separate line.  This isn't
51 		 *  as convenient as the 32-bit display.
52 		 */
53 		(void) printf("%8s: 0x%08lx %-16s\n", r1,
54 		    prst->pr_lwp.pr_reg[ind1], str1);
55 		(void) printf("%8s: 0x%08lx %-16s\n", r2,
56 		    prst->pr_lwp.pr_reg[ind2], str2);
57 	} else
58 		(void) printf("%8s: 0x%08lx %-16s %8s: 0x%08lx %-16s\n", r1,
59 		    prst->pr_lwp.pr_reg[ind1], str1, r2,
60 		    prst->pr_lwp.pr_reg[ind2], str2);
61 }
62 
63 void
64 display_local_regs(struct ps_prochandle *ph, pstatus_t *prst)
65 {
66 	pstatus_t	pstatus;
67 
68 	if (prst == NULL) {
69 		if (pread(ph->pp_statusfd, &pstatus, sizeof (pstatus),
70 		    0) == -1) {
71 			perror("dar: reading status");
72 			return;
73 		}
74 		prst = &pstatus;
75 	}
76 	(void) printf("locals:\n");
77 	disp_reg_line(ph, prst, "l0", R_L0, "l4", R_L4);
78 	disp_reg_line(ph, prst, "l1", R_L1, "l5", R_L5);
79 	disp_reg_line(ph, prst, "l2", R_L2, "l6", R_L6);
80 	disp_reg_line(ph, prst, "l3", R_L3, "l7", R_L7);
81 }
82 
83 void
84 display_out_regs(struct ps_prochandle *ph, pstatus_t *prst)
85 {
86 	pstatus_t	pstatus;
87 
88 	if (prst == NULL) {
89 		if (pread(ph->pp_statusfd, &pstatus, sizeof (pstatus),
90 		    0) == -1) {
91 			perror("dar: reading status");
92 			return;
93 		}
94 		prst = &pstatus;
95 	}
96 	(void) printf("outs:\n");
97 	disp_reg_line(ph, prst, "o0", R_O0, "o4", R_O4);
98 	disp_reg_line(ph, prst, "o1", R_O1, "o5", R_O5);
99 	disp_reg_line(ph, prst, "o2", R_O2, "o6(sp)", R_O6);
100 	disp_reg_line(ph, prst, "o3", R_O3, "o7", R_O7);
101 }
102 
103 void
104 display_special_regs(struct ps_prochandle *ph, pstatus_t *prst)
105 {
106 	pstatus_t	pstatus;
107 
108 	if (prst == NULL) {
109 		if (pread(ph->pp_statusfd, &pstatus, sizeof (pstatus),
110 		    0) == -1) {
111 			perror("dar: reading status");
112 			return;
113 		}
114 		prst = &pstatus;
115 	}
116 	(void) printf("specials:\n");
117 	if (ph->pp_dmodel == PR_MODEL_LP64) {
118 		disp_reg_line(ph, prst, "ccr", R_CCR, "pc", R_PC);
119 		disp_reg_line(ph, prst, "npc", R_nPC, "Y", R_Y);
120 		disp_reg_line(ph, prst, "asi", R_ASI, "FPRS", R_FPRS);
121 	} else {
122 		disp_reg_line(ph, prst, "psr", R_PSR, "pc", R_PC);
123 		disp_reg_line(ph, prst, "npc", R_nPC, "Y", R_Y);
124 		disp_reg_line(ph, prst, "wim", R_WIM, "TBR", R_TBR);
125 	}
126 }
127 
128 void
129 display_global_regs(struct ps_prochandle *ph, pstatus_t *prst)
130 {
131 	pstatus_t	pstatus;
132 
133 	if (prst == NULL) {
134 		if (pread(ph->pp_statusfd, &pstatus, sizeof (pstatus),
135 		    0) == -1) {
136 			perror("dar: reading status");
137 			return;
138 		}
139 		prst = &pstatus;
140 	}
141 	(void) printf("globals:\n");
142 	disp_reg_line(ph, prst, "g0", R_G0, "g4", R_G4);
143 	disp_reg_line(ph, prst, "g1", R_G1, "g5", R_G5);
144 	disp_reg_line(ph, prst, "g2", R_G2, "g6", R_G6);
145 	disp_reg_line(ph, prst, "g3", R_G3, "g7", R_G7);
146 }
147 
148 void
149 display_in_regs(struct ps_prochandle *ph, pstatus_t *prst)
150 {
151 	pstatus_t	pstatus;
152 
153 	if (prst == NULL) {
154 		if (pread(ph->pp_statusfd, &pstatus, sizeof (pstatus),
155 		    0) == -1) {
156 			perror("dar: reading status");
157 			return;
158 		}
159 		prst = &pstatus;
160 	}
161 	(void) printf("ins:\n");
162 	disp_reg_line(ph, prst, "i0", R_I0, "i4", R_I4);
163 	disp_reg_line(ph, prst, "i1", R_I1, "i5", R_I5);
164 	disp_reg_line(ph, prst, "i2", R_I2, "i6(fp)", R_I6);
165 	disp_reg_line(ph, prst, "i3", R_I3, "i7", R_I7);
166 
167 }
168 
169 retc_t
170 display_all_regs(struct ps_prochandle *ph)
171 {
172 	pstatus_t	pstatus;
173 
174 	if (pread(ph->pp_statusfd, &pstatus, sizeof (pstatus),
175 	    0) == -1) {
176 		perror("dar: reading status");
177 		return (RET_FAILED);
178 	}
179 	display_global_regs(ph, &pstatus);
180 	display_in_regs(ph, &pstatus);
181 	display_local_regs(ph, &pstatus);
182 	display_out_regs(ph, &pstatus);
183 	display_special_regs(ph, &pstatus);
184 
185 	return (RET_OK);
186 }
187