1125 lines · 30.5 KB · C
RawDownload
// SPDX-License-Identifier: GPL-2.0-only/* * Generic helpers for smp ipi calls * * (C) Jens Axboe <jens.axboe@oracle.com> 2008 */ #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt #include <linux/irq_work.h>#include <linux/rcupdate.h>#include <linux/rculist.h>#include <linux/kernel.h>#include <linux/export.h>#include <linux/percpu.h>#include <linux/init.h>#include <linux/interrupt.h>#include <linux/gfp.h>#include <linux/smp.h>#include <linux/cpu.h>#include <linux/sched.h>#include <linux/sched/idle.h>#include <linux/hypervisor.h>#include <linux/sched/clock.h>#include <linux/nmi.h>#include <linux/sched/debug.h>#include <linux/jump_label.h> #include <trace/events/ipi.h>#define CREATE_TRACE_POINTS#include <trace/events/csd.h>#undef CREATE_TRACE_POINTS #include "smpboot.h"#include "sched/smp.h" #define CSD_TYPE(_csd)	((_csd)->node.u_flags & CSD_FLAG_TYPE_MASK) struct call_function_data {	call_single_data_t	__percpu *csd;	cpumask_var_t		cpumask;	cpumask_var_t		cpumask_ipi;}; static DEFINE_PER_CPU_ALIGNED(struct call_function_data, cfd_data); static DEFINE_PER_CPU_SHARED_ALIGNED(struct llist_head, call_single_queue); static DEFINE_PER_CPU(atomic_t, trigger_backtrace) = ATOMIC_INIT(1); static void __flush_smp_call_function_queue(bool warn_cpu_offline); int smpcfd_prepare_cpu(unsigned int cpu){	struct call_function_data *cfd = &per_cpu(cfd_data, cpu); 	if (!zalloc_cpumask_var_node(&cfd->cpumask, GFP_KERNEL,				     cpu_to_node(cpu)))		return -ENOMEM;	if (!zalloc_cpumask_var_node(&cfd->cpumask_ipi, GFP_KERNEL,				     cpu_to_node(cpu))) {		free_cpumask_var(cfd->cpumask);		return -ENOMEM;	}	cfd->csd = alloc_percpu(call_single_data_t);	if (!cfd->csd) {		free_cpumask_var(cfd->cpumask);		free_cpumask_var(cfd->cpumask_ipi);		return -ENOMEM;	} 	return 0;} int smpcfd_dead_cpu(unsigned int cpu){	struct call_function_data *cfd = &per_cpu(cfd_data, cpu); 	free_cpumask_var(cfd->cpumask);	free_cpumask_var(cfd->cpumask_ipi);	free_percpu(cfd->csd);	return 0;} int smpcfd_dying_cpu(unsigned int cpu){	/*	 * The IPIs for the smp-call-function callbacks queued by other	 * CPUs might arrive late, either due to hardware latencies or	 * because this CPU disabled interrupts (inside stop-machine)	 * before the IPIs were sent. So flush out any pending callbacks	 * explicitly (without waiting for the IPIs to arrive), to	 * ensure that the outgoing CPU doesn't go offline with work	 * still pending.	 */	__flush_smp_call_function_queue(false);	irq_work_run();	return 0;} void __init call_function_init(void){	int i; 	for_each_possible_cpu(i)		init_llist_head(&per_cpu(call_single_queue, i)); 	smpcfd_prepare_cpu(smp_processor_id());} static __always_inline voidsend_call_function_single_ipi(int cpu){	if (call_function_single_prep_ipi(cpu)) {		trace_ipi_send_cpu(cpu, _RET_IP_,				   generic_smp_call_function_single_interrupt);		arch_send_call_function_single_ipi(cpu);	}} static __always_inline voidsend_call_function_ipi_mask(struct cpumask *mask){	trace_ipi_send_cpumask(mask, _RET_IP_,			       generic_smp_call_function_single_interrupt);	arch_send_call_function_ipi_mask(mask);} static __always_inline voidcsd_do_func(smp_call_func_t func, void *info, call_single_data_t *csd){	trace_csd_function_entry(func, csd);	func(info);	trace_csd_function_exit(func, csd);} #ifdef CONFIG_CSD_LOCK_WAIT_DEBUG static DEFINE_STATIC_KEY_MAYBE(CONFIG_CSD_LOCK_WAIT_DEBUG_DEFAULT, csdlock_debug_enabled); /* * Parse the csdlock_debug= kernel boot parameter. * * If you need to restore the old "ext" value that once provided * additional debugging information, reapply the following commits: * * de7b09ef658d ("locking/csd_lock: Prepare more CSD lock debugging") * a5aabace5fb8 ("locking/csd_lock: Add more data to CSD lock debugging") */static int __init csdlock_debug(char *str){	int ret;	unsigned int val = 0; 	ret = get_option(&str, &val);	if (ret) {		if (val)			static_branch_enable(&csdlock_debug_enabled);		else			static_branch_disable(&csdlock_debug_enabled);	} 	return 1;}__setup("csdlock_debug=", csdlock_debug); static DEFINE_PER_CPU(call_single_data_t *, cur_csd);static DEFINE_PER_CPU(smp_call_func_t, cur_csd_func);static DEFINE_PER_CPU(void *, cur_csd_info); static ulong csd_lock_timeout = 5000;  /* CSD lock timeout in milliseconds. */module_param(csd_lock_timeout, ulong, 0444);static int panic_on_ipistall;  /* CSD panic timeout in milliseconds, 300000 for five minutes. */module_param(panic_on_ipistall, int, 0444); static atomic_t csd_bug_count = ATOMIC_INIT(0); /* Record current CSD work for current CPU, NULL to erase. */static void __csd_lock_record(call_single_data_t *csd){	if (!csd) {		smp_mb(); /* NULL cur_csd after unlock. */		__this_cpu_write(cur_csd, NULL);		return;	}	__this_cpu_write(cur_csd_func, csd->func);	__this_cpu_write(cur_csd_info, csd->info);	smp_wmb(); /* func and info before csd. */	__this_cpu_write(cur_csd, csd);	smp_mb(); /* Update cur_csd before function call. */		  /* Or before unlock, as the case may be. */} static __always_inline void csd_lock_record(call_single_data_t *csd){	if (static_branch_unlikely(&csdlock_debug_enabled))		__csd_lock_record(csd);} static int csd_lock_wait_getcpu(call_single_data_t *csd){	unsigned int csd_type; 	csd_type = CSD_TYPE(csd);	if (csd_type == CSD_TYPE_ASYNC || csd_type == CSD_TYPE_SYNC)		return csd->node.dst; /* Other CSD_TYPE_ values might not have ->dst. */	return -1;} /* * Complain if too much time spent waiting.  Note that only * the CSD_TYPE_SYNC/ASYNC types provide the destination CPU, * so waiting on other types gets much less information. */static bool csd_lock_wait_toolong(call_single_data_t *csd, u64 ts0, u64 *ts1, int *bug_id){	int cpu = -1;	int cpux;	bool firsttime;	u64 ts2, ts_delta;	call_single_data_t *cpu_cur_csd;	unsigned int flags = READ_ONCE(csd->node.u_flags);	unsigned long long csd_lock_timeout_ns = csd_lock_timeout * NSEC_PER_MSEC; 	if (!(flags & CSD_FLAG_LOCK)) {		if (!unlikely(*bug_id))			return true;		cpu = csd_lock_wait_getcpu(csd);		pr_alert("csd: CSD lock (#%d) got unstuck on CPU#%02d, CPU#%02d released the lock.\n",			 *bug_id, raw_smp_processor_id(), cpu);		return true;	} 	ts2 = sched_clock();	/* How long since we last checked for a stuck CSD lock.*/	ts_delta = ts2 - *ts1;	if (likely(ts_delta <= csd_lock_timeout_ns || csd_lock_timeout_ns == 0))		return false; 	firsttime = !*bug_id;	if (firsttime)		*bug_id = atomic_inc_return(&csd_bug_count);	cpu = csd_lock_wait_getcpu(csd);	if (WARN_ONCE(cpu < 0 || cpu >= nr_cpu_ids, "%s: cpu = %d\n", __func__, cpu))		cpux = 0;	else		cpux = cpu;	cpu_cur_csd = smp_load_acquire(&per_cpu(cur_csd, cpux)); /* Before func and info. */	/* How long since this CSD lock was stuck. */	ts_delta = ts2 - ts0;	pr_alert("csd: %s non-responsive CSD lock (#%d) on CPU#%d, waiting %llu ns for CPU#%02d %pS(%ps).\n",		 firsttime ? "Detected" : "Continued", *bug_id, raw_smp_processor_id(), ts_delta,		 cpu, csd->func, csd->info);	/*	 * If the CSD lock is still stuck after 5 minutes, it is unlikely	 * to become unstuck. Use a signed comparison to avoid triggering	 * on underflows when the TSC is out of sync between sockets.	 */	BUG_ON(panic_on_ipistall > 0 && (s64)ts_delta > ((s64)panic_on_ipistall * NSEC_PER_MSEC));	if (cpu_cur_csd && csd != cpu_cur_csd) {		pr_alert("\tcsd: CSD lock (#%d) handling prior %pS(%ps) request.\n",			 *bug_id, READ_ONCE(per_cpu(cur_csd_func, cpux)),			 READ_ONCE(per_cpu(cur_csd_info, cpux)));	} else {		pr_alert("\tcsd: CSD lock (#%d) %s.\n",			 *bug_id, !cpu_cur_csd ? "unresponsive" : "handling this request");	}	if (cpu >= 0) {		if (atomic_cmpxchg_acquire(&per_cpu(trigger_backtrace, cpu), 1, 0))			dump_cpu_task(cpu);		if (!cpu_cur_csd) {			pr_alert("csd: Re-sending CSD lock (#%d) IPI from CPU#%02d to CPU#%02d\n", *bug_id, raw_smp_processor_id(), cpu);			arch_send_call_function_single_ipi(cpu);		}	}	if (firsttime)		dump_stack();	*ts1 = ts2; 	return false;} /* * csd_lock/csd_unlock used to serialize access to per-cpu csd resources * * For non-synchronous ipi calls the csd can still be in use by the * previous function call. For multi-cpu calls its even more interesting * as we'll have to ensure no other cpu is observing our csd. */static void __csd_lock_wait(call_single_data_t *csd){	int bug_id = 0;	u64 ts0, ts1; 	ts1 = ts0 = sched_clock();	for (;;) {		if (csd_lock_wait_toolong(csd, ts0, &ts1, &bug_id))			break;		cpu_relax();	}	smp_acquire__after_ctrl_dep();} static __always_inline void csd_lock_wait(call_single_data_t *csd){	if (static_branch_unlikely(&csdlock_debug_enabled)) {		__csd_lock_wait(csd);		return;	} 	smp_cond_load_acquire(&csd->node.u_flags, !(VAL & CSD_FLAG_LOCK));}#elsestatic void csd_lock_record(call_single_data_t *csd){} static __always_inline void csd_lock_wait(call_single_data_t *csd){	smp_cond_load_acquire(&csd->node.u_flags, !(VAL & CSD_FLAG_LOCK));}#endif static __always_inline void csd_lock(call_single_data_t *csd){	csd_lock_wait(csd);	csd->node.u_flags |= CSD_FLAG_LOCK; 	/*	 * prevent CPU from reordering the above assignment	 * to ->flags with any subsequent assignments to other	 * fields of the specified call_single_data_t structure:	 */	smp_wmb();} static __always_inline void csd_unlock(call_single_data_t *csd){	WARN_ON(!(csd->node.u_flags & CSD_FLAG_LOCK)); 	/*	 * ensure we're all done before releasing data:	 */	smp_store_release(&csd->node.u_flags, 0);} static DEFINE_PER_CPU_SHARED_ALIGNED(call_single_data_t, csd_data); void __smp_call_single_queue(int cpu, struct llist_node *node){	/*	 * We have to check the type of the CSD before queueing it, because	 * once queued it can have its flags cleared by	 *   flush_smp_call_function_queue()	 * even if we haven't sent the smp_call IPI yet (e.g. the stopper	 * executes migration_cpu_stop() on the remote CPU).	 */	if (trace_csd_queue_cpu_enabled()) {		call_single_data_t *csd;		smp_call_func_t func; 		csd = container_of(node, call_single_data_t, node.llist);		func = CSD_TYPE(csd) == CSD_TYPE_TTWU ?			sched_ttwu_pending : csd->func; 		trace_csd_queue_cpu(cpu, _RET_IP_, func, csd);	} 	/*	 * The list addition should be visible to the target CPU when it pops	 * the head of the list to pull the entry off it in the IPI handler	 * because of normal cache coherency rules implied by the underlying	 * llist ops.	 *	 * If IPIs can go out of order to the cache coherency protocol	 * in an architecture, sufficient synchronisation should be added	 * to arch code to make it appear to obey cache coherency WRT	 * locking and barrier primitives. Generic code isn't really	 * equipped to do the right thing...	 */	if (llist_add(node, &per_cpu(call_single_queue, cpu)))		send_call_function_single_ipi(cpu);} /* * Insert a previously allocated call_single_data_t element * for execution on the given CPU. data must already have * ->func, ->info, and ->flags set. */static int generic_exec_single(int cpu, call_single_data_t *csd){	if (cpu == smp_processor_id()) {		smp_call_func_t func = csd->func;		void *info = csd->info;		unsigned long flags; 		/*		 * We can unlock early even for the synchronous on-stack case,		 * since we're doing this from the same CPU..		 */		csd_lock_record(csd);		csd_unlock(csd);		local_irq_save(flags);		csd_do_func(func, info, NULL);		csd_lock_record(NULL);		local_irq_restore(flags);		return 0;	} 	if ((unsigned)cpu >= nr_cpu_ids || !cpu_online(cpu)) {		csd_unlock(csd);		return -ENXIO;	} 	__smp_call_single_queue(cpu, &csd->node.llist); 	return 0;} /** * generic_smp_call_function_single_interrupt - Execute SMP IPI callbacks * * Invoked by arch to handle an IPI for call function single. * Must be called with interrupts disabled. */void generic_smp_call_function_single_interrupt(void){	__flush_smp_call_function_queue(true);} /** * __flush_smp_call_function_queue - Flush pending smp-call-function callbacks * * @warn_cpu_offline: If set to 'true', warn if callbacks were queued on an *		      offline CPU. Skip this check if set to 'false'. * * Flush any pending smp-call-function callbacks queued on this CPU. This is * invoked by the generic IPI handler, as well as by a CPU about to go offline, * to ensure that all pending IPI callbacks are run before it goes completely * offline. * * Loop through the call_single_queue and run all the queued callbacks. * Must be called with interrupts disabled. */static void __flush_smp_call_function_queue(bool warn_cpu_offline){	call_single_data_t *csd, *csd_next;	struct llist_node *entry, *prev;	struct llist_head *head;	static bool warned;	atomic_t *tbt; 	lockdep_assert_irqs_disabled(); 	/* Allow waiters to send backtrace NMI from here onwards */	tbt = this_cpu_ptr(&trigger_backtrace);	atomic_set_release(tbt, 1); 	head = this_cpu_ptr(&call_single_queue);	entry = llist_del_all(head);	entry = llist_reverse_order(entry); 	/* There shouldn't be any pending callbacks on an offline CPU. */	if (unlikely(warn_cpu_offline && !cpu_online(smp_processor_id()) &&		     !warned && entry != NULL)) {		warned = true;		WARN(1, "IPI on offline CPU %d\n", smp_processor_id()); 		/*		 * We don't have to use the _safe() variant here		 * because we are not invoking the IPI handlers yet.		 */		llist_for_each_entry(csd, entry, node.llist) {			switch (CSD_TYPE(csd)) {			case CSD_TYPE_ASYNC:			case CSD_TYPE_SYNC:			case CSD_TYPE_IRQ_WORK:				pr_warn("IPI callback %pS sent to offline CPU\n",					csd->func);				break; 			case CSD_TYPE_TTWU:				pr_warn("IPI task-wakeup sent to offline CPU\n");				break; 			default:				pr_warn("IPI callback, unknown type %d, sent to offline CPU\n",					CSD_TYPE(csd));				break;			}		}	} 	/*	 * First; run all SYNC callbacks, people are waiting for us.	 */	prev = NULL;	llist_for_each_entry_safe(csd, csd_next, entry, node.llist) {		/* Do we wait until *after* callback? */		if (CSD_TYPE(csd) == CSD_TYPE_SYNC) {

Lines 1–500 of 1125.