- reinstalled priority changing, now in sched() and unready() - reinstalled check on message buffer in sys_call() - reinstalled check in send masks in sys_call() - changed do_fork() to get new privilege structure for SYS_PROCs - removed some processes from boot image---will be dynamically started later
		
			
				
	
	
		
			70 lines
		
	
	
		
			2.3 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			70 lines
		
	
	
		
			2.3 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
/* The system call implemented in this file:
 | 
						|
 *   m_type:	SYS_FORK
 | 
						|
 *
 | 
						|
 * The parameters for this system call are:
 | 
						|
 *    m1_i1:	PR_PROC_NR	(child's process table slot)	
 | 
						|
 *    m1_i2:	PR_PPROC_NR	(parent, process that forked)	
 | 
						|
 *    m1_i3:	PR_PID	 	(child pid received from PM)
 | 
						|
 */
 | 
						|
 | 
						|
#include "../system.h"
 | 
						|
#include <signal.h>
 | 
						|
#if (CHIP == INTEL)
 | 
						|
#include "../protect.h"
 | 
						|
#endif
 | 
						|
 | 
						|
#if USE_FORK
 | 
						|
 | 
						|
/*===========================================================================*
 | 
						|
 *				do_fork					     *
 | 
						|
 *===========================================================================*/
 | 
						|
PUBLIC int do_fork(m_ptr)
 | 
						|
register message *m_ptr;	/* pointer to request message */
 | 
						|
{
 | 
						|
/* Handle sys_fork().  PR_PPROC_NR has forked.  The child is PR_PROC_NR. */
 | 
						|
#if (CHIP == INTEL)
 | 
						|
  reg_t old_ldt_sel;
 | 
						|
#endif
 | 
						|
  register struct proc *rpc;		/* child process pointer */
 | 
						|
  struct proc *rpp;			/* parent process pointer */
 | 
						|
  int i;
 | 
						|
 | 
						|
  rpp = proc_addr(m_ptr->PR_PPROC_NR);
 | 
						|
  rpc = proc_addr(m_ptr->PR_PROC_NR);
 | 
						|
  if (isemptyp(rpp) || ! isemptyp(rpc)) return(EINVAL);
 | 
						|
 | 
						|
  /* Copy parent 'proc' struct to child. And reinitialize some fields. */
 | 
						|
#if (CHIP == INTEL)
 | 
						|
  old_ldt_sel = rpc->p_ldt_sel;		/* backup local descriptors */
 | 
						|
  *rpc = *rpp;				/* copy 'proc' struct */
 | 
						|
  rpc->p_ldt_sel = old_ldt_sel;		/* restore descriptors */
 | 
						|
#else
 | 
						|
  *rpc = *rpp;				/* copy 'proc' struct */
 | 
						|
#endif
 | 
						|
  rpc->p_nr = m_ptr->PR_PROC_NR;	/* this was obliterated by copy */
 | 
						|
 | 
						|
  /* Only one in group should have SIGNALED, child doesn't inherit tracing. */
 | 
						|
  rpc->p_rts_flags |= NO_MAP;		/* inhibit process from running */
 | 
						|
  rpc->p_rts_flags &= ~(SIGNALED | SIG_PENDING | P_STOP);
 | 
						|
  sigemptyset(&rpc->p_pending);
 | 
						|
 | 
						|
  rpc->p_reg.retreg = 0;	/* child sees pid = 0 to know it is child */
 | 
						|
  rpc->p_user_time = 0;		/* set all the accounting times to 0 */
 | 
						|
  rpc->p_sys_time = 0;
 | 
						|
 | 
						|
  /* If this is a system process, make sure the child process gets its own
 | 
						|
   * privilege structure for accounting.
 | 
						|
   */
 | 
						|
  if (priv(rpc)->s_flags & SYS_PROC) {
 | 
						|
      if (OK != (i=get_priv(rpc, SYS_PROC))) return(i);	/* get structure */
 | 
						|
      for (i=0; i< BITMAP_CHUNKS(NR_SYS_PROCS); i++)	/* remove pending: */
 | 
						|
          priv(rpc)->s_notify_pending.chunk[i] = 0;	/* - notifications */
 | 
						|
      priv(rpc)->s_int_pending = 0;			/* - interrupts */
 | 
						|
      sigemptyset(&priv(rpc)->s_sig_pending);		/* - signals */
 | 
						|
  }
 | 
						|
  return(OK);
 | 
						|
}
 | 
						|
 | 
						|
#endif /* USE_FORK */
 | 
						|
 |