1 /* $NetBSD: subr_pcu.c,v 1.28 2023/04/09 09:18:09 riastradh Exp $ */ 2 3 /*- 4 * Copyright (c) 2011, 2014 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Mindaugas Rasiukevicius. 9 * 10 * Redistribution and use in source and binary forms, with or without 11 * modification, are permitted provided that the following conditions 12 * are met: 13 * 1. Redistributions of source code must retain the above copyright 14 * notice, this list of conditions and the following disclaimer. 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 29 * POSSIBILITY OF SUCH DAMAGE. 30 */ 31 32 /* 33 * Per CPU Unit (PCU) - is an interface to manage synchronization of any 34 * per CPU context (unit) tied with LWP context. Typical use: FPU state. 35 * 36 * Concurrency notes: 37 * 38 * PCU state may be loaded only by the current LWP, that is, curlwp. 39 * Therefore, only LWP itself can set a CPU for lwp_t::l_pcu_cpu[id]. 40 * 41 * There are some important rules about operation calls. The request 42 * for a PCU release can be from a) the owner LWP (regardless whether 43 * the PCU state is on the current CPU or remote CPU) b) any other LWP 44 * running on that CPU (in such case, the owner LWP is on a remote CPU 45 * or sleeping). 46 * 47 * In any case, the PCU state can *only* be changed from the current 48 * CPU. If said PCU state is on the remote CPU, a cross-call will be 49 * sent by the owner LWP. Therefore struct cpu_info::ci_pcu_curlwp[id] 50 * may only be changed by the current CPU and lwp_t::l_pcu_cpu[id] may 51 * only be cleared by the CPU which has the PCU state loaded. 52 */ 53 54 #include <sys/cdefs.h> 55 __KERNEL_RCSID(0, "$NetBSD: subr_pcu.c,v 1.28 2023/04/09 09:18:09 riastradh Exp $"); 56 57 #include <sys/param.h> 58 #include <sys/cpu.h> 59 #include <sys/lwp.h> 60 #include <sys/pcu.h> 61 #include <sys/ipi.h> 62 63 #if PCU_UNIT_COUNT > 0 64 65 static inline void pcu_do_op(const pcu_ops_t *, lwp_t * const, const int); 66 static void pcu_lwp_op(const pcu_ops_t *, lwp_t *, const int); 67 68 /* 69 * Internal PCU commands for the pcu_do_op() function. 70 */ 71 #define PCU_CMD_SAVE 0x01 /* save PCU state to the LWP */ 72 #define PCU_CMD_RELEASE 0x02 /* release PCU state on the CPU */ 73 74 /* 75 * Message structure for another CPU passed via ipi(9). 76 */ 77 typedef struct { 78 const pcu_ops_t *pcu; 79 lwp_t * owner; 80 const int flags; 81 } pcu_ipi_msg_t; 82 83 /* 84 * PCU IPIs run at IPL_HIGH (aka IPL_PCU in this code). 85 */ 86 #define splpcu splhigh 87 88 /* 89 * pcu_available_p: true if lwp is allowed to use PCU state. 90 */ 91 static inline bool __diagused 92 pcu_available_p(struct lwp *l) 93 { 94 95 /* XXX Not sure this is safe unless l is locked! */ 96 return (l->l_flag & (LW_SYSTEM|LW_SYSTEM_FPU)) != LW_SYSTEM; 97 } 98 99 /* 100 * pcu_switchpoint: release PCU state if the LWP is being run on another CPU. 101 * This routine is called on each context switch by by mi_switch(). 102 */ 103 void 104 pcu_switchpoint(lwp_t *l) 105 { 106 const uint32_t pcu_valid = l->l_pcu_valid; 107 int s; 108 109 KASSERTMSG(l == curlwp, "l %p != curlwp %p", l, curlwp); 110 111 if (__predict_true(pcu_valid == 0)) { 112 /* PCUs are not in use. */ 113 return; 114 } 115 s = splpcu(); 116 for (u_int id = 0; id < PCU_UNIT_COUNT; id++) { 117 if ((pcu_valid & (1U << id)) == 0) { 118 continue; 119 } 120 struct cpu_info * const pcu_ci = l->l_pcu_cpu[id]; 121 if (pcu_ci == l->l_cpu) { 122 KASSERT(pcu_ci->ci_pcu_curlwp[id] == l); 123 continue; 124 } 125 const pcu_ops_t * const pcu = pcu_ops_md_defs[id]; 126 pcu->pcu_state_release(l); 127 } 128 splx(s); 129 } 130 131 /* 132 * pcu_discard_all: discard PCU state of the given LWP. 133 * 134 * Used by exec and LWP exit. 135 */ 136 void 137 pcu_discard_all(lwp_t *l) 138 { 139 const uint32_t pcu_valid = l->l_pcu_valid; 140 141 /* 142 * The check for LSIDL here is to catch the case where the LWP exits 143 * due to an error in the LWP creation path before it ever runs. 144 */ 145 KASSERT(l == curlwp || l->l_stat == LSIDL || 146 (!pcu_available_p(l) && pcu_valid == 0)); 147 148 if (__predict_true(pcu_valid == 0)) { 149 /* PCUs are not in use. */ 150 return; 151 } 152 for (u_int id = 0; id < PCU_UNIT_COUNT; id++) { 153 if ((pcu_valid & (1U << id)) == 0) { 154 continue; 155 } 156 if (__predict_true(l->l_pcu_cpu[id] == NULL)) { 157 continue; 158 } 159 const pcu_ops_t * const pcu = pcu_ops_md_defs[id]; 160 pcu_lwp_op(pcu, l, PCU_CMD_RELEASE); 161 } 162 l->l_pcu_valid = 0; 163 } 164 165 /* 166 * pcu_save_all: save PCU state of the given LWP so that eg. coredump can 167 * examine it. 168 */ 169 void 170 pcu_save_all(lwp_t *l) 171 { 172 const uint32_t pcu_valid = l->l_pcu_valid; 173 int flags = PCU_CMD_SAVE; 174 175 /* If LW_WCORE, we are also releasing the state. */ 176 if (__predict_false(l->l_flag & LW_WCORE)) { 177 flags |= PCU_CMD_RELEASE; 178 } 179 180 /* 181 * Normally we save for the current LWP, but sometimes we get called 182 * with a different LWP (forking a system LWP or doing a coredump of 183 * a process with multiple threads) and we need to deal with that. 184 */ 185 KASSERT(l == curlwp || ((!pcu_available_p(l) || 186 (curlwp->l_proc == l->l_proc && l->l_stat == LSSUSPENDED)) && 187 pcu_valid == 0)); 188 189 if (__predict_true(pcu_valid == 0)) { 190 /* PCUs are not in use. */ 191 return; 192 } 193 for (u_int id = 0; id < PCU_UNIT_COUNT; id++) { 194 if ((pcu_valid & (1U << id)) == 0) { 195 continue; 196 } 197 if (__predict_true(l->l_pcu_cpu[id] == NULL)) { 198 continue; 199 } 200 const pcu_ops_t * const pcu = pcu_ops_md_defs[id]; 201 pcu_lwp_op(pcu, l, flags); 202 } 203 } 204 205 /* 206 * pcu_do_op: save/release PCU state on the current CPU. 207 * 208 * => Must be called at IPL_PCU or from the interrupt. 209 */ 210 static inline void 211 pcu_do_op(const pcu_ops_t *pcu, lwp_t * const l, const int flags) 212 { 213 struct cpu_info * const ci = curcpu(); 214 const u_int id = pcu->pcu_id; 215 216 KASSERT(l->l_pcu_cpu[id] == ci); 217 218 if (flags & PCU_CMD_SAVE) { 219 pcu->pcu_state_save(l); 220 } 221 if (flags & PCU_CMD_RELEASE) { 222 pcu->pcu_state_release(l); 223 ci->ci_pcu_curlwp[id] = NULL; 224 l->l_pcu_cpu[id] = NULL; 225 } 226 } 227 228 /* 229 * pcu_cpu_ipi: helper routine to call pcu_do_op() via ipi(9). 230 */ 231 static void 232 pcu_cpu_ipi(void *arg) 233 { 234 const pcu_ipi_msg_t *pcu_msg = arg; 235 const pcu_ops_t *pcu = pcu_msg->pcu; 236 const u_int id = pcu->pcu_id; 237 lwp_t *l = pcu_msg->owner; 238 239 KASSERT(pcu_msg->owner != NULL); 240 241 if (curcpu()->ci_pcu_curlwp[id] != l) { 242 /* 243 * Different ownership: another LWP raced with us and 244 * perform save and release. There is nothing to do. 245 */ 246 KASSERT(l->l_pcu_cpu[id] == NULL); 247 return; 248 } 249 pcu_do_op(pcu, l, pcu_msg->flags); 250 } 251 252 /* 253 * pcu_lwp_op: perform PCU state save, release or both operations on LWP. 254 */ 255 static void 256 pcu_lwp_op(const pcu_ops_t *pcu, lwp_t *l, const int flags) 257 { 258 const u_int id = pcu->pcu_id; 259 struct cpu_info *ci; 260 int s; 261 262 /* 263 * Caller should have re-checked if there is any state to manage. 264 * Block the interrupts and inspect again, since cross-call sent 265 * by remote CPU could have changed the state. 266 */ 267 s = splpcu(); 268 ci = l->l_pcu_cpu[id]; 269 if (ci == curcpu()) { 270 /* 271 * State is on the current CPU - just perform the operations. 272 */ 273 KASSERTMSG(ci->ci_pcu_curlwp[id] == l, 274 "%s: cpu%u: pcu_curlwp[%u] (%p) != l (%p)", 275 __func__, cpu_index(ci), id, ci->ci_pcu_curlwp[id], l); 276 pcu_do_op(pcu, l, flags); 277 splx(s); 278 return; 279 } 280 if (__predict_false(ci == NULL)) { 281 /* Cross-call has won the race - no state to manage. */ 282 splx(s); 283 return; 284 } 285 286 /* 287 * The state is on the remote CPU: perform the operation(s) there. 288 */ 289 pcu_ipi_msg_t pcu_msg = { .pcu = pcu, .owner = l, .flags = flags }; 290 ipi_msg_t ipi_msg = { .func = pcu_cpu_ipi, .arg = &pcu_msg }; 291 ipi_unicast(&ipi_msg, ci); 292 splx(s); 293 294 /* Wait for completion. */ 295 ipi_wait(&ipi_msg); 296 297 KASSERT((flags & PCU_CMD_RELEASE) == 0 || l->l_pcu_cpu[id] == NULL); 298 } 299 300 /* 301 * pcu_load: load/initialize the PCU state of current LWP on current CPU. 302 */ 303 void 304 pcu_load(const pcu_ops_t *pcu) 305 { 306 lwp_t *oncpu_lwp, * const l = curlwp; 307 const u_int id = pcu->pcu_id; 308 struct cpu_info *ci, *curci; 309 int s; 310 311 KASSERT(!cpu_intr_p()); 312 KASSERT(!cpu_softintr_p()); 313 314 s = splpcu(); 315 curci = curcpu(); 316 ci = l->l_pcu_cpu[id]; 317 318 /* Does this CPU already have our PCU state loaded? */ 319 if (ci == curci) { 320 /* 321 * Fault reoccurred while the PCU state is loaded and 322 * therefore PCU should be re‐enabled. This happens 323 * if LWP is context switched to another CPU and then 324 * switched back to the original CPU while the state 325 * on that CPU has not been changed by other LWPs. 326 * 327 * It may also happen due to instruction "bouncing" on 328 * some architectures. 329 */ 330 KASSERT(curci->ci_pcu_curlwp[id] == l); 331 KASSERT(pcu_valid_p(pcu, l)); 332 pcu->pcu_state_load(l, PCU_VALID | PCU_REENABLE); 333 splx(s); 334 return; 335 } 336 337 /* If PCU state of this LWP is on the remote CPU - save it there. */ 338 if (ci) { 339 pcu_ipi_msg_t pcu_msg = { .pcu = pcu, .owner = l, 340 .flags = PCU_CMD_SAVE | PCU_CMD_RELEASE }; 341 ipi_msg_t ipi_msg = { .func = pcu_cpu_ipi, .arg = &pcu_msg }; 342 ipi_unicast(&ipi_msg, ci); 343 splx(s); 344 345 /* 346 * Wait for completion, re-enter IPL_PCU and re-fetch 347 * the current CPU. 348 */ 349 ipi_wait(&ipi_msg); 350 s = splpcu(); 351 curci = curcpu(); 352 } 353 KASSERT(l->l_pcu_cpu[id] == NULL); 354 355 /* Save the PCU state on the current CPU, if there is any. */ 356 if ((oncpu_lwp = curci->ci_pcu_curlwp[id]) != NULL) { 357 pcu_do_op(pcu, oncpu_lwp, PCU_CMD_SAVE | PCU_CMD_RELEASE); 358 KASSERT(curci->ci_pcu_curlwp[id] == NULL); 359 } 360 361 /* 362 * Finally, load the state for this LWP on this CPU. Indicate to 363 * the load function whether PCU state was valid before this call. 364 */ 365 const bool valid = ((1U << id) & l->l_pcu_valid) != 0; 366 pcu->pcu_state_load(l, valid ? PCU_VALID : 0); 367 curci->ci_pcu_curlwp[id] = l; 368 l->l_pcu_cpu[id] = curci; 369 l->l_pcu_valid |= (1U << id); 370 splx(s); 371 } 372 373 /* 374 * pcu_discard: discard the PCU state of the given LWP. If "valid" 375 * parameter is true, then keep considering the PCU state as valid. 376 */ 377 void 378 pcu_discard(const pcu_ops_t *pcu, lwp_t *l, bool valid) 379 { 380 const u_int id = pcu->pcu_id; 381 382 KASSERT(!cpu_intr_p()); 383 KASSERT(!cpu_softintr_p()); 384 385 if (__predict_false(valid)) { 386 l->l_pcu_valid |= (1U << id); 387 } else { 388 l->l_pcu_valid &= ~(1U << id); 389 } 390 if (__predict_true(l->l_pcu_cpu[id] == NULL)) { 391 return; 392 } 393 pcu_lwp_op(pcu, l, PCU_CMD_RELEASE); 394 } 395 396 /* 397 * pcu_save_lwp: save PCU state to the given LWP. 398 */ 399 void 400 pcu_save(const pcu_ops_t *pcu, lwp_t *l) 401 { 402 const u_int id = pcu->pcu_id; 403 404 KASSERT(!cpu_intr_p()); 405 KASSERT(!cpu_softintr_p()); 406 407 if (__predict_true(l->l_pcu_cpu[id] == NULL)) { 408 return; 409 } 410 pcu_lwp_op(pcu, l, PCU_CMD_SAVE | PCU_CMD_RELEASE); 411 } 412 413 /* 414 * pcu_save_all_on_cpu: save all PCU states on the current CPU. 415 */ 416 void 417 pcu_save_all_on_cpu(void) 418 { 419 int s; 420 421 s = splpcu(); 422 for (u_int id = 0; id < PCU_UNIT_COUNT; id++) { 423 const pcu_ops_t * const pcu = pcu_ops_md_defs[id]; 424 lwp_t *l; 425 426 if ((l = curcpu()->ci_pcu_curlwp[id]) != NULL) { 427 pcu_do_op(pcu, l, PCU_CMD_SAVE | PCU_CMD_RELEASE); 428 } 429 } 430 splx(s); 431 } 432 433 /* 434 * pcu_valid_p: return true if PCU state is considered valid. Generally, 435 * it always becomes "valid" when pcu_load() is called. 436 */ 437 bool 438 pcu_valid_p(const pcu_ops_t *pcu, const lwp_t *l) 439 { 440 const u_int id = pcu->pcu_id; 441 442 return (l->l_pcu_valid & (1U << id)) != 0; 443 } 444 445 #endif /* PCU_UNIT_COUNT > 0 */ 446