+ rpp->p_rssize = 0;
+ rpp->p_maxrss = rip->p_maxrss;
+ rpp->p_wchan = 0;
+ rpp->p_slptime = 0;
+ rpp->p_pctcpu = 0;
+ rpp->p_cpticks = 0;
+ n = PIDHASH(rpp->p_pid);
+ p->p_idhash = pidhash[n];
+ pidhash[n] = rpp - proc;
+ multprog++;
+
+ /*
+ * Increase reference counts on shared objects.
+ */
+ for (n = 0; n < NOFILE; n++) {
+ fp = u.u_ofile[n];
+ if (fp == NULL)
+ continue;
+ fp->f_count++;
+ if (u.u_pofile[n]&RDLOCK)
+ fp->f_inode->i_rdlockc++;
+ if (u.u_pofile[n]&WRLOCK)
+ fp->f_inode->i_wrlockc++;
+ }
+ u.u_cdir->i_count++;
+ if (u.u_rdir)
+ u.u_rdir->i_count++;
+
+ /*
+ * Partially simulate the environment
+ * of the new process so that when it is actually
+ * created (by copying) it will look right.
+ * This begins the section where we must prevent the parent
+ * from being swapped.
+ */
+ rip->p_flag |= SKEEP;
+ if (procdup(rpp, isvfork))
+ return (1);
+
+ /*
+ * Make child runnable and add to run queue.
+ */
+ (void) spl6();
+ rpp->p_stat = SRUN;
+ setrq(rpp);
+ (void) spl0();
+
+ /*
+ * Cause child to take a non-local goto as soon as it runs.
+ * On older systems this was done with SSWAP bit in proc
+ * table; on VAX we use u.u_pcb.pcb_sswap so don't need
+ * to do rpp->p_flag |= SSWAP. Actually do nothing here.
+ */
+ /* rpp->p_flag |= SSWAP; */
+
+ /*
+ * Now can be swapped.
+ */
+ rip->p_flag &= ~SKEEP;
+
+ /*
+ * If vfork make chain from parent process to child
+ * (where virtal memory is temporarily). Wait for
+ * child to finish, steal virtual memory back,
+ * and wakeup child to let it die.
+ */
+ if (isvfork) {
+ u.u_procp->p_xlink = rpp;
+ u.u_procp->p_flag |= SNOVM;
+ while (rpp->p_flag & SVFORK)
+ sleep((caddr_t)rpp, PZERO - 1);
+ if ((rpp->p_flag & SLOAD) == 0)
+ panic("newproc vfork");
+ uaccess(rpp, Vfmap, &vfutl);
+ u.u_procp->p_xlink = 0;
+ vpassvm(rpp, u.u_procp, &vfutl, &u, Vfmap);
+ u.u_procp->p_flag &= ~SNOVM;
+ rpp->p_ndx = rpp - proc;
+ rpp->p_flag |= SVFDONE;
+ wakeup((caddr_t)rpp);
+ }
+
+ /*
+ * 0 return means parent.
+ */
+ return (0);