Reverted libgtop changes. It's a common module and I should not modify it.

2003-10-19  Carlos Perelló Marín <carlos@gnome.org>

	* support/*: Reverted libgtop changes. It's a common module
	and I should not modify it.
	* Added/removed files. Now the move should be done.

sysdeps/aix/ChangeLog

@@ -0,0 +1,3 @@
+2002-09-24  Laurent Vivier <Laurent.Vivier@bull.net>
+
+	* Create sysdeps/aix (from stub)

sysdeps/aix/Makefile.am

@@ -0,0 +1,23 @@
+LINK				= $(LIBTOOL) --mode=link $(CC) $(CFLAGS) $(LDFLAGS) -o $@
+
+INCLUDES			= @INCLUDES@
+
+lib_LTLIBRARIES			= libgtop_sysdeps-2.0.la libgtop_sysdeps_suid-2.0.la
+
+libgtop_sysdeps_2_0_la_SOURCES  = siglist.c nosuid.c
+
+libgtop_sysdeps_2_0_la_LDFLAGS	= $(LT_VERSION_INFO)
+
+libgtop_sysdeps_suid_2_0_la_SOURCES = open.c close.c cpu.c mem.c swap.c \
+				  uptime.c loadavg.c shm_limits.c msg_limits.c \
+				  sem_limits.c proclist.c procstate.c procuid.c \
+				  proctime.c procmem.c procsignal.c prockernel.c \
+				  procsegment.c procargs.c procmap.c netload.c \
+				  ppp.c utils.c utils.h sysinfo.c
+
+libgtop_sysdeps_suid_2_0_la_LDFLAGS	= $(LT_VERSION_INFO)
+libgtop_sysdeps_suid_2_0_la_LIBADD	= $(top_builddir)/sysdeps/common/libgtop_suid_common-2.0.la $(GLIB_LIBS)
+
+libgtopinclude_HEADERS		= glibtop_server.h glibtop_machine.h glibtop_suid.h
+
+libgtopincludedir		= $(includedir)/libgtop-2.0

sysdeps/aix/close.c

@@ -0,0 +1,30 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop/close.h>
+
+/* Closes pipe to gtop server. */
+
+void
+glibtop_close_s (glibtop *server)
+{ }

sysdeps/aix/cpu.c

@@ -0,0 +1,125 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <stdlib.h>
+#include <sys/systemcfg.h>
+#include <sys/sysinfo.h>
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/cpu.h>
+
+#include <utils.h>
+
+static const unsigned long _glibtop_sysdeps_cpu = 
+(1L << GLIBTOP_CPU_TOTAL) + (1L << GLIBTOP_CPU_USER) +
+(1L << GLIBTOP_CPU_SYS) + (1L << GLIBTOP_CPU_IDLE) +
+(1L << GLIBTOP_CPU_NICE) + (1 << GLIBTOP_CPU_FREQUENCY) +
+(1L << GLIBTOP_XCPU_TOTAL) + (1L << GLIBTOP_XCPU_USER) +
+(1L << GLIBTOP_XCPU_SYS) + (1L << GLIBTOP_XCPU_IDLE) +
+(1L << GLIBTOP_XCPU_NICE);
+
+/* Init function. */
+
+void
+glibtop_init_cpu_p (glibtop *server)
+{
+	off_t result;
+
+	server->ncpu = _system_configuration.ncpus;
+	if (server->ncpu == 1)
+	{
+		server->ncpu = 0; /* means single-processor, see glibtop.h */
+	}
+
+	result = _glibtop_get_kmem_offset(server, "cpuinfo");
+	if (result == -1)
+	{
+		server->sysdeps.cpu = 0;
+
+		return;
+	}
+	server->machine.cpuinfo_offset = result;
+
+	server->machine.cpuinfo = (struct cpuinfo*)calloc(_system_configuration.ncpus, sizeof(struct cpuinfo));
+
+	server->sysdeps.cpu = _glibtop_sysdeps_cpu;
+}
+
+/* Provides information about cpu usage. */
+
+void
+glibtop_get_cpu_p (glibtop *server, glibtop_cpu *buf)
+{
+	int result;
+	int cpu;
+
+	glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_CPU), 0);
+
+	memset (buf, 0, sizeof (glibtop_cpu));
+
+	result = _glibtop_get_kmem_info(server, server->machine.cpuinfo_offset,
+					server->machine.cpuinfo,
+					_system_configuration.ncpus 
+						* sizeof(struct cpuinfo));
+
+	if (result <= 0)
+	{
+		glibtop_error_io_r (server, "Cannot read cpuinfo");
+		return;
+	}
+	
+	buf->idle = 0;
+	buf->user = 0;
+	buf->sys = 0;
+	buf->nice = 0;
+	for (cpu = 0; cpu < _system_configuration.ncpus; cpu++)
+	{
+		if (cpu < GLIBTOP_NCPU)
+		{
+			buf->xcpu_idle[cpu] = 
+				server->machine.cpuinfo[cpu].cpu[CPU_IDLE];
+			buf->xcpu_user[cpu] =
+				server->machine.cpuinfo[cpu].cpu[CPU_USER];
+			buf->xcpu_sys[cpu] =
+				server->machine.cpuinfo[cpu].cpu[CPU_KERNEL];
+			buf->xcpu_nice[cpu] =
+				server->machine.cpuinfo[cpu].cpu[CPU_WAIT];
+
+			buf->xcpu_total[cpu] = buf->xcpu_idle[cpu] +
+					       buf->xcpu_user[cpu] +
+					       buf->xcpu_sys[cpu] +
+					       buf->xcpu_nice[cpu];
+		}
+
+		buf->idle += server->machine.cpuinfo[cpu].cpu[CPU_IDLE];
+		buf->user += server->machine.cpuinfo[cpu].cpu[CPU_USER];
+		buf->sys  += server->machine.cpuinfo[cpu].cpu[CPU_KERNEL];
+		buf->nice += server->machine.cpuinfo[cpu].cpu[CPU_WAIT];
+
+		buf->total = buf->idle + buf->user + buf->sys + buf->nice ;
+	}
+	
+	buf->frequency = sysconf(_SC_CLK_TCK);
+	buf->flags = _glibtop_sysdeps_cpu;
+}

sysdeps/aix/glibtop_machine.h

@@ -0,0 +1,53 @@
+/* $Id$ */
+
+/* 
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, March 1999.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#ifndef __GLIBTOP_MACHINE_H__
+#define __GLIBTOP_MACHINE_H__
+
+#include <procinfo.h>
+
+BEGIN_LIBGTOP_DECLS
+
+typedef struct _glibtop_machine glibtop_machine;
+
+struct _glibtop_machine
+{
+	uid_t uid, euid;
+	gid_t gid, egid;
+
+	int kmem_fd;
+
+	off_t cpuinfo_offset;
+	off_t ifnet_offset;
+	off_t loadavg_offset;
+	off_t shminfo_offset;
+	off_t seminfo_offset;
+	off_t msginfo_offset;
+
+	struct cpuinfo *cpuinfo;
+	struct procsinfo last_pinfo;
+};
+
+END_LIBGTOP_DECLS
+
+#endif /* __GLIBTOP_MACHINE_H__ */

sysdeps/aix/glibtop_server.h

@@ -0,0 +1,52 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#ifndef __GLIBTOP_SERVER_H__
+#define __GLIBTOP_SERVER_H__
+
+BEGIN_LIBGTOP_DECLS
+
+#define GLIBTOP_SUID_CPU		(1 << GLIBTOP_SYSDEPS_CPU)
+#define GLIBTOP_SUID_MEM		0
+#define GLIBTOP_SUID_SWAP		0
+#define GLIBTOP_SUID_UPTIME		(1 << GLIBTOP_SYSDEPS_UPTIME)
+#define GLIBTOP_SUID_LOADAVG		(1 << GLIBTOP_SYSDEPS_LOADAVG)
+#define GLIBTOP_SUID_SHM_LIMITS		(1 << GLIBTOP_SYSDEPS_SHM_LIMITS)
+#define GLIBTOP_SUID_MSG_LIMITS		(1 << GLIBTOP_SYSDEPS_MSG_LIMITS)
+#define GLIBTOP_SUID_SEM_LIMITS		(1 << GLIBTOP_SYSDEPS_SEM_LIMITS)
+#define GLIBTOP_SUID_PROCLIST		0
+#define GLIBTOP_SUID_PROC_STATE		0
+#define GLIBTOP_SUID_PROC_UID		0
+#define GLIBTOP_SUID_PROC_MEM		0
+#define GLIBTOP_SUID_PROC_TIME		0
+#define GLIBTOP_SUID_PROC_SIGNAL	0
+#define GLIBTOP_SUID_PROC_KERNEL	0
+#define GLIBTOP_SUID_PROC_SEGMENT	0
+#define GLIBTOP_SUID_PROC_ARGS		0
+#define GLIBTOP_SUID_PROC_MAP		0
+#define GLIBTOP_SUID_NETLOAD		(1 << GLIBTOP_SYSDEPS_NETLOAD)
+#define GLIBTOP_SUID_PPP		0
+
+END_LIBGTOP_DECLS
+
+#endif

sysdeps/aix/glibtop_suid.h

@@ -0,0 +1,52 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#ifndef __GLIBTOP_SUID_H__
+#define __GLIBTOP_SUID_H__
+
+BEGIN_LIBGTOP_DECLS
+
+#if _IN_LIBGTOP
+#include <sys/param.h>
+#endif
+
+static inline void glibtop_suid_enter (glibtop *server) {
+	setegid (server->machine.egid);
+}
+
+static inline void glibtop_suid_leave (glibtop *server) {
+	if (setegid (server->machine.gid))
+		_exit (1);
+}
+
+void
+glibtop_init_p (glibtop *server, const unsigned long features,
+		const unsigned flags);
+void
+glibtop_open_p (glibtop *server, const char *program_name,
+		const unsigned long features,
+		const unsigned flags);
+
+END_LIBGTOP_DECLS
+
+#endif

sysdeps/aix/loadavg.c

@@ -0,0 +1,78 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <nlist.h>
+#include <glibtop.h>
+#include <glibtop/loadavg.h>
+#include <glibtop/error.h>
+
+#include <glibtop_suid.h>
+
+static const unsigned long _glibtop_sysdeps_loadavg = 
+(1 << GLIBTOP_LOADAVG_LOADAVG);
+
+/* Init function. */
+
+void
+glibtop_init_loadavg_p (glibtop *server)
+{
+	int result;
+
+	result = _glibtop_get_kmem_offset(server, "avenrun");
+	if (result == -1)
+	{
+		server->sysdeps.loadavg = 0;
+		return;
+	}
+
+	server->machine.loadavg_offset = result;
+
+	server->sysdeps.loadavg = _glibtop_sysdeps_loadavg;
+}
+
+/* Provides load averange. */
+
+void
+glibtop_get_loadavg_p (glibtop *server, glibtop_loadavg *buf)
+{
+	int result;
+	int loadavg[3];
+
+	glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_LOADAVG), 0);
+
+	memset (buf, 0, sizeof (glibtop_loadavg));
+
+	result = _glibtop_get_kmem_info(server, server->machine.loadavg_offset,
+					loadavg, sizeof(loadavg));
+        if (result <= 0)
+        {
+                glibtop_error_io_r (server, "Cannot read loadavg");
+                return;
+        }
+
+	buf->loadavg[0] = loadavg[0] / 65536.0;
+	buf->loadavg[1] = loadavg[1] / 65536.0;
+	buf->loadavg[2] = loadavg[2] / 65536.0;
+
+	buf->flags = _glibtop_sysdeps_loadavg;
+}

sysdeps/aix/mem.c

@@ -0,0 +1,76 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <unistd.h>
+#include <sys/vminfo.h> 
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/mem.h>
+
+static const unsigned long _glibtop_sysdeps_mem = 
+(1 << GLIBTOP_MEM_TOTAL) + (1 << GLIBTOP_MEM_USED) +
+(1 << GLIBTOP_MEM_FREE) + (1 << GLIBTOP_MEM_LOCKED);
+
+/* Init function. */
+
+void
+glibtop_init_mem_s (glibtop *server)
+{
+	server->sysdeps.mem = _glibtop_sysdeps_mem;
+}
+
+/* Provides information about memory usage. */
+
+void
+glibtop_get_mem_s (glibtop *server, glibtop_mem *buf)
+{
+	struct vminfo vminfo;
+	int pagesize;
+	int result;
+
+	memset (buf, 0, sizeof (glibtop_mem));
+
+	pagesize = sysconf(_SC_PAGESIZE);
+
+#ifdef HAVE_VMGETINFO
+	result = vmgetinfo((void*)&vminfo, VMINFO, sizeof(vminfo));
+#else
+	result = _glibtop_vmgetinfo((void*)&vminfo, VMINFO, sizeof(vminfo));
+#endif
+	if (result == -1)
+	{
+		glibtop_error_io_r (server, "Cannot read vminfo");
+		return;
+	}
+
+
+	buf->total = vminfo.memsizepgs * pagesize;
+	buf->used = (vminfo.numwseguse + vminfo.numpseguse +
+		     vminfo.numclseguse) * pagesize;
+	buf->free = vminfo.numfrb * pagesize;
+	buf->locked = (vminfo.numwsegpin + vminfo.numpsegpin +
+		       vminfo.numclsegpin) * pagesize;
+
+	buf->flags = _glibtop_sysdeps_mem;
+}

sysdeps/aix/msg_limits.c

@@ -0,0 +1,81 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <sys/msg.h>
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/msg_limits.h>
+
+static const unsigned long _glibtop_sysdeps_msg_limits = 
+(1 << GLIBTOP_IPC_MSGMAX) + (1 << GLIBTOP_IPC_MSGMNB) +
+(1 << GLIBTOP_IPC_MSGMNI) + (1 << GLIBTOP_IPC_MSGTQL);
+
+/* Init function. */
+
+void
+glibtop_init_msg_limits_p (glibtop *server)
+{
+	off_t result;
+
+	result = _glibtop_get_kmem_offset(server, "msginfo");
+	if (result <= 0)
+	{
+		server->sysdeps.sem_limits = 0;
+		return;
+	}
+
+	server->machine.msginfo_offset = result;
+
+	server->sysdeps.msg_limits = _glibtop_sysdeps_msg_limits;
+}
+
+/* Provides information about sysv ipc limits. */
+
+void
+glibtop_get_msg_limits_p (glibtop *server, glibtop_msg_limits *buf)
+{
+	int result;
+	struct msginfo msginfo;
+
+	glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_MSG_LIMITS), 0);
+
+	memset (buf, 0, sizeof (glibtop_msg_limits));
+
+	result = _glibtop_get_kmem_info(server, server->machine.msginfo_offset,
+					&msginfo, sizeof(msginfo));
+
+	if (result <= 0)
+	{
+		glibtop_error_io_r (server, "Cannot read seminfo");
+
+		return;
+	}
+
+	buf->msgmax = msginfo.msgmax;
+	buf->msgmnb = msginfo.msgmnb;
+	buf->msgmni = msginfo.msgmni;
+	buf->msgtql = msginfo.msgmnm;
+
+	buf->flags = _glibtop_sysdeps_msg_limits;
+}

sysdeps/aix/netload.c

@@ -0,0 +1,207 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, October 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <sys/socket.h>
+#include <net/if.h>
+#include <netinet/in.h>
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/netload.h>
+
+#include "utils.h"
+
+static const unsigned long _glibtop_sysdeps_netload = 
+(1 << GLIBTOP_NETLOAD_IF_FLAGS) + (1 << GLIBTOP_NETLOAD_MTU) +
+(1 << GLIBTOP_NETLOAD_SUBNET) + (1 << GLIBTOP_NETLOAD_ADDRESS) +
+(1 << GLIBTOP_NETLOAD_PACKETS_IN) + (1 << GLIBTOP_NETLOAD_PACKETS_OUT) +
+(1 << GLIBTOP_NETLOAD_PACKETS_TOTAL) + (1 << GLIBTOP_NETLOAD_BYTES_IN) +
+(1 << GLIBTOP_NETLOAD_BYTES_OUT) + (1 << GLIBTOP_NETLOAD_BYTES_TOTAL) +
+(1 << GLIBTOP_NETLOAD_ERRORS_IN) + (1 << GLIBTOP_NETLOAD_ERRORS_OUT) +
+(1 << GLIBTOP_NETLOAD_ERRORS_TOTAL) + (1 << GLIBTOP_NETLOAD_COLLISIONS);
+
+static void get_ifaddr(glibtop* server, struct ifaddr* next, long* addr, long* mask)
+{
+	struct ifaddr ifaddr;
+	struct sockaddr_in sockaddr;
+
+	*addr = 0;
+	*mask = 0;
+
+	while (next)
+	{
+		/* get interface ifaddr structure */
+
+		_glibtop_get_kmem_info(server, (off_t)next, &ifaddr, sizeof(ifaddr));
+
+		/* get socket addr information */
+
+		_glibtop_get_kmem_info( server, (off_t)ifaddr.ifa_addr
+				     , &sockaddr, sizeof(sockaddr));
+
+		/* if valid family : UDP, TCP, ...*/
+
+		if (sockaddr.sin_family == AF_INET)
+		{
+			*addr = sockaddr.sin_addr.s_addr;
+
+			_glibtop_get_kmem_info( server, (off_t)ifaddr.ifa_netmask
+					     , &sockaddr, sizeof(sockaddr));
+
+			*mask = sockaddr.sin_addr.s_addr;
+
+			/* address found */
+
+			return;
+		}
+
+		next = ifaddr.ifa_next;
+	}
+}
+
+/* Init function. */
+
+void
+glibtop_init_netload_p (glibtop *server)
+{
+	off_t result;
+	off_t addr;
+
+	result = _glibtop_get_kmem_offset(server, "ifnet");
+	if (result <= 0)
+	{
+		server->sysdeps.netload = 0;
+		return;
+	}
+
+	result = _glibtop_get_kmem_info(server, result, &addr, sizeof(addr));
+	if (result <= 0)
+	{
+		server->sysdeps.netload = 0;
+		return;
+	}
+
+	server->machine.ifnet_offset = addr;
+
+	server->sysdeps.netload = _glibtop_sysdeps_netload;
+}
+
+/* Provides network statistics. */
+
+void
+glibtop_get_netload_p (glibtop *server, glibtop_netload *buf,
+		       const char *interface)
+{
+	int result;
+	off_t offset;
+	struct ifnet ifnet;
+	long addr;
+	long mask;
+	char name[16];
+
+	memset (buf, 0, sizeof (glibtop_netload));
+
+	for ( offset = server->machine.ifnet_offset;
+	      offset != 0;
+	      offset = (off_t)ifnet.if_next
+	    )
+	{
+		result = _glibtop_get_kmem_info(server, offset,
+						&ifnet, sizeof(ifnet));
+		if (result <= 0)
+		{
+			glibtop_error_io_r (server, "Cannot read ifnet");
+
+			return;
+		}
+
+		result = _glibtop_get_kmem_info(server, (off_t)ifnet.if_name,
+						name, sizeof(name));
+		if (result <= 0)
+		{
+			glibtop_error_io_r (server, "Cannot read if_name");
+
+			return;
+		}
+
+		sprintf(name+strlen(name), "%d", ifnet.if_unit);
+		if (strcmp(name, interface) != 0)
+		{
+			continue;
+		}
+
+		if (ifnet.if_flags & IFF_UP)
+			buf->if_flags |= (1 << GLIBTOP_IF_FLAGS_UP);
+		if (ifnet.if_flags & IFF_BROADCAST)
+			buf->if_flags |= (1 << GLIBTOP_IF_FLAGS_BROADCAST);
+		if (ifnet.if_flags & IFF_LOOPBACK)
+			buf->if_flags |= (1 << GLIBTOP_IF_FLAGS_LOOPBACK);
+		if (ifnet.if_flags & IFF_POINTOPOINT)
+			buf->if_flags |= (1 << GLIBTOP_IF_FLAGS_POINTOPOINT);
+		if (ifnet.if_flags & IFF_RUNNING)
+			buf->if_flags |= (1 << GLIBTOP_IF_FLAGS_RUNNING);
+		if (ifnet.if_flags & IFF_NOARP)
+			buf->if_flags |= (1 << GLIBTOP_IF_FLAGS_NOARP);
+		if (ifnet.if_flags & IFF_PROMISC)
+			buf->if_flags |= (1 << GLIBTOP_IF_FLAGS_PROMISC);
+		if (ifnet.if_flags & IFF_ALLMULTI)
+			buf->if_flags |= (1 << GLIBTOP_IF_FLAGS_ALLMULTI);
+		if (ifnet.if_flags & IFF_OACTIVE)
+			buf->if_flags |= (1 << GLIBTOP_IF_FLAGS_OACTIVE);
+		if (ifnet.if_flags & IFF_SIMPLEX)
+			buf->if_flags |= (1 << GLIBTOP_IF_FLAGS_SIMPLEX);
+		if (ifnet.if_flags & IFF_LINK0)
+			buf->if_flags |= (1 << GLIBTOP_IF_FLAGS_LINK0);
+		if (ifnet.if_flags & IFF_LINK1)
+			buf->if_flags |= (1 << GLIBTOP_IF_FLAGS_LINK1);
+		if (ifnet.if_flags & IFF_LINK2)
+			buf->if_flags |= (1 << GLIBTOP_IF_FLAGS_LINK2);
+		if (ifnet.if_flags & IFF_LINK2)
+			buf->if_flags |= (1 << GLIBTOP_IF_FLAGS_LINK2);
+		if (ifnet.if_flags & 0x80000)
+			buf->if_flags |= (1 << GLIBTOP_IF_FLAGS_MULTICAST);
+
+		buf->mtu = ifnet.if_mtu;
+	
+		get_ifaddr(server, ifnet.if_addrlist, &addr, &mask);
+
+		buf->subnet = addr & mask;
+		buf->address = addr;
+
+		buf->packets_in = ifnet.if_ipackets;
+		buf->packets_out = ifnet.if_opackets;
+		buf->packets_total = buf->packets_in + buf->packets_out;
+
+		buf->bytes_in = ifnet.if_ibytes;
+		buf->bytes_out = ifnet.if_obytes;
+		buf->bytes_total = buf->bytes_in + buf->bytes_out;
+
+		buf->errors_in = ifnet.if_ierrors;
+		buf->errors_out = ifnet.if_oerrors;
+		buf->errors_total = ifnet.if_ierrors + ifnet.if_oerrors;
+
+		buf->collisions = ifnet.if_collisions;
+	}
+
+	buf->flags = _glibtop_sysdeps_netload;
+}

sysdeps/aix/nosuid.c

@@ -0,0 +1,46 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <sys/systemcfg.h>
+
+#include <glibtop.h>
+#include <glibtop/open.h>
+#include <glibtop/close.h>
+
+void
+glibtop_open_s (glibtop *server,
+		const char *program_name,
+		const unsigned long features,
+		const unsigned flags)
+{
+	server->ncpu = _system_configuration.ncpus;
+
+	if (server->ncpu == 1)
+	{
+		server->ncpu = 0; /* means single-processor, see glibtop.h */
+	}
+}
+
+void
+glibtop_close_s (glibtop *server)
+{ }

sysdeps/aix/open.c

@@ -0,0 +1,82 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <fcntl.h>
+#include <unistd.h>
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/open.h>
+
+#include "glibtop_suid.h"
+
+/* !!! THIS FUNCTION RUNS SUID ROOT - CHANGE WITH CAUTION !!! */
+
+void
+glibtop_init_p (glibtop *server, const unsigned long features,
+                const unsigned flags)
+{
+	glibtop_init_func_t *init_fkt;
+
+	if (server == NULL)
+		glibtop_error_r (NULL, "glibtop_init_p (server == NULL)");
+
+	if ((server->flags & _GLIBTOP_INIT_STATE_SYSDEPS) == 0) {
+		glibtop_open_p (server, "glibtop", features, flags);
+
+		for (init_fkt = _glibtop_init_hook_p; *init_fkt; init_fkt++)
+			(*init_fkt) (server);
+		server->flags |= _GLIBTOP_INIT_STATE_SYSDEPS;
+	}
+}
+
+/* Opens pipe to gtop server. Returns 0 on success and -1 on error. */
+
+void
+glibtop_open_p (glibtop *server, const char *program_name,
+		const unsigned long features, const unsigned flags)
+{
+	/* !!! WE ARE ROOT HERE - CHANGE WITH CAUTION !!! */
+
+	server->machine.uid = getuid ();
+	server->machine.euid = geteuid ();
+	server->machine.gid = getgid ();
+	server->machine.egid = getegid ();
+
+	/* open kmem */
+
+	server->machine.kmem_fd = open("/dev/kmem", O_RDONLY);
+	if (server->machine.kmem_fd == -1)
+		glibtop_error_io_r (server, "Cannot open /dev/kmem");
+
+	/* Drop priviledges. */
+
+	if (seteuid (server->machine.uid))
+		_exit (1);
+
+	if (setegid (server->machine.gid))
+		_exit (1);
+
+	/* !!! END OF SUID ROOT PART !!! */
+
+	server->name = program_name;
+}

sysdeps/aix/ppp.c

@@ -0,0 +1,44 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, October 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/ppp.h>
+
+static const unsigned long _glibtop_sysdeps_ppp = 0;
+
+/* Init function. */
+
+void
+glibtop_init_ppp_s (glibtop *server)
+{
+	server->sysdeps.ppp = _glibtop_sysdeps_ppp;
+}
+
+/* Provides PPP/ISDN information. */
+
+void
+glibtop_get_ppp_s (glibtop *server, glibtop_ppp *buf, unsigned short device)
+{
+	memset (buf, 0, sizeof (glibtop_ppp));
+}

sysdeps/aix/procargs.c

@@ -0,0 +1,132 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <procinfo.h>
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/xmalloc.h>
+#include <glibtop/procargs.h>
+
+#include "utils.h"
+
+static const unsigned long _glibtop_sysdeps_proc_args = 
+	(1 << GLIBTOP_PROC_ARGS_SIZE);
+
+/* Init function. */
+
+void
+glibtop_init_proc_args_s (glibtop *server)
+{
+	server->sysdeps.proc_args = _glibtop_sysdeps_proc_args;
+}
+
+/* Provides detailed information about a process. */
+
+static void _glibtop_remove_non_ascii(char* string)
+{
+	for (;*string != 0;string++)
+	{
+		if (!isascii(*string))
+			*string = '?';
+	}
+}
+
+char *
+glibtop_get_proc_args_s (glibtop *server, glibtop_proc_args *buf,
+			 pid_t pid, unsigned max_len)
+{
+	struct procsinfo *pinfo;
+	char *args_buffer;
+	char* args = NULL;
+	int size;
+	int result;
+	int len;
+
+	memset (buf, 0, sizeof (glibtop_proc_args));
+
+	pinfo = _glibtop_get_procinfo(server, pid);
+	if (pinfo == NULL)
+	{
+		glibtop_error_io_r (server, "Cannot read procsinfo");
+
+		return NULL;
+	}
+	
+	size = max_len != 0 ? max_len : 4096;
+	args_buffer = glibtop_malloc_r (server, size);
+	if (args_buffer == NULL)
+	{
+		glibtop_error_io_r (server, "Cannot malloc procsinfo");
+
+		return NULL;
+
+	}
+
+	result = getargs(pinfo, sizeof(struct procsinfo), args_buffer, size);
+	if (result == -1)
+	{
+		glibtop_error_io_r (server, "Cannot malloc getargs");
+
+		glibtop_free_r(server, args_buffer);
+
+		return NULL;
+	}
+
+	/* look if empty string */
+
+	if (args_buffer[0] == 0)
+	{
+		glibtop_free_r(server, args_buffer);
+
+		return NULL;
+	}
+
+	/* compute length of args and realloc */
+
+	len = 0;
+	while ((args_buffer[len] != 0) && (len < size))
+	{
+		_glibtop_remove_non_ascii(args_buffer + len);
+
+		len += strlen(args_buffer + len) + 1;
+	}
+
+	args = glibtop_malloc_r (server, len);
+	if (args == NULL)
+	{
+		glibtop_error_io_r (server, "Cannot malloc procsinfo");
+
+		glibtop_free_r(server, args_buffer);
+
+		return NULL;
+	}
+	memcpy(args, args_buffer, len);
+	glibtop_free_r(server, args_buffer);
+
+	buf->size = len - 1;
+
+	buf->flags = _glibtop_sysdeps_proc_args;
+
+	return args;
+}

sysdeps/aix/prockernel.c

@@ -0,0 +1,98 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <procinfo.h>
+#include <sys/proc.h>
+
+#include <glibtop.h>
+#include <glibtop/prockernel.h>
+#include <glibtop/error.h>
+
+#include "utils.h"
+
+static const unsigned long _glibtop_sysdeps_proc_kernel =
+(1 <<GLIBTOP_PROC_KERNEL_MIN_FLT) + (1 <<GLIBTOP_PROC_KERNEL_MAJ_FLT) +
+(1 <<GLIBTOP_PROC_KERNEL_CMIN_FLT) + (1 <<GLIBTOP_PROC_KERNEL_CMAJ_FLT) +
+(1 <<GLIBTOP_PROC_KERNEL_KSTK_ESP) + (1 <<GLIBTOP_PROC_KERNEL_KSTK_EIP) +
+(1 <<GLIBTOP_PROC_KERNEL_NWCHAN);
+
+
+
+/* Init function. */
+
+void
+glibtop_init_proc_kernel_s (glibtop *server)
+{
+	server->sysdeps.proc_kernel = _glibtop_sysdeps_proc_kernel;
+}
+
+/* Provides detailed information about a process. */
+
+void
+glibtop_get_proc_kernel_s (glibtop *server, glibtop_proc_kernel *buf,
+			   pid_t pid)
+{
+	struct thrdsinfo thinfo;
+	struct procsinfo *pinfo;
+	tid_t thid;
+	int result;
+
+	memset (buf, 0, sizeof (glibtop_proc_kernel));
+
+	pinfo = _glibtop_get_procinfo(server, pid);
+	if (pinfo == NULL)
+	{
+		glibtop_error_io_r(server, "Cannot read procsinfo");
+
+		return;
+	}
+
+	if (!(pinfo->pi_flags | SKPROC))
+	{
+		/* not a kernel process */
+
+		return;
+	}
+
+	buf->min_flt = pinfo->pi_ru.ru_minflt;
+	buf->maj_flt = pinfo->pi_ru.ru_majflt;
+
+	buf->cmin_flt = pinfo->pi_cru.ru_minflt;
+	buf->cmaj_flt = pinfo->pi_cru.ru_majflt;
+
+	thid = 0;
+	result = getthrds(pid, &thinfo, sizeof(thinfo), &thid, 1);
+	if (result != 1)
+	{
+		glibtop_error_io_r(server, "Cannot read thrdsinfo");
+
+		return;
+	}
+
+	buf->kstk_esp = thinfo.ti_ustk;
+	buf->kstk_eip = thinfo.ti_code;
+
+	buf->nwchan = thinfo.ti_wchan;
+
+	buf->flags = _glibtop_sysdeps_proc_kernel;
+}

sysdeps/aix/proclist.c

@@ -0,0 +1,247 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <procinfo.h>
+
+#include <glibtop.h>
+#include <glibtop/xmalloc.h>
+#include <glibtop/proclist.h>
+
+static const unsigned long _glibtop_sysdeps_proclist = 
+(1 << GLIBTOP_PROCLIST_NUMBER) + (1 << GLIBTOP_PROCLIST_TOTAL) +
+(1 << GLIBTOP_PROCLIST_SIZE);
+
+#define BLOCK_COUNT	256
+#define BLOCK_SIZE	(BLOCK_COUNT * sizeof (unsigned int))
+
+/* Init function. */
+
+void
+glibtop_init_proclist_s (glibtop *server)
+{
+	server->sysdeps.proclist = _glibtop_sysdeps_proclist;
+}
+
+/* Fetch list of currently running processes.
+ *
+ * IMPORTANT NOTE:
+ *   On error, this function MUST return NULL and set buf->flags to zero !
+ *   On success, it returnes a pointer to a list of buf->number elements
+ *   each buf->size big. The total size is stored in buf->total. */
+
+unsigned *
+glibtop_get_proclist_s (glibtop *server, glibtop_proclist *buf,
+			int64_t which, int64_t arg)
+{
+	struct procsinfo pinfo;
+	int count, total;
+	unsigned pids [BLOCK_COUNT], *pids_chain = NULL;
+	int pids_size = 0, pids_offset = 0, new_size;
+	pid_t current;
+	int result;
+
+	memset (buf, 0, sizeof (glibtop_proclist));
+
+	for( count = total = 0, current = 0
+	   , result = getprocs(&pinfo, sizeof(pinfo), NULL, 0, &current, 1);
+	     result == 1;
+	     result = getprocs(&pinfo, sizeof(pinfo), NULL, 0, &current, 1))
+	{
+		if (which & GLIBTOP_EXCLUDE_IDLE)
+		{
+			if (pinfo.pi_state & SIDL)
+			{
+				/* exclude idle processes */
+
+				continue;
+			}
+		}
+
+		if (which & GLIBTOP_EXCLUDE_SYSTEM)
+		{
+			if (pinfo.pi_flags & SKPROC)
+			{
+				/* exclude Kernel processes */
+
+				continue;
+			}
+		}
+
+		if (which & GLIBTOP_EXCLUDE_NOTTY)
+		{
+			if (!pinfo.pi_ttyp)
+			{
+				/* exclude processes without tty */
+
+				continue;
+			}
+		}
+
+		switch(which & GLIBTOP_KERN_PROC_MASK)
+		{
+			case GLIBTOP_KERN_PROC_ALL:
+
+				/* return information about all processes
+				 * so, let's go ahead
+				 */
+
+				break;
+
+			case GLIBTOP_KERN_PROC_PID:
+
+				/* return information about all processes with
+				 * pid passed in arg
+				 */
+
+				if (pinfo.pi_pid != arg)
+				{
+					continue;
+				}
+				
+				break;
+
+			case GLIBTOP_KERN_PROC_PGRP:
+
+				/* return information about all processes in
+				 * process group passed in arg
+				 */
+
+				if (pinfo.pi_pgrp != arg)
+				{
+					continue;
+				}
+
+				break;
+
+			case GLIBTOP_KERN_PROC_SESSION:
+
+				/* return information about all processes in
+				 * session passed in arg
+				 */
+
+				if (pinfo.pi_sid != arg)
+				{
+					continue;
+				}
+
+				break;
+
+			case GLIBTOP_KERN_PROC_TTY:
+
+				/* return information about all processes with
+				 * tty device number passed in arg
+				 */
+
+				if (pinfo.pi_ttyd != arg)
+				{
+					continue;
+				}
+
+				break;
+
+			case GLIBTOP_KERN_PROC_UID:
+
+				/* return information about all processes with
+				 * effective uid passed in arg
+				 */
+
+				if (pinfo.pi_cred.cr_uid != arg)
+				{
+					continue;
+				}
+
+				break;
+
+			case GLIBTOP_KERN_PROC_RUID:
+
+				/* return information about all processes with
+				 * real uid passed in arg
+				 */
+
+				if (pinfo.pi_cred.cr_ruid != arg)
+				{
+					continue;
+				}
+
+				break;
+		}
+	
+		if (count >= BLOCK_COUNT)
+		{
+			/* The following call to glibtop_realloc will be
+			 * equivalent to glibtop_malloc () if `pids_chain' is
+			 * NULL. We just calculate the new size and copy `pids'
+			 * to the beginning of the newly allocated block. */
+
+			new_size = pids_size + BLOCK_SIZE;
+
+			pids_chain = glibtop_realloc_r
+					(server, pids_chain, new_size);
+			memcpy (pids_chain + pids_offset, pids, BLOCK_SIZE);
+
+			pids_size = new_size;
+			pids_offset += BLOCK_COUNT;
+			count = 0;
+		}
+
+		/* pids is now big enough to hold at least one single pid. */
+
+		pids[count++] = pinfo.pi_pid;
+
+		total++;
+	}
+
+	if (result == -1)
+	{
+		glibtop_error_io_r(server, "Cannot read procsinfo");
+	}
+
+	/* count is only zero if an error occured (one a running Linux system,
+	* we have at least one single process). */
+
+	if (!count) return NULL;
+
+	/* The following call to glibtop_realloc will be equivalent to
+	 * glibtop_malloc if pids_chain is NULL. We just calculate the
+	 * new size and copy pids to the beginning of the newly allocated
+	 * block. */
+
+	new_size = pids_size + count * sizeof (unsigned);
+
+	pids_chain = glibtop_realloc_r (server, pids_chain, new_size);
+
+	memcpy (pids_chain + pids_offset, pids, count * sizeof (unsigned));
+
+	pids_size = new_size;
+
+	/* Since everything is ok now, we can set buf->flags, fill in the
+	 * remaining fields and return the `pids_chain'. */
+
+	buf->size = sizeof(unsigned int);
+	buf->number = total;
+	buf->total = total * buf->size;
+
+	buf->flags = _glibtop_sysdeps_proclist;
+
+	return pids_chain;
+}

