array.c 9.82 KB
Newer Older
Linus Torvalds's avatar
Linus Torvalds committed
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57
/*
 *  linux/fs/proc/array.c
 *
 *  Copyright (C) 1992  by Linus Torvalds
 *  based on ideas by Darren Senn
 *
 * Fixes:
 * Michael. K. Johnson: stat,statm extensions.
 *                      <johnsonm@stolaf.edu>
 *
 * Pauline Middelink :  Made cmdline,envline only break at '\0's, to
 *                      make sure SET_PROCTITLE works. Also removed
 *                      bad '!' which forced address recalculation for
 *                      EVERY character on the current page.
 *                      <middelin@polyware.iaf.nl>
 *
 * Danny ter Haar    :	added cpuinfo
 *			<dth@cistron.nl>
 *
 * Alessandro Rubini :  profile extension.
 *                      <rubini@ipvvis.unipv.it>
 *
 * Jeff Tranter      :  added BogoMips field to cpuinfo
 *                      <Jeff_Tranter@Mitel.COM>
 *
 * Bruno Haible      :  remove 4K limit for the maps file
 *			<haible@ma2s2.mathematik.uni-karlsruhe.de>
 *
 * Yves Arrouye      :  remove removal of trailing spaces in get_array.
 *			<Yves.Arrouye@marin.fdn.fr>
 *
 * Jerome Forissier  :  added per-CPU time information to /proc/stat
 *                      and /proc/<pid>/cpu extension
 *                      <forissier@isia.cma.fr>
 *			- Incorporation and non-SMP safe operation
 *			of forissier patch in 2.1.78 by
 *			Hans Marcus <crowbar@concepts.nl>
 *
 * aeb@cwi.nl        :  /proc/partitions
 *
 *
 * Alan Cox	     :  security fixes.
 *			<Alan.Cox@linux.org>
 *
 * Al Viro           :  safe handling of mm_struct
 *
 * Gerhard Wichert   :  added BIGMEM support
 * Siemens AG           <Gerhard.Wichert@pdb.siemens.de>
 *
 * Al Viro & Jeff Garzik :  moved most of the thing into base.c and
 *			 :  proc_misc.c. The rest may eventually go into
 *			 :  base.c too.
 */

#include <linux/config.h>
#include <linux/types.h>
#include <linux/errno.h>
58
#include <linux/time.h>
Linus Torvalds's avatar
Linus Torvalds committed
59 60 61 62 63 64 65 66
#include <linux/kernel.h>
#include <linux/kernel_stat.h>
#include <linux/tty.h>
#include <linux/string.h>
#include <linux/mman.h>
#include <linux/proc_fs.h>
#include <linux/ioport.h>
#include <linux/mm.h>
67
#include <linux/hugetlb.h>
Linus Torvalds's avatar
Linus Torvalds committed
68 69 70 71 72 73
#include <linux/pagemap.h>
#include <linux/swap.h>
#include <linux/slab.h>
#include <linux/smp.h>
#include <linux/signal.h>
#include <linux/highmem.h>
Linus Torvalds's avatar
Linus Torvalds committed
74
#include <linux/file.h>
75
#include <linux/times.h>
Linus Torvalds's avatar
Linus Torvalds committed
76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128

#include <asm/uaccess.h>
#include <asm/pgtable.h>
#include <asm/io.h>
#include <asm/processor.h>

/* Gcc optimizes away "strlen(x)" for constant x */
#define ADDBUF(buffer, string) \
do { memcpy(buffer, string, strlen(string)); \
     buffer += strlen(string); } while (0)

static inline char * task_name(struct task_struct *p, char * buf)
{
	int i;
	char * name;

	ADDBUF(buf, "Name:\t");
	name = p->comm;
	i = sizeof(p->comm);
	do {
		unsigned char c = *name;
		name++;
		i--;
		*buf = c;
		if (!c)
			break;
		if (c == '\\') {
			buf[1] = c;
			buf += 2;
			continue;
		}
		if (c == '\n') {
			buf[0] = '\\';
			buf[1] = 'n';
			buf += 2;
			continue;
		}
		buf++;
	} while (i);
	*buf = '\n';
	return buf+1;
}

/*
 * The task state array is a strange "bitmap" of
 * reasons to sleep. Thus "running" is zero, and
 * you can test for combinations of others with
 * simple bit tests.
 */
