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         tdfirst = FIRST_THREAD_IN_PROC(p);
 116         if (tdfirst->td_wchan != NULL) {
 117                 KASSERT(tdfirst->td_wmesg != NULL,
 118                     ("wchan %p has no wmesg", tdfirst->td_wchan));
 119                 wmesg = tdfirst->td_wmesg;
 120         } else
 121                 wmesg = "nochan";
 122
 123         if (p->p_flag & P_INMEM) {
 124                 struct timeval start, ut, st;
 125
 126                 PROC_SLOCK(p);
 127                 calcru(p, &ut, &st);
 128                 PROC_SUNLOCK(p);
 129                 start = p->p_stats->p_start;
 130                 timevaladd(&start, &boottime);
 131                 sbuf_printf(sb, " %jd,%ld %jd,%ld %jd,%ld",
 132                     (intmax_t)start.tv_sec, start.tv_usec,
 133                     (intmax_t)ut.tv_sec, ut.tv_usec,
 134                     (intmax_t)st.tv_sec, st.tv_usec);
 135         } else
 136                 sbuf_printf(sb, " -1,-1 -1,-1 -1,-1");
 137
 138         sbuf_printf(sb, " %s", wmesg);
 139
 140         cr = p->p_ucred;
 141
 142         sbuf_printf(sb, " %lu %lu %lu",
 143                 (u_long)cr->cr_uid,
 144                 (u_long)cr->cr_ruid,
 145                 (u_long)cr->cr_rgid);
 146
 147         /* egid (cr->cr_svgid) is equal to cr_ngroups[0]
 148            see also getegid(2) in /sys/kern/kern_prot.c */
 149
 150         for (i = 0; i < cr->cr_ngroups; i++) {
 151                 sbuf_printf(sb, ",%lu", (u_long)cr->cr_groups[i]);
 152         }
 153
 154         if (jailed(cr)) {
 155                 mtx_lock(&cr->cr_prison->pr_mtx);
 156                 sbuf_printf(sb, " %s",
 157                     prison_name(td->td_ucred->cr_prison, cr->cr_prison));
 158                 mtx_unlock(&cr->cr_prison->pr_mtx);
 159         } else {
 160                 sbuf_printf(sb, " -");
 161         }
 162         PROC_UNLOCK(p);
 163         sbuf_printf(sb, "\n");
 164
 165         return (0);
 166 }
 167
 168 int
 169 procfs_doproccmdline(PFS_FILL_ARGS)
 170 {
 171         struct ps_strings pstr;
 172         char **ps_argvstr;
 173         int error, i;
 174
 175         /*
 176          * If we are using the ps/cmdline caching, use that.  Otherwise
 177          * revert back to the old way which only implements full cmdline
 178          * for the currept process and just p->p_comm for all other
 179          * processes.
 180          * Note that if the argv is no longer available, we deliberately
 181          * don't fall back on p->p_comm or return an error: the authentic
 182          * Linux behaviour is to return zero-length in this case.
 183          */
 184
 185         PROC_LOCK(p);
 186         if (p->p_args && p_cansee(td, p) == 0) {
 187                 sbuf_bcpy(sb, p->p_args->ar_args, p->p_args->ar_length);
 188                 PROC_UNLOCK(p);
 189                 return (0);
 190         }
 191         PROC_UNLOCK(p);
 192         if (p != td->td_proc) {
 193                 sbuf_printf(sb, "%.*s", MAXCOMLEN, p->p_comm);
 194         } else {
 195                 error = copyin((void *)p->p_sysent->sv_psstrings, &pstr,
 196                     sizeof(pstr));
 197                 if (error)
 198                         return (error);
 199                 if (pstr.ps_nargvstr > ARG_MAX)
 200                         return (E2BIG);
 201                 ps_argvstr = malloc(pstr.ps_nargvstr * sizeof(char *),
 202                     M_TEMP, M_WAITOK);
 203                 error = copyin((void *)pstr.ps_argvstr, ps_argvstr,
 204                     pstr.ps_nargvstr * sizeof(char *));
 205                 if (error) {
 206                         free(ps_argvstr, M_TEMP);
 207                         return (error);
 208                 }
 209                 for (i = 0; i < pstr.ps_nargvstr; i++) {
 210                         sbuf_copyin(sb, ps_argvstr[i], 0);
 211                         sbuf_printf(sb, "%c", '\0');
 212                 }
 213                 free(ps_argvstr, M_TEMP);
 214         }
 215
 216         return (0);
 217 }