include/asm-m68k/tlbflush.h

   1 #ifndef _M68K_TLBFLUSH_H
   2 #define _M68K_TLBFLUSH_H
   3
   4 #ifndef CONFIG_SUN3
   5
   6 #include <asm/current.h>
   7
   8 static inline void flush_tlb_kernel_page(void *addr)
   9 {
  10         if (CPU_IS_040_OR_060) {
  11                 mm_segment_t old_fs = get_fs();
  12                 set_fs(KERNEL_DS);
  13                 __asm__ __volatile__(".chip 68040\n\t"
  14                                      "pflush (%0)\n\t"
  15                                      ".chip 68k"
  16                                      : : "a" (addr));
  17                 set_fs(old_fs);
  18         } else
  19                 __asm__ __volatile__("pflush #4,#4,(%0)" : : "a" (addr));
  20 }
  21
  22 /*
  23  * flush all user-space atc entries.
  24  */
  25 static inline void __flush_tlb(void)
  26 {
  27         if (CPU_IS_040_OR_060)
  28                 __asm__ __volatile__(".chip 68040\n\t"
  29                                      "pflushan\n\t"
  30                                      ".chip 68k");
  31         else
  32                 __asm__ __volatile__("pflush #0,#4");
  33 }
  34
  35 static inline void __flush_tlb040_one(unsigned long addr)
  36 {
  37         __asm__ __volatile__(".chip 68040\n\t"
  38                              "pflush (%0)\n\t"
  39                              ".chip 68k"
  40                              : : "a" (addr));
  41 }
  42
  43 static inline void __flush_tlb_one(unsigned long addr)
  44 {
  45         if (CPU_IS_040_OR_060)
  46                 __flush_tlb040_one(addr);
  47         else
  48                 __asm__ __volatile__("pflush #0,#4,(%0)" : : "a" (addr));
  49 }
  50
  51 #define flush_tlb() __flush_tlb()
  52
  53 /*
  54  * flush all atc entries (both kernel and user-space entries).
  55  */
  56 static inline void flush_tlb_all(void)
  57 {
  58         if (CPU_IS_040_OR_060)
  59                 __asm__ __volatile__(".chip 68040\n\t"
  60                                      "pflusha\n\t"
  61                                      ".chip 68k");
  62         else
  63                 __asm__ __volatile__("pflusha");
  64 }
  65
  66 static inline void flush_tlb_mm(struct mm_struct *mm)
  67 {
  68         if (mm == current->mm)
  69                 __flush_tlb();
  70 }
  71
  72 static inline void flush_tlb_page(struct vm_area_struct *vma, unsigned long addr)
  73 {
  74         if (vma->vm_mm == current->mm)
  75                 __flush_tlb_one(addr);
  76 }
  77
  78 static inline void flush_tlb_range(struct vm_area_struct *vma,
  79                                    unsigned long start, unsigned long end)
  80 {
  81         if (vma->vm_mm == current->mm)
  82                 __flush_tlb();
  83 }
  84
  85 static inline void flush_tlb_kernel_range(unsigned long start, unsigned long end)
  86 {
  87         flush_tlb_all();
  88 }
  89
  90 extern inline void flush_tlb_pgtables(struct mm_struct *mm,
  91                                       unsigned long start, unsigned long end)
  92 {
  93 }
  94
  95 #else
  96
  97
  98 /* Reserved PMEGs. */
  99 extern char sun3_reserved_pmeg[SUN3_PMEGS_NUM];
 100 extern unsigned long pmeg_vaddr[SUN3_PMEGS_NUM];
 101 extern unsigned char pmeg_alloc[SUN3_PMEGS_NUM];
 102 extern unsigned char pmeg_ctx[SUN3_PMEGS_NUM];
 103
 104 /* Flush all userspace mappings one by one...  (why no flush command,
 105    sun?) */
 106 static inline void flush_tlb_all(void)
 107 {
 108        unsigned long addr;
 109        unsigned char ctx, oldctx;
 110
 111        oldctx = sun3_get_context();
 112        for(addr = 0x00000000; addr < TASK_SIZE; addr += SUN3_PMEG_SIZE) {
 113                for(ctx = 0; ctx < 8; ctx++) {
 114                        sun3_put_context(ctx);
 115                        sun3_put_segmap(addr, SUN3_INVALID_PMEG);
 116                }
 117        }
 118
 119        sun3_put_context(oldctx);
 120        /* erase all of the userspace pmeg maps, we've clobbered them
 121           all anyway */
 122        for(addr = 0; addr < SUN3_INVALID_PMEG; addr++) {
 123                if(pmeg_alloc[addr] == 1) {
 124                        pmeg_alloc[addr] = 0;
 125                        pmeg_ctx[addr] = 0;
 126                        pmeg_vaddr[addr] = 0;
 127                }
 128        }
 129
 130 }
 131
 132 /* Clear user TLB entries within the context named in mm */
 133 static inline void flush_tlb_mm (struct mm_struct *mm)
 134 {
 135      unsigned char oldctx;
 136      unsigned char seg;
 137      unsigned long i;
 138
 139      oldctx = sun3_get_context();
 140      sun3_put_context(mm->context);
 141
 142      for(i = 0; i < TASK_SIZE; i += SUN3_PMEG_SIZE) {
 143              seg = sun3_get_segmap(i);
 144              if(seg == SUN3_INVALID_PMEG)
 145                      continue;
 146
 147              sun3_put_segmap(i, SUN3_INVALID_PMEG);
 148              pmeg_alloc[seg] = 0;
 149              pmeg_ctx[seg] = 0;
 150              pmeg_vaddr[seg] = 0;
 151      }
 152
 153      sun3_put_context(oldctx);
 154
 155 }
 156
 157 /* Flush a single TLB page. In this case, we're limited to flushing a
 158    single PMEG */
 159 static inline void flush_tlb_page (struct vm_area_struct *vma,
 160                                    unsigned long addr)
 161 {
 162         unsigned char oldctx;
 163         unsigned char i;
 164
 165         oldctx = sun3_get_context();
 166         sun3_put_context(vma->vm_mm->context);
 167         addr &= ~SUN3_PMEG_MASK;
 168         if((i = sun3_get_segmap(addr)) != SUN3_INVALID_PMEG)
 169         {
 170                 pmeg_alloc[i] = 0;
 171                 pmeg_ctx[i] = 0;
 172                 pmeg_vaddr[i] = 0;
 173                 sun3_put_segmap (addr,  SUN3_INVALID_PMEG);
 174         }
 175         sun3_put_context(oldctx);
 176
 177 }
 178 /* Flush a range of pages from TLB. */
 179
 180 static inline void flush_tlb_range (struct vm_area_struct *vma,
 181                       unsigned long start, unsigned long end)
 182 {
 183         struct mm_struct *mm = vma->vm_mm;
 184         unsigned char seg, oldctx;
 185
 186         start &= ~SUN3_PMEG_MASK;
 187
 188         oldctx = sun3_get_context();
 189         sun3_put_context(mm->context);
 190
 191         while(start < end)
 192         {
 193                 if((seg = sun3_get_segmap(start)) == SUN3_INVALID_PMEG)
 194                      goto next;
 195                 if(pmeg_ctx[seg] == mm->context) {
 196                         pmeg_alloc[seg] = 0;
 197                         pmeg_ctx[seg] = 0;
 198                         pmeg_vaddr[seg] = 0;
 199                 }
 200                 sun3_put_segmap(start, SUN3_INVALID_PMEG);
 201         next:
 202                 start += SUN3_PMEG_SIZE;
 203         }
 204 }
 205
 206 static inline void flush_tlb_kernel_range(unsigned long start, unsigned long end)
 207 {
 208         flush_tlb_all();
 209 }
 210
 211 /* Flush kernel page from TLB. */
 212 static inline void flush_tlb_kernel_page (unsigned long addr)
 213 {
 214         sun3_put_segmap (addr & ~(SUN3_PMEG_SIZE - 1), SUN3_INVALID_PMEG);
 215 }
 216
 217 extern inline void flush_tlb_pgtables(struct mm_struct *mm,
 218                                       unsigned long start, unsigned long end)
 219 {
 220 }
 221
 222 #endif
 223
 224 #endif /* _M68K_TLBFLUSH_H */