sysdeps/aix/procmap.c

@@ -0,0 +1,50 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/xmalloc.h>
+#include <glibtop/procmap.h>
+
+static const unsigned long _glibtop_sysdeps_proc_map = 0;
+
+/* Init function. */
+
+void
+glibtop_init_proc_map_s (glibtop *server)
+{
+	server->sysdeps.proc_map = _glibtop_sysdeps_proc_map;
+}
+
+/* Provides detailed information about a process. */
+
+glibtop_map_entry *
+glibtop_get_proc_map_s (glibtop *server, glibtop_proc_map *buf,	pid_t pid)
+{
+	glibtop_init_p (&server, GLIBTOP_SYSDEPS_PROC_MAP, 0);
+	
+	memset (buf, 0, sizeof (glibtop_proc_map));
+	
+	return NULL;
+}

sysdeps/aix/procmem.c

@@ -0,0 +1,73 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <unistd.h>
+#include <sys/vminfo.h>
+#include <sys/resource.h>
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/procmem.h>
+
+#include "utils.h"
+
+static const unsigned long _glibtop_sysdeps_proc_mem = 
+(1 << GLIBTOP_PROC_MEM_SIZE) + (1 << GLIBTOP_PROC_MEM_VSIZE) +
+(1 << GLIBTOP_PROC_MEM_RESIDENT) + (1 << GLIBTOP_PROC_MEM_RSS) + 
+(1 << GLIBTOP_PROC_MEM_RSS_RLIM);
+
+/* Init function. */
+
+void
+glibtop_init_proc_mem_s (glibtop *server)
+{
+	server->sysdeps.proc_mem = _glibtop_sysdeps_proc_mem;
+}
+
+/* Provides detailed information about a process. */
+
+void
+glibtop_get_proc_mem_s (glibtop *server, glibtop_proc_mem *buf,
+			pid_t pid)
+{
+	struct procsinfo *pinfo;
+	int pagesize;
+
+	memset (buf, 0, sizeof (glibtop_proc_mem));
+
+	pinfo = _glibtop_get_procinfo(server, pid);
+        if (pinfo == NULL)
+        {
+                glibtop_error_io_r (server, "Cannot read procsinfo");
+
+		return;
+        }
+	
+	pagesize = sysconf(_SC_PAGESIZE);
+
+	buf->vsize = buf->size = pinfo->pi_size * pagesize;
+	buf->resident = buf->rss = (pinfo->pi_drss + pinfo->pi_trss) * pagesize;
+	buf->rss_rlim = pinfo->pi_rlimit[RLIMIT_RSS].rlim_cur;
+
+	buf->flags = _glibtop_sysdeps_proc_mem;
+}

sysdeps/aix/procsegment.c

@@ -0,0 +1,74 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <unistd.h>
+#include <sys/vminfo.h>
+#include <sys/resource.h>
+
+#include <glibtop.h>
+#include <glibtop/procsegment.h>
+#include <glibtop/error.h>
+
+#include "utils.h"
+
+static const unsigned long _glibtop_sysdeps_proc_segment = 
+(1 << GLIBTOP_PROC_SEGMENT_TEXT_RSS) + (1 << GLIBTOP_PROC_SEGMENT_SHLIB_RSS) +
+(1 << GLIBTOP_PROC_SEGMENT_DATA_RSS) + (1 << GLIBTOP_PROC_SEGMENT_STACK_RSS);
+
+
+/* Init function. */
+
+void
+glibtop_init_proc_segment_s (glibtop *server)
+{
+	server->sysdeps.proc_segment = _glibtop_sysdeps_proc_segment;
+}
+
+/* Provides detailed information about a process. */
+
+void
+glibtop_get_proc_segment_s (glibtop *server, glibtop_proc_segment *buf,
+			    pid_t pid)
+{
+	struct procsinfo *pinfo;
+	int pagesize;
+
+	memset (buf, 0, sizeof (glibtop_proc_segment));
+
+	pinfo = _glibtop_get_procinfo(server, pid);
+	if (pinfo == NULL)
+	{
+		glibtop_error_io_r (server, "Cannot read procsinfo");
+
+		return;
+	}
+
+	pagesize = sysconf(_SC_PAGESIZE);
+
+	buf->text_rss = pinfo->pi_trss * pagesize;
+	buf->data_rss = pinfo->pi_drss * pagesize;
+	buf->shlib_rss = pinfo->pi_ru.ru_ixrss * pagesize;
+	buf->stack_rss = pinfo->pi_ru.ru_isrss * pagesize;
+
+	buf->flags = _glibtop_sysdeps_proc_segment;
+}

sysdeps/aix/procsignal.c

@@ -0,0 +1,89 @@
+/* $Id$ */
+
+/* Copyright (C)) +998-99 Martin Baulig
+   This file is part of LibGTop) +.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April) +998.
+
+   LibGTop 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) + of the License,
+   or (at your option) any later version.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite) +30,
+   Boston, MA) +2111-1307, USA.
+*/
+
+#include <unistd.h>
+#include <sys/vminfo.h>
+#include <sys/resource.h>
+#include <sys/signal.h>
+
+#include <glibtop.h>
+#include <glibtop/procsignal.h>
+#include <glibtop/error.h>
+
+#include "utils.h"
+
+static const unsigned long _glibtop_sysdeps_proc_signal = 
+(1 <<GLIBTOP_PROC_SIGNAL_SIGNAL) + (1 <<GLIBTOP_PROC_SIGNAL_BLOCKED) +
+(1 <<GLIBTOP_PROC_SIGNAL_SIGIGNORE) + (1 <<GLIBTOP_PROC_SIGNAL_SIGCATCH);
+
+/* Init function. */
+
+void
+glibtop_init_proc_signal_s (glibtop *server)
+{
+	server->sysdeps.proc_signal = _glibtop_sysdeps_proc_signal;
+}
+
+/* Provides detailed information about a process. */
+
+void
+glibtop_get_proc_signal_s (glibtop *server, glibtop_proc_signal *buf,
+			   pid_t pid)
+{
+	struct procsinfo *pinfo;
+	int i;
+	long bit;
+
+	memset (buf, 0, sizeof (glibtop_proc_signal));
+
+	pinfo = _glibtop_get_procinfo(server, pid);
+	if (pinfo == NULL)
+	{
+		glibtop_error_io_r (server, "Cannot read procsinfo");
+
+		return;
+	}
+	
+	/* pending signals */
+
+#define NB_BITS	(8 * sizeof(u_int64_t))
+
+	for (i = 0; (i < NSIG) && (i < 2 * NB_BITS); i++)
+	{
+		bit = 1 << (NB_BITS - 1 - (i % NB_BITS));
+
+		if (sigismember(&pinfo->pi_sig, i))
+			buf->signal[i / NB_BITS] |= bit;
+
+		if (pinfo->pi_signal[i] == (long)SIG_HOLD)
+			buf->blocked[i / NB_BITS] |= bit;
+
+		if (pinfo->pi_signal[i] == (long)SIG_IGN)
+			buf->sigignore[i / NB_BITS] |= bit;
+
+		if (pinfo->pi_signal[i] == (long)SIG_CATCH)
+			buf->sigcatch[i / NB_BITS] |= bit;
+	}
+	
+	buf->flags = _glibtop_sysdeps_proc_signal;
+}

sysdeps/aix/procstate.c

@@ -0,0 +1,127 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <procinfo.h>
+#include <sys/thread.h>
+
+#include <glibtop.h>
+#include <glibtop/procstate.h>
+#include <glibtop/error.h>
+
+#include "utils.h"
+
+static const unsigned long _glibtop_sysdeps_proc_state = 
+(1 << GLIBTOP_PROC_STATE_CMD) + (1 << GLIBTOP_PROC_STATE_STATE) +
+(1 << GLIBTOP_PROC_STATE_UID) + (1 << GLIBTOP_PROC_STATE_GID);
+
+/* Init function. */
+
+void
+glibtop_init_proc_state_s (glibtop *server)
+{
+	server->sysdeps.proc_state = _glibtop_sysdeps_proc_state;
+}
+
+/* Provides detailed information about a process. */
+
+void
+glibtop_get_proc_state_s (glibtop *server, glibtop_proc_state *buf,
+			  pid_t pid)
+{
+	struct procsinfo *pinfo;
+	struct thrdsinfo thinfo;
+	tid_t thid;
+	int result;
+
+	memset (buf, 0, sizeof (glibtop_proc_state));
+
+	pinfo = _glibtop_get_procinfo(server, pid);
+	if (pinfo == NULL)
+	{
+		glibtop_error_io_r(server, "Cannot read procsinfo");
+
+		return;
+	}
+
+	if (pinfo->pi_pid == 0)
+	{
+		strcpy(buf->cmd, "swapper");
+	}
+
+	if (pinfo->pi_comm[0] == 0)
+	{
+		strcpy(buf->cmd, "<unknown>");
+	}
+	else
+	{
+		strncpy(buf->cmd, pinfo->pi_comm, 39);
+	}
+
+	buf->uid = pinfo->pi_uid;
+	buf->gid = pinfo->pi_cred.cr_gid;
+	
+	if (pinfo->pi_state == SZOMB)
+	{
+		buf->state = 'Z';
+		strcpy(buf->cmd, "<defunct>");
+	}
+	else
+	{
+		/* get state of first thread */
+
+		thid = 0;
+        	result = getthrds(pid, &thinfo, sizeof(thinfo), &thid, 1);
+		if (result != 1)
+		{
+			glibtop_error_io_r(server, "Cannot read threadinfo");
+		}
+
+		switch (thinfo.ti_state)
+		{
+			case TSIDL:
+				buf->state = 'D';
+				break;
+			case TSRUN:
+				buf->state = 'R';
+				break;
+			case TSSLEEP:
+				buf->state = 'S';
+				break;
+			case TSZOMB:
+				buf->state = 'Z';
+				strcpy(buf->cmd, "<defunct>");
+				break;
+			case TSSTOP:
+				buf->state = 'T';
+				break;
+			case TSSWAP:
+				buf->state = 'W';
+				break;
+			default:
+				buf->state = 0;
+				break;
+		}
+	}
+
+	buf->flags = _glibtop_sysdeps_proc_state;
+}

sysdeps/aix/proctime.c

@@ -0,0 +1,72 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <unistd.h>
+
+#include <glibtop.h>
+#include <glibtop/proctime.h>
+#include <glibtop/error.h>
+
+#include "utils.h"
+
+static const unsigned long _glibtop_sysdeps_proc_time =
+(1 << GLIBTOP_PROC_TIME_START_TIME) + (1 << GLIBTOP_PROC_TIME_RTIME) +
+(1 << GLIBTOP_PROC_TIME_UTIME) + (1 << GLIBTOP_PROC_TIME_STIME) +
+(1 << GLIBTOP_PROC_TIME_CUTIME) + (1 << GLIBTOP_PROC_TIME_CSTIME) +
+(1 << GLIBTOP_PROC_TIME_FREQUENCY);
+
+/* Init function. */
+
+void
+glibtop_init_proc_time_s (glibtop *server)
+{
+	server->sysdeps.proc_time = _glibtop_sysdeps_proc_time;
+}
+
+/* Provides detailed information about a process. */
+
+void
+glibtop_get_proc_time_s (glibtop *server, glibtop_proc_time *buf,
+			 pid_t pid)
+{
+	struct procsinfo *pinfo;
+
+	memset (buf, 0, sizeof (glibtop_proc_time));
+
+	pinfo = _glibtop_get_procinfo(server, pid);
+	if (pinfo == NULL)
+	{
+		glibtop_error_io_r (server, "Cannot read procsinfo");
+		return;
+	}
+
+	buf->start_time = pinfo->pi_start;
+	buf->utime = pinfo->pi_ru.ru_utime.tv_sec + (double)pinfo->pi_ru.ru_utime.tv_usec/1000000.0;
+	buf->stime = pinfo->pi_ru.ru_stime.tv_sec + (double)pinfo->pi_ru.ru_stime.tv_usec/1000000.0;
+	buf->rtime = buf->utime + buf->stime;
+	buf->cutime = pinfo->pi_cru.ru_utime.tv_sec + (double)pinfo->pi_cru.ru_utime.tv_usec/1000000.0;
+	buf->cstime = pinfo->pi_cru.ru_stime.tv_sec + (double)pinfo->pi_cru.ru_stime.tv_usec/1000000.0;
+	buf->frequency = sysconf(_SC_CLK_TCK);
+
+	buf->flags = _glibtop_sysdeps_proc_time;
+}

sysdeps/aix/procuid.c

@@ -0,0 +1,101 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <unistd.h>
+#include <sys/vminfo.h>
+#include <sys/resource.h>
+
+#include <glibtop.h>
+#include <glibtop/procuid.h>
+#include <glibtop/error.h>
+
+#include "utils.h"
+
+static const unsigned long _glibtop_sysdeps_proc_uid = 
+(1 << GLIBTOP_PROC_UID_UID) + (1 << GLIBTOP_PROC_UID_EUID) +
+(1 << GLIBTOP_PROC_UID_GID) + (1 << GLIBTOP_PROC_UID_EGID) +
+(1 << GLIBTOP_PROC_UID_PID) + (1 << GLIBTOP_PROC_UID_PPID) +
+(1 << GLIBTOP_PROC_UID_PGRP) + (1 << GLIBTOP_PROC_UID_SESSION) +
+(1 << GLIBTOP_PROC_UID_TTY) + (1 << GLIBTOP_PROC_UID_PRIORITY) +
+(1 << GLIBTOP_PROC_UID_NICE);
+
+
+/* Init function. */
+
+void
+glibtop_init_proc_uid_s (glibtop *server)
+{
+	server->sysdeps.proc_uid = _glibtop_sysdeps_proc_uid;
+}
+
+/* Provides detailed information about a process. */
+
+void
+glibtop_get_proc_uid_s (glibtop *server, glibtop_proc_uid *buf,
+			pid_t pid)
+{
+	struct procsinfo *pinfo;
+	struct thrdsinfo thinfo;
+	tid_t thid;
+	int result;
+
+	memset (buf, 0, sizeof (glibtop_proc_uid));
+
+	pinfo = _glibtop_get_procinfo(server, pid);
+	if (pinfo == NULL)
+	{
+		glibtop_error_io_r (server, "Cannot read procsinfo");
+
+		return;
+	}
+
+	buf->uid = pinfo->pi_cred.cr_ruid;
+	buf->euid =  pinfo->pi_cred.cr_uid;
+	buf->gid =  pinfo->pi_cred.cr_rgid;
+	buf->egid =  pinfo->pi_cred.cr_gid;
+
+	buf->pid = pinfo->pi_pid;
+	buf->ppid = pinfo->pi_ppid;
+
+	buf->pgrp = pinfo->pi_pgrp;
+	buf->session = pinfo->pi_sid;
+
+	buf->tty = pinfo->pi_ttyd;
+
+	buf->nice = pinfo->pi_nice;
+
+	buf->flags = _glibtop_sysdeps_proc_uid;
+
+	thid = 0;
+	result = getthrds(pid, &thinfo, sizeof(thinfo), &thid, 1);
+	if (result != 1)
+	{
+		buf->flags &= ~(1 << GLIBTOP_PROC_UID_PRIORITY);
+
+		glibtop_error_io_r(server, "Cannot read thrdsinfo");
+	}
+
+	/* priority of first thread */
+
+	buf->priority = thinfo.ti_pri;
+}

sysdeps/aix/sem_limits.c

@@ -0,0 +1,86 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/sem_limits.h>
+#include <glibtop/error.h>
+
+#include "utils.h"
+
+static const unsigned long _glibtop_sysdeps_sem_limits = 
+(1 << GLIBTOP_IPC_SEMMNI) + (1 << GLIBTOP_IPC_SEMMSL) +
+(1 << GLIBTOP_IPC_SEMOPM) + (1 << GLIBTOP_IPC_SEMUME) +
+(1 << GLIBTOP_IPC_SEMUSZ) + (1 << GLIBTOP_IPC_SEMVMX) +
+(1 << GLIBTOP_IPC_SEMAEM);
+
+/* Init function. */
+
+void
+glibtop_init_sem_limits_p (glibtop *server)
+{
+	off_t result;
+
+	result = _glibtop_get_kmem_offset(server, "seminfo");
+	if (result <= 0)
+	{
+		server->sysdeps.sem_limits = 0;
+		return;
+	}
+
+	server->machine.seminfo_offset = result;
+
+	server->sysdeps.sem_limits = _glibtop_sysdeps_sem_limits;
+}
+
+/* Provides information about sysv sem limits. */
+
+void
+glibtop_get_sem_limits_p (glibtop *server, glibtop_sem_limits *buf)
+{
+	int result;
+	struct seminfo seminfo;
+
+	glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_SEM_LIMITS), 0);
+
+	memset (buf, 0, sizeof (glibtop_sem_limits));
+
+	result = _glibtop_get_kmem_info(server, server->machine.seminfo_offset,
+					&seminfo, sizeof(seminfo));
+
+	if (result <= 0)
+	{
+		glibtop_error_io_r (server, "Cannot read seminfo");
+
+		return;
+	}
+
+	buf->semmni = seminfo.semmni;
+	buf->semmsl = seminfo.semmsl;
+	buf->semopm = seminfo.semopm;
+	buf->semume = seminfo.semume;
+	buf->semusz = seminfo.semusz;
+	buf->semvmx = seminfo.semvmx;
+	buf->semaem = seminfo.semaem;
+
+	buf->flags = _glibtop_sysdeps_sem_limits;
+}

sysdeps/aix/shm_limits.c

@@ -0,0 +1,79 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <sys/shm.h>
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/shm_limits.h>
+
+static const unsigned long _glibtop_sysdeps_shm_limits = 
+(1L << GLIBTOP_IPC_SHMMAX) + (1L << GLIBTOP_IPC_SHMMIN) +
+(1L << GLIBTOP_IPC_SHMMNI);
+
+/* Init function. */
+
+void
+glibtop_init_shm_limits_p (glibtop *server)
+{
+	int result;
+
+	result = _glibtop_get_kmem_offset(server, "shminfo");
+	if (result == -1)
+        {
+		server->sysdeps.shm_limits = 0;
+		return;
+	}
+
+	server->machine.shminfo_offset = result;
+
+	server->sysdeps.shm_limits = _glibtop_sysdeps_shm_limits;
+}
+
+/* Provides information about sysv ipc limits. */
+
+void
+glibtop_get_shm_limits_p (glibtop *server, glibtop_shm_limits *buf)
+{
+	int result;
+	struct shminfo shminfo;
+	int s;
+
+	glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_SHM_LIMITS), 0);
+
+	memset (buf, 0, sizeof (glibtop_shm_limits));
+
+	result = _glibtop_get_kmem_info(server, server->machine.shminfo_offset,
+					&shminfo, sizeof(struct shminfo));
+	if (result <= 0)
+	{
+		glibtop_error_io_r (server, "Cannot read shminfo");
+		return;
+	}
+
+	buf->shmmax = shminfo.shmmax;
+	buf->shmmin = shminfo.shmmin;
+	buf->shmmni = shminfo.shmmni;
+
+	buf->flags = _glibtop_sysdeps_shm_limits;
+}

sysdeps/aix/siglist.c

@@ -0,0 +1,72 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/signal.h>
+
+const glibtop_signame glibtop_sys_siglist [] =
+{  {  1, "SIGHUP",  "Hangup" },
+   {  2, "SIGINT",  "Interrupt" },
+   {  3, "SIGQUIT", "Quit" },
+   {  4, "SIGILL",  "Illegal Instruction" },
+   {  5, "SIGTRAP", "Trace/Breakpoint Trap" },
+   {  6, "SIGABRT", "Abort" },
+   {  7, "SIGEMT",  "Emulation Trap" },
+   {  8, "SIGFPE",  "Arithmetic Exception" },
+   {  9, "SIGKILL", "Killed" },
+   { 10, "SIGBUS",  "Bus Error" },
+   { 11, "SIGSEGV", "Segmentation Fault" },
+   { 12, "SIGSYS",  "Bad System Call" },
+   { 13, "SIGPIPE", "Broken Pipe" },
+   { 14, "SIGALRM", "Alarm Clock" },
+   { 15, "SIGTERM", "Terminated" },
+   { 16, "SIGURG",  "Urgent Socket Condition" },
+   { 17, "SIGSTOP", "Stop (signal)" },
+   { 18, "SIGSTP",  "Stop (user)" },
+   { 19, "SIGCONT", "Continue" },
+   { 20, "SIGCHLD", "Child Status Changed" },
+   { 21, "SIGTTIN", "Stopped (tty input)" },
+   { 22, "SIGTTOU", "Stopped (tty output)" },
+   { 23, "SIGIO",   "I/O completed" },
+   { 24, "SIGXCPU", "Cpu Limit Exceeded" },
+   { 25, "SIGXFSZ", "File Size Limit Exceeded" },
+   { 27, "SIGMSG",  "Message" },
+   { 28, "SIGWINCH","Window Size Change" },
+   { 29, "SIGPWR",  "Power-Fail/Restart" },
+   { 30, "SIGUSR1", "User Signal 1" },
+   { 31, "SIGUSR2", "User Signal 2" },
+   { 32, "SIGPROF", "Profiling Timer Expired" },
+   { 33, "SIGDANGER","System Crash Imminent" },
+   { 34, "SIGVTALRM","Virtual Timer Expired" },
+   { 35, "SIGMIGRATE","Migrate Process" },
+   { 36, "SIGPRE",   "Programming Exception" },
+   { 37, "SIGVIRT",  "AIX Virtual Time Alarm" },
+   { 38, "SIGALRM1", "m:n Condition Variables" },
+   { 39, "SIGWAITING","Scheduling" },
+   { 59, "SIGCPUFAIL","Predictive De-configuration of Processors" },
+   { 60, "SIGKAP",   "Keep Alive" },
+   { 61, "SIGRETRACT","Monitor Mode Relinguish" },
+   { 62, "SIGSOUND", "Sound Control Completed" },
+   { 63, "SIGSAK",   "Secure Attention Key" },
+   {  0, NULL, NULL }
+};

sysdeps/aix/swap.c

@@ -0,0 +1,128 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <sys/vminfo.h>
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/swap.h>
+
+static const unsigned long _glibtop_sysdeps_swap = 
+(1 << GLIBTOP_SWAP_TOTAL) + (1 << GLIBTOP_SWAP_USED) +
+(1 << GLIBTOP_SWAP_FREE) + (1 << GLIBTOP_SWAP_PAGEIN) +
+(1 << GLIBTOP_SWAP_PAGEOUT);
+
+#define FILENAME	"/etc/swapspaces"
+
+/* Init function. */
+
+void
+glibtop_init_swap_s (glibtop *server)
+{
+	server->sysdeps.swap = _glibtop_sysdeps_swap;
+}
+
+/* Provides information about swap usage. */
+
+void
+glibtop_get_swap_s (glibtop *server, glibtop_swap *buf)
+{
+	struct vminfo vminfo;
+	struct pginfo pginfo;
+	int pagesize;
+	int result;
+	FILE* fd;
+	char device_name[128];
+	int c;
+	int comment = 0;
+	int pos = 0;
+
+	memset (buf, 0, sizeof (glibtop_swap));
+
+	pagesize = sysconf(_SC_PAGESIZE);
+
+	fd = fopen(FILENAME, "r");
+	if (fd == NULL)
+	{
+		glibtop_error_io_r (server, "open (%s)", FILENAME);
+	}
+
+	buf->total = 0;
+	buf->free = 0;
+	while((c = getc(fd)) != EOF)
+	{
+		if (comment)
+		{
+			/* skip comments */
+			if (c == '\n') comment = 0;
+			continue;
+		}
+		switch(c)
+		{
+			case '*':
+				comment = 1;
+				break;
+			case '\n':
+				device_name[pos] = 0;
+				pos = 0;
+
+				if (strncmp("dev=", device_name, 4) == 0)
+				{
+					result = swapqry(device_name+4, &pginfo);
+					if (result == -1)
+					{
+						glibtop_error_io_r (server, "Cannot read pginfo");
+						break;
+					}
+
+					buf->total += pginfo.size * pagesize;
+					buf->free += pginfo.free * pagesize;;
+				}
+				break;
+			case ' ':
+			case '\t':
+				break;
+			default:
+				device_name[pos++] = c;
+				break;
+		}
+	}
+
+	buf->used = buf->total - buf->free;
+	fclose(fd);
+#ifdef HAVE_VMGETINFO
+	result = vmgetinfo((void*)&vminfo, VMINFO, sizeof(vminfo));
+#else
+	result = _glibtop_vmgetinfo((void*)&vminfo, VMINFO, sizeof(vminfo));
+#endif
+	if (result == -1)
+	{
+		glibtop_error_io_r (server, "Cannot read vminfo");
+		return;
+	}
+
+	buf->pagein = vminfo.pageins;
+	buf->pageout = vminfo.pageouts;
+
+	buf->flags = _glibtop_sysdeps_swap;
+}

sysdeps/aix/sysinfo.c

@@ -0,0 +1,194 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <sys/systemcfg.h>
+
+#include <config.h>
+#include <glibtop/sysinfo.h>
+
+static const unsigned long _glibtop_sysdeps_sysinfo =
+(1L << GLIBTOP_SYSINFO_CPUINFO);
+
+static glibtop_sysinfo sysinfo;
+
+static void add_info(glibtop_entry* entry, char* label, char* value)
+{
+	g_ptr_array_add(entry->labels, g_strdup(label));
+	g_hash_table_insert(entry->values, label, g_strdup(value));
+}
+
+static void init_sysinfo(void)
+{
+	int cpu;
+	char buf[64];
+
+	memset (&sysinfo, 0, sizeof (glibtop_sysinfo));
+
+	sysinfo.ncpu = MIN(_system_configuration.ncpus, GLIBTOP_NCPU);
+
+	for (cpu = 0; cpu < sysinfo.ncpu ; cpu++)
+	{
+		/* init cpu data structure */
+
+		sysinfo.cpuinfo[cpu].labels = g_ptr_array_new();
+		sysinfo.cpuinfo[cpu].values = g_hash_table_new (NULL, NULL);
+
+		/* add properties */
+
+		switch(_system_configuration.architecture)
+		{
+			case POWER_RS:
+				add_info( &sysinfo.cpuinfo[cpu]
+					, "architecture"
+					, "Power Classic architecture");
+				break;
+			case POWER_PC:
+				add_info( &sysinfo.cpuinfo[cpu]
+					, "architecture"
+					, "Power PC architecture");
+				break;
+			case IA64:
+				add_info( &sysinfo.cpuinfo[cpu]
+					, "architecture"
+					, "Intel IA64 architecture");
+				break;
+			default:
+				add_info( &sysinfo.cpuinfo[cpu]
+					, "architecture"
+					, "Unknown architecture");
+				break;
+		}
+
+		if ( (_system_configuration.architecture == POWER_RS) ||
+		     (_system_configuration.architecture == POWER_PC) )
+		{
+			switch(_system_configuration.implementation)
+			{
+				case POWER_RS1:
+					add_info( &sysinfo.cpuinfo[cpu]
+						, "implementation"
+						, "RS1");
+					break;
+				case POWER_RSC:
+					add_info( &sysinfo.cpuinfo[cpu]
+						, "implementation"
+						, "RSC");
+					break;
+				case POWER_RS2:
+					add_info( &sysinfo.cpuinfo[cpu]
+						, "implementation"
+						, "RS2");
+					break;
+				case POWER_601:
+					add_info( &sysinfo.cpuinfo[cpu]
+						, "implementation"
+						, "601");
+					break;
+				case POWER_603:
+					add_info( &sysinfo.cpuinfo[cpu]
+						, "implementation"
+						, "603");
+					break;
+				case POWER_604:
+					add_info( &sysinfo.cpuinfo[cpu]
+						, "implementation"
+						, "604");
+					break;
+				case POWER_620:
+					add_info( &sysinfo.cpuinfo[cpu]
+						, "implementation"
+						, "620");
+					break;
+				case POWER_630:
+					add_info( &sysinfo.cpuinfo[cpu]
+						, "implementation"
+						, "630");
+					break;
+				case POWER_A35:
+					add_info( &sysinfo.cpuinfo[cpu]
+						, "implementation"
+						, "A35");
+					break;
+				case POWER_RS64II:
+					add_info( &sysinfo.cpuinfo[cpu]
+						, "implementation"
+						, "RS64II");
+					break;
+				case POWER_RS64III:
+					add_info( &sysinfo.cpuinfo[cpu]
+						, "implementation"
+						, "RS64III");
+					break;
+			}
+		}
+		else if (_system_configuration.architecture == IA64)
+		{
+			switch(_system_configuration.implementation)
+			{
+				case IA64_M1:
+					add_info( &sysinfo.cpuinfo[cpu]
+						, "implementation"
+						, "IA64 M1");
+					break;
+				case IA64_M2:
+					add_info( &sysinfo.cpuinfo[cpu]
+						, "implementation"
+						, "IA64 M2");
+					break;
+			}
+		}
+
+		sprintf(buf,"%d", _system_configuration.width);
+		add_info( &sysinfo.cpuinfo[cpu], "width", buf);
+
+		if (_system_configuration.cache_attrib & (1 << 31))
+		{
+			/* L1 cache is present */
+			
+			sprintf(buf,"%d", _system_configuration.icache_size);
+			add_info( &sysinfo.cpuinfo[cpu], "L1 instruction cache size", buf);
+
+			sprintf(buf,"%d", _system_configuration.dcache_size);
+			add_info( &sysinfo.cpuinfo[cpu], "L1 data cache size", buf);
+		}
+
+		sprintf(buf,"%d", _system_configuration.L2_cache_size);
+		add_info( &sysinfo.cpuinfo[cpu], "L2 cache size", buf);
+	}
+
+	sysinfo.flags = _glibtop_sysdeps_sysinfo;
+}
+
+glibtop_sysinfo *
+glibtop_get_sysinfo_s (glibtop *server)
+{
+	static int first_time = 1;
+
+	if (first_time)
+	{
+		init_sysinfo();
+		first_time = 0;
+	}
+
+	return &sysinfo;
+}

sysdeps/aix/uptime.c

@@ -0,0 +1,73 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/uptime.h>
+
+#include <glibtop/cpu.h>
+
+#include <glibtop_suid.h>
+
+static const unsigned long _glibtop_sysdeps_uptime =
+(1L << GLIBTOP_UPTIME_UPTIME) + (1L << GLIBTOP_UPTIME_IDLETIME);
+
+static const unsigned long _required_cpu_flags =
+(1L << GLIBTOP_CPU_TOTAL) + (1L << GLIBTOP_CPU_IDLE) +
+(1L << GLIBTOP_CPU_FREQUENCY);
+
+/* Init function. */
+
+void
+glibtop_init_uptime_p (glibtop *server)
+{
+	server->sysdeps.uptime = _glibtop_sysdeps_uptime;
+}
+
+/* Provides uptime and idle time. */
+
+void
+glibtop_get_uptime_p (glibtop *server, glibtop_uptime *buf)
+{
+	glibtop_cpu cpu;
+
+	glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_UPTIME), 0);
+	
+	memset (buf, 0, sizeof (glibtop_uptime));
+
+	/* We simply calculate it from the CPU usage. */
+
+	glibtop_get_cpu_p (server, &cpu);
+
+	/* Make sure all required fields are present. */
+
+	if ((cpu.flags & _required_cpu_flags) != _required_cpu_flags)
+		return;
+
+	/* Calculate values. */
+
+	buf->uptime = (double) cpu.total / (double) cpu.frequency;
+	buf->idletime = (double) cpu.idle / (double) cpu.frequency;
+
+	buf->flags = _glibtop_sysdeps_uptime;
+}

sysdeps/aix/utils.c

@@ -0,0 +1,141 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <nlist.h>
+
+#include <procinfo.h>
+#include <sys/proc.h>
+#include <sys/vminfo.h>
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/xmalloc.h>
+#include "glibtop_suid.h"
+#include "utils.h"
+
+#ifndef HAVE_VMGETINFO
+#include <dlfcn.h>
+typedef int (*vmgetinfo_proto)(void *out, int command, int arg);
+#endif
+
+off_t
+_glibtop_get_kmem_offset(glibtop* server, char* kname)
+{
+	int result;
+	struct nlist kernelnames[] =
+		{ {NULL, 0, 0, 0, 0, 0},
+		  {NULL, 0, 0, 0, 0, 0},
+		};
+
+	kernelnames[0]._n._n_name = kname;
+
+	glibtop_suid_enter(server);
+
+	result = knlist(kernelnames, 1, sizeof(struct nlist));
+
+	glibtop_suid_leave(server);
+
+	if (result == -1)
+	{
+		return -1;
+	}
+
+	return kernelnames[0].n_value;
+}
+
+int
+_glibtop_get_kmem_info(glibtop* server, off_t offset, void* buf, size_t len)
+{
+	int result;
+
+	glibtop_suid_enter(server);
+
+	lseek(server->machine.kmem_fd, offset, SEEK_SET);
+
+	result = read(server->machine.kmem_fd, buf, len);
+
+        glibtop_suid_leave(server);
+
+	return result;
+}
+
+struct procsinfo*
+_glibtop_get_procinfo (glibtop *server, pid_t pid)
+{
+	int result;
+	pid_t current;
+	static int first_time = 1;
+
+	/* test if procsinfo already found */
+
+	if ((server->machine.last_pinfo.pi_pid == pid) && (!first_time))
+	{
+		return &server->machine.last_pinfo;
+	}
+
+	/* seek procsinfo if given pid */
+
+	first_time = 0;
+	current = 0;
+	while ((result =  getprocs( &server->machine.last_pinfo
+				  , sizeof(struct procsinfo)
+				  , NULL, 0, &current, 1)) == 1)
+	{
+
+		if (pid == server->machine.last_pinfo.pi_pid)
+		{
+			return &server->machine.last_pinfo;
+		}
+	}
+	return NULL;
+}
+
+#ifndef HAVE_VMGETINFO
+int
+_glibtop_vmgetinfo (void *out, int command, int arg)
+{
+	void* handle;
+
+	static vmgetinfo_proto kern_vmgetinfo = NULL;
+
+	if (kern_vmgetinfo == NULL)
+	{
+		handle = dlopen("/unix", RTLD_NOW | RTLD_GLOBAL);
+		if (handle == NULL)
+		{
+			return -1;
+		}
+
+		kern_vmgetinfo = dlsym( handle, "vmgetinfo");
+
+		dlclose(handle);
+
+		if (kern_vmgetinfo == NULL)
+		{
+			return -1;
+		}
+	}
+
+	return kern_vmgetinfo(out, command, arg);
+}
+#endif

