projects / unix-history / blobdiff
? search:
summary | tags | clone url | shortlog | log | commit | commitdiff | tree
raw | inline | side by side
BSD 4_3_Net_2 release
[unix-history] / usr / src / sys / kern / sys_process.c
diff --git a/usr/src/sys/kern/sys_process.c b/usr/src/sys/kern/sys_process.c
index 3645f12..1c74cd1 100644 (file)
--- a/usr/src/sys/kern/sys_process.c
+++ b/usr/src/sys/kern/sys_process.c
@@ -1,14 +1,40 @@
 /*
  * Copyright (c) 1982, 1986, 1989 Regents of the University of California.
 /*
  * Copyright (c) 1982, 1986, 1989 Regents of the University of California.
- * All rights reserved.  The Berkeley software License Agreement
- * specifies the terms and conditions for redistribution.
+ * All rights reserved.
  *
  *
- *     @(#)sys_process.c       7.16 (Berkeley) %G%
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. All advertising materials mentioning features or use of this software
+ *    must display the following acknowledgement:
+ *     This product includes software developed by the University of
+ *     California, Berkeley and its contributors.
+ * 4. Neither the name of the University nor the names of its contributors
+ *    may be used to endorse or promote products derived from this software
+ *    without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
+ *
+ *     from: @(#)sys_process.c 7.22 (Berkeley) 5/11/91
  */
 
 #define IPCREG
 #include "param.h"
  */
 
 #define IPCREG
 #include "param.h"
-#include "user.h"
 #include "proc.h"
 #include "vnode.h"
 #include "seg.h"
 #include "proc.h"
 #include "vnode.h"
 #include "seg.h"
@@ -17,31 +43,13 @@
 
 #include "machine/reg.h"
 #include "machine/psl.h"
 
 #include "machine/reg.h"
 #include "machine/psl.h"
+#include "vm/vm.h"
 #include "vm/vm_page.h"
 #include "vm/vm_page.h"
-#include "vm/vm_prot.h"
 
 
-/*
- * Priority for tracing
- */
-#define        IPCPRI  PZERO
-
-/*
- * Tracing variables.
- * Used to pass trace command from
- * parent to child being traced.
- * This data base cannot be
- * shared and is locked
- * per user.
- */
-struct {
-       int     ip_lock;
-       int     ip_req;
-       int     *ip_addr;
-       int     ip_data;
-} ipc;
+#include "user.h"
 
 /*
 
 /*
- * sys-trace system call.
+ * Process debugging system call.
  */
 ptrace(curp, uap, retval)
        struct proc *curp;
  */
 ptrace(curp, uap, retval)
        struct proc *curp;
@@ -53,172 +61,40 @@ ptrace(curp, uap, retval)
        } *uap;
        int *retval;
 {
        } *uap;
        int *retval;
 {
-       register struct proc *p;
 
 
-       if (uap->req <= 0) {
-               curp->p_flag |= STRC;
-               return (0);
-       }
-       p = pfind(uap->pid);
-       if (p == 0 || p->p_stat != SSTOP || p->p_pptr != curp ||
-           !(p->p_flag & STRC))
-               return (ESRCH);
-       while (ipc.ip_lock)
-               sleep((caddr_t)&ipc, IPCPRI);
-       ipc.ip_lock = p->p_pid;
-       ipc.ip_data = uap->data;
-       ipc.ip_addr = uap->addr;
-       ipc.ip_req = uap->req;
-       p->p_flag &= ~SWTED;
-       while (ipc.ip_req > 0) {
-               if (p->p_stat==SSTOP)
-                       setrun(p);
-               sleep((caddr_t)&ipc, IPCPRI);
-       }
-       *retval = ipc.ip_data;
-       ipc.ip_lock = 0;
-       wakeup((caddr_t)&ipc);
-       if (ipc.ip_req < 0)
-               return (EIO);
-       return (0);
+       /*
+        * Body deleted.
+        */
+       return (ENOSYS);
 }
 
 }
 
