sys/src/syspurgws.c

Go to the documentation of this file.

// _Id: syspurgws.c,v 1.14 2006-03-09 10:47:59 roart Exp $
// _Locker:  $

// Author. Roar Thronæs.

#include<linux/linkage.h>

#include<linux/mm.h>
#include<linux/sched.h>

#include<asm/current.h>

#include<ipldef.h>
#include<phddef.h>
#include<ssdef.h>
#include<va_rangedef.h>
#include<wsldef.h>
#include<vmspte.h>
#include<ipl.h>
#include <mmg_routines.h>
#include <misc_routines.h>

int mmg_purgwsscn(int acmode, void * va, struct _pcb * p, signed int pagedirection, struct _rde * rde, unsigned long newpte) {
#ifdef CONFIG_VMS
  // acquire mmg spin
  struct page * page;
  struct _phd * phd;
  struct _wsl * wsl, *wsle;
  unsigned long pfn;
  struct mm_struct * mm = p->mm;
  if (mm==0) 
    mm = p->active_mm; // workaround for do_exit
  struct _mypte *pte = findpte_new(mm,va);
  if (pte->pte_v_valid==0)
    return SS__NORMAL;
#ifdef __arch_um__
  pfn=__pa(pte->pte_v_pfn<<PAGE_SHIFT)>>PAGE_SHIFT;
#else
  pfn=pte->pte_v_pfn;
#endif
  page=&mem_map[pfn];
  phd=p->pcb_l_phd;
  wsl=phd->phd_l_wslist;

  if ((unsigned long)page->pfn_l_wslx_qw>=0x80000000)
    return SS__NORMAL;

  wsle=&wsl[page->pfn_l_wslx_qw];

  if (wsle->wsl_v_valid==0)
    return SS__NORMAL;

  if (wsle->wsl_v_pfnlock)
    return SS__NORMAL;

  if ((((unsigned long)wsle->wsl_pq_va)&WSL$M_PAGTYP)>=WSL$C_PPGTBL)
    return SS__NORMAL;

  mmg_frewslx(p, va, findpte_new(mm, va), page->pfn$l_wslx_qw);

  return SS__NORMAL;
#endif
}

int mmg_purgwspag (int acmode, void * va, struct _pcb * p, signed int pagedirection, struct _rde * rde, unsigned long newpte) {
  return mmg_purgwsscn(acmode,va,p,pagedirection,rde,newpte);
}

asmlinkage int exe_purgws(struct _va_range *inadr) {
  unsigned long start=((unsigned long)inadr->va_range_ps_start_va)&0xfffff000;
  unsigned long end=((unsigned long)inadr->va_range_ps_end_va)&0xfffff000;
  setipl(IPL__ASTDEL);
  for(;start<end;start+=PAGE_SIZE) {
    mmg_credel(0, start, end, mmg$purgwspag, 0, 0, 0, current, 1);
  }
  return SS__NORMAL;
}

---