sysdeps/aix/utils.h

@@ -0,0 +1,45 @@
+/* $Id$ */
+
+/* 
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, March 1999.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#ifndef __UTILS_H__
+#define __UTILS_H__
+
+BEGIN_LIBGTOP_DECLS
+
+extern off_t 
+_glibtop_get_kmem_offset(glibtop* server, char* kname);
+
+extern int
+_glibtop_get_kmem_info(glibtop* server, off_t offset, void* buf, size_t len);
+
+extern struct procsinfo*
+_glibtop_get_procinfo (glibtop *server, pid_t pid);
+
+#ifndef HAVE_VMGETINFO
+extern  int
+_glibtop_vmgetinfo (void *out, int command, int arg);
+#endif
+
+END_LIBGTOP_DECLS
+
+#endif /* __UTILS_H__ */

sysdeps/common/error.c

@@ -0,0 +1,88 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop/error.h>
+
+#define DEFAULT_NAME	"LibGTop-Server"
+
+/* Prints error message and exits. */
+
+static void
+print_server_name (glibtop *server)
+{
+	fprintf (stderr, "%s: ", server ? 
+		 (server->name ? server->name : DEFAULT_NAME)
+		 : DEFAULT_NAME);
+}
+
+void
+glibtop_error_vr (glibtop *server, char *format, va_list args)
+{
+	print_server_name (server);	
+	vfprintf (stderr, format, args);
+	fprintf (stderr, "\n");
+
+#ifdef LIBGTOP_ENABLE_DEBUG
+	abort ();
+#else
+	exit (1);
+#endif
+}
+
+void
+glibtop_error_io_vr (glibtop *server, char *format, int error, va_list args)
+{
+	print_server_name (server);
+	vfprintf (stderr, format, args);
+	fprintf (stderr, ": %s\n", strerror (error));
+
+#ifdef LIBGTOP_ENABLE_DEBUG
+	abort ();
+#else
+	exit (1);
+#endif
+}
+
+void
+glibtop_warn_vr (glibtop *server, char *format, va_list args)
+{
+	print_server_name (server);
+	vfprintf (stderr, format, args);
+	fprintf (stderr, "\n");
+
+#ifdef LIBGTOP_FATAL_WARNINGS
+	abort ();
+#endif
+}
+
+void
+glibtop_warn_io_vr (glibtop *server, char *format, int error, va_list args)
+{
+	print_server_name (server);
+	vfprintf (stderr, format, args);
+	fprintf (stderr, ": %s\n", strerror (error));
+
+#ifdef LIBGTOP_FATAL_WARNINGS
+	abort ();
+#endif
+}

sysdeps/common/gnuslib.c

@@ -0,0 +1,375 @@
+/* -*-C-*-
+ * Common library code for the GNU Emacs server and client.
+ * 
+ * This file is part of GNU Emacs.
+ * 
+ * Copying is permitted under those conditions described by the GNU
+ * General Public License.
+ * 
+ * Copyright (C) 1989 Free Software Foundation, Inc.
+ * 
+ * Author: Andy Norman (ange@hplb.hpl.hp.com), based on 
+ * 'etc/server.c' and 'etc/emacsclient.c' from the 18.52 GNU
+ * Emacs distribution.
+ * 
+ * Please mail bugs and suggestions to the author at the above address.
+ */
+
+/* HISTORY 
+ * 11-Nov-1990                bristor@simba   
+ *    Added EOT stuff.
+ */
+
+/*
+ * This file incorporates new features added by Bob Weiner <weiner@mot.com>,
+ * Darrell Kindred <dkindred@cmu.edu> and Arup Mukherjee <arup@cmu.edu>.
+ * Please see the note at the end of the README file for details.
+ *
+ * (If gnuserv came bundled with your emacs, the README file is probably
+ * ../etc/gnuserv.README relative to the directory containing this file)
+ */
+
+#include <glibtop.h>
+#include <glibtop/gnuserv.h>
+
+#include <fcntl.h>
+
+#ifdef UNIX_DOMAIN_SOCKETS
+static int connect_to_unix_server (void);
+#endif
+
+#ifdef INTERNET_DOMAIN_SOCKETS
+static int connect_to_internet_server (const char *serverhost, u_short port);
+#endif
+
+/* On some systems, e.g. DGUX, inet_addr returns a 'struct in_addr'. */
+#ifdef HAVE_BROKEN_INET_ADDR
+#define IN_ADDR struct in_addr
+#define NUMERIC_ADDR_ERROR (numeric_addr.s_addr == 0xffffffff)
+#else
+#if (LONGBITS > 32)
+#define IN_ADDR unsigned int
+#else
+#define IN_ADDR unsigned long
+#endif
+#define NUMERIC_ADDR_ERROR (numeric_addr == (IN_ADDR) 0xffffffff)
+#endif
+
+#include <arpa/inet.h>
+
+int
+glibtop_make_connection (hostarg, portarg, s)
+     const char *hostarg;
+     int portarg;
+     int *s;
+{
+#ifdef INTERNET_DOMAIN_SOCKETS
+	char *ptr;
+
+	if (hostarg == NULL)
+		hostarg = getenv ("LIBGTOP_HOST");
+	if (portarg == 0 && (ptr = getenv ("LIBGTOP_PORT")) != NULL)
+		portarg = atoi (ptr);
+#endif
+
+	if (hostarg != NULL) {
+		/* hostname was given explicitly, via cmd line arg or
+		 * LIBGTOP_HOST,  * so obey it. */
+#ifdef UNIX_DOMAIN_SOCKETS
+		if (!strcmp (hostarg, "unix")) {
+			*s = connect_to_unix_server ();
+			return (int) CONN_UNIX;
+		}
+#endif /* UNIX_DOMAIN_SOCKETS */
+#ifdef INTERNET_DOMAIN_SOCKETS
+		*s = connect_to_internet_server (hostarg, portarg);
+		return (int) CONN_INTERNET;
+#endif
+	} else {
+		/* no hostname given.  Use unix-domain/sysv-ipc, or *
+		 * internet-domain connection to local host if they're not
+		 * available. */
+#if   defined(UNIX_DOMAIN_SOCKETS)
+		*s = connect_to_unix_server ();
+		return (int) CONN_UNIX;
+#elif defined(INTERNET_DOMAIN_SOCKETS)
+		{
+			char localhost[HOSTNAMSZ];
+
+			gethostname (localhost, HOSTNAMSZ);	/* use this
+								 * host by
+								 * default */
+			*s = connect_to_internet_server (localhost, portarg);
+			return (int) CONN_INTERNET;
+		}
+#endif /* IPC type */
+	}
+}
+
+#if defined(INTERNET_DOMAIN_SOCKETS) || defined(UNIX_DOMAIN_SOCKETS)
+/*
+ * send_string -- send string to socket.
+ */
+#if 0
+static void
+send_string (s, msg)
+     int s;
+     const char *msg;
+{
+#if 0
+	if (send (s, msg, strlen (msg), 0) < 0) {
+		perror (progname);
+		fprintf (stderr, "%s: unable to send\n", progname);
+		exit (1);
+	};			/* if */
+#else
+	int len, left = strlen (msg);
+
+	while (left > 0) {
+		if ((len = write (s, msg, min2 (left, GSERV_BUFSZ))) < 0) {
+			/* XEmacs addition: robertl@arnet.com */
+			if (errno == EPIPE) {
+				return;
+			}
+			perror (progname);
+			fprintf (stderr, "%s: unable to send\n", progname);
+			exit (1);
+		};		/* if */
+		left -= len;
+		msg += len;
+	};			/* while */
+#endif
+}				/* send_string */
+
+/*
+ * read_line -- read a \n terminated line from a socket
+ */
+static int
+read_line (int s, char *dest)
+{
+	int length;
+	int offset = 0;
+	char buffer[GSERV_BUFSZ + 1];
+
+	while ((length = read (s, buffer + offset, 1) > 0) && buffer[offset] != '\n'
+	       && buffer[offset] != EOT_CHR) {
+		offset += length;
+		if (offset >= GSERV_BUFSZ)
+			break;
+	}
+	buffer[offset] = '\0';
+	strcpy (dest, buffer);
+	return 1;
+}				/* read_line */
+#endif
+#endif /* INTERNET_DOMAIN_SOCKETS || UNIX_DOMAIN_SOCKETS */
+
+
+#ifdef UNIX_DOMAIN_SOCKETS
+/*
+ * connect_to_unix_server -- establish connection with server process via a unix-
+ * domain socket. Returns socket descriptor for server
+ * if successful.
+ */
+static int
+connect_to_unix_server (void)
+{
+	int s;			/* connected socket descriptor */
+	struct sockaddr_un server;	/* for unix connections */
+
+	if ((s = socket (AF_UNIX, SOCK_STREAM, 0)) < 0)
+		glibtop_error_io ("unable to create socket");
+
+	server.sun_family = AF_UNIX;
+#ifdef HIDE_UNIX_SOCKET
+	sprintf (server.sun_path, "/tmp/lgtddir%d/lgtd", (int) geteuid ());
+#else /* HIDE_UNIX_SOCKET */
+	sprintf (server.sun_path, "/tmp/lgtd%d", (int) geteuid ());
+#endif /* HIDE_UNIX_SOCKET */
+	if (connect (s, (struct sockaddr *) &server, strlen (server.sun_path) + 2) < 0)
+		glibtop_error_io ("unable to connect to local");
+
+	return (s);
+
+}				/* connect_to_unix_server */
+#endif /* UNIX_DOMAIN_SOCKETS */
+
+
+#ifdef INTERNET_DOMAIN_SOCKETS
+/*
+ * internet_addr -- return the internet addr of the hostname or
+ * internet address passed. Return -1 on error.
+ */
+long 
+glibtop_internet_addr (host)
+     const char *host;
+{
+	struct hostent *hp;	/* pointer to host info for remote host */
+	IN_ADDR numeric_addr;	/* host address */
+
+	numeric_addr = inet_addr (host);
+	if (!NUMERIC_ADDR_ERROR)
+		return numeric_addr;
+	else if ((hp = gethostbyname (host)) != NULL)
+		return ((struct in_addr *) (hp->h_addr))->s_addr;
+	else {
+		glibtop_warn_io ("gethostbyname (%s)", host);
+		return -1;
+	}
+
+}				/* glibtop_internet_addr  */
+
+#ifdef AUTH_MAGIC_COOKIE
+#include <X11/X.h>
+#include <X11/Xauth.h>
+
+static Xauth *server_xauth = NULL;
+
+#endif
+
+/*
+ * connect_to_internet_server -- establish connection with server process via 
+ * an internet domain socket. Returns socket
+ * descriptor for server if successful.
+ */
+static int
+connect_to_internet_server (const char *serverhost, u_short port)
+{
+	int s;			/* connected socket descriptor */
+	struct servent *sp;	/* pointer to service information */
+	struct sockaddr_in peeraddr_in;		/* for peer socket address */
+	char buf[512];		/* temporary buffer */
+
+	/* clear out address structures */
+	memset ((char *) &peeraddr_in, 0, sizeof (struct sockaddr_in));
+
+	/* Set up the peer address to which we will connect. */
+	peeraddr_in.sin_family = AF_INET;
+
+	/* look up the server host's internet address */
+	peeraddr_in.sin_addr.s_addr = glibtop_internet_addr (serverhost);
+	if ((long) peeraddr_in.sin_addr.s_addr == -1)
+		glibtop_error ("unable to find %s in /etc/hosts or from YP", serverhost);
+
+	if (port == 0) {
+		if ((sp = getservbyname ("gtopd", "tcp")) == NULL)
+			peeraddr_in.sin_port = htons (DEFAULT_PORT + getuid ());
+		else
+			peeraddr_in.sin_port = sp->s_port;
+	}
+	/* if */ 
+	else
+		peeraddr_in.sin_port = htons (port);
+
+	/* Create the socket. */
+	if ((s = socket (AF_INET, SOCK_STREAM, 0)) == -1)
+		glibtop_error_io ("unable to create socket");
+
+	/* Try to connect to the remote server at the address * which was
+	 * just built into peeraddr. */
+	if (connect (s, (struct sockaddr *) &peeraddr_in,
+		     sizeof (struct sockaddr_in)) == -1)
+		  glibtop_error_io ("unable to connect to remote");
+
+#ifdef AUTH_MAGIC_COOKIE
+
+	/* send credentials using MIT-MAGIC-COOKIE-1 protocol */
+
+	sprintf (buf, "%d", port);
+
+	server_xauth =
+		XauGetAuthByAddr (FamilyInternet,
+				  sizeof (peeraddr_in.sin_addr.s_addr),
+				  (char *) &peeraddr_in.sin_addr.s_addr,
+				  strlen (buf), buf,
+				  strlen (MCOOKIE_X_NAME), MCOOKIE_X_NAME);
+
+	if (server_xauth && server_xauth->data) {
+		sprintf (buf, "%s\n%d\n", MCOOKIE_NAME, server_xauth->data_length);
+		write (s, buf, strlen (buf));
+		write (s, server_xauth->data, server_xauth->data_length);
+
+		return (s);
+	}
+#endif /* AUTH_MAGIC_COOKIE */
+
+	sprintf (buf, "%s\n", DEFAUTH_NAME);
+	write (s, buf, strlen (buf));
+
+	return (s);
+
+}				/* connect_to_internet_server */
+#endif /* INTERNET_DOMAIN_SOCKETS */
+
+
+#if defined(INTERNET_DOMAIN_SOCKETS) || defined(UNIX_DOMAIN_SOCKETS)
+/*
+ * disconnect_from_server -- inform the server that sending has finished, and wait for
+ * its reply.
+ */
+#if 0
+static void
+disconnect_from_server (s, echo)
+     int s;
+     int echo;
+{
+#if 0
+	char buffer[REPLYSIZ + 1];
+
+#else
+	char buffer[GSERV_BUFSZ + 1];
+
+#endif
+	int add_newline = 1;
+	int length;
+
+	send_string (s, EOT_STR);	/* make sure server gets string */
+
+#if !defined (linux)  && !defined (_SCO_DS)
+	/* 
+	 * shutdown is completely hozed under linux. If s is a unix domain socket,
+	 * you'll get EOPNOTSUPP back from it. If s is an internet socket, you get
+	 * a broken pipe when you try to read a bit later. The latter
+	 * problem is fixed for linux versions >= 1.1.46, but the problem
+	 * with unix sockets persists. Sigh.
+	 */
+
+	if (shutdown (s, 1) == -1) {
+		perror (progname);
+		fprintf (stderr, "%s: unable to shutdown socket\n", progname);
+		exit (1);
+	};			/* if */
+#endif
+
+#if 0
+	while ((length = recv (s, buffer, REPLYSIZ, 0)) > 0) {
+		buffer[length] = '\0';
+		if (echo)
+			fputs (buffer, stdout);
+		add_newline = (buffer[length - 1] != '\n');
+	};			/* while */
+#else
+	while ((length = read (s, buffer, GSERV_BUFSZ)) > 0 ||
+	       (length == -1 && errno == EINTR)) {
+		if (length) {
+			buffer[length] = '\0';
+			if (echo) {
+				fputs (buffer, stdout);
+				add_newline = (buffer[length - 1] != '\n');
+			};	/* if */
+		};		/* if */
+	};			/* while */
+#endif
+
+	if (echo && add_newline)
+		putchar ('\n');
+
+	if (length < 0) {
+		perror (progname);
+		fprintf (stderr, "%s: unable to read the reply from the server\n", progname);
+		exit (1);
+	};			/* if */
+
+}				/* disconnect_from_server */
+#endif
+#endif /* INTERNET_DOMAIN_SOCKETS || UNIX_DOMAIN_SOCKETS */

sysdeps/common/inodedb.c

@@ -0,0 +1,117 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/xmalloc.h>
+#include <glibtop/inodedb.h>
+
+#include <pwd.h>
+#include <gdbm.h>
+
+#ifndef SYSTEM_INODEDB
+#define SYSTEM_INODEDB "/usr/var/libgtop/inodedb.db"
+#endif
+
+glibtop_inodedb *
+glibtop_inodedb_open_s (glibtop *server, unsigned databases,
+			unsigned long cachesize)
+{
+	glibtop_inodedb *inodedb;
+	char filename [BUFSIZ];
+	struct passwd *pwd;
+	struct stat statb;
+
+	if (!databases)
+		databases = GLIBTOP_INODEDB_ALL;
+
+	inodedb = glibtop_calloc_r (server, 1, sizeof (glibtop_inodedb));
+
+	if (stat (SYSTEM_INODEDB, &statb))
+		databases &= ~GLIBTOP_INODEDB_SYSTEM;
+
+	if (databases & GLIBTOP_INODEDB_SYSTEM) {
+		inodedb->system_dbf = gdbm_open
+			(SYSTEM_INODEDB, 0, GDBM_READER, 0, 0);
+		if (!inodedb->system_dbf)
+			glibtop_error_io_r
+				(server, "gdbm_open (%s)", SYSTEM_INODEDB);
+	}
+
+	pwd = getpwuid (getuid ());
+	if (!pwd) glibtop_error_io_r (server, "getpwuid");
+	
+	sprintf (filename, "%s/var/libgtop/inodedb.db", pwd->pw_dir);
+	
+	if (stat (filename, &statb))
+		databases &= ~GLIBTOP_INODEDB_USER;
+
+	if (databases & GLIBTOP_INODEDB_USER) {
+		inodedb->user_dbf = gdbm_open
+			(filename, 0, GDBM_READER, 0, 0);
+		if (!inodedb->user_dbf)
+			glibtop_error_io_r
+				(server, "gdbm_open (%s)", filename);
+	}
+
+	return inodedb;
+}
+
+const char *
+glibtop_inodedb_lookup_s (glibtop *server,
+			  glibtop_inodedb *inodedb,
+			  u_int64_t device, u_int64_t inode)
+{
+	glibtop_inodedb_key key;
+	datum d_key, d_content;
+
+	d_key.dptr = (void *) &key;
+	d_key.dsize = sizeof (key);
+
+	key.device = device;
+	key.inode = inode;
+
+	if (inodedb->system_dbf) {
+		d_content = gdbm_fetch (inodedb->system_dbf, d_key);
+		if (d_content.dptr) return d_content.dptr;
+	}
+
+	if (inodedb->user_dbf) {
+		d_content = gdbm_fetch (inodedb->user_dbf, d_key);
+		if (d_content.dptr) return d_content.dptr;
+	}
+
+	return NULL;
+}
+
+void
+glibtop_inodedb_close_s (glibtop *server, glibtop_inodedb *inodedb)
+{
+	if (inodedb->system_dbf)
+		gdbm_close (inodedb->system_dbf);
+	
+	if (inodedb->user_dbf)
+		gdbm_close (inodedb->user_dbf);
+
+	glibtop_free_r (server, inodedb);
+}

sysdeps/common/xmalloc.c

@@ -0,0 +1,72 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop/xmalloc.h>
+
+/* Wrappers to malloc, calloc, realloc ... */
+
+void *
+glibtop_malloc_r (glibtop *server, size_t size)
+{
+	void *buf = malloc (size);
+	
+	if (!buf)
+		glibtop_error_io_r (server, "malloc %d bytes", size);
+	
+	return buf;
+}
+
+void *
+glibtop_calloc_r (glibtop *server, size_t nmemb, size_t size)
+{
+	void *buf = calloc (nmemb, size);
+	
+	if (!buf)
+		glibtop_error_io_r (server, "calloc %d blocks (%d bytes each)",
+				    nmemb, size);
+	
+	return buf;
+}
+
+void *
+glibtop_realloc_r (glibtop *server, void *ptr, size_t size)
+{
+	void *buf = realloc (ptr, size);
+	
+	if (!buf)
+		glibtop_error_io_r (server, "realloc %d bytes", size);
+	
+	return buf;
+}
+
+char *
+glibtop_strdup_r (glibtop *server, const char *string)
+{
+	return strcpy (glibtop_malloc_r (server, strlen (string) + 1), string);
+}
+
+void
+glibtop_free_r (glibtop *server, const void *ptr)
+{
+	if (ptr) free ((void *) ptr);
+}

sysdeps/freebsd/.cvsignore

@@ -0,0 +1,6 @@
+.deps
+.libs
+Makefile
+Makefile.in
+*.lo
+*.la

sysdeps/freebsd/AUTHORS

@@ -0,0 +1,2 @@
+Martin Baulig (martin@home-of-linux.org)
+Josh Sled (jsled@scam.XCF.Berkeley.EDU)

sysdeps/freebsd/ChangeLog

