sys/fs/procfs/procfs_status.c

   1 /*-
   2  * Copyright (c) 1993 Jan-Simon Pendry
   3  * Copyright (c) 1993
   4  *      The Regents of the University of California.  All rights reserved.
   5  *
   6  * This code is derived from software contributed to Berkeley by
   7  * Jan-Simon Pendry.
   8  *
   9  * Redistribution and use in source and binary forms, with or without
  10  * modification, are permitted provided that the following conditions
  11  * are met:
  12  * 1. Redistributions of source code must retain the above copyright
  13  *    notice, this list of conditions and the following disclaimer.
  14  * 2. Redistributions in binary form must reproduce the above copyright
  15  *    notice, this list of conditions and the following disclaimer in the
  16  *    documentation and/or other materials provided with the distribution.
  17  * 4. Neither the name of the University nor the names of its contributors
  18  *    may be used to endorse or promote products derived from this software
  19  *    without specific prior written permission.
  20  *
  21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  31  * SUCH DAMAGE.
  32  *
  33  *      @(#)procfs_status.c     8.4 (Berkeley) 6/15/94
  34  *
  35  * From:
  36  *      $Id: procfs_status.c,v 3.1 1993/12/15 09:40:17 jsp Exp $
  37  * $FreeBSD$
  38  */
  39
  40 #include <sys/param.h>
  41 #include <sys/kernel.h>
  42 #include <sys/systm.h>
  43 #include <sys/exec.h>
  44 #include <sys/lock.h>
  45 #include <sys/mutex.h>
  46 #include <sys/jail.h>
  47 #include <sys/malloc.h>
  48 #include <sys/mutex.h>
  49 #include <sys/sx.h>
  50 #include <sys/proc.h>
  51 #include <sys/resourcevar.h>
  52 #include <sys/sbuf.h>
  53 #include <sys/sysent.h>
  54 #include <sys/tty.h>
  55
  56 #include <vm/vm.h>
  57 #include <vm/pmap.h>
  58 #include <vm/vm_param.h>
  59
  60 #include <fs/pseudofs/pseudofs.h>
  61 #include <fs/procfs/procfs.h>
  62
  63 int
  64 procfs_doprocstatus(PFS_FILL_ARGS)
  65 {
  66         struct session *sess;
  67         struct thread *tdfirst;
  68         struct tty *tp;
  69         struct ucred *cr;
  70         const char *wmesg;
  71         char *pc;
  72         char *sep;
  73         int pid, ppid, pgid, sid;
  74         int i;
  75
  76         pid = p->p_pid;
  77         PROC_LOCK(p);
  78         ppid = p->p_pptr ? p->p_pptr->p_pid : 0;
  79         pgid = p->p_pgrp->pg_id;
  80         sess = p->p_pgrp->pg_session;
  81         SESS_LOCK(sess);
  82         sid = sess->s_leader ? sess->s_leader->p_pid : 0;
  83
  84 /* comm pid ppid pgid sid tty ctty,sldr start ut st wmsg
  85                                 euid ruid rgid,egid,groups[1 .. NGROUPS]
  86 */
  87
  88         pc = p->p_comm;
  89         do {
  90                 if (*pc < 33 || *pc > 126 || *pc == '\\')
  91                         sbuf_printf(sb, "\\%03o", *pc);
  92                 else
  93                         sbuf_putc(sb, *pc);
  94         } while (*++pc);
  95         sbuf_printf(sb, " %d %d %d %d ", pid, ppid, pgid, sid);
  96         if ((p->p_flag & P_CONTROLT) && (tp = sess->s_ttyp))
  97                 sbuf_printf(sb, "%s ", devtoname(tp->t_dev));
  98         else
  99                 sbuf_printf(sb, "- ");
 100
 101         sep = "";
 102         if (sess->s_ttyvp) {
 103                 sbuf_printf(sb, "%sctty", sep);
 104                 sep = ",";
 105         }
 106         if (SESS_LEADER(p)) {
 107                 sbuf_printf(sb, "%ssldr", sep);
 108                 sep = ",";
 109         }
 110         SESS_UNLOCK(sess);
 111         if (*sep != ',') {
 112                 sbuf_printf(sb, "noflags");
 113         }
 114
 115 #ifdef KSE
 116         if (p->p_flag & P_SA)
 117                 wmesg = "-kse- ";
 118         else
 119 #endif
 120         {
 121                 tdfirst = FIRST_THREAD_IN_PROC(p);
 122                 if (tdfirst->td_wchan != NULL) {
 123                         KASSERT(tdfirst->td_wmesg != NULL,
 124                             ("wchan %p has no wmesg", tdfirst->td_wchan));
 125                         wmesg = tdfirst->td_wmesg;
 126                 } else
 127                         wmesg = "nochan";
 128         }
 129
 130         if (p->p_flag & P_INMEM) {
 131                 struct timeval start, ut, st;
 132
 133                 PROC_SLOCK(p);
 134                 calcru(p, &ut, &st);
 135                 PROC_SUNLOCK(p);
 136                 start = p->p_stats->p_start;
 137                 timevaladd(&start, &boottime);
 138                 sbuf_printf(sb, " %jd,%ld %jd,%ld %jd,%ld",
 139                     (intmax_t)start.tv_sec, start.tv_usec,
 140                     (intmax_t)ut.tv_sec, ut.tv_usec,
 141                     (intmax_t)st.tv_sec, st.tv_usec);
 142         } else
 143                 sbuf_printf(sb, " -1,-1 -1,-1 -1,-1");
 144
 145         sbuf_printf(sb, " %s", wmesg);
 146
 147         cr = p->p_ucred;
 148
 149         sbuf_printf(sb, " %lu %lu %lu",
 150                 (u_long)cr->cr_uid,
 151                 (u_long)cr->cr_ruid,
 152                 (u_long)cr->cr_rgid);
 153
 154         /* egid (cr->cr_svgid) is equal to cr_ngroups[0]
 155            see also getegid(2) in /sys/kern/kern_prot.c */
 156
 157         for (i = 0; i < cr->cr_ngroups; i++) {
 158                 sbuf_printf(sb, ",%lu", (u_long)cr->cr_groups[i]);
 159         }
 160
 161         if (jailed(p->p_ucred)) {
 162                 mtx_lock(&p->p_ucred->cr_prison->pr_mtx);
 163                 sbuf_printf(sb, " %s", p->p_ucred->cr_prison->pr_host);
 164                 mtx_unlock(&p->p_ucred->cr_prison->pr_mtx);
 165         } else {
 166                 sbuf_printf(sb, " -");
 167         }
 168         PROC_UNLOCK(p);
 169         sbuf_printf(sb, "\n");
 170
 171         return (0);
 172 }
 173
 174 int
 175 procfs_doproccmdline(PFS_FILL_ARGS)
 176 {
 177         struct ps_strings pstr;
 178         char **ps_argvstr;
 179         int error, i;
 180
 181         /*
 182          * If we are using the ps/cmdline caching, use that.  Otherwise
 183          * revert back to the old way which only implements full cmdline
 184          * for the currept process and just p->p_comm for all other
 185          * processes.
 186          * Note that if the argv is no longer available, we deliberately
 187          * don't fall back on p->p_comm or return an error: the authentic
 188          * Linux behaviour is to return zero-length in this case.
 189          */
 190
 191         PROC_LOCK(p);
 192         if (p->p_args && p_cansee(td, p) == 0) {
 193                 sbuf_bcpy(sb, p->p_args->ar_args, p->p_args->ar_length);
 194                 PROC_UNLOCK(p);
 195                 return (0);
 196         }
 197         PROC_UNLOCK(p);
 198         if (p != td->td_proc) {
 199                 sbuf_printf(sb, "%.*s", MAXCOMLEN, p->p_comm);
 200         } else {
 201                 error = copyin((void *)p->p_sysent->sv_psstrings, &pstr,
 202                     sizeof(pstr));
 203                 if (error)
 204                         return (error);
 205                 if (pstr.ps_nargvstr > ARG_MAX)
 206                         return (E2BIG);
 207                 ps_argvstr = malloc(pstr.ps_nargvstr * sizeof(char *),
 208                     M_TEMP, M_WAITOK);
 209                 error = copyin((void *)pstr.ps_argvstr, ps_argvstr,
 210                     pstr.ps_nargvstr * sizeof(char *));
 211                 if (error) {
 212                         free(ps_argvstr, M_TEMP);
 213                         return (error);
 214                 }
 215                 for (i = 0; i < pstr.ps_nargvstr; i++) {
 216                         sbuf_copyin(sb, ps_argvstr[i], 0);
 217                         sbuf_printf(sb, "%c", '\0');
 218                 }
 219                 free(ps_argvstr, M_TEMP);
 220         }
 221
 222         return (0);
 223 }