Initial revision

diff --git a/getloadavg.c b/getloadavg.c
new file mode 100644 (file)
index 0000000..e9ec49f
--- /dev/null
+++ b/getloadavg.c
@@ -0,0 +1,63 @@
+/* 
+ *  gloadavg.c - get load average for Linux
+ *  Copyright (C) 1993  Thomas Koenig
+ *  Copyright 2000 Thibault Godouet <fcron@free.fr>
+ *
+ *  This program is free software; you can redistribute it and/or modify
+ *  it under the terms of the GNU General Public License as published by
+ *  the Free Software Foundation; either version 2 of the License, or
+ *  (at your option) any later version.
+ *
+ *  This program 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 General Public License for more details.
+ *
+ *  You should have received a copy of the GNU General Public License
+ *  along with this program; if not, write to the Free Software
+ *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ */
+
+#include "config.h"
+
+#define _POSIX_SOURCE 1
+
+/* System Headers */
+
+#include <stdio.h>
+
+/* Local headers */
+
+#include "getloadavg.h"
+
+/* File scope variables */
+
+static char rcsid[] = "$Id: getloadavg.c,v 1.1 2000-09-12 16:40:42 thib Exp $";
+
+/* Global functions */
+
+int
+getloadavg(double *result, int n)
+/* return the current load average as a floating point number, or <0 for
+ * error
+ */
+{
+    FILE *fp;
+    int i;
+
+    if (n > 3)
+       n = 3;
+
+    if ((fp = fopen(PROC "/loadavg", "r")) == NULL)
+       i = -1;
+    else {
+       for (i = 0; i < n; i++) {
+           if (fscanf(fp, "%lf", result) != 1)
+               goto end;
+           result++;
+       }
+    }
+  end:
+    fclose(fp);
+    return i;
+}

diff --git a/getloadavg.h b/getloadavg.h
new file mode 100644 (file)
index 0000000..2e20c5f
--- /dev/null
+++ b/getloadavg.h
@@ -0,0 +1 @@
+int getloadavg(double *result, int n);