@@ -0,0 +1,188 @@
+2001-10-17  Abel Cheung <maddog@linux.org.hk>
+
+	* Makefile.am: move header to $(includedir)/libgtop-1.0/glibtop.
+
+2001-02-27  Martin Baulig  <baulig@suse.de>
+
+	* netload.c: Comment out the `subnet' field on BSDI; this should
+	make it compile. Bug #13345.
+
+	* shm_limits.c, msg_limits.c, sem_limits.c: Applied a patch
+	from Rolf Grossmann (grossman@securitas.net) for FreeBSD 4.2.
+	Fixes #51334.
+
+2001-02-14  Martin Baulig  <baulig@suse.de>
+
+	* proctime.c (glibtop_get_proc_time_p): Make things work on
+	OpenBSD 2.6; this is basically the same than on NetBSD.
+
+2000-02-13  Martin Baulig  <martin@home-of-linux.org>
+
+	* *.c: kvm_nlist () returns -1 on error, but a positive return value
+	does not necessarily mean failure. Fixes #3302 which was reported by
+	Matthias Scheler some time ago.
+
+1999-10-16  Martin Baulig  <martin@home-of-linux.org>
+
+	Applied all patches from the FreeBSD 3.3 ports collection.
+
+	* swap.c: Only #include <rlist.h> for __FreeBSD_version < 400005.
+
+	* prockernel.c: Make it compile on FreeBSD / alpha.
+
+	* procsignal.c: Some fixes for FreeBSD-current.
+
+1999-10-16  Martin Baulig  <martin@home-of-linux.org>
+
+	* procstate.c (glibtop_get_proc_state_p): Don't use the
+	`GLIBTOP_PROCESS_*' constants for process states for
+	LibGTop 1.0.x.
+
+1999-07-29  Martin Baulig  <martin@home-of-linux.org>
+
+	* proctime.c (glibtop_get_proc_time_p): Fix bug reported by
+	Takis Psarogiannakopoulos: `start_time' are seconds since the
+ 	epoch as it is stated in the manual.
+
+Tue Jun 15 16:04:10 1999 Timur Bakeyev <mc@bat.ru>
+
+	* procuid.c: A fix to a ommitted case, when nor NetBSD, nor  
+	LibGTop >= 1.1.0. This should be investigated closely to cover
+	more cases....
+	
+1999-05-26  Martin Baulig  <martin@home-of-linux.org>
+
+	More NetBSD 1.4 fixes.
+
+	* mem.c, procmap.c, procmem.c: Make this work with the new UVM code.
+
+	[FIXME: This following most likely works on all BSD systems, but
+	this needs to be tested; I made it conditional to NetBSD 1.4 at
+	the moment. Please extend the conditionals to any other systems
+	where this works ...]
+	
+	* procstate.c: Added `ruid' and `rgid' for LibGTop >= 1.1.0.
+	* procuid.c: Added `ngroups' and `groups' for LibGTop >= 1.1.0.
+
+1999-05-25  Martin Baulig  <martin@home-of-linux.org>
+
+	* ppp.c: Make this work on NetBSD.
+
+Thu Apr  8 23:47:29 1999  Timur Bakeyev  <timur@gnu.org>
+
+ 	* cpu.c, mem.c, netload.c, procargs.c, procstate.c, proctime.c,
+ 	sem_limits.c, shm_limits.c, swap.c: Added initial port for BSD/OS
+	(aka BSDI) 2.x and 3.x. 4.x should also(?) work.
+	
+	Still, this port require more close look and extended check.
+
+1999-03-19  Martin Baulig  <martin@home-of-linux.org>
+
+	Added basic support for BSDI. It compiles without problems on
+	BSDI 2.1 and 3.1, but it is *untested* - I'm neither root on
+	the machine nor have I access to /dev/kmem, so I don't know
+	whether it will work.
+
+	You need to give configure the `--enable-hacker-mode' parameter
+	to use the code.
+
+	If someone can verify whether it actually works, please let me
+	know.
+
+1999-03-18  Martin Baulig  <martin@home-of-linux.org>
+
+	* ppp.c: Don't use `sppp.pp_phase' if we don't HAVE_I4B_ACCT.
+	This is an ugly hack until someone tells me which versions have
+	this field and which not.
+
+1999-02-25  Martin Baulig  <martin@home-of-linux.org>
+
+	* prockernel.c, proctime.c: Applied patch Stanislav Grozev for
+	OpenBSD: only include <osreldate.h> for FreeBSD.
+
+1999-02-24  Martin Baulig  <martin@home-of-linux.org>
+
+	* swap.c: Applied another patch from Jeremy Lea to
+	make it work with FreeBSD-current.
+
+1999-02-21  Martin Baulig  <martin@home-of-linux.org>
+
+	* procmap.c, procmem.c: Applied patch from Jeremy Lea.
+
+	* prockernel.c, proctime.c: Applied patch from the FreeBSD 2.2.8
+	ports collection.
+	
+	* procsignal.c: Applied patch from the NetBSD-current ports
+	collection.
+
+1998-12-06  Martin Baulig  <martin@home-of-linux.org>
+
+	* Make it work with OpenBSD 2.4.
+
+1998-12-05  Martin Baulig  <martin@home-of-linux.org>
+
+	* Make it work with NetBSD 1.3.2.
+
+1998-11-17  Martin Baulig  <martin@home-of-linux.org>
+
+	* Make it work with FreeBSD 3.0.
+ 
+1998-11-11  Martin Baulig  <martin@home-of-linux.org>
+
+	* *.c: It does not work to get information about the swapper task
+	on FreeBSD 2.2.6, so we simple return if pid == 0.
+
+1998-10-31  Martin Baulig  <martin@home-of-linux.org>
+
+	* *.c: Use glibtop_warn_io_r () instead of glibtop_error_io_r ().
+
+	* proctime.c, prockernel.c, procargs.c: Don't call kvm_uread () if
+	the /proc filesystem is not mounted.
+
+1998-10-26  Martin Baulig  <martin@home-of-linux.org>
+
+	* netload.c: New file to get network load.
+
+1998-10-26  Martin Baulig  <martin@home-of-linux.org>
+
+	* procargs.c: New file to get command line arguments.
+
+1998-10-25  Martin Baulig  <martin@home-of-linux.org>
+
+	* ppp.c: New file to get PPP/ISDN statistics. Currently this only
+	get ISDN statistics if you have the I4B package.
+
+	To get the number of bytes transferred in/out you need to read the
+	file `misc/i4b_acct.txt' in the LibGTop source directory to see
+	how to enable this.
+
+1998-10-03  Martin Baulig  <martin@home-of-linux.org>
+
+	* procstate.c (glibtop_get_procstate_s): Use correct values for
+	the `state' field.
+	
+	* proclist.c (glibtop_get_proclist_p): Honor the GLIBTOP_EXCLUDE_IDLE
+	and GLIBTOP_EXCLUDE_SYSTEM flags of the `which' parameter.
+
+1998-08-24  Martin Baulig  <martin@home-of-linux.org>
+
+	* *.c (glibtop_init_p): Using correct `(1 << GLIBTOP_SYSDPES_*)'.
+	* cpu.c, mem.c: Removed `const' from sysctl () constants to keep
+	compiler happy.
+
+	* procmem.c:  Added missing call to `glibtop_init_p'.
+
+	* prockernel.c: Casting `nwchan' to `unsigned long' since this
+	normally has the same size than a pointer. Well, is there a
+	FreeBSD for 64bit architectures ?
+
+1998-08-08  Martin Baulig  <martin@home-of-linux.org>
+
+	* swap.c: Added swap usage based upton the source code
+	of `pinfo'.
+
+1998-08-07  Martin Baulig  <martin@home-of-linux.org>
+
+	* *: Imported FreeBSD port of libgtop from Josh Sled.
+
+	* ChangeLog: New file.

sysdeps/freebsd/Makefile.am

@@ -0,0 +1,23 @@
+LINK				= $(LIBTOOL) --mode=link $(CC) $(CFLAGS) $(LDFLAGS) -o $@
+
+INCLUDES			= @INCLUDES@
+
+lib_LTLIBRARIES			= libgtop_sysdeps-2.0.la libgtop_sysdeps_suid-2.0.la
+
+libgtop_sysdeps_2_0_la_SOURCES	= nosuid.c siglist.c
+
+libgtop_sysdeps_2_0_la_LDFLAGS	= $(LT_VERSION_INFO)
+
+libgtop_sysdeps_suid_2_0_la_SOURCES	= open.c close.c siglist.c cpu.c mem.c swap.c \
+				  uptime.c loadavg.c shm_limits.c msg_limits.c \
+				  sem_limits.c proclist.c procstate.c procuid.c \
+				  proctime.c procmem.c procsignal.c prockernel.c \
+				  procsegment.c procargs.c procmap.c netload.c \
+				  ppp.c
+
+libgtop_sysdeps_suid_2_0_la_LDFLAGS	= $(LT_VERSION_INFO)
+
+libgtopinclude_HEADERS		= glibtop_server.h glibtop_machine.h \
+				  glibtop_suid.h
+
+libgtopincludedir		= $(includedir)/libgtop-2.0

sysdeps/freebsd/NOTES

@@ -0,0 +1,10 @@
+sysctl (3)
+/usr/include/sys/vmmeter.h : VM stats
+kvm (3)
+
+CPU stats: /usr/include/sys/dkstat.h
+cp_time_offset = kvm_nlist(...)["_cp_time"].n_value;
+
+"systemwide main memory usage structure"
+sysctl(...)
+

sysdeps/freebsd/close.c

@@ -0,0 +1,31 @@
+/* $Id$ */
+
+/* Copyright (C) 1998 Joshua Sled
+   This file is part of LibGTop 1.0.
+
+   Contributed by Joshua Sled <jsled@xcf.berkeley.edu>, July 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/close.h>
+
+/* Closes pipe to gtop server. */
+
+void
+glibtop_close_p (glibtop *server)
+{ }

sysdeps/freebsd/cpu.c

@@ -0,0 +1,117 @@
+/* $Id$ */
+
+/* Copyright (C) 1998 Joshua Sled
+   This file is part of LibGTop 1.0.
+
+   Contributed by Joshua Sled <jsled@xcf.berkeley.edu>, July 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/cpu.h>
+
+#include <glibtop_suid.h>
+
+static const unsigned long _glibtop_sysdeps_cpu =
+(1L << GLIBTOP_CPU_TOTAL) + (1L << GLIBTOP_CPU_USER) +
+(1L << GLIBTOP_CPU_NICE) + (1L << GLIBTOP_CPU_SYS) +
+(1L << GLIBTOP_CPU_IDLE) + (1L << GLIBTOP_CPU_FREQUENCY);
+
+/* nlist structure for kernel access */
+static struct nlist nlst [] = {
+#ifdef __bsdi__
+	{ "_cpustats" },
+#else
+	{ "_cp_time" },
+#endif
+	{ 0 }
+};
+
+/* MIB array for sysctl */
+static int mib_length=2;
+static int mib [] = { CTL_KERN, KERN_CLOCKRATE };
+
+/* Init function. */
+
+void
+glibtop_init_cpu_p (glibtop *server)
+{
+	if (kvm_nlist (server->machine.kd, nlst) < 0) {
+		glibtop_warn_io_r (server, "kvm_nlist (cpu)");
+		return;
+	}
+
+	/* Set this only if kvm_nlist () succeeded. */
+	server->sysdeps.cpu = _glibtop_sysdeps_cpu;
+}
+
+/* Provides information about cpu usage. */
+
+void
+glibtop_get_cpu_p (glibtop *server, glibtop_cpu *buf)
+{
+	long cpts [CPUSTATES];
+	/* sysctl vars*/
+	struct clockinfo ci;
+	size_t length;
+	
+	glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_CPU), 0);
+	
+	memset (buf, 0, sizeof (glibtop_cpu));
+
+	/* If this fails, the nlist may not be valid. */
+	if (server->sysdeps.cpu == 0)
+		return;
+
+	if (kvm_read (server->machine.kd, nlst [0].n_value,
+		      &cpts, sizeof (cpts)) != sizeof (cpts)) {
+		glibtop_warn_io_r (server, "kvm_read (cp_time)");
+		return;
+	}
+	
+	/* Get the clockrate data */
+	length = sizeof (struct clockinfo);
+	if (sysctl (mib, mib_length, &ci, &length, NULL, 0)) {
+		glibtop_warn_io_r (server, "sysctl");
+		return;
+	}
+
+	/* set user time */
+	buf->user = cpts [CP_USER];
+	/* set nice time */
+	buf->nice = cpts [CP_NICE];
+	/* set sys time */
+	buf->sys = cpts [CP_SYS];
+	/* set idle time */
+	buf->idle = cpts [CP_IDLE];
+	
+	/* set frequency */
+	/* 
+	   FIXME --  is hz, tick, profhz or stathz wanted?
+	   buf->frequency = sysctl("kern.clockrate", ...); 
+	   
+	   struct clockinfo
+	*/
+	buf->frequency = ci.hz;
+	/* set total */
+	buf->total = cpts [CP_USER] + cpts [CP_NICE]
+		+ cpts [CP_SYS] + cpts [CP_IDLE];
+
+	/* Set the flags last. */
+	buf->flags = _glibtop_sysdeps_cpu;
+}

sysdeps/freebsd/glibtop_machine.h

@@ -0,0 +1,59 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#ifndef __GLIBTOP_MACHINE_H__
+#define __GLIBTOP_MACHINE_H__
+
+#include <sys/param.h>
+#include <nlist.h>
+#include <kvm.h>
+#include <sys/dkstat.h>
+#include <time.h>
+#include <sys/user.h>
+#include <sys/types.h>
+#include <sys/sysctl.h>
+
+#include <fcntl.h>
+
+#ifdef __FreeBSD__
+#include <osreldate.h>
+#endif
+
+BEGIN_LIBGTOP_DECLS
+
+typedef struct _glibtop_machine glibtop_machine;
+
+struct _glibtop_machine
+{
+	uid_t uid, euid;
+	gid_t gid, egid;
+	
+	/* The kernel descriptor, used by kvm_* calls.  We keep and re-use
+	 * it rather than re-getting it for almost all function
+	 * invocations. */
+	kvm_t *kd;
+};
+
+END_LIBGTOP_DECLS
+
+#endif /* __GLIBTOP_MACHINE_H__ */

sysdeps/freebsd/glibtop_server.h

@@ -0,0 +1,52 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#ifndef __GLIBTOP_SERVER_H__
+#define __GLIBTOP_SERVER_H__
+
+BEGIN_LIBGTOP_DECLS
+
+#define GLIBTOP_SUID_CPU		(1 << GLIBTOP_SYSDEPS_CPU)
+#define GLIBTOP_SUID_MEM		(1 << GLIBTOP_SYSDEPS_MEM)
+#define GLIBTOP_SUID_SWAP		(1 << GLIBTOP_SYSDEPS_SWAP)
+#define GLIBTOP_SUID_UPTIME		(1 << GLIBTOP_SYSDEPS_UPTIME)
+#define GLIBTOP_SUID_LOADAVG		(1 << GLIBTOP_SYSDEPS_LOADAVG)
+#define GLIBTOP_SUID_SHM_LIMITS		(1 << GLIBTOP_SYSDEPS_SHM_LIMITS)
+#define GLIBTOP_SUID_MSG_LIMITS		(1 << GLIBTOP_SYSDEPS_MSG_LIMITS)
+#define GLIBTOP_SUID_SEM_LIMITS		(1 << GLIBTOP_SYSDEPS_SEM_LIMITS)
+#define GLIBTOP_SUID_PROCLIST		(1 << GLIBTOP_SYSDEPS_PROCLIST)
+#define GLIBTOP_SUID_PROC_STATE		(1 << GLIBTOP_SYSDEPS_PROC_STATE)
+#define GLIBTOP_SUID_PROC_UID		(1 << GLIBTOP_SYSDEPS_PROC_UID)
+#define GLIBTOP_SUID_PROC_MEM		(1 << GLIBTOP_SYSDEPS_PROC_MEM)
+#define GLIBTOP_SUID_PROC_TIME		(1 << GLIBTOP_SYSDEPS_PROC_TIME)
+#define GLIBTOP_SUID_PROC_SIGNAL	(1 << GLIBTOP_SYSDEPS_PROC_SIGNAL)
+#define GLIBTOP_SUID_PROC_KERNEL	(1 << GLIBTOP_SYSDEPS_PROC_KERNEL)
+#define GLIBTOP_SUID_PROC_SEGMENT	(1 << GLIBTOP_SYSDEPS_PROC_SEGMENT)
+#define GLIBTOP_SUID_PROC_ARGS		(1 << GLIBTOP_SYSDEPS_PROC_ARGS)
+#define GLIBTOP_SUID_PROC_MAP		(1 << GLIBTOP_SYSDEPS_PROC_MAP)
+#define GLIBTOP_SUID_NETLOAD		(1 << GLIBTOP_SYSDEPS_NETLOAD)
+#define GLIBTOP_SUID_PPP		(1 << GLIBTOP_SYSDEPS_PPP)
+
+END_LIBGTOP_DECLS
+
+#endif

sysdeps/freebsd/glibtop_suid.h

@@ -0,0 +1,58 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#ifndef __GLIBTOP_SUID_H__
+#define __GLIBTOP_SUID_H__
+
+BEGIN_LIBGTOP_DECLS
+
+#if _IN_LIBGTOP
+#include <sys/param.h>
+#endif
+
+#define KI_PROC(ki) (&(ki))->kp_proc)
+#define KI_EPROC(ki) (&(ki))->kp_eproc)
+
+#define FORCEUREAD	1
+#define UREADOK(ki)	(FORCEUREAD || (KI_PROC(ki)->p_flag & P_INMEM))
+
+static inline void glibtop_suid_enter (glibtop *server) {
+	setregid (server->machine.gid, server->machine.egid);
+};
+
+static inline void glibtop_suid_leave (glibtop *server) {
+	if (setregid (server->machine.egid, server->machine.gid))
+		_exit (1);
+};
+
+void
+glibtop_init_p (glibtop *server, const unsigned long features,
+		const unsigned flags);
+void
+glibtop_open_p (glibtop *server, const char *program_name,
+		const unsigned long features,
+		const unsigned flags);
+
+END_LIBGTOP_DECLS
+
+#endif

sysdeps/freebsd/init.c

@@ -0,0 +1,45 @@
+/* $Id$ */
+
+/* Copyright (C) 1998 Joshua Sled
+   This file is part of LibGTop 1.0.
+
+   Contributed by Joshua Sled <jsled@xcf.berkeley.edu>, July 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/open.h>
+
+static glibtop	_glibtop_global_server;
+glibtop		*glibtop_global_server = NULL;
+
+glibtop *
+glibtop_init_r (glibtop **server,
+		const unsigned long features,
+		const unsigned flags)
+{
+	if (*server != NULL)
+		return *server;
+
+	if (glibtop_global_server == NULL) {
+		glibtop_global_server = &_glibtop_global_server;
+		glibtop_open (glibtop_global_server, "glibtop",
+			      features, flags);
+	}
+	
+	return *server = glibtop_global_server;
+}

sysdeps/freebsd/loadavg.c

@@ -0,0 +1,60 @@
+/* $Id$ */
+
+/* Copyright (C) 1998 Joshua Sled
+   This file is part of LibGTop 1.0.
+
+   Contributed by Joshua Sled <jsled@xcf.berkeley.edu>, July 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/loadavg.h>
+
+#include <glibtop_suid.h>
+
+static const unsigned long _glibtop_sysdeps_loadavg =
+(1L << GLIBTOP_LOADAVG_LOADAVG);
+
+/* Init function. */
+
+void
+glibtop_init_loadavg_p (glibtop *server)
+{
+	server->sysdeps.loadavg = _glibtop_sysdeps_loadavg;
+}
+
+/* Provides load averange. */
+
+void
+glibtop_get_loadavg_p (glibtop *server, glibtop_loadavg *buf)
+{
+	double ldavg[3]; 
+	int i;
+
+	glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_LOADAVG), 0);
+	
+	memset (buf, 0, sizeof (glibtop_loadavg));
+
+	getloadavg (ldavg, 3);
+  
+	/* fill in the struct */
+	buf->flags = _glibtop_sysdeps_loadavg;
+	for (i = 0; i < 3; i++) {
+		buf->loadavg [i] = ldavg [i];
+	} /* end for */
+}

sysdeps/freebsd/mem.c

@@ -0,0 +1,222 @@
+/* $Id$ */
+
+/* Copyright (C) 1998 Joshua Sled
+   This file is part of LibGTop 1.0.
+
+   Contributed by Joshua Sled <jsled@xcf.berkeley.edu>, July 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/mem.h>
+
+#include <glibtop_suid.h>
+
+#include <sys/sysctl.h>
+#include <sys/vmmeter.h>
+#include <vm/vm_param.h>
+
+#if defined(__NetBSD__)  && (__NetBSD_Version__ >= 104000000)
+#include <uvm/uvm_extern.h>
+#endif
+
+static const unsigned long _glibtop_sysdeps_mem =
+(1L << GLIBTOP_MEM_TOTAL) + (1L << GLIBTOP_MEM_USED) +
+(1L << GLIBTOP_MEM_FREE) +
+(1L << GLIBTOP_MEM_SHARED) +
+(1L << GLIBTOP_MEM_BUFFER) +
+#ifdef __FreeBSD__
+(1L << GLIBTOP_MEM_CACHED) +
+#endif
+(1L << GLIBTOP_MEM_USER) + (1L << GLIBTOP_MEM_LOCKED);
+
+#ifndef LOG1024
+#define LOG1024		10
+#endif
+
+/* these are for getting the memory statistics */
+static int pageshift;		/* log base 2 of the pagesize */
+
+/* define pagetok in terms of pageshift */
+#define pagetok(size) ((size) << pageshift)
+
+/* nlist structure for kernel access */
+static struct nlist nlst [] = {
+#if defined(__NetBSD__)  && (__NetBSD_Version__ >= 104000000)
+	{ "_bufpages" },
+	{ 0 }
+#else
+#if defined(__bsdi__)
+	{ "_bufcachemem" },
+#elif defined(__FreeBSD__)
+	{ "_bufspace" },
+#else
+	{ "_bufpages" },
+#endif
+	{ "_cnt" },
+	{ 0 }
+#endif
+};
+
+/* MIB array for sysctl */
+static int mib_length=2;
+#ifdef __bsdi__
+static int mib [] = { CTL_VM, VM_TOTAL };
+#else
+static int mib [] = { CTL_VM, VM_METER };
+#endif
+
+#if defined(__NetBSD__)  && (__NetBSD_Version__ >= 104000000)
+static int mib_uvmexp [] = { CTL_VM, VM_UVMEXP };
+#endif
+
+/* Init function. */
+
+void
+glibtop_init_mem_p (glibtop *server)
+{
+	register int pagesize;
+
+	if (kvm_nlist (server->machine.kd, nlst) < 0) {
+		glibtop_warn_io_r (server, "kvm_nlist (mem)");
+		return;
+	}
+
+	/* get the page size with "getpagesize" and calculate pageshift
+	 * from it */
+	pagesize = getpagesize ();
+	pageshift = 0;
+	while (pagesize > 1) {
+		pageshift++;
+		pagesize >>= 1;
+	}
+
+	/* we only need the amount of log(2)1024 for our conversion */
+	pageshift -= LOG1024;
+
+	server->sysdeps.mem = _glibtop_sysdeps_mem;
+}
+
+void
+glibtop_get_mem_p (glibtop *server, glibtop_mem *buf)
+{
+	struct vmtotal vmt;
+	size_t length_vmt;
+#if defined(__NetBSD__)  && (__NetBSD_Version__ >= 104000000)
+	struct uvmexp uvmexp;
+	size_t length_uvmexp;
+#else
+	struct vmmeter vmm;
+#endif
+	u_int v_used_count;
+	u_int v_total_count;
+	u_int v_free_count;
+	int bufspace;
+
+	glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_MEM), 0);
+	
+	memset (buf, 0, sizeof (glibtop_mem));
+
+	if (server->sysdeps.mem == 0)
+		return;
+
+	/* [FIXME: On FreeBSD 2.2.6, sysctl () returns an incorrect
+	 *         value for `vmt.vm'. We use some code from Unix top
+	 *         here.] */
+
+	/* Get the data from sysctl */
+	length_vmt = sizeof (vmt);
+	if (sysctl (mib, 2, &vmt, &length_vmt, NULL, 0)) {
+		glibtop_warn_io_r (server, "sysctl (vmt)");
+		return;
+	}
+
+#if defined(__NetBSD__)  && (__NetBSD_Version__ >= 104000000)
+	length_uvmexp = sizeof (uvmexp);
+	if (sysctl (mib_uvmexp, 2, &uvmexp, &length_uvmexp, NULL, 0)) {
+		glibtop_warn_io_r (server, "sysctl (uvmexp)");
+		return;
+	}
+#else
+	/* Get the data from kvm_* */
+	if (kvm_read (server->machine.kd, nlst[1].n_value,
+		      &vmm, sizeof (vmm)) != sizeof (vmm)) {
+		glibtop_warn_io_r (server, "kvm_read (cnt)");
+		return;
+	}
+#endif
+
+	if (kvm_read (server->machine.kd, nlst[0].n_value,
+		      &bufspace, sizeof (bufspace)) != sizeof (bufspace)) {
+		glibtop_warn_io_r (server, "kvm_read (bufspace)");
+		return;
+	}
+  
+	/* convert memory stats to Kbytes */
+
+#if defined(__FreeBSD__)
+	v_total_count = vmm.v_page_count;
+#else
+#if defined(__NetBSD__)  && (__NetBSD_Version__ >= 104000000)
+	v_total_count = uvmexp.reserve_kernel +
+		uvmexp.reserve_pagedaemon +
+		uvmexp.free + uvmexp.wired + uvmexp.active +
+		uvmexp.inactive;
+#else
+	v_total_count = vmm.v_kernel_pages +
+		vmm.v_free_count + vmm.v_wire_count +
+		vmm.v_active_count + vmm.v_inactive_count;
+#endif
+#endif
+
+#if defined(__NetBSD__)  && (__NetBSD_Version__ >= 104000000)
+	v_used_count = uvmexp.active + uvmexp.inactive;
+	v_free_count = uvmexp.free;
+#else
+	v_used_count = vmm.v_active_count + vmm.v_inactive_count;
+	v_free_count = vmm.v_free_count;
+#endif
+
+	buf->total = (u_int64_t) pagetok (v_total_count) << LOG1024;
+	buf->used  = (u_int64_t) pagetok (v_used_count) << LOG1024;
+	buf->free  = (u_int64_t) pagetok (v_free_count) << LOG1024;
+
+#ifdef __FreeBSD__
+	buf->cached = (u_int64_t) pagetok (vmm.v_cache_count) << LOG1024;
+#endif
+
+#if defined(__NetBSD__)  && (__NetBSD_Version__ >= 104000000)
+	buf->locked = (u_int64_t) pagetok (uvmexp.wired) << LOG1024;
+#else
+	buf->locked = (u_int64_t) pagetok (vmm.v_wire_count) << LOG1024;
+#endif
+
+	buf->shared = (u_int64_t) pagetok (vmt.t_rmshr) << LOG1024;
+
+#if __FreeBSD__
+	buf->buffer = (u_int64_t) bufspace;
+#else
+	buf->buffer = (u_int64_t) pagetok (bufspace) << LOG1024;
+#endif
+
+	/* user */
+	buf->user = buf->total - buf->free - buf->shared - buf->buffer;
+
+	/* Set the values to return */
+	buf->flags = _glibtop_sysdeps_mem;
+}

sysdeps/freebsd/msg_limits.c

@@ -0,0 +1,115 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, August 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/msg_limits.h>
+
+#include <glibtop_suid.h>
+
+#if (defined __bsdi__) && (_BSDI_VERSION < 199700)
+/* Older versions of BSDI don't seem to have this. */
+
+void
+glibtop_init_msg_limits_p (glibtop *server)
+{ }
+
+void
+glibtop_get_msg_limits_p (glibtop *server, glibtop_msg_limits *buf)
+{
+        glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_MSG_LIMITS), 0);
+
+        memset (buf, 0, sizeof (glibtop_msg_limits));
+}
+
+#else
+
+/* #define KERNEL to get declaration of `struct msginfo'. */
+
+#if (defined(__FreeBSD__) && (__FreeBSD_version < 410000)) || (defined __bsdi__)
+#define KERNEL 1
+#else
+#define _KERNEL 1
+#endif
+
+#include <sys/ipc.h>
+#include <sys/msg.h>
+
+static const unsigned long _glibtop_sysdeps_msg_limits =
+(1L << GLIBTOP_IPC_MSGMAX) + (1L << GLIBTOP_IPC_MSGMNI) +
+(1L << GLIBTOP_IPC_MSGMNB) + (1L << GLIBTOP_IPC_MSGTQL) +
+(1L << GLIBTOP_IPC_MSGSSZ);
+
+/* The values in this structure never change at runtime, so we only
+ * read it once during initialization. We have to use the name `_msginfo'
+ * since `msginfo' is already declared external in <sys/msg.h>. */
+static struct msginfo _msginfo;
+  
+/* nlist structure for kernel access */
+static struct nlist nlst [] = {
+	{ "_msginfo" },
+	{ 0 }
+};
+
+/* Init function. */
+
+void
+glibtop_init_msg_limits_p (glibtop *server)
+{
+	if (kvm_nlist (server->machine.kd, nlst) < 0) {
+		glibtop_warn_io_r (server, "kvm_nlist (msg_limits)");
+		return;
+	}
+	
+	if (kvm_read (server->machine.kd, nlst [0].n_value,
+		      &_msginfo, sizeof (_msginfo)) != sizeof (_msginfo)) {
+		glibtop_warn_io_r (server, "kvm_read (msginfo)");
+		return;
+	}
+
+	server->sysdeps.msg_limits = _glibtop_sysdeps_msg_limits;
+}
+
+/* Provides information about sysv ipc limits. */
+
+void
+glibtop_get_msg_limits_p (glibtop *server, glibtop_msg_limits *buf)
+{
+	glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_MSG_LIMITS), 0);
+	
+	memset (buf, 0, sizeof (glibtop_msg_limits));
+
+	if (server->sysdeps.msg_limits == 0)
+		return;
+
+	buf->msgmax = _msginfo.msgmax;
+	buf->msgmni = _msginfo.msgmni;
+	buf->msgmnb = _msginfo.msgmnb;
+	buf->msgtql = _msginfo.msgtql;
+	buf->msgssz = _msginfo.msgtql;
+	
+	buf->flags = _glibtop_sysdeps_msg_limits; 
+}
+
+#endif /* either a newer BSDI or no BSDI at all. */
+

sysdeps/freebsd/netload.c

@@ -0,0 +1,219 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, October 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/netload.h>
+
+#include <glibtop_suid.h>
+
+#include <net/if.h>
+#include <net/if_dl.h>
+#include <net/if_types.h>
+
+#ifdef HAVE_NET_IF_VAR_H
+#include <net/if_var.h>
+#endif
+
+#include <netinet/in.h>
+#include <netinet/in_var.h>
+
+static const unsigned long _glibtop_sysdeps_netload =
+(1L << GLIBTOP_NETLOAD_IF_FLAGS) +
+(1L << GLIBTOP_NETLOAD_MTU) +
+#if !defined(__bsdi__)
+(1L << GLIBTOP_NETLOAD_SUBNET) +
+#endif
+(1L << GLIBTOP_NETLOAD_ADDRESS) +
+(1L << GLIBTOP_NETLOAD_PACKETS_IN) +
+(1L << GLIBTOP_NETLOAD_PACKETS_OUT) +
+(1L << GLIBTOP_NETLOAD_PACKETS_TOTAL) +
+(1L << GLIBTOP_NETLOAD_BYTES_IN) +
+(1L << GLIBTOP_NETLOAD_BYTES_OUT) +
+(1L << GLIBTOP_NETLOAD_BYTES_TOTAL) +
+(1L << GLIBTOP_NETLOAD_ERRORS_IN) +
+(1L << GLIBTOP_NETLOAD_ERRORS_OUT) +
+(1L << GLIBTOP_NETLOAD_ERRORS_TOTAL) +
+(1L << GLIBTOP_NETLOAD_COLLISIONS);
+
+/* nlist structure for kernel access */
+static struct nlist nlst [] = {
+    { "_ifnet" },
+    { 0 }
+};
+
+/* Init function. */
+
+void
+glibtop_init_netload_p (glibtop *server)
+{
+    server->sysdeps.netload = _glibtop_sysdeps_netload;
+
+    if (kvm_nlist (server->machine.kd, nlst) < 0)
+	glibtop_error_io_r (server, "kvm_nlist");
+}
+
+/* Provides Network statistics. */
+
+void
+glibtop_get_netload_p (glibtop *server, glibtop_netload *buf,
+		       const char *interface)
+{
+    struct ifnet ifnet;
+    u_long ifnetaddr, ifnetfound, ifaddraddr;
+    struct sockaddr *sa;
+    char tname [16];
+
+    union {
+	struct ifaddr ifa;
+	struct in_ifaddr in;
+    } ifaddr;
+    
+    glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_NETLOAD), 0);
+	
+    memset (buf, 0, sizeof (glibtop_netload));
+
+    if (kvm_read (server->machine.kd, nlst [0].n_value,
+		  &ifnetaddr, sizeof (ifnetaddr)) != sizeof (ifnetaddr))
+	glibtop_error_io_r (server, "kvm_read (ifnet)");
+    
+    ifaddraddr = 0;
+    while (ifnetaddr || ifaddraddr) {
+	struct sockaddr_in *sin;
+	register char *cp;
+
+	if (ifaddraddr == 0) {
+	    ifnetfound = ifnetaddr;
+
+	    if (kvm_read (server->machine.kd, ifnetaddr, &ifnet,
+			  sizeof (ifnet)) != sizeof (ifnet))
+		    glibtop_error_io_r (server, "kvm_read (ifnetaddr)");
+
+#if defined(__FreeBSD__) || defined(__bsdi__)
+	    if (kvm_read (server->machine.kd, (u_long) ifnet.if_name,
+			  tname, 16) != 16)
+		    glibtop_error_io_r (server, "kvm_read (if_name)");
+#else
+	    strncpy (tname, ifnet.if_xname, 16);
+	    tname [15] = 0;
+#endif
+
+#if defined(__FreeBSD__) && (__FreeBSD_version >= 300000)
+	    ifaddraddr = (u_long) ifnet.if_addrhead.tqh_first;
+#elif defined(__FreeBSD__) || defined(__bsdi__)
+	    ifaddraddr = (u_long) ifnet.if_addrlist;
+#else
+	    ifaddraddr = (u_long) ifnet.if_addrlist.tqh_first;
+#endif
+	}
+
+	if (ifaddraddr) {
+	    if ((kvm_read (server->machine.kd, ifaddraddr, &ifaddr,
+			   sizeof (ifaddr)) != sizeof (ifaddr)))
+		glibtop_error_io_r (server, "kvm_read (ifaddraddr)");
+	
+#define CP(x) ((char *)(x))
+	    cp = (CP(ifaddr.ifa.ifa_addr) - CP(ifaddraddr)) +
+		CP(&ifaddr); sa = (struct sockaddr *)cp;
+	
+	    if (!strcmp (interface, tname) && (sa->sa_family == AF_INET)) {
+		sin = (struct sockaddr_in *)sa;
+
+		if (ifnet.if_flags & IFF_UP)
+			buf->if_flags |= GLIBTOP_IF_FLAGS_UP;
+		if (ifnet.if_flags & IFF_BROADCAST)
+			buf->if_flags |= GLIBTOP_IF_FLAGS_BROADCAST;
+		if (ifnet.if_flags & IFF_DEBUG)
+			buf->if_flags |= GLIBTOP_IF_FLAGS_DEBUG;
+		if (ifnet.if_flags & IFF_LOOPBACK)
+			buf->if_flags |= GLIBTOP_IF_FLAGS_LOOPBACK;
+		if (ifnet.if_flags & IFF_POINTOPOINT)
+			buf->if_flags |= GLIBTOP_IF_FLAGS_POINTOPOINT;
+		if (ifnet.if_flags & IFF_RUNNING)
+			buf->if_flags |= GLIBTOP_IF_FLAGS_RUNNING;
+		if (ifnet.if_flags & IFF_NOARP)
+			buf->if_flags |= GLIBTOP_IF_FLAGS_NOARP;
+		if (ifnet.if_flags & IFF_PROMISC)
+			buf->if_flags |= GLIBTOP_IF_FLAGS_PROMISC;
+		if (ifnet.if_flags & IFF_ALLMULTI)
+			buf->if_flags |= GLIBTOP_IF_FLAGS_ALLMULTI;
+		if (ifnet.if_flags & IFF_OACTIVE)
+			buf->if_flags |= GLIBTOP_IF_FLAGS_OACTIVE;
+		if (ifnet.if_flags & IFF_SIMPLEX)
+			buf->if_flags |= GLIBTOP_IF_FLAGS_SIMPLEX;
+		if (ifnet.if_flags & IFF_LINK0)
+			buf->if_flags |= GLIBTOP_IF_FLAGS_LINK0;
+		if (ifnet.if_flags & IFF_LINK1)
+			buf->if_flags |= GLIBTOP_IF_FLAGS_LINK1;
+		if (ifnet.if_flags & IFF_LINK2)
+			buf->if_flags |= GLIBTOP_IF_FLAGS_LINK2;
+#ifdef __FreeBSD__
+		if (ifnet.if_flags & IFF_ALTPHYS)
+			buf->if_flags |= GLIBTOP_IF_FLAGS_ALTPHYS;
+#endif
+		if (ifnet.if_flags & IFF_MULTICAST)
+			buf->if_flags |= GLIBTOP_IF_FLAGS_MULTICAST;
+
+#if !defined(__bsdi__)
+		/* Commenting out to "fix" #13345. */
+		buf->subnet = htonl (ifaddr.in.ia_subnet);
+#endif
+		buf->address = sin->sin_addr.s_addr;
+
+		buf->mtu = ifnet.if_mtu;
+
+		buf->packets_in = ifnet.if_ipackets;
+		buf->packets_out = ifnet.if_opackets;
+		buf->packets_total = buf->packets_in + buf->packets_out;
+
+		buf->bytes_in = ifnet.if_ibytes;
+		buf->bytes_out = ifnet.if_obytes;
+		buf->bytes_total = buf->bytes_in + buf->bytes_out;
+
+		buf->errors_in = ifnet.if_ierrors;
+		buf->errors_out = ifnet.if_oerrors;
+		buf->errors_total = buf->errors_in + buf->errors_out;
+
+		buf->collisions = ifnet.if_collisions;
+		buf->flags = _glibtop_sysdeps_netload;
+		return;
+	    }
+
+#if defined(__FreeBSD__) && (__FreeBSD_version >= 300000)
+	    ifaddraddr = (u_long)ifaddr.ifa.ifa_link.tqe_next;
+#elif defined(__FreeBSD__) || defined(__bsdi__)
+	    ifaddraddr = (u_long)ifaddr.ifa.ifa_next;
+#else
+	    ifaddraddr = (u_long)ifaddr.ifa.ifa_list.tqe_next;
+#endif
+	}
+	
+#if defined(__FreeBSD__) && (__FreeBSD_version >= 300000)
+	ifnetaddr = (u_long) ifnet.if_link.tqe_next;
+#elif defined(__FreeBSD__) || defined(__bsdi__)
+	ifnetaddr = (u_long) ifnet.if_next;
+#else
+	ifnetaddr = (u_long) ifnet.if_list.tqe_next;
+#endif
+    }
+}

sysdeps/freebsd/nosuid.c

@@ -0,0 +1,37 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/open.h>
+#include <glibtop/close.h>
+
+void
+glibtop_open_s (glibtop *server,
+		const char *program_name,
+		const unsigned long features,
+		const unsigned flags)
+{ }
+
+void
+glibtop_close_s (glibtop *server)
+{ }

sysdeps/freebsd/open.c

@@ -0,0 +1,95 @@
+/* $Id$ */
+
+/* Copyright (C) 1998 Joshua Sled
+   This file is part of LibGTop 1.0.
+
+   Contributed by Joshua Sled <jsled@xcf.berkeley.edu>, July 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/open.h>
+#include <glibtop/xmalloc.h>
+
+/* !!! THIS FUNCTION RUNS SUID ROOT - CHANGE WITH CAUTION !!! */
+
+void
+glibtop_init_p (glibtop *server, const unsigned long features,
+		const unsigned flags)
+{
+	glibtop_init_func_t *init_fkt;
+
+	if (server == NULL)
+		glibtop_error_r (NULL, "glibtop_init_p (server == NULL)");
+
+	/* Do the initialization, but only if not already initialized. */
+
+	if ((server->flags & _GLIBTOP_INIT_STATE_SYSDEPS) == 0) {
+		glibtop_open_p (server, "glibtop", features, flags);
+
+		for (init_fkt = _glibtop_init_hook_p; *init_fkt; init_fkt++)
+			(*init_fkt) (server);
+		
+		server->flags |= _GLIBTOP_INIT_STATE_SYSDEPS;
+	}
+}
+
+void
+glibtop_open_p (glibtop *server, const char *program_name,
+		const unsigned long features,
+		const unsigned flags)
+{
+#ifdef DEBUG
+	fprintf (stderr, "DEBUG (%d): glibtop_open_p ()\n", getpid ()); 
+#endif
+
+	/* !!! WE ARE ROOT HERE - CHANGE WITH CAUTION !!! */
+
+	server->machine.uid = getuid ();
+	server->machine.euid = geteuid ();
+	server->machine.gid = getgid ();
+	server->machine.egid = getegid ();
+
+#ifdef __FreeBSD__
+	server->os_version_code = __FreeBSD_version;
+#endif
+  
+	/* Setup machine-specific data */
+	server->machine.kd = kvm_open (NULL, NULL, NULL, O_RDONLY, "kvm_open");
+	
+	if (server->machine.kd == NULL)
+		glibtop_error_io_r (server, "kvm_open");
+	
+	/* Drop priviledges. */	
+
+	if (setreuid (server->machine.euid, server->machine.uid))
+		_exit (1);
+	
+	if (setregid (server->machine.egid, server->machine.gid))
+		_exit (1);
+	
+	/* !!! END OF SUID ROOT PART !!! */
+		
+	/* Our effective uid is now those of the user invoking the server,
+	 * so we do no longer have any priviledges. */
+
+	/* NOTE: On FreeBSD, we do not need to be suid root, we just need to
+	 * be sgid kmem.
+	 *
+	 * The server will only use setegid() to get back it's priviledges,
+	 * so it will fail if it is suid root and not sgid kmem. */
+}

sysdeps/freebsd/ppp.c

@@ -0,0 +1,144 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, October 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/ppp.h>
+
+#include <glibtop_suid.h>
+
+#ifdef HAVE_I4B
+
+#include <net/if.h>
+#include <net/if_types.h>
+
+#ifdef HAVE_NET_IF_VAR_H
+#include <net/if_var.h>
+#endif
+
+#include <net/netisr.h>
+#include <net/route.h>
+
+#if defined(__FreeBSD__) || defined(__NetBSD__)
+#include <net/if_sppp.h>
+#else
+#include <i4b/sppp/if_sppp.h>
+#endif
+
+/* Read `misc/i4b_acct.txt' for details ... */
+#ifdef HAVE_I4B_ACCT
+#include <machine/i4b_acct.h>
+#endif
+
+static const unsigned long _glibtop_sysdeps_ppp =
+(1L << GLIBTOP_PPP_STATE);
+
+#ifdef HAVE_I4B_ACCT
+static const unsigned long _glibtop_sysdeps_ppp_acct =
+(1L << GLIBTOP_PPP_BYTES_IN) + (1L << GLIBTOP_PPP_BYTES_OUT);
+#endif
+
+#endif /* HAVE_I4B */
+
+/* nlist structure for kernel access */
+static struct nlist nlst [] = {
+#ifdef HAVE_I4B
+	{ "_i4bisppp_softc" },
+#endif
+	{ 0 }
+};
+
+/* Init function. */
+
+void
+glibtop_init_ppp_p (glibtop *server)
+{
+#ifdef HAVE_I4B
+#ifdef HAVE_I4B_ACCT
+	server->sysdeps.ppp = _glibtop_sysdeps_ppp |
+		_glibtop_sysdeps_ppp_acct;
+#else
+	server->sysdeps.ppp = _glibtop_sysdeps_ppp;
+#endif
+#endif /* HAVE_I4B */
+
+	if (kvm_nlist (server->machine.kd, nlst) < 0)
+		glibtop_error_io_r (server, "kvm_nlist");
+}
+
+/* Provides information about ppp usage. */
+
+void
+glibtop_get_ppp_p (glibtop *server, glibtop_ppp *buf, unsigned short device)
+{
+#ifdef HAVE_I4B
+#ifdef HAVE_I4B_ACCT
+	struct i4bisppp_softc data;
+#else
+	struct sppp data;
+#endif
+	int phase;
+
+	glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_PPP), 0);
+	
+	memset (buf, 0, sizeof (glibtop_ppp));
+
+	if (kvm_read (server->machine.kd, nlst [0].n_value,
+		      &data, sizeof (data)) != sizeof (data))
+		glibtop_error_io_r (server, "kvm_read (i4bisppp_softc)");
+
+#ifdef HAVE_I4B_ACCT
+	phase = data.sc_if_un.scu_sp.pp_phase;
+#else
+	/* FIXME: Which FreeBSD version have this field and
+	 *        which not. */
+#if 0
+	phase = data.pp_phase;
+#endif
+#endif
+
+	switch (phase) {
+#ifdef HAVE_I4B_ACCT
+	case PHASE_DEAD:
+	case PHASE_TERMINATE:
+		buf->state = GLIBTOP_PPP_STATE_HANGUP;
+		break;
+	case PHASE_ESTABLISH:
+	case PHASE_NETWORK:
+		buf->state = GLIBTOP_PPP_STATE_ONLINE;
+		break;
+#endif
+	default:
+		buf->state = GLIBTOP_PPP_STATE_UNKNOWN;
+		break;
+	}
+
+	buf->flags = _glibtop_sysdeps_ppp;
+
+#ifdef HAVE_I4B_ACCT
+	buf->bytes_in = data.sc_inb;
+	buf->bytes_out = data.sc_outb;
+	buf->flags |= _glibtop_sysdeps_ppp_acct;
+#endif
+#endif /* HAVE_I4B */
+}

sysdeps/freebsd/procargs.c

@@ -0,0 +1,111 @@
+/* $Id$ */
+
+/* Copyright (C) 1998 Joshua Sled
+   This file is part of LibGTop 1.0.
+
+   Contributed by Joshua Sled <jsled@xcf.berkeley.edu>, July 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/xmalloc.h>
+#include <glibtop/procargs.h>
+
+#include <glibtop_suid.h>
+
+#include <kvm.h>
+#include <sys/param.h>
+#include <sys/proc.h>
+
+static const unsigned long _glibtop_sysdeps_proc_args =
+(1L << GLIBTOP_PROC_ARGS_SIZE);
+
+/* Init function. */
+
+void
+glibtop_init_proc_args_p (glibtop *server)
+{
+	server->sysdeps.proc_args = _glibtop_sysdeps_proc_args;
+}
+
+/* Provides detailed information about a process. */
+
+char *
+glibtop_get_proc_args_p (glibtop *server, glibtop_proc_args *buf,
+			 pid_t pid, unsigned max_len)
+{
+	struct kinfo_proc *pinfo;
+	char *retval, **args, **ptr;
+	unsigned size = 0, pos = 0;
+	int count;
+
+#ifndef __bsdi__
+	char filename [BUFSIZ];
+	struct stat statb;
+#endif
+
+	glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_PROC_ARGS), 0);
+	
+	memset (buf, 0, sizeof (glibtop_proc_args));
+
+	/* swapper, init, pagedaemon, vmdaemon, update - this doen't work. */
+	if (pid < 5) return NULL;
+
+#ifndef __bsdi__
+	sprintf (filename, "/proc/%d/mem", pid);
+	if (stat (filename, &statb)) return NULL;
+#endif
+
+	glibtop_suid_enter (server);
+
+	/* Get the process data */
+	pinfo = kvm_getprocs (server->machine.kd, KERN_PROC_PID, pid, &count);
+	if ((pinfo == NULL) || (count < 1)) {
+		glibtop_suid_leave (server);
+		glibtop_warn_io_r (server, "kvm_getprocs (%d)", pid);
+		return NULL;
+	}
+
+	args = kvm_getargv (server->machine.kd, pinfo, max_len);
+	if (args == NULL) {
+		glibtop_suid_leave (server);
+		glibtop_warn_io_r (server, "kvm_getargv (%d)", pid);
+		return NULL;
+	}
+
+	glibtop_suid_leave (server);
+
+	for (ptr = args; *ptr; ptr++)
+		size += strlen (*ptr)+1;
+
+	size += 2;
+	retval = glibtop_malloc_r (server, size);
+	memset (retval, 0, size);
+
+	for (ptr = args; *ptr; ptr++) {
+		int len = strlen (*ptr)+1;
+		memcpy (retval+pos, *ptr, len);
+		pos += len;
+	}
+
+	buf->size = pos ? pos-1 : 0;
+
+	buf->flags = _glibtop_sysdeps_proc_args;
+
+	return retval;
+}