static const char *task_state_array[] = {
	"R (running)",		/*  0 */
	"S (sleeping)",		/*  1 */
	"D (disk sleep)",	/*  2 */
129 130
	"T (stopped)",		/*  4 */
	"Z (zombie)",		/*  8 */
131
	"X (dead)"		/* 16 */
Linus Torvalds's avatar
Linus Torvalds committed
132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156
};

static inline const char * get_task_state(struct task_struct *tsk)
{
	unsigned int state = tsk->state & (TASK_RUNNING |
					   TASK_INTERRUPTIBLE |
					   TASK_UNINTERRUPTIBLE |
					   TASK_ZOMBIE |
					   TASK_STOPPED);
	const char **p = &task_state_array[0];

	while (state) {
		p++;
		state >>= 1;
	}
	return *p;
}

static inline char * task_state(struct task_struct *p, char *buffer)
{
	int g;

	read_lock(&tasklist_lock);
	buffer += sprintf(buffer,
		"State:\t%s\n"
Linus Torvalds's avatar
Linus Torvalds committed
157
		"Tgid:\t%d\n"
Linus Torvalds's avatar
Linus Torvalds committed
158 159 160 161 162
		"Pid:\t%d\n"
		"PPid:\t%d\n"
		"TracerPid:\t%d\n"
		"Uid:\t%d\t%d\t%d\t%d\n"
		"Gid:\t%d\t%d\t%d\t%d\n",
Linus Torvalds's avatar
Linus Torvalds committed
163
		get_task_state(p), p->tgid,
Dave Jones's avatar
Dave Jones committed
164 165
		p->pid, p->pid ? p->real_parent->pid : 0,
		p->pid && p->ptrace ? p->parent->pid : 0,
Linus Torvalds's avatar
Linus Torvalds committed
166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182
		p->uid, p->euid, p->suid, p->fsuid,
		p->gid, p->egid, p->sgid, p->fsgid);
	read_unlock(&tasklist_lock);	
	task_lock(p);
	buffer += sprintf(buffer,
		"FDSize:\t%d\n"
		"Groups:\t",
		p->files ? p->files->max_fds : 0);
	task_unlock(p);

	for (g = 0; g < p->ngroups; g++)
		buffer += sprintf(buffer, "%d ", p->groups[g]);

	buffer += sprintf(buffer, "\n");
	return buffer;
}

183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207
static char * render_sigset_t(const char *header, sigset_t *set, char *buffer)
{
	int i, len;

	len = strlen(header);
	memcpy(buffer, header, len);
	buffer += len;

	i = _NSIG;
	do {
		int x = 0;

		i -= 4;
		if (sigismember(set, i+1)) x |= 1;
		if (sigismember(set, i+2)) x |= 2;
		if (sigismember(set, i+3)) x |= 4;
		if (sigismember(set, i+4)) x |= 8;
		*buffer++ = (x < 10 ? '0' : 'a' - 10) + x;
	} while (i >= 4);

	*buffer++ = '\n';
	*buffer = 0;
	return buffer;
}

Linus Torvalds's avatar
Linus Torvalds committed
208 209 210 211 212 213
static void collect_sigign_sigcatch(struct task_struct *p, sigset_t *ign,
				    sigset_t *catch)
{
	struct k_sigaction *k;
	int i;

214 215 216 217 218 219 220 221
	k = p->sighand->action;
	for (i = 1; i <= _NSIG; ++i, ++k) {
		if (k->sa.sa_handler == SIG_IGN)
			sigaddset(ign, i);
		else if (k->sa.sa_handler != SIG_DFL)
			sigaddset(catch, i);
	}
}
Linus Torvalds's avatar
Linus Torvalds committed
222

