Merge from vendor branch GPERF:
[games.git] / lib / libkcore / kcore_sched.c
1 /*
2  * Copyright (c) 2004 The DragonFly Project.  All rights reserved.
3  * 
4  * This code is derived from software contributed to The DragonFly Project
5  * by Joerg Sonnenberger <joerg@bec.de>.
6  * 
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in
15  *    the documentation and/or other materials provided with the
16  *    distribution.
17  * 3. Neither the name of The DragonFly Project nor the names of its
18  *    contributors may be used to endorse or promote products derived
19  *    from this software without specific, prior written permission.
20  * 
21  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
22  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
23  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
24  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE
25  * COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
26  * INCIDENTAL, SPECIAL, EXEMPLARY OR CONSEQUENTIAL DAMAGES (INCLUDING,
27  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
28  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
29  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
30  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
31  * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32  * SUCH DAMAGE.
33  * 
34  * $DragonFly: src/lib/libkcore/kcore_sched.c,v 1.1 2004/12/22 11:01:49 joerg Exp $
35  */
36
37 #include <sys/param.h>
38
39 #include <err.h>
40 #include <errno.h>
41 #include <kcore.h>
42 #include <kvm.h>
43 #include <nlist.h>
44
45 #include "kcore_private.h"
46
47 int
48 kcore_get_cpus(struct kcore_data *kc, int *ncpus)
49 {
50         static struct nlist nl[] = {
51                 { "_ncpus", 0, 0, 0, 0},
52                 { NULL, 0, 0, 0, 0}
53         };
54
55         /* XXX always include ncpus in the kernel. */
56         if (kcore_get_generic(kc, nl, ncpus, sizeof(*ncpus)))
57                 *ncpus = 1;
58         return(0);
59 }
60
61 int
62 kcore_get_sched_ccpu(struct kcore_data *kc, int *ccpu)
63 {
64         static struct nlist nl[] = {
65                 { "_tk_nin", 0, 0, 0, 0},
66                 { NULL, 0, 0, 0, 0}
67         };
68
69         return(kcore_get_generic(kc, nl, ccpu, sizeof(*ccpu)));
70 }
71
72 int
73 kcore_get_sched_cputime(struct kcore_data *kc, struct kinfo_cputime *cputime)
74 {
75         static struct nlist nl[] = {
76                 { "_cp_time", 0, 0, 0, 0},
77                 { NULL, 0, 0, 0, 0}
78         };
79
80         return(kcore_get_generic(kc, nl, cputime, sizeof(*cputime)));
81 }
82
83 int
84 kcore_get_sched_hz(struct kcore_data *kc, int *hz)
85 {
86         static struct nlist nl[] = {
87                 { "_hz", 0, 0, 0, 0},
88                 { NULL, 0, 0, 0, 0}
89         };
90
91         return(kcore_get_generic(kc, nl, hz, sizeof(*hz)));
92 }
93
94 int
95 kcore_get_sched_profhz(struct kcore_data *kc, int *profhz)
96 {
97         static struct nlist nl[] = {
98                 { "_profhz", 0, 0, 0, 0},
99                 { NULL, 0, 0, 0, 0}
100         };
101
102         return(kcore_get_generic(kc, nl, profhz, sizeof(*profhz)));
103 }
104
105 int
106 kcore_get_sched_stathz(struct kcore_data *kc, int *stathz)
107 {
108         static struct nlist nl[] = {
109                 { "_stathz", 0, 0, 0, 0},
110                 { NULL, 0, 0, 0, 0}
111         };
112         int retval;
113
114         retval = kcore_get_generic(kc, nl, stathz, sizeof(*stathz));;
115         if (retval == 0 && *stathz == 0)
116                 return(kcore_get_sched_hz(kc, stathz));
117         return(retval);
118 }