sysdeps/freebsd/procdata.c

@@ -0,0 +1,180 @@
+/* $Id$ */
+
+/* Copyright (C) 1998 Joshua Sled
+   This file is part of LibGTop 1.0.
+
+   Contributed by Joshua Sled <jsled@xcf.berkeley.edu>, July 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <config.h>
+#include <glibtop/procdata.h>
+
+#include <sys/stat.h>
+
+#define LINUX_VERSION(x,y,z)	(0x10000*(x) + 0x100*(y) + z)
+
+#define BIT_SHIFT(x)		(1L << (x % 64))
+
+static const unsigned long _glibtop_sysdeps_procdata_0 =
+BIT_SHIFT(GLIBTOP_PROCDATA_CMD) +
+BIT_SHIFT(GLIBTOP_PROCDATA_STATE) +
+BIT_SHIFT(GLIBTOP_PROCDATA_UID) +
+BIT_SHIFT(GLIBTOP_PROCDATA_PID) +
+BIT_SHIFT(GLIBTOP_PROCDATA_PPID) +
+BIT_SHIFT(GLIBTOP_PROCDATA_PGRP) +
+BIT_SHIFT(GLIBTOP_PROCDATA_SESSION) +
+BIT_SHIFT(GLIBTOP_PROCDATA_TTY) +
+BIT_SHIFT(GLIBTOP_PROCDATA_TPGID) +
+BIT_SHIFT(GLIBTOP_PROCDATA_PRIORITY) +
+BIT_SHIFT(GLIBTOP_PROCDATA_NICE) +
+BIT_SHIFT(GLIBTOP_PROCDATA_SIGNAL) +
+BIT_SHIFT(GLIBTOP_PROCDATA_BLOCKED) +
+BIT_SHIFT(GLIBTOP_PROCDATA_SIGIGNORE) +
+BIT_SHIFT(GLIBTOP_PROCDATA_SIGCATCH) +
+BIT_SHIFT(GLIBTOP_PROCDATA_START_TIME) +
+BIT_SHIFT(GLIBTOP_PROCDATA_UTIME) +
+BIT_SHIFT(GLIBTOP_PROCDATA_STIME) +
+BIT_SHIFT(GLIBTOP_PROCDATA_CUTIME) +
+BIT_SHIFT(GLIBTOP_PROCDATA_CSTIME) +
+BIT_SHIFT(GLIBTOP_PROCDATA_SIZE) +
+BIT_SHIFT(GLIBTOP_PROCDATA_RESIDENT) +
+BIT_SHIFT(GLIBTOP_PROCDATA_SHARE) +
+BIT_SHIFT(GLIBTOP_PROCDATA_TRS) +
+BIT_SHIFT(GLIBTOP_PROCDATA_LRS) +
+BIT_SHIFT(GLIBTOP_PROCDATA_DRS) +
+BIT_SHIFT(GLIBTOP_PROCDATA_DT) +
+BIT_SHIFT(GLIBTOP_PROCDATA_VSIZE) +
+BIT_SHIFT(GLIBTOP_PROCDATA_RSS) +
+BIT_SHIFT(GLIBTOP_PROCDATA_RSS_RLIM) +
+BIT_SHIFT(GLIBTOP_PROCDATA_TIMEOUT) +
+BIT_SHIFT(GLIBTOP_PROCDATA_IT_REAL_VALUE);
+
+static const unsigned long _glibtop_sysdeps_procdata_1 =
+BIT_SHIFT(GLIBTOP_PROCDATA_K_FLAGS) +
+BIT_SHIFT(GLIBTOP_PROCDATA_MIN_FLT) +
+BIT_SHIFT(GLIBTOP_PROCDATA_MAJ_FLT) +
+BIT_SHIFT(GLIBTOP_PROCDATA_CMIN_FLT) +
+BIT_SHIFT(GLIBTOP_PROCDATA_CMAJ_FLT) +
+BIT_SHIFT(GLIBTOP_PROCDATA_START_CODE) +
+BIT_SHIFT(GLIBTOP_PROCDATA_END_CODE) +
+BIT_SHIFT(GLIBTOP_PROCDATA_START_STACK) +
+BIT_SHIFT(GLIBTOP_PROCDATA_KSTK_ESP) +
+BIT_SHIFT(GLIBTOP_PROCDATA_KSTK_EIP) +
+BIT_SHIFT(GLIBTOP_PROCDATA_WCHAN);
+
+/* Provides detailed information about a process. */
+
+void
+glibtop_get_procdata_s (glibtop *server, glibtop_procdata *buf, pid_t pid)
+{
+	char input [BUFSIZ], *tmp;
+	struct stat statb;
+	int nread;
+	FILE *f;
+	
+	glibtop_init_r (&server, 0, 0);
+	
+	memset (buf, 0, sizeof (glibtop_procdata));
+
+	if (pid == 0) {
+		/* Client is only interested in the flags. */
+		buf->flags [0] = _glibtop_sysdeps_procdata_0;
+		buf->flags [1] = _glibtop_sysdeps_procdata_1;
+		return;
+	}
+
+	
+	sprintf (input, "/proc/%d/stat", pid);
+
+	if (stat (input, &statb)) return;
+
+	buf->uid = statb.st_uid;
+	
+	f = fopen (input, "r");
+	if (!f) return;
+	
+	nread = fread (input, 1, BUFSIZ, f);
+	
+	if (nread < 0) {
+		fclose (f);
+		return;
+	}
+	
+	input [nread] = 0;
+	
+	/* This is from guile-utils/gtop/proc/readproc.c */
+	
+	/* split into "PID (cmd" and "<rest>" */
+	tmp = strrchr (input, ')');
+	*tmp = '\0';		/* replace trailing ')' with NUL */
+	/* parse these two strings separately, skipping the leading "(". */
+	memset (buf->cmd, 0, sizeof (buf->cmd));
+	sscanf (input, "%d (%39c", &buf->pid, buf->cmd);
+	sscanf(tmp + 2,		/* skip space after ')' too */
+	       "%c %d %d %d %d %d %lu %lu %lu %lu %lu "
+	       "%ld %ld %ld %ld %d %d %lu %lu %ld %lu "
+	       "%lu %lu %lu %lu %lu %lu %lu %d %d %d %d %lu",
+	       &buf->state, &buf->ppid, &buf->pgrp, &buf->session,
+	       &buf->tty, &buf->tpgid, &buf->k_flags, &buf->min_flt,
+	       &buf->cmin_flt, &buf->maj_flt, &buf->cmaj_flt,
+	       &buf->utime, &buf->stime, &buf->cutime, &buf->cstime,
+	       &buf->priority, &buf->nice, &buf->timeout,
+	       &buf->it_real_value, &buf->start_time, &buf->vsize,
+	       &buf->rss, &buf->rss_rlim, &buf->start_code,
+	       &buf->end_code, &buf->start_stack, &buf->kstk_esp,
+	       &buf->kstk_eip, &buf->signal, &buf->blocked,
+	       &buf->sigignore, &buf->sigcatch, &buf->wchan);
+
+	if (buf->tty == 0)
+		/* the old notty val, update elsewhere bef. moving to 0 */
+		buf->tty = -1;
+
+	if (server->os_version_code < LINUX_VERSION(1,3,39)) {
+		/* map old meanings to new */
+		buf->priority = 2*15 - buf->priority;
+		buf->nice = 15 - buf->nice;
+	}
+	if (server->os_version_code < LINUX_VERSION(1,1,30) && buf->tty != -1)
+		/* when tty wasn't full devno */
+		buf->tty = 4*0x100 + buf->tty;
+	
+	fclose (f);
+
+	sprintf (input, "/proc/%d/statm", pid);
+
+	f = fopen (input, "r");
+	if (!f) return;
+
+	nread = fread (input, 1, BUFSIZ, f);
+
+	if (nread < 0) {
+		fclose (f);
+		return;
+	}
+
+	input [nread] = 0;
+
+	sscanf (input, "%ld %ld %ld %ld %ld %ld %ld",
+		&buf->size, &buf->resident, &buf->share,
+		&buf->trs, &buf->lrs, &buf->drs, &buf->dt);
+
+	fclose (f);
+
+	buf->flags [0] = _glibtop_sysdeps_procdata_0;
+	buf->flags [1] = _glibtop_sysdeps_procdata_1;
+}

sysdeps/freebsd/prockernel.c

@@ -0,0 +1,184 @@
+/* $Id$ */
+
+/* Copyright (C) 1998 Joshua Sled
+   This file is part of LibGTop 1.0.
+
+   Contributed by Joshua Sled <jsled@xcf.berkeley.edu>, July 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/prockernel.h>
+
+#include <glibtop_suid.h>
+
+#include <kvm.h>
+#include <sys/param.h>
+#include <sys/sysctl.h>
+#include <sys/proc.h>
+#if (!defined __OpenBSD__) && (!defined __bsdi__)
+#include <sys/user.h>
+#endif
+#if !defined(__bsdi__) && !(defined(__FreeBSD__) && defined(__alpha__))
+#include <machine/pcb.h>
+#endif
+#if defined(__FreeBSD__) && !defined(__alpha__)
+#include <machine/tss.h>
+#endif
+
+#include <unistd.h>
+#include <fcntl.h>
+
+#ifdef __FreeBSD__
+#include <osreldate.h>
+#endif
+
+static const unsigned long _glibtop_sysdeps_proc_kernel_pstats =
+(1L << GLIBTOP_PROC_KERNEL_MIN_FLT) +
+(1L << GLIBTOP_PROC_KERNEL_MAJ_FLT) +
+(1L << GLIBTOP_PROC_KERNEL_CMIN_FLT) +
+(1L << GLIBTOP_PROC_KERNEL_CMAJ_FLT);
+
+static const unsigned long _glibtop_sysdeps_proc_kernel_pcb =
+(1L << GLIBTOP_PROC_KERNEL_KSTK_EIP) +
+(1L << GLIBTOP_PROC_KERNEL_KSTK_ESP);
+
+static const unsigned long _glibtop_sysdeps_proc_kernel_wchan =
+(1L << GLIBTOP_PROC_KERNEL_NWCHAN) +
+(1L << GLIBTOP_PROC_KERNEL_WCHAN);
+
+/* Init function. */
+
+void
+glibtop_init_proc_kernel_p (glibtop *server)
+{
+	server->sysdeps.proc_kernel = _glibtop_sysdeps_proc_kernel_pstats |
+		_glibtop_sysdeps_proc_kernel_pcb |
+		_glibtop_sysdeps_proc_kernel_wchan;
+}
+
+void
+glibtop_get_proc_kernel_p (glibtop *server,
+			   glibtop_proc_kernel *buf,
+			   pid_t pid)
+{
+	struct kinfo_proc *pinfo;
+	struct user *u_addr = (struct user *)USRSTACK;
+	struct pstats pstats;
+	struct pcb pcb;
+	int count;
+
+	char filename [BUFSIZ];
+	struct stat statb;
+
+	glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_PROC_KERNEL), 0);
+	
+	memset (buf, 0, sizeof (glibtop_proc_kernel));
+
+	if (server->sysdeps.proc_time == 0)
+		return;
+
+	/* It does not work for the swapper task. */
+	if (pid == 0) return;
+	
+	/* Get the process information */
+	pinfo = kvm_getprocs (server->machine.kd, KERN_PROC_PID, pid, &count);
+	if ((pinfo == NULL) || (count != 1))
+		glibtop_error_io_r (server, "kvm_getprocs (%d)", pid);
+
+	buf->nwchan = (unsigned long) pinfo [0].kp_proc.p_wchan &~ KERNBASE;
+	buf->flags |= (1L << GLIBTOP_PROC_KERNEL_NWCHAN);
+
+	if (pinfo [0].kp_proc.p_wchan && pinfo [0].kp_proc.p_wmesg) {
+		strncpy (buf->wchan, pinfo [0].kp_eproc.e_wmesg,
+			 sizeof (buf->wchan) - 1);
+		buf->wchan [sizeof (buf->wchan) - 1] = 0;
+		buf->flags |= (1L << GLIBTOP_PROC_KERNEL_WCHAN);
+	} else {
+		buf->wchan [0] = 0;
+	}
+
+	/* Taken from `saveuser ()' in `/usr/src/bin/ps/ps.c'. */
+
+	/* [FIXME]: /usr/include/sys/user.h tells me that the user area
+	 *          may or may not be at the same kernel address in all
+	 *          processes, but I don't see any way to get that address.
+	 *          Since `ps' simply uses its own address, I think it's
+	 *          safe to do this here, too. */
+
+	/* NOTE: You need to mount the /proc filesystem to make
+	 *       `kvm_uread' work. */
+
+	sprintf (filename, "/proc/%d/mem", (int) pid);
+	if (stat (filename, &statb)) return;
+
+	glibtop_suid_enter (server);
+
+	if ((pinfo [0].kp_proc.p_flag & P_INMEM) &&
+	    kvm_uread (server->machine.kd, &(pinfo [0]).kp_proc,
+		       (unsigned long) &u_addr->u_stats,
+		       (char *) &pstats, sizeof (pstats)) == sizeof (pstats))
+		{
+			/*
+			 * The u-area might be swapped out, and we can't get
+			 * at it because we have a crashdump and no swap.
+			 * If it's here fill in these fields, otherwise, just
+			 * leave them 0.
+			 */
+
+			buf->min_flt = (u_int64_t) pstats.p_ru.ru_minflt;
+			buf->maj_flt = (u_int64_t) pstats.p_ru.ru_majflt;
+			buf->cmin_flt = (u_int64_t) pstats.p_cru.ru_minflt;
+			buf->cmaj_flt = (u_int64_t) pstats.p_cru.ru_majflt;
+			
+			buf->flags |= _glibtop_sysdeps_proc_kernel_pstats;
+		}
+
+	if ((pinfo [0].kp_proc.p_flag & P_INMEM) &&
+	    kvm_uread (server->machine.kd, &(pinfo [0]).kp_proc,
+		       (unsigned long) &u_addr->u_pcb,
+		       (char *) &pcb, sizeof (pcb)) == sizeof (pcb))
+		{
+#ifdef __FreeBSD__
+#ifndef __alpha__
+#if (__FreeBSD_version >= 300003)
+			buf->kstk_esp = (u_int64_t) pcb.pcb_esp;
+			buf->kstk_eip = (u_int64_t) pcb.pcb_eip;
+#else
+			buf->kstk_esp = (u_int64_t) pcb.pcb_ksp;
+			buf->kstk_eip = (u_int64_t) pcb.pcb_pc;
+#endif
+#else
+			/*xxx FreeBSD/Alpha? */
+#endif
+#else
+			buf->kstk_esp = (u_int64_t) pcb.pcb_tss.tss_esp0;
+#ifdef __bsdi__
+			buf->kstk_eip = (u_int64_t) pcb.pcb_tss.tss_eip;
+#else
+			buf->kstk_eip = (u_int64_t) pcb.pcb_tss.__tss_eip;
+#endif
+
+			buf->flags |= _glibtop_sysdeps_proc_kernel_pcb;
+#endif
+		}
+
+	/* Taken from `wchan ()' in `/usr/src/bin/ps/print.c'. */
+
+	glibtop_suid_leave (server);
+}

sysdeps/freebsd/proclist.c

@@ -0,0 +1,103 @@
+/* $Id$ */
+
+/* Copyright (C) 1998 Joshua Sled
+   This file is part of LibGTop 1.0.
+
+   Contributed by Joshua Sled <jsled@xcf.berkeley.edu>, July 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/xmalloc.h>
+#include <glibtop/proclist.h>
+
+#include <glibtop_suid.h>
+
+static const unsigned long _glibtop_sysdeps_proclist =
+(1L << GLIBTOP_PROCLIST_TOTAL) + (1L << GLIBTOP_PROCLIST_NUMBER) +
+(1L << GLIBTOP_PROCLIST_SIZE);
+
+/* Fetch list of currently running processes.
+ * The interface of this function is a little bit different from the others:
+ * buf->flags is only set if the call succeeded, in this case pids_chain,
+ * a list of the pids of all currently running processes is returned,
+ * buf->number is the number of elements of this list and buf->size is
+ * the size of one single element (sizeof (unsigned)). The total size is
+ * stored in buf->total.
+ *
+ * The calling function has to free the memory to which a pointer is returned.
+ *
+ * IMPORTANT NOTE:
+ *   On error, this function MUST return NULL and set buf->flags to zero !
+ *   On success, it returnes a pointer to a list of buf->number elements
+ *   each buf->size big. The total size is stored in buf->total.
+ * The calling function has to free the memory to which a pointer is returned.
+ *
+ * On error, NULL is returned and buf->flags is zero. */
+
+/* Init function. */
+
+void
+glibtop_init_proclist_p (glibtop *server)
+{
+	server->sysdeps.proclist = _glibtop_sysdeps_proclist;
+}
+
+unsigned *
+glibtop_get_proclist_p (glibtop *server, glibtop_proclist *buf,
+			int64_t real_which, int64_t arg)
+{
+	struct kinfo_proc *pinfo;
+	unsigned *pids = NULL;
+	int which, count;
+	int i,j;
+
+	glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_PROCLIST), 0);
+	
+	memset (buf, 0, sizeof (glibtop_proclist));
+
+	which = (int)(real_which & GLIBTOP_KERN_PROC_MASK);
+
+	/* Get the process data */
+	pinfo = kvm_getprocs (server->machine.kd, which, arg, &count);
+	if ((pinfo == NULL) || (count < 1)) {
+		glibtop_warn_io_r (server, "kvm_getprocs (proclist)");
+		return NULL;
+	}
+	count--;
+
+	/* Allocate count objects in the pids_chain array
+	 * Same as malloc is pids is NULL, which it is. */
+	pids = glibtop_realloc_r (server, pids, count * sizeof (unsigned));
+	/* Copy the pids over to this chain */
+	for (i=j=0; i < count; i++) {
+		if ((real_which & GLIBTOP_EXCLUDE_IDLE) &&
+		    (pinfo[i].kp_proc.p_stat != SRUN))
+			continue;
+		else if ((real_which & GLIBTOP_EXCLUDE_SYSTEM) &&
+			 (pinfo[i].kp_eproc.e_pcred.p_ruid == 0))
+			continue;
+		pids [j++] = (unsigned) pinfo[i].kp_proc.p_pid;
+	} /* end for */
+	/* Set the fields in buf */
+	buf->number = j;
+	buf->size = sizeof (unsigned);
+	buf->total = j * sizeof (unsigned);
+	buf->flags = _glibtop_sysdeps_proclist;
+	return pids;
+}

sysdeps/freebsd/procmap.c

@@ -0,0 +1,266 @@
+/* $Id$ */
+
+/* Copyright (C) 1998 Joshua Sled
+   This file is part of LibGTop 1.0.
+
+   Contributed by Joshua Sled <jsled@xcf.berkeley.edu>, July 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/xmalloc.h>
+#include <glibtop/procmap.h>
+
+#include <glibtop_suid.h>
+
+#include <kvm.h>
+#include <sys/param.h>
+#include <sys/proc.h>
+#include <sys/resource.h>
+#include <vm/vm_object.h>
+#include <vm/vm_prot.h>
+#include <vm/vm_map.h>
+
+#include <sys/vnode.h>
+#include <sys/mount.h>
+#include <ufs/ufs/quota.h>
+#include <ufs/ufs/inode.h>
+
+#include <sys/ucred.h>
+#if (!defined __OpenBSD__) && (!defined __bsdi__)
+#include <sys/user.h>
+#endif
+#include <sys/sysctl.h>
+#include <vm/vm.h>
+
+#if defined(__NetBSD__) && (__NetBSD_Version__ >= 104000000)
+/* Fixme ... */
+#undef _KERNEL
+#define _UVM_UVM_AMAP_I_H_ 1
+#define _UVM_UVM_MAP_I_H_ 1
+#include <uvm/uvm.h>
+#endif
+
+static const unsigned long _glibtop_sysdeps_proc_map =
+(1L << GLIBTOP_PROC_MAP_TOTAL) + (1L << GLIBTOP_PROC_MAP_NUMBER) +
+(1L << GLIBTOP_PROC_MAP_SIZE);
+
+static const unsigned long _glibtop_sysdeps_map_entry =
+(1L << GLIBTOP_MAP_ENTRY_START) + (1L << GLIBTOP_MAP_ENTRY_END) +
+(1L << GLIBTOP_MAP_ENTRY_OFFSET) + (1L << GLIBTOP_MAP_ENTRY_PERM) +
+(1L << GLIBTOP_MAP_ENTRY_INODE) + (1L << GLIBTOP_MAP_ENTRY_DEVICE);
+
+/* Init function. */
+
+void
+glibtop_init_proc_map_p (glibtop *server)
+{
+	server->sysdeps.proc_map = _glibtop_sysdeps_proc_map;
+}
+
+/* Provides detailed information about a process. */
+
+glibtop_map_entry *
+glibtop_get_proc_map_p (glibtop *server, glibtop_proc_map *buf,
+			pid_t pid)
+{
+	struct kinfo_proc *pinfo;
+	struct vm_map_entry entry, *first;
+	struct vmspace vmspace;
+#if defined(__NetBSD__) && (__NetBSD_Version__ >= 104000000)
+	struct vnode vnode;
+	struct inode inode;
+#else
+	struct vm_object object;
+#endif
+	glibtop_map_entry *maps;
+#if defined __FreeBSD__
+	struct vnode vnode;
+	struct inode inode;
+	struct mount mount;
+#endif
+	int count, i = 0;
+	int update = 0;
+
+	glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_PROC_MAP), 0);
+	
+	memset (buf, 0, sizeof (glibtop_proc_map));
+
+	/* It does not work for the swapper task. */
+	if (pid == 0) return NULL;
+	
+	glibtop_suid_enter (server);
+
+	/* Get the process data */
+	pinfo = kvm_getprocs (server->machine.kd, KERN_PROC_PID, pid, &count);
+	if ((pinfo == NULL) || (count < 1))
+		glibtop_error_io_r (server, "kvm_getprocs (%d)", pid);
+
+	/* Now we get the memory maps. */
+
+	if (kvm_read (server->machine.kd,
+		      (unsigned long) pinfo [0].kp_proc.p_vmspace,
+		      (char *) &vmspace, sizeof (vmspace)) != sizeof (vmspace))
+		glibtop_error_io_r (server, "kvm_read (vmspace)");
+
+	first = vmspace.vm_map.header.next;
+
+	if (kvm_read (server->machine.kd,
+		      (unsigned long) vmspace.vm_map.header.next,
+		      (char *) &entry, sizeof (entry)) != sizeof (entry))
+		glibtop_error_io_r (server, "kvm_read (entry)");
+
+	/* Allocate space. */
+
+	buf->number = vmspace.vm_map.nentries;
+	buf->size = sizeof (glibtop_map_entry);
+
+	buf->total = buf->number * buf->size;
+
+	maps = glibtop_malloc_r (server, buf->total);
+
+	memset (maps, 0, buf->total);
+
+	buf->flags = _glibtop_sysdeps_proc_map;
+
+	/* Walk through the `vm_map_entry' list ... */
+
+	/* I tested this a few times with `mmap'; as soon as you write
+	 * to the mmap'ed area, the object type changes from OBJT_VNODE
+	 * to OBJT_DEFAULT so if seems this really works. */
+
+	do {
+		if (update) {
+			if (kvm_read (server->machine.kd,
+				      (unsigned long) entry.next,
+				      &entry, sizeof (entry)) != sizeof (entry))
+				glibtop_error_io_r (server, "kvm_read (entry)");
+		} else {
+			update = 1;
+		}
+
+#ifdef __FreeBSD__
+#if __FreeBSD__ >= 4
+		if (entry.eflags & (MAP_ENTRY_IS_SUB_MAP))
+			continue;
+#else
+ 		if (entry.eflags & (MAP_ENTRY_IS_A_MAP|MAP_ENTRY_IS_SUB_MAP))
+ 			continue;
+#endif
+#else
+#if defined(__NetBSD__) && (__NetBSD_Version__ >= 104000000)
+ 		if (UVM_ET_ISSUBMAP (&entry))
+			continue;
+#else
+		if (entry.is_a_map || entry.is_sub_map)
+			continue;
+#endif
+#endif
+
+		maps [i].flags  = _glibtop_sysdeps_map_entry;
+
+		maps [i].start  = entry.start;
+		maps [i].end    = entry.end;
+		maps [i].offset = entry.offset;
+
+		maps [i].perm   = 0;
+
+		if (entry.protection & VM_PROT_READ)
+			maps [i].perm |= GLIBTOP_MAP_PERM_READ;
+		if (entry.protection & VM_PROT_WRITE)
+			maps [i].perm |= GLIBTOP_MAP_PERM_WRITE;
+		if (entry.protection & VM_PROT_EXECUTE)
+			maps [i].perm |= GLIBTOP_MAP_PERM_EXECUTE;
+
+		i++;
+
+#if defined(__NetBSD__) && (__NetBSD_Version__ >= 104000000)
+		if (!entry.object.uvm_obj)
+			continue;
+
+		/* We're only interested in vnodes */
+
+		if (kvm_read (server->machine.kd,
+			      (unsigned long) entry.object.uvm_obj,
+			      &vnode, sizeof (vnode)) != sizeof (vnode)) {
+			glibtop_warn_io_r (server, "kvm_read (vnode)");
+			return NULL;
+		}
+#else
+		if (!entry.object.vm_object)
+			continue;
+
+		/* We're only interested in `vm_object's */
+
+		if (kvm_read (server->machine.kd,
+			      (unsigned long) entry.object.vm_object,
+			      &object, sizeof (object)) != sizeof (object))
+			glibtop_error_io_r (server, "kvm_read (object)");
+#endif
+
+#if defined(__NetBSD__) && (__NetBSD_Version__ >= 104000000)
+		if (!vnode.v_uvm.u_flags & UVM_VNODE_VALID)
+			continue;
+
+		if ((vnode.v_type != VREG) || (vnode.v_tag != VT_UFS) ||
+		    !vnode.v_data) continue;
+
+		if (kvm_read (server->machine.kd,
+			      (unsigned long) vnode.v_data,
+			      &inode, sizeof (inode)) != sizeof (inode))
+			glibtop_error_io_r (server, "kvm_read (inode)");
+
+		maps [i-1].inode  = inode.i_number;
+		maps [i-1].device = inode.i_dev;
+#endif
+
+
+#ifdef __FreeBSD__
+		/* If the object is of type vnode, add its size */
+
+		if (object.type != OBJT_VNODE)
+			continue;
+
+		if (!object.handle)
+			continue;
+		
+		if (kvm_read (server->machine.kd,
+			      (unsigned long) object.handle,
+			      &vnode, sizeof (vnode)) != sizeof (vnode))
+			glibtop_error_io_r (server, "kvm_read (vnode)");
+
+		if ((vnode.v_type != VREG) || (vnode.v_tag != VT_UFS) ||
+		    !vnode.v_data) continue;
+
+		if (kvm_read (server->machine.kd,
+			      (unsigned long) vnode.v_data,
+			      &inode, sizeof (inode)) != sizeof (inode))
+			glibtop_error_io_r (server, "kvm_read (inode)");
+
+		if (kvm_read (server->machine.kd,
+			      (unsigned long) vnode.v_mount,
+			      &mount, sizeof (mount)) != sizeof (mount))
+			glibtop_error_io_r (server, "kvm_read (mount)");
+
+		maps [i-1].inode  = inode.i_number;
+		maps [i-1].device = inode.i_dev;
+#endif
+	} while (entry.next != first);
+
+	return maps;
+}

sysdeps/freebsd/procmem.c

@@ -0,0 +1,259 @@
+/* $Id$ */
+
+/* Copyright (C) 1998 Joshua Sled
+   This file is part of LibGTop 1.0.
+
+   Contributed by Joshua Sled <jsled@xcf.berkeley.edu>, July 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/procmem.h>
+
+#include <glibtop_suid.h>
+
+#include <kvm.h>
+#include <sys/param.h>
+#include <sys/proc.h>
+#include <sys/resource.h>
+#include <vm/vm_object.h>
+#include <vm/vm_map.h>
+
+#include <sys/vnode.h>
+#include <ufs/ufs/quota.h>
+#include <ufs/ufs/inode.h>
+
+#include <sys/ucred.h>
+#if (!defined __OpenBSD__) && (!defined __bsdi__)
+#include <sys/user.h>
+#endif
+#include <sys/sysctl.h>
+#include <vm/vm.h>
+
+#if defined(__NetBSD__) && (__NetBSD_Version__ >= 104000000)
+/* Fixme ... */
+#undef _KERNEL
+#define _UVM_UVM_AMAP_I_H_ 1
+#define _UVM_UVM_MAP_I_H_ 1
+#include <uvm/uvm.h>
+#endif
+
+static const unsigned long _glibtop_sysdeps_proc_mem =
+(1L << GLIBTOP_PROC_MEM_SIZE) +
+(1L << GLIBTOP_PROC_MEM_VSIZE) +
+(1L << GLIBTOP_PROC_MEM_RESIDENT) +
+(1L << GLIBTOP_PROC_MEM_RSS) +
+(1L << GLIBTOP_PROC_MEM_RSS_RLIM);
+
+static const unsigned long _glibtop_sysdeps_proc_mem_share =
+#if defined(__NetBSD__) && (__NetBSD_Version__ >= 104000000)
+(1L << GLIBTOP_PROC_MEM_SHARE);
+#elif defined(__FreeBSD__)
+(1L << GLIBTOP_PROC_MEM_SHARE);
+#else
+0;
+#endif
+
+#ifndef LOG1024
+#define LOG1024		10
+#endif
+
+/* these are for getting the memory statistics */
+static int pageshift;		/* log base 2 of the pagesize */
+
+/* define pagetok in terms of pageshift */
+#define pagetok(size) ((size) << pageshift)
+
+/* Init function. */
+
+void
+glibtop_init_proc_mem_p (glibtop *server)
+{
+	register int pagesize;
+
+	/* get the page size with "getpagesize" and calculate pageshift
+	 * from it */
+	pagesize = getpagesize ();
+	pageshift = 0;
+	while (pagesize > 1) {
+		pageshift++;
+		pagesize >>= 1;
+	}
+
+	/* we only need the amount of log(2)1024 for our conversion */
+	pageshift -= LOG1024;
+
+	server->sysdeps.proc_mem = _glibtop_sysdeps_proc_mem |
+		_glibtop_sysdeps_proc_mem_share;
+}
+
+/* Provides detailed information about a process. */
+
+void
+glibtop_get_proc_mem_p (glibtop *server, glibtop_proc_mem *buf,
+			pid_t pid)
+{
+	struct kinfo_proc *pinfo;
+	struct vm_map_entry entry, *first;
+	struct vmspace *vms, vmspace;
+#if defined(__NetBSD__) && (__NetBSD_Version__ >= 104000000)
+	struct vnode vnode;
+	struct inode inode;
+#else
+	struct vm_object object;
+#endif
+	struct plimit plimit;
+	int count;
+
+	glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_PROC_MEM), 0);
+	
+	memset (buf, 0, sizeof (glibtop_proc_mem));
+
+	if (server->sysdeps.proc_mem == 0)
+		return;
+
+	/* It does not work for the swapper task. */
+	if (pid == 0) return;
+	
+	/* Get the process data */
+	pinfo = kvm_getprocs (server->machine.kd, KERN_PROC_PID, pid, &count);
+	if ((pinfo == NULL) || (count < 1)) {
+		glibtop_warn_io_r (server, "kvm_getprocs (%d)", pid);
+		return;
+	}
+
+	if (kvm_read (server->machine.kd,
+		      (unsigned long) pinfo [0].kp_proc.p_limit,
+		      (char *) &plimit, sizeof (plimit)) != sizeof (plimit)) {
+		glibtop_warn_io_r (server, "kvm_read (plimit)");
+		return;
+	}
+
+	buf->rss_rlim = (u_int64_t) 
+		(plimit.pl_rlimit [RLIMIT_RSS].rlim_cur);
+	
+	vms = &pinfo [0].kp_eproc.e_vm;
+
+	buf->vsize = buf->size = (u_int64_t) pagetok
+		(vms->vm_tsize + vms->vm_dsize + vms->vm_ssize) << LOG1024;
+	
+	buf->resident = buf->rss = (u_int64_t) pagetok
+		(vms->vm_rssize) << LOG1024;
+
+	/* Now we get the shared memory. */
+
+	if (kvm_read (server->machine.kd,
+		      (unsigned long) pinfo [0].kp_proc.p_vmspace,
+		      (char *) &vmspace, sizeof (vmspace)) != sizeof (vmspace)) {
+		glibtop_warn_io_r (server, "kvm_read (vmspace)");
+		return;
+	}
+
+	first = vmspace.vm_map.header.next;
+
+	if (kvm_read (server->machine.kd,
+		      (unsigned long) vmspace.vm_map.header.next,
+		      (char *) &entry, sizeof (entry)) != sizeof (entry)) {
+		glibtop_warn_io_r (server, "kvm_read (entry)");
+		return;
+	}
+
+	/* Walk through the `vm_map_entry' list ... */
+
+	/* I tested this a few times with `mmap'; as soon as you write
+	 * to the mmap'ed area, the object type changes from OBJT_VNODE
+	 * to OBJT_DEFAULT so if seems this really works. */
+
+	while (entry.next != first) {
+		if (kvm_read (server->machine.kd,
+			      (unsigned long) entry.next,
+			      &entry, sizeof (entry)) != sizeof (entry)) {
+			glibtop_warn_io_r (server, "kvm_read (entry)");
+			return;
+		}
+
+#ifdef __FreeBSD__
+#if __FreeBSD__ >= 4
+		if (entry.eflags & (MAP_ENTRY_IS_SUB_MAP))
+			continue;
+#else
+ 		if (entry.eflags & (MAP_ENTRY_IS_A_MAP|MAP_ENTRY_IS_SUB_MAP))
+ 			continue;
+#endif
+#else
+#if defined(__NetBSD__) && (__NetBSD_Version__ >= 104000000)
+ 		if (UVM_ET_ISSUBMAP (&entry))
+			continue;
+#else
+		if (entry.is_a_map || entry.is_sub_map)
+			continue;
+#endif
+#endif
+
+#if defined(__NetBSD__) && (__NetBSD_Version__ >= 104000000)
+		if (!entry.object.uvm_obj)
+			continue;
+
+		/* We're only interested in vnodes */
+
+		if (kvm_read (server->machine.kd,
+			      (unsigned long) entry.object.uvm_obj,
+			      &vnode, sizeof (vnode)) != sizeof (vnode)) {
+			glibtop_warn_io_r (server, "kvm_read (vnode)");
+			return;
+		}
+#else
+		if (!entry.object.vm_object)
+			continue;
+
+		/* We're only interested in `vm_object's */
+
+		if (kvm_read (server->machine.kd,
+			      (unsigned long) entry.object.vm_object,
+			      &object, sizeof (object)) != sizeof (object)) {
+			glibtop_warn_io_r (server, "kvm_read (object)");
+			return;
+		}
+#endif
+		/* If the object is of type vnode, add its size */
+
+#if defined(__NetBSD__) && (__NetBSD_Version__ >= 104000000)
+		if (!vnode.v_uvm.u_flags & UVM_VNODE_VALID)
+			continue;
+
+		if ((vnode.v_type != VREG) || (vnode.v_tag != VT_UFS) ||
+		    !vnode.v_data) continue;
+
+		/* Reference count must be at least two. */
+		if (vnode.v_uvm.u_obj.uo_refs <= 1)
+			continue;
+
+		buf->share += pagetok (vnode.v_uvm.u_obj.uo_npages) << LOG1024;
+#endif
+
+#ifdef __FreeBSD__
+		if (object.type != OBJT_VNODE)
+			continue;
+
+		buf->share += object.un_pager.vnp.vnp_size;
+#endif
+	}
+
+	buf->flags = _glibtop_sysdeps_proc_mem |
+		_glibtop_sysdeps_proc_mem_share;
+}

