1*3323Scindi /*
2*3323Scindi * CDDL HEADER START
3*3323Scindi *
4*3323Scindi * The contents of this file are subject to the terms of the
5*3323Scindi * Common Development and Distribution License (the "License").
6*3323Scindi * You may not use this file except in compliance with the License.
7*3323Scindi *
8*3323Scindi * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9*3323Scindi * or http://www.opensolaris.org/os/licensing.
10*3323Scindi * See the License for the specific language governing permissions
11*3323Scindi * and limitations under the License.
12*3323Scindi *
13*3323Scindi * When distributing Covered Code, include this CDDL HEADER in each
14*3323Scindi * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15*3323Scindi * If applicable, add the following below this CDDL HEADER, with the
16*3323Scindi * fields enclosed by brackets "[]" replaced with your own identifying
17*3323Scindi * information: Portions Copyright [yyyy] [name of copyright owner]
18*3323Scindi *
19*3323Scindi * CDDL HEADER END
20*3323Scindi */
21*3323Scindi /*
22*3323Scindi * Copyright 2006 Sun Microsystems, Inc. All rights reserved.
23*3323Scindi * Use is subject to license terms.
24*3323Scindi */
25*3323Scindi
26*3323Scindi #pragma ident "%Z%%M% %I% %E% SMI"
27*3323Scindi
28*3323Scindi #include <sys/types.h>
29*3323Scindi #include <sys/time.h>
30*3323Scindi #include <sys/sysmacros.h>
31*3323Scindi #include <sys/ddifm.h>
32*3323Scindi #include <sys/nvpair.h>
33*3323Scindi #include <sys/nvpair_impl.h>
34*3323Scindi #include <sys/errorq_impl.h>
35*3323Scindi #include <sys/errorq.h>
36*3323Scindi #include <sys/fm/protocol.h>
37*3323Scindi
38*3323Scindi #include <ctype.h>
39*3323Scindi #include <mdb/mdb_modapi.h>
40*3323Scindi #include <mdb/mdb_ks.h>
41*3323Scindi
42*3323Scindi #include "nvpair.h"
43*3323Scindi
44*3323Scindi int
ereportq_pend_walk_init(mdb_walk_state_t * wsp)45*3323Scindi ereportq_pend_walk_init(mdb_walk_state_t *wsp)
46*3323Scindi {
47*3323Scindi errorq_t eq;
48*3323Scindi uintptr_t addr;
49*3323Scindi
50*3323Scindi if (wsp->walk_addr == NULL &&
51*3323Scindi mdb_readvar(&addr, "ereport_errorq") == -1) {
52*3323Scindi mdb_warn("failed to read ereport_errorq");
53*3323Scindi return (WALK_ERR);
54*3323Scindi }
55*3323Scindi
56*3323Scindi if (mdb_vread(&eq, sizeof (eq), addr) == -1) {
57*3323Scindi mdb_warn("failed to read ereport_errorq at %p", addr);
58*3323Scindi return (WALK_ERR);
59*3323Scindi }
60*3323Scindi
61*3323Scindi if (!(eq.eq_flags & ERRORQ_NVLIST)) {
62*3323Scindi mdb_warn("errorq at %p does not service ereports", addr);
63*3323Scindi return (WALK_ERR);
64*3323Scindi }
65*3323Scindi
66*3323Scindi wsp->walk_addr = (uintptr_t)eq.eq_pend;
67*3323Scindi
68*3323Scindi return (WALK_NEXT);
69*3323Scindi }
70*3323Scindi
71*3323Scindi int
ereportq_pend_walk_step(mdb_walk_state_t * wsp)72*3323Scindi ereportq_pend_walk_step(mdb_walk_state_t *wsp)
73*3323Scindi {
74*3323Scindi uintptr_t addr = wsp->walk_addr;
75*3323Scindi nvlist_t nvl;
76*3323Scindi errorq_nvelem_t eqnp;
77*3323Scindi errorq_elem_t elem;
78*3323Scindi
79*3323Scindi if (addr == NULL)
80*3323Scindi return (WALK_DONE);
81*3323Scindi
82*3323Scindi if (mdb_vread(&elem, sizeof (elem), addr) != sizeof (elem) ||
83*3323Scindi mdb_vread(&eqnp, sizeof (eqnp), (uintptr_t)elem.eqe_data)
84*3323Scindi != sizeof (eqnp) || mdb_vread(&nvl, sizeof (nvl),
85*3323Scindi (uintptr_t)eqnp.eqn_nvl) != sizeof (nvl)) {
86*3323Scindi mdb_warn("failed to read ereportq element at %p", addr);
87*3323Scindi return (WALK_ERR);
88*3323Scindi }
89*3323Scindi
90*3323Scindi wsp->walk_addr = (uintptr_t)elem.eqe_prev;
91*3323Scindi
92*3323Scindi return (wsp->walk_callback((uintptr_t)eqnp.eqn_nvl, &nvl,
93*3323Scindi wsp->walk_cbdata));
94*3323Scindi }
95*3323Scindi
96*3323Scindi int
ereportq_dump_walk_init(mdb_walk_state_t * wsp)97*3323Scindi ereportq_dump_walk_init(mdb_walk_state_t *wsp)
98*3323Scindi {
99*3323Scindi errorq_t eq;
100*3323Scindi uintptr_t addr;
101*3323Scindi
102*3323Scindi if (wsp->walk_addr == NULL &&
103*3323Scindi mdb_readvar(&addr, "ereport_errorq") == -1) {
104*3323Scindi mdb_warn("failed to read ereport_errorq");
105*3323Scindi return (WALK_ERR);
106*3323Scindi }
107*3323Scindi
108*3323Scindi if (mdb_vread(&eq, sizeof (eq), addr) == -1) {
109*3323Scindi mdb_warn("failed to read ereport_errorq at %p", addr);
110*3323Scindi return (WALK_ERR);
111*3323Scindi }
112*3323Scindi
113*3323Scindi if (!(eq.eq_flags & ERRORQ_NVLIST)) {
114*3323Scindi mdb_warn("errorq at %p does not service ereports", addr);
115*3323Scindi return (WALK_ERR);
116*3323Scindi }
117*3323Scindi
118*3323Scindi wsp->walk_addr = (uintptr_t)eq.eq_dump;
119*3323Scindi
120*3323Scindi return (WALK_NEXT);
121*3323Scindi }
122*3323Scindi
123*3323Scindi int
ereportq_dump_walk_step(mdb_walk_state_t * wsp)124*3323Scindi ereportq_dump_walk_step(mdb_walk_state_t *wsp)
125*3323Scindi {
126*3323Scindi uintptr_t addr = wsp->walk_addr;
127*3323Scindi nvlist_t nvl;
128*3323Scindi errorq_nvelem_t eqnp;
129*3323Scindi errorq_elem_t elem;
130*3323Scindi
131*3323Scindi if (addr == NULL)
132*3323Scindi return (WALK_DONE);
133*3323Scindi
134*3323Scindi if (mdb_vread(&elem, sizeof (elem), addr) != sizeof (elem) ||
135*3323Scindi mdb_vread(&eqnp, sizeof (eqnp), (uintptr_t)elem.eqe_data)
136*3323Scindi != sizeof (eqnp) || mdb_vread(&nvl, sizeof (nvl),
137*3323Scindi (uintptr_t)eqnp.eqn_nvl) != sizeof (nvl)) {
138*3323Scindi mdb_warn("failed to read ereportq element at %p", addr);
139*3323Scindi return (WALK_ERR);
140*3323Scindi }
141*3323Scindi
142*3323Scindi wsp->walk_addr = (uintptr_t)elem.eqe_dump;
143*3323Scindi
144*3323Scindi return (wsp->walk_callback((uintptr_t)eqnp.eqn_nvl, &nvl,
145*3323Scindi wsp->walk_cbdata));
146*3323Scindi }
147*3323Scindi
148*3323Scindi /*ARGSUSED*/
149*3323Scindi int
ereport(uintptr_t addr,uint_t flags,int argc,const mdb_arg_t * argv)150*3323Scindi ereport(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv)
151*3323Scindi {
152*3323Scindi int ret;
153*3323Scindi uint_t opt_v = 0;
154*3323Scindi char *class = NULL;
155*3323Scindi uint64_t ena = 0;
156*3323Scindi nvlist_t nvl;
157*3323Scindi nvpriv_t nvpriv;
158*3323Scindi i_nvp_t *nvcur, i_nvp;
159*3323Scindi
160*3323Scindi if (!(flags & DCMD_ADDRSPEC))
161*3323Scindi return (DCMD_USAGE);
162*3323Scindi
163*3323Scindi if (mdb_getopts(argc, argv, 'v', MDB_OPT_SETBITS, TRUE, &opt_v) != argc)
164*3323Scindi return (DCMD_USAGE);
165*3323Scindi
166*3323Scindi if (mdb_vread(&nvl, sizeof (nvl), addr) == -1) {
167*3323Scindi mdb_warn("failed to read nvlist at %p", addr);
168*3323Scindi return (DCMD_ERR);
169*3323Scindi }
170*3323Scindi
171*3323Scindi if (DCMD_HDRSPEC(flags) && !opt_v) {
172*3323Scindi mdb_printf("ENA CLASS\n");
173*3323Scindi }
174*3323Scindi
175*3323Scindi /*
176*3323Scindi * The following code attempts to pretty print the ereport class
177*3323Scindi * and ENA. The code uses project private macros from libnvpair
178*3323Scindi * that could change and break this functionality. If we are unable
179*3323Scindi * to get a valid class and ENA from the nvpair list, we revert to
180*3323Scindi * dumping the nvlist (same as opt_v).
181*3323Scindi */
182*3323Scindi if (mdb_vread(&nvpriv, sizeof (nvpriv), nvl.nvl_priv) == -1) {
183*3323Scindi mdb_warn("failed to read nvpriv at %p", nvl.nvl_priv);
184*3323Scindi return (DCMD_ERR);
185*3323Scindi }
186*3323Scindi
187*3323Scindi for (nvcur = nvpriv.nvp_list; nvcur != NULL; nvcur = i_nvp.nvi_next) {
188*3323Scindi nvpair_t *nvp, *nvpair;
189*3323Scindi int32_t size;
190*3323Scindi
191*3323Scindi if (opt_v)
192*3323Scindi break;
193*3323Scindi
194*3323Scindi if (mdb_vread(&i_nvp, sizeof (i_nvp), (uintptr_t)nvcur) == -1) {
195*3323Scindi mdb_warn("failed to read i_nvp at %p", nvcur);
196*3323Scindi return (DCMD_ERR);
197*3323Scindi }
198*3323Scindi
199*3323Scindi nvp = &i_nvp.nvi_nvp;
200*3323Scindi size = NVP_SIZE(nvp);
201*3323Scindi if (size == 0) {
202*3323Scindi mdb_warn("nvpair of size zero at %p", nvp);
203*3323Scindi return (DCMD_OK);
204*3323Scindi }
205*3323Scindi
206*3323Scindi /* read in the entire nvpair */
207*3323Scindi nvpair = mdb_alloc(size, UM_SLEEP | UM_GC);
208*3323Scindi if (mdb_vread(nvpair, size, (uintptr_t)&nvcur->nvi_nvp) == -1) {
209*3323Scindi mdb_warn("failed to read nvpair and data at %p", nvp);
210*3323Scindi return (DCMD_ERR);
211*3323Scindi }
212*3323Scindi
213*3323Scindi if (strcmp(FM_CLASS, NVP_NAME(nvpair)) == 0 &&
214*3323Scindi NVP_TYPE(nvpair) == DATA_TYPE_STRING && class == NULL) {
215*3323Scindi char *p = (char *)NVP_VALUE(nvpair);
216*3323Scindi
217*3323Scindi class = mdb_zalloc(strlen(p) + 1, UM_SLEEP | UM_GC);
218*3323Scindi bcopy(p, class, strlen(p));
219*3323Scindi } else if (strcmp(FM_EREPORT_ENA, NVP_NAME(nvpair)) == 0 &&
220*3323Scindi NVP_TYPE(nvpair) == DATA_TYPE_UINT64 && ena == 0) {
221*3323Scindi bcopy(NVP_VALUE(nvpair), (char *)&ena,
222*3323Scindi sizeof (uint64_t));
223*3323Scindi }
224*3323Scindi
225*3323Scindi if (class != NULL && ena != 0) {
226*3323Scindi mdb_printf("0x%016llx %s\n", ena, class);
227*3323Scindi return (DCMD_OK);
228*3323Scindi }
229*3323Scindi
230*3323Scindi }
231*3323Scindi
232*3323Scindi /*
233*3323Scindi * Dump entire nvlist
234*3323Scindi */
235*3323Scindi ret = mdb_call_dcmd("nvlist", addr, flags | DCMD_ADDRSPEC,
236*3323Scindi 0, argv);
237*3323Scindi mdb_printf("\n");
238*3323Scindi
239*3323Scindi return (ret);
240*3323Scindi }
241