Blame sysdeps/osf1/procstate.c

Packit d37888
/* Copyright (C) 1998-99 Martin Baulig
Packit d37888
   This file is part of LibGTop 1.0.
Packit d37888
Packit d37888
   Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
Packit d37888
Packit d37888
   LibGTop is free software; you can redistribute it and/or modify it
Packit d37888
   under the terms of the GNU General Public License as published by
Packit d37888
   the Free Software Foundation; either version 2 of the License,
Packit d37888
   or (at your option) any later version.
Packit d37888
Packit d37888
   LibGTop is distributed in the hope that it will be useful, but WITHOUT
Packit d37888
   ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
Packit d37888
   FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
Packit d37888
   for more details.
Packit d37888
Packit d37888
   You should have received a copy of the GNU General Public License
Packit d37888
   along with LibGTop; see the file COPYING. If not, write to the
Packit d37888
   Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
Packit d37888
   Boston, MA 02110-1301, USA.
Packit d37888
*/
Packit d37888
Packit d37888
#include <config.h>
Packit d37888
#include <glibtop.h>
Packit d37888
#include <glibtop/error.h>
Packit d37888
#include <glibtop/procstate.h>
Packit d37888
Packit d37888
#include <glibtop_suid.h>
Packit d37888
Packit d37888
#include <mach.h>
Packit d37888
#include <mach/mach_types.h>
Packit d37888
#include <mach/task_info.h>
Packit d37888
Packit d37888
static const unsigned long _glibtop_sysdeps_proc_state =
Packit d37888
(1L << GLIBTOP_PROC_STATE_CMD) +
Packit d37888
(1L << GLIBTOP_PROC_STATE_UID) + (1L << GLIBTOP_PROC_STATE_GID) +
Packit d37888
(1L << GLIBTOP_PROC_STATE_RUID) + (1L << GLIBTOP_PROC_STATE_RGID);
Packit d37888
Packit d37888
/* Init function. */
Packit d37888
Packit d37888
void
Packit d37888
_glibtop_init_proc_state_p (glibtop *server)
Packit d37888
{
Packit d37888
	server->sysdeps.proc_state = _glibtop_sysdeps_proc_state;
Packit d37888
}
Packit d37888
Packit d37888
/* Provides detailed information about a process. */
Packit d37888
Packit d37888
void
Packit d37888
glibtop_get_proc_state_p (glibtop *server, glibtop_proc_state *buf,
Packit d37888
			  pid_t pid)