sysdeps/freebsd/procsegment.c

@@ -0,0 +1,82 @@
+/* $Id$ */
+
+/* Copyright (C) 1998 Joshua Sled
+   This file is part of LibGTop 1.0.
+
+   Contributed by Joshua Sled <jsled@xcf.berkeley.edu>, July 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/procsegment.h>
+
+#include <glibtop_suid.h>
+
+#include <kvm.h>
+#include <sys/param.h>
+#include <sys/sysctl.h>
+
+static const unsigned long _glibtop_sysdeps_proc_segment = 0;
+
+/* Init function. */
+
+void
+glibtop_init_proc_segment_p (glibtop *server)
+{
+	server->sysdeps.proc_segment = _glibtop_sysdeps_proc_segment;
+}
+
+/* Provides detailed information about a process. */
+
+void
+glibtop_get_proc_segment_p (glibtop *server,
+			    glibtop_proc_segment *buf,
+			    pid_t pid)
+{
+	glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_PROC_SEGMENT), 0);
+	
+	memset (buf, 0, sizeof (glibtop_proc_segment));
+
+#if 0
+	/* Get the process info from the kernel */
+	kvm_getprocs (server->machine.kd, KERN_PROC_PID, pid, count);
+	if (*count != 1) {
+		return; /* the zeroed-out buffer indicating no data */
+	}
+
+	/* trs: text resident set size
+	   pinfo[0]->kp_eproc.e_xrssize;
+	*/
+	/* buf->trs = pinfo[0]->kp_eproc.e_xrssize; */
+	/* lrs: shared-lib resident set size
+	   ?  */
+	/* drs: data resident set size
+	   pinfo[0]->kp_eproc.e_vm.vm_map.vm_dsize;
+	*/
+	/* dt: dirty pages
+	 */
+	/* start_code: address of beginning of code segment
+	   
+	 */
+	/* end_code: address of end of code segment
+	 */
+	/* start_stack: address of the bottom of stack segment
+	 */
+#endif
+}
+

sysdeps/freebsd/procsignal.c

@@ -0,0 +1,107 @@
+/* $Id$ */
+
+/* Copyright (C) 1998 Joshua Sled
+   This file is part of LibGTop 1.0.
+
+   Contributed by Joshua Sled <jsled@xcf.berkeley.edu>, July 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/procsignal.h>
+
+#include <glibtop_suid.h>
+
+#ifdef __FreeBSD__
+#include <osreldate.h>
+#endif
+
+static const unsigned long _glibtop_sysdeps_proc_signal =
+(1L << GLIBTOP_PROC_SIGNAL_SIGNAL) +
+(1L << GLIBTOP_PROC_SIGNAL_BLOCKED) +
+(1L << GLIBTOP_PROC_SIGNAL_SIGIGNORE) +
+(1L << GLIBTOP_PROC_SIGNAL_SIGCATCH);
+
+/* Init function. */
+
+void
+glibtop_init_proc_signal_p (glibtop *server)
+{
+	server->sysdeps.proc_signal = _glibtop_sysdeps_proc_signal;
+}
+
+void
+glibtop_get_proc_signal_p (glibtop *server,
+			   glibtop_proc_signal *buf,
+			   pid_t pid)
+{
+	struct kinfo_proc *pinfo;
+	int count = 0;
+
+	glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_PROC_SIGNAL), 0);
+	
+	memset (buf, 0, sizeof (glibtop_proc_signal));
+
+	/* It does not work for the swapper task. */
+	if (pid == 0) return;
+	
+	/* Get the process information */
+	pinfo = kvm_getprocs (server->machine.kd, KERN_PROC_PID, pid, &count);
+	if ((pinfo == NULL) || (count != 1)) {
+		glibtop_warn_io_r (server, "kvm_getprocs (%d)", pid);
+		return;
+	}
+
+	/* signal: mask of pending signals.
+	 *         pinfo [0].kp_proc.p_siglist
+	 */
+#if (defined(__NetBSD__) && (NSIG > 32)) || (__FreeBSD_version >= 400011)
+	buf->signal [0] = pinfo [0].kp_proc.p_siglist.__bits[0];
+#else
+	buf->signal [0] = pinfo [0].kp_proc.p_siglist;
+#endif
+
+	/* blocked: mask of blocked signals.
+	 *          pinfo [0].kp_proc.p_sigmask
+	 */
+#if (defined(__NetBSD__) && (NSIG > 32)) || (__FreeBSD_version >= 400011)
+	buf->blocked [0] = pinfo [0].kp_proc.p_sigmask.__bits[0];
+#else
+	buf->blocked [0] = pinfo [0].kp_proc.p_sigmask;
+#endif
+	
+	/* sigignore: mask of ignored signals.
+	 *            pinfo [0].kp_proc.p_sigignore
+	*/
+#if (defined(__NetBSD__) && (NSIG > 32)) || (__FreeBSD_version >= 400011)
+	buf->sigignore [0] = pinfo [0].kp_proc.p_sigignore.__bits[0];
+#else
+	buf->sigignore [0] = pinfo [0].kp_proc.p_sigignore;
+#endif
+	
+	/* sigcatch: mask of caught signals.
+	 *           pinfo [0].kp_proc.p_sigcatch
+	*/
+#if (defined(__NetBSD__) && (NSIG > 32)) || (__FreeBSD_version >= 400011)
+	buf->sigcatch [0] = pinfo [0].kp_proc.p_sigcatch.__bits[0];
+#else
+	buf->sigcatch [0] = pinfo [0].kp_proc.p_sigcatch;
+#endif
+
+	buf->flags = _glibtop_sysdeps_proc_signal;
+}

sysdeps/freebsd/procstate.c

@@ -0,0 +1,137 @@
+/* $Id$ */
+
+/* Copyright (C) 1998 Joshua Sled
+   This file is part of LibGTop 1.0.
+
+   Contributed by Joshua Sled <jsled@xcf.berkeley.edu>, July 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/procstate.h>
+
+#include <glibtop_suid.h>
+
+#if !defined(__OpenBSD__) 
+//&& (!defined __bsdi__)
+#include <sys/user.h>
+#endif
+
+static const unsigned long _glibtop_sysdeps_proc_state =
+(1L << GLIBTOP_PROC_STATE_CMD) + (1L << GLIBTOP_PROC_STATE_UID) +
+(1L << GLIBTOP_PROC_STATE_GID);
+
+static const unsigned long _glibtop_sysdeps_proc_state_new =
+#if LIBGTOP_VERSION_CODE >= 1001000
+(1L << GLIBTOP_PROC_STATE_RUID) + (1L << GLIBTOP_PROC_STATE_RGID);
+#else
+0;
+#endif
+
+/* Init function. */
+
+void
+glibtop_init_proc_state_p (glibtop *server)
+{
+	server->sysdeps.proc_state = _glibtop_sysdeps_proc_state |
+		_glibtop_sysdeps_proc_state_new;
+}
+
+/* Provides detailed information about a process. */
+
+void
+glibtop_get_proc_state_p (glibtop *server,
+			  glibtop_proc_state *buf,
+			  pid_t pid)
+{
+	struct kinfo_proc *pinfo;
+	int count = 0;
+
+	glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_PROC_STATE), 0);
+	
+	memset (buf, 0, sizeof (glibtop_proc_state));
+
+	/* It does not work for the swapper task. */
+	if (pid == 0) return;
+	
+	/* Get the process information */
+	pinfo = kvm_getprocs (server->machine.kd, KERN_PROC_PID, pid, &count);
+	if ((pinfo == NULL) || (count != 1)) {
+		glibtop_warn_io_r (server, "kvm_getprocs (%d)", pid);
+		return;
+	}
+
+	strncpy (buf->cmd, pinfo [0].kp_proc.p_comm, sizeof (buf->cmd)-1);
+	buf->cmd [sizeof (buf->cmd)-1] = 0;
+
+	buf->uid = pinfo [0].kp_eproc.e_pcred.p_svuid;
+	buf->gid = pinfo [0].kp_eproc.e_pcred.p_svgid;
+
+#if LIBGTOP_VERSION_CODE >= 1001000
+	buf->ruid = pinfo [0].kp_eproc.e_pcred.p_ruid;
+	buf->rgid = pinfo [0].kp_eproc.e_pcred.p_rgid;
+#endif
+
+	/* Set the flags for the data we're about to return*/
+	buf->flags = _glibtop_sysdeps_proc_state |
+		_glibtop_sysdeps_proc_state_new;
+
+#if LIBGTOP_VERSION_CODE >= 1001000
+	switch (pinfo [0].kp_proc.p_stat) {
+	case SIDL:
+		buf->state = 0;
+		break;
+	case SRUN:
+		buf->state = GLIBTOP_PROCESS_RUNNING;
+		break;
+	case SSLEEP:
+		buf->state = GLIBTOP_PROCESS_INTERRUPTIBLE;
+		break;
+	case SSTOP:
+		buf->state = GLIBTOP_PROCESS_STOPPED;
+		break;
+	case SZOMB:
+		buf->state = GLIBTOP_PROCESS_ZOMBIE;
+		break;
+	default:
+		return;
+	}
+#else
+	switch (pinfo [0].kp_proc.p_stat) {
+	case SIDL:
+		buf->state = 'S';
+		break;
+	case SRUN:
+		buf->state = 'R';
+		break;
+	case SSLEEP:
+		buf->state = 'S';
+		break;
+	case SSTOP:
+		buf->state = 'T';
+		break;
+	case SZOMB:
+		buf->state = 'Z';
+		break;
+	default:
+		return;
+	}
+#endif
+
+	buf->flags |= (1L << GLIBTOP_PROC_STATE_STATE);
+}

sysdeps/freebsd/proctime.c

@@ -0,0 +1,229 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/proctime.h>
+
+#include <glibtop_suid.h>
+
+#ifdef __FreeBSD__
+#include <osreldate.h>
+#endif
+
+static const unsigned long _glibtop_sysdeps_proc_time =
+(1L << GLIBTOP_PROC_TIME_RTIME) + (1L << GLIBTOP_PROC_TIME_FREQUENCY);
+
+static const unsigned long _glibtop_sysdeps_proc_time_user =
+(1L << GLIBTOP_PROC_TIME_UTIME) + (1L << GLIBTOP_PROC_TIME_STIME) +
+(1L << GLIBTOP_PROC_TIME_CUTIME) + (1L << GLIBTOP_PROC_TIME_CSTIME) +
+(1L << GLIBTOP_PROC_TIME_START_TIME);
+
+#define tv2sec(tv)	(((u_int64_t) tv.tv_sec * 1000000) + (u_int64_t) tv.tv_usec)
+
+/* Init function. */
+
+void
+glibtop_init_proc_time_p (glibtop *server)
+{
+	server->sysdeps.proc_time = _glibtop_sysdeps_proc_time |
+		_glibtop_sysdeps_proc_time_user;
+}
+
+/* Taken from /usr/src/sys/kern/kern_resource.c */
+
+/*
+ * Transform the running time and tick information in proc p into user,
+ * system, and interrupt time usage.
+ */
+
+static void
+calcru(p, up, sp, ip)
+     struct proc *p;
+     struct timeval *up;
+     struct timeval *sp;
+     struct timeval *ip;
+{
+	quad_t totusec;
+	u_quad_t u, st, ut, it, tot;
+#if (__FreeBSD_version < 300003)
+        long sec, usec;
+#endif
+        struct timeval tv;
+
+	st = p->p_sticks;
+	ut = p->p_uticks;
+	it = p->p_iticks;
+
+	tot = st + ut + it;
+	if (tot == 0) {
+		st = 1;
+		tot = 1;
+	}
+
+#if (defined __FreeBSD__) && (__FreeBSD_version >= 300003)
+
+	/* This was changed from a `struct timeval' into a `u_int64_t'
+	 * on FreeBSD 3.0 and renamed p_rtime -> p_runtime.
+	 */
+
+	totusec = (u_quad_t) p->p_runtime;
+#else
+	sec = p->p_rtime.tv_sec;
+	usec = p->p_rtime.tv_usec;
+
+	totusec = (quad_t)sec * 1000000 + usec;
+#endif
+
+	if (totusec < 0) {
+		/* XXX no %qd in kernel.  Truncate. */
+		fprintf (stderr, "calcru: negative time: %ld usec\n",
+			 (long)totusec);
+		totusec = 0;
+	}
+
+
+	u = totusec;
+	st = (u * st) / tot;
+	sp->tv_sec = st / 1000000;
+	sp->tv_usec = st % 1000000;
+	ut = (u * ut) / tot;
+	up->tv_sec = ut / 1000000;
+	up->tv_usec = ut % 1000000;
+	if (ip != NULL) {
+		it = (u * it) / tot;
+		ip->tv_sec = it / 1000000;
+		ip->tv_usec = it % 1000000;
+	}
+}
+
+/* Provides detailed information about a process. */
+
+void
+glibtop_get_proc_time_p (glibtop *server, glibtop_proc_time *buf,
+			 pid_t pid)
+{
+	struct kinfo_proc *pinfo;
+#if (defined(__NetBSD__) && (__NetBSD_Version__ >= 104000000)) || (defined(OpenBSD) && (OpenBSD >= 199912))
+	register struct rusage *rup;
+#else
+	struct user *u_addr = (struct user *)USRSTACK;
+#endif
+	struct pstats pstats;
+	int count;
+
+	char filename [BUFSIZ];
+	struct stat statb;
+
+	glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_PROC_TIME), 0);
+	
+	memset (buf, 0, sizeof (glibtop_proc_time));
+
+	/* It does not work for the swapper task. */
+	if (pid == 0) return;
+	
+#if !(defined(__NetBSD__) && (__NetBSD_Version__ >= 104000000))
+	if (server->sysdeps.proc_time == 0)
+		return;
+
+#ifndef __bsdi__
+	sprintf (filename, "/proc/%d/mem", (int) pid);
+	if (stat (filename, &statb)) return;
+#endif
+#endif
+
+	/* Get the process information */
+	pinfo = kvm_getprocs (server->machine.kd, KERN_PROC_PID, pid, &count);
+	if ((pinfo == NULL) || (count != 1))
+		glibtop_error_io_r (server, "kvm_getprocs (%d)", pid);
+
+#if (defined __FreeBSD__) && (__FreeBSD_version >= 300003)
+	buf->rtime = pinfo [0].kp_proc.p_runtime;
+#else
+	buf->rtime = tv2sec (pinfo [0].kp_proc.p_rtime);
+#endif
+
+	buf->frequency = 1000000;
+	buf->flags = _glibtop_sysdeps_proc_time;
+
+#if (defined(__NetBSD__) && (__NetBSD_Version__ >= 104000000)) || (defined(OpenBSD) && (OpenBSD >= 199912))
+	glibtop_suid_enter (server);
+
+	if (kvm_read (server->machine.kd,
+		      (unsigned long) pinfo [0].kp_proc.p_stats,
+		      &pstats, sizeof (pstats)) != sizeof (pstats)) {
+		glibtop_warn_io_r (server, "kvm_read (pstats)");
+		return;
+	}
+
+	glibtop_suid_leave (server);
+
+	rup = &pstats.p_ru;
+	calcru(&(pinfo [0]).kp_proc,
+	       &rup->ru_utime, &rup->ru_stime, NULL);
+
+	buf->utime = tv2sec (pstats.p_ru.ru_utime);
+	buf->stime = tv2sec (pstats.p_ru.ru_stime);
+			
+	buf->cutime = tv2sec (pstats.p_cru.ru_utime);
+	buf->cstime = tv2sec (pstats.p_cru.ru_stime);
+
+	buf->start_time = (u_int64_t) pstats.p_start.tv_sec;
+
+	buf->flags |= _glibtop_sysdeps_proc_time_user;
+#else
+	glibtop_suid_enter (server);
+
+	if ((pinfo [0].kp_proc.p_flag & P_INMEM) &&
+	    kvm_uread (server->machine.kd, &(pinfo [0]).kp_proc,
+		       (unsigned long) &u_addr->u_stats,
+		       (char *) &pstats, sizeof (pstats)) == sizeof (pstats))
+		{
+			/* This is taken form the kernel source code of
+			 * FreeBSD 2.2.6. */
+
+			/* Well, we just do the same getrusage () does ... */
+
+			register struct rusage *rup;
+
+			glibtop_suid_leave (server);
+
+			rup = &pstats.p_ru;
+			calcru(&(pinfo [0]).kp_proc,
+			       &rup->ru_utime, &rup->ru_stime, NULL);
+
+			buf->utime = tv2sec (pstats.p_ru.ru_utime);
+			buf->stime = tv2sec (pstats.p_ru.ru_stime);
+			
+			buf->cutime = tv2sec (pstats.p_cru.ru_utime);
+			buf->cstime = tv2sec (pstats.p_cru.ru_stime);
+
+			buf->start_time = tv2sec (pstats.p_start);
+
+			buf->flags = _glibtop_sysdeps_proc_time_user;
+		}
+
+	glibtop_suid_leave (server);
+#endif
+}
+

sysdeps/freebsd/procuid.c

@@ -0,0 +1,128 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/procuid.h>
+
+#include <glibtop_suid.h>
+
+static const unsigned long _glibtop_sysdeps_proc_uid =
+(1L << GLIBTOP_PROC_UID_UID) + (1L << GLIBTOP_PROC_UID_EUID) +
+(1L << GLIBTOP_PROC_UID_EGID) + (1L << GLIBTOP_PROC_UID_PID) +
+(1L << GLIBTOP_PROC_UID_PPID) + (1L << GLIBTOP_PROC_UID_PGRP) +
+(1L << GLIBTOP_PROC_UID_TPGID) + (1L << GLIBTOP_PROC_UID_PRIORITY) +
+(1L << GLIBTOP_PROC_UID_NICE);
+
+static const unsigned long _glibtop_sysdeps_proc_uid_groups =
+#if LIBGTOP_VERSION_CODE >= 1001000
+#if defined(__NetBSD__) && (__NetBSD_Version__ >= 104000000)
+(1L << GLIBTOP_PROC_UID_NGROUPS) + (1L << GLIBTOP_PROC_UID_GROUPS);
+#else
+0L;
+#endif
+#else /* LIBGTOP_VERSION_CODE < 1001000 */
+0L;
+#endif
+
+/* Init function. */
+
+void
+glibtop_init_proc_uid_p (glibtop *server)
+{
+	server->sysdeps.proc_uid = _glibtop_sysdeps_proc_uid |
+		_glibtop_sysdeps_proc_uid_groups;
+}
+
+/* Provides detailed information about a process. */
+
+void
+glibtop_get_proc_uid_p (glibtop *server, glibtop_proc_uid *buf,
+			pid_t pid)
+{
+	struct kinfo_proc *pinfo;
+	int count = 0;
+
+#if LIBGTOP_VERSION_CODE >= 1001000
+#if defined(__NetBSD__) && (__NetBSD_Version__ >= 104000000)
+	struct ucred ucred;
+	void *ucred_ptr;
+#endif
+#endif
+
+	glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_PROC_UID), 0);
+	
+	memset (buf, 0, sizeof (glibtop_proc_uid));
+
+	/* It does not work for the swapper task. */
+	if (pid == 0) return;
+	
+	/* Get the process information */
+	pinfo = kvm_getprocs (server->machine.kd, KERN_PROC_PID, pid, &count);
+	if ((pinfo == NULL) || (count != 1)) {
+		glibtop_warn_io_r (server, "kvm_getprocs (%d)", pid);
+		return;
+	}
+
+	buf->uid  = pinfo [0].kp_eproc.e_pcred.p_ruid;
+	buf->euid = pinfo [0].kp_eproc.e_pcred.p_svuid;
+	buf->gid  = pinfo [0].kp_eproc.e_pcred.p_rgid;
+	buf->egid = pinfo [0].kp_eproc.e_pcred.p_svgid;
+
+	buf->ppid  = pinfo [0].kp_eproc.e_ppid;
+	buf->pgrp  = pinfo [0].kp_eproc.e_pgid;
+	buf->tpgid = pinfo [0].kp_eproc.e_tpgid;
+
+	buf->nice     = pinfo [0].kp_proc.p_nice;
+	buf->priority = pinfo [0].kp_proc.p_priority;
+
+	/* Set the flags for the data we're about to return*/
+	buf->flags = _glibtop_sysdeps_proc_uid;
+
+	/* Use LibGTop conditionals here so we can more easily merge this
+	 * code into the LIBGTOP_STABLE_1_0 branch. */
+#if LIBGTOP_VERSION_CODE >= 1001000
+	/* This probably also works with other versions, but not yet
+	 * tested. Please remove the conditional if this is true. */
+#if defined(__NetBSD__) && (__NetBSD_Version__ >= 104000000)
+	ucred_ptr = (void *) pinfo [0].kp_eproc.e_pcred.pc_ucred;
+
+	if (ucred_ptr) {
+		if (kvm_read (server->machine.kd, (unsigned long) ucred_ptr,
+			      &ucred, sizeof (ucred)) != sizeof (ucred)) {
+			glibtop_warn_io_r (server, "kvm_read (ucred)");
+		} else {
+			int count = (ucred.cr_ngroups < GLIBTOP_MAX_GROUPS) ?
+				ucred.cr_ngroups : GLIBTOP_MAX_GROUPS;
+			int i;
+
+			for (i = 0; i < count; i++)
+				buf->groups [i] = ucred.cr_groups [i];
+			buf->ngroups = count;
+
+			buf->flags |= _glibtop_sysdeps_proc_uid_groups;
+		}
+	}
+#endif
+#endif
+}

sysdeps/freebsd/sem_limits.c

@@ -0,0 +1,120 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, August 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/sem_limits.h>
+
+#include <glibtop_suid.h>
+
+#if defined(__bsdi__) && (_BSDI_VERSION < 199700)
+/* Older versions of BSDI don't seem to have this. */
+
+void
+glibtop_init_sem_limits_p (glibtop *server)
+{ }
+
+void
+glibtop_get_sem_limits_p (glibtop *server, glibtop_sem_limits *buf)
+{
+        glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_SEM_LIMITS), 0);
+
+        memset (buf, 0, sizeof (glibtop_sem_limits));
+}
+
+#else
+
+/* #define KERNEL to get declaration of `struct seminfo'. */
+
+#if (defined(__FreeBSD__) && (__FreeBSD_version < 410000)) || defined(__bsdi__)
+#define KERNEL 1
+#else
+#define _KERNEL 1
+#endif
+
+#include <sys/ipc.h>
+#include <sys/sem.h>
+
+static unsigned long _glibtop_sysdeps_sem_limits =
+(1L << GLIBTOP_IPC_SEMMAP) + (1L << GLIBTOP_IPC_SEMMNI) +
+(1L << GLIBTOP_IPC_SEMMNS) + (1L << GLIBTOP_IPC_SEMMNU) +
+(1L << GLIBTOP_IPC_SEMMSL) + (1L << GLIBTOP_IPC_SEMOPM) +
+(1L << GLIBTOP_IPC_SEMUME) + (1L << GLIBTOP_IPC_SEMUSZ) +
+(1L << GLIBTOP_IPC_SEMVMX) + (1L << GLIBTOP_IPC_SEMAEM);
+
+/* The values in this structure never change at runtime, so we only
+ * read it once during initialization. We have to use the name `_seminfo'
+ * since `seminfo' is already declared external in <sys/sem.h>. */
+static struct seminfo _seminfo;
+  
+/* nlist structure for kernel access */
+static struct nlist nlst [] = {
+	{ "_seminfo" },
+	{ 0 }
+};
+
+/* Init function. */
+
+void
+glibtop_init_sem_limits_p (glibtop *server)
+{
+	if (kvm_nlist (server->machine.kd, nlst) < 0) {
+		glibtop_warn_io_r (server, "kvm_nlist (sem_limits)");
+		return;
+	}
+	
+	if (kvm_read (server->machine.kd, nlst [0].n_value,
+		      &_seminfo, sizeof (_seminfo)) != sizeof (_seminfo)) {
+		glibtop_warn_io_r (server, "kvm_read (seminfo)");
+		return;
+	}
+
+	server->sysdeps.sem_limits = _glibtop_sysdeps_sem_limits;
+}
+
+/* Provides information about sysv sem limits. */
+
+void
+glibtop_get_sem_limits_p (glibtop *server, glibtop_sem_limits *buf)
+{
+	glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_SEM_LIMITS), 0);
+	
+	memset (buf, 0, sizeof (glibtop_sem_limits));
+	
+	if (server->sysdeps.sem_limits == 0)
+		return;
+
+	buf->semmap = _seminfo.semmap;
+	buf->semmni = _seminfo.semmni;
+	buf->semmns = _seminfo.semmns;
+	buf->semmnu = _seminfo.semmnu;
+	buf->semmsl = _seminfo.semmsl;
+	buf->semopm = _seminfo.semopm;
+	buf->semvmx = _seminfo.semvmx;
+	buf->semaem = _seminfo.semaem;
+	
+	buf->flags = _glibtop_sysdeps_sem_limits;
+}
+
+#endif /* either a newer BSDI or no BSDI at all. */
+

sysdeps/freebsd/shm_limits.c

@@ -0,0 +1,115 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, August 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/shm_limits.h>
+
+#include <glibtop_suid.h>
+
+#if defined(__bsdi__) && (_BSDI_VERSION < 199700)
+/* Older versions of BSDI don't seem to have this. */
+
+void
+glibtop_init_shm_limits_p (glibtop *server)
+{ }
+
+void
+glibtop_get_shm_limits_p (glibtop *server, glibtop_shm_limits *buf)
+{
+        glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_SHM_LIMITS), 0);
+
+        memset (buf, 0, sizeof (glibtop_shm_limits));
+}
+
+#else
+
+/* #define KERNEL to get declaration of `struct shminfo'. */
+
+#if (defined(__FreeBSD__) && (__FreeBSD_version < 410000)) || defined(__bsdi__)
+#define KERNEL 1
+#else
+#define _KERNEL 1
+#endif
+
+#include <sys/ipc.h>
+#include <sys/shm.h>
+
+static unsigned long _glibtop_sysdeps_shm_limits =
+(1L << GLIBTOP_IPC_SHMMAX) + (1L << GLIBTOP_IPC_SHMMIN) +
+(1L << GLIBTOP_IPC_SHMMNI) + (1L << GLIBTOP_IPC_SHMSEG) +
+(1L << GLIBTOP_IPC_SHMALL);
+
+/* The values in this structure never change at runtime, so we only
+ * read it once during initialization. We have to use the name `_shminfo'
+ * since `shminfo' is already declared external in <sys/shm.h>. */
+static struct shminfo _shminfo;
+  
+/* nlist structure for kernel access */
+static struct nlist nlst [] = {
+	{ "_shminfo" },
+	{ 0 }
+};
+
+/* Init function. */
+
+void
+glibtop_init_shm_limits_p (glibtop *server)
+{
+	if (kvm_nlist (server->machine.kd, nlst) < 0) {
+		glibtop_warn_io_r (server, "kvm_nlist (shm_limits)");
+		return;
+	}
+	
+	if (kvm_read (server->machine.kd, nlst [0].n_value,
+		      &_shminfo, sizeof (_shminfo)) != sizeof (_shminfo)) {
+		glibtop_warn_io_r (server, "kvm_read (shminfo)");
+		return;
+	}
+
+	server->sysdeps.shm_limits = _glibtop_sysdeps_shm_limits;
+}
+
+/* Provides information about sysv ipc limits. */
+
+void
+glibtop_get_shm_limits_p (glibtop *server, glibtop_shm_limits *buf)
+{
+	glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_SHM_LIMITS), 0);
+	
+	memset (buf, 0, sizeof (glibtop_shm_limits));
+
+	if (server->sysdeps.shm_limits == 0)
+		return;
+
+	buf->shmmax = _shminfo.shmmax;
+	buf->shmmin = _shminfo.shmmin;
+	buf->shmmni = _shminfo.shmmni;
+	buf->shmseg = _shminfo.shmseg;
+	buf->shmall = _shminfo.shmall;
+
+	buf->flags = _glibtop_sysdeps_shm_limits;
+}
+
+#endif /* either a newer BSDI or no BSDI at all. */
+

sysdeps/freebsd/siglist.c

@@ -0,0 +1,28 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/signal.h>
+
+const glibtop_signame glibtop_sys_siglist [] =
+{ { 0, NULL, NULL } };

sysdeps/freebsd/swap.c

