Home | History | Annotate | Line # | Download | only in uvm
      1 /*	$NetBSD: uvm_glue.c,v 1.183 2026/05/04 04:11:34 thorpej Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1997 Charles D. Cranor and Washington University.
      5  * Copyright (c) 1991, 1993, The Regents of the University of California.
      6  *
      7  * All rights reserved.
      8  *
      9  * This code is derived from software contributed to Berkeley by
     10  * The Mach Operating System project at Carnegie-Mellon University.
     11  *
     12  * Redistribution and use in source and binary forms, with or without
     13  * modification, are permitted provided that the following conditions
     14  * are met:
     15  * 1. Redistributions of source code must retain the above copyright
     16  *    notice, this list of conditions and the following disclaimer.
     17  * 2. Redistributions in binary form must reproduce the above copyright
     18  *    notice, this list of conditions and the following disclaimer in the
     19  *    documentation and/or other materials provided with the distribution.
     20  * 3. Neither the name of the University nor the names of its contributors
     21  *    may be used to endorse or promote products derived from this software
     22  *    without specific prior written permission.
     23  *
     24  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     25  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     26  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     27  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     28  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     29  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     30  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     31  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     32  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     33  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     34  * SUCH DAMAGE.
     35  *
     36  *	@(#)vm_glue.c	8.6 (Berkeley) 1/5/94
     37  * from: Id: uvm_glue.c,v 1.1.2.8 1998/02/07 01:16:54 chs Exp
     38  *
     39  *
     40  * Copyright (c) 1987, 1990 Carnegie-Mellon University.
     41  * All rights reserved.
     42  *
     43  * Permission to use, copy, modify and distribute this software and
     44  * its documentation is hereby granted, provided that both the copyright
     45  * notice and this permission notice appear in all copies of the
     46  * software, derivative works or modified versions, and any portions
     47  * thereof, and that both notices appear in supporting documentation.
     48  *
     49  * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
     50  * CONDITION.  CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND
     51  * FOR ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
     52  *
     53  * Carnegie Mellon requests users of this software to return to
     54  *
     55  *  Software Distribution Coordinator  or  Software.Distribution (at) CS.CMU.EDU
     56  *  School of Computer Science
     57  *  Carnegie Mellon University
     58  *  Pittsburgh PA 15213-3890
     59  *
     60  * any improvements or extensions that they make and grant Carnegie the
     61  * rights to redistribute these changes.
     62  */
     63 
     64 #include <sys/cdefs.h>
     65 __KERNEL_RCSID(0, "$NetBSD: uvm_glue.c,v 1.183 2026/05/04 04:11:34 thorpej Exp $");
     66 
     67 #include "opt_kgdb.h"
     68 #include "opt_kstack.h"
     69 #include "opt_uvmhist.h"
     70 
     71 /*
     72  * uvm_glue.c: glue functions
     73  */
     74 
     75 #include <sys/param.h>
     76 #include <sys/kernel.h>
     77 
     78 #include <sys/systm.h>
     79 #include <sys/proc.h>
     80 #include <sys/resourcevar.h>
     81 #include <sys/buf.h>
     82 #include <sys/syncobj.h>
     83 #include <sys/cpu.h>
     84 #include <sys/atomic.h>
     85 #include <sys/lwp.h>
     86 #include <sys/asan.h>
     87 
     88 #include <uvm/uvm.h>
     89 #include <uvm/uvm_pdpolicy.h>
     90 #include <uvm/uvm_pgflcache.h>
     91 
     92 /*
     93  * uvm_kernacc: test if kernel can access a memory region.
     94  *
     95  * => Currently used only by /dev/kmem driver (dev/mm.c).
     96  */
     97 bool
     98 uvm_kernacc(void *addr, size_t len, vm_prot_t prot)
     99 {
    100 	vaddr_t saddr = trunc_page((vaddr_t)addr);
    101 	vaddr_t eaddr = round_page(saddr + len);
    102 	bool rv;
    103 
    104 	vm_map_lock_read(kernel_map);
    105 	rv = uvm_map_checkprot(kernel_map, saddr, eaddr, prot);
    106 	vm_map_unlock_read(kernel_map);
    107 
    108 	return rv;
    109 }
    110 
    111 #ifdef KGDB
    112 /*
    113  * Change protections on kernel pages from addr to addr+len
    114  * (presumably so debugger can plant a breakpoint).
    115  *
    116  * We force the protection change at the pmap level.  If we were
    117  * to use vm_map_protect a change to allow writing would be lazily-
    118  * applied meaning we would still take a protection fault, something
    119  * we really don't want to do.  It would also fragment the kernel
    120  * map unnecessarily.  We cannot use pmap_protect since it also won't
    121  * enforce a write-enable request.  Using pmap_enter is the only way
    122  * we can ensure the change takes place properly.
    123  */
    124 void
    125 uvm_chgkprot(void *addr, size_t len, int rw)
    126 {
    127 	vm_prot_t prot;
    128 	paddr_t pa;
    129 	vaddr_t sva, eva;
    130 
    131 	prot = rw == B_READ ? VM_PROT_READ : VM_PROT_READ|VM_PROT_WRITE;
    132 	eva = round_page((vaddr_t)addr + len);
    133 	for (sva = trunc_page((vaddr_t)addr); sva < eva; sva += PAGE_SIZE) {
    134 		/*
    135 		 * Extract physical address for the page.
    136 		 */
    137 		if (pmap_extract(pmap_kernel(), sva, &pa) == false)
    138 			panic("%s: invalid page", __func__);
    139 		pmap_enter(pmap_kernel(), sva, pa, prot, PMAP_WIRED);
    140 	}
    141 	pmap_update(pmap_kernel());
    142 }
    143 #endif
    144 
    145 /*
    146  * uvm_vslock: wire user memory for I/O
    147  *
    148  * - called from physio and sys___sysctl
    149  * - XXXCDC: consider nuking this (or making it a macro?)
    150  */
    151 
    152 int
    153 uvm_vslock(struct vmspace *vs, void *addr, size_t len, vm_prot_t access_type)
    154 {
    155 	struct vm_map *map;
    156 	vaddr_t start, end;
    157 	int error;
    158 
    159 	map = &vs->vm_map;
    160 	start = trunc_page((vaddr_t)addr);
    161 	end = round_page((vaddr_t)addr + len);
    162 	error = uvm_fault_wire(map, start, end, access_type, 0);
    163 	return error;
    164 }
    165 
    166 /*
    167  * uvm_vsunlock: unwire user memory wired by uvm_vslock()
    168  *
    169  * - called from physio and sys___sysctl
    170  * - XXXCDC: consider nuking this (or making it a macro?)
    171  */
    172 
    173 void
    174 uvm_vsunlock(struct vmspace *vs, void *addr, size_t len)
    175 {
    176 	uvm_fault_unwire(&vs->vm_map, trunc_page((vaddr_t)addr),
    177 		round_page((vaddr_t)addr + len));
    178 }
    179 
    180 /*
    181  * uvm_resident_count: return the resident page count for the
    182  * spcified vmspace.
    183  */
    184 
    185 long
    186 uvm_resident_count(struct vmspace *vm)
    187 {
    188 	return pmap_resident_count(vm->vm_map.pmap);
    189 }
    190 
    191 /*
    192  * uvm_proc_fork: fork a virtual address space
    193  *
    194  * - the address space is copied as per parent map's inherit values
    195  */
    196 void
    197 uvm_proc_fork(struct proc *p1, struct proc *p2, bool shared)
    198 {
    199 
    200 	if (shared == true) {
    201 		p2->p_vmspace = NULL;
    202 		uvmspace_share(p1, p2);
    203 	} else {
    204 		p2->p_vmspace = uvmspace_fork(p1->p_vmspace);
    205 	}
    206 
    207 	cpu_proc_fork(p1, p2);
    208 }
    209 
    210 /*
    211  * uvm_lwp_fork: fork a thread
    212  *
    213  * - a new PCB structure is allocated for the child process,
    214  *	and filled in by MD layer
    215  * - if specified, the child gets a new user stack described by
    216  *	stack and stacksize
    217  * - NOTE: the kernel stack may be at a different location in the child
    218  *	process, and thus addresses of automatic variables may be invalid
    219  *	after cpu_lwp_fork returns in the child process.  We do nothing here
    220  *	after cpu_lwp_fork returns.
    221  */
    222 void
    223 uvm_lwp_fork(struct lwp *l1, struct lwp *l2, void *stack, size_t stacksize,
    224     void (*func)(void *), void *arg)
    225 {
    226 
    227 	/* Fill stack with magic number. */
    228 	kstack_setup_magic(l2);
    229 
    230 	/*
    231 	 * cpu_lwp_fork() copy and update the pcb, and make the child ready
    232  	 * to run.  If this is a normal user fork, the child will exit
    233 	 * directly to user mode via child_return() on its first time
    234 	 * slice and will not return here.  If this is a kernel thread,
    235 	 * the specified entry point will be executed.
    236 	 */
    237 	cpu_lwp_fork(l1, l2, stack, stacksize, func, arg);
    238 }
    239 
    240 #ifndef USPACE_ALIGN
    241 #define	USPACE_ALIGN	0
    242 #endif
    243 
    244 static pool_cache_t uvm_uarea_cache;
    245 #if defined(__HAVE_CPU_UAREA_ROUTINES)
    246 static pool_cache_t uvm_uarea_system_cache;
    247 #else
    248 #define uvm_uarea_system_cache uvm_uarea_cache
    249 #endif
    250 
    251 static void *
    252 uarea_poolpage_alloc(struct pool *pp, int flags)
    253 {
    254 
    255 	KASSERT((flags & PR_WAITOK) != 0);
    256 
    257 #if defined(PMAP_MAP_POOLPAGE)
    258 	while (USPACE == PAGE_SIZE &&
    259 	    (USPACE_ALIGN == 0 || USPACE_ALIGN == PAGE_SIZE)) {
    260 		struct vm_page *pg;
    261 		vaddr_t va;
    262 #if defined(PMAP_ALLOC_POOLPAGE)
    263 		pg = PMAP_ALLOC_POOLPAGE(0);
    264 #else
    265 		pg = uvm_pagealloc(NULL, 0, NULL, 0);
    266 #endif
    267 		if (pg == NULL) {
    268 			uvm_wait("uarea");
    269 			continue;
    270 		}
    271 		va = PMAP_MAP_POOLPAGE(VM_PAGE_TO_PHYS(pg));
    272 		KASSERT(va != 0);
    273 		return (void *)va;
    274 	}
    275 #endif
    276 #if defined(__HAVE_CPU_UAREA_ROUTINES)
    277 	void *va = cpu_uarea_alloc(false);
    278 	if (va)
    279 		return (void *)va;
    280 #endif
    281 	return (void *)uvm_km_alloc(kernel_map, pp->pr_alloc->pa_pagesz,
    282 	    USPACE_ALIGN, UVM_KMF_WIRED | UVM_KMF_WAITVA);
    283 }
    284 
    285 static void
    286 uarea_poolpage_free(struct pool *pp, void *addr)
    287 {
    288 #if defined(PMAP_MAP_POOLPAGE)
    289 	if (USPACE == PAGE_SIZE &&
    290 	    (USPACE_ALIGN == 0 || USPACE_ALIGN == PAGE_SIZE)) {
    291 		paddr_t pa;
    292 
    293 		pa = PMAP_UNMAP_POOLPAGE((vaddr_t) addr);
    294 		KASSERT(pa != 0);
    295 		uvm_pagefree(PHYS_TO_VM_PAGE(pa));
    296 		return;
    297 	}
    298 #endif
    299 #if defined(__HAVE_CPU_UAREA_ROUTINES)
    300 	if (cpu_uarea_free(addr))
    301 		return;
    302 #endif
    303 	uvm_km_free(kernel_map, (vaddr_t)addr, pp->pr_alloc->pa_pagesz,
    304 	    UVM_KMF_WIRED);
    305 }
    306 
    307 static struct pool_allocator uvm_uarea_allocator = {
    308 	.pa_alloc = uarea_poolpage_alloc,
    309 	.pa_free = uarea_poolpage_free,
    310 	.pa_pagesz = USPACE,
    311 };
    312 
    313 #if defined(__HAVE_CPU_UAREA_ROUTINES)
    314 static void *
    315 uarea_system_poolpage_alloc(struct pool *pp, int flags)
    316 {
    317 	void * const va = cpu_uarea_alloc(true);
    318 	if (va != NULL)
    319 		return va;
    320 
    321 	return (void *)uvm_km_alloc(kernel_map, pp->pr_alloc->pa_pagesz,
    322 	    USPACE_ALIGN, UVM_KMF_WIRED |
    323 	    ((flags & PR_WAITOK) ? UVM_KMF_WAITVA :
    324 	    (UVM_KMF_NOWAIT | UVM_KMF_TRYLOCK)));
    325 }
    326 
    327 static void
    328 uarea_system_poolpage_free(struct pool *pp, void *addr)
    329 {
    330 	if (cpu_uarea_free(addr))
    331 		return;
    332 
    333 	uvm_km_free(kernel_map, (vaddr_t)addr, pp->pr_alloc->pa_pagesz,
    334 	    UVM_KMF_WIRED);
    335 }
    336 
    337 static struct pool_allocator uvm_uarea_system_allocator = {
    338 	.pa_alloc = uarea_system_poolpage_alloc,
    339 	.pa_free = uarea_system_poolpage_free,
    340 	.pa_pagesz = USPACE,
    341 };
    342 #endif /* __HAVE_CPU_UAREA_ROUTINES */
    343 
    344 void
    345 uvm_uarea_init(void)
    346 {
    347 	int flags = PR_NOTOUCH;
    348 
    349 	/*
    350 	 * specify PR_NOALIGN unless the alignment provided by
    351 	 * the backend (USPACE_ALIGN) is sufficient to provide
    352 	 * pool page size (UPSACE) alignment.
    353 	 */
    354 
    355 	if ((USPACE_ALIGN == 0 && USPACE != PAGE_SIZE) ||
    356 	    (USPACE_ALIGN % USPACE) != 0) {
    357 		flags |= PR_NOALIGN;
    358 	}
    359 
    360 	uvm_uarea_cache = pool_cache_init(USPACE, USPACE_ALIGN, 0, flags,
    361 	    "uarea", &uvm_uarea_allocator, IPL_NONE, NULL, NULL, NULL);
    362 #if defined(__HAVE_CPU_UAREA_ROUTINES)
    363 	uvm_uarea_system_cache = pool_cache_init(USPACE, USPACE_ALIGN,
    364 	    0, flags, "uareasys", &uvm_uarea_system_allocator,
    365 	    IPL_NONE, NULL, NULL, NULL);
    366 #endif
    367 }
    368 
    369 /*
    370  * uvm_uarea_alloc: allocate a u-area
    371  */
    372 
    373 vaddr_t
    374 uvm_uarea_alloc(void)
    375 {
    376 
    377 	return (vaddr_t)pool_cache_get(uvm_uarea_cache, PR_WAITOK);
    378 }
    379 
    380 vaddr_t
    381 uvm_uarea_system_alloc(struct cpu_info *ci)
    382 {
    383 #ifdef __HAVE_CPU_UAREA_ALLOC_IDLELWP
    384 	if (__predict_false(ci != NULL))
    385 		return cpu_uarea_alloc_idlelwp(ci);
    386 #endif
    387 
    388 	return (vaddr_t)pool_cache_get(uvm_uarea_system_cache, PR_WAITOK);
    389 }
    390 
    391 /*
    392  * uvm_uarea_free: free a u-area
    393  */
    394 
    395 void
    396 uvm_uarea_free(vaddr_t uaddr)
    397 {
    398 
    399 	kasan_mark((void *)uaddr, USPACE, USPACE, 0);
    400 	pool_cache_put(uvm_uarea_cache, (void *)uaddr);
    401 }
    402 
    403 void
    404 uvm_uarea_system_free(vaddr_t uaddr)
    405 {
    406 
    407 	kasan_mark((void *)uaddr, USPACE, USPACE, 0);
    408 	pool_cache_put(uvm_uarea_system_cache, (void *)uaddr);
    409 }
    410 
    411 vaddr_t
    412 uvm_lwp_getuarea(lwp_t *l)
    413 {
    414 
    415 	return (vaddr_t)l->l_addr - UAREA_PCB_OFFSET;
    416 }
    417 
    418 void
    419 uvm_lwp_setuarea(lwp_t *l, vaddr_t addr)
    420 {
    421 
    422 	l->l_addr = (void *)(addr + UAREA_PCB_OFFSET);
    423 }
    424 
    425 /*
    426  * uvm_proc_exit: exit a virtual address space
    427  *
    428  * - borrow proc0's address space because freeing the vmspace
    429  *   of the dead process may block.
    430  */
    431 
    432 void
    433 uvm_proc_exit(struct proc *p)
    434 {
    435 	struct lwp *l = curlwp; /* XXX */
    436 	struct vmspace *ovm;
    437 
    438 	KASSERT(p == l->l_proc);
    439 	ovm = p->p_vmspace;
    440 	KASSERT(ovm != NULL);
    441 
    442 	if (__predict_false(ovm == proc0.p_vmspace))
    443 		return;
    444 
    445 	/*
    446 	 * borrow proc0's address space.
    447 	 */
    448 	kpreempt_disable();
    449 	pmap_deactivate(l);
    450 	p->p_vmspace = proc0.p_vmspace;
    451 	pmap_activate(l);
    452 	kpreempt_enable();
    453 
    454 	uvmspace_free(ovm);
    455 }
    456 
    457 void
    458 uvm_lwp_exit(struct lwp *l)
    459 {
    460 	vaddr_t va = uvm_lwp_getuarea(l);
    461 	bool system = (l->l_flag & LW_SYSTEM) != 0;
    462 
    463 	if (system)
    464 		uvm_uarea_system_free(va);
    465 	else
    466 		uvm_uarea_free(va);
    467 #ifdef DIAGNOSTIC
    468 	uvm_lwp_setuarea(l, (vaddr_t)NULL);
    469 #endif
    470 }
    471 
    472 /*
    473  * uvm_init_limit: init per-process VM limits
    474  *
    475  * - called for process 0 and then inherited by all others.
    476  */
    477 
    478 void
    479 uvm_init_limits(struct proc *p)
    480 {
    481 
    482 	/*
    483 	 * Set up the initial limits on process VM.  Set the maximum
    484 	 * resident set size to be all of (reasonably) available memory.
    485 	 * This causes any single, large process to start random page
    486 	 * replacement once it fills memory.
    487 	 */
    488 
    489 	p->p_rlimit[RLIMIT_STACK].rlim_cur = DFLSSIZ;
    490 	p->p_rlimit[RLIMIT_STACK].rlim_max = maxsmap;
    491 	p->p_rlimit[RLIMIT_DATA].rlim_cur = DFLDSIZ;
    492 	p->p_rlimit[RLIMIT_DATA].rlim_max = maxdmap;
    493 	p->p_rlimit[RLIMIT_AS].rlim_cur = RLIM_INFINITY;
    494 	p->p_rlimit[RLIMIT_AS].rlim_max = RLIM_INFINITY;
    495 	p->p_rlimit[RLIMIT_RSS].rlim_cur = MIN(VM_MAXUSER_ADDRESS,
    496 	    ctob((rlim_t)uvm_availmem(false)));
    497 }
    498 
    499 /*
    500  * uvm_scheduler: process zero main loop.
    501  */
    502 
    503 extern struct loadavg averunnable;
    504 
    505 void
    506 uvm_scheduler(void)
    507 {
    508 	lwp_t *l = curlwp;
    509 
    510 	lwp_lock(l);
    511 	l->l_class = SCHED_FIFO;
    512 	lwp_changepri(l, PRI_VM);
    513 	lwp_unlock(l);
    514 
    515 	/* Start the freelist cache. */
    516 	uvm_pgflcache_start();
    517 
    518 	for (;;) {
    519 		/* Update legacy stats for post-mortem debugging. */
    520 		uvm_update_uvmexp();
    521 
    522 		/* See if the pagedaemon needs to generate some free pages. */
    523 		uvm_kick_pdaemon();
    524 
    525 		/* Calculate process statistics. */
    526 		sched_pstats();
    527 		(void)kpause("uvm", false, hz, NULL);
    528 	}
    529 }
    530 
    531 /*
    532  * uvm_idle: called from the idle loop.
    533  */
    534 
    535 void
    536 uvm_idle(void)
    537 {
    538 	struct cpu_info *ci = curcpu();
    539 	struct uvm_cpu *ucpu = ci->ci_data.cpu_uvm;
    540 
    541 	KASSERT(kpreempt_disabled());
    542 
    543 	uvmpdpol_idle(ucpu);
    544 }
    545