1/* 2 * tsacct.c - System accounting over taskstats interface 3 * 4 * Copyright (C) Jay Lan, <jlan@sgi.com> 5 * 6 * 7 * This program is free software; you can redistribute it and/or modify 8 * it under the terms of the GNU General Public License as published by 9 * the Free Software Foundation; either version 2 of the License, or 10 * (at your option) any later version. 11 * 12 * This program is distributed in the hope that it will be useful, 13 * but WITHOUT ANY WARRANTY; without even the implied warranty of 14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 15 * GNU General Public License for more details. 16 * 17 */ 18 19#include <linux/kernel.h> 20#include <linux/sched.h> 21#include <linux/tsacct_kern.h> 22#include <linux/acct.h> 23#include <linux/jiffies.h> 24 25/* 26 * fill in basic accounting fields 27 */ 28void bacct_add_tsk(struct taskstats *stats, struct task_struct *tsk) 29{ 30 struct timespec uptime, ts; 31 s64 ac_etime; 32 33 BUILD_BUG_ON(TS_COMM_LEN < TASK_COMM_LEN); 34 35 /* calculate task elapsed time in timespec */ 36 do_posix_clock_monotonic_gettime(&uptime); 37 ts = timespec_sub(uptime, tsk->start_time); 38 /* rebase elapsed time to usec */ 39 ac_etime = timespec_to_ns(&ts); 40 do_div(ac_etime, NSEC_PER_USEC); 41 stats->ac_etime = ac_etime; 42 stats->ac_btime = get_seconds() - ts.tv_sec; 43 if (thread_group_leader(tsk)) { 44 stats->ac_exitcode = tsk->exit_code; 45 if (tsk->flags & PF_FORKNOEXEC) 46 stats->ac_flag |= AFORK; 47 } 48 if (tsk->flags & PF_SUPERPRIV) 49 stats->ac_flag |= ASU; 50 if (tsk->flags & PF_DUMPCORE) 51 stats->ac_flag |= ACORE; 52 if (tsk->flags & PF_SIGNALED) 53 stats->ac_flag |= AXSIG; 54 stats->ac_nice = task_nice(tsk); 55 stats->ac_sched = tsk->policy; 56 stats->ac_uid = tsk->uid; 57 stats->ac_gid = tsk->gid; 58 stats->ac_pid = tsk->pid; 59 rcu_read_lock(); 60 stats->ac_ppid = pid_alive(tsk) ? 61 rcu_dereference(tsk->real_parent)->tgid : 0; 62 rcu_read_unlock(); 63 stats->ac_utime = cputime_to_msecs(tsk->utime) * USEC_PER_MSEC; 64 stats->ac_stime = cputime_to_msecs(tsk->stime) * USEC_PER_MSEC; 65 stats->ac_utimescaled = 66 cputime_to_msecs(tsk->utimescaled) * USEC_PER_MSEC; 67 stats->ac_stimescaled = 68 cputime_to_msecs(tsk->stimescaled) * USEC_PER_MSEC; 69 stats->ac_minflt = tsk->min_flt; 70 stats->ac_majflt = tsk->maj_flt; 71 72 strncpy(stats->ac_comm, tsk->comm, sizeof(stats->ac_comm)); 73} 74 75 76#ifdef CONFIG_TASK_XACCT 77 78#define KB 1024 79#define MB (1024*KB) 80/* 81 * fill in extended accounting fields 82 */ 83void xacct_add_tsk(struct taskstats *stats, struct task_struct *p) 84{ 85 struct mm_struct *mm; 86 87 /* convert pages-jiffies to Mbyte-usec */ 88 stats->coremem = jiffies_to_usecs(p->acct_rss_mem1) * PAGE_SIZE / MB; 89 stats->virtmem = jiffies_to_usecs(p->acct_vm_mem1) * PAGE_SIZE / MB; 90 mm = get_task_mm(p); 91 if (mm) { 92 /* adjust to KB unit */ 93 stats->hiwater_rss = mm->hiwater_rss * PAGE_SIZE / KB; 94 stats->hiwater_vm = mm->hiwater_vm * PAGE_SIZE / KB; 95 mmput(mm); 96 } 97 stats->read_char = p->rchar; 98 stats->write_char = p->wchar; 99 stats->read_syscalls = p->syscr; 100 stats->write_syscalls = p->syscw; 101#ifdef CONFIG_TASK_IO_ACCOUNTING 102 stats->read_bytes = p->ioac.read_bytes; 103 stats->write_bytes = p->ioac.write_bytes; 104 stats->cancelled_write_bytes = p->ioac.cancelled_write_bytes; 105#else 106 stats->read_bytes = 0; 107 stats->write_bytes = 0; 108 stats->cancelled_write_bytes = 0; 109#endif 110} 111#undef KB 112#undef MB 113 114/** 115 * acct_update_integrals - update mm integral fields in task_struct 116 * @tsk: task_struct for accounting 117 */ 118void acct_update_integrals(struct task_struct *tsk) 119{ 120 if (likely(tsk->mm)) { 121 long delta = cputime_to_jiffies( 122 cputime_sub(tsk->stime, tsk->acct_stimexpd)); 123 124 if (delta == 0) 125 return; 126 tsk->acct_stimexpd = tsk->stime; 127 tsk->acct_rss_mem1 += delta * get_mm_rss(tsk->mm); 128 tsk->acct_vm_mem1 += delta * tsk->mm->total_vm; 129 } 130} 131 132/** 133 * acct_clear_integrals - clear the mm integral fields in task_struct 134 * @tsk: task_struct whose accounting fields are cleared 135 */ 136void acct_clear_integrals(struct task_struct *tsk) 137{ 138 tsk->acct_stimexpd = 0; 139 tsk->acct_rss_mem1 = 0; 140 tsk->acct_vm_mem1 = 0; 141} 142#endif 143