Mercurial > emacs
annotate src/getloadavg.c @ 49506:ac9e2eeeb03d
New format of AUTHORS file; list each
author name once followed by contributed and changed files.
Improve selection of entries to include in list, and generate list
of unrecognized entries indicating syntax errors in ChangeLog files.
(authors-coding-system): New variable.
(authors-many-files): Update doc string.
(authors-aliases): Change format. Now one entry with multiple
aliases per author.
(authors-valid-file-names, authors-renamed-files-alist)
(authors-renamed-files-regexps): New variables.
(authors-canonical-file-name): New function. Validates that file
exists or occurs in one of the above lists. Record unrecognized
file names in global authors-invalid-file-names list.
(authors-add): Change to record per-change counts.
(authors-canonical-author-name): Handle new format of
authors-aliases list.
(authors-scan-change-log): Rename FILE arg to LOG-FILE.
Change doc string to describe new entry format.
Only add author entries for valid file names.
(authors-print): Replace by authors-add-to-author-list.
(authors-add-to-author-list): New function which reorders
per-file entries and adds them to global authors-author-list.
(authors): Instead of authors-print to insert in *Authors* buffer,
use authors-add-to-author-list to reorder the list and then
insert result in *Authors* buffer with new format.
Generate *Authors Errors* compilation-mode buffer listing
unrecognized ChangeLog entries.
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Wed, 29 Jan 2003 00:13:11 +0000 |
parents | 718b60b51f2e |
children | f129be4cf98e d7ddb3e565de |
rev | line source |
---|---|
2928 | 1 /* Get the system load averages. |
17064 | 2 Copyright (C) 1985, 86, 87, 88, 89, 91, 92, 93, 1994, 1995, 1997 |
2928 | 3 Free Software Foundation, Inc. |
4 | |
5 This program is free software; you can redistribute it and/or modify | |
6 it under the terms of the GNU General Public License as published by | |
7 the Free Software Foundation; either version 2, or (at your option) | |
8 any later version. | |
9 | |
10 This program is distributed in the hope that it will be useful, | |
11 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
13 GNU General Public License for more details. | |
14 | |
15 You should have received a copy of the GNU General Public License | |
16 along with this program; if not, write to the Free Software | |
14457 | 17 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, |
18 USA. */ | |
2928 | 19 |
20 /* Compile-time symbols that this file uses: | |
21 | |
18806
c7b288b97f73
Add comment describing HAVE_PSTAT_GETDYNAMIC.
Jim Meyering <jim@meyering.net>
parents:
18640
diff
changeset
|
22 HAVE_PSTAT_GETDYNAMIC Define this if your system has the |
c7b288b97f73
Add comment describing HAVE_PSTAT_GETDYNAMIC.
Jim Meyering <jim@meyering.net>
parents:
18640
diff
changeset
|
23 pstat_getdynamic function. I think it |
c7b288b97f73
Add comment describing HAVE_PSTAT_GETDYNAMIC.
Jim Meyering <jim@meyering.net>
parents:
18640
diff
changeset
|
24 is unique to HPUX9. The best way to get the |
c7b288b97f73
Add comment describing HAVE_PSTAT_GETDYNAMIC.
Jim Meyering <jim@meyering.net>
parents:
18640
diff
changeset
|
25 definition is through the AC_FUNC_GETLOADAVG |
c7b288b97f73
Add comment describing HAVE_PSTAT_GETDYNAMIC.
Jim Meyering <jim@meyering.net>
parents:
18640
diff
changeset
|
26 macro that comes with autoconf 2.13 or newer. |
c7b288b97f73
Add comment describing HAVE_PSTAT_GETDYNAMIC.
Jim Meyering <jim@meyering.net>
parents:
18640
diff
changeset
|
27 If that isn't an option, then just put |
c7b288b97f73
Add comment describing HAVE_PSTAT_GETDYNAMIC.
Jim Meyering <jim@meyering.net>
parents:
18640
diff
changeset
|
28 AC_CHECK_FUNCS(pstat_getdynamic) in your |
c7b288b97f73
Add comment describing HAVE_PSTAT_GETDYNAMIC.
Jim Meyering <jim@meyering.net>
parents:
18640
diff
changeset
|
29 configure.in file. |
2928 | 30 FIXUP_KERNEL_SYMBOL_ADDR() Adjust address in returned struct nlist. |
31 KERNEL_FILE Pathname of the kernel to nlist. | |
32 LDAV_CVT() Scale the load average from the kernel. | |
33 Returns a double. | |
34 LDAV_SYMBOL Name of kernel symbol giving load average. | |
35 LOAD_AVE_TYPE Type of the load average array in the kernel. | |
36 Must be defined unless one of | |
37 apollo, DGUX, NeXT, or UMAX is defined; | |
22855
0af947ec28eb
GNU make release 3.77.
Paul D. Smith <psmith@BayNetworks.com>
parents:
18911
diff
changeset
|
38 or we have libkstat; |
2928 | 39 otherwise, no load average is available. |
40 NLIST_STRUCT Include nlist.h, not a.out.h, and | |
41 the nlist n_name element is a pointer, | |
42 not an array. | |
43 NLIST_NAME_UNION struct nlist has an n_un member, not n_name. | |
4349 | 44 LINUX_LDAV_FILE [__linux__]: File containing load averages. |
2928 | 45 |
46 Specific system predefines this file uses, aside from setting | |
47 default values if not emacs: | |
48 | |
49 apollo | |
50 BSD Real BSD, not just BSD-like. | |
12332
443ebb2a278a
[convex] (LOAD_AVE_TYPE, LDAV_CVT): Define to double, no conversion.
Roland McGrath <roland@gnu.org>
parents:
11788
diff
changeset
|
51 convex |
2928 | 52 DGUX |
53 eunice UNIX emulator under VMS. | |
54 hpux | |
17333
0cc83e8612f0
Changes for make 3.75.1
Paul D. Smith <psmith@BayNetworks.com>
parents:
17064
diff
changeset
|
55 __MSDOS__ No-op for MSDOS. |
2928 | 56 NeXT |
57 sgi | |
58 sequent Sequent Dynix 3.x.x (BSD) | |
59 _SEQUENT_ Sequent DYNIX/ptx 1.x.x (SYSV) | |
60 sony_news NEWS-OS (works at least for 4.1C) | |
61 UMAX | |
62 UMAX4_3 | |
63 VMS | |
17333
0cc83e8612f0
Changes for make 3.75.1
Paul D. Smith <psmith@BayNetworks.com>
parents:
17064
diff
changeset
|
64 WINDOWS32 No-op for Windows95/NT. |
4349 | 65 __linux__ Linux: assumes /proc filesystem mounted. |
2928 | 66 Support from Michael K. Johnson. |
4807 | 67 __NetBSD__ NetBSD: assumes /kern filesystem mounted. |
2928 | 68 |
69 In addition, to avoid nesting many #ifdefs, we internally set | |
70 LDAV_DONE to indicate that the load average has been computed. | |
71 | |
72 We also #define LDAV_PRIVILEGED if a program will require | |
73 special installation to be able to call getloadavg. */ | |
74 | |
10363 | 75 /* This should always be first. */ |
76 #ifdef HAVE_CONFIG_H | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
77 # include <config.h> |
10363 | 78 #endif |
79 | |
2928 | 80 #include <sys/types.h> |
81 | |
82 /* Both the Emacs and non-Emacs sections want this. Some | |
83 configuration files' definitions for the LOAD_AVE_CVT macro (like | |
84 sparc.h's) use macros like FSCALE, defined here. */ | |
18911
6cf797f8b54c
Test `__unix' along with `unix'.
Richard M. Stallman <rms@gnu.org>
parents:
18806
diff
changeset
|
85 #if defined (unix) || defined (__unix) |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
86 # include <sys/param.h> |
2928 | 87 #endif |
88 | |
89 | |
7784
fd03010db0c6
Put #include of errno.h and decl of errno before #ifndef HAVE_GETLOADAVG.
Roland McGrath <roland@gnu.org>
parents:
4907
diff
changeset
|
90 /* Exclude all the code except the test program at the end |
fd03010db0c6
Put #include of errno.h and decl of errno before #ifndef HAVE_GETLOADAVG.
Roland McGrath <roland@gnu.org>
parents:
4907
diff
changeset
|
91 if the system has its own `getloadavg' function. |
4409 | 92 |
7784
fd03010db0c6
Put #include of errno.h and decl of errno before #ifndef HAVE_GETLOADAVG.
Roland McGrath <roland@gnu.org>
parents:
4907
diff
changeset
|
93 The declaration of `errno' is needed by the test program |
fd03010db0c6
Put #include of errno.h and decl of errno before #ifndef HAVE_GETLOADAVG.
Roland McGrath <roland@gnu.org>
parents:
4907
diff
changeset
|
94 as well as the function itself, so it comes first. */ |
fd03010db0c6
Put #include of errno.h and decl of errno before #ifndef HAVE_GETLOADAVG.
Roland McGrath <roland@gnu.org>
parents:
4907
diff
changeset
|
95 |
fd03010db0c6
Put #include of errno.h and decl of errno before #ifndef HAVE_GETLOADAVG.
Roland McGrath <roland@gnu.org>
parents:
4907
diff
changeset
|
96 #include <errno.h> |
fd03010db0c6
Put #include of errno.h and decl of errno before #ifndef HAVE_GETLOADAVG.
Roland McGrath <roland@gnu.org>
parents:
4907
diff
changeset
|
97 |
fd03010db0c6
Put #include of errno.h and decl of errno before #ifndef HAVE_GETLOADAVG.
Roland McGrath <roland@gnu.org>
parents:
4907
diff
changeset
|
98 #ifndef errno |
fd03010db0c6
Put #include of errno.h and decl of errno before #ifndef HAVE_GETLOADAVG.
Roland McGrath <roland@gnu.org>
parents:
4907
diff
changeset
|
99 extern int errno; |
fd03010db0c6
Put #include of errno.h and decl of errno before #ifndef HAVE_GETLOADAVG.
Roland McGrath <roland@gnu.org>
parents:
4907
diff
changeset
|
100 #endif |
4409 | 101 |
102 #ifndef HAVE_GETLOADAVG | |
103 | |
104 | |
2928 | 105 /* The existing Emacs configuration files define a macro called |
106 LOAD_AVE_CVT, which accepts a value of type LOAD_AVE_TYPE, and | |
107 returns the load average multiplied by 100. What we actually want | |
108 is a macro called LDAV_CVT, which returns the load average as an | |
109 unmultiplied double. | |
110 | |
111 For backwards compatibility, we'll define LDAV_CVT in terms of | |
112 LOAD_AVE_CVT, but future machine config files should just define | |
113 LDAV_CVT directly. */ | |
114 | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
115 # if !defined(LDAV_CVT) && defined(LOAD_AVE_CVT) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
116 # define LDAV_CVT(n) (LOAD_AVE_CVT (n) / 100.0) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
117 # endif |
2928 | 118 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
119 # if !defined (BSD) && defined (ultrix) |
2928 | 120 /* Ultrix behaves like BSD on Vaxen. */ |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
121 # define BSD |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
122 # endif |
2928 | 123 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
124 # ifdef NeXT |
2928 | 125 /* NeXT in the 2.{0,1,2} releases defines BSD in <sys/param.h>, which |
126 conflicts with the definition understood in this file, that this | |
127 really is BSD. */ | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
128 # undef BSD |
2928 | 129 |
130 /* NeXT defines FSCALE in <sys/param.h>. However, we take FSCALE being | |
131 defined to mean that the nlist method should be used, which is not true. */ | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
132 # undef FSCALE |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
133 # endif |
2928 | 134 |
23329
a8682715883a
Treat __GNU__ line NeXT: undefine BSD and FSCALE.
Richard M. Stallman <rms@gnu.org>
parents:
22855
diff
changeset
|
135 /* Same issues as for NeXT apply to the HURD-based GNU system. */ |
a8682715883a
Treat __GNU__ line NeXT: undefine BSD and FSCALE.
Richard M. Stallman <rms@gnu.org>
parents:
22855
diff
changeset
|
136 # ifdef __GNU__ |
a8682715883a
Treat __GNU__ line NeXT: undefine BSD and FSCALE.
Richard M. Stallman <rms@gnu.org>
parents:
22855
diff
changeset
|
137 # undef BSD |
a8682715883a
Treat __GNU__ line NeXT: undefine BSD and FSCALE.
Richard M. Stallman <rms@gnu.org>
parents:
22855
diff
changeset
|
138 # undef FSCALE |
a8682715883a
Treat __GNU__ line NeXT: undefine BSD and FSCALE.
Richard M. Stallman <rms@gnu.org>
parents:
22855
diff
changeset
|
139 # endif /* __GNU__ */ |
a8682715883a
Treat __GNU__ line NeXT: undefine BSD and FSCALE.
Richard M. Stallman <rms@gnu.org>
parents:
22855
diff
changeset
|
140 |
2928 | 141 /* Set values that are different from the defaults, which are |
142 set a little farther down with #ifndef. */ | |
143 | |
144 | |
145 /* Some shorthands. */ | |
146 | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
147 # if defined (HPUX) && !defined (hpux) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
148 # define hpux |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
149 # endif |
2928 | 150 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
151 # if defined (__hpux) && !defined (hpux) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
152 # define hpux |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
153 # endif |
16413
79ff1c263f5d
[__hpux]: Define hpux. From Eric Backus.
Jim Meyering <jim@meyering.net>
parents:
16151
diff
changeset
|
154 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
155 # if defined (__sun) && !defined (sun) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
156 # define sun |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
157 # endif |
16413
79ff1c263f5d
[__hpux]: Define hpux. From Eric Backus.
Jim Meyering <jim@meyering.net>
parents:
16151
diff
changeset
|
158 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
159 # if defined(hp300) && !defined(hpux) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
160 # define MORE_BSD |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
161 # endif |
2928 | 162 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
163 # if defined(ultrix) && defined(mips) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
164 # define decstation |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
165 # endif |
2928 | 166 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
167 # if defined (__SVR4) && !defined (SVR4) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
168 # define SVR4 |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
169 # endif |
2928 | 170 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
171 # if (defined(sun) && defined(SVR4)) || defined (SOLARIS2) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
172 # define SUNOS_5 |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
173 # endif |
2928 | 174 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
175 # if defined (__osf__) && (defined (__alpha) || defined (__alpha__)) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
176 # define OSF_ALPHA |
18640
0481616b859c
[OSF_ALPHA]: Include sys/mbuf.h, sys/socket.h, net/route.h.
Richard M. Stallman <rms@gnu.org>
parents:
18592
diff
changeset
|
177 # include <sys/mbuf.h> |
0481616b859c
[OSF_ALPHA]: Include sys/mbuf.h, sys/socket.h, net/route.h.
Richard M. Stallman <rms@gnu.org>
parents:
18592
diff
changeset
|
178 # include <sys/socket.h> |
0481616b859c
[OSF_ALPHA]: Include sys/mbuf.h, sys/socket.h, net/route.h.
Richard M. Stallman <rms@gnu.org>
parents:
18592
diff
changeset
|
179 # include <net/route.h> |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
180 # include <sys/table.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
181 # endif |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
182 |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
183 # if defined (__osf__) && (defined (mips) || defined (__mips__)) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
184 # define OSF_MIPS |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
185 # include <sys/table.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
186 # endif |
2928 | 187 |
188 /* UTek's /bin/cc on the 4300 has no architecture specific cpp define by | |
189 default, but _MACH_IND_SYS_TYPES is defined in <sys/types.h>. Combine | |
190 that with a couple of other things and we'll have a unique match. */ | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
191 # if !defined (tek4300) && defined (unix) && defined (m68k) && defined (mc68000) && defined (mc68020) && defined (_MACH_IND_SYS_TYPES) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
192 # define tek4300 /* Define by emacs, but not by other users. */ |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
193 # endif |
2928 | 194 |
195 | |
3587 | 196 /* VAX C can't handle multi-line #ifs, or lines longer than 256 chars. */ |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
197 # ifndef LOAD_AVE_TYPE |
3597 | 198 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
199 # ifdef MORE_BSD |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
200 # define LOAD_AVE_TYPE long |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
201 # endif |
3587 | 202 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
203 # ifdef sun |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
204 # define LOAD_AVE_TYPE long |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
205 # endif |
3587 | 206 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
207 # ifdef decstation |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
208 # define LOAD_AVE_TYPE long |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
209 # endif |
3587 | 210 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
211 # ifdef _SEQUENT_ |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
212 # define LOAD_AVE_TYPE long |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
213 # endif |
3587 | 214 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
215 # ifdef sgi |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
216 # define LOAD_AVE_TYPE long |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
217 # endif |
3587 | 218 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
219 # ifdef SVR4 |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
220 # define LOAD_AVE_TYPE long |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
221 # endif |
3587 | 222 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
223 # ifdef sony_news |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
224 # define LOAD_AVE_TYPE long |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
225 # endif |
3587 | 226 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
227 # ifdef sequent |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
228 # define LOAD_AVE_TYPE long |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
229 # endif |
3587 | 230 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
231 # ifdef OSF_ALPHA |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
232 # define LOAD_AVE_TYPE long |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
233 # endif |
3587 | 234 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
235 # if defined (ardent) && defined (titan) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
236 # define LOAD_AVE_TYPE long |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
237 # endif |
3587 | 238 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
239 # ifdef tek4300 |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
240 # define LOAD_AVE_TYPE long |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
241 # endif |
2928 | 242 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
243 # if defined(alliant) && defined(i860) /* Alliant FX/2800 */ |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
244 # define LOAD_AVE_TYPE long |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
245 # endif |
9172
393a55341859
[alliant && i860] (LOAD_AVE_TYPE, FSCALE, NLIST_STRUCT): Define.
Roland McGrath <roland@gnu.org>
parents:
9096
diff
changeset
|
246 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
247 # ifdef _AIX |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
248 # define LOAD_AVE_TYPE long |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
249 # endif |
11788
3a2d34fad6fb
AIX support from Tim Bell <tbel@afsmail.cern.ch>:
Roland McGrath <roland@gnu.org>
parents:
10363
diff
changeset
|
250 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
251 # ifdef convex |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
252 # define LOAD_AVE_TYPE double |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
253 # ifndef LDAV_CVT |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
254 # define LDAV_CVT(n) (n) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
255 # endif |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
256 # endif |
12332
443ebb2a278a
[convex] (LOAD_AVE_TYPE, LDAV_CVT): Define to double, no conversion.
Roland McGrath <roland@gnu.org>
parents:
11788
diff
changeset
|
257 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
258 # endif /* No LOAD_AVE_TYPE. */ |
2928 | 259 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
260 # ifdef OSF_ALPHA |
4422 | 261 /* <sys/param.h> defines an incorrect value for FSCALE on Alpha OSF/1, |
262 according to ghazi@noc.rutgers.edu. */ | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
263 # undef FSCALE |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
264 # define FSCALE 1024.0 |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
265 # endif |
4422 | 266 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
267 # if defined(alliant) && defined(i860) /* Alliant FX/2800 */ |
9723
ba541f60aa46
[alliant && i860] (FSCALE): Move defn before #ifndef FSCALE.
Roland McGrath <roland@gnu.org>
parents:
9172
diff
changeset
|
268 /* <sys/param.h> defines an incorrect value for FSCALE on an |
ba541f60aa46
[alliant && i860] (FSCALE): Move defn before #ifndef FSCALE.
Roland McGrath <roland@gnu.org>
parents:
9172
diff
changeset
|
269 Alliant FX/2800 Concentrix 2.2, according to ghazi@noc.rutgers.edu. */ |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
270 # undef FSCALE |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
271 # define FSCALE 100.0 |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
272 # endif |
9723
ba541f60aa46
[alliant && i860] (FSCALE): Move defn before #ifndef FSCALE.
Roland McGrath <roland@gnu.org>
parents:
9172
diff
changeset
|
273 |
4422 | 274 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
275 # ifndef FSCALE |
2928 | 276 |
277 /* SunOS and some others define FSCALE in sys/param.h. */ | |
278 | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
279 # ifdef MORE_BSD |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
280 # define FSCALE 2048.0 |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
281 # endif |
2928 | 282 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
283 # if defined(MIPS) || defined(SVR4) || defined(decstation) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
284 # define FSCALE 256 |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
285 # endif |
2928 | 286 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
287 # if defined (sgi) || defined (sequent) |
4288 | 288 /* Sometimes both MIPS and sgi are defined, so FSCALE was just defined |
289 above under #ifdef MIPS. But we want the sgi value. */ | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
290 # undef FSCALE |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
291 # define FSCALE 1000.0 |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
292 # endif |
2928 | 293 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
294 # if defined (ardent) && defined (titan) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
295 # define FSCALE 65536.0 |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
296 # endif |
2928 | 297 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
298 # ifdef tek4300 |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
299 # define FSCALE 100.0 |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
300 # endif |
2928 | 301 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
302 # ifdef _AIX |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
303 # define FSCALE 65536.0 |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
304 # endif |
11788
3a2d34fad6fb
AIX support from Tim Bell <tbel@afsmail.cern.ch>:
Roland McGrath <roland@gnu.org>
parents:
10363
diff
changeset
|
305 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
306 # endif /* Not FSCALE. */ |
2928 | 307 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
308 # if !defined (LDAV_CVT) && defined (FSCALE) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
309 # define LDAV_CVT(n) (((double) (n)) / FSCALE) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
310 # endif |
2928 | 311 |
312 | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
313 # if defined(sgi) || (defined(mips) && !defined(BSD)) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
314 # define FIXUP_KERNEL_SYMBOL_ADDR(nl) ((nl)[0].n_value &= ~(1 << 31)) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
315 # endif |
2928 | 316 |
317 | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
318 # if !defined (KERNEL_FILE) && defined (sequent) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
319 # define KERNEL_FILE "/dynix" |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
320 # endif |
2928 | 321 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
322 # if !defined (KERNEL_FILE) && defined (hpux) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
323 # define KERNEL_FILE "/hp-ux" |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
324 # endif |
2928 | 325 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
326 # if !defined(KERNEL_FILE) && (defined(_SEQUENT_) || defined(MIPS) || defined(SVR4) || defined(ISC) || defined (sgi) || (defined (ardent) && defined (titan))) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
327 # define KERNEL_FILE "/unix" |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
328 # endif |
2928 | 329 |
330 | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
331 # if !defined (LDAV_SYMBOL) && defined (alliant) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
332 # define LDAV_SYMBOL "_Loadavg" |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
333 # endif |
2928 | 334 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
335 # if !defined(LDAV_SYMBOL) && ((defined(hpux) && !defined(hp9000s300)) || defined(_SEQUENT_) || defined(SVR4) || defined(ISC) || defined(sgi) || (defined (ardent) && defined (titan)) || defined (_AIX)) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
336 # define LDAV_SYMBOL "avenrun" |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
337 # endif |
2928 | 338 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
339 # ifdef HAVE_UNISTD_H |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
340 # include <unistd.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
341 # endif |
2928 | 342 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
343 # include <stdio.h> |
2928 | 344 |
345 /* LOAD_AVE_TYPE should only get defined if we're going to use the | |
346 nlist method. */ | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
347 # if !defined(LOAD_AVE_TYPE) && (defined(BSD) || defined(LDAV_CVT) || defined(KERNEL_FILE) || defined(LDAV_SYMBOL)) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
348 # define LOAD_AVE_TYPE double |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
349 # endif |
2928 | 350 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
351 # ifdef LOAD_AVE_TYPE |
2928 | 352 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
353 # ifndef VMS |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
354 # ifndef __linux__ |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
355 # ifndef NLIST_STRUCT |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
356 # include <a.out.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
357 # else /* NLIST_STRUCT */ |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
358 # include <nlist.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
359 # endif /* NLIST_STRUCT */ |
2928 | 360 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
361 # ifdef SUNOS_5 |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
362 # include <fcntl.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
363 # include <kvm.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
364 # include <kstat.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
365 # endif |
2928 | 366 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
367 # if defined (hpux) && defined (HAVE_PSTAT_GETDYNAMIC) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
368 # include <sys/pstat.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
369 # endif |
2928 | 370 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
371 # ifndef KERNEL_FILE |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
372 # define KERNEL_FILE "/vmunix" |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
373 # endif /* KERNEL_FILE */ |
2928 | 374 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
375 # ifndef LDAV_SYMBOL |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
376 # define LDAV_SYMBOL "_avenrun" |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
377 # endif /* LDAV_SYMBOL */ |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
378 # endif /* __linux__ */ |
2928 | 379 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
380 # else /* VMS */ |
2928 | 381 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
382 # ifndef eunice |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
383 # include <iodef.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
384 # include <descrip.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
385 # else /* eunice */ |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
386 # include <vms/iodef.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
387 # endif /* eunice */ |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
388 # endif /* VMS */ |
2928 | 389 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
390 # ifndef LDAV_CVT |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
391 # define LDAV_CVT(n) ((double) (n)) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
392 # endif /* !LDAV_CVT */ |
2928 | 393 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
394 # endif /* LOAD_AVE_TYPE */ |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
395 |
18592
d7376a9dca6d
[__GNU__]: Test for not NeXT.
Richard M. Stallman <rms@gnu.org>
parents:
17337
diff
changeset
|
396 # if defined(__GNU__) && !defined (NeXT) |
d7376a9dca6d
[__GNU__]: Test for not NeXT.
Richard M. Stallman <rms@gnu.org>
parents:
17337
diff
changeset
|
397 /* Note that NeXT Openstep defines __GNU__ even though it should not. */ |
d7376a9dca6d
[__GNU__]: Test for not NeXT.
Richard M. Stallman <rms@gnu.org>
parents:
17337
diff
changeset
|
398 /* GNU system acts much like NeXT, for load average purposes, |
d7376a9dca6d
[__GNU__]: Test for not NeXT.
Richard M. Stallman <rms@gnu.org>
parents:
17337
diff
changeset
|
399 but not exactly. */ |
17064 | 400 # define NeXT |
401 # define host_self mach_host_self | |
402 # endif | |
403 | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
404 # ifdef NeXT |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
405 # ifdef HAVE_MACH_MACH_H |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
406 # include <mach/mach.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
407 # else |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
408 # include <mach.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
409 # endif |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
410 # endif /* NeXT */ |
2928 | 411 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
412 # ifdef sgi |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
413 # include <sys/sysmp.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
414 # endif /* sgi */ |
2928 | 415 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
416 # ifdef UMAX |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
417 # include <stdio.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
418 # include <signal.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
419 # include <sys/time.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
420 # include <sys/wait.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
421 # include <sys/syscall.h> |
2928 | 422 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
423 # ifdef UMAX_43 |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
424 # include <machine/cpu.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
425 # include <inq_stats/statistics.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
426 # include <inq_stats/sysstats.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
427 # include <inq_stats/cpustats.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
428 # include <inq_stats/procstats.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
429 # else /* Not UMAX_43. */ |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
430 # include <sys/sysdefs.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
431 # include <sys/statistics.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
432 # include <sys/sysstats.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
433 # include <sys/cpudefs.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
434 # include <sys/cpustats.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
435 # include <sys/procstats.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
436 # endif /* Not UMAX_43. */ |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
437 # endif /* UMAX */ |
2928 | 438 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
439 # ifdef DGUX |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
440 # include <sys/dg_sys_info.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
441 # endif |
2928 | 442 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
443 # if defined(HAVE_FCNTL_H) || defined(_POSIX_VERSION) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
444 # include <fcntl.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
445 # else |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
446 # include <sys/file.h> |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
447 # endif |
2928 | 448 |
22855
0af947ec28eb
GNU make release 3.77.
Paul D. Smith <psmith@BayNetworks.com>
parents:
18911
diff
changeset
|
449 |
2928 | 450 /* Avoid static vars inside a function since in HPUX they dump as pure. */ |
451 | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
452 # ifdef NeXT |
2928 | 453 static processor_set_t default_set; |
454 static int getloadavg_initialized; | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
455 # endif /* NeXT */ |
2928 | 456 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
457 # ifdef UMAX |
2928 | 458 static unsigned int cpus = 0; |
459 static unsigned int samples; | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
460 # endif /* UMAX */ |
2928 | 461 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
462 # ifdef DGUX |
2928 | 463 static struct dg_sys_info_load_info load_info; /* what-a-mouthful! */ |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
464 # endif /* DGUX */ |
2928 | 465 |
22855
0af947ec28eb
GNU make release 3.77.
Paul D. Smith <psmith@BayNetworks.com>
parents:
18911
diff
changeset
|
466 #if !defined(HAVE_LIBKSTAT) && defined(LOAD_AVE_TYPE) |
2928 | 467 /* File descriptor open to /dev/kmem or VMS load ave driver. */ |
468 static int channel; | |
469 /* Nonzero iff channel is valid. */ | |
470 static int getloadavg_initialized; | |
471 /* Offset in kmem to seek to read load average, or 0 means invalid. */ | |
472 static long offset; | |
473 | |
22855
0af947ec28eb
GNU make release 3.77.
Paul D. Smith <psmith@BayNetworks.com>
parents:
18911
diff
changeset
|
474 #if !defined(VMS) && !defined(sgi) && !defined(__linux__) |
2928 | 475 static struct nlist nl[2]; |
23329
a8682715883a
Treat __GNU__ line NeXT: undefine BSD and FSCALE.
Richard M. Stallman <rms@gnu.org>
parents:
22855
diff
changeset
|
476 #endif /* Not VMS or sgi */ |
2928 | 477 |
22855
0af947ec28eb
GNU make release 3.77.
Paul D. Smith <psmith@BayNetworks.com>
parents:
18911
diff
changeset
|
478 #ifdef SUNOS_5 |
2928 | 479 static kvm_t *kd; |
22855
0af947ec28eb
GNU make release 3.77.
Paul D. Smith <psmith@BayNetworks.com>
parents:
18911
diff
changeset
|
480 #endif /* SUNOS_5 */ |
2928 | 481 |
23329
a8682715883a
Treat __GNU__ line NeXT: undefine BSD and FSCALE.
Richard M. Stallman <rms@gnu.org>
parents:
22855
diff
changeset
|
482 #endif /* LOAD_AVE_TYPE && !HAVE_LIBKSTAT */ |
2928 | 483 |
484 /* Put the 1 minute, 5 minute and 15 minute load averages | |
485 into the first NELEM elements of LOADAVG. | |
4064
d14ba65a1363
*** empty log message ***
David J. MacKenzie <djm@gnu.org>
parents:
4011
diff
changeset
|
486 Return the number written (never more than 3, but may be less than NELEM), |
2928 | 487 or -1 if an error occurred. */ |
488 | |
489 int | |
490 getloadavg (loadavg, nelem) | |
491 double loadavg[]; | |
492 int nelem; | |
493 { | |
494 int elem = 0; /* Return value. */ | |
495 | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
496 # ifdef NO_GET_LOAD_AVG |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
497 # define LDAV_DONE |
3037 | 498 /* Set errno to zero to indicate that there was no particular error; |
499 this function just can't work at all on this system. */ | |
500 errno = 0; | |
501 elem = -1; | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
502 # endif |
3037 | 503 |
17337
24e9e8d0080e
Last-minute changed for 3.75.1
Paul D. Smith <psmith@BayNetworks.com>
parents:
17333
diff
changeset
|
504 # if !defined (LDAV_DONE) && defined (HAVE_LIBKSTAT) |
16151
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
505 /* Use libkstat because we don't have to be root. */ |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
506 # define LDAV_DONE |
16151
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
507 kstat_ctl_t *kc; |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
508 kstat_t *ksp; |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
509 kstat_named_t *kn; |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
510 |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
511 kc = kstat_open (); |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
512 if (kc == 0) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
513 return -1; |
16151
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
514 ksp = kstat_lookup (kc, "unix", 0, "system_misc"); |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
515 if (ksp == 0 ) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
516 return -1; |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
517 if (kstat_read (kc, ksp, 0) == -1) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
518 return -1; |
16413
79ff1c263f5d
[__hpux]: Define hpux. From Eric Backus.
Jim Meyering <jim@meyering.net>
parents:
16151
diff
changeset
|
519 |
16151
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
520 |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
521 kn = kstat_data_lookup (ksp, "avenrun_1min"); |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
522 if (kn == 0) |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
523 { |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
524 /* Return -1 if no load average information is available. */ |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
525 nelem = 0; |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
526 elem = -1; |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
527 } |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
528 |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
529 if (nelem >= 1) |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
530 loadavg[elem++] = (double) kn->value.ul/FSCALE; |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
531 |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
532 if (nelem >= 2) |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
533 { |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
534 kn = kstat_data_lookup (ksp, "avenrun_5min"); |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
535 if (kn != 0) |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
536 { |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
537 loadavg[elem++] = (double) kn->value.ul/FSCALE; |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
538 |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
539 if (nelem >= 3) |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
540 { |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
541 kn = kstat_data_lookup (ksp, "avenrun_15min"); |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
542 if (kn != 0) |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
543 loadavg[elem++] = (double) kn->value.ul/FSCALE; |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
544 } |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
545 } |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
546 } |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
547 |
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
548 kstat_close (kc); |
17337
24e9e8d0080e
Last-minute changed for 3.75.1
Paul D. Smith <psmith@BayNetworks.com>
parents:
17333
diff
changeset
|
549 # endif /* HAVE_LIBKSTAT */ |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
550 |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
551 # if !defined (LDAV_DONE) && defined (hpux) && defined (HAVE_PSTAT_GETDYNAMIC) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
552 /* Use pstat_getdynamic() because we don't have to be root. */ |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
553 # define LDAV_DONE |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
554 # undef LOAD_AVE_TYPE |
16151
481c5be39150
(getloadavg): Add new code for SUNOS_5 to use -lkstat.
Richard M. Stallman <rms@gnu.org>
parents:
15294
diff
changeset
|
555 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
556 struct pst_dynamic dyn_info; |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
557 if (pstat_getdynamic (&dyn_info, sizeof (dyn_info), 0, 0) < 0) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
558 return -1; |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
559 if (nelem > 0) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
560 loadavg[elem++] = dyn_info.psd_avg_1_min; |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
561 if (nelem > 1) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
562 loadavg[elem++] = dyn_info.psd_avg_5_min; |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
563 if (nelem > 2) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
564 loadavg[elem++] = dyn_info.psd_avg_15_min; |
2928 | 565 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
566 # endif /* hpux && HAVE_PSTAT_GETDYNAMIC */ |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
567 |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
568 # if !defined (LDAV_DONE) && defined (__linux__) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
569 # define LDAV_DONE |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
570 # undef LOAD_AVE_TYPE |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
571 |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
572 # ifndef LINUX_LDAV_FILE |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
573 # define LINUX_LDAV_FILE "/proc/loadavg" |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
574 # endif |
2928 | 575 |
576 char ldavgbuf[40]; | |
577 double load_ave[3]; | |
578 int fd, count; | |
579 | |
580 fd = open (LINUX_LDAV_FILE, O_RDONLY); | |
581 if (fd == -1) | |
582 return -1; | |
583 count = read (fd, ldavgbuf, 40); | |
584 (void) close (fd); | |
585 if (count <= 0) | |
586 return -1; | |
587 | |
588 count = sscanf (ldavgbuf, "%lf %lf %lf", | |
589 &load_ave[0], &load_ave[1], &load_ave[2]); | |
590 if (count < 1) | |
591 return -1; | |
592 | |
593 for (elem = 0; elem < nelem && elem < count; elem++) | |
594 loadavg[elem] = load_ave[elem]; | |
595 | |
596 return elem; | |
597 | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
598 # endif /* __linux__ */ |
2928 | 599 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
600 # if !defined (LDAV_DONE) && defined (__NetBSD__) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
601 # define LDAV_DONE |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
602 # undef LOAD_AVE_TYPE |
4807 | 603 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
604 # ifndef NETBSD_LDAV_FILE |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
605 # define NETBSD_LDAV_FILE "/kern/loadavg" |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
606 # endif |
4807 | 607 |
608 unsigned long int load_ave[3], scale; | |
609 int count; | |
610 FILE *fp; | |
611 | |
4907 | 612 fp = fopen (NETBSD_LDAV_FILE, "r"); |
4807 | 613 if (fp == NULL) |
614 return -1; | |
615 count = fscanf (fp, "%lu %lu %lu %lu\n", | |
616 &load_ave[0], &load_ave[1], &load_ave[2], | |
617 &scale); | |
618 (void) fclose (fp); | |
619 if (count != 4) | |
620 return -1; | |
621 | |
622 for (elem = 0; elem < nelem; elem++) | |
623 loadavg[elem] = (double) load_ave[elem] / (double) scale; | |
624 | |
625 return elem; | |
626 | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
627 # endif /* __NetBSD__ */ |
4807 | 628 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
629 # if !defined (LDAV_DONE) && defined (NeXT) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
630 # define LDAV_DONE |
2928 | 631 /* The NeXT code was adapted from iscreen 3.2. */ |
632 | |
633 host_t host; | |
634 struct processor_set_basic_info info; | |
635 unsigned info_count; | |
636 | |
4064
d14ba65a1363
*** empty log message ***
David J. MacKenzie <djm@gnu.org>
parents:
4011
diff
changeset
|
637 /* We only know how to get the 1-minute average for this system, |
d14ba65a1363
*** empty log message ***
David J. MacKenzie <djm@gnu.org>
parents:
4011
diff
changeset
|
638 so even if the caller asks for more than 1, we only return 1. */ |
2928 | 639 |
640 if (!getloadavg_initialized) | |
641 { | |
642 if (processor_set_default (host_self (), &default_set) == KERN_SUCCESS) | |
643 getloadavg_initialized = 1; | |
644 } | |
645 | |
646 if (getloadavg_initialized) | |
647 { | |
648 info_count = PROCESSOR_SET_BASIC_INFO_COUNT; | |
649 if (processor_set_info (default_set, PROCESSOR_SET_BASIC_INFO, &host, | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
650 (processor_set_info_t) &info, &info_count) |
2928 | 651 != KERN_SUCCESS) |
652 getloadavg_initialized = 0; | |
653 else | |
654 { | |
655 if (nelem > 0) | |
656 loadavg[elem++] = (double) info.load_average / LOAD_SCALE; | |
657 } | |
658 } | |
659 | |
660 if (!getloadavg_initialized) | |
661 return -1; | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
662 # endif /* NeXT */ |
2928 | 663 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
664 # if !defined (LDAV_DONE) && defined (UMAX) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
665 # define LDAV_DONE |
2928 | 666 /* UMAX 4.2, which runs on the Encore Multimax multiprocessor, does not |
667 have a /dev/kmem. Information about the workings of the running kernel | |
668 can be gathered with inq_stats system calls. | |
669 We only know how to get the 1-minute average for this system. */ | |
670 | |
671 struct proc_summary proc_sum_data; | |
672 struct stat_descr proc_info; | |
673 double load; | |
674 register unsigned int i, j; | |
675 | |
676 if (cpus == 0) | |
677 { | |
678 register unsigned int c, i; | |
679 struct cpu_config conf; | |
680 struct stat_descr desc; | |
681 | |
682 desc.sd_next = 0; | |
683 desc.sd_subsys = SUBSYS_CPU; | |
684 desc.sd_type = CPUTYPE_CONFIG; | |
685 desc.sd_addr = (char *) &conf; | |
686 desc.sd_size = sizeof conf; | |
687 | |
688 if (inq_stats (1, &desc)) | |
689 return -1; | |
690 | |
691 c = 0; | |
692 for (i = 0; i < conf.config_maxclass; ++i) | |
693 { | |
694 struct class_stats stats; | |
695 bzero ((char *) &stats, sizeof stats); | |
696 | |
697 desc.sd_type = CPUTYPE_CLASS; | |
698 desc.sd_objid = i; | |
699 desc.sd_addr = (char *) &stats; | |
700 desc.sd_size = sizeof stats; | |
701 | |
702 if (inq_stats (1, &desc)) | |
703 return -1; | |
704 | |
705 c += stats.class_numcpus; | |
706 } | |
707 cpus = c; | |
708 samples = cpus < 2 ? 3 : (2 * cpus / 3); | |
709 } | |
710 | |
711 proc_info.sd_next = 0; | |
712 proc_info.sd_subsys = SUBSYS_PROC; | |
713 proc_info.sd_type = PROCTYPE_SUMMARY; | |
714 proc_info.sd_addr = (char *) &proc_sum_data; | |
715 proc_info.sd_size = sizeof (struct proc_summary); | |
716 proc_info.sd_sizeused = 0; | |
717 | |
718 if (inq_stats (1, &proc_info) != 0) | |
719 return -1; | |
720 | |
721 load = proc_sum_data.ps_nrunnable; | |
722 j = 0; | |
723 for (i = samples - 1; i > 0; --i) | |
724 { | |
725 load += proc_sum_data.ps_nrun[j]; | |
726 if (j++ == PS_NRUNSIZE) | |
727 j = 0; | |
728 } | |
729 | |
730 if (nelem > 0) | |
731 loadavg[elem++] = load / samples / cpus; | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
732 # endif /* UMAX */ |
2928 | 733 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
734 # if !defined (LDAV_DONE) && defined (DGUX) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
735 # define LDAV_DONE |
2928 | 736 /* This call can return -1 for an error, but with good args |
737 it's not supposed to fail. The first argument is for no | |
738 apparent reason of type `long int *'. */ | |
739 dg_sys_info ((long int *) &load_info, | |
740 DG_SYS_INFO_LOAD_INFO_TYPE, | |
741 DG_SYS_INFO_LOAD_VERSION_0); | |
742 | |
743 if (nelem > 0) | |
744 loadavg[elem++] = load_info.one_minute; | |
745 if (nelem > 1) | |
746 loadavg[elem++] = load_info.five_minute; | |
747 if (nelem > 2) | |
748 loadavg[elem++] = load_info.fifteen_minute; | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
749 # endif /* DGUX */ |
2928 | 750 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
751 # if !defined (LDAV_DONE) && defined (apollo) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
752 # define LDAV_DONE |
2928 | 753 /* Apollo code from lisch@mentorg.com (Ray Lischner). |
754 | |
755 This system call is not documented. The load average is obtained as | |
756 three long integers, for the load average over the past minute, | |
757 five minutes, and fifteen minutes. Each value is a scaled integer, | |
758 with 16 bits of integer part and 16 bits of fraction part. | |
759 | |
760 I'm not sure which operating system first supported this system call, | |
761 but I know that SR10.2 supports it. */ | |
762 | |
763 extern void proc1_$get_loadav (); | |
764 unsigned long load_ave[3]; | |
765 | |
766 proc1_$get_loadav (load_ave); | |
767 | |
768 if (nelem > 0) | |
769 loadavg[elem++] = load_ave[0] / 65536.0; | |
770 if (nelem > 1) | |
771 loadavg[elem++] = load_ave[1] / 65536.0; | |
772 if (nelem > 2) | |
773 loadavg[elem++] = load_ave[2] / 65536.0; | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
774 # endif /* apollo */ |
2928 | 775 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
776 # if !defined (LDAV_DONE) && defined (OSF_MIPS) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
777 # define LDAV_DONE |
2928 | 778 |
779 struct tbl_loadavg load_ave; | |
780 table (TBL_LOADAVG, 0, &load_ave, 1, sizeof (load_ave)); | |
3037 | 781 loadavg[elem++] |
782 = (load_ave.tl_lscale == 0 | |
783 ? load_ave.tl_avenrun.d[0] | |
784 : (load_ave.tl_avenrun.l[0] / (double) load_ave.tl_lscale)); | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
785 # endif /* OSF_MIPS */ |
2928 | 786 |
17333
0cc83e8612f0
Changes for make 3.75.1
Paul D. Smith <psmith@BayNetworks.com>
parents:
17064
diff
changeset
|
787 # if !defined (LDAV_DONE) && (defined (__MSDOS__) || defined (WINDOWS32)) |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
788 # define LDAV_DONE |
13882
2631a29a614c
(getloadavg) [MSDOS]: Return 0 load instead of failing the call.
Richard M. Stallman <rms@gnu.org>
parents:
12799
diff
changeset
|
789 |
2631a29a614c
(getloadavg) [MSDOS]: Return 0 load instead of failing the call.
Richard M. Stallman <rms@gnu.org>
parents:
12799
diff
changeset
|
790 /* A faithful emulation is going to have to be saved for a rainy day. */ |
15281
dd275783c873
[WIN32]: No-op as for [MSDOS].
Roland McGrath <roland@gnu.org>
parents:
14457
diff
changeset
|
791 for ( ; elem < nelem; elem++) |
13882
2631a29a614c
(getloadavg) [MSDOS]: Return 0 load instead of failing the call.
Richard M. Stallman <rms@gnu.org>
parents:
12799
diff
changeset
|
792 { |
2631a29a614c
(getloadavg) [MSDOS]: Return 0 load instead of failing the call.
Richard M. Stallman <rms@gnu.org>
parents:
12799
diff
changeset
|
793 loadavg[elem] = 0.0; |
2631a29a614c
(getloadavg) [MSDOS]: Return 0 load instead of failing the call.
Richard M. Stallman <rms@gnu.org>
parents:
12799
diff
changeset
|
794 } |
17333
0cc83e8612f0
Changes for make 3.75.1
Paul D. Smith <psmith@BayNetworks.com>
parents:
17064
diff
changeset
|
795 # endif /* __MSDOS__ || WINDOWS32 */ |
13882
2631a29a614c
(getloadavg) [MSDOS]: Return 0 load instead of failing the call.
Richard M. Stallman <rms@gnu.org>
parents:
12799
diff
changeset
|
796 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
797 # if !defined (LDAV_DONE) && defined (OSF_ALPHA) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
798 # define LDAV_DONE |
8816
fbc29f1ddd08
(getloadavg): Add OSF_ALPHA support.
Richard M. Stallman <rms@gnu.org>
parents:
7784
diff
changeset
|
799 |
fbc29f1ddd08
(getloadavg): Add OSF_ALPHA support.
Richard M. Stallman <rms@gnu.org>
parents:
7784
diff
changeset
|
800 struct tbl_loadavg load_ave; |
fbc29f1ddd08
(getloadavg): Add OSF_ALPHA support.
Richard M. Stallman <rms@gnu.org>
parents:
7784
diff
changeset
|
801 table (TBL_LOADAVG, 0, &load_ave, 1, sizeof (load_ave)); |
fbc29f1ddd08
(getloadavg): Add OSF_ALPHA support.
Richard M. Stallman <rms@gnu.org>
parents:
7784
diff
changeset
|
802 for (elem = 0; elem < nelem; elem++) |
fbc29f1ddd08
(getloadavg): Add OSF_ALPHA support.
Richard M. Stallman <rms@gnu.org>
parents:
7784
diff
changeset
|
803 loadavg[elem] |
fbc29f1ddd08
(getloadavg): Add OSF_ALPHA support.
Richard M. Stallman <rms@gnu.org>
parents:
7784
diff
changeset
|
804 = (load_ave.tl_lscale == 0 |
fbc29f1ddd08
(getloadavg): Add OSF_ALPHA support.
Richard M. Stallman <rms@gnu.org>
parents:
7784
diff
changeset
|
805 ? load_ave.tl_avenrun.d[elem] |
fbc29f1ddd08
(getloadavg): Add OSF_ALPHA support.
Richard M. Stallman <rms@gnu.org>
parents:
7784
diff
changeset
|
806 : (load_ave.tl_avenrun.l[elem] / (double) load_ave.tl_lscale)); |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
807 # endif /* OSF_ALPHA */ |
8816
fbc29f1ddd08
(getloadavg): Add OSF_ALPHA support.
Richard M. Stallman <rms@gnu.org>
parents:
7784
diff
changeset
|
808 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
809 # if !defined (LDAV_DONE) && defined (VMS) |
2928 | 810 /* VMS specific code -- read from the Load Ave driver. */ |
811 | |
812 LOAD_AVE_TYPE load_ave[3]; | |
813 static int getloadavg_initialized = 0; | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
814 # ifdef eunice |
2928 | 815 struct |
816 { | |
817 int dsc$w_length; | |
818 char *dsc$a_pointer; | |
819 } descriptor; | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
820 # endif |
2928 | 821 |
822 /* Ensure that there is a channel open to the load ave device. */ | |
823 if (!getloadavg_initialized) | |
824 { | |
825 /* Attempt to open the channel. */ | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
826 # ifdef eunice |
2928 | 827 descriptor.dsc$w_length = 18; |
828 descriptor.dsc$a_pointer = "$$VMS_LOAD_AVERAGE"; | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
829 # else |
2928 | 830 $DESCRIPTOR (descriptor, "LAV0:"); |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
831 # endif |
2928 | 832 if (sys$assign (&descriptor, &channel, 0, 0) & 1) |
833 getloadavg_initialized = 1; | |
834 } | |
835 | |
836 /* Read the load average vector. */ | |
837 if (getloadavg_initialized | |
838 && !(sys$qiow (0, channel, IO$_READVBLK, 0, 0, 0, | |
839 load_ave, 12, 0, 0, 0, 0) & 1)) | |
840 { | |
841 sys$dassgn (channel); | |
842 getloadavg_initialized = 0; | |
843 } | |
844 | |
845 if (!getloadavg_initialized) | |
846 return -1; | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
847 # endif /* VMS */ |
2928 | 848 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
849 # if !defined (LDAV_DONE) && defined(LOAD_AVE_TYPE) && !defined(VMS) |
2928 | 850 |
851 /* UNIX-specific code -- read the average from /dev/kmem. */ | |
852 | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
853 # define LDAV_PRIVILEGED /* This code requires special installation. */ |
2928 | 854 |
855 LOAD_AVE_TYPE load_ave[3]; | |
856 | |
857 /* Get the address of LDAV_SYMBOL. */ | |
858 if (offset == 0) | |
859 { | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
860 # ifndef sgi |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
861 # ifndef NLIST_STRUCT |
2928 | 862 strcpy (nl[0].n_name, LDAV_SYMBOL); |
863 strcpy (nl[1].n_name, ""); | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
864 # else /* NLIST_STRUCT */ |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
865 # ifdef NLIST_NAME_UNION |
2928 | 866 nl[0].n_un.n_name = LDAV_SYMBOL; |
867 nl[1].n_un.n_name = 0; | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
868 # else /* not NLIST_NAME_UNION */ |
2928 | 869 nl[0].n_name = LDAV_SYMBOL; |
870 nl[1].n_name = 0; | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
871 # endif /* not NLIST_NAME_UNION */ |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
872 # endif /* NLIST_STRUCT */ |
2928 | 873 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
874 # ifndef SUNOS_5 |
11788
3a2d34fad6fb
AIX support from Tim Bell <tbel@afsmail.cern.ch>:
Roland McGrath <roland@gnu.org>
parents:
10363
diff
changeset
|
875 if ( |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
876 # if !(defined (_AIX) && !defined (ps2)) |
11788
3a2d34fad6fb
AIX support from Tim Bell <tbel@afsmail.cern.ch>:
Roland McGrath <roland@gnu.org>
parents:
10363
diff
changeset
|
877 nlist (KERNEL_FILE, nl) |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
878 # else /* _AIX */ |
11788
3a2d34fad6fb
AIX support from Tim Bell <tbel@afsmail.cern.ch>:
Roland McGrath <roland@gnu.org>
parents:
10363
diff
changeset
|
879 knlist (nl, 1, sizeof (nl[0])) |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
880 # endif |
11788
3a2d34fad6fb
AIX support from Tim Bell <tbel@afsmail.cern.ch>:
Roland McGrath <roland@gnu.org>
parents:
10363
diff
changeset
|
881 >= 0) |
3a2d34fad6fb
AIX support from Tim Bell <tbel@afsmail.cern.ch>:
Roland McGrath <roland@gnu.org>
parents:
10363
diff
changeset
|
882 /* Omit "&& nl[0].n_type != 0 " -- it breaks on Sun386i. */ |
3a2d34fad6fb
AIX support from Tim Bell <tbel@afsmail.cern.ch>:
Roland McGrath <roland@gnu.org>
parents:
10363
diff
changeset
|
883 { |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
884 # ifdef FIXUP_KERNEL_SYMBOL_ADDR |
11788
3a2d34fad6fb
AIX support from Tim Bell <tbel@afsmail.cern.ch>:
Roland McGrath <roland@gnu.org>
parents:
10363
diff
changeset
|
885 FIXUP_KERNEL_SYMBOL_ADDR (nl); |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
886 # endif |
11788
3a2d34fad6fb
AIX support from Tim Bell <tbel@afsmail.cern.ch>:
Roland McGrath <roland@gnu.org>
parents:
10363
diff
changeset
|
887 offset = nl[0].n_value; |
3a2d34fad6fb
AIX support from Tim Bell <tbel@afsmail.cern.ch>:
Roland McGrath <roland@gnu.org>
parents:
10363
diff
changeset
|
888 } |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
889 # endif /* !SUNOS_5 */ |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
890 # else /* sgi */ |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
891 int ldav_off; |
11788
3a2d34fad6fb
AIX support from Tim Bell <tbel@afsmail.cern.ch>:
Roland McGrath <roland@gnu.org>
parents:
10363
diff
changeset
|
892 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
893 ldav_off = sysmp (MP_KERNADDR, MPKA_AVENRUN); |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
894 if (ldav_off != -1) |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
895 offset = (long) ldav_off & 0x7fffffff; |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
896 # endif /* sgi */ |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
897 } |
2928 | 898 |
899 /* Make sure we have /dev/kmem open. */ | |
900 if (!getloadavg_initialized) | |
901 { | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
902 # ifndef SUNOS_5 |
2928 | 903 channel = open ("/dev/kmem", 0); |
904 if (channel >= 0) | |
12738
d06973e701f8
(getloadavg): Set FD_CLOEXEC flag on /dev/kmem file descriptor.
Roland McGrath <roland@gnu.org>
parents:
12332
diff
changeset
|
905 { |
d06973e701f8
(getloadavg): Set FD_CLOEXEC flag on /dev/kmem file descriptor.
Roland McGrath <roland@gnu.org>
parents:
12332
diff
changeset
|
906 /* Set the channel to close on exec, so it does not |
d06973e701f8
(getloadavg): Set FD_CLOEXEC flag on /dev/kmem file descriptor.
Roland McGrath <roland@gnu.org>
parents:
12332
diff
changeset
|
907 litter any child's descriptor table. */ |
24977
35dbf8bf3588
* Fix memory leaks, fd leaks, and some long-standing bugs recognizing when
Paul D. Smith <psmith@BayNetworks.com>
parents:
23370
diff
changeset
|
908 # ifdef F_SETFD |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
909 # ifndef FD_CLOEXEC |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
910 # define FD_CLOEXEC 1 |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
911 # endif |
12738
d06973e701f8
(getloadavg): Set FD_CLOEXEC flag on /dev/kmem file descriptor.
Roland McGrath <roland@gnu.org>
parents:
12332
diff
changeset
|
912 (void) fcntl (channel, F_SETFD, FD_CLOEXEC); |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
913 # endif |
12738
d06973e701f8
(getloadavg): Set FD_CLOEXEC flag on /dev/kmem file descriptor.
Roland McGrath <roland@gnu.org>
parents:
12332
diff
changeset
|
914 getloadavg_initialized = 1; |
d06973e701f8
(getloadavg): Set FD_CLOEXEC flag on /dev/kmem file descriptor.
Roland McGrath <roland@gnu.org>
parents:
12332
diff
changeset
|
915 } |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
916 # else /* SUNOS_5 */ |
4011
1117ec91799c
*** empty log message ***
David J. MacKenzie <djm@gnu.org>
parents:
3597
diff
changeset
|
917 /* We pass 0 for the kernel, corefile, and swapfile names |
1117ec91799c
*** empty log message ***
David J. MacKenzie <djm@gnu.org>
parents:
3597
diff
changeset
|
918 to use the currently running kernel. */ |
2928 | 919 kd = kvm_open (0, 0, 0, O_RDONLY, 0); |
15281
dd275783c873
[WIN32]: No-op as for [MSDOS].
Roland McGrath <roland@gnu.org>
parents:
14457
diff
changeset
|
920 if (kd != 0) |
2928 | 921 { |
4011
1117ec91799c
*** empty log message ***
David J. MacKenzie <djm@gnu.org>
parents:
3597
diff
changeset
|
922 /* nlist the currently running kernel. */ |
2928 | 923 kvm_nlist (kd, nl); |
4011
1117ec91799c
*** empty log message ***
David J. MacKenzie <djm@gnu.org>
parents:
3597
diff
changeset
|
924 offset = nl[0].n_value; |
2928 | 925 getloadavg_initialized = 1; |
926 } | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
927 # endif /* SUNOS_5 */ |
2928 | 928 } |
929 | |
930 /* If we can, get the load average values. */ | |
931 if (offset && getloadavg_initialized) | |
932 { | |
933 /* Try to read the load. */ | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
934 # ifndef SUNOS_5 |
2928 | 935 if (lseek (channel, offset, 0) == -1L |
936 || read (channel, (char *) load_ave, sizeof (load_ave)) | |
937 != sizeof (load_ave)) | |
938 { | |
939 close (channel); | |
940 getloadavg_initialized = 0; | |
941 } | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
942 # else /* SUNOS_5 */ |
2928 | 943 if (kvm_read (kd, offset, (char *) load_ave, sizeof (load_ave)) |
944 != sizeof (load_ave)) | |
945 { | |
946 kvm_close (kd); | |
947 getloadavg_initialized = 0; | |
948 } | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
949 # endif /* SUNOS_5 */ |
2928 | 950 } |
951 | |
952 if (offset == 0 || !getloadavg_initialized) | |
953 return -1; | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
954 # endif /* LOAD_AVE_TYPE and not VMS */ |
2928 | 955 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
956 # if !defined (LDAV_DONE) && defined (LOAD_AVE_TYPE) /* Including VMS. */ |
2928 | 957 if (nelem > 0) |
958 loadavg[elem++] = LDAV_CVT (load_ave[0]); | |
959 if (nelem > 1) | |
960 loadavg[elem++] = LDAV_CVT (load_ave[1]); | |
961 if (nelem > 2) | |
962 loadavg[elem++] = LDAV_CVT (load_ave[2]); | |
963 | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
964 # define LDAV_DONE |
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
965 # endif /* !LDAV_DONE && LOAD_AVE_TYPE */ |
2928 | 966 |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
967 # ifdef LDAV_DONE |
2928 | 968 return elem; |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
969 # else |
2928 | 970 /* Set errno to zero to indicate that there was no particular error; |
971 this function just can't work at all on this system. */ | |
972 errno = 0; | |
973 return -1; | |
16869
16ef2bd09de7
[hpux && HAVE_PSTAT_GETDYNAMIC]: Use HPUX's pstat_getdynamic so
Jim Meyering <jim@meyering.net>
parents:
16413
diff
changeset
|
974 # endif |
2928 | 975 } |
4409 | 976 |
977 #endif /* ! HAVE_GETLOADAVG */ | |
2928 | 978 |
979 #ifdef TEST | |
23370
7addb1da4b2b
Checkpoint changes. Bug fixes, mostly.
Paul D. Smith <psmith@BayNetworks.com>
parents:
23329
diff
changeset
|
980 int |
2928 | 981 main (argc, argv) |
982 int argc; | |
983 char **argv; | |
984 { | |
985 int naptime = 0; | |
986 | |
987 if (argc > 1) | |
988 naptime = atoi (argv[1]); | |
989 | |
990 while (1) | |
991 { | |
992 double avg[3]; | |
993 int loads; | |
994 | |
995 errno = 0; /* Don't be misled if it doesn't set errno. */ | |
996 loads = getloadavg (avg, 3); | |
997 if (loads == -1) | |
998 { | |
999 perror ("Error getting load average"); | |
1000 exit (1); | |
1001 } | |
1002 if (loads > 0) | |
1003 printf ("1-minute: %f ", avg[0]); | |
1004 if (loads > 1) | |
1005 printf ("5-minute: %f ", avg[1]); | |
1006 if (loads > 2) | |
1007 printf ("15-minute: %f ", avg[2]); | |
1008 if (loads > 0) | |
1009 putchar ('\n'); | |
4398 | 1010 |
1011 if (naptime == 0) | |
1012 break; | |
2928 | 1013 sleep (naptime); |
1014 } | |
4398 | 1015 |
1016 exit (0); | |
2928 | 1017 } |
1018 #endif /* TEST */ |