sys/fs/procfs/procfs_ioctl.c

   1 /*-
   2  * Copyright (c) 2001 Dag-Erling Coïdan Smørgrav
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer
  10  *    in this position and unchanged.
  11  * 2. Redistributions in binary form must reproduce the above copyright
  12  *    notice, this list of conditions and the following disclaimer in the
  13  *    documentation and/or other materials provided with the distribution.
  14  * 3. The name of the author may not be used to endorse or promote products
  15  *    derived from this software without specific prior written permission.
  16  *
  17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  18  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  19  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  20  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  21  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  22  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  23  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  24  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  25  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  26  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  27  *
  28  *      $FreeBSD$
  29  */
  30
  31 #include "opt_compat.h"
  32
  33 #include <sys/param.h>
  34 #include <sys/lock.h>
  35 #include <sys/mutex.h>
  36 #include <sys/pioctl.h>
  37 #include <sys/priv.h>
  38 #include <sys/proc.h>
  39 #include <sys/signalvar.h>
  40 #include <sys/systm.h>
  41
  42 #include <fs/pseudofs/pseudofs.h>
  43 #include <fs/procfs/procfs.h>
  44
  45 #ifdef COMPAT_IA32
  46 struct procfs_status32 {
  47         int     state;  /* Running, stopped, something else? */
  48         int     flags;  /* Any flags */
  49         unsigned int    events; /* Events to stop on */
  50         int     why;    /* What event, if any, proc stopped on */
  51         unsigned int    val;    /* Any extra data */
  52 };
  53
  54 #define PIOCWAIT32      _IOR('p', 4, struct procfs_status32)
  55 #define PIOCSTATUS32    _IOR('p', 6, struct procfs_status32)
  56 #endif
  57
  58 /*
  59  * Process ioctls
  60  */
  61 int
  62 procfs_ioctl(PFS_IOCTL_ARGS)
  63 {
  64         struct procfs_status *ps;
  65 #ifdef COMPAT_IA32
  66         struct procfs_status32 *ps32;
  67 #endif
  68         int error, flags, sig;
  69 #ifdef COMPAT_FREEBSD6
  70         int ival;
  71 #endif
  72
  73         KASSERT(p != NULL,
  74             ("%s() called without a process", __func__));
  75         PROC_LOCK_ASSERT(p, MA_OWNED);
  76
  77         error = 0;
  78         switch (cmd) {
  79 #if defined(COMPAT_FREEBSD5) || defined(COMPAT_FREEBSD4) || defined(COMPAT_43)
  80         case _IOC(IOC_IN, 'p', 1, 0):
  81 #endif
  82 #ifdef COMPAT_FREEBSD6
  83         case _IO('p', 1):
  84                 ival = IOCPARM_IVAL(data);
  85                 data = &ival;
  86 #endif
  87         case PIOCBIS:
  88                 p->p_stops |= *(unsigned int *)data;
  89                 break;
  90 #if defined(COMPAT_FREEBSD5) || defined(COMPAT_FREEBSD4) || defined(COMPAT_43)
  91         case _IOC(IOC_IN, 'p', 2, 0):
  92 #endif
  93 #ifdef COMPAT_FREEBSD6
  94         case _IO('p', 2):
  95                 ival = IOCPARM_IVAL(data);
  96                 data = &ival;
  97 #endif
  98         case PIOCBIC:
  99                 p->p_stops &= ~*(unsigned int *)data;
 100                 break;
 101 #if defined(COMPAT_FREEBSD5) || defined(COMPAT_FREEBSD4) || defined(COMPAT_43)
 102         case _IOC(IOC_IN, 'p', 3, 0):
 103 #endif
 104 #ifdef COMPAT_FREEBSD6
 105         case _IO('p', 3):
 106                 ival = IOCPARM_IVAL(data);
 107                 data = &ival;
 108 #endif
 109         case PIOCSFL:
 110                 flags = *(unsigned int *)data;
 111                 if (flags & PF_ISUGID) {
 112                         /*
 113                          * XXXRW: Is this specific check required here, as
 114                          * p_candebug() should implement it, or other checks
 115                          * are missing.
 116                          */
 117                         error = priv_check_cred(td->td_ucred,
 118                             PRIV_DEBUG_SUGID, SUSER_ALLOWJAIL);
 119                         if (error)
 120                                 break;
 121                 }
 122                 p->p_pfsflags = flags;
 123                 break;
 124         case PIOCGFL:
 125                 *(unsigned int *)data = p->p_pfsflags;
 126                 break;
 127         case PIOCWAIT:
 128                 while (p->p_step == 0 && (p->p_flag & P_WEXIT) == 0) {
 129                         /* sleep until p stops */
 130                         _PHOLD(p);
 131                         error = msleep(&p->p_stype, &p->p_mtx,
 132                             PWAIT|PCATCH, "pioctl", 0);
 133                         _PRELE(p);
 134                         if (error != 0)
 135                                 break;
 136                 }
 137                 /* fall through to PIOCSTATUS */
 138         case PIOCSTATUS:
 139                 ps = (struct procfs_status *)data;
 140                 ps->state = (p->p_step == 0);
 141                 ps->flags = 0; /* nope */
 142                 ps->events = p->p_stops;
 143                 ps->why = p->p_step ? p->p_stype : 0;
 144                 ps->val = p->p_step ? p->p_xstat : 0;
 145                 break;
 146 #ifdef COMPAT_IA32
 147         case PIOCWAIT32:
 148                 while (p->p_step == 0 && (p->p_flag & P_WEXIT) == 0) {
 149                         /* sleep until p stops */
 150                         _PHOLD(p);
 151                         error = msleep(&p->p_stype, &p->p_mtx,
 152                             PWAIT|PCATCH, "pioctl", 0);
 153                         _PRELE(p);
 154                         if (error != 0)
 155                                 break;
 156                 }
 157                 /* fall through to PIOCSTATUS32 */
 158         case PIOCSTATUS32:
 159                 ps32 = (struct procfs_status32 *)data;
 160                 ps32->state = (p->p_step == 0);
 161                 ps32->flags = 0; /* nope */
 162                 ps32->events = p->p_stops;
 163                 ps32->why = p->p_step ? p->p_stype : 0;
 164                 ps32->val = p->p_step ? p->p_xstat : 0;
 165                 break;
 166 #endif
 167 #if defined(COMPAT_FREEBSD5) || defined(COMPAT_FREEBSD4) || defined(COMPAT_43)
 168         case _IOC(IOC_IN, 'p', 5, 0):
 169 #endif
 170 #ifdef COMPAT_FREEBSD6
 171         case _IO('p', 5):
 172                 ival = IOCPARM_IVAL(data);
 173                 data = &ival;
 174 #endif
 175         case PIOCCONT:
 176                 if (p->p_step == 0)
 177                         break;
 178                 sig = *(unsigned int *)data;
 179                 if (sig != 0 && !_SIG_VALID(sig)) {
 180                         error = EINVAL;
 181                         break;
 182                 }
 183 #if 0
 184                 p->p_step = 0;
 185                 if (P_SHOULDSTOP(p)) {
 186                         p->p_xstat = sig;
 187                         p->p_flag &= ~(P_STOPPED_TRACE|P_STOPPED_SIG);
 188                         PROC_SLOCK(p);
 189                         thread_unsuspend(p);
 190                         PROC_SUNLOCK(p);
 191                 } else if (sig)
 192                         psignal(p, sig);
 193 #else
 194                 if (sig)
 195                         psignal(p, sig);
 196                 p->p_step = 0;
 197                 wakeup(&p->p_step);
 198 #endif
 199                 break;
 200         default:
 201                 error = (ENOTTY);
 202         }
 203
 204         return (error);
 205 }
 206
 207 /*
 208  * Clean up on last close
 209  */
 210 int
 211 procfs_close(PFS_CLOSE_ARGS)
 212 {
 213         if (p != NULL && (p->p_pfsflags & PF_LINGER) == 0) {
 214                 PROC_LOCK_ASSERT(p, MA_OWNED);
 215                 p->p_pfsflags = 0;
 216                 p->p_stops = 0;
 217                 p->p_step = 0;
 218                 wakeup(&p->p_step);
 219         }
 220         return (0);
 221 }