include/asm-parisc/cacheflush.h

   1 #ifndef _PARISC_CACHEFLUSH_H
   2 #define _PARISC_CACHEFLUSH_H
   3
   4 #include <linux/config.h>
   5 #include <linux/mm.h>
   6 #include <asm/cache.h>  /* for flush_user_dcache_range_asm() proto */
   7
   8 /* The usual comment is "Caches aren't brain-dead on the <architecture>".
   9  * Unfortunately, that doesn't apply to PA-RISC. */
  10
  11 /* Cache flush operations */
  12
  13 #ifdef CONFIG_SMP
  14 #define flush_cache_mm(mm) flush_cache_all()
  15 #else
  16 #define flush_cache_mm(mm) flush_cache_all_local()
  17 #endif
  18
  19 #define flush_kernel_dcache_range(start,size) \
  20         flush_kernel_dcache_range_asm((start), (start)+(size));
  21
  22 extern void flush_cache_all_local(void);
  23
  24 static inline void cacheflush_h_tmp_function(void *dummy)
  25 {
  26         flush_cache_all_local();
  27 }
  28
  29 static inline void flush_cache_all(void)
  30 {
  31         on_each_cpu(cacheflush_h_tmp_function, NULL, 1, 1);
  32 }
  33
  34 #define flush_cache_vmap(start, end)            flush_cache_all()
  35 #define flush_cache_vunmap(start, end)          flush_cache_all()
  36
  37 extern int parisc_cache_flush_threshold;
  38 void parisc_setup_cache_timing(void);
  39
  40 static inline void
  41 flush_user_dcache_range(unsigned long start, unsigned long end)
  42 {
  43         if ((end - start) < parisc_cache_flush_threshold)
  44                 flush_user_dcache_range_asm(start,end);
  45         else
  46                 flush_data_cache();
  47 }
  48
  49 static inline void
  50 flush_user_icache_range(unsigned long start, unsigned long end)
  51 {
  52         if ((end - start) < parisc_cache_flush_threshold)
  53                 flush_user_icache_range_asm(start,end);
  54         else
  55                 flush_instruction_cache();
  56 }
  57
  58 extern void flush_dcache_page(struct page *page);
  59
  60 #define flush_dcache_mmap_lock(mapping) \
  61         write_lock_irq(&(mapping)->tree_lock)
  62 #define flush_dcache_mmap_unlock(mapping) \
  63         write_unlock_irq(&(mapping)->tree_lock)
  64
  65 #define flush_icache_page(vma,page)     do { flush_kernel_dcache_page(page_address(page)); flush_kernel_icache_page(page_address(page)); } while (0)
  66
  67 #define flush_icache_range(s,e)         do { flush_kernel_dcache_range_asm(s,e); flush_kernel_icache_range_asm(s,e); } while (0)
  68
  69 #define copy_to_user_page(vma, page, vaddr, dst, src, len) \
  70 do { \
  71         flush_cache_page(vma, vaddr, page_to_pfn(page)); \
  72         memcpy(dst, src, len); \
  73         flush_kernel_dcache_range_asm((unsigned long)dst, (unsigned long)dst + len); \
  74 } while (0)
  75
  76 #define copy_from_user_page(vma, page, vaddr, dst, src, len) \
  77 do { \
  78         flush_cache_page(vma, vaddr, page_to_pfn(page)); \
  79         memcpy(dst, src, len); \
  80 } while (0)
  81
  82 static inline void flush_cache_range(struct vm_area_struct *vma,
  83                 unsigned long start, unsigned long end)
  84 {
  85         int sr3;
  86
  87         if (!vma->vm_mm->context) {
  88                 BUG();
  89                 return;
  90         }
  91
  92         sr3 = mfsp(3);
  93         if (vma->vm_mm->context == sr3) {
  94                 flush_user_dcache_range(start,end);
  95                 flush_user_icache_range(start,end);
  96         } else {
  97                 flush_cache_all();
  98         }
  99 }
 100
 101 /* Simple function to work out if we have an existing address translation
 102  * for a user space vma. */
 103 static inline pte_t *__translation_exists(struct mm_struct *mm,
 104                                           unsigned long addr)
 105 {
 106         pgd_t *pgd = pgd_offset(mm, addr);
 107         pmd_t *pmd;
 108         pte_t *pte;
 109
 110         if(pgd_none(*pgd))
 111                 return NULL;
 112
 113         pmd = pmd_offset(pgd, addr);
 114         if(pmd_none(*pmd) || pmd_bad(*pmd))
 115                 return NULL;
 116
 117         pte = pte_offset_map(pmd, addr);
 118
 119         /* The PA flush mappings show up as pte_none, but they're
 120          * valid none the less */
 121         if(pte_none(*pte) && ((pte_val(*pte) & _PAGE_FLUSH) == 0))
 122                 return NULL;
 123         return pte;
 124 }
 125 #define translation_exists(vma, addr)   __translation_exists((vma)->vm_mm, addr)
 126
 127
 128 /* Private function to flush a page from the cache of a non-current
 129  * process.  cr25 contains the Page Directory of the current user
 130  * process; we're going to hijack both it and the user space %sr3 to
 131  * temporarily make the non-current process current.  We have to do
 132  * this because cache flushing may cause a non-access tlb miss which
 133  * the handlers have to fill in from the pgd of the non-current
 134  * process. */
 135 static inline void
 136 flush_user_cache_page_non_current(struct vm_area_struct *vma,
 137                                   unsigned long vmaddr)
 138 {
 139         /* save the current process space and pgd */
 140         unsigned long space = mfsp(3), pgd = mfctl(25);
 141
 142         /* we don't mind taking interrups since they may not
 143          * do anything with user space, but we can't
 144          * be preempted here */
 145         preempt_disable();
 146
 147         /* make us current */
 148         mtctl(__pa(vma->vm_mm->pgd), 25);
 149         mtsp(vma->vm_mm->context, 3);
 150
 151         flush_user_dcache_page(vmaddr);
 152         if(vma->vm_flags & VM_EXEC)
 153                 flush_user_icache_page(vmaddr);
 154
 155         /* put the old current process back */
 156         mtsp(space, 3);
 157         mtctl(pgd, 25);
 158         preempt_enable();
 159 }
 160
 161 static inline void
 162 __flush_cache_page(struct vm_area_struct *vma, unsigned long vmaddr)
 163 {
 164         if (likely(vma->vm_mm->context == mfsp(3))) {
 165                 flush_user_dcache_page(vmaddr);
 166                 if (vma->vm_flags & VM_EXEC)
 167                         flush_user_icache_page(vmaddr);
 168         } else {
 169                 flush_user_cache_page_non_current(vma, vmaddr);
 170         }
 171 }
 172
 173 static inline void
 174 flush_cache_page(struct vm_area_struct *vma, unsigned long vmaddr, unsigned long pfn)
 175 {
 176         BUG_ON(!vma->vm_mm->context);
 177
 178         if(likely(translation_exists(vma, vmaddr)))
 179                 __flush_cache_page(vma, vmaddr);
 180
 181 }
 182 #endif
 183