- if ((rpp = p)==NULL)
- panic("no procs");
-
- /*
- * make proc entry for new proc
- */
-
- rip = u.u_procp;
- rpp->p_stat = SIDL;
- rpp->p_clktim = 0;
- rpp->p_flag = SLOAD | (rip->p_flag & (SPAGI|SDETACH|SNUSIG));
- if (isvfork) {
- rpp->p_flag |= SVFORK;
- rpp->p_ndx = rip->p_ndx;
- } else
- rpp->p_ndx = rpp - proc;
- rpp->p_uid = rip->p_uid;
- rpp->p_pgrp = rip->p_pgrp;
- rpp->p_nice = rip->p_nice;
- rpp->p_textp = isvfork ? 0 : rip->p_textp;
- rpp->p_pid = mpid;
- rpp->p_ppid = rip->p_pid;
- rpp->p_pptr = rip;
- rpp->p_time = 0;
- rpp->p_cpu = 0;
- rpp->p_siga0 = rip->p_siga0;
- rpp->p_siga1 = rip->p_siga1;
- /* take along any pending signals, like stops? */
- if (isvfork) {
- rpp->p_tsize = rpp->p_dsize = rpp->p_ssize = 0;
- rpp->p_szpt = clrnd(ctopt(UPAGES));
- forkstat.cntvfork++;
- forkstat.sizvfork += rip->p_dsize + rip->p_ssize;
- } else {
- rpp->p_tsize = rip->p_tsize;
- rpp->p_dsize = rip->p_dsize;
- rpp->p_ssize = rip->p_ssize;
- rpp->p_szpt = rip->p_szpt;
- forkstat.cntfork++;
- forkstat.sizfork += rip->p_dsize + rip->p_ssize;
- }
- rpp->p_rssize = 0;
- 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;
-
- /*
- * make duplicate entries
- * where needed
- */
-
- multprog++;
-
- for(n=0; n<NOFILE; n++)
- if(u.u_ofile[n] != NULL) {
- u.u_ofile[n]->f_count++;
- if(!isvfork && u.u_vrpages[n])
- u.u_ofile[n]->f_inode->i_vfdcnt++;
- }
-
- 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.
- */
-
- rip->p_flag |= SKEEP; /* prevent parent from being swapped */
-
- if (procdup(rpp, isvfork))
- return (1);
-
- spl6();
- rpp->p_stat = SRUN;
- setrq(rpp);
- spl0();
- /* SSWAP NOT NEEDED IN THIS CASE AS u.u_pcb.pcb_sswap SUFFICES */
- /* rpp->p_flag |= SSWAP; */
- rip->p_flag &= ~SKEEP;
- 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);
- for (n = 0; n < NOFILE; n++)
- if (vfutl.u_vrpages[n]) {
- if ((u.u_vrpages[n] = vfutl.u_vrpages[n] - 1) == 0)
- if (--u.u_ofile[n]->f_inode->i_vfdcnt < 0)
- panic("newproc i_vfdcnt");
- vfutl.u_vrpages[n] = 0;
- }
- u.u_procp->p_flag &= ~SNOVM;
- rpp->p_ndx = rpp - proc;
- rpp->p_flag |= SVFDONE;
- wakeup((caddr_t)rpp);
- }
- return (0);