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
|
/* $Id: vmstat.c,v 1.1.1.1 2004/12/23 04:04:28 ellson Exp $ $Revision: 1.1.1.1 $ */
/* vim:set shiftwidth=4 ts=8: */
/**********************************************************
* This software is part of the graphviz package *
* http://www.graphviz.org/ *
* *
* Copyright (c) 1994-2004 AT&T Corp. *
* and is licensed under the *
* Common Public License, Version 1.0 *
* by AT&T Corp. *
* *
* Information and Software Systems Research *
* AT&T Research, Florham Park NJ *
**********************************************************/
#include "vmhdr.h"
/* Get statistics from a region.
**
** Written by Kiem-Phong Vo, kpv@research.att.com, 01/16/94.
*/
#if __STD_C
int vmstat(Vmalloc_t * vm, Vmstat_t * st)
#else
int vmstat(vm, st)
Vmalloc_t *vm;
Vmstat_t *st;
#endif
{
reg Seg_t *seg;
reg Block_t *b, *endb;
reg size_t s = 0;
reg Vmdata_t *vd = vm->data;
if (!st)
return -1;
if (!(vd->mode & VM_TRUST)) {
if (ISLOCK(vd, 0))
return -1;
SETLOCK(vd, 0);
}
st->n_busy = st->n_free = 0;
st->s_busy = st->s_free = st->m_busy = st->m_free = 0;
st->n_seg = 0;
st->extent = 0;
if (vd->mode & VM_MTLAST)
st->n_busy = 0;
else if ((vd->mode & VM_MTPOOL) && (s = vd->pool) > 0) {
s = ROUND(s, ALIGN);
for (b = vd->free; b; b = SEGLINK(b))
st->n_free += 1;
}
for (seg = vd->seg; seg; seg = seg->next) {
st->n_seg += 1;
st->extent += seg->extent;
b = SEGBLOCK(seg);
endb = BLOCK(seg->baddr);
if (vd->mode & (VM_MTDEBUG | VM_MTBEST | VM_MTPROFILE)) {
while (b < endb) {
s = SIZE(b) & ~BITS;
if (ISJUNK(SIZE(b)) || !ISBUSY(SIZE(b))) {
if (s > st->m_free)
st->m_free = s;
st->s_free += s;
st->n_free += 1;
} else { /* get the real size */
if (vd->mode & VM_MTDEBUG)
s = DBSIZE(DB2DEBUG(DATA(b)));
else if (vd->mode & VM_MTPROFILE)
s = PFSIZE(DATA(b));
if (s > st->m_busy)
st->m_busy = s;
st->s_busy += s;
st->n_busy += 1;
}
b = (Block_t *) ((Vmuchar_t *) DATA(b) +
(SIZE(b) & ~BITS));
}
} else if (vd->mode & VM_MTLAST) {
if ((s =
seg->free ? (SIZE(seg->free) + sizeof(Head_t)) : 0) > 0) {
st->s_free += s;
st->n_free += 1;
}
if ((s = ((char *) endb - (char *) b) - s) > 0) {
st->s_busy += s;
st->n_busy += 1;
}
} else if ((vd->mode & VM_MTPOOL) && s > 0) {
if (seg->free)
st->n_free += (SIZE(seg->free) + sizeof(Head_t)) / s;
st->n_busy +=
((seg->baddr - (Vmuchar_t *) b) - sizeof(Head_t)) / s;
}
}
if ((vd->mode & VM_MTPOOL) && s > 0) {
st->n_busy -= st->n_free;
if (st->n_busy > 0)
st->s_busy = (st->m_busy = vd->pool) * st->n_busy;
if (st->n_free > 0)
st->s_free = (st->m_free = vd->pool) * st->n_free;
}
CLRLOCK(vd, 0);
return 0;
}
|
