* misc/Makefile (routines): Add getloadavg.

	* sysdeps/generic/getloadavg.c: New file.
	* sysdeps/mach/getloadavg.c: New file.
	* sysdeps/unix/sysv/linux/getloadavg.c: New file.

1 files changed, 54 insertions, 0 deletions

diff --git a/sysdeps/mach/getloadavg.c b/sysdeps/mach/getloadavg.c
new file mode 100644
index 0000000000..b185b6b62f
--- /dev/null
+++ b/sysdeps/mach/getloadavg.c
@@ -0,0 +1,54 @@
+/* Get system load averages.  Mach version.
+   Copyright (C) 1999 Free Software Foundation, Inc.
+   This file is part of the GNU C Library.
+
+   The GNU C Library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Library General Public License as
+   published by the Free Software Foundation; either version 2 of the
+   License, or (at your option) any later version.
+
+   The GNU C Library is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   Library General Public License for more details.
+
+   You should have received a copy of the GNU Library General Public
+   License along with the GNU C Library; see the file COPYING.LIB.  If not,
+   write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.  */
+
+#include <mach.h>
+#include <mach/host_info.h>
+#include <hurd.h>
+#include <errno.h>
+#include <unistd.h>
+#include <stdlib.h>
+
+
+/* Put the 1 minute, 5 minute and 15 minute load averages
+   into the first NELEM elements of LOADAVG.
+   Return the number written (never more than 3, but may be less than NELEM),
+   or -1 if an error occurred.  */
+
+int
+getloadavg (double loadavg[], int nelem)
+{
+  host_load_info_data_t info;
+  mach_msg_type_number_t size = HOST_LOAD_INFO_COUNT;
+  error_t err;
+  int i;
+
+  err = __host_info (__mach_host_self (), HOST_LOAD_INFO,
+		     (host_info_t) &info, &size);
+  if (err)
+    return __hurd_fail (err);
+  if (size < HOST_LOAD_INFO_COUNT)
+    return __hurd_fail (EGRATUITOUS);
+
+  if (nelem > 3)
+    nelem = 3;
+  for (i = 0; i < nelem; ++i)
+    loadavg[i] = (double) info.avenrun[i] * (double) LOAD_SCALE;
+
+  return i;
+}