1 /* $NetBSD: uvm_bio.c,v 1.21 2001/11/10 07:36:59 lukem Exp $ */ 2 3 /* 4 * Copyright (c) 1998 Chuck Silvers. 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 3. The name of the author may not be used to endorse or promote products 16 * derived from this software without specific prior written permission. 17 * 18 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 19 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 20 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 21 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 22 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, 23 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; 24 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED 25 * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, 26 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 27 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 28 * SUCH DAMAGE. 29 * 30 */ 31 32 /* 33 * uvm_bio.c: buffered i/o vnode mapping cache 34 */ 35 36 #include <sys/cdefs.h> 37 __KERNEL_RCSID(0, "$NetBSD: uvm_bio.c,v 1.21 2001/11/10 07:36:59 lukem Exp $"); 38 39 #include "opt_uvmhist.h" 40 41 #include <sys/param.h> 42 #include <sys/systm.h> 43 #include <sys/malloc.h> 44 #include <sys/kernel.h> 45 #include <sys/vnode.h> 46 #include <sys/proc.h> 47 48 #include <uvm/uvm.h> 49 50 /* 51 * global data structures 52 */ 53 54 /* 55 * local functions 56 */ 57 58 int ubc_fault __P((struct uvm_faultinfo *, vaddr_t, struct vm_page **, int, 59 int, vm_fault_t, vm_prot_t, int)); 60 struct ubc_map *ubc_find_mapping __P((struct uvm_object *, voff_t)); 61 62 /* 63 * local data structues 64 */ 65 66 #define UBC_HASH(uobj, offset) \ 67 (((((u_long)(uobj)) >> 8) + (((u_long)(offset)) >> PAGE_SHIFT)) & \ 68 ubc_object.hashmask) 69 70 #define UBC_QUEUE(offset) \ 71 (&ubc_object.inactive[(((u_long)(offset)) >> ubc_winshift) & \ 72 (UBC_NQUEUES - 1)]) 73 74 #define UBC_UMAP_ADDR(u) \ 75 (vaddr_t)(ubc_object.kva + (((u) - ubc_object.umap) << ubc_winshift)) 76 77 78 #define UMAP_PAGES_LOCKED 0x0001 79 #define UMAP_MAPPING_CACHED 0x0002 80 81 struct ubc_map 82 { 83 struct uvm_object * uobj; /* mapped object */ 84 voff_t offset; /* offset into uobj */ 85 voff_t writeoff; /* overwrite offset */ 86 vsize_t writelen; /* overwrite len */ 87 int refcount; /* refcount on mapping */ 88 int flags; /* extra state */ 89 90 LIST_ENTRY(ubc_map) hash; /* hash table */ 91 TAILQ_ENTRY(ubc_map) inactive; /* inactive queue */ 92 }; 93 94 static struct ubc_object 95 { 96 struct uvm_object uobj; /* glue for uvm_map() */ 97 char *kva; /* where ubc_object is mapped */ 98 struct ubc_map *umap; /* array of ubc_map's */ 99 100 LIST_HEAD(, ubc_map) *hash; /* hashtable for cached ubc_map's */ 101 u_long hashmask; /* mask for hashtable */ 102 103 TAILQ_HEAD(ubc_inactive_head, ubc_map) *inactive; 104 /* inactive queues for ubc_map's */ 105 106 } ubc_object; 107 108 struct uvm_pagerops ubc_pager = 109 { 110 NULL, /* init */ 111 NULL, /* reference */ 112 NULL, /* detach */ 113 ubc_fault, /* fault */ 114 /* ... rest are NULL */ 115 }; 116 117 int ubc_nwins = UBC_NWINS; 118 int ubc_winshift = UBC_WINSHIFT; 119 int ubc_winsize; 120 #ifdef PMAP_PREFER 121 int ubc_nqueues; 122 boolean_t ubc_release_unmap = FALSE; 123 #define UBC_NQUEUES ubc_nqueues 124 #define UBC_RELEASE_UNMAP ubc_release_unmap 125 #else 126 #define UBC_NQUEUES 1 127 #define UBC_RELEASE_UNMAP FALSE 128 #endif 129 130 /* 131 * ubc_init 132 * 133 * init pager private data structures. 134 */ 135 136 void 137 ubc_init(void) 138 { 139 struct ubc_map *umap; 140 vaddr_t va; 141 int i; 142 143 /* 144 * Make sure ubc_winshift is sane. 145 */ 146 if (ubc_winshift < PAGE_SHIFT) 147 ubc_winshift = PAGE_SHIFT; 148 149 /* 150 * init ubc_object. 151 * alloc and init ubc_map's. 152 * init inactive queues. 153 * alloc and init hashtable. 154 * map in ubc_object. 155 */ 156 157 simple_lock_init(&ubc_object.uobj.vmobjlock); 158 ubc_object.uobj.pgops = &ubc_pager; 159 TAILQ_INIT(&ubc_object.uobj.memq); 160 ubc_object.uobj.uo_npages = 0; 161 ubc_object.uobj.uo_refs = UVM_OBJ_KERN; 162 163 ubc_object.umap = malloc(ubc_nwins * sizeof(struct ubc_map), 164 M_TEMP, M_NOWAIT); 165 if (ubc_object.umap == NULL) 166 panic("ubc_init: failed to allocate ubc_map"); 167 memset(ubc_object.umap, 0, ubc_nwins * sizeof(struct ubc_map)); 168 169 if (ubc_winshift < PAGE_SHIFT) { 170 ubc_winshift = PAGE_SHIFT; 171 } 172 va = (vaddr_t)1L; 173 #ifdef PMAP_PREFER 174 PMAP_PREFER(0, &va); 175 ubc_nqueues = va >> ubc_winshift; 176 if (ubc_nqueues == 0) { 177 ubc_nqueues = 1; 178 } 179 if (ubc_nqueues != 1) { 180 ubc_release_unmap = TRUE; 181 } 182 #endif 183 ubc_winsize = 1 << ubc_winshift; 184 ubc_object.inactive = malloc(UBC_NQUEUES * 185 sizeof(struct ubc_inactive_head), M_TEMP, M_NOWAIT); 186 if (ubc_object.inactive == NULL) 187 panic("ubc_init: failed to allocate inactive queue heads"); 188 for (i = 0; i < UBC_NQUEUES; i++) { 189 TAILQ_INIT(&ubc_object.inactive[i]); 190 } 191 for (i = 0; i < ubc_nwins; i++) { 192 umap = &ubc_object.umap[i]; 193 TAILQ_INSERT_TAIL(&ubc_object.inactive[i & (UBC_NQUEUES - 1)], 194 umap, inactive); 195 } 196 197 ubc_object.hash = hashinit(ubc_nwins, HASH_LIST, M_TEMP, M_NOWAIT, 198 &ubc_object.hashmask); 199 for (i = 0; i <= ubc_object.hashmask; i++) { 200 LIST_INIT(&ubc_object.hash[i]); 201 } 202 203 if (uvm_map(kernel_map, (vaddr_t *)&ubc_object.kva, 204 ubc_nwins << ubc_winshift, &ubc_object.uobj, 0, (vsize_t)va, 205 UVM_MAPFLAG(UVM_PROT_ALL, UVM_PROT_ALL, UVM_INH_NONE, 206 UVM_ADV_RANDOM, UVM_FLAG_NOMERGE)) != 0) { 207 panic("ubc_init: failed to map ubc_object\n"); 208 } 209 UVMHIST_INIT(ubchist, 300); 210 } 211 212 /* 213 * ubc_fault: fault routine for ubc mapping 214 */ 215 216 int 217 ubc_fault(ufi, ign1, ign2, ign3, ign4, fault_type, access_type, flags) 218 struct uvm_faultinfo *ufi; 219 vaddr_t ign1; 220 struct vm_page **ign2; 221 int ign3, ign4; 222 vm_fault_t fault_type; 223 vm_prot_t access_type; 224 int flags; 225 { 226 struct uvm_object *uobj; 227 struct vnode *vp; 228 struct ubc_map *umap; 229 vaddr_t va, eva, ubc_offset, slot_offset; 230 int i, error, npages; 231 struct vm_page *pgs[ubc_winsize >> PAGE_SHIFT], *pg; 232 UVMHIST_FUNC("ubc_fault"); UVMHIST_CALLED(ubchist); 233 234 /* 235 * no need to try with PGO_LOCKED... 236 * we don't need to have the map locked since we know that 237 * no one will mess with it until our reference is released. 238 */ 239 240 if (flags & PGO_LOCKED) { 241 uvmfault_unlockall(ufi, NULL, &ubc_object.uobj, NULL); 242 flags &= ~PGO_LOCKED; 243 } 244 245 va = ufi->orig_rvaddr; 246 ubc_offset = va - (vaddr_t)ubc_object.kva; 247 248 UVMHIST_LOG(ubchist, "va 0x%lx ubc_offset 0x%lx at %d", 249 va, ubc_offset, access_type,0); 250 251 umap = &ubc_object.umap[ubc_offset >> ubc_winshift]; 252 KASSERT(umap->refcount != 0); 253 slot_offset = ubc_offset & (ubc_winsize - 1); 254 255 /* no umap locking needed since we have a ref on the umap */ 256 uobj = umap->uobj; 257 vp = (struct vnode *)uobj; 258 KASSERT(vp != NULL); 259 260 npages = MIN(ubc_winsize - slot_offset, 261 (round_page(MAX(vp->v_size, umap->offset + 262 umap->writeoff + umap->writelen)) - 263 umap->offset)) >> PAGE_SHIFT; 264 265 again: 266 memset(pgs, 0, sizeof (pgs)); 267 simple_lock(&uobj->vmobjlock); 268 269 UVMHIST_LOG(ubchist, "slot_offset 0x%x writeoff 0x%x writelen 0x%x " 270 "v_size 0x%x", slot_offset, umap->writeoff, umap->writelen, 271 vp->v_size); 272 UVMHIST_LOG(ubchist, "getpages vp %p offset 0x%x npages %d", 273 uobj, umap->offset + slot_offset, npages, 0); 274 275 flags |= PGO_PASTEOF; 276 error = VOP_GETPAGES(vp, umap->offset + slot_offset, pgs, &npages, 0, 277 access_type, 0, flags); 278 UVMHIST_LOG(ubchist, "getpages error %d npages %d", error, npages,0,0); 279 280 if (error == EAGAIN) { 281 tsleep(&lbolt, PVM, "ubc_fault", 0); 282 goto again; 283 } 284 if (error) { 285 return error; 286 } 287 288 va = ufi->orig_rvaddr; 289 eva = ufi->orig_rvaddr + (npages << PAGE_SHIFT); 290 291 UVMHIST_LOG(ubchist, "va 0x%lx eva 0x%lx", va, eva, 0,0); 292 simple_lock(&uobj->vmobjlock); 293 uvm_lock_pageq(); 294 for (i = 0; va < eva; i++, va += PAGE_SIZE) { 295 UVMHIST_LOG(ubchist, "pgs[%d] = %p", i, pgs[i],0,0); 296 pg = pgs[i]; 297 298 if (pg == NULL || pg == PGO_DONTCARE) { 299 continue; 300 } 301 if (pg->flags & PG_WANTED) { 302 wakeup(pg); 303 } 304 KASSERT((pg->flags & PG_FAKE) == 0); 305 if (pg->flags & PG_RELEASED) { 306 uvm_pagefree(pg); 307 continue; 308 } 309 KASSERT(access_type == VM_PROT_READ || 310 (pg->flags & PG_RDONLY) == 0); 311 pmap_enter(ufi->orig_map->pmap, va, VM_PAGE_TO_PHYS(pg), 312 VM_PROT_READ | VM_PROT_WRITE, access_type); 313 uvm_pageactivate(pg); 314 pg->flags &= ~(PG_BUSY); 315 UVM_PAGE_OWN(pg, NULL); 316 } 317 uvm_unlock_pageq(); 318 simple_unlock(&uobj->vmobjlock); 319 pmap_update(ufi->orig_map->pmap); 320 return 0; 321 } 322 323 /* 324 * local functions 325 */ 326 327 struct ubc_map * 328 ubc_find_mapping(uobj, offset) 329 struct uvm_object *uobj; 330 voff_t offset; 331 { 332 struct ubc_map *umap; 333 334 LIST_FOREACH(umap, &ubc_object.hash[UBC_HASH(uobj, offset)], hash) { 335 if (umap->uobj == uobj && umap->offset == offset) { 336 return umap; 337 } 338 } 339 return NULL; 340 } 341 342 343 /* 344 * ubc interface functions 345 */ 346 347 /* 348 * ubc_alloc: allocate a file mapping window 349 */ 350 351 void * 352 ubc_alloc(uobj, offset, lenp, flags) 353 struct uvm_object *uobj; 354 voff_t offset; 355 vsize_t *lenp; 356 int flags; 357 { 358 struct vnode *vp = (struct vnode *)uobj; 359 vaddr_t slot_offset, va; 360 struct ubc_map *umap; 361 voff_t umap_offset; 362 int error; 363 UVMHIST_FUNC("ubc_alloc"); UVMHIST_CALLED(ubchist); 364 365 UVMHIST_LOG(ubchist, "uobj %p offset 0x%lx len 0x%lx filesize 0x%x", 366 uobj, offset, *lenp, vp->v_size); 367 368 umap_offset = (offset & ~((voff_t)ubc_winsize - 1)); 369 slot_offset = (vaddr_t)(offset & ((voff_t)ubc_winsize - 1)); 370 *lenp = MIN(*lenp, ubc_winsize - slot_offset); 371 372 /* 373 * the vnode is always locked here, so we don't need to add a ref. 374 */ 375 376 again: 377 simple_lock(&ubc_object.uobj.vmobjlock); 378 umap = ubc_find_mapping(uobj, umap_offset); 379 if (umap == NULL) { 380 umap = TAILQ_FIRST(UBC_QUEUE(offset)); 381 if (umap == NULL) { 382 simple_unlock(&ubc_object.uobj.vmobjlock); 383 tsleep(&lbolt, PVM, "ubc_alloc", 0); 384 goto again; 385 } 386 387 /* 388 * remove from old hash (if any), add to new hash. 389 */ 390 391 if (umap->uobj != NULL) { 392 LIST_REMOVE(umap, hash); 393 } 394 umap->uobj = uobj; 395 umap->offset = umap_offset; 396 LIST_INSERT_HEAD(&ubc_object.hash[UBC_HASH(uobj, umap_offset)], 397 umap, hash); 398 va = UBC_UMAP_ADDR(umap); 399 if (umap->flags & UMAP_MAPPING_CACHED) { 400 umap->flags &= ~UMAP_MAPPING_CACHED; 401 pmap_remove(pmap_kernel(), va, va + ubc_winsize); 402 pmap_update(pmap_kernel()); 403 } 404 } else { 405 va = UBC_UMAP_ADDR(umap); 406 } 407 408 if (umap->refcount == 0) { 409 TAILQ_REMOVE(UBC_QUEUE(offset), umap, inactive); 410 } 411 412 #ifdef DIAGNOSTIC 413 if ((flags & UBC_WRITE) && (umap->writeoff || umap->writelen)) { 414 panic("ubc_fault: concurrent writes vp %p", uobj); 415 } 416 #endif 417 if (flags & UBC_WRITE) { 418 umap->writeoff = slot_offset; 419 umap->writelen = *lenp; 420 } 421 422 umap->refcount++; 423 simple_unlock(&ubc_object.uobj.vmobjlock); 424 UVMHIST_LOG(ubchist, "umap %p refs %d va %p flags 0x%x", 425 umap, umap->refcount, va, flags); 426 427 if (flags & UBC_FAULTBUSY) { 428 int npages = (*lenp + PAGE_SIZE - 1) >> PAGE_SHIFT; 429 struct vm_page *pgs[npages]; 430 int gpflags = PGO_SYNCIO|PGO_OVERWRITE|PGO_PASTEOF; 431 int i; 432 433 if (umap->flags & UMAP_MAPPING_CACHED) { 434 umap->flags &= ~UMAP_MAPPING_CACHED; 435 pmap_remove(pmap_kernel(), va, va + ubc_winsize); 436 } 437 simple_lock(&uobj->vmobjlock); 438 error = VOP_GETPAGES(vp, trunc_page(offset), pgs, &npages, 0, 439 VM_PROT_READ|VM_PROT_WRITE, 0, gpflags); 440 UVMHIST_LOG(ubchist, "faultbusy getpages %d", error,0,0,0); 441 if (error) { 442 goto out; 443 } 444 for (i = 0; i < npages; i++) { 445 pmap_kenter_pa(va + slot_offset + (i << PAGE_SHIFT), 446 VM_PAGE_TO_PHYS(pgs[i]), 447 VM_PROT_READ | VM_PROT_WRITE); 448 } 449 pmap_update(pmap_kernel()); 450 umap->flags |= UMAP_PAGES_LOCKED; 451 } 452 453 out: 454 return (void *)(va + slot_offset); 455 } 456 457 /* 458 * ubc_release: free a file mapping window. 459 */ 460 461 void 462 ubc_release(va, flags) 463 void *va; 464 int flags; 465 { 466 struct ubc_map *umap; 467 struct uvm_object *uobj; 468 vaddr_t umapva; 469 boolean_t unmapped; 470 UVMHIST_FUNC("ubc_release"); UVMHIST_CALLED(ubchist); 471 472 UVMHIST_LOG(ubchist, "va %p", va,0,0,0); 473 umap = &ubc_object.umap[((char *)va - ubc_object.kva) >> ubc_winshift]; 474 umapva = UBC_UMAP_ADDR(umap); 475 uobj = umap->uobj; 476 KASSERT(uobj != NULL); 477 478 if (umap->flags & UMAP_PAGES_LOCKED) { 479 int slot_offset = umap->writeoff; 480 int endoff = umap->writeoff + umap->writelen; 481 int zerolen = round_page(endoff) - endoff; 482 int npages = (int)(round_page(umap->writeoff + umap->writelen) 483 - trunc_page(umap->writeoff)) >> PAGE_SHIFT; 484 struct vm_page *pgs[npages]; 485 paddr_t pa; 486 int i; 487 boolean_t rv; 488 489 if (zerolen) { 490 memset((char *)umapva + endoff, 0, zerolen); 491 } 492 umap->flags &= ~UMAP_PAGES_LOCKED; 493 uvm_lock_pageq(); 494 for (i = 0; i < npages; i++) { 495 rv = pmap_extract(pmap_kernel(), 496 umapva + slot_offset + (i << PAGE_SHIFT), &pa); 497 KASSERT(rv); 498 pgs[i] = PHYS_TO_VM_PAGE(pa); 499 pgs[i]->flags &= ~(PG_FAKE|PG_CLEAN); 500 uvm_pageactivate(pgs[i]); 501 } 502 uvm_unlock_pageq(); 503 pmap_kremove(umapva, ubc_winsize); 504 pmap_update(pmap_kernel()); 505 uvm_page_unbusy(pgs, npages); 506 unmapped = TRUE; 507 } else { 508 unmapped = FALSE; 509 } 510 511 simple_lock(&ubc_object.uobj.vmobjlock); 512 umap->writeoff = 0; 513 umap->writelen = 0; 514 umap->refcount--; 515 if (umap->refcount == 0) { 516 if (UBC_RELEASE_UNMAP && 517 (((struct vnode *)uobj)->v_flag & VTEXT)) { 518 519 /* 520 * if this file is the executable image of 521 * some process, that process will likely have 522 * the file mapped at an alignment other than 523 * what PMAP_PREFER() would like. we'd like 524 * to have process text be able to use the 525 * cache even if someone is also reading the 526 * file, so invalidate mappings of such files 527 * as soon as possible. 528 */ 529 530 pmap_remove(pmap_kernel(), umapva, 531 umapva + ubc_winsize); 532 umap->flags &= ~UMAP_MAPPING_CACHED; 533 pmap_update(pmap_kernel()); 534 LIST_REMOVE(umap, hash); 535 umap->uobj = NULL; 536 TAILQ_INSERT_HEAD(UBC_QUEUE(umap->offset), umap, 537 inactive); 538 } else { 539 if (!unmapped) { 540 umap->flags |= UMAP_MAPPING_CACHED; 541 } 542 TAILQ_INSERT_TAIL(UBC_QUEUE(umap->offset), umap, 543 inactive); 544 } 545 } 546 UVMHIST_LOG(ubchist, "umap %p refs %d", umap, umap->refcount,0,0); 547 simple_unlock(&ubc_object.uobj.vmobjlock); 548 } 549 550 551 /* 552 * removing a range of mappings from the ubc mapping cache. 553 */ 554 555 void 556 ubc_flush(uobj, start, end) 557 struct uvm_object *uobj; 558 voff_t start, end; 559 { 560 struct ubc_map *umap; 561 vaddr_t va; 562 UVMHIST_FUNC("ubc_flush"); UVMHIST_CALLED(ubchist); 563 564 UVMHIST_LOG(ubchist, "uobj %p start 0x%lx end 0x%lx", 565 uobj, start, end,0); 566 567 simple_lock(&ubc_object.uobj.vmobjlock); 568 for (umap = ubc_object.umap; 569 umap < &ubc_object.umap[ubc_nwins]; 570 umap++) { 571 572 if (umap->uobj != uobj || umap->offset < start || 573 (umap->offset >= end && end != 0) || 574 umap->refcount > 0) { 575 continue; 576 } 577 578 /* 579 * remove from hash, 580 * move to head of inactive queue. 581 */ 582 583 va = (vaddr_t)(ubc_object.kva + 584 ((umap - ubc_object.umap) << ubc_winshift)); 585 pmap_remove(pmap_kernel(), va, va + ubc_winsize); 586 587 LIST_REMOVE(umap, hash); 588 umap->uobj = NULL; 589 TAILQ_REMOVE(UBC_QUEUE(umap->offset), umap, inactive); 590 TAILQ_INSERT_HEAD(UBC_QUEUE(umap->offset), umap, inactive); 591 } 592 pmap_update(pmap_kernel()); 593 simple_unlock(&ubc_object.uobj.vmobjlock); 594 } 595