223 224 225 226 227 228 229 230 231 232 233
static inline char * task_sig(struct task_struct *p, char *buffer)
{
	sigset_t pending, shpending, blocked, ignored, caught;

	sigemptyset(&pending);
	sigemptyset(&shpending);
	sigemptyset(&blocked);
	sigemptyset(&ignored);
	sigemptyset(&caught);

	/* Gather all the data with the appropriate locks held */
234
	read_lock(&tasklist_lock);
235 236
	if (p->sighand) {
		spin_lock_irq(&p->sighand->siglock);
237 238 239 240
		pending = p->pending.signal;
		shpending = p->signal->shared_pending.signal;
		blocked = p->blocked;
		collect_sigign_sigcatch(p, &ignored, &caught);
241
		spin_unlock_irq(&p->sighand->siglock);
Linus Torvalds's avatar
Linus Torvalds committed
242
	}
243
	read_unlock(&tasklist_lock);
Linus Torvalds's avatar
Linus Torvalds committed
244

245 246 247 248 249 250
	/* render them all */
	buffer = render_sigset_t("SigPnd:\t", &pending, buffer);
	buffer = render_sigset_t("ShdPnd:\t", &shpending, buffer);
	buffer = render_sigset_t("SigBlk:\t", &blocked, buffer);
	buffer = render_sigset_t("SigIgn:\t", &ignored, buffer);
	buffer = render_sigset_t("SigCgt:\t", &caught, buffer);
Linus Torvalds's avatar
Linus Torvalds committed
251 252 253 254

	return buffer;
}

Linus Torvalds's avatar
Linus Torvalds committed
255
static inline char *task_cap(struct task_struct *p, char *buffer)
Linus Torvalds's avatar
Linus Torvalds committed
256 257 258 259 260 261 262 263 264
{
    return buffer + sprintf(buffer, "CapInh:\t%016x\n"
			    "CapPrm:\t%016x\n"
			    "CapEff:\t%016x\n",
			    cap_t(p->cap_inheritable),
			    cap_t(p->cap_permitted),
			    cap_t(p->cap_effective));
}

265
extern char *task_mem(struct mm_struct *, char *);
Linus Torvalds's avatar
Linus Torvalds committed
266 267 268
int proc_pid_status(struct task_struct *task, char * buffer)
{
	char * orig = buffer;
269
	struct mm_struct *mm = get_task_mm(task);
Linus Torvalds's avatar
Linus Torvalds committed
270 271 272

	buffer = task_name(task, buffer);
	buffer = task_state(task, buffer);
273
 
Linus Torvalds's avatar
Linus Torvalds committed
274 275 276 277 278 279 280
	if (mm) {
		buffer = task_mem(mm, buffer);
		mmput(mm);
	}
	buffer = task_sig(task, buffer);
	buffer = task_cap(task, buffer);
#if defined(CONFIG_ARCH_S390)
Linus Torvalds's avatar
Linus Torvalds committed
281
	buffer = task_show_regs(task, buffer);
Linus Torvalds's avatar
Linus Torvalds committed
282 283 284 285
#endif
	return buffer - orig;
}

