Home | History | Annotate | Line # | Download | only in libkvm
kvm_file.c revision 1.1
      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  * 3. All advertising materials mentioning features or use of this software
     14  *    must display the following acknowledgement:
     15  *	This product includes software developed by the University of
     16  *	California, Berkeley and its contributors.
     17  * 4. Neither the name of the University nor the names of its contributors
     18  *    may be used to endorse or promote products derived from this software
     19  *    without specific prior written permission.
     20  *
     21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     31  * SUCH DAMAGE.
     32  */
     33 
     34 #if defined(LIBC_SCCS) && !defined(lint)
     35 static char sccsid[] = "@(#)kvm_file.c	8.1 (Berkeley) 6/4/93";
     36 #endif /* LIBC_SCCS and not lint */
     37 
     38 /*
     39  * File list interface for kvm.  pstat, fstat and netstat are
     40  * users of this code, so we've factored it out into a separate module.
     41  * Thus, we keep this grunge out of the other kvm applications (i.e.,
     42  * most other applications are interested only in open/close/read/nlist).
     43  */
     44 
     45 #include <sys/param.h>
     46 #include <sys/user.h>
     47 #include <sys/proc.h>
     48 #include <sys/exec.h>
     49 #define KERNEL
     50 #include <sys/file.h>
     51 #undef KERNEL
     52 #include <sys/stat.h>
     53 #include <sys/ioctl.h>
     54 #include <sys/tty.h>
     55 #include <nlist.h>
     56 #include <kvm.h>
     57 
     58 #include <vm/vm.h>
     59 #include <vm/vm_param.h>
     60 #include <vm/swap_pager.h>
     61 
     62 #include <sys/sysctl.h>
     63 
     64 #include <limits.h>
     65 #include <ndbm.h>
     66 #include <paths.h>
     67 
     68 #include "kvm_private.h"
     69 
     70 #define KREAD(kd, addr, obj) \
     71 	(kvm_read(kd, addr, obj, sizeof(*obj)) != sizeof(*obj))
     72 
     73 /*
     74  * Get file structures.
     75  */
     76 static
     77 kvm_deadfiles(kd, op, arg, filehead_o, nfiles)
     78 	kvm_t *kd;
     79 	int op, arg, nfiles;
     80 	long filehead_o;
     81 {
     82 	int buflen = kd->arglen, needed = buflen, error, n = 0;
     83 	struct file *fp, file, *filehead;
     84 	register char *where = kd->argspc;
     85 	char *start = where;
     86 
     87 	/*
     88 	 * first copyout filehead
     89 	 */
     90 	if (buflen > sizeof (filehead)) {
     91 		if (KREAD(kd, filehead_o, &filehead)) {
     92 			_kvm_err(kd, kd->program, "can't read filehead");
     93 			return (0);
     94 		}
     95 		buflen -= sizeof (filehead);
     96 		where += sizeof (filehead);
     97 		*(struct file **)kd->argspc = filehead;
     98 	}
     99 	/*
    100 	 * followed by an array of file structures
    101 	 */
    102 	for (fp = filehead; fp != NULL; fp = fp->f_filef) {
    103 		if (buflen > sizeof (struct file)) {
    104 			if (KREAD(kd, (long)fp, ((struct file *)where))) {
    105 				_kvm_err(kd, kd->program, "can't read kfp");
    106 				return (0);
    107 			}
    108 			buflen -= sizeof (struct file);
    109 			fp = (struct file *)where;
    110 			where += sizeof (struct file);
    111 			n++;
    112 		}
    113 	}
    114 	if (n != nfiles) {
    115 		_kvm_err(kd, kd->program, "inconsistant nfiles");
    116 		return (0);
    117 	}
    118 	return (nfiles);
    119 }
    120 
    121 char *
    122 kvm_getfiles(kd, op, arg, cnt)
    123 	kvm_t *kd;
    124 	int op, arg;
    125 	int *cnt;
    126 {
    127 	int mib[2], size, st, nfiles;
    128 	struct file *filehead, *fp, *fplim;
    129 
    130 	if (ISALIVE(kd)) {
    131 		size = 0;
    132 		mib[0] = CTL_KERN;
    133 		mib[1] = KERN_FILE;
    134 		st = sysctl(mib, 2, NULL, &size, NULL, 0);
    135 		if (st == -1) {
    136 			_kvm_syserr(kd, kd->program, "kvm_getprocs");
    137 			return (0);
    138 		}
    139 		if (kd->argspc == 0)
    140 			kd->argspc = (char *)_kvm_malloc(kd, size);
    141 		else if (kd->arglen < size)
    142 			kd->argspc = (char *)_kvm_realloc(kd, kd->argspc, size);
    143 		if (kd->argspc == 0)
    144 			return (0);
    145 		kd->arglen = size;
    146 		st = sysctl(mib, 2, kd->argspc, &size, NULL, 0);
    147 		if (st == -1 || size < sizeof(filehead)) {
    148 			_kvm_syserr(kd, kd->program, "kvm_getfiles");
    149 			return (0);
    150 		}
    151 		filehead = *(struct file **)kd->argspc;
    152 		fp = (struct file *)(kd->argspc + sizeof (filehead));
    153 		fplim = (struct file *)(kd->argspc + size);
    154 		for (nfiles = 0; filehead && (fp < fplim); nfiles++, fp++)
    155 			filehead = fp->f_filef;
    156 	} else {
    157 		struct nlist nl[3], *p;
    158 
    159 		nl[0].n_name = "_filehead";
    160 		nl[1].n_name = "_nfiles";
    161 		nl[2].n_name = 0;
    162 
    163 		if (kvm_nlist(kd, nl) != 0) {
    164 			for (p = nl; p->n_type != 0; ++p)
    165 				;
    166 			_kvm_err(kd, kd->program,
    167 				 "%s: no such symbol", p->n_name);
    168 			return (0);
    169 		}
    170 		if (KREAD(kd, nl[0].n_value, &nfiles)) {
    171 			_kvm_err(kd, kd->program, "can't read nfiles");
    172 			return (0);
    173 		}
    174 		size = sizeof(filehead) + (nfiles + 10) * sizeof(struct file);
    175 		if (kd->argspc == 0)
    176 			kd->argspc = (char *)_kvm_malloc(kd, size);
    177 		else if (kd->arglen < size)
    178 			kd->argspc = (char *)_kvm_realloc(kd, kd->argspc, size);
    179 		if (kd->argspc == 0)
    180 			return (0);
    181 		kd->arglen = size;
    182 		nfiles = kvm_deadfiles(kd, op, arg, nl[1].n_value, nfiles);
    183 		if (nfiles == 0)
    184 			return (0);
    185 	}
    186 	*cnt = nfiles;
    187 	return (kd->argspc);
    188 }
    189