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
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
|
/*
* lbcd kernel code for AIX.
*
* Written by Larry Schiwmmer
* Copyright 1997, 1998, 2009, 2012
* The Board of Trustees of the Leland Stanford Junior University
*
* See LICENSE for licensing terms.
*/
#include <config.h>
#include <portable/system.h>
#include <fcntl.h>
#include <nlist.h>
#include <sys/param.h>
#include <sys/times.h>
#include <time.h>
#include <server/internal.h>
#include <util/messages.h>
#define C_KMEM "/dev/kmem"
#define C_VMUNIX "/unix"
#define FSCALE 65536.0
static struct nlist nl[] = {
{ "avenrun", 0, 0, 0, 0, 0 },
{ NULL, 0, 0, 0, 0, 0 },
};
static int kernel_fd = -1;
static int kernel_init = 0;
/*
* Sets up for later queries. Open the kernel memory file and find the
* address of the necessary variable. Exits on error.
*/
static int
kernel_open(void)
{
kernel_fd = open(C_KMEM, O_RDONLY);
if (kernel_fd < 0)
sysdie("cannot open %s", C_KMEM);
if (knlist(nl, 1, sizeof(struct nlist)) < 0)
sysdie("no namelist for %s", C_VMUNIX);
kernel_init = 1;
return 0;
}
/*
* Close and free any resources for querying the kernel.
*/
static int
kernel_close(void)
{
if (!kernel_init)
return 0;
return close(kernel_fd);
}
/*
* Read a value from kernel memory, given its offset, and store it in the dest
* buffer. That buffer has space for dest_len octets.
*/
static void
kernel_read(off_t where, void *dest, int dest_len)
{
ssize_t status;
if (lseek(kernel_fd, where, SEEK_SET) < 0)
sysdie("cannot lseek in %s", C_KMEM);
status = read(kernel_fd, dest, dest_len);
if (status < 0)
sysdie("kernel read of %s failed", C_KMEM);
}
/*
* Get the current load average from the kernel and return the one minute,
* five minute, and fifteen minute averages in the given parameters. Returns
* 0 on success and -1 on failure.
*/
int
kernel_getload(double *l1, double *l5, double *l15)
{
int load[3];
if (!kernel_init)
kernel_open();
kernel_read(nl[0].n_value, (void *) load, sizeof(load));
*l1 = load[0] / FSCALE;
*l5 = load[1] / FSCALE;
*l15 = load[2] / FSCALE;
return 0;
}
/*
* Get the system uptime and return it in the boottime parameter. Returns 0
* on success and -1 on failure.
*/
int
kernel_getboottime(time_t *boottime)
{
time_t uptime, now;
struct tms tbuf;
uptime = times(&tbuf) / HZ;
curr = time(NULL);
*boottime = curr - uptime;
return 0;
}
/*
* Test routine.
*/
#ifdef MAIN
int
main(void)
{
double l1, l5, l15;
time_t boottime;
if (kernel_getload(&l1, &l5, &l15) == 0)
printf("load %.02f %.02f %.02f\n", l1, l5, l15);
if (kernel_getboottime(&boottime) == 0)
printf("booted at %s", ctime(&boottime));
return 0;
}
#endif
|