286
extern unsigned long task_vsize(struct mm_struct *);
Linus Torvalds's avatar
Linus Torvalds committed
287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302
int proc_pid_stat(struct task_struct *task, char * buffer)
{
	unsigned long vsize, eip, esp, wchan;
	long priority, nice;
	int tty_pgrp = -1, tty_nr = 0;
	sigset_t sigign, sigcatch;
	char state;
	int res;
	pid_t ppid;
	struct mm_struct *mm;

	state = *get_task_state(task);
	vsize = eip = esp = 0;
	task_lock(task);
	mm = task->mm;
	if(mm)
303
		mm = mmgrab(mm);
Linus Torvalds's avatar
Linus Torvalds committed
304 305
	if (task->tty) {
		tty_pgrp = task->tty->pgrp;
306
		tty_nr = task->tty->device;
Linus Torvalds's avatar
Linus Torvalds committed
307 308 309
	}
	task_unlock(task);
	if (mm) {
Linus Torvalds's avatar
Linus Torvalds committed
310
		down_read(&mm->mmap_sem);
311
		vsize = task_vsize(mm);
Linus Torvalds's avatar
Linus Torvalds committed
312 313
		eip = KSTK_EIP(task);
		esp = KSTK_ESP(task);
Linus Torvalds's avatar
Linus Torvalds committed
314
		up_read(&mm->mmap_sem);
Linus Torvalds's avatar
Linus Torvalds committed
315 316 317 318
	}

	wchan = get_wchan(task);

319 320 321 322 323 324
	sigemptyset(&sigign);
	sigemptyset(&sigcatch);
	read_lock(&tasklist_lock);
	if (task->sighand) {
		spin_lock_irq(&task->sighand->siglock);
		collect_sigign_sigcatch(task, &sigign, &sigcatch);
325
		spin_unlock_irq(&task->sighand->siglock);
326 327
	}
	read_unlock(&tasklist_lock);		
Linus Torvalds's avatar
Linus Torvalds committed
328 329 330

	/* scale priority and nice values from timeslices to -20..20 */
	/* to make it look like a "normal" Unix priority/nice value  */
Ingo Molnar's avatar
Ingo Molnar committed
331 332
	priority = task_prio(task);
	nice = task_nice(task);
Linus Torvalds's avatar
Linus Torvalds committed
333 334

	read_lock(&tasklist_lock);
335
	ppid = task->pid ? task->real_parent->pid : 0;
Linus Torvalds's avatar
Linus Torvalds committed
336 337
	read_unlock(&tasklist_lock);
	res = sprintf(buffer,"%d (%s) %c %d %d %d %d %d %lu %lu \
338
%lu %lu %lu %lu %lu %ld %ld %ld %ld %ld %ld %llu %lu %ld %lu %lu %lu %lu %lu \
339
%lu %lu %lu %lu %lu %lu %lu %lu %d %d %lu %lu\n",
Linus Torvalds's avatar
Linus Torvalds committed
340 341 342 343 344 345
		task->pid,
		task->comm,
		state,
		ppid,
		task->pgrp,
		task->session,
Dave Jones's avatar
Dave Jones committed
346
		tty_nr,
Linus Torvalds's avatar
Linus Torvalds committed
347 348 349 350 351 352
		tty_pgrp,
		task->flags,
		task->min_flt,
		task->cmin_flt,
		task->maj_flt,
		task->cmaj_flt,
353 354 355 356
		jiffies_to_clock_t(task->utime),
		jiffies_to_clock_t(task->stime),
		jiffies_to_clock_t(task->cutime),
		jiffies_to_clock_t(task->cstime),
Linus Torvalds's avatar
Linus Torvalds committed
357 358 359
		priority,
		nice,
		0UL /* removed */,
360
		jiffies_to_clock_t(task->it_real_value),
361 362
		(unsigned long long)
		    jiffies_64_to_clock_t(task->start_time - INITIAL_JIFFIES),
Linus Torvalds's avatar
Linus Torvalds committed
363 364 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382
		vsize,
		mm ? mm->rss : 0, /* you might want to shift this left 3 */
		task->rlim[RLIMIT_RSS].rlim_cur,
		mm ? mm->start_code : 0,
		mm ? mm->end_code : 0,
		mm ? mm->start_stack : 0,
		esp,
		eip,
		/* The signal information here is obsolete.
		 * It must be decimal for Linux 2.0 compatibility.
		 * Use /proc/#/status for real-time signals.
		 */
		task->pending.signal.sig[0] & 0x7fffffffUL,
		task->blocked.sig[0] & 0x7fffffffUL,
		sigign      .sig[0] & 0x7fffffffUL,
		sigcatch    .sig[0] & 0x7fffffffUL,
		wchan,
		task->nswap,
		task->cnswap,
		task->exit_signal,
383
		task_cpu(task),
384 385
		task->rt_priority,
		task->policy);
Linus Torvalds's avatar
Linus Torvalds committed
386 387 388 389 390
	if(mm)
		mmput(mm);
	return res;
}

391 392
extern int task_statm(struct mm_struct *, int *, int *, int *, int *);
int proc_pid_statm(struct task_struct *task, char *buffer)
Linus Torvalds's avatar
Linus Torvalds committed
393
{
394 395 396 397 398 399 400
	int size = 0, resident = 0, shared = 0, text = 0, lib = 0, data = 0;
	struct mm_struct *mm = get_task_mm(task);
	
	if (mm) {
		down_read(&mm->mmap_sem);
		size = task_statm(mm, &shared, &text, &data, &resident);
		up_read(&mm->mmap_sem);
Linus Torvalds's avatar
Linus Torvalds committed
401

402
		mmput(mm);
Linus Torvalds's avatar
Linus Torvalds committed
403
	}
Linus Torvalds's avatar
Linus Torvalds committed
404

405 406
	return sprintf(buffer,"%d %d %d %d %d %d %d\n",
		       size, resident, shared, text, lib, data, 0);
Linus Torvalds's avatar
Linus Torvalds committed
407
}