-#define        PHYSOFF(p, o) \
-       ((physadr)(p)+((o)/sizeof(((physadr)0)->r[0])))
-#if defined(i386)
-#undef        PC
-#undef        SP
-#undef        PS
-#undef        R0
-#undef        R1
-
-#define       PC      tEIP
-#define       SP      tESP
-#define       PS      tEFLAGS
-#define       R0      tEDX
-#define       R1      tECX
-#endif
-
-/*
- * Code that the child process
- * executes to implement the command
- * of the parent process in tracing.
- */
 procxmt(p)
        register struct proc *p;
 {
 procxmt(p)
        register struct proc *p;
 {
-       register int i, *poff;
-
-       if (ipc.ip_lock != p->p_pid)
-               return (0);
-       p->p_slptime = 0;
-       i = ipc.ip_req;
-       ipc.ip_req = 0;
-       switch (i) {
-
-       case PT_READ_I:                 /* read the child's text space */
-               if (!useracc((caddr_t)ipc.ip_addr, 4, B_READ))
-                       goto error;
-               ipc.ip_data = fuiword((caddr_t)ipc.ip_addr);
-               break;
 
 
-       case PT_READ_D:                 /* read the child's data space */
-               if (!useracc((caddr_t)ipc.ip_addr, 4, B_READ))
-                       goto error;
-               ipc.ip_data = fuword((caddr_t)ipc.ip_addr);
-               break;
-
-       case PT_READ_U:                 /* read the child's u. */
-#ifdef HPUXCOMPAT
-               if (u.u_pcb.pcb_flags & PCB_HPUXTRACE)
-                       i = hpuxtobsduoff(ipc.ip_addr);
-               else
-#endif
-               i = (int)ipc.ip_addr;
-               if (i<0 || i > ctob(UPAGES)-sizeof(int))
-                       goto error;
-               ipc.ip_data = *(int *)PHYSOFF(&u, i);
-               break;
-
-       case PT_WRITE_I:                /* write the child's text space */
-               if ((i = suiword((caddr_t)ipc.ip_addr, ipc.ip_data)) < 0) {
-                       vm_offset_t sa, ea;
-                       int rv;
-
-                       sa = trunc_page((vm_offset_t)ipc.ip_addr);
-                       ea = round_page((vm_offset_t)ipc.ip_addr+sizeof(int)-1);
-                       rv = vm_map_protect(&p->p_vmspace->vm_map, sa, ea,
-                                       VM_PROT_DEFAULT, FALSE);
-                       if (rv == KERN_SUCCESS) {
-                               i = suiword((caddr_t)ipc.ip_addr, ipc.ip_data);
-                               (void) vm_map_protect(&p->p_vmspace->vm_map,
-                                       sa, ea, VM_PROT_READ|VM_PROT_EXECUTE,
-                                       FALSE);
-                       }
-               }
-               if (i < 0)
-                       goto error;
-               break;
-
-       case PT_WRITE_D:                /* write the child's data space */
-               if (suword((caddr_t)ipc.ip_addr, 0) < 0)
-                       goto error;
-               (void) suword((caddr_t)ipc.ip_addr, ipc.ip_data);
-               break;
-
-       case PT_WRITE_U:                /* write the child's u. */
-#ifdef HPUXCOMPAT
-               if (u.u_pcb.pcb_flags & PCB_HPUXTRACE)
-                       i = hpuxtobsduoff(ipc.ip_addr);
-               else
-#endif
-               i = (int)ipc.ip_addr;
-               poff = (int *)PHYSOFF(&u, i);
-               for (i=0; i<NIPCREG; i++)
-                       if (poff == &p->p_regs[ipcreg[i]])
-                               goto ok;
-               if (poff == &p->p_regs[PS]) {
-                       ipc.ip_data |= PSL_USERSET;
-                       ipc.ip_data &= ~PSL_USERCLR;
-#ifdef PSL_CM_CLR
-                       if (ipc.ip_data & PSL_CM)
-                               ipc.ip_data &= ~PSL_CM_CLR;
-#endif
-                       goto ok;
-               }
-#if defined(hp300)
-#ifdef FPCOPROC
-               if (poff >= (int *)u.u_pcb.pcb_fpregs.fpf_regs &&
-                   poff <= (int *)&u.u_pcb.pcb_fpregs.fpf_fpiar)
-                       goto ok;
-#endif
-#endif
-               goto error;
-
-       ok:
-               *poff = ipc.ip_data;
-               break;
-
-       case PT_STEP:                   /* single step the child */
-       case PT_CONTINUE:               /* continue the child */
-               if ((int)ipc.ip_addr != 1)
-                       p->p_regs[PC] = (int)ipc.ip_addr;
-               if ((unsigned)ipc.ip_data > NSIG)
-                       goto error;
-               p->p_xstat = ipc.ip_data;       /* see issig */
-               if (i == PT_STEP) 
-                       p->p_regs[PS] |= PSL_T;
-               wakeup((caddr_t)&ipc);
-               return (1);
+       /*
+        * Body deleted.
+        */
+       return (0);
+}
 
 
-       case PT_KILL:                   /* kill the child process */
-               wakeup((caddr_t)&ipc);
-               exit(p, (int)p->p_xstat);
+/*
+ * Enable process profiling system call.
+ */
+/* ARGSUSED */
+profil(p, uap, retval)
+       struct proc *p;
+       register struct args {
+               short   *bufbase;
+               unsigned bufsize;
+               unsigned pcoffset;
+               unsigned pcscale;
+       } *uap;
+       int *retval;
+{
 
 
-       default:
-       error:
-               ipc.ip_req = -1;
-       }
-       wakeup((caddr_t)&ipc);
-       return (0);
+       /*
+        * Body deleted.
+        */
+       return (ENOSYS);
 }
 }
Continuous source code history from original PDP-7 UNIX to FreeBSD 2, the first fully unencumbered FreeBSD release.