sys/sparc64/sparc64/tsb.c

   1 /*-
   2  * Copyright (c) 1997 Berkeley Software Design, Inc. All rights reserved.
   3  *
   4  * Redistribution and use in source and binary forms, with or without
   5  * modification, are permitted provided that the following conditions
   6  * are met:
   7  * 1. Redistributions of source code must retain the above copyright
   8  *    notice, this list of conditions and the following disclaimer.
   9  * 2. Redistributions in binary form must reproduce the above copyright
  10  *    notice, this list of conditions and the following disclaimer in the
  11  *    documentation and/or other materials provided with the distribution.
  12  * 3. Berkeley Software Design Inc's name may not be used to endorse or
  13  *    promote products derived from this software without specific prior
  14  *    written permission.
  15  *
  16  * THIS SOFTWARE IS PROVIDED BY BERKELEY SOFTWARE DESIGN INC ``AS IS'' AND
  17  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  19  * ARE DISCLAIMED.  IN NO EVENT SHALL BERKELEY SOFTWARE DESIGN INC BE LIABLE
  20  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  22  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  26  * SUCH DAMAGE.
  27  *
  28  *      from BSDI: pmap.c,v 1.28.2.15 2000/04/27 03:10:31 cp Exp
  29  * $FreeBSD$
  30  */
  31
  32 #include "opt_ddb.h"
  33 #include "opt_pmap.h"
  34
  35 #include <sys/param.h>
  36 #include <sys/queue.h>
  37 #include <sys/ktr.h>
  38 #include <sys/linker_set.h>
  39 #include <sys/lock.h>
  40 #include <sys/mutex.h>
  41 #include <sys/proc.h>
  42 #include <sys/smp.h>
  43 #include <sys/sysctl.h>
  44 #include <sys/systm.h>
  45
  46 #include <vm/vm.h>
  47 #include <vm/vm_param.h>
  48 #include <vm/vm_kern.h>
  49 #include <vm/vm_page.h>
  50 #include <vm/vm_map.h>
  51 #include <vm/vm_object.h>
  52 #include <vm/vm_extern.h>
  53 #include <vm/vm_pageout.h>
  54 #include <vm/vm_pager.h>
  55
  56 #include <machine/cpufunc.h>
  57 #include <machine/frame.h>
  58 #include <machine/trap.h>
  59 #include <machine/pmap.h>
  60 #include <machine/smp.h>
  61 #include <machine/tlb.h>
  62 #include <machine/tsb.h>
  63 #include <machine/tte.h>
  64
  65 CTASSERT((1 << TTE_SHIFT) == sizeof(struct tte));
  66 CTASSERT(TSB_BUCKET_MASK < (1 << 12));
  67
  68 PMAP_STATS_VAR(tsb_nrepl);
  69 PMAP_STATS_VAR(tsb_nlookup_k);
  70 PMAP_STATS_VAR(tsb_nlookup_u);
  71 PMAP_STATS_VAR(tsb_nenter_k);
  72 PMAP_STATS_VAR(tsb_nenter_k_oc);
  73 PMAP_STATS_VAR(tsb_nenter_u);
  74 PMAP_STATS_VAR(tsb_nenter_u_oc);
  75 PMAP_STATS_VAR(tsb_nforeach);
  76
  77 struct tte *tsb_kernel;
  78 vm_size_t tsb_kernel_mask;
  79 vm_size_t tsb_kernel_size;
  80 vm_paddr_t tsb_kernel_phys;
  81
  82 struct tte *
  83 tsb_tte_lookup(pmap_t pm, vm_offset_t va)
  84 {
  85         struct tte *bucket;
  86         struct tte *tp;
  87         u_long sz;
  88         u_int i;
  89
  90         if (pm == kernel_pmap) {
  91                 PMAP_STATS_INC(tsb_nlookup_k);
  92                 tp = tsb_kvtotte(va);
  93                 if (tte_match(tp, va))
  94                         return (tp);
  95         } else {
  96                 PMAP_LOCK_ASSERT(pm, MA_OWNED);
  97                 PMAP_STATS_INC(tsb_nlookup_u);
  98                 for (sz = TS_MIN; sz <= TS_MAX; sz++) {
  99                         bucket = tsb_vtobucket(pm, sz, va);
 100                         for (i = 0; i < TSB_BUCKET_SIZE; i++) {
 101                                 tp = &bucket[i];
 102                                 if (tte_match(tp, va))
 103                                         return (tp);
 104                         }
 105                 }
 106         }
 107         return (NULL);
 108 }
 109
 110 struct tte *
 111 tsb_tte_enter(pmap_t pm, vm_page_t m, vm_offset_t va, u_long sz, u_long data)
 112 {
 113         struct tte *bucket;
 114         struct tte *rtp;
 115         struct tte *tp;
 116         vm_offset_t ova;
 117         int b0;
 118         int i;
 119
 120         if (DCACHE_COLOR(VM_PAGE_TO_PHYS(m)) != DCACHE_COLOR(va)) {
 121                 CTR5(KTR_CT2,
 122         "tsb_tte_enter: off colour va=%#lx pa=%#lx o=%p ot=%d pi=%#lx",
 123                     va, VM_PAGE_TO_PHYS(m), m->object,
 124                     m->object ? m->object->type : -1,
 125                     m->pindex);
 126                 if (pm == kernel_pmap)
 127                         PMAP_STATS_INC(tsb_nenter_k_oc);
 128                 else
 129                         PMAP_STATS_INC(tsb_nenter_u_oc);
 130         }
 131
 132         mtx_assert(&vm_page_queue_mtx, MA_OWNED);
 133         PMAP_LOCK_ASSERT(pm, MA_OWNED);
 134         if (pm == kernel_pmap) {
 135                 PMAP_STATS_INC(tsb_nenter_k);
 136                 tp = tsb_kvtotte(va);
 137                 KASSERT((tp->tte_data & TD_V) == 0,
 138                     ("tsb_tte_enter: replacing valid kernel mapping"));
 139                 goto enter;
 140         }
 141         PMAP_STATS_INC(tsb_nenter_u);
 142
 143         bucket = tsb_vtobucket(pm, sz, va);
 144
 145         tp = NULL;
 146         rtp = NULL;
 147         b0 = rd(tick) & (TSB_BUCKET_SIZE - 1);
 148         i = b0;
 149         do {
 150                 if ((bucket[i].tte_data & TD_V) == 0) {
 151                         tp = &bucket[i];
 152                         break;
 153                 }
 154                 if (tp == NULL) {
 155                         if ((bucket[i].tte_data & TD_REF) == 0)
 156                                 tp = &bucket[i];
 157                         else if (rtp == NULL)
 158                                 rtp = &bucket[i];
 159                 }
 160         } while ((i = (i + 1) & (TSB_BUCKET_SIZE - 1)) != b0);
 161
 162         if (tp == NULL)
 163                 tp = rtp;
 164         if ((tp->tte_data & TD_V) != 0) {
 165                 PMAP_STATS_INC(tsb_nrepl);
 166                 ova = TTE_GET_VA(tp);
 167                 pmap_remove_tte(pm, NULL, tp, ova);
 168                 tlb_page_demap(pm, ova);
 169         }
 170
 171 enter:
 172         if ((m->flags & PG_FICTITIOUS) == 0) {
 173                 data |= TD_CP;
 174                 if ((m->flags & PG_UNMANAGED) == 0) {
 175                         pm->pm_stats.resident_count++;
 176                         data |= TD_PV;
 177                 }
 178                 if (pmap_cache_enter(m, va) != 0)
 179                         data |= TD_CV;
 180                 TAILQ_INSERT_TAIL(&m->md.tte_list, tp, tte_link);
 181         } else
 182                 data |= TD_FAKE | TD_E;
 183
 184         tp->tte_vpn = TV_VPN(va, sz);
 185         tp->tte_data = data;
 186
 187         return (tp);
 188 }
 189
 190 /*
 191  * Traverse the tsb of a pmap, calling the callback function for any tte entry
 192  * that has a virtual address between start and end. If this function returns 0,
 193  * tsb_foreach() terminates.
 194  * This is used by pmap_remove(), pmap_protect(), and pmap_copy() in the case
 195  * that the number of pages in the range given to them reaches the
 196  * dimensions of the tsb size as an optimization.
 197  */
 198 void
 199 tsb_foreach(pmap_t pm1, pmap_t pm2, vm_offset_t start, vm_offset_t end,
 200     tsb_callback_t *callback)
 201 {
 202         vm_offset_t va;
 203         struct tte *tp;
 204         struct tte *tsbp;
 205         uintptr_t i;
 206         uintptr_t n;
 207
 208         PMAP_STATS_INC(tsb_nforeach);
 209         if (pm1 == kernel_pmap) {
 210                 tsbp = tsb_kernel;
 211                 n = tsb_kernel_size / sizeof(struct tte);
 212         } else {
 213                 tsbp = pm1->pm_tsb;
 214                 n = TSB_SIZE;
 215         }
 216         for (i = 0; i < n; i++) {
 217                 tp = &tsbp[i];
 218                 if ((tp->tte_data & TD_V) != 0) {
 219                         va = TTE_GET_VA(tp);
 220                         if (va >= start && va < end) {
 221                                 if (!callback(pm1, pm2, tp, va))
 222                                         break;
 223                         }
 224                 }
 225         }
 226 }