blob: 0bd5a063eb7e59ca4adf5a74eb3416ef2dea896c (
plain)
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
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
|
/*
* CDDL HEADER START
*
* The contents of this file are subject to the terms of the
* Common Development and Distribution License (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
*
* $FreeBSD$
*/
/*
* Copyright 2006 Sun Microsystems, Inc. All rights reserved.
* Use is subject to license terms.
*/
#pragma ident "%Z%%M% %I% %E% SMI"
#pragma D depends_on module unix
#pragma D depends_on provider io
inline int B_BUSY = B_BUSY;
#pragma D binding "1.0" B_BUSY
inline int B_DONE = 0x00000200;
#pragma D binding "1.0" B_DONE
inline int B_ERROR = B_ERROR;
#pragma D binding "1.0" B_ERROR
inline int B_PAGEIO = B_PAGEIO;
#pragma D binding "1.0" B_PAGEIO
inline int B_PHYS = B_PHYS;
#pragma D binding "1.0" B_PHYS
inline int B_READ = B_READ;
#pragma D binding "1.0" B_READ
inline int B_WRITE = B_WRITE;
#pragma D binding "1.0" B_WRITE
inline int B_ASYNC = 0x00000004;
#pragma D binding "1.0" B_ASYNC
typedef struct bufinfo {
int b_flags; /* buffer status */
size_t b_bcount; /* number of bytes */
caddr_t b_addr; /* buffer address */
uint64_t b_lblkno; /* block # on device */
uint64_t b_blkno; /* expanded block # on device */
size_t b_resid; /* # of bytes not transferred */
size_t b_bufsize; /* size of allocated buffer */
caddr_t b_iodone; /* I/O completion routine */
int b_error; /* expanded error field */
dev_t b_edev; /* extended device */
} bufinfo_t;
#pragma D binding "1.0" translator
translator bufinfo_t < struct buf *B > {
b_flags = B->b_flags;
b_addr = B->b_un.b_addr;
b_bcount = B->b_bcount;
b_lblkno = B->_b_blkno._f;
b_blkno = sizeof (long) == 8 ? B->_b_blkno._f : B->_b_blkno._p._l;
b_resid = B->b_resid;
b_bufsize = B->b_bufsize;
b_iodone = (caddr_t)B->b_iodone;
b_error = B->b_error;
b_edev = B->b_edev;
};
typedef struct devinfo {
int dev_major; /* major number */
int dev_minor; /* minor number */
int dev_instance; /* instance number */
string dev_name; /* name of device */
string dev_statname; /* name of device + instance/minor */
string dev_pathname; /* pathname of device */
} devinfo_t;
#pragma D binding "1.0" translator
translator devinfo_t < struct buf *B > {
dev_major = B->b_dip != NULL ? getmajor(B->b_edev) :
getmajor(B->b_file->v_vfsp->vfs_dev);
dev_minor = B->b_dip != NULL ? getminor(B->b_edev) :
getminor(B->b_file->v_vfsp->vfs_dev);
dev_instance = B->b_dip == NULL ?
getminor(B->b_file->v_vfsp->vfs_dev) :
((struct dev_info *)B->b_dip)->devi_instance;
dev_name = B->b_dip == NULL ? "nfs" :
stringof(`devnamesp[getmajor(B->b_edev)].dn_name);
dev_statname = strjoin(B->b_dip == NULL ? "nfs" :
stringof(`devnamesp[getmajor(B->b_edev)].dn_name),
lltostr(B->b_dip == NULL ? getminor(B->b_file->v_vfsp->vfs_dev) :
((struct dev_info *)B->b_dip)->devi_instance == 0 &&
((struct dev_info *)B->b_dip)->devi_parent != NULL &&
((struct dev_info *)B->b_dip)->devi_parent->devi_node_name ==
"pseudo" ? getminor(B->b_edev) :
((struct dev_info *)B->b_dip)->devi_instance));
dev_pathname = B->b_dip == NULL ? "<nfs>" :
ddi_pathname(B->b_dip, getminor(B->b_edev));
};
typedef struct fileinfo {
string fi_name; /* name (basename of fi_pathname) */
string fi_dirname; /* directory (dirname of fi_pathname) */
string fi_pathname; /* full pathname */
offset_t fi_offset; /* offset within file */
string fi_fs; /* filesystem */
string fi_mount; /* mount point of file system */
int fi_oflags; /* open(2) flags for file descriptor */
} fileinfo_t;
#pragma D binding "1.0" translator
translator fileinfo_t < struct buf *B > {
fi_name = B->b_file == NULL ? "<none>" :
B->b_file->v_path == NULL ? "<unknown>" :
basename(cleanpath(B->b_file->v_path));
fi_dirname = B->b_file == NULL ? "<none>" :
B->b_file->v_path == NULL ? "<unknown>" :
dirname(cleanpath(B->b_file->v_path));
fi_pathname = B->b_file == NULL ? "<none>" :
B->b_file->v_path == NULL ? "<unknown>" :
cleanpath(B->b_file->v_path);
fi_offset = B->b_offset;
fi_fs = B->b_file == NULL ? "<none>" :
stringof(B->b_file->v_op->vnop_name);
fi_mount = B->b_file == NULL ? "<none>" :
B->b_file->v_vfsp->vfs_vnodecovered == NULL ? "/" :
B->b_file->v_vfsp->vfs_vnodecovered->v_path == NULL ? "<unknown>" :
cleanpath(B->b_file->v_vfsp->vfs_vnodecovered->v_path);
fi_oflags = 0;
};
/*
* The following inline constants can be used to examine fi_oflags when using
* the fds[] array or a translated fileinfo_t. Note that the various open
* flags behave as a bit-field *except* for O_RDONLY, O_WRONLY, and O_RDWR.
* To test the open mode, you write code similar to that used with the fcntl(2)
* F_GET[X]FL command, such as: if ((fi_oflags & O_ACCMODE) == O_WRONLY).
*/
inline int O_ACCMODE = 0x0003;
#pragma D binding "1.1" O_ACCMODE
inline int O_RDONLY = 0x0000;
#pragma D binding "1.1" O_RDONLY
inline int O_WRONLY = 0x0001;
#pragma D binding "1.1" O_WRONLY
inline int O_RDWR = 0x0002;
#pragma D binding "1.1" O_RDWR
inline int O_APPEND = 0x0008;
#pragma D binding "1.1" O_APPEND
inline int O_CREAT = 0x0200;
#pragma D binding "1.1" O_CREAT
inline int O_DSYNC = O_DSYNC;
#pragma D binding "1.1" O_DSYNC
inline int O_EXCL = 0x0800;
#pragma D binding "1.1" O_EXCL
inline int O_LARGEFILE = O_LARGEFILE;
#pragma D binding "1.1" O_LARGEFILE
inline int O_NOCTTY = 0x8000;
#pragma D binding "1.1" O_NOCTTY
inline int O_NONBLOCK = 0x0004;
#pragma D binding "1.1" O_NONBLOCK
inline int O_NDELAY = 0x0004;
#pragma D binding "1.1" O_NDELAY
inline int O_RSYNC = O_RSYNC;
#pragma D binding "1.1" O_RSYNC
inline int O_SYNC = 0x0080;
#pragma D binding "1.1" O_SYNC
inline int O_TRUNC = 0x0400;
#pragma D binding "1.1" O_TRUNC
inline int O_XATTR = O_XATTR;
#pragma D binding "1.1" O_XATTR
#pragma D binding "1.1" translator
translator fileinfo_t < struct file *F > {
fi_name = F == NULL ? "<none>" :
F->f_vnode->v_path == NULL ? "<unknown>" :
basename(cleanpath(F->f_vnode->v_path));
fi_dirname = F == NULL ? "<none>" :
F->f_vnode->v_path == NULL ? "<unknown>" :
dirname(cleanpath(F->f_vnode->v_path));
fi_pathname = F == NULL ? "<none>" :
F->f_vnode->v_path == NULL ? "<unknown>" :
cleanpath(F->f_vnode->v_path);
fi_offset = F == NULL ? 0 : F->f_offset;
fi_fs = F == NULL ? "<none>" : stringof(F->f_vnode->v_op->vnop_name);
fi_mount = F == NULL ? "<none>" :
F->f_vnode->v_vfsp->vfs_vnodecovered == NULL ? "/" :
F->f_vnode->v_vfsp->vfs_vnodecovered->v_path == NULL ? "<unknown>" :
cleanpath(F->f_vnode->v_vfsp->vfs_vnodecovered->v_path);
fi_oflags = F == NULL ? 0 : F->f_flag + (int)FOPEN;
};
inline fileinfo_t fds[int fd] = xlate <fileinfo_t> (
fd >= 0 && fd < curthread->t_procp->p_user.u_finfo.fi_nfiles ?
curthread->t_procp->p_user.u_finfo.fi_list[fd].uf_file : NULL);
#pragma D attributes Stable/Stable/Common fds
#pragma D binding "1.1" fds
#pragma D binding "1.2" translator
translator fileinfo_t < struct vnode *V > {
fi_name = V->v_path == NULL ? "<unknown>" :
basename(cleanpath(V->v_path));
fi_dirname = V->v_path == NULL ? "<unknown>" :
dirname(cleanpath(V->v_path));
fi_pathname = V->v_path == NULL ? "<unknown>" : cleanpath(V->v_path);
fi_fs = stringof(V->v_op->vnop_name);
fi_mount = V->v_vfsp->vfs_vnodecovered == NULL ? "/" :
V->v_vfsp->vfs_vnodecovered->v_path == NULL ? "<unknown>" :
cleanpath(V->v_vfsp->vfs_vnodecovered->v_path);
};
|
