NetBSD/bin/ps/nlist.c
2004-08-22 18:55:44 +00:00

215 lines
6.5 KiB
C

/* $NetBSD: nlist.c,v 1.24 2004/08/22 18:55:44 dsl Exp $ */
/*
* Copyright (c) 2000 The NetBSD Foundation, Inc.
* All rights reserved.
*
* This code is derived from software contributed to The NetBSD Foundation
* by Simon Burge.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
* 3. All advertising materials mentioning features or use of this software
* must display the following acknowledgement:
* This product includes software developed by the NetBSD
* Foundation, Inc. and its contributors.
* 4. Neither the name of The NetBSD Foundation nor the names of its
* contributors may be used to endorse or promote products derived
* from this software without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
* ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
* TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
* PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
* BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
* POSSIBILITY OF SUCH DAMAGE.
*/
/*
* Copyright (c) 1990, 1993, 1994
* The Regents of the University of California. All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
* 3. Neither the name of the University nor the names of its contributors
* may be used to endorse or promote products derived from this software
* without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*/
#include <sys/cdefs.h>
#ifndef lint
#if 0
static char sccsid[] = "@(#)nlist.c 8.4 (Berkeley) 4/2/94";
#else
__RCSID("$NetBSD: nlist.c,v 1.24 2004/08/22 18:55:44 dsl Exp $");
#endif
#endif /* not lint */
#include <sys/param.h>
#include <sys/time.h>
#include <sys/lwp.h>
#include <sys/proc.h>
#include <sys/resource.h>
#include <sys/sysctl.h>
#include <err.h>
#include <errno.h>
#include <kvm.h>
#include <math.h>
#include <nlist.h>
#include <stdio.h>
#include <string.h>
#include <unistd.h>
#include "ps.h"
struct nlist psnl[] = {
{ "_fscale" },
#define X_FSCALE 0
{ "_ccpu" },
#define X_CCPU 1
{ "_physmem" },
#define X_PHYSMEM 2
{ "_maxslp" },
#define X_MAXSLP 3
{ NULL }
};
double ccpu; /* kernel _ccpu variable */
int nlistread; /* if nlist already read. */
int mempages; /* number of pages of phys. memory */
int fscale; /* kernel _fscale variable */
int maxslp; /* kernel _maxslp variable */
int uspace; /* kernel USPACE value */
#define kread(x, v) \
kvm_read(kd, psnl[x].n_value, (char *)&v, sizeof v) != sizeof(v)
int
donlist(void)
{
int rval;
fixpt_t xccpu;
rval = 0;
nlistread = 1;
if (kvm_nlist(kd, psnl)) {
nlisterr(psnl);
eval = 1;
return (1);
}
if (kread(X_FSCALE, fscale)) {
warnx("fscale: %s", kvm_geterr(kd));
eval = rval = 1;
}
if (kread(X_PHYSMEM, mempages)) {
warnx("avail_start: %s", kvm_geterr(kd));
eval = rval = 1;
}
if (kread(X_CCPU, xccpu)) {
warnx("ccpu: %s", kvm_geterr(kd));
eval = rval = 1;
}
if (kread(X_MAXSLP, maxslp)) {
warnx("maxslp: %s", kvm_geterr(kd));
eval = rval = 1;
}
ccpu = (double)xccpu / fscale;
return (rval);
}
int
donlist_sysctl(void)
{
int mib[2];
size_t size;
fixpt_t xccpu;
uint64_t memsize;
nlistread = 1;
mib[0] = CTL_HW;
mib[1] = HW_PHYSMEM64;
size = sizeof(memsize);
if (sysctl(mib, 2, &memsize, &size, NULL, 0) == 0)
mempages = memsize / getpagesize();
else
mempages = 0;
mib[0] = CTL_KERN;
mib[1] = KERN_FSCALE;
size = sizeof(fscale);
if (sysctl(mib, 2, &fscale, &size, NULL, 0) == -1)
fscale = (1 << 8); /* XXX Hopefully reasonable default */
mib[0] = CTL_KERN;
mib[1] = KERN_CCPU;
size = sizeof(xccpu);
if (sysctl(mib, 2, &xccpu, &size, NULL, 0) == -1)
ccpu = exp(-1.0 / 20.0); /* XXX Hopefully reasonable default */
else
ccpu = (double)xccpu / fscale;
mib[0] = CTL_VM;
mib[1] = VM_MAXSLP;
size = sizeof(maxslp);
if (sysctl(mib, 2, &maxslp, &size, NULL, 0) == -1)
#ifdef MAXSLP
maxslp = MAXSLP;
#else
maxslp = 20; /* XXX Hopefully reasonable default */
#endif
mib[0] = CTL_VM;
mib[1] = VM_USPACE;
size = sizeof(uspace);
if (sysctl(mib, 2, &uspace, &size, NULL, 0) == -1)
#ifdef USPACE
uspace = USPACE;
#else
uspace = getpagesize(); /* XXX Hopefully reasonable default */
#endif
return 0;
}
void
nlisterr(struct nlist nl[])
{
int i;
(void)fprintf(stderr, "ps: nlist: can't find following symbols:");
for (i = 0; nl[i].n_name != NULL; i++)
if (nl[i].n_value == 0)
(void)fprintf(stderr, " %s", nl[i].n_name);
(void)fprintf(stderr, "\n");
}