@@ -0,0 +1,426 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/swap.h>
+
+#include <glibtop/xmalloc.h>
+
+#include <glibtop_suid.h>
+
+static const unsigned long _glibtop_sysdeps_swap =
+(1L << GLIBTOP_SWAP_TOTAL) + (1L << GLIBTOP_SWAP_USED) +
+(1L << GLIBTOP_SWAP_FREE) + (1L << GLIBTOP_SWAP_PAGEIN) +
+(1L << GLIBTOP_SWAP_PAGEOUT);
+
+#if defined(__FreeBSD__) || defined(__bsdi__)
+
+#include <sys/conf.h>
+#ifdef __bsdi__
+#include <vm/swap_pager.h>
+#else
+#if __FreeBSD_version < 400005
+#include <sys/rlist.h>
+#endif
+#endif
+#include <sys/vmmeter.h>
+
+/* nlist structure for kernel access */
+
+#if defined(__bsdi__)
+static struct nlist nlst [] = {
+	{ "_swapstats" }, /* general swap info */
+	{ 0 }
+};
+#elif __FreeBSD__ < 4
+static struct nlist nlst [] = {
+#define VM_SWAPLIST	0
+	{ "_swaplist" },/* list of free swap areas */
+#define VM_SWDEVT	1
+	{ "_swdevt" },	/* list of swap devices and sizes */
+#define VM_NSWAP	2
+	{ "_nswap" },	/* size of largest swap device */
+#define VM_NSWDEV	3
+	{ "_nswdev" },	/* number of swap devices */
+#define VM_DMMAX	4
+	{ "_dmmax" },	/* maximum size of a swap block */
+	{ 0 }
+};
+#endif
+
+#elif defined(__NetBSD__)
+
+#if (__NetBSD_Version__ >= 104000000)
+#include <uvm/uvm_extern.h>
+#include <sys/swap.h>
+#else
+#include <vm/vm_swap.h>
+#endif
+
+#endif
+
+#if defined(__NetBSD__) && (__NetBSD_Version__ >= 104000000)
+static int mib_uvmexp [] = { CTL_VM, VM_UVMEXP };
+#else
+/* nlist structure for kernel access */
+static struct nlist nlst2 [] = {
+	{ "_cnt" },
+	{ 0 }
+};
+#endif
+
+/* Init function. */
+
+void
+glibtop_init_swap_p (glibtop *server)
+{
+#if defined(__FreeBSD__) || defined(__bsdi__)
+#if __FreeBSD__ < 4 || defined(__bsdi__)
+	if (kvm_nlist (server->machine.kd, nlst) < 0) {
+		glibtop_warn_io_r (server, "kvm_nlist (swap)");
+		return;
+	}
+#else
+	struct kvm_swap dummy;
+
+	if (kvm_getswapinfo (server->machine.kd, &dummy, 1, 0) != 0) {
+		glibtop_warn_io_r (server, "kvm_swap (swap)");
+		return;
+	}
+#endif
+#endif
+
+#if !(defined(__NetBSD__) && (__NetBSD_Version__ >= 104000000))
+	if (kvm_nlist (server->machine.kd, nlst2) < 0) {
+		glibtop_warn_io_r (server, "kvm_nlist (cnt)");
+		return;
+	}
+#endif
+
+	server->sysdeps.swap = _glibtop_sysdeps_swap;
+}
+
+/* Provides information about swap usage. */
+
+/*
+ * This function is based on a program called swapinfo written
+ * by Kevin Lahey <kml@rokkaku.atl.ga.us>.
+ */
+
+void
+glibtop_get_swap_p (glibtop *server, glibtop_swap *buf)
+{
+#if defined(__FreeBSD__)
+
+# if __FreeBSD__ < 4
+	char *header;
+	int hlen, nswdev, dmmax;
+	int div, nfree, npfree;
+	struct swdevt *sw;
+	long blocksize, *perdev;
+	struct rlist head;
+	struct rlisthdr swaplist;
+	struct rlist *swapptr;
+	size_t sw_size;
+	u_long ptr;
+# else
+	int nswdev;
+	struct kvm_swap kvmsw[16];
+# endif
+
+#elif defined(__bsdi__)	
+	struct swapstats swap;
+#elif defined(__NetBSD__)
+	struct swapent *swaplist;
+#endif
+
+	int nswap, i;
+	int avail = 0, inuse = 0;
+
+#if defined(__NetBSD__) && (__NetBSD_Version__ >= 104000000)
+	struct uvmexp uvmexp;
+	size_t length_uvmexp;
+#else
+	/* To get `pagein' and `pageout'. */
+	struct vmmeter vmm;
+#endif
+        static int swappgsin = -1;
+	static int swappgsout = -1;
+
+	glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_SWAP), 0);
+	
+	memset (buf, 0, sizeof (glibtop_swap));
+
+	if (server->sysdeps.swap == 0)
+		return;
+
+#if defined(__NetBSD__) && (__NetBSD_Version__ >= 104000000)
+	length_uvmexp = sizeof (uvmexp);
+	if (sysctl (mib_uvmexp, 2, &uvmexp, &length_uvmexp, NULL, 0)) {
+		glibtop_warn_io_r (server, "sysctl (uvmexp)");
+		return;
+	}
+#else
+	/* This is used to get the `pagein' and `pageout' members. */
+	
+	if (kvm_read (server->machine.kd, nlst2[0].n_value,
+		      &vmm, sizeof (vmm)) != sizeof (vmm)) {
+		glibtop_warn_io_r (server, "kvm_read (cnt)");
+		return;
+	}
+#endif
+
+        if (swappgsin < 0) {
+		buf->pagein = 0;
+		buf->pageout = 0;
+	} else {
+#ifdef __FreeBSD__
+		buf->pagein = vmm.v_swappgsin - swappgsin;
+		buf->pageout = vmm.v_swappgsout - swappgsout;
+#else
+#if defined(__NetBSD__) && (__NetBSD_Version__ >= 104000000)
+		buf->pagein = uvmexp.swapins - swappgsin;
+		buf->pageout = uvmexp.swapouts - swappgsout;
+#else
+		buf->pagein = vmm.v_swpin - swappgsin;
+		buf->pageout = vmm.v_swpout - swappgsout;
+#endif
+#endif
+	}
+
+#ifdef __FreeBSD__
+        swappgsin = vmm.v_swappgsin;
+	swappgsout = vmm.v_swappgsout;
+#else
+#if defined(__NetBSD__) && (__NetBSD_Version__ >= 104000000)
+	swappgsin = uvmexp.swapins;
+	swappgsout = uvmexp.swapouts;
+#else
+	swappgsin = vmm.v_swpin;
+	swappgsout = vmm.v_swpout;
+#endif
+#endif
+
+#if defined(__FreeBSD__)
+
+#if __FreeBSD__ < 4
+
+	/* Size of largest swap device. */
+
+	if (kvm_read (server->machine.kd, nlst[VM_NSWAP].n_value,
+		      &nswap, sizeof (nswap)) != sizeof (nswap)) {
+		glibtop_warn_io_r (server, "kvm_read (nswap)");
+		return;
+	}
+
+	/* Number of swap devices. */
+
+	if (kvm_read (server->machine.kd, nlst[VM_NSWDEV].n_value,
+		      &nswdev, sizeof (nswdev)) != sizeof (nswdev)) {
+		glibtop_warn_io_r (server, "kvm_read (nswdev)");
+		return;
+	}
+
+	/* Maximum size of a swap block. */
+
+	if (kvm_read (server->machine.kd, nlst[VM_DMMAX].n_value,
+		      &dmmax, sizeof (dmmax)) != sizeof (dmmax)) {
+		glibtop_warn_io_r (server, "kvm_read (dmmax)");
+		return;
+	}
+
+	/* List of free swap areas. */
+
+	if (kvm_read (server->machine.kd, nlst[VM_SWAPLIST].n_value,
+		      &swaplist, sizeof (swaplist)) != sizeof (swaplist)) {
+		glibtop_warn_io_r (server, "kvm_read (swaplist)");
+		return;
+	}
+
+	/* Kernel offset of list of swap devices and sizes. */
+
+	if (kvm_read (server->machine.kd, nlst[VM_SWDEVT].n_value,
+		      &ptr, sizeof (ptr)) != sizeof (ptr)) {
+		glibtop_warn_io_r (server, "kvm_read (swdevt)");
+		return;
+	}
+
+	/* List of swap devices and sizes. */
+
+	sw_size = nswdev * sizeof (*sw);
+	sw = glibtop_malloc_r (server, sw_size);
+
+	if (kvm_read (server->machine.kd, ptr, sw, sw_size) != (ssize_t)sw_size) {
+		glibtop_warn_io_r (server, "kvm_read (*swdevt)");
+		return;
+	}
+
+	perdev = glibtop_malloc (nswdev * sizeof (*perdev));
+
+	/* Count up swap space. */
+
+	nfree = 0;
+	memset (perdev, 0, nswdev * sizeof(*perdev));
+
+	swapptr = swaplist.rlh_list;
+
+	while (swapptr) {
+		int	top, bottom, next_block;
+
+		if (kvm_read (server->machine.kd, (int) swapptr, &head,
+			      sizeof (struct rlist)) != sizeof (struct rlist)) {
+			glibtop_warn_io_r (server, "kvm_read (swapptr)");
+			return;
+		}
+
+		top = head.rl_end;
+		bottom = head.rl_start;
+
+		nfree += top - bottom + 1;
+
+		/*
+		 * Swap space is split up among the configured disks.
+		 *
+		 * For interleaved swap devices, the first dmmax blocks
+		 * of swap space some from the first disk, the next dmmax
+		 * blocks from the next, and so on up to nswap blocks.
+		 *
+		 * The list of free space joins adjacent free blocks,
+		 * ignoring device boundries.  If we want to keep track
+		 * of this information per device, we'll just have to
+		 * extract it ourselves.
+		 */
+		while (top / dmmax != bottom / dmmax) {
+			next_block = ((bottom + dmmax) / dmmax);
+			perdev[(bottom / dmmax) % nswdev] +=
+				next_block * dmmax - bottom;
+			bottom = next_block * dmmax;
+		}
+		perdev[(bottom / dmmax) % nswdev] +=
+			top - bottom + 1;
+
+		swapptr = head.rl_next;
+	}
+
+	header = getbsize (&hlen, &blocksize);
+
+	div = blocksize / 512;
+	avail = npfree = 0;
+	for (i = 0; i < nswdev; i++) {
+		int xsize, xfree;
+
+		/*
+		 * Don't report statistics for partitions which have not
+		 * yet been activated via swapon(8).
+		 */
+		if (!(sw[i].sw_flags & SW_FREED))
+			continue;
+
+		/* The first dmmax is never allocated to avoid trashing of
+		 * disklabels
+		 */
+		xsize = sw[i].sw_nblks - dmmax;
+		xfree = perdev[i];
+		inuse = xsize - xfree;
+		npfree++;
+		avail += xsize;
+	}
+
+	/*
+	 * If only one partition has been set up via swapon(8), we don't
+	 * need to bother with totals.
+	 */
+	inuse = avail - nfree;
+
+	glibtop_free_r (server, sw);
+	glibtop_free_r (server, perdev);
+
+	buf->flags = _glibtop_sysdeps_swap;
+
+	buf->used = inuse;
+	buf->free = avail;
+
+	buf->total = inuse + avail;
+
+#else
+
+	nswdev = kvm_getswapinfo(server->machine.kd, kvmsw, 16, 0);
+
+	buf->flags = _glibtop_sysdeps_swap;
+
+	buf->used = kvmsw[nswdev].ksw_used;
+	buf->total = kvmsw[nswdev].ksw_total;
+
+	buf->free = buf->total - buf->used;
+
+#endif
+
+#elif defined(__bsdi__)
+
+	/* General info about swap devices. */
+
+	if (kvm_read (server->machine.kd, nlst[0].n_value,
+		      &swap, sizeof (swap)) != sizeof (swap)) {
+		glibtop_warn_io_r (server, "kvm_read (swap)");
+		return;
+	}
+
+	buf->flags = _glibtop_sysdeps_swap;
+
+	buf->used = swap.swap_total - swap.swap_free;
+	buf->free = swap.swap_free;
+
+	buf->total = swap.swap_total;
+
+#elif defined(__NetBSD__)
+
+	nswap = swapctl (SWAP_NSWAP, NULL, 0);
+	if (nswap < 0) {
+		glibtop_warn_io_r (server, "swapctl (SWAP_NSWAP)");
+		return;
+	}
+
+	swaplist = glibtop_calloc_r (server, nswap, sizeof (struct swapent));
+
+	if (swapctl (SWAP_STATS, swaplist, nswap) != nswap) {
+		glibtop_warn_io_r (server, "swapctl (SWAP_STATS)");
+		glibtop_free_r (server, swaplist);
+		return;
+	}
+
+	for (i = 0; i < nswap; i++) {
+		avail += swaplist[i].se_nblks;
+		inuse += swaplist[i].se_inuse;
+	}
+
+	glibtop_free_r (server, swaplist);
+
+	buf->flags = _glibtop_sysdeps_swap;
+
+	buf->used = inuse;
+	buf->free = avail;
+
+	buf->total = inuse + avail;
+#endif
+}

sysdeps/freebsd/uptime.c

@@ -0,0 +1,73 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/uptime.h>
+
+#include <glibtop/cpu.h>
+
+#include <glibtop_suid.h>
+
+static const unsigned long _glibtop_sysdeps_uptime =
+(1L << GLIBTOP_UPTIME_UPTIME) + (1L << GLIBTOP_UPTIME_IDLETIME);
+
+static const unsigned long _required_cpu_flags =
+(1L << GLIBTOP_CPU_TOTAL) + (1L << GLIBTOP_CPU_IDLE) +
+(1L << GLIBTOP_CPU_FREQUENCY);
+
+/* Init function. */
+
+void
+glibtop_init_uptime_p (glibtop *server)
+{
+	server->sysdeps.uptime = _glibtop_sysdeps_uptime;
+}
+
+/* Provides uptime and idle time. */
+
+void
+glibtop_get_uptime_p (glibtop *server, glibtop_uptime *buf)
+{
+	glibtop_cpu cpu;
+
+	glibtop_init_p (server, (1L << GLIBTOP_SYSDEPS_UPTIME), 0);
+	
+	memset (buf, 0, sizeof (glibtop_uptime));
+
+	/* We simply calculate it from the CPU usage. */
+
+	glibtop_get_cpu_p (server, &cpu);
+
+	/* Make sure all required fields are present. */
+
+	if ((cpu.flags & _required_cpu_flags) != _required_cpu_flags)
+		return;
+
+	/* Calculate values. */
+
+	buf->uptime = (double) cpu.total / (double) cpu.frequency;
+	buf->idletime = (double) cpu.idle / (double) cpu.frequency;
+
+	buf->flags = _glibtop_sysdeps_uptime;
+}

sysdeps/guile/.cvsignore

@@ -0,0 +1,9 @@
+.deps
+.libs
+Makefile
+Makefile.in
+guile.c
+so_locations
+libgtop_guile.la
+*.lo
+*.x

sysdeps/guile/ChangeLog

@@ -0,0 +1,50 @@
+1999-02-04  Martin Baulig  <martin@home-of-linux.org>
+
+	* names/guile-names.awk: Use `_' instead of `gettext'.
+
+1999-01-22  Martin Baulig  <martin@home-of-linux.org>
+
+	* names/guile-names.awk: Use a `(TYPE . DIMENSION)' pair for
+	array types in `glibtop-types-*'.
+
+1998-12-09  Martin Baulig  <martin@home-of-linux.org>
+
+	* guile.awk: For arrays, make a gh_list out of it and add this list
+	to the returned list instead of adding all array fields there.
+
+1998-12-08  Martin Baulig  <martin@home-of-linux.org>
+
+	* guile.awk (glibtop-get-sysdeps): New guile function.
+	
+	* guile.awk (glibtop_get_proc_map): Make a gh_list for each map
+	entry and append all of them to the returned list.
+	(glibtop_get_mountlist): Likewise.
+
+1998-10-20  Martin Baulig  <martin@home-of-linux.org>
+
+	* guile.awk: If the features.def contains something like
+	`fieldname[number]' we interpret this as an array and add all
+ 	members of this array.
+
+1998-10-12  Martin Baulig  <martin@home-of-linux.org>
+
+	* Makefile.am: Let the `Makefile' depend upon $(BUILT_SOURCES).
+	This is required to get dependencies correctly.
+	* names/Makefile.am: Likewise.
+
+1998-10-11  Martin Baulig  <martin@home-of-linux.org>
+
+	* names/Makefile.am (BUILT_SOURCES, CLEANFILES): Added
+ 	`guile-names.x' here and a rule to make it from `guile-names.c'
+ 	using guile-snarf.
+
+	* names/guile-names.awk: Use the SCM_GLOBAL_VCELL macros and
+	guile-snarf here; declared all `glibtop_guile_*' functions static.
+	
+	* guile.awk: Declared all `glibtop_guile_get_*' functions static.
+
+	* Makefile.am (BUILT_SOURCES, CLEANFILES): Added `guile.x'.
+	Added rule to make `guile.x' from `guile.c' using guile-snarf.
+
+	* guile.awk: Use the SCM_PROC macros and guile-snarf here.
+

sysdeps/guile/Makefile.am

@@ -0,0 +1,27 @@
+SUBDIRS				= names
+
+LINK				= $(LIBTOOL) --mode=link $(CC) $(CFLAGS) $(LDFLAGS) -o $@
+
+INCLUDES			= @INCLUDES@
+
+BUILT_SOURCES			= guile.c guile.x
+
+lib_LTLIBRARIES			= libgtop_guile-2.0.la
+
+libgtop_guile_2_0_la_SOURCES	= $(BUILT_SOURCES)
+
+libgtop_guile_2_0_la_LDFLAGS	= $(LT_VERSION_INFO)
+
+Makefile: $(BUILT_SOURCES)
+
+guile.c: guile.pl $(top_builddir)/config.h $(top_srcdir)/features.def
+	$(PERL) $(srcdir)/guile.pl < $(top_srcdir)/features.def > gnc-t
+	mv gnc-t guile.c
+
+guile.x: guile.c
+	guile-snarf $(DEFS) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) $< > $@
+
+EXTRA_DIST			= guile.pl
+
+CLEANFILES			= guile.c guile.x
+

sysdeps/guile/guile.pl

