/* The kernel call implemented in this file:
 *   m_type:	SYS_NEWMAP
 *
 * The parameters for this kernel call are:
 *    m1_i1:	PR_ENDPT		(install new map for this process)
 *    m1_p1:	PR_MEM_PTR		(pointer to the new memory map)
 */
#include "../system.h"
#include <minix/endpoint.h>

#if USE_NEWMAP

/*===========================================================================*
 *				do_newmap				     *
 *===========================================================================*/
PUBLIC int do_newmap(m_ptr)
message *m_ptr;			/* pointer to request message */
{
/* Handle sys_newmap().  Fetch the memory map from PM. */
  register struct proc *rp;	/* process whose map is to be loaded */
  struct mem_map *map_ptr;	/* virtual address of map inside caller (PM) */
  phys_bytes src_phys;		/* physical address of map at the PM */
  int proc;

  map_ptr = (struct mem_map *) m_ptr->PR_MEM_PTR;
  if (! isokendpt(m_ptr->PR_ENDPT, &proc)) return(EINVAL);
  if (iskerneln(proc)) return(EPERM);
  rp = proc_addr(proc);

  return newmap(rp, map_ptr);
}


/*===========================================================================*
 *				newmap					     *
 *===========================================================================*/
PUBLIC int newmap(rp, map_ptr)
struct proc *rp;		/* process whose map is to be loaded */
struct mem_map *map_ptr;	/* virtual address of map inside caller (PM) */
{
/* Fetch the memory map from PM. */
  phys_bytes src_phys;		/* physical address of map at the PM */
  int proc;

  /* Copy the map from PM. */
  src_phys = umap_local(proc_addr(who_p), D, (vir_bytes) map_ptr, 
      sizeof(rp->p_memmap));
  if (src_phys == 0) return(EFAULT);
  phys_copy(src_phys,vir2phys(rp->p_memmap),
	(phys_bytes)sizeof(rp->p_memmap));

  alloc_segments(rp);

  return(OK);
}
#endif /* USE_NEWMAP */