Packit d37888
{
Packit d37888
	struct tbl_procinfo procinfo;
Packit d37888
	int minim_state = 99, ret;
Packit d37888
	task_t thistask;
Packit d37888
Packit d37888
	glibtop_init_p (server, GLIBTOP_SYSDEPS_PROC_STATE, 0);
Packit d37888
Packit d37888
	memset (buf, 0, sizeof (glibtop_proc_state));
Packit d37888
Packit d37888
	/* !!! THE FOLLOWING CODE RUNS SUID ROOT - CHANGE WITH CAUTION !!! */
Packit d37888
Packit d37888
	glibtop_suid_enter (server);
Packit d37888
Packit d37888
	ret = table (TBL_PROCINFO, pid, (char *) &procinfo, 1,
Packit d37888
		     sizeof (struct tbl_procinfo));
Packit d37888
Packit d37888
	glibtop_suid_leave (server);
Packit d37888
Packit d37888
	/* !!! END OF SUID ROOT PART !!! */
Packit d37888
Packit d37888
	if (ret != 1) return;
Packit d37888
Packit d37888
	/* Check whether the process actually exists. */
Packit d37888
	if (procinfo.pi_status == PI_EMPTY) return;
Packit d37888
Packit d37888
	/* Check whether it is not a zombie. */
Packit d37888
	if (procinfo.pi_status == PI_ZOMBIE) {
Packit d37888
		buf->state = GLIBTOP_PROCESS_ZOMBIE;
Packit d37888
		buf->flags = (1L << GLIBTOP_PROC_STATE_STATE);
Packit d37888
		return;
Packit d37888
	}
Packit d37888
Packit d37888
	g_strlcpy (buf->cmd, procinfo.pi_comm, sizeof buf->cmd);
Packit d37888
Packit d37888
	buf->uid = procinfo.pi_svuid;
Packit d37888
	buf->gid = procinfo.pi_svgid;
Packit d37888
	buf->ruid = procinfo.pi_ruid;
Packit d37888
	buf->rgid = procinfo.pi_rgid;
Packit d37888
Packit d37888
	buf->flags = _glibtop_sysdeps_proc_state;
Packit d37888
Packit d37888
	/* !!! THE FOLLOWING CODE RUNS SUID ROOT - CHANGE WITH CAUTION !!! */
Packit d37888
Packit d37888
	glibtop_suid_enter (server);
Packit d37888
Packit d37888
	/* Get task structure. */
Packit d37888
	ret = task_by_unix_pid (task_self(), procinfo.pi_pid, &thistask);
Packit d37888
Packit d37888
	if (ret == KERN_SUCCESS) {
Packit d37888
		thread_array_t			threadarr;
Packit d37888
		unsigned int			threadarr_l;
Packit d37888
		thread_basic_info_t		threadinfo;
Packit d37888
		thread_basic_info_data_t	threadinfodata;
Packit d37888
		int				j;
Packit d37888
Packit d37888
		/* Get thread array. */
Packit d37888
		(void) task_threads (thistask, &threadarr, &threadarr_l);
Packit d37888
Packit d37888
		threadinfo = &threadinfodata;
Packit d37888
		for (j = 0; j < threadarr_l; j++) {
Packit d37888
			unsigned int		threadinfo_l = THREAD_BASIC_INFO_COUNT;
Packit d37888
			int			tret;
Packit d37888
Packit d37888
			tret = thread_info (threadarr [j], THREAD_BASIC_INFO,
Packit d37888
					    (thread_info_t) threadinfo, &threadinfo_l);
Packit d37888
Packit d37888
			if (tret == KERN_SUCCESS) {
Packit d37888
          			if (minim_state > threadinfo->run_state)
Packit d37888
					minim_state=threadinfo->run_state;
Packit d37888
			}
Packit d37888
		}
Packit d37888
	}
Packit d37888
Packit d37888
	glibtop_suid_leave (server);
Packit d37888
Packit d37888
	/* !!! END OF SUID ROOT PART !!! */
Packit d37888
Packit d37888
	if (ret != KERN_SUCCESS) return;
Packit d37888
Packit d37888
	switch (minim_state) {
Packit d37888
	case TH_STATE_RUNNING:
Packit d37888
		buf->state = GLIBTOP_PROCESS_RUNNING;
Packit d37888
		break;
Packit d37888
	case TH_STATE_UNINTERRUPTIBLE:
Packit d37888
		buf->state = GLIBTOP_PROCESS_UNINTERRUPTIBLE;
Packit d37888
		break;
Packit d37888
	case TH_STATE_WAITING:
Packit d37888
		buf->state = GLIBTOP_PROCESS_INTERRUPTIBLE;
Packit d37888
		break;
Packit d37888
	case TH_STATE_STOPPED:
Packit d37888
	case TH_STATE_HALTED:
Packit d37888
		buf->state = GLIBTOP_PROCESS_STOPPED;
Packit d37888
		break;
Packit d37888
	default:
Packit d37888
		if (ret != KERN_SUCCESS)
Packit d37888
			buf->state = GLIBTOP_PROCESS_ZOMBIE;
Packit d37888
		break;
Packit d37888
	}
Packit d37888
Packit d37888
	if (buf->state)
Packit d37888
		buf->flags |= (1L << GLIBTOP_PROC_STATE_STATE);
Packit d37888
}