Home | History | Annotate | Line # | Download | only in include
asan.h revision 1.13
      1 /*	$NetBSD: asan.h,v 1.13 2020/09/20 15:30:11 skrll Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 2018-2020 Maxime Villard, m00nbsd.net
      5  * All rights reserved.
      6  *
      7  * This code is part of the KASAN subsystem of the NetBSD kernel.
      8  *
      9  * Redistribution and use in source and binary forms, with or without
     10  * modification, are permitted provided that the following conditions
     11  * are met:
     12  * 1. Redistributions of source code must retain the above copyright
     13  *    notice, this list of conditions and the following disclaimer.
     14  * 2. Redistributions in binary form must reproduce the above copyright
     15  *    notice, this list of conditions and the following disclaimer in the
     16  *    documentation and/or other materials provided with the distribution.
     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 #include <sys/atomic.h>
     32 #include <sys/ksyms.h>
     33 
     34 #include <uvm/uvm.h>
     35 
     36 #include <aarch64/pmap.h>
     37 #include <aarch64/vmparam.h>
     38 #include <aarch64/cpufunc.h>
     39 #include <aarch64/armreg.h>
     40 #include <aarch64/machdep.h>
     41 
     42 #define __MD_VIRTUAL_SHIFT	48	/* 49bit address space, cut half */
     43 #define __MD_KERNMEM_BASE	0xFFFF000000000000 /* kern mem base address */
     44 
     45 #define __MD_SHADOW_SIZE	(1ULL << (__MD_VIRTUAL_SHIFT - KASAN_SHADOW_SCALE_SHIFT))
     46 #define KASAN_MD_SHADOW_START	(AARCH64_KSEG_END)
     47 #define KASAN_MD_SHADOW_END	(KASAN_MD_SHADOW_START + __MD_SHADOW_SIZE)
     48 
     49 static bool __md_early __read_mostly = true;
     50 
     51 static inline int8_t *
     52 kasan_md_addr_to_shad(const void *addr)
     53 {
     54 	vaddr_t va = (vaddr_t)addr;
     55 	return (int8_t *)(KASAN_MD_SHADOW_START +
     56 	    ((va - __MD_KERNMEM_BASE) >> KASAN_SHADOW_SCALE_SHIFT));
     57 }
     58 
     59 static inline bool
     60 kasan_md_unsupported(vaddr_t addr)
     61 {
     62 	return (addr < VM_MIN_KERNEL_ADDRESS) ||
     63 	    (addr >= VM_KERNEL_IO_ADDRESS);
     64 }
     65 
     66 static paddr_t
     67 __md_palloc(void)
     68 {
     69 	paddr_t pa;
     70 
     71 	if (__predict_false(__md_early)) {
     72 		pa = (paddr_t)pmapboot_pagealloc();
     73 		return pa;
     74 	}
     75 
     76 	vaddr_t va;
     77 	if (!uvm.page_init_done) {
     78 		va = uvm_pageboot_alloc(PAGE_SIZE);
     79 		pa = AARCH64_KVA_TO_PA(va);
     80 	} else {
     81 		struct vm_page *pg;
     82 retry:
     83 		pg = uvm_pagealloc(NULL, 0, NULL, 0);
     84 		if (pg == NULL) {
     85 			uvm_wait(__func__);
     86 			goto retry;
     87 		}
     88 
     89 		pa = VM_PAGE_TO_PHYS(pg);
     90 		va = AARCH64_PA_TO_KVA(pa);
     91 	}
     92 
     93 	__builtin_memset((void *)va, 0, PAGE_SIZE);
     94 	return pa;
     95 }
     96 
     97 static inline paddr_t
     98 __md_palloc_large(void)
     99 {
    100 	struct pglist pglist;
    101 	int ret;
    102 
    103 	if (!uvm.page_init_done)
    104 		return 0;
    105 
    106 	ret = uvm_pglistalloc(L2_SIZE, 0, ~0UL, L2_SIZE, 0,
    107 	    &pglist, 1, 0);
    108 	if (ret != 0)
    109 		return 0;
    110 
    111 	/* The page may not be zeroed. */
    112 	return VM_PAGE_TO_PHYS(TAILQ_FIRST(&pglist));
    113 }
    114 
    115 static void
    116 kasan_md_shadow_map_page(vaddr_t va)
    117 {
    118 	pd_entry_t *l0, *l1, *l2, *l3;
    119 	paddr_t l0pa, pa;
    120 	pd_entry_t pde;
    121 	size_t idx;
    122 
    123 	l0pa = reg_ttbr1_el1_read();
    124 	if (__predict_false(__md_early)) {
    125 		l0 = (void *)KERN_PHYSTOV(l0pa);
    126 	} else {
    127 		l0 = (void *)AARCH64_PA_TO_KVA(l0pa);
    128 	}
    129 
    130 	idx = l0pde_index(va);
    131 	pde = l0[idx];
    132 	if (!l0pde_valid(pde)) {
    133 		pa = __md_palloc();
    134 		atomic_swap_64(&l0[idx], pa | L0_TABLE);
    135 	} else {
    136 		pa = l0pde_pa(pde);
    137 	}
    138 	if (__predict_false(__md_early)) {
    139 		l1 = (void *)KERN_PHYSTOV(pa);
    140 	} else {
    141 		l1 = (void *)AARCH64_PA_TO_KVA(pa);
    142 	}
    143 
    144 	idx = l1pde_index(va);
    145 	pde = l1[idx];
    146 	if (!l1pde_valid(pde)) {
    147 		pa = __md_palloc();
    148 		atomic_swap_64(&l1[idx], pa | L1_TABLE);
    149 	} else {
    150 		pa = l1pde_pa(pde);
    151 	}
    152 	if (__predict_false(__md_early)) {
    153 		l2 = (void *)KERN_PHYSTOV(pa);
    154 	} else {
    155 		l2 = (void *)AARCH64_PA_TO_KVA(pa);
    156 	}
    157 
    158 	idx = l2pde_index(va);
    159 	pde = l2[idx];
    160 	if (!l2pde_valid(pde)) {
    161 		/* If possible, use L2_BLOCK to map it in advance. */
    162 		if ((pa = __md_palloc_large()) != 0) {
    163 			atomic_swap_64(&l2[idx], pa | L2_BLOCK |
    164 			    LX_BLKPAG_UXN | LX_BLKPAG_PXN | LX_BLKPAG_AF |
    165 			    LX_BLKPAG_SH_IS | LX_BLKPAG_AP_RW);
    166 			aarch64_tlbi_by_va(va);
    167 			__builtin_memset((void *)va, 0, L2_SIZE);
    168 			return;
    169 		}
    170 		pa = __md_palloc();
    171 		atomic_swap_64(&l2[idx], pa | L2_TABLE);
    172 	} else if (l2pde_is_block(pde)) {
    173 		/* This VA is already mapped as a block. */
    174 		return;
    175 	} else {
    176 		pa = l2pde_pa(pde);
    177 	}
    178 	if (__predict_false(__md_early)) {
    179 		l3 = (void *)KERN_PHYSTOV(pa);
    180 	} else {
    181 		l3 = (void *)AARCH64_PA_TO_KVA(pa);
    182 	}
    183 
    184 	idx = l3pte_index(va);
    185 	pde = l3[idx];
    186 	if (!l3pte_valid(pde)) {
    187 		pa = __md_palloc();
    188 		atomic_swap_64(&l3[idx], pa | L3_PAGE | LX_BLKPAG_UXN |
    189 		    LX_BLKPAG_PXN | LX_BLKPAG_AF | LX_BLKPAG_SH_IS |
    190 		    LX_BLKPAG_AP_RW);
    191 		aarch64_tlbi_by_va(va);
    192 	}
    193 }
    194 
    195 static void
    196 kasan_md_early_init(void *stack)
    197 {
    198 	kasan_shadow_map(stack, USPACE);
    199 	__md_early = false;
    200 }
    201 
    202 static void
    203 kasan_md_init(void)
    204 {
    205 
    206 	CTASSERT((__MD_SHADOW_SIZE / L0_SIZE) == 64);
    207 
    208 	/* The VAs we've created until now. */
    209 	vaddr_t eva = pmap_growkernel(VM_KERNEL_VM_BASE);
    210 	kasan_shadow_map((void *)VM_MIN_KERNEL_ADDRESS,
    211 	    eva - VM_MIN_KERNEL_ADDRESS);
    212 }
    213 
    214 static inline bool
    215 __md_unwind_end(const char *name)
    216 {
    217 	if (!strncmp(name, "el0_trap", 8) ||
    218 	    !strncmp(name, "el1_trap", 8)) {
    219 		return true;
    220 	}
    221 
    222 	return false;
    223 }
    224 
    225 static void
    226 kasan_md_unwind(void)
    227 {
    228 	uint64_t lr, *fp;
    229 	const char *mod;
    230 	const char *sym;
    231 	size_t nsym;
    232 	int error;
    233 
    234 	fp = (uint64_t *)__builtin_frame_address(0);
    235 	nsym = 0;
    236 
    237 	while (1) {
    238 		/*
    239 		 * normal stack frame
    240 		 *  fp[0]  saved fp(x29) value
    241 		 *  fp[1]  saved lr(x30) value
    242 		 */
    243 		lr = fp[1];
    244 
    245 		if (lr < VM_MIN_KERNEL_ADDRESS) {
    246 			break;
    247 		}
    248 		error = ksyms_getname(&mod, &sym, (vaddr_t)lr, KSYMS_PROC);
    249 		if (error) {
    250 			break;
    251 		}
    252 		printf("#%zu %p in %s <%s>\n", nsym, (void *)lr, sym, mod);
    253 		if (__md_unwind_end(sym)) {
    254 			break;
    255 		}
    256 
    257 		fp = (uint64_t *)fp[0];
    258 		if (fp == NULL) {
    259 			break;
    260 		}
    261 		nsym++;
    262 
    263 		if (nsym >= 15) {
    264 			break;
    265 		}
    266 	}
    267 }
    268