1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
|
/*
* CDDL HEADER START
*
* The contents of this file are subject to the terms of the
* Common Development and Distribution License, Version 1.0 only
* (the "License"). You may not use this file except in compliance
* with the License.
*
* You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
* or http://www.opensolaris.org/os/licensing.
* See the License for the specific language governing permissions
* and limitations under the License.
*
* When distributing Covered Code, include this CDDL HEADER in each
* file and include the License file at usr/src/OPENSOLARIS.LICENSE.
* If applicable, add the following below this CDDL HEADER, with the
* fields enclosed by brackets "[]" replaced with your own identifying
* information: Portions Copyright [yyyy] [name of copyright owner]
*
* CDDL HEADER END
*/
/*
* Copyright (c) 2000 by Sun Microsystems, Inc.
* All rights reserved.
*/
/*
* Copyright 2018 Joyent, Inc.
*/
#include <sys/mdb_modapi.h>
#include <mdb/mdb_ctf.h>
#include <sys/thread.h>
#include "ctxop.h"
struct ctxop_walk_state {
uintptr_t cws_head;
uint_t cws_next_offset;
};
int
ctxop_walk_init(mdb_walk_state_t *wsp)
{
struct ctxop_walk_state *priv;
int offset;
uintptr_t addr;
if (wsp->walk_addr == 0) {
mdb_warn("must specify thread for ctxop walk\n");
return (WALK_ERR);
}
offset = mdb_ctf_offsetof_by_name("kthread_t", "t_ctx");
if (offset == -1)
return (WALK_ERR);
if (mdb_vread(&addr, sizeof (addr),
wsp->walk_addr + offset) != sizeof (addr)) {
mdb_warn("failed to read thread %p", wsp->walk_addr);
return (WALK_ERR);
}
/* No further work for threads with a NULL t_ctx */
if (addr == 0) {
wsp->walk_data = NULL;
return (WALK_DONE);
}
/* rely on CTF for the offset of the 'next' pointer */
offset = mdb_ctf_offsetof_by_name("struct ctxop", "next");
if (offset == -1)
return (WALK_ERR);
priv = mdb_alloc(sizeof (*priv), UM_SLEEP);
priv->cws_head = addr;
priv->cws_next_offset = (uint_t)offset;
wsp->walk_data = priv;
wsp->walk_addr = addr;
return (WALK_NEXT);
}
int
ctxop_walk_step(mdb_walk_state_t *wsp)
{
struct ctxop_walk_state *priv = wsp->walk_data;
uintptr_t next;
int status;
if (mdb_vread(&next, sizeof (next),
wsp->walk_addr + priv->cws_next_offset) == -1) {
mdb_warn("failed to read ctxop`next at %p",
wsp->walk_addr + priv->cws_next_offset);
return (WALK_DONE);
}
status = wsp->walk_callback(wsp->walk_addr, NULL, wsp->walk_cbdata);
if (status == WALK_NEXT) {
/*
* If a NULL terminator or a loop back to the head element is
* encountered, the walk is done.
*/
if (next == 0 || next == priv->cws_head) {
status = WALK_DONE;
}
}
wsp->walk_addr = next;
return (status);
}
void
ctxop_walk_fini(mdb_walk_state_t *wsp)
{
struct ctxop_walk_state *priv = wsp->walk_data;
if (priv != NULL) {
mdb_free(priv, sizeof (*priv));
}
}
|
