Annotation of src/sys/uvm/uvm_meter.c, Revision 1.12
1.12 ! thorpej 1: /* $NetBSD: uvm_meter.c,v 1.11 2000/02/11 19:22:54 thorpej Exp $ */
1.1 mrg 2:
3: /*
4: * Copyright (c) 1997 Charles D. Cranor and Washington University.
5: * Copyright (c) 1982, 1986, 1989, 1993
6: * The Regents of the University of California.
7: *
8: * All rights reserved.
9: *
10: * Redistribution and use in source and binary forms, with or without
11: * modification, are permitted provided that the following conditions
12: * are met:
13: * 1. Redistributions of source code must retain the above copyright
14: * notice, this list of conditions and the following disclaimer.
15: * 2. Redistributions in binary form must reproduce the above copyright
16: * notice, this list of conditions and the following disclaimer in the
17: * documentation and/or other materials provided with the distribution.
18: * 3. All advertising materials mentioning features or use of this software
19: * must display the following acknowledgement:
20: * This product includes software developed by Charles D. Cranor,
21: * Washington University, and the University of California, Berkeley
22: * and its contributors.
23: * 4. Neither the name of the University nor the names of its contributors
24: * may be used to endorse or promote products derived from this software
25: * without specific prior written permission.
26: *
27: * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
28: * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
29: * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
30: * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
31: * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
32: * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
33: * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
34: * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
35: * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
36: * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
37: * SUCH DAMAGE.
38: *
39: * @(#)vm_meter.c 8.4 (Berkeley) 1/4/94
1.3 mrg 40: * from: Id: uvm_meter.c,v 1.1.2.1 1997/08/14 19:10:35 chuck Exp
1.1 mrg 41: */
42:
43: #include <sys/param.h>
44: #include <sys/proc.h>
45: #include <sys/systm.h>
46: #include <sys/kernel.h>
47: #include <vm/vm.h>
48: #include <sys/sysctl.h>
49:
50: /*
51: * maxslp: ???? XXXCDC
52: */
53:
54: int maxslp = MAXSLP; /* patchable ... */
55: struct loadavg averunnable; /* decl. */
56:
57: /*
58: * constants for averages over 1, 5, and 15 minutes when sampling at
59: * 5 second intervals.
60: */
61:
62: static fixpt_t cexp[3] = {
63: 0.9200444146293232 * FSCALE, /* exp(-1/12) */
64: 0.9834714538216174 * FSCALE, /* exp(-1/60) */
65: 0.9944598480048967 * FSCALE, /* exp(-1/180) */
66: };
67:
68: /*
69: * prototypes
70: */
71:
72: static void uvm_loadav __P((struct loadavg *));
73: static void uvm_total __P((struct vmtotal *));
74:
75: /*
76: * uvm_meter: calculate load average and wake up the swapper (if needed)
77: */
1.4 mrg 78: void
79: uvm_meter()
1.1 mrg 80: {
1.4 mrg 81: if ((time.tv_sec % 5) == 0)
82: uvm_loadav(&averunnable);
83: if (proc0.p_slptime > (maxslp / 2))
84: wakeup((caddr_t)&proc0);
1.1 mrg 85: }
86:
87: /*
88: * uvm_loadav: compute a tenex style load average of a quantity on
89: * 1, 5, and 15 minute internvals.
90: */
1.4 mrg 91: static void
92: uvm_loadav(avg)
93: struct loadavg *avg;
1.1 mrg 94: {
1.4 mrg 95: int i, nrun;
96: struct proc *p;
1.1 mrg 97:
1.10 thorpej 98: proclist_lock_read();
1.4 mrg 99: for (nrun = 0, p = allproc.lh_first; p != 0; p = p->p_list.le_next) {
100: switch (p->p_stat) {
101: case SSLEEP:
102: if (p->p_priority > PZERO || p->p_slptime > 1)
103: continue;
104: /* fall through */
105: case SRUN:
1.12 ! thorpej 106: case SONPROC:
1.4 mrg 107: case SIDL:
108: nrun++;
109: }
110: }
1.9 thorpej 111: proclist_unlock_read();
1.4 mrg 112: for (i = 0; i < 3; i++)
113: avg->ldavg[i] = (cexp[i] * avg->ldavg[i] +
114: nrun * FSCALE * (FSCALE - cexp[i])) >> FSHIFT;
1.1 mrg 115: }
116:
117: /*
118: * uvm_sysctl: sysctl hook into UVM system.
119: */
1.4 mrg 120: int
121: uvm_sysctl(name, namelen, oldp, oldlenp, newp, newlen, p)
122: int *name;
123: u_int namelen;
124: void *oldp;
125: size_t *oldlenp;
126: void *newp;
127: size_t newlen;
128: struct proc *p;
1.1 mrg 129: {
1.4 mrg 130: struct vmtotal vmtotals;
1.1 mrg 131:
1.4 mrg 132: /* all sysctl names at this level are terminal */
133: if (namelen != 1)
134: return (ENOTDIR); /* overloaded */
135:
136: switch (name[0]) {
137: case VM_LOADAVG:
138: return (sysctl_rdstruct(oldp, oldlenp, newp, &averunnable,
139: sizeof(averunnable)));
140:
141: case VM_METER:
142: uvm_total(&vmtotals);
143: return (sysctl_rdstruct(oldp, oldlenp, newp, &vmtotals,
144: sizeof(vmtotals)));
145:
146: case VM_UVMEXP:
147: return (sysctl_rdstruct(oldp, oldlenp, newp, &uvmexp,
148: sizeof(uvmexp)));
1.11 thorpej 149:
150: case VM_NKMEMPAGES:
151: return (sysctl_rdint(oldp, oldlenp, newp, nkmempages));
1.4 mrg 152:
153: default:
154: return (EOPNOTSUPP);
155: }
156: /* NOTREACHED */
1.1 mrg 157: }
158:
159: /*
160: * uvm_total: calculate the current state of the system.
161: */
1.4 mrg 162: static void
163: uvm_total(totalp)
164: struct vmtotal *totalp;
1.1 mrg 165: {
1.4 mrg 166: struct proc *p;
1.1 mrg 167: #if 0
1.4 mrg 168: vm_map_entry_t entry;
169: vm_map_t map;
170: int paging;
1.1 mrg 171: #endif
172:
1.7 perry 173: memset(totalp, 0, sizeof *totalp);
1.1 mrg 174:
1.4 mrg 175: /*
176: * calculate process statistics
177: */
178:
1.10 thorpej 179: proclist_lock_read();
1.4 mrg 180: for (p = allproc.lh_first; p != 0; p = p->p_list.le_next) {
181: if (p->p_flag & P_SYSTEM)
182: continue;
183: switch (p->p_stat) {
184: case 0:
185: continue;
1.6 mrg 186:
1.4 mrg 187: case SSLEEP:
188: case SSTOP:
189: if (p->p_flag & P_INMEM) {
190: if (p->p_priority <= PZERO)
191: totalp->t_dw++;
192: else if (p->p_slptime < maxslp)
193: totalp->t_sl++;
194: } else if (p->p_slptime < maxslp)
195: totalp->t_sw++;
196: if (p->p_slptime >= maxslp)
197: continue;
198: break;
1.6 mrg 199:
1.4 mrg 200: case SRUN:
1.12 ! thorpej 201: case SONPROC:
1.4 mrg 202: case SIDL:
203: if (p->p_flag & P_INMEM)
204: totalp->t_rq++;
205: else
206: totalp->t_sw++;
207: if (p->p_stat == SIDL)
208: continue;
209: break;
210: }
211: /*
212: * note active objects
213: */
1.1 mrg 214: #if 0
1.4 mrg 215: /*
1.5 mrg 216: * XXXCDC: BOGUS! rethink this. in the mean time
217: * don't do it.
1.4 mrg 218: */
219: paging = 0;
1.5 mrg 220: vm_map_lock(map);
1.4 mrg 221: for (map = &p->p_vmspace->vm_map, entry = map->header.next;
222: entry != &map->header; entry = entry->next) {
223: if (entry->is_a_map || entry->is_sub_map ||
1.5 mrg 224: entry->object.uvm_obj == NULL)
1.4 mrg 225: continue;
1.5 mrg 226: /* XXX how to do this with uvm */
1.4 mrg 227: }
1.5 mrg 228: vm_map_unlock(map);
1.4 mrg 229: if (paging)
230: totalp->t_pw++;
1.1 mrg 231: #endif
1.4 mrg 232: }
1.9 thorpej 233: proclist_unlock_read();
1.4 mrg 234: /*
235: * Calculate object memory usage statistics.
236: */
1.5 mrg 237: totalp->t_free = uvmexp.free;
238: totalp->t_vm = uvmexp.npages - uvmexp.free + uvmexp.swpginuse;
239: totalp->t_avm = uvmexp.active + uvmexp.swpginuse; /* XXX */
240: totalp->t_rm = uvmexp.npages - uvmexp.free;
241: totalp->t_arm = uvmexp.active;
242: totalp->t_vmshr = 0; /* XXX */
243: totalp->t_avmshr = 0; /* XXX */
244: totalp->t_rmshr = 0; /* XXX */
245: totalp->t_armshr = 0; /* XXX */
1.1 mrg 246: }
CVSweb <webmaster@jp.NetBSD.org>