kvm_file.c revision 179320
1/*- 2 * Copyright (c) 1989, 1992, 1993 3 * The Regents of the University of California. All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 4. Neither the name of the University nor the names of its contributors 14 * may be used to endorse or promote products derived from this software 15 * without specific prior written permission. 16 * 17 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 20 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 27 * SUCH DAMAGE. 28 */ 29 30#include <sys/cdefs.h> 31__FBSDID("$FreeBSD: head/lib/libkvm/kvm_file.c 179320 2008-05-26 15:12:47Z pjd $"); 32 33#if defined(LIBC_SCCS) && !defined(lint) 34#if 0 35static char sccsid[] = "@(#)kvm_file.c 8.1 (Berkeley) 6/4/93"; 36#endif 37#endif /* LIBC_SCCS and not lint */ 38 39/* 40 * File list interface for kvm. pstat, fstat and netstat are 41 * users of this code, so we've factored it out into a separate module. 42 * Thus, we keep this grunge out of the other kvm applications (i.e., 43 * most other applications are interested only in open/close/read/nlist). 44 */ 45 46#include <sys/param.h> 47#include <sys/user.h> 48#include <sys/proc.h> 49#define _WANT_FILE /* make file.h give us 'struct file' */ 50#include <sys/file.h> 51#include <sys/stat.h> 52#include <sys/ioctl.h> 53#include <nlist.h> 54#include <kvm.h> 55 56#include <vm/vm.h> 57#include <vm/vm_param.h> 58 59#include <sys/sysctl.h> 60 61#include <limits.h> 62#include <ndbm.h> 63#include <paths.h> 64 65#include "kvm_private.h" 66 67#define KREAD(kd, addr, obj) \ 68 (kvm_read(kd, addr, obj, sizeof(*obj)) != sizeof(*obj)) 69 70#define KREADN(kd, addr, obj, cnt) \ 71 (kvm_read(kd, addr, obj, (cnt)) != (cnt)) 72 73/* 74 * Get file structures. 75 */ 76static int 77kvm_deadfiles(kd, op, arg, allproc_o, nprocs) 78 kvm_t *kd; 79 int op, arg, nprocs; 80 long allproc_o; 81{ 82 struct proc proc; 83 struct filedesc filed; 84 int buflen = kd->arglen, ocnt = 0, n = 0, once = 0, i; 85 struct file **ofiles; 86 struct file *fp; 87 struct proc *p; 88 char *where = kd->argspc; 89 90 if (buflen < sizeof (struct file *) + sizeof (struct file)) 91 return (0); 92 if (KREAD(kd, allproc_o, &p)) { 93 _kvm_err(kd, kd->program, "cannot read allproc"); 94 return (0); 95 } 96 for (; p != NULL; p = LIST_NEXT(&proc, p_list)) { 97 if (KREAD(kd, (u_long)p, &proc)) { 98 _kvm_err(kd, kd->program, "can't read proc at %x", p); 99 goto fail; 100 } 101 if (proc.p_state == PRS_NEW) 102 continue; 103 if (proc.p_fd == NULL) 104 continue; 105 if (KREAD(kd, (u_long)p->p_fd, &filed)) { 106 _kvm_err(kd, kd->program, "can't read filedesc at %x", 107 p->p_fd); 108 goto fail; 109 } 110 if (filed.fd_lastfile + 1 > ocnt) { 111 ocnt = filed.fd_lastfile + 1; 112 free(ofiles); 113 ofiles = (struct file **)_kvm_malloc(kd, 114 ocnt * sizeof(struct file *)); 115 if (ofiles == 0) 116 return (0); 117 } 118 if (KREADN(kd, (u_long)filed.fd_ofiles, ofiles, 119 ocnt * sizeof(struct file *))) { 120 _kvm_err(kd, kd->program, "can't read ofiles at %x", 121 filed.fd_ofiles); 122 return (0); 123 } 124 for (i = 0; i <= filed.fd_lastfile; i++) { 125 if ((fp = ofiles[i]) == NULL) 126 continue; 127 /* 128 * copyout filehead (legacy) 129 */ 130 if (!once) { 131 *(struct file **)kd->argspc = fp; 132 *(struct file **)where = fp; 133 buflen -= sizeof (fp); 134 where += sizeof (fp); 135 once = 1; 136 } 137 if (buflen < sizeof (struct file)) 138 goto fail; 139 if (KREAD(kd, (long)fp, ((struct file *)where))) { 140 _kvm_err(kd, kd->program, "can't read kfp"); 141 goto fail; 142 } 143 buflen -= sizeof (struct file); 144 fp = (struct file *)where; 145 where += sizeof (struct file); 146 n++; 147 } 148 } 149 free(ofiles); 150 return (n); 151fail: 152 free(ofiles); 153 return (0); 154 155} 156 157char * 158kvm_getfiles(kd, op, arg, cnt) 159 kvm_t *kd; 160 int op, arg; 161 int *cnt; 162{ 163 int mib[2], st, n, nfiles, nprocs; 164 size_t size; 165 166 _kvm_syserr(kd, kd->program, "kvm_getfiles has been broken for years"); 167 return (0); 168 if (ISALIVE(kd)) { 169 size = 0; 170 mib[0] = CTL_KERN; 171 mib[1] = KERN_FILE; 172 st = sysctl(mib, 2, NULL, &size, NULL, 0); 173 if (st == -1) { 174 _kvm_syserr(kd, kd->program, "kvm_getfiles"); 175 return (0); 176 } 177 if (kd->argspc == 0) 178 kd->argspc = (char *)_kvm_malloc(kd, size); 179 else if (kd->arglen < size) 180 kd->argspc = (char *)_kvm_realloc(kd, kd->argspc, size); 181 if (kd->argspc == 0) 182 return (0); 183 kd->arglen = size; 184 st = sysctl(mib, 2, kd->argspc, &size, NULL, 0); 185 if (st != 0) { 186 _kvm_syserr(kd, kd->program, "kvm_getfiles"); 187 return (0); 188 } 189 nfiles = size / sizeof(struct xfile); 190 } else { 191 struct nlist nl[4], *p; 192 193 nl[0].n_name = "_allproc"; 194 nl[1].n_name = "_nprocs"; 195 nl[2].n_name = "_nfiles"; 196 nl[3].n_name = 0; 197 198 if (kvm_nlist(kd, nl) != 0) { 199 for (p = nl; p->n_type != 0; ++p) 200 ; 201 _kvm_err(kd, kd->program, 202 "%s: no such symbol", p->n_name); 203 return (0); 204 } 205 if (KREAD(kd, nl[1].n_value, &nprocs)) { 206 _kvm_err(kd, kd->program, "can't read nprocs"); 207 return (0); 208 } 209 if (KREAD(kd, nl[2].n_value, &nfiles)) { 210 _kvm_err(kd, kd->program, "can't read nfiles"); 211 return (0); 212 } 213 size = sizeof(void *) + (nfiles + 10) * sizeof(struct file); 214 if (kd->argspc == 0) 215 kd->argspc = (char *)_kvm_malloc(kd, size); 216 else if (kd->arglen < size) 217 kd->argspc = (char *)_kvm_realloc(kd, kd->argspc, size); 218 if (kd->argspc == 0) 219 return (0); 220 kd->arglen = size; 221 n = kvm_deadfiles(kd, op, arg, nl[0].n_value, nprocs); 222 if (n != nfiles) { 223 _kvm_err(kd, kd->program, "inconsistant nfiles"); 224 return (0); 225 } 226 nfiles = n; 227 } 228 *cnt = nfiles; 229 return (kd->argspc); 230} 231