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
33static void
34disp_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
63void
64display_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
83void
84display_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
103void
104display_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
128void
129display_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
148void
149display_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
169retc_t
170display_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