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 * 3. All advertising materials mentioning features or use of this software 18 * must display the following acknowledgement: 19 * This product includes software developed by the University of 20 * California, Berkeley and its contributors. 21 * 4. Neither the name of the University nor the names of its contributors 22 * may be used to endorse or promote products derived from this software 23 * without specific prior written permission. 24 * 25 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 26 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 27 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 28 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 29 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 30 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 31 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 32 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 33 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 34 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 35 * SUCH DAMAGE. 36 * 37 * @(#)procfs_ctl.c 8.4 (Berkeley) 6/15/94 38 * 39 * From: 40 * $FreeBSD: src/sys/miscfs/procfs/procfs_ctl.c,v 1.20.2.2 2002/01/22 17:22:59 nectar Exp $ 41 * $DragonFly: src/sys/vfs/procfs/procfs_ctl.c,v 1.6 2003/08/20 09:56:33 rob Exp $ 42 */ 43 44 #include <sys/param.h> 45 #include <sys/systm.h> 46 #include <sys/proc.h> 47 #include <sys/vnode.h> 48 #include <sys/ptrace.h> 49 #include <sys/signalvar.h> 50 #include <vfs/procfs/procfs.h> 51 52 #include <vm/vm.h> 53 54 #ifndef FIX_SSTEP 55 #define FIX_SSTEP(p) 56 #endif 57 58 /* 59 * True iff process (p) is in trace wait state 60 * relative to process (curp) 61 */ 62 #define TRACE_WAIT_P(curp, p) \ 63 ((p)->p_stat == SSTOP && \ 64 (p)->p_pptr == (curp) && \ 65 ((p)->p_flag & P_TRACED)) 66 67 #define PROCFS_CTL_ATTACH 1 68 #define PROCFS_CTL_DETACH 2 69 #define PROCFS_CTL_STEP 3 70 #define PROCFS_CTL_RUN 4 71 #define PROCFS_CTL_WAIT 5 72 73 static vfs_namemap_t ctlnames[] = { 74 /* special /proc commands */ 75 { "attach", PROCFS_CTL_ATTACH }, 76 { "detach", PROCFS_CTL_DETACH }, 77 { "step", PROCFS_CTL_STEP }, 78 { "run", PROCFS_CTL_RUN }, 79 { "wait", PROCFS_CTL_WAIT }, 80 { 0 }, 81 }; 82 83 static vfs_namemap_t signames[] = { 84 /* regular signal names */ 85 { "hup", SIGHUP }, { "int", SIGINT }, 86 { "quit", SIGQUIT }, { "ill", SIGILL }, 87 { "trap", SIGTRAP }, { "abrt", SIGABRT }, 88 { "iot", SIGIOT }, { "emt", SIGEMT }, 89 { "fpe", SIGFPE }, { "kill", SIGKILL }, 90 { "bus", SIGBUS }, { "segv", SIGSEGV }, 91 { "sys", SIGSYS }, { "pipe", SIGPIPE }, 92 { "alrm", SIGALRM }, { "term", SIGTERM }, 93 { "urg", SIGURG }, { "stop", SIGSTOP }, 94 { "tstp", SIGTSTP }, { "cont", SIGCONT }, 95 { "chld", SIGCHLD }, { "ttin", SIGTTIN }, 96 { "ttou", SIGTTOU }, { "io", SIGIO }, 97 { "xcpu", SIGXCPU }, { "xfsz", SIGXFSZ }, 98 { "vtalrm", SIGVTALRM }, { "prof", SIGPROF }, 99 { "winch", SIGWINCH }, { "info", SIGINFO }, 100 { "usr1", SIGUSR1 }, { "usr2", SIGUSR2 }, 101 { 0 }, 102 }; 103 104 static int procfs_control (struct proc *curp, struct proc *p, int op); 105 106 static int 107 procfs_control(curp, p, op) 108 struct proc *curp; 109 struct proc *p; 110 int op; 111 { 112 int error; 113 114 /* Can't trace a process that's currently exec'ing. */ 115 if ((p->p_flag & P_INEXEC) != 0) 116 return EAGAIN; 117 /* 118 * Authorization check: rely on normal debugging protection, except 119 * allow processes to disengage debugging on a process onto which 120 * they have previously attached, but no longer have permission to 121 * debug. 122 */ 123 if (op != PROCFS_CTL_DETACH) { 124 if (securelevel > 0 && p->p_pid == 1) 125 return (EPERM); 126 127 if (!CHECKIO(curp, p) || p_trespass(curp->p_ucred, p->p_ucred)) 128 return (EPERM); 129 } 130 131 /* 132 * Attach - attaches the target process for debugging 133 * by the calling process. 134 */ 135 if (op == PROCFS_CTL_ATTACH) { 136 /* check whether already being traced */ 137 if (p->p_flag & P_TRACED) 138 return (EBUSY); 139 140 /* can't trace yourself! */ 141 if (p->p_pid == curp->p_pid) 142 return (EINVAL); 143 144 /* 145 * Go ahead and set the trace flag. 146 * Save the old parent (it's reset in 147 * _DETACH, and also in kern_exit.c:wait4() 148 * Reparent the process so that the tracing 149 * proc gets to see all the action. 150 * Stop the target. 151 */ 152 p->p_flag |= P_TRACED; 153 faultin(p); 154 p->p_xstat = 0; /* XXX ? */ 155 if (p->p_pptr != curp) { 156 p->p_oppid = p->p_pptr->p_pid; 157 proc_reparent(p, curp); 158 } 159 psignal(p, SIGSTOP); 160 return (0); 161 } 162 163 /* 164 * Target process must be stopped, owned by (curp) and 165 * be set up for tracing (P_TRACED flag set). 166 * Allow DETACH to take place at any time for sanity. 167 * Allow WAIT any time, of course. 168 */ 169 switch (op) { 170 case PROCFS_CTL_DETACH: 171 case PROCFS_CTL_WAIT: 172 break; 173 174 default: 175 if (!TRACE_WAIT_P(curp, p)) 176 return (EBUSY); 177 } 178 179 180 #ifdef FIX_SSTEP 181 /* 182 * do single-step fixup if needed 183 */ 184 FIX_SSTEP(p); 185 #endif 186 187 /* 188 * Don't deliver any signal by default. 189 * To continue with a signal, just send 190 * the signal name to the ctl file 191 */ 192 p->p_xstat = 0; 193 194 switch (op) { 195 /* 196 * Detach. Cleans up the target process, reparent it if possible 197 * and set it running once more. 198 */ 199 case PROCFS_CTL_DETACH: 200 /* if not being traced, then this is a painless no-op */ 201 if ((p->p_flag & P_TRACED) == 0) 202 return (0); 203 204 /* not being traced any more */ 205 p->p_flag &= ~P_TRACED; 206 207 /* remove pending SIGTRAP, else the process will die */ 208 SIGDELSET(p->p_siglist, SIGTRAP); 209 210 /* give process back to original parent */ 211 if (p->p_oppid != p->p_pptr->p_pid) { 212 struct proc *pp; 213 214 pp = pfind(p->p_oppid); 215 if (pp) 216 proc_reparent(p, pp); 217 } 218 219 p->p_oppid = 0; 220 p->p_flag &= ~P_WAITED; /* XXX ? */ 221 wakeup((caddr_t) curp); /* XXX for CTL_WAIT below ? */ 222 223 break; 224 225 /* 226 * Step. Let the target process execute a single instruction. 227 */ 228 case PROCFS_CTL_STEP: 229 PHOLD(p); 230 error = procfs_sstep(p); 231 PRELE(p); 232 if (error) 233 return (error); 234 break; 235 236 /* 237 * Run. Let the target process continue running until a breakpoint 238 * or some other trap. 239 */ 240 case PROCFS_CTL_RUN: 241 break; 242 243 /* 244 * Wait for the target process to stop. 245 * If the target is not being traced then just wait 246 * to enter 247 */ 248 case PROCFS_CTL_WAIT: 249 error = 0; 250 if (p->p_flag & P_TRACED) { 251 while (error == 0 && 252 (p->p_stat != SSTOP) && 253 (p->p_flag & P_TRACED) && 254 (p->p_pptr == curp)) { 255 error = tsleep((caddr_t) p, 256 PCATCH, "procfsx", 0); 257 } 258 if (error == 0 && !TRACE_WAIT_P(curp, p)) 259 error = EBUSY; 260 } else { 261 while (error == 0 && p->p_stat != SSTOP) { 262 error = tsleep((caddr_t) p, 263 PCATCH, "procfs", 0); 264 } 265 } 266 return (error); 267 268 default: 269 panic("procfs_control"); 270 } 271 272 if (p->p_stat == SSTOP) 273 setrunnable(p); 274 return (0); 275 } 276 277 int 278 procfs_doctl(curp, p, pfs, uio) 279 struct proc *curp; 280 struct pfsnode *pfs; 281 struct uio *uio; 282 struct proc *p; 283 { 284 int xlen; 285 int error; 286 char msg[PROCFS_CTLLEN+1]; 287 vfs_namemap_t *nm; 288 289 if (uio->uio_rw != UIO_WRITE) 290 return (EOPNOTSUPP); 291 292 xlen = PROCFS_CTLLEN; 293 error = vfs_getuserstr(uio, msg, &xlen); 294 if (error) 295 return (error); 296 297 /* 298 * Map signal names into signal generation 299 * or debug control. Unknown commands and/or signals 300 * return EOPNOTSUPP. 301 * 302 * Sending a signal while the process is being debugged 303 * also has the side effect of letting the target continue 304 * to run. There is no way to single-step a signal delivery. 305 */ 306 error = EOPNOTSUPP; 307 308 nm = vfs_findname(ctlnames, msg, xlen); 309 if (nm) { 310 error = procfs_control(curp, p, nm->nm_val); 311 } else { 312 nm = vfs_findname(signames, msg, xlen); 313 if (nm) { 314 if (TRACE_WAIT_P(curp, p)) { 315 p->p_xstat = nm->nm_val; 316 #ifdef FIX_SSTEP 317 FIX_SSTEP(p); 318 #endif 319 setrunnable(p); 320 } else { 321 psignal(p, nm->nm_val); 322 } 323 error = 0; 324 } 325 } 326 327 return (error); 328 } 329