@@ -0,0 +1,274 @@
+#!/usr/bin/perl
+
+$[ = 1;			# set array base to 1
+$, = ' ';		# set output field separator
+$\ = "\n";		# set output record separator
+
+sub toupper {
+    local($_) = @_;
+    tr/a-z/A-Z/;
+    return $_;
+}
+
+sub tolower {
+    local($_) = @_;
+    tr/A-Z/a-z/;
+    return $_;
+}
+
+print '/* guile.c */';
+print "/* This is a generated file.  Please modify `guile.pl' */";
+print '';
+
+print '#include <glibtop.h>';
+print '#include <glibtop/xmalloc.h>';
+print '#include <glibtop/sysdeps.h>';
+print '#include <glibtop/union.h>';
+print '';
+print '#include <guile/gh.h>';
+
+print '';
+
+$convert{'long'} = 'gh_long2scm  ';
+$convert{'ulong'} = 'gh_ulong2scm ';
+$convert{'double'} = 'gh_double2scm';
+$convert{'str'} = 'gh_str02scm  ';
+$convert{'char'} = 'gh_char2scm  ';
+
+$backconv{'int'} = 'gh_scm2long';
+$backconv{'pid_t'} = 'gh_scm2ulong';
+$backconv{'long'} = 'gh_scm2long';
+$backconv{'ulong'} = 'gh_scm2ulong';
+$backconv{'unsigned'} = 'gh_scm2ulong';
+
+$feature_count = 0;
+
+while (<>) {
+    chop;	# strip record separator
+
+    if (/^[^#]/) {
+	&make_output($_);
+    }
+}
+
+$sep = '';
+$sysdeps = 'void|sysdeps|ulong(';
+for ($nr = 0; $nr < $feature_count; $nr++) {
+    $sysdeps = $sysdeps . '' . $sep . '' . $feature_field{$nr};
+    $sep = ',';
+}
+$sysdeps = $sysdeps . ')';
+&make_output($sysdeps);
+print 'void';
+print 'glibtop_boot_guile (void)';
+print '{';
+print "#include \"guile.x\"";
+print '}';
+
+sub make_output {
+    local($line) = @_;
+    @line_fields = split(/\|/, $line, 9999);
+    $retval = $line_fields[1];
+    $element_def = $line_fields[3];
+    $feature = $line_fields[2];
+    $param_def = $line_fields[4];
+
+    $feature =~ s/^@//;
+    $features{$feature} = $feature;
+
+    $feature_field{$feature_count} = $feature;
+    $feature_count = $feature_count + 1;
+
+    $total_nr_params = 0;
+
+    if ($param_def eq 'string') {
+	$call_param = ', gh_scm2newstr( ' . $line_fields[5] . ', NULL)';
+	$param_decl = 'SCM ' . $line_fields[5];
+	$total_nr_params = 1;
+    }
+    else {
+	$call_param = '';
+	$param_decl = '';
+	$nr_params = (@params = split(/:/, $param_def, 9999));
+	for ($param = 1; $param <= $nr_params; $param++) {
+	    $list = $params[$param];
+	    $type = $params[$param];
+	    $type =~ s/\(.*//;
+	    $list =~ s/^.*\(//;
+	    $list =~ s/\)$//;
+	    $count = (@fields = split(/,/, $list, 9999));
+	    $total_nr_params = $total_nr_params + $count;
+	    for ($field = 1; $field <= $count; $field++) {
+		if ($param_decl ne '') {
+		    $param_decl = $param_decl . ', ';
+		}
+		$param_decl = $param_decl . 'SCM ' . $fields[$field];
+		$call_param = $call_param . ', ' . $backconv{$type} . ' (' .
+
+		  $fields[$field] . ')';
+	    }
+	}
+	if ($param_decl eq '') {
+	    $param_decl = 'void';
+	}
+    }
+
+    $nr_params_field{$feature} = $total_nr_params;
+
+    $feature_name = $feature;
+    $feature_name =~ s/_/-/;
+    $output = 'SCM_PROC (s_' . $feature . ", \"glibtop-get-" . $feature_name .
+
+      "\",";
+    $output = $output . ' ' . $nr_params_field{$feature} . ', 0, 0, ';
+    $output = $output . 'glibtop_guile_get_' . $feature . ");\n\n";
+
+    $output = $output . "static SCM\nglibtop_guile_get_" . $feature . ' (' .
+
+      $param_decl . ")\n{\n";
+
+    $output = $output . "\tglibtop_" . $feature . ' ' . $feature . ";\n";
+    if ($retval ne 'void') {
+	$output = $output . "\t" . $retval . " retval;\n";
+    }
+    if ($feature =~ /^(proc(list|_map|_args))|mountlist$/) {
+	$output = $output . "\tunsigned i;\n";
+    }
+    if ($feature =~ /^proc_args$/) {
+	$output = $output . "\tSCM list, scm_args, args_list;\n";
+	$output = $output . "\tchar *start;\n\n";
+    }
+    else {
+	$output = $output . "\tSCM list;\n\n";
+    }
+    if ($retval ne 'void') {
+	$prefix = 'retval = ';
+    }
+    else {
+	$prefix = '';
+    }
+    $output = $output . "\t" . $prefix . 'glibtop_get_' . $feature . ' (&' .
+
+      $feature . '' . $call_param . ");\n\n";
+
+    $output = $output . "\tlist = gh_list (gh_ulong2scm  (" . $feature .
+
+      ".flags),\n\t\t\t";
+
+    $nr_elements = (@elements = split(/:/, $element_def, 9999));
+    for ($element = 1; $element <= $nr_elements; $element++) {
+	$list = $elements[$element];
+	$type = $elements[$element];
+	$type =~ s/\(.*//;
+	$list =~ s/^.*\(//;
+	$list =~ s/\)$//;
+	$count = (@fields = split(/,/, $list, 9999));
+	for ($field = 1; $field <= $count; $field++) {
+	    if ($fields[$field] =~ /^(\w+)\[([0-9]+)\]$/) {
+		@field_parts = split(/\[/, $fields[$field], 9999);
+		$fields[$field] = $field_parts[1];
+		$field_parts[2] =~ s/\]//;
+		$number = $field_parts[2];
+		$output = $output . "gh_list\n\t\t\t(";
+		for ($nr = 0; $nr < $number; $nr++) {
+		    $output = $output . '' . $convert{$type} . ' (' . $feature
+
+		      . '.' . $fields[$field] . ' [' . $nr . "]),\n\t\t\t ";
+		}
+		$output = $output . "SCM_UNDEFINED),\n\t\t\t";
+	    }
+	    else {
+		$output = $output . '' . $convert{$type} . ' (' . $feature .
+
+		  '.' . $fields[$field] . "),\n\t\t\t";
+	    }
+	}
+    }
+    $output = $output . "SCM_UNDEFINED);\n";
+
+    print $output;
+
+    if ($feature =~ /^proclist$/) {
+	print "\tif (retval == NULL)";
+	print "\t\treturn list;";
+	print '';
+	print "\tfor (i = 0; i < proclist.number; i++)";
+	print "\t\tlist = scm_append";
+	print "\t\t\t(gh_list (list,";
+	print
+
+	  "\t\t\t\t  gh_list (gh_ulong2scm ((unsigned long) retval [i])),";
+	print "\t\t\t\t  SCM_UNDEFINED));";
+	print '';
+	print "\tglibtop_free (retval);\n";
+    }
+
+    if ($feature =~ /^proc_map$/) {
+	print "\tif (retval == NULL)";
+	print "\t\treturn list;";
+	print '';
+	print "\tfor (i = 0; i < proc_map.number; i++) {";
+	print "\t\tglibtop_map_entry *entry = &(retval [i]);";
+	print "\t\tSCM scm_entry = gh_list";
+	print "\t\t\t(gh_ulong2scm ((unsigned long) entry->flags),";
+	print "\t\t\t gh_ulong2scm ((unsigned long) entry->start),";
+	print "\t\t\t gh_ulong2scm ((unsigned long) entry->end),";
+	print "\t\t\t gh_ulong2scm ((unsigned long) entry->offset),";
+	print "\t\t\t gh_ulong2scm ((unsigned long) entry->perm),";
+	print "\t\t\t gh_ulong2scm ((unsigned long) entry->inode),";
+	print "\t\t\t gh_ulong2scm ((unsigned long) entry->device),";
+	print "\t\t\t gh_str02scm (entry->filename), SCM_UNDEFINED);";
+	print "\t\tSCM entry_list = gh_list (scm_entry, SCM_UNDEFINED);\n";
+
+	print
+
+	  "\t\tlist = scm_append (gh_list (list, entry_list, SCM_UNDEFINED));";
+	print "\t};\n";
+	print "\tglibtop_free (retval);\n";
+    }
+
+    if ($feature =~ /^proc_args$/) {
+	print "\tif (retval == NULL)";
+	print "\t\treturn list;";
+	print '';
+	print "\tstart = retval;";
+	print "\tscm_args = gh_list (SCM_UNDEFINED);\n";
+	print "\tfor (i = 0; i <= proc_args.size; i++) {";
+	print "\t\tSCM arg_list;\n";
+	print "\t\tif (retval [i]) continue;\n";
+	print "\t\targ_list = gh_list (gh_str02scm (start), SCM_UNDEFINED);";
+	print "\t\tscm_args = scm_append";
+	print "\t\t\t(gh_list (scm_args, arg_list, SCM_UNDEFINED));\n;";
+	print "\t\tstart = &(retval [i+1]);";
+	print "\t};\n";
+	print "\targs_list = gh_list (scm_args, SCM_UNDEFINED);";
+	print
+
+	  "\tlist = scm_append (gh_list (list, args_list, SCM_UNDEFINED));\n";
+	print "\tglibtop_free (retval);\n";
+    }
+
+    if ($feature =~ /^mountlist$/) {
+	print "\tif (retval == NULL)";
+	print "\t\treturn list;";
+	print '';
+	print "\tfor (i = 0; i < mountlist.number; i++) {";
+	print "\t\tglibtop_mountentry *entry = &(retval [i]);";
+	print "\t\tSCM scm_entry = gh_list";
+	print "\t\t\t(gh_ulong2scm ((unsigned long) entry->dev),";
+	print "\t\t\t gh_str02scm (entry->devname),";
+	print "\t\t\t gh_str02scm (entry->mountdir),";
+	print "\t\t\t gh_str02scm (entry->type), SCM_UNDEFINED);";
+	print "\t\tSCM entry_list = gh_list (scm_entry, SCM_UNDEFINED);\n";
+
+	print
+
+	  "\t\tlist = scm_append (gh_list (list, entry_list, SCM_UNDEFINED));";
+	print "\t};\n";
+	print "\tglibtop_free (retval);\n";
+    }
+
+    print "\treturn list;";
+    print '}';
+    print '';
+}

sysdeps/guile/names/.cvsignore

@@ -0,0 +1,10 @@
+.deps
+so_locations
+.libs
+Makefile
+guile-names.c
+Makefile.in
+libgtop_guile.la
+libgtop_guile_names.la
+*.lo
+*.x

sysdeps/guile/names/Makefile.am

@@ -0,0 +1,25 @@
+LINK				= $(LIBTOOL) --mode=link $(CC) $(CFLAGS) $(LDFLAGS) -o $@
+
+INCLUDES			= @INCLUDES@
+
+lib_LTLIBRARIES			= libgtop_guile_names-2.0.la
+
+BUILT_SOURCES			= guile-names.c guile-names.x
+
+libgtop_guile_names_2_0_la_SOURCES	= $(BUILT_SOURCES)
+
+libgtop_guile_names_2_0_la_LDFLAGS	= $(LT_VERSION_INFO)
+
+Makefile: $(BUILT_SOURCES)
+
+guile-names.c: guile-names.pl $(top_builddir)/config.h $(top_srcdir)/features.def
+	$(PERL) $(srcdir)/guile-names.pl < $(top_srcdir)/features.def > gnc-t
+	mv gnc-t guile-names.c
+
+guile-names.x: guile-names.c
+	guile-snarf $(DEFS) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) $< > $@
+
+EXTRA_DIST			= guile-names.pl
+
+CLEANFILES			= guile-names.c guile-names.x
+

sysdeps/guile/names/guile-names.pl

@@ -0,0 +1,197 @@
+#!/usr/bin/perl
+
+$[ = 1;			# set array base to 1
+$, = ' ';		# set output field separator
+$\ = "\n";		# set output record separator
+
+sub toupper {
+    local($_) = @_;
+    tr/a-z/A-Z/;
+    return $_;
+}
+
+sub tolower {
+    local($_) = @_;
+    tr/A-Z/a-z/;
+    return $_;
+}
+
+print '/* guile_names.c */';
+print "/* This is a generated file.  Please modify `guile-names.pl' */";
+print '';
+
+print '#include <glibtop.h>';
+print '#include <glibtop/sysdeps.h>';
+print '#include <glibtop/union.h>';
+print '';
+print '#include <guile/gh.h>';
+
+print '';
+
+while (<>) {
+    chop;	# strip record separator
+
+    if (/^[^#]/) {
+	$line = $_;
+	@line_fields = split(/\|/, $line, 9999);
+	$feature = $line_fields[2];
+	$element_def = $line_fields[3];
+	$feature =~ s/^@//;
+
+	$features{$feature} = $feature;
+	$element_defs{$feature} = $element_def;
+    }
+}
+
+$features{'sysdeps'} = 'sysdeps';
+
+foreach $feature (keys %features) {
+    &output($feature);
+}
+
+foreach $feature (keys %features) {
+    $feature_name = $feature;
+    $feature_name =~ s/_/-/;
+    print 'SCM_GLOBAL_VCELL (s_names_' . $feature . ", \"glibtop-names-" .
+
+      $feature_name . "\");";
+    print 'SCM_GLOBAL_VCELL (s_labels_' . $feature . ", \"glibtop-labels-" .
+
+      $feature_name . "\");";
+    print 'SCM_GLOBAL_VCELL (s_types_' . $feature . ", \"glibtop-types-" .
+
+      $feature_name . "\");";
+    print 'SCM_GLOBAL_VCELL (s_descriptions_' . $feature .
+
+      ", \"glibtop-descriptions-" . $feature_name . "\");";
+}
+print '';
+
+print 'void';
+print 'glibtop_boot_guile_names (void)';
+print '{';
+print "#include \"guile-names.x\"";
+foreach $feature (keys %features) {
+    print 'SCM_SETCDR (s_names_' . $feature . ', glibtop_guile_names_' .
+
+      $feature . ' ());';
+    print 'SCM_SETCDR (s_labels_' . $feature . ', glibtop_guile_labels_' .
+
+      $feature . ' ());';
+    print 'SCM_SETCDR (s_types_' . $feature . ', glibtop_guile_types_' .
+
+      $feature . ' ());';
+    print 'SCM_SETCDR (s_descriptions_' . $feature .
+
+      ', glibtop_guile_descriptions_' . $feature . ' ());';
+}
+print '}';
+
+sub output {
+    local($feature) = @_;
+    print 'static SCM';
+    print 'glibtop_guile_names_' . $feature . ' (void)';
+    print '{';
+    print "\tint i;";
+    print "\tSCM list;";
+    print '';
+    print "\tlist = gh_list (SCM_UNDEFINED);";
+    print '';
+    print "\tfor (i = 0; i < GLIBTOP_MAX_" . &toupper($feature) . '; i++)';
+    print "\t\tlist = scm_append";
+    print "\t\t\t(gh_list (list,";
+    print "\t\t\t\t  gh_list (gh_str02scm ((char *) glibtop_names_" . $feature
+
+      . ' [i])),';
+    print "\t\t\t\t  SCM_UNDEFINED));";
+    print '';
+    print "\treturn list;";
+    print '}';
+
+    print '';
+
+    print 'static SCM';
+    print 'glibtop_guile_types_' . $feature . ' (void)';
+    print '{';
+    print "\tSCM list;";
+    print '';
+
+    $out = "\tlist = gh_list (";
+
+    $nr_elements = (@elements = split(/:/, $element_defs{$feature}, 9999));
+    for ($element = 1; $element <= $nr_elements; $element++) {
+	$list = $elements[$element];
+	$type = $elements[$element];
+	$type =~ s/\(.*//;
+	$list =~ s/^.*\(//;
+	$list =~ s/\)$//;
+	$count = (@fields = split(/,/, $list, 9999));
+	for ($field = 1; $field <= $count; $field++) {
+	    if ($fields[$field] =~ /^(\w+)\[([0-9]+)\]$/) {
+		@field_parts = split(/\[/, $fields[$field], 9999);
+		$fields[$field] = $field_parts[1];
+		$field_parts[2] =~ s/\]//;
+		$number = $field_parts[2];
+		$out = $out . "gh_cons\n\t\t\t";
+		$out = $out . '(gh_ulong2scm (glibtop_types_' . $feature .
+
+		  ' [' . ($field - 1) . "]),\n\t\t\t";
+		$out = $out . ' gh_ulong2scm (' . $number . ")),\n\t\t\t";
+	    }
+	    else {
+		$out = $out . 'gh_ulong2scm (glibtop_types_' . $feature . ' ['
+
+		  . ($field - 1) . "]),\n\t\t\t";
+	    }
+	}
+    }
+
+    print $out . 'SCM_UNDEFINED);';
+    print '';
+    print "\treturn list;";
+    print '}';
+
+    print '';
+
+    print 'static SCM';
+    print 'glibtop_guile_labels_' . $feature . ' (void)';
+    print '{';
+    print "\tint i;";
+    print "\tSCM list;";
+    print '';
+    print "\tlist = gh_list (SCM_UNDEFINED);";
+    print '';
+    print "\tfor (i = 0; i < GLIBTOP_MAX_" . &toupper($feature) . '; i++)';
+    print "\t\tlist = scm_append";
+    print "\t\t\t(gh_list (list,";
+    print "\t\t\t\t  gh_list (gh_str02scm (_(glibtop_labels_" . $feature .
+
+      ' [i]))),';
+    print "\t\t\t\t  SCM_UNDEFINED));";
+    print '';
+    print "\treturn list;";
+    print '}';
+
+    print '';
+
+    print 'static SCM';
+    print 'glibtop_guile_descriptions_' . $feature . ' (void)';
+    print '{';
+    print "\tint i;";
+    print "\tSCM list;";
+    print '';
+    print "\tlist = gh_list (SCM_UNDEFINED);";
+    print '';
+    print "\tfor (i = 0; i < GLIBTOP_MAX_" . &toupper($feature) . '; i++)';
+    print "\t\tlist = scm_append";
+    print "\t\t\t(gh_list (list,";
+    print "\t\t\t\t  gh_list (gh_str02scm (_(glibtop_descriptions_" . $feature
+
+      . ' [i]))),';
+    print "\t\t\t\t  SCM_UNDEFINED));";
+    print '';
+    print "\treturn list;";
+    print '}';
+
+    print '';
+}

sysdeps/kernel/.cvsignore

@@ -0,0 +1,28 @@
+.deps
+.libs
+Makefile
+Makefile.in
+close.lo
+cpu.lo
+init.lo
+ipc_limits.lo
+libgtop_sysdeps.la
+loadavg.lo
+mem.lo
+msg_limits.lo
+open.lo
+procdata.lo
+prockernel.lo
+proclist.lo
+procmem.lo
+procsegment.lo
+procsignal.lo
+procstate.lo
+proctime.lo
+procuid.lo
+sem_limits.lo
+shm_limits.lo
+swap.lo
+sysdeps.lo
+sysinfo.lo
+uptime.lo

sysdeps/kernel/ChangeLog

@@ -0,0 +1,27 @@
+2001-10-17  Abel Cheung <maddog@linux.org.hk>
+
+	* Makefile.am: move header to $(includedir)/libgtop-1.0/glibtop.
+
+1998-10-26  Martin Baulig  <martin@home-of-linux.org>
+
+	* netload.c: New file. Currently empty.
+
+1998-10-26  Martin Baulig  <martin@home-of-linux.org>
+
+	* procargs.c: New file. Currently empty.
+
+1998-10-25  Martin Baulig  <martin@home-of-linux.org>
+
+	* ppp.c: New file. Currently empty.
+
+1998-06-14  Martin Baulig  <martin@home-of-linux.org>
+
+	* kernel.s: New file - declaration of the table () function
+	via _syscall3 (); due to a bug in egcs, we cannot put this
+	into a C file.
+
+1998-06-13  Martin Baulig  <martin@home-of-linux.org>
+
+	The code in this directory fetches all information
+	directly from the kernel. It uses the new table ()
+	system call from the `kernel' directory.

sysdeps/kernel/Makefile.am

@@ -0,0 +1,25 @@
+LINK				= $(LIBTOOL) --mode=link $(CC) $(CFLAGS) $(LDFLAGS) -o $@
+
+INCLUDES			= @INCLUDES@
+
+lib_LTLIBRARIES			= libgtop_sysdeps-2.0.la
+
+libgtop_sysdeps_2_0_la_SOURCES	= open.c close.c kernel.s cpu.c mem.c swap.c \
+				  uptime.c loadavg.c shm_limits.c msg_limits.c \
+				  sem_limits.c proclist.c procstate.c procuid.c \
+				  proctime.c procmem.c procsignal.c prockernel.c \
+				  procsegment.c siglist.c procargs.c procmap.c \
+				  netload.c ppp.c
+
+libgtop_sysdeps_2_0_la_LDFLAGS	= $(LT_VERSION_INFO)
+
+libgtopinclude_HEADERS		= glibtop_server.h
+libgtopincludedir		= $(includedir)/libgtop-2.0
+
+noinst_HEADERS			= kernel.h
+
+kernel.o kernel.lo: $(srcdir)/kernel.s
+	rm -f kernel.o kernel.lo
+	$(AS) -o kernel.o $(srcdir)/kernel.s
+	cp kernel.o kernel.lo
+

sysdeps/kernel/close.c

@@ -0,0 +1,30 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop/close.h>
+
+/* Closes pipe to gtop server. */
+
+void
+glibtop_close_s (glibtop *server)
+{ }

sysdeps/kernel/cpu.c

@@ -0,0 +1,65 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <config.h>
+#include <glibtop/error.h>
+#include <glibtop/cpu.h>
+
+#include "kernel.h"
+
+static const unsigned long _glibtop_sysdeps_cpu =
+(1 << GLIBTOP_CPU_TOTAL) + (1 << GLIBTOP_CPU_USER) +
+(1 << GLIBTOP_CPU_NICE) + (1 << GLIBTOP_CPU_SYS) +
+(1 << GLIBTOP_CPU_IDLE) + (1 << GLIBTOP_CPU_FREQUENCY);
+
+/* Init function. */
+
+void
+glibtop_init_cpu_s (glibtop *server)
+{
+	server->sysdeps.cpu = _glibtop_sysdeps_cpu;
+}
+
+/* Provides information about cpu usage. */
+
+void
+glibtop_get_cpu_s (glibtop *server, glibtop_cpu *buf)
+{
+	union table tbl;
+
+	glibtop_init_s (&server, GLIBTOP_SYSDEPS_CPU, 0);
+
+	memset (buf, 0, sizeof (glibtop_cpu));
+
+	if (table (TABLE_CPU, &tbl, NULL))
+		glibtop_error_io_r (server, "table(TABLE_CPU)");
+
+	buf->flags = _glibtop_sysdeps_cpu;
+
+	buf->total = tbl.cpu.total;
+	buf->user = tbl.cpu.user;
+	buf->nice = tbl.cpu.nice;
+	buf->sys = tbl.cpu.sys;
+	buf->idle = tbl.cpu.idle;
+	buf->frequency = tbl.cpu.frequency;
+}

sysdeps/kernel/glibtop_private.h

@@ -0,0 +1,89 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, March 1999.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#ifndef __GLIBTOP_PRIVATE_H__
+#define __GLIBTOP_PRIVATE_H__
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+
+#include <sys/param.h>
+#include <sys/sysctl.h>
+#include <sys/user.h>
+
+#undef LIBGTOP_VERSION
+#include <linux/libgtop.h>
+
+BEGIN_LIBGTOP_DECLS
+
+int
+glibtop_get_proc_data_stat_s (glibtop *server, libgtop_stat_t *stat);
+
+int
+glibtop_get_proc_data_mem_s (glibtop *server, libgtop_mem_t *mem);
+
+int
+glibtop_get_proc_data_swap_s (glibtop *server, libgtop_swap_t *swap);
+
+int
+glibtop_get_proc_data_proclist_s (glibtop *server,
+				  libgtop_proclist_t *proclist,
+				  u_int64_t which, u_int64_t arg);
+
+int
+glibtop_get_proc_data_proc_state_s (glibtop *server,
+				    libgtop_proc_state_t *proc_state,
+				    pid_t pid);
+
+int
+glibtop_get_proc_data_proc_mem_s (glibtop *server,
+				  libgtop_proc_mem_t *proc_mem,
+				  pid_t pid);
+
+int
+glibtop_get_proc_data_proc_signal_s (glibtop *server,
+				     libgtop_proc_signal_t *proc_signal,
+				     pid_t pid);
+
+int
+glibtop_get_proc_data_proc_kernel_s (glibtop *server,
+				     libgtop_proc_kernel_t *proc_kernel,
+				     pid_t pid);
+
+int
+glibtop_get_proc_data_proc_args_s (glibtop *server, pid_t pid,
+				   char *result, size_t max_len);
+
+int
+glibtop_get_proc_data_proc_maps_s (glibtop *server, pid_t pid,
+				   libgtop_proc_maps_t *result,
+				   size_t max_len);
+
+int
+glibtop_get_proc_data_netload_s (glibtop *server,
+				 libgtop_netload_t *netload,
+				 const char *device);
+
+END_LIBGTOP_DECLS
+
+#endif /* __GLIBTOP_PRIVATE_H__ */

sysdeps/kernel/glibtop_server.h

@@ -0,0 +1,52 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#ifndef __GLIBTOP_SERVER_H__
+#define __GLIBTOP_SERVER_H__
+
+BEGIN_LIBGTOP_DECLS
+
+#define GLIBTOP_SUID_CPU		0
+#define GLIBTOP_SUID_MEM		0
+#define GLIBTOP_SUID_SWAP		0
+#define GLIBTOP_SUID_UPTIME		0
+#define GLIBTOP_SUID_LOADAVG		0
+#define GLIBTOP_SUID_SHM_LIMITS		0
+#define GLIBTOP_SUID_MSG_LIMITS		0
+#define GLIBTOP_SUID_SEM_LIMITS		0
+#define GLIBTOP_SUID_PROCLIST		0
+#define GLIBTOP_SUID_PROC_STATE		0
+#define GLIBTOP_SUID_PROC_UID		0
+#define GLIBTOP_SUID_PROC_MEM		0
+#define GLIBTOP_SUID_PROC_TIME		0
+#define GLIBTOP_SUID_PROC_SIGNAL	0
+#define GLIBTOP_SUID_PROC_KERNEL	0
+#define GLIBTOP_SUID_PROC_SEGMENT	0
+#define GLIBTOP_SUID_PROC_ARGS		0
+#define GLIBTOP_SUID_PROC_MAP		0
+#define GLIBTOP_SUID_NETLOAD		0
+#define GLIBTOP_SUID_PPP		0
+
+END_LIBGTOP_DECLS
+
+#endif

sysdeps/kernel/kernel.h

@@ -0,0 +1,40 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#ifndef __GLIBTOP_KERNEL_KERNEL_H__
+#define __GLIBTOP_KERNEL_KERNEL_H__
+
+#include <linux/unistd.h>
+#include <linux/table.h>
+
+#include <sys/param.h>
+
+#include <syscall.h>
+
+BEGIN_LIBGTOP_DECLS
+
+extern int table (int, union table *, const void *);
+
+END_LIBGTOP_DECLS
+
+#endif

sysdeps/kernel/kernel.s

@@ -0,0 +1,42 @@
+	.file	"test.c"
+	.version	"01.01"
+/ GNU C version egcs-2.90.29 980515 (egcs-1.0.3 release) (i686-pc-linux-gnu) compiled by GNU C version egcs-2.90.29 980515 (egcs-1.0.3 release).
+/ options passed:  -O2 -Wall -W
+/ options enabled:  -fdefer-pop -fcse-follow-jumps -fcse-skip-blocks
+/ -fexpensive-optimizations -fthread-jumps -fstrength-reduce -fpeephole
+/ -fforce-mem -ffunction-cse -finline -fkeep-static-consts -fcaller-saves
+/ -fpcc-struct-return -frerun-cse-after-loop -frerun-loop-opt
+/ -fschedule-insns2 -fcommon -fverbose-asm -fgnu-linker -fregmove
+/ -falias-check -fargument-alias -m80387 -mhard-float -mno-soft-float
+/ -mieee-fp -mfp-ret-in-387 -mschedule-prologue -mcpu=pentiumpro
+/ -march=pentium
+
+gcc2_compiled.:
+.text
+	.align 4
+.globl table
+	.type	 table,@function
+table:
+	pushl %ebp
+	movl %esp,%ebp
+	movl $190,%eax
+	pushl %ebx
+	movl 8(%ebp),%ebx
+	movl 12(%ebp),%ecx
+	movl 16(%ebp),%edx
+#APP
+	int $0x80
+#NO_APP
+	testl %eax,%eax
+	jge .L3
+	negl %eax
+	movl %eax,errno
+	movl $-1,%eax
+.L3:
+	movl -4(%ebp),%ebx
+	movl %ebp,%esp
+	popl %ebp
+	ret
+.Lfe1:
+	.size	 table,.Lfe1-table
+	.ident	"GCC: (GNU) egcs-2.90.29 980515 (egcs-1.0.3 release)"

sysdeps/kernel/loadavg.c

@@ -0,0 +1,65 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <config.h>
+#include <glibtop/error.h>
+#include <glibtop/loadavg.h>
+
+#include "kernel.h"
+
+static const unsigned long _glibtop_sysdeps_loadavg =
+(1 << GLIBTOP_LOADAVG_LOADAVG) + (1 << GLIBTOP_LOADAVG_NR_RUNNING) +
+(1 << GLIBTOP_LOADAVG_NR_TASKS) + (1 << GLIBTOP_LOADAVG_LAST_PID);
+
+/* Init function. */
+
+void
+glibtop_init_loadavg_s (glibtop *server)
+{
+	server->sysdeps.loadavg = _glibtop_sysdeps_loadavg;
+}
+
+/* Provides load load averange. */
+
+void
+glibtop_get_loadavg_s (glibtop *server, glibtop_loadavg *buf)
+{
+	union table tbl;
+	
+	glibtop_init_s (&server, GLIBTOP_SYSDEPS_LOADAVG, 0);
+
+	memset (buf, 0, sizeof (glibtop_loadavg));
+
+	if (table (TABLE_LOADAVG, &tbl, NULL))
+		glibtop_error_io_r (server, "table(TABLE_LOADAVG)");
+	
+	buf->flags = _glibtop_sysdeps_loadavg;
+
+	buf->loadavg [0] = tbl.loadavg.loadavg [0];
+	buf->loadavg [1] = tbl.loadavg.loadavg [1];
+	buf->loadavg [2] = tbl.loadavg.loadavg [2];
+
+	buf->nr_running = tbl.loadavg.nr_running;
+	buf->nr_tasks = tbl.loadavg.nr_tasks;
+	buf->last_pid = tbl.loadavg.last_pid;
+}

sysdeps/kernel/mem.c

@@ -0,0 +1,68 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <config.h>
+#include <glibtop/error.h>
+#include <glibtop/mem.h>
+
+#include "kernel.h"
+
+static const unsigned long _glibtop_sysdeps_mem =
+(1 << GLIBTOP_MEM_TOTAL) + (1 << GLIBTOP_MEM_USED) +
+(1 << GLIBTOP_MEM_FREE) + (1 << GLIBTOP_MEM_SHARED) +
+(1 << GLIBTOP_MEM_BUFFER) + (1 << GLIBTOP_MEM_CACHED) +
+(1 << GLIBTOP_MEM_USER);
+
+/* Init function. */
+
+void
+glibtop_init_mem_s (glibtop *server)
+{
+	server->sysdeps.mem = _glibtop_sysdeps_mem;
+}
+
+/* Provides information about memory usage. */
+
+void
+glibtop_get_mem_s (glibtop *server, glibtop_mem *buf)
+{
+	union table tbl;
+	
+	glibtop_init_s (&server, GLIBTOP_SYSDEPS_MEM, 0);
+
+	memset (buf, 0, sizeof (glibtop_mem));
+
+	if (table (TABLE_MEM, &tbl, NULL))
+		glibtop_error_io_r (server, "table(TABLE_MEM)");
+
+	buf->flags = _glibtop_sysdeps_mem;
+
+	buf->total  = tbl.mem.total;
+	buf->used   = tbl.mem.used;
+	buf->free   = tbl.mem.free;
+	buf->shared = tbl.mem.shared;
+	buf->buffer = tbl.mem.buffer;
+	buf->cached = tbl.mem.cached;
+
+	buf->user = buf->total - buf->free - buf->shared - buf->buffer;
+}

sysdeps/kernel/msg_limits.c

@@ -0,0 +1,65 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop/msg_limits.h>
+
+#include <sys/ipc.h>
+#include <sys/msg.h>
+
+static const unsigned long _glibtop_sysdeps_msg_limits =
+(1 << GLIBTOP_IPC_MSGPOOL) + (1 << GLIBTOP_IPC_MSGMAP) +
+(1 << GLIBTOP_IPC_MSGMAX) + (1 << GLIBTOP_IPC_MSGMNB) +
+(1 << GLIBTOP_IPC_MSGMNI) + (1 << GLIBTOP_IPC_MSGSSZ) +
+(1 << GLIBTOP_IPC_MSGTQL);
+
+/* Init function. */
+
+void
+glibtop_init_msg_limits_s (glibtop *server)
+{
+	server->sysdeps.msg_limits = _glibtop_sysdeps_msg_limits;
+}
+
+/* Provides information about sysv ipc limits. */
+
+void
+glibtop_get_msg_limits_s (glibtop *server, glibtop_msg_limits *buf)
+{
+	struct msginfo	msginfo;
+  
+	glibtop_init_s (&server, GLIBTOP_SYSDEPS_MSG_LIMITS, 0);
+
+	memset (buf, 0, sizeof (glibtop_msg_limits));
+  
+	buf->flags = _glibtop_sysdeps_msg_limits;
+  
+	msgctl (0, IPC_INFO, (struct msqid_ds *) &msginfo);
+  
+	buf->msgpool = msginfo.msgpool;
+	buf->msgmap = msginfo.msgmap;
+	buf->msgmax = msginfo.msgmax;
+	buf->msgmnb = msginfo.msgmnb;
+	buf->msgmni = msginfo.msgmni;
+	buf->msgssz = msginfo.msgssz;
+	buf->msgtql = msginfo.msgtql;
+}

sysdeps/kernel/netload.c

@@ -0,0 +1,45 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, October 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/netload.h>
+
+static const unsigned long _glibtop_sysdeps_netload = 0;
+
+/* Init function. */
+
+void
+glibtop_init_netload_s (glibtop *server)
+{
+	server->sysdeps.netload = _glibtop_sysdeps_netload;
+}
+
+/* Provides network statistics. */
+
+void
+glibtop_get_netload_s (glibtop *server, glibtop_netload *buf,
+		       const char *interface)
+{
+	memset (buf, 0, sizeof (glibtop_netload));
+}

sysdeps/kernel/open.c

@@ -0,0 +1,63 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop/open.h>
+
+/* =====================================================
+ * Linux kernel version information for procps utilities
+ * Copyright (c) 1996 Charles Blake <cblake@bbn.com>
+ */
+#include <sys/utsname.h>
+
+#define LINUX_VERSION(x,y,z)   (0x10000*(x) + 0x100*(y) + z)
+
+static int linux_version_code = 0;
+
+static void set_linux_version(void) {
+    static struct utsname uts;
+    int x = 0, y = 0, z = 0;	/* cleared in case sscanf() < 3 */
+    
+    if (linux_version_code) return;
+    if (uname(&uts) == -1)	/* failure most likely implies impending death */
+	exit(1);
+    if (sscanf(uts.release, "%d.%d.%d", &x, &y, &z) < 3)
+	fprintf(stderr,		/* *very* unlikely to happen by accident */
+		"Non-standard uts for running kernel:\n"
+		"release %s=%d.%d.%d gives version code %d\n",
+		uts.release, x, y, z, LINUX_VERSION(x,y,z));
+    linux_version_code = LINUX_VERSION(x, y, z);
+}
+
+/* ======================================================= */
+
+/* Opens pipe to gtop server. Returns 0 on success and -1 on error. */
+
+void
+glibtop_open_s (glibtop *server, const char *program_name,
+		const unsigned long features, const unsigned flags)
+{
+	server->name = program_name;
+	
+	set_linux_version ();
+	server->os_version_code = (unsigned long) linux_version_code;
+}

sysdeps/kernel/ppp.c

@@ -0,0 +1,44 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, October 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/ppp.h>
+
+static const unsigned long _glibtop_sysdeps_ppp = 0;
+
+/* Init function. */
+
+void
+glibtop_init_ppp_s (glibtop *server)
+{
+	server->sysdeps.ppp = _glibtop_sysdeps_ppp;
+}
+
+/* Provides PPP/ISDN information. */
+
+void
+glibtop_get_ppp_s (glibtop *server, glibtop_ppp *buf, unsigned short device)
+{
+	memset (buf, 0, sizeof (glibtop_ppp));
+}

sysdeps/kernel/procargs.c

@@ -0,0 +1,47 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/xmalloc.h>
+#include <glibtop/procargs.h>
+
+static const unsigned long _glibtop_sysdeps_proc_args = 0;
+
+/* Init function. */
+
+void
+glibtop_init_proc_args_s (glibtop *server)
+{
+	server->sysdeps.proc_args = _glibtop_sysdeps_proc_args;
+}
+
+/* Provides detailed information about a process. */
+
+const char *
+glibtop_get_proc_args_s (glibtop *server, glibtop_proc_args *buf,
+			 pid_t pid, unsigned max_len)
+{
+	memset (buf, 0, sizeof (glibtop_proc_args));
+	return NULL;
+}

sysdeps/kernel/procdata.c

@@ -0,0 +1,180 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <config.h>
+#include <glibtop/procdata.h>
+
+#include <sys/stat.h>
+
+#define LINUX_VERSION(x,y,z)	(0x10000*(x) + 0x100*(y) + z)
+
+#define BIT_SHIFT(x)		(1 << (x % 32))
+
+static const unsigned long _glibtop_sysdeps_procdata_0 =
+BIT_SHIFT(GLIBTOP_PROCDATA_CMD) +
+BIT_SHIFT(GLIBTOP_PROCDATA_STATE) +
+BIT_SHIFT(GLIBTOP_PROCDATA_UID) +
+BIT_SHIFT(GLIBTOP_PROCDATA_PID) +
+BIT_SHIFT(GLIBTOP_PROCDATA_PPID) +
+BIT_SHIFT(GLIBTOP_PROCDATA_PGRP) +
+BIT_SHIFT(GLIBTOP_PROCDATA_SESSION) +
+BIT_SHIFT(GLIBTOP_PROCDATA_TTY) +
+BIT_SHIFT(GLIBTOP_PROCDATA_TPGID) +
+BIT_SHIFT(GLIBTOP_PROCDATA_PRIORITY) +
+BIT_SHIFT(GLIBTOP_PROCDATA_NICE) +
+BIT_SHIFT(GLIBTOP_PROCDATA_SIGNAL) +
+BIT_SHIFT(GLIBTOP_PROCDATA_BLOCKED) +
+BIT_SHIFT(GLIBTOP_PROCDATA_SIGIGNORE) +
+BIT_SHIFT(GLIBTOP_PROCDATA_SIGCATCH) +
+BIT_SHIFT(GLIBTOP_PROCDATA_START_TIME) +
+BIT_SHIFT(GLIBTOP_PROCDATA_UTIME) +
+BIT_SHIFT(GLIBTOP_PROCDATA_STIME) +
+BIT_SHIFT(GLIBTOP_PROCDATA_CUTIME) +
+BIT_SHIFT(GLIBTOP_PROCDATA_CSTIME) +
+BIT_SHIFT(GLIBTOP_PROCDATA_SIZE) +
+BIT_SHIFT(GLIBTOP_PROCDATA_RESIDENT) +
+BIT_SHIFT(GLIBTOP_PROCDATA_SHARE) +
+BIT_SHIFT(GLIBTOP_PROCDATA_TRS) +
+BIT_SHIFT(GLIBTOP_PROCDATA_LRS) +
+BIT_SHIFT(GLIBTOP_PROCDATA_DRS) +
+BIT_SHIFT(GLIBTOP_PROCDATA_DT) +
+BIT_SHIFT(GLIBTOP_PROCDATA_VSIZE) +
+BIT_SHIFT(GLIBTOP_PROCDATA_RSS) +
+BIT_SHIFT(GLIBTOP_PROCDATA_RSS_RLIM) +
+BIT_SHIFT(GLIBTOP_PROCDATA_TIMEOUT) +
+BIT_SHIFT(GLIBTOP_PROCDATA_IT_REAL_VALUE);
+
+static const unsigned long _glibtop_sysdeps_procdata_1 =
+BIT_SHIFT(GLIBTOP_PROCDATA_K_FLAGS) +
+BIT_SHIFT(GLIBTOP_PROCDATA_MIN_FLT) +
+BIT_SHIFT(GLIBTOP_PROCDATA_MAJ_FLT) +
+BIT_SHIFT(GLIBTOP_PROCDATA_CMIN_FLT) +
+BIT_SHIFT(GLIBTOP_PROCDATA_CMAJ_FLT) +
+BIT_SHIFT(GLIBTOP_PROCDATA_START_CODE) +
+BIT_SHIFT(GLIBTOP_PROCDATA_END_CODE) +
+BIT_SHIFT(GLIBTOP_PROCDATA_START_STACK) +
+BIT_SHIFT(GLIBTOP_PROCDATA_KSTK_ESP) +
+BIT_SHIFT(GLIBTOP_PROCDATA_KSTK_EIP) +
+BIT_SHIFT(GLIBTOP_PROCDATA_WCHAN);
+
+/* Provides detailed information about a process. */
+
+void
+glibtop_get_procdata_s (glibtop *server, glibtop_procdata *buf, pid_t pid)
+{
+	char input [BUFSIZ], *tmp;
+	struct stat statb;
+	int nread;
+	FILE *f;
+	
+	glibtop_init_s (&server, 0, 0);
+	
+	memset (buf, 0, sizeof (glibtop_procdata));
+
+	if (pid == 0) {
+		/* Client is only interested in the flags. */
+		buf->flags [0] = _glibtop_sysdeps_procdata_0;
+		buf->flags [1] = _glibtop_sysdeps_procdata_1;
+		return;
+	}
+
+	
+	sprintf (input, "/proc/%d/stat", pid);
+
+	if (stat (input, &statb)) return;
+
+	buf->uid = statb.st_uid;
+	
+	f = fopen (input, "r");
+	if (!f) return;
+	
+	nread = fread (input, 1, BUFSIZ, f);
+	
+	if (nread < 0) {
+		fclose (f);
+		return;
+	}
+	
+	input [nread] = 0;
+	
+	/* This is from guile-utils/gtop/proc/readproc.c */
+	
+	/* split into "PID (cmd" and "<rest>" */
+	tmp = strrchr (input, ')');
+	*tmp = '\0';		/* replace trailing ')' with NUL */
+	/* parse these two strings separately, skipping the leading "(". */
+	memset (buf->cmd, 0, sizeof (buf->cmd));
+	sscanf (input, "%d (%39c", &buf->pid, buf->cmd);
+	sscanf(tmp + 2,		/* skip space after ')' too */
+	       "%c %d %d %d %d %d %lu %lu %lu %lu %lu "
+	       "%ld %ld %ld %ld %d %d %lu %lu %ld %lu "
+	       "%lu %lu %lu %lu %lu %lu %lu %d %d %d %d %lu",
+	       &buf->state, &buf->ppid, &buf->pgrp, &buf->session,
+	       &buf->tty, &buf->tpgid, &buf->k_flags, &buf->min_flt,
+	       &buf->cmin_flt, &buf->maj_flt, &buf->cmaj_flt,
+	       &buf->utime, &buf->stime, &buf->cutime, &buf->cstime,
+	       &buf->priority, &buf->nice, &buf->timeout,
+	       &buf->it_real_value, &buf->start_time, &buf->vsize,
+	       &buf->rss, &buf->rss_rlim, &buf->start_code,
+	       &buf->end_code, &buf->start_stack, &buf->kstk_esp,
+	       &buf->kstk_eip, &buf->signal, &buf->blocked,
+	       &buf->sigignore, &buf->sigcatch, &buf->wchan);
+
+	if (buf->tty == 0)
+		/* the old notty val, update elsewhere bef. moving to 0 */
+		buf->tty = -1;
+
+	if (server->os_version_code < LINUX_VERSION(1,3,39)) {
+		/* map old meanings to new */
+		buf->priority = 2*15 - buf->priority;
+		buf->nice = 15 - buf->nice;
+	}
+	if (server->os_version_code < LINUX_VERSION(1,1,30) && buf->tty != -1)
+		/* when tty wasn't full devno */
+		buf->tty = 4*0x100 + buf->tty;
+	
+	fclose (f);
+
+	sprintf (input, "/proc/%d/statm", pid);
+
+	f = fopen (input, "r");
+	if (!f) return;
+
+	nread = fread (input, 1, BUFSIZ, f);
+
+	if (nread < 0) {
+		fclose (f);
+		return;
+	}
+
+	input [nread] = 0;
+
+	sscanf (input, "%ld %ld %ld %ld %ld %ld %ld",
+		&buf->size, &buf->resident, &buf->share,
+		&buf->trs, &buf->lrs, &buf->drs, &buf->dt);
+
+	fclose (f);
+
+	buf->flags [0] = _glibtop_sysdeps_procdata_0;
+	buf->flags [1] = _glibtop_sysdeps_procdata_1;
+}

sysdeps/kernel/prockernel.c

@@ -0,0 +1,68 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/prockernel.h>
+
+#include "kernel.h"
+
+static const unsigned long _glibtop_sysdeps_proc_kernel =
+(1 << GLIBTOP_PROC_KERNEL_K_FLAGS) + (1 << GLIBTOP_PROC_KERNEL_MIN_FLT) +
+(1 << GLIBTOP_PROC_KERNEL_MAJ_FLT) + (1 << GLIBTOP_PROC_KERNEL_CMIN_FLT) +
+(1 << GLIBTOP_PROC_KERNEL_CMAJ_FLT) + (1 << GLIBTOP_PROC_KERNEL_KSTK_ESP) +
+(1 << GLIBTOP_PROC_KERNEL_KSTK_EIP) + (1 << GLIBTOP_PROC_KERNEL_NWCHAN);
+
+/* Init function. */
+
+void
+glibtop_init_proc_kernel_s (glibtop *server)
+{
+	server->sysdeps.proc_kernel = _glibtop_sysdeps_proc_kernel;
+}
+
+/* Provides detailed information about a process. */
+
+void
+glibtop_get_proc_kernel_s (glibtop *server, glibtop_proc_kernel *buf,
+			   pid_t pid)
+{
+	union table tbl;
+	
+	glibtop_init_s (&server, GLIBTOP_SYSDEPS_PROC_KERNEL, 0);
+	
+	memset (buf, 0, sizeof (glibtop_proc_kernel));
+	
+	if (table (TABLE_PROC_KERNEL, &tbl, &pid))
+		glibtop_error_io_r (server, "table(TABLE_PROC_KERNEL)");
+	
+	buf->flags = _glibtop_sysdeps_proc_kernel;
+	
+	buf->min_flt = tbl.proc_kernel.min_flt;
+	buf->cmin_flt = tbl.proc_kernel.cmin_flt;
+	buf->maj_flt = tbl.proc_kernel.maj_flt;
+	buf->cmaj_flt = tbl.proc_kernel.cmaj_flt;
+	buf->kstk_esp = tbl.proc_kernel.kesp;
+	buf->kstk_eip = tbl.proc_kernel.keip;
+	buf->nwchan = tbl.proc_kernel.wchan;
+}

sysdeps/kernel/proclist.c

@@ -0,0 +1,86 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/xmalloc.h>
+#include <glibtop/proclist.h>
+
+#include "kernel.h"
+
+static const unsigned long _glibtop_sysdeps_proclist =
+(1 << GLIBTOP_PROCLIST_TOTAL) + (1 << GLIBTOP_PROCLIST_NUMBER) +
+(1 << GLIBTOP_PROCLIST_SIZE);
+
+/* Init function. */
+
+void
+glibtop_init_proclist_s (glibtop *server)
+{
+	server->sysdeps.proclist = _glibtop_sysdeps_proclist;
+}
+
+#define BLOCK_COUNT	256
+#define BLOCK_SIZE	(BLOCK_COUNT * sizeof (unsigned))
+
+/* Fetch list of currently running processes.
+ *
+ * The interface of this function is a little bit different from the others:
+ * buf->flags is only set if the call succeeded, in this case pids_chain,
+ * a list of the pids of all currently running processes is returned,
+ * buf->number is the number of elements of this list and buf->size is
+ * the size of one single element (sizeof (unsigned)). The total size is
+ * stored in buf->total.
+ *
+ * The calling function has to free the memory to which a pointer is returned.
+ *
+ * On error, NULL is returned and buf->flags is zero. */
+
+unsigned *
+glibtop_get_proclist_s (glibtop *server, glibtop_proclist *buf,
+			int64_t which, int64_t arg)
+{
+	union table tbl;
+	unsigned *pids_chain;
+	struct proclist_args args;
+
+	glibtop_init_s (&server, GLIBTOP_SYSDEPS_PROCLIST, 0);
+
+	memset (buf, 0, sizeof (glibtop_proclist));
+
+	args.which = which;
+	args.arg = arg;
+
+	if (table (TABLE_PROCLIST, &tbl, &args))
+		glibtop_error_io_r (server, "table(TABLE_PROCLIST)");
+
+	buf->size = sizeof (unsigned);
+	buf->number = tbl.proclist.nr_tasks;
+
+	buf->total = buf->number * sizeof (unsigned);
+
+	pids_chain = glibtop_malloc_r (server, buf->total);
+
+	memcpy (pids_chain, tbl.proclist.pids, buf->total);
+
+	return pids_chain;
+}

sysdeps/kernel/procmap.c

@@ -0,0 +1,49 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/xmalloc.h>
+#include <glibtop/procmap.h>
+
+static const unsigned long _glibtop_sysdeps_proc_map = 0;
+
+/* Init function. */
+
+void
+glibtop_init_proc_map_s (glibtop *server)
+{
+	server->sysdeps.proc_map = _glibtop_sysdeps_proc_map;
+}
+
+/* Provides detailed information about a process. */
+
+glibtop_map_entry *
+glibtop_get_proc_map_s (glibtop *server, glibtop_proc_map *buf,	pid_t pid)
+{
+	glibtop_init_s (&server, GLIBTOP_SYSDEPS_PROC_MAP, 0);
+	
+	memset (buf, 0, sizeof (glibtop_proc_map));
+	
+	return NULL;
+}

sysdeps/kernel/procmem.c

@@ -0,0 +1,70 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/procmem.h>
+
+#include "kernel.h"
+
+static const unsigned long _glibtop_sysdeps_proc_mem =
+(1 << GLIBTOP_PROC_MEM_SIZE) + (1 << GLIBTOP_PROC_MEM_VSIZE) +
+(1 << GLIBTOP_PROC_MEM_RESIDENT) + (1 << GLIBTOP_PROC_MEM_SHARE) +
+(1 << GLIBTOP_PROC_MEM_RSS) + (1 << GLIBTOP_PROC_MEM_RSS_RLIM);
+
+/* Init function. */
+
+void
+glibtop_init_proc_mem_s (glibtop *server)
+{
+	server->sysdeps.proc_mem = _glibtop_sysdeps_proc_mem;
+}
+
+/* Provides detailed information about a process. */
+
+void
+glibtop_get_proc_mem_s (glibtop *server, glibtop_proc_mem *buf,
+			pid_t pid)
+{
+	union table tbl;
+
+	glibtop_init_s (&server, GLIBTOP_SYSDEPS_PROC_MEM, 0);
+
+	memset (buf, 0, sizeof (glibtop_proc_mem));
+
+	if (table (TABLE_PROC_MEM, &tbl, &pid))
+		glibtop_error_io_r (server, "table(TABLE_PROC_MEM)");
+	
+	buf->rss = tbl.proc_mem.rss;
+	buf->rss_rlim = tbl.proc_mem.rlim;
+
+	if (table (TABLE_PROC_SEGMENT, &tbl, &pid))
+		glibtop_error_io_r (server, "table(TABLE_PROC_SEGMENT)");
+	
+	buf->flags = _glibtop_sysdeps_proc_mem;
+
+	buf->vsize = tbl.proc_segment.vsize;
+	buf->size = tbl.proc_segment.size;
+	buf->resident = tbl.proc_segment.resident;
+	buf->share = tbl.proc_segment.shared;
+}

sysdeps/kernel/procsegment.c

@@ -0,0 +1,77 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <config.h>
+#include <glibtop/error.h>
+#include <glibtop/procsegment.h>
+
+#include "kernel.h"
+
+static const unsigned long _glibtop_sysdeps_proc_segment =
+(1 << GLIBTOP_PROC_SEGMENT_TEXT_RSS) +
+(1 << GLIBTOP_PROC_SEGMENT_SHLIB_RSS) +
+(1 << GLIBTOP_PROC_SEGMENT_DATA_RSS) +
+(1 << GLIBTOP_PROC_SEGMENT_STACK_RSS) +
+(1 << GLIBTOP_PROC_SEGMENT_DIRTY_SIZE) +
+(1 << GLIBTOP_PROC_SEGMENT_START_CODE) +
+(1 << GLIBTOP_PROC_SEGMENT_END_CODE) +
+(1 << GLIBTOP_PROC_SEGMENT_START_STACK);
+
+/* Init function. */
+
+void
+glibtop_init_proc_segment_s (glibtop *server)
+{
+	server->sysdeps.proc_segment = _glibtop_sysdeps_proc_segment;
+}
+
+/* Provides detailed information about a process. */
+
+void
+glibtop_get_proc_segment_s (glibtop *server, glibtop_proc_segment *buf,
+			    pid_t pid)
+{
+	union table tbl;
+
+	glibtop_init_s (&server, GLIBTOP_SYSDEPS_PROC_SEGMENT, 0);
+
+	memset (buf, 0, sizeof (glibtop_proc_segment));
+
+	if (table (TABLE_PROC_MEM, &tbl, &pid))
+		glibtop_error_io_r (server, "table(TABLE_PROC_MEM)");
+	
+	buf->start_code = tbl.proc_mem.start_code;
+	buf->end_code = tbl.proc_mem.end_code;
+	buf->start_stack = tbl.proc_mem.start_stack;
+
+	if (table (TABLE_PROC_SEGMENT, &tbl, &pid))
+		glibtop_error_io_r (server, "table(TABLE_PROC_SEGMENT)");
+
+	buf->flags = _glibtop_sysdeps_proc_segment;
+
+	buf->text_rss	= tbl.proc_segment.trs;
+	buf->shlib_rss	= tbl.proc_segment.lrs;
+	buf->data_rss	= tbl.proc_segment.drs;
+	buf->stack_rss	= tbl.proc_segment.srs;
+	buf->dirty_size	= tbl.proc_segment.dt;
+}

sysdeps/kernel/procsignal.c

@@ -0,0 +1,63 @@
+/* $Id$ */
+
+/* Copyright (C) 1998-99 Martin Baulig
+   This file is part of LibGTop 1.0.
+
+   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
+
+   LibGTop 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.
+
+   LibGTop 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 LibGTop; see the file COPYING. If not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include <glibtop.h>
+#include <glibtop/error.h>
+#include <glibtop/procsignal.h>
+
+#include "kernel.h"
+
+static const unsigned long _glibtop_sysdeps_proc_signal =
+(1 << GLIBTOP_PROC_SIGNAL_SIGNAL) + (1 << GLIBTOP_PROC_SIGNAL_BLOCKED) +
+(1 << GLIBTOP_PROC_SIGNAL_SIGIGNORE) + (1 << GLIBTOP_PROC_SIGNAL_SIGCATCH);
+
+/* Init function. */
+
+void
+glibtop_init_proc_signal_s (glibtop *server)
+{
+	server->sysdeps.proc_signal = _glibtop_sysdeps_proc_signal;
+}
+
+/* Provides detailed information about a process. */
+
+void
+glibtop_get_proc_signal_s (glibtop *server, glibtop_proc_signal *buf,
+			   pid_t pid)
+{
+	union table tbl;
+
+	glibtop_init_s (&server, GLIBTOP_SYSDEPS_PROC_SIGNAL, 0);
+
+	memset (buf, 0, sizeof (glibtop_proc_signal));
+
+	if (table (TABLE_PROC_SIGNAL, &tbl, &pid))
+		glibtop_error_io_r (server, "table(TABLE_PROC_SIGNAL)");
+
+	buf->flags = _glibtop_sysdeps_proc_signal;
+
+	buf->signal [0] = tbl.proc_signal.signal;
+	buf->blocked [0] = tbl.proc_signal.blocked;
+	buf->sigignore [0] = tbl.proc_signal.ignored;
+	buf->sigcatch [0] = tbl.proc_signal.caught;
+}