torture.c 60.9 KB
Newer Older
1
/*
2
 * Read-Copy Update module-based torture test facility
3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 *
18
 * Copyright (C) IBM Corporation, 2005, 2006
19 20
 *
 * Authors: Paul E. McKenney <paulmck@us.ibm.com>
21
 *	  Josh Triplett <josh@freedesktop.org>
22 23 24 25 26 27 28 29 30 31 32 33 34 35
 *
 * See also:  Documentation/RCU/torture.txt
 */
#include <linux/types.h>
#include <linux/kernel.h>
#include <linux/init.h>
#include <linux/module.h>
#include <linux/kthread.h>
#include <linux/err.h>
#include <linux/spinlock.h>
#include <linux/smp.h>
#include <linux/rcupdate.h>
#include <linux/interrupt.h>
#include <linux/sched.h>
A
Arun Sharma 已提交
36
#include <linux/atomic.h>
37 38 39 40 41
#include <linux/bitops.h>
#include <linux/completion.h>
#include <linux/moduleparam.h>
#include <linux/percpu.h>
#include <linux/notifier.h>
42
#include <linux/reboot.h>
43
#include <linux/freezer.h>
44 45 46
#include <linux/cpu.h>
#include <linux/delay.h>
#include <linux/stat.h>
47
#include <linux/srcu.h>
48
#include <linux/slab.h>
49
#include <linux/trace_clock.h>
50
#include <asm/byteorder.h>
51 52

MODULE_LICENSE("GPL");
53
MODULE_AUTHOR("Paul E. McKenney <paulmck@us.ibm.com> and Josh Triplett <josh@freedesktop.org>");
54

55 56 57 58 59 60
MODULE_ALIAS("rcutorture");
#ifdef MODULE_PARAM_PREFIX
#undef MODULE_PARAM_PREFIX
#endif
#define MODULE_PARAM_PREFIX "rcutorture."

61
static int fqs_duration;
62
module_param(fqs_duration, int, 0444);
63 64
MODULE_PARM_DESC(fqs_duration, "Duration of fqs bursts (us), 0 to disable");
static int fqs_holdoff;
65 66
module_param(fqs_holdoff, int, 0444);
MODULE_PARM_DESC(fqs_holdoff, "Holdoff time within fqs bursts (us)");
67
static int fqs_stutter = 3;
68 69
module_param(fqs_stutter, int, 0444);
MODULE_PARM_DESC(fqs_stutter, "Wait time between fqs bursts (s)");
70
static bool gp_exp;
71 72
module_param(gp_exp, bool, 0444);
MODULE_PARM_DESC(gp_exp, "Use expedited GP wait primitives");
73 74 75 76 77 78 79
static bool gp_normal;
module_param(gp_normal, bool, 0444);
MODULE_PARM_DESC(gp_normal, "Use normal (non-expedited) GP wait primitives");
static int irqreader = 1;
module_param(irqreader, int, 0444);
MODULE_PARM_DESC(irqreader, "Allow RCU readers from irq handlers");
static int n_barrier_cbs;
80 81
module_param(n_barrier_cbs, int, 0444);
MODULE_PARM_DESC(n_barrier_cbs, "# of callbacks/kthreads for barrier testing");
82 83 84 85 86 87 88
static int nfakewriters = 4;
module_param(nfakewriters, int, 0444);
MODULE_PARM_DESC(nfakewriters, "Number of RCU fake writer threads");
static int nreaders = -1;
module_param(nreaders, int, 0444);
MODULE_PARM_DESC(nreaders, "Number of RCU reader threads");
static int object_debug;
89 90
module_param(object_debug, int, 0444);
MODULE_PARM_DESC(object_debug, "Enable debug-object double call_rcu() testing");
91
static int onoff_holdoff;
92 93
module_param(onoff_holdoff, int, 0444);
MODULE_PARM_DESC(onoff_holdoff, "Time after boot before CPU hotplugs (s)");
94 95 96 97 98 99 100
static int onoff_interval;
module_param(onoff_interval, int, 0444);
MODULE_PARM_DESC(onoff_interval, "Time between CPU hotplugs (s), 0=disable");
static int shuffle_interval = 3;
module_param(shuffle_interval, int, 0444);
MODULE_PARM_DESC(shuffle_interval, "Number of seconds between shuffles");
static int shutdown_secs;
101
module_param(shutdown_secs, int, 0444);
102 103
MODULE_PARM_DESC(shutdown_secs, "Shutdown time (s), <= zero to disable.");
static int stall_cpu;
104 105
module_param(stall_cpu, int, 0444);
MODULE_PARM_DESC(stall_cpu, "Stall duration (s), zero to disable.");
106
static int stall_cpu_holdoff = 10;
107 108
module_param(stall_cpu_holdoff, int, 0444);
MODULE_PARM_DESC(stall_cpu_holdoff, "Time to wait before starting stall (s).");
109 110 111 112 113 114 115
static int stat_interval = 60;
module_param(stat_interval, int, 0644);
MODULE_PARM_DESC(stat_interval, "Number of seconds between stats printk()s");
static int stutter = 5;
module_param(stutter, int, 0444);
MODULE_PARM_DESC(stutter, "Number of seconds to run/halt test");
static int test_boost = 1;
116 117
module_param(test_boost, int, 0444);
MODULE_PARM_DESC(test_boost, "Test RCU prio boost: 0=no, 1=maybe, 2=yes.");
118
static int test_boost_duration = 4;
119 120
module_param(test_boost_duration, int, 0444);
MODULE_PARM_DESC(test_boost_duration, "Duration of each boost test, seconds.");
121 122 123 124 125 126 127
static int test_boost_interval = 7;
module_param(test_boost_interval, int, 0444);
MODULE_PARM_DESC(test_boost_interval, "Interval between boost tests, seconds.");
static bool test_no_idle_hz = true;
module_param(test_no_idle_hz, bool, 0444);
MODULE_PARM_DESC(test_no_idle_hz, "Test support for tickless idle CPUs");
static char *torture_type = "rcu";
128
module_param(torture_type, charp, 0444);
129 130 131 132
MODULE_PARM_DESC(torture_type, "Type of RCU to torture (rcu, rcu_bh, ...)");
static bool verbose;
module_param(verbose, bool, 0444);
MODULE_PARM_DESC(verbose, "Enable verbose debugging printk()s");
133 134

#define TORTURE_FLAG "-torture:"
135
#define PRINTK_STRING(s) \
136
	do { pr_alert("%s" TORTURE_FLAG s "\n", torture_type); } while (0)
137
#define VERBOSE_PRINTK_STRING(s) \
138
	do { if (verbose) pr_alert("%s" TORTURE_FLAG s "\n", torture_type); } while (0)
139
#define VERBOSE_PRINTK_ERRSTRING(s) \
140
	do { if (verbose) pr_alert("%s" TORTURE_FLAG "!!! " s "\n", torture_type); } while (0)
141 142 143 144 145

static char printk_buf[4096];

static int nrealreaders;
static struct task_struct *writer_task;
146
static struct task_struct **fakewriter_tasks;
147 148
static struct task_struct **reader_tasks;
static struct task_struct *stats_task;
149
static struct task_struct *shuffler_task;
150
static struct task_struct *stutter_task;
151
static struct task_struct *fqs_task;
152
static struct task_struct *boost_tasks[NR_CPUS];
153
static struct task_struct *shutdown_task;
154 155 156
#ifdef CONFIG_HOTPLUG_CPU
static struct task_struct *onoff_task;
#endif /* #ifdef CONFIG_HOTPLUG_CPU */
157
static struct task_struct *stall_task;
158 159
static struct task_struct **barrier_cbs_tasks;
static struct task_struct *barrier_task;
160 161 162 163 164 165 166

#define RCU_TORTURE_PIPE_LEN 10

struct rcu_torture {
	struct rcu_head rtort_rcu;
	int rtort_pipe_count;
	struct list_head rtort_free;
167
	int rtort_mbtest;
168 169 170
};

static LIST_HEAD(rcu_torture_freelist);
171
static struct rcu_torture __rcu *rcu_torture_current;
172
static unsigned long rcu_torture_current_version;
173 174 175 176 177 178 179
static struct rcu_torture rcu_tortures[10 * RCU_TORTURE_PIPE_LEN];
static DEFINE_SPINLOCK(rcu_torture_lock);
static DEFINE_PER_CPU(long [RCU_TORTURE_PIPE_LEN + 1], rcu_torture_count) =
	{ 0 };
static DEFINE_PER_CPU(long [RCU_TORTURE_PIPE_LEN + 1], rcu_torture_batch) =
	{ 0 };
static atomic_t rcu_torture_wcount[RCU_TORTURE_PIPE_LEN + 1];
180 181 182 183 184
static atomic_t n_rcu_torture_alloc;
static atomic_t n_rcu_torture_alloc_fail;
static atomic_t n_rcu_torture_free;
static atomic_t n_rcu_torture_mberror;
static atomic_t n_rcu_torture_error;
185
static long n_rcu_torture_barrier_error;
186 187 188 189
static long n_rcu_torture_boost_ktrerror;
static long n_rcu_torture_boost_rterror;
static long n_rcu_torture_boost_failure;
static long n_rcu_torture_boosts;
190
static long n_rcu_torture_timers;
191 192
static long n_offline_attempts;
static long n_offline_successes;
193 194 195
static unsigned long sum_offline;
static int min_offline = -1;
static int max_offline;
196 197
static long n_online_attempts;
static long n_online_successes;
198 199 200
static unsigned long sum_online;
static int min_online = -1;
static int max_online;
201 202
static long n_barrier_attempts;
static long n_barrier_successes;
203
static struct list_head rcu_torture_removed;
R
Rusty Russell 已提交
204
static cpumask_var_t shuffle_tmp_mask;
205

206
static int stutter_pause_test;
207

208 209 210 211 212 213
#if defined(MODULE) || defined(CONFIG_RCU_TORTURE_TEST_RUNNABLE)
#define RCUTORTURE_RUNNABLE_INIT 1
#else
#define RCUTORTURE_RUNNABLE_INIT 0
#endif
int rcutorture_runnable = RCUTORTURE_RUNNABLE_INIT;
214 215
module_param(rcutorture_runnable, int, 0444);
MODULE_PARM_DESC(rcutorture_runnable, "Start rcutorture at boot");
216

217
#if defined(CONFIG_RCU_BOOST) && !defined(CONFIG_HOTPLUG_CPU)
218
#define rcu_can_boost() 1
219
#else /* #if defined(CONFIG_RCU_BOOST) && !defined(CONFIG_HOTPLUG_CPU) */
220
#define rcu_can_boost() 0
221
#endif /* #else #if defined(CONFIG_RCU_BOOST) && !defined(CONFIG_HOTPLUG_CPU) */
222

223 224 225 226 227 228 229 230 231 232 233 234 235 236
#ifdef CONFIG_RCU_TRACE
static u64 notrace rcu_trace_clock_local(void)
{
	u64 ts = trace_clock_local();
	unsigned long __maybe_unused ts_rem = do_div(ts, NSEC_PER_USEC);
	return ts;
}
#else /* #ifdef CONFIG_RCU_TRACE */
static u64 notrace rcu_trace_clock_local(void)
{
	return 0ULL;
}
#endif /* #else #ifdef CONFIG_RCU_TRACE */

237
static unsigned long shutdown_time;	/* jiffies to system shutdown. */
238 239 240
static unsigned long boost_starttime;	/* jiffies of next boost test start. */
DEFINE_MUTEX(boost_mutex);		/* protect setting boost_starttime */
					/*  and boost task create/destroy. */
241
static atomic_t barrier_cbs_count;	/* Barrier callbacks registered. */
242
static bool barrier_phase;		/* Test phase. */
243 244 245
static atomic_t barrier_cbs_invoked;	/* Barrier callbacks invoked. */
static wait_queue_head_t *barrier_cbs_wq; /* Coordinate barrier testing. */
static DECLARE_WAIT_QUEUE_HEAD(barrier_wq);
246

247 248 249 250 251 252
/* Mediate rmmod and system shutdown.  Concurrent rmmod & shutdown illegal! */

#define FULLSTOP_DONTSTOP 0	/* Normal operation. */
#define FULLSTOP_SHUTDOWN 1	/* System shutdown with rcutorture running. */
#define FULLSTOP_RMMOD    2	/* Normal rmmod of rcutorture. */
static int fullstop = FULLSTOP_RMMOD;
253 254 255 256
/*
 * Protect fullstop transitions and spawning of kthreads.
 */
static DEFINE_MUTEX(fullstop_mutex);
257

258 259 260
/* Forward reference. */
static void rcu_torture_cleanup(void);

261
/*
262
 * Detect and respond to a system shutdown.
263 264 265 266 267
 */
static int
rcutorture_shutdown_notify(struct notifier_block *unused1,
			   unsigned long unused2, void *unused3)
{
P
Paul E. McKenney 已提交
268
	mutex_lock(&fullstop_mutex);
269
	if (fullstop == FULLSTOP_DONTSTOP)
P
Paul E. McKenney 已提交
270
		fullstop = FULLSTOP_SHUTDOWN;
271
	else
272
		pr_warn(/* but going down anyway, so... */
273
		       "Concurrent 'rmmod rcutorture' and shutdown illegal!\n");
P
Paul E. McKenney 已提交
274
	mutex_unlock(&fullstop_mutex);
275 276 277
	return NOTIFY_DONE;
}

278 279 280 281
/*
 * Absorb kthreads into a kernel function that won't return, so that
 * they won't ever access module text or data again.
 */
282
static void rcutorture_shutdown_absorb(const char *title)
283 284
{
	if (ACCESS_ONCE(fullstop) == FULLSTOP_SHUTDOWN) {
285
		pr_notice(
286 287 288 289 290 291
		       "rcutorture thread %s parking due to system shutdown\n",
		       title);
		schedule_timeout_uninterruptible(MAX_SCHEDULE_TIMEOUT);
	}
}

292 293 294
/*
 * Allocate an element from the rcu_tortures pool.
 */
A
Adrian Bunk 已提交
295
static struct rcu_torture *
296 297 298 299
rcu_torture_alloc(void)
{
	struct list_head *p;

300
	spin_lock_bh(&rcu_torture_lock);
301 302
	if (list_empty(&rcu_torture_freelist)) {
		atomic_inc(&n_rcu_torture_alloc_fail);
303
		spin_unlock_bh(&rcu_torture_lock);
304 305 306 307 308
		return NULL;
	}
	atomic_inc(&n_rcu_torture_alloc);
	p = rcu_torture_freelist.next;
	list_del_init(p);
309
	spin_unlock_bh(&rcu_torture_lock);
310 311 312 313 314 315 316 317 318 319
	return container_of(p, struct rcu_torture, rtort_free);
}

/*
 * Free an element to the rcu_tortures pool.
 */
static void
rcu_torture_free(struct rcu_torture *p)
{
	atomic_inc(&n_rcu_torture_free);
320
	spin_lock_bh(&rcu_torture_lock);
321
	list_add_tail(&p->rtort_free, &rcu_torture_freelist);
322
	spin_unlock_bh(&rcu_torture_lock);
323 324 325 326
}

struct rcu_random_state {
	unsigned long rrs_state;
327
	long rrs_count;
328 329 330 331 332 333 334 335 336 337
};

#define RCU_RANDOM_MULT 39916801  /* prime */
#define RCU_RANDOM_ADD	479001701 /* prime */
#define RCU_RANDOM_REFRESH 10000

#define DEFINE_RCU_RANDOM(name) struct rcu_random_state name = { 0, 0 }

/*
 * Crude but fast random-number generator.  Uses a linear congruential
338
 * generator, with occasional help from cpu_clock().
339
 */
340
static unsigned long
341 342 343
rcu_random(struct rcu_random_state *rrsp)
{
	if (--rrsp->rrs_count < 0) {
344
		rrsp->rrs_state += (unsigned long)local_clock();
345 346 347 348 349 350
		rrsp->rrs_count = RCU_RANDOM_REFRESH;
	}
	rrsp->rrs_state = rrsp->rrs_state * RCU_RANDOM_MULT + RCU_RANDOM_ADD;
	return swahw32(rrsp->rrs_state);
}

351
static void
352
rcu_stutter_wait(const char *title)
353
{
354
	while (stutter_pause_test || !rcutorture_runnable) {
355 356 357
		if (rcutorture_runnable)
			schedule_timeout_interruptible(1);
		else
358
			schedule_timeout_interruptible(round_jiffies_relative(HZ));
359
		rcutorture_shutdown_absorb(title);
360
	}
361 362
}

363 364 365 366 367 368 369
/*
 * Operations vector for selecting different types of tests.
 */

struct rcu_torture_ops {
	void (*init)(void);
	int (*readlock)(void);
370
	void (*read_delay)(struct rcu_random_state *rrsp);
371 372
	void (*readunlock)(int idx);
	int (*completed)(void);
373
	void (*deferred_free)(struct rcu_torture *p);
374
	void (*sync)(void);
375
	void (*exp_sync)(void);
376
	void (*call)(struct rcu_head *head, void (*func)(struct rcu_head *rcu));
377
	void (*cb_barrier)(void);
378
	void (*fqs)(void);
379
	int (*stats)(char *page);
380
	int irq_capable;
381
	int can_boost;
382
	const char *name;
383
};
384 385

static struct rcu_torture_ops *cur_ops;
386 387 388 389 390

/*
 * Definitions for rcu torture testing.
 */

391
static int rcu_torture_read_lock(void) __acquires(RCU)
392 393 394 395 396
{
	rcu_read_lock();
	return 0;
}

397 398
static void rcu_read_delay(struct rcu_random_state *rrsp)
{
399 400
	const unsigned long shortdelay_us = 200;
	const unsigned long longdelay_ms = 50;
401

402 403 404
	/* We want a short delay sometimes to make a reader delay the grace
	 * period, and we want a long delay occasionally to trigger
	 * force_quiescent_state. */
405

406 407 408 409
	if (!(rcu_random(rrsp) % (nrealreaders * 2000 * longdelay_ms)))
		mdelay(longdelay_ms);
	if (!(rcu_random(rrsp) % (nrealreaders * 2 * shortdelay_us)))
		udelay(shortdelay_us);
410 411 412 413
#ifdef CONFIG_PREEMPT
	if (!preempt_count() && !(rcu_random(rrsp) % (nrealreaders * 20000)))
		preempt_schedule();  /* No QS if preempt_disable() in effect */
#endif
414 415
}

416
static void rcu_torture_read_unlock(int idx) __releases(RCU)
417 418 419 420 421 422 423 424 425 426 427 428 429 430 431
{
	rcu_read_unlock();
}

static int rcu_torture_completed(void)
{
	return rcu_batches_completed();
}

static void
rcu_torture_cb(struct rcu_head *p)
{
	int i;
	struct rcu_torture *rp = container_of(p, struct rcu_torture, rtort_rcu);

432
	if (fullstop != FULLSTOP_DONTSTOP) {
433 434 435 436 437 438 439 440 441 442 443
		/* Test is ending, just drop callbacks on the floor. */
		/* The next initialization will pick up the pieces. */
		return;
	}
	i = rp->rtort_pipe_count;
	if (i > RCU_TORTURE_PIPE_LEN)
		i = RCU_TORTURE_PIPE_LEN;
	atomic_inc(&rcu_torture_wcount[i]);
	if (++rp->rtort_pipe_count >= RCU_TORTURE_PIPE_LEN) {
		rp->rtort_mbtest = 0;
		rcu_torture_free(rp);
444
	} else {
445
		cur_ops->deferred_free(rp);
446
	}
447 448
}

449 450 451 452 453
static int rcu_no_completed(void)
{
	return 0;
}

454 455 456 457 458
static void rcu_torture_deferred_free(struct rcu_torture *p)
{
	call_rcu(&p->rtort_rcu, rcu_torture_cb);
}

459 460 461 462 463
static void rcu_sync_torture_init(void)
{
	INIT_LIST_HEAD(&rcu_torture_removed);
}

464
static struct rcu_torture_ops rcu_ops = {
465 466 467 468 469
	.init		= rcu_sync_torture_init,
	.readlock	= rcu_torture_read_lock,
	.read_delay	= rcu_read_delay,
	.readunlock	= rcu_torture_read_unlock,
	.completed	= rcu_torture_completed,
470
	.deferred_free	= rcu_torture_deferred_free,
471
	.sync		= synchronize_rcu,
472 473 474
	.exp_sync	= synchronize_rcu_expedited,
	.call		= call_rcu,
	.cb_barrier	= rcu_barrier,
475
	.fqs		= rcu_force_quiescent_state,
476 477
	.stats		= NULL,
	.irq_capable	= 1,
478
	.can_boost	= rcu_can_boost(),
479
	.name		= "rcu"
480 481
};

482 483 484 485
/*
 * Definitions for rcu_bh torture testing.
 */

486
static int rcu_bh_torture_read_lock(void) __acquires(RCU_BH)
487 488 489 490 491
{
	rcu_read_lock_bh();
	return 0;
}

492
static void rcu_bh_torture_read_unlock(int idx) __releases(RCU_BH)
493 494 495 496 497 498 499 500 501 502 503 504 505 506 507
{
	rcu_read_unlock_bh();
}

static int rcu_bh_torture_completed(void)
{
	return rcu_batches_completed_bh();
}

static void rcu_bh_torture_deferred_free(struct rcu_torture *p)
{
	call_rcu_bh(&p->rtort_rcu, rcu_torture_cb);
}

static struct rcu_torture_ops rcu_bh_ops = {
508
	.init		= rcu_sync_torture_init,
509 510 511 512 513
	.readlock	= rcu_bh_torture_read_lock,
	.read_delay	= rcu_read_delay,  /* just reuse rcu's version. */
	.readunlock	= rcu_bh_torture_read_unlock,
	.completed	= rcu_bh_torture_completed,
	.deferred_free	= rcu_bh_torture_deferred_free,
514
	.sync		= synchronize_rcu_bh,
515
	.exp_sync	= synchronize_rcu_bh_expedited,
516
	.call		= call_rcu_bh,
517
	.cb_barrier	= rcu_barrier_bh,
518
	.fqs		= rcu_bh_force_quiescent_state,
519 520 521
	.stats		= NULL,
	.irq_capable	= 1,
	.name		= "rcu_bh"
522 523
};

524 525 526 527
/*
 * Definitions for srcu torture testing.
 */

528
DEFINE_STATIC_SRCU(srcu_ctl);
529

530
static int srcu_torture_read_lock(void) __acquires(&srcu_ctl)
531 532 533 534 535 536 537 538 539 540 541 542 543 544 545
{
	return srcu_read_lock(&srcu_ctl);
}

static void srcu_read_delay(struct rcu_random_state *rrsp)
{
	long delay;
	const long uspertick = 1000000 / HZ;
	const long longdelay = 10;

	/* We want there to be long-running readers, but not all the time. */

	delay = rcu_random(rrsp) % (nrealreaders * 2 * longdelay * uspertick);
	if (!delay)
		schedule_timeout_interruptible(longdelay);
546 547
	else
		rcu_read_delay(rrsp);
548 549
}

550
static void srcu_torture_read_unlock(int idx) __releases(&srcu_ctl)
551 552 553 554 555 556 557 558 559
{
	srcu_read_unlock(&srcu_ctl, idx);
}

static int srcu_torture_completed(void)
{
	return srcu_batches_completed(&srcu_ctl);
}

560 561 562 563 564
static void srcu_torture_deferred_free(struct rcu_torture *rp)
{
	call_srcu(&srcu_ctl, &rp->rtort_rcu, rcu_torture_cb);
}

565 566 567 568 569
static void srcu_torture_synchronize(void)
{
	synchronize_srcu(&srcu_ctl);
}

570 571 572 573 574 575 576 577 578 579 580
static void srcu_torture_call(struct rcu_head *head,
			      void (*func)(struct rcu_head *head))
{
	call_srcu(&srcu_ctl, head, func);
}

static void srcu_torture_barrier(void)
{
	srcu_barrier(&srcu_ctl);
}

581 582 583 584 585 586 587 588 589
static int srcu_torture_stats(char *page)
{
	int cnt = 0;
	int cpu;
	int idx = srcu_ctl.completed & 0x1;

	cnt += sprintf(&page[cnt], "%s%s per-CPU(idx=%d):",
		       torture_type, TORTURE_FLAG, idx);
	for_each_possible_cpu(cpu) {
590
		cnt += sprintf(&page[cnt], " %d(%lu,%lu)", cpu,
591 592 593 594 595 596 597
			       per_cpu_ptr(srcu_ctl.per_cpu_ref, cpu)->c[!idx],
			       per_cpu_ptr(srcu_ctl.per_cpu_ref, cpu)->c[idx]);
	}
	cnt += sprintf(&page[cnt], "\n");
	return cnt;
}

598 599 600 601 602
static void srcu_torture_synchronize_expedited(void)
{
	synchronize_srcu_expedited(&srcu_ctl);
}

603
static struct rcu_torture_ops srcu_ops = {
604
	.init		= rcu_sync_torture_init,
605 606 607 608
	.readlock	= srcu_torture_read_lock,
	.read_delay	= srcu_read_delay,
	.readunlock	= srcu_torture_read_unlock,
	.completed	= srcu_torture_completed,
609
	.deferred_free	= srcu_torture_deferred_free,
610
	.sync		= srcu_torture_synchronize,
611
	.exp_sync	= srcu_torture_synchronize_expedited,
612 613
	.call		= srcu_torture_call,
	.cb_barrier	= srcu_torture_barrier,
614 615
	.stats		= srcu_torture_stats,
	.name		= "srcu"
616 617
};

618 619 620 621 622 623 624 625 626 627 628 629 630 631 632
/*
 * Definitions for sched torture testing.
 */

static int sched_torture_read_lock(void)
{
	preempt_disable();
	return 0;
}

static void sched_torture_read_unlock(int idx)
{
	preempt_enable();
}

633 634 635 636 637
static void rcu_sched_torture_deferred_free(struct rcu_torture *p)
{
	call_rcu_sched(&p->rtort_rcu, rcu_torture_cb);
}

638
static struct rcu_torture_ops sched_ops = {
639 640 641 642
	.init		= rcu_sync_torture_init,
	.readlock	= sched_torture_read_lock,
	.read_delay	= rcu_read_delay,  /* just reuse rcu's version. */
	.readunlock	= sched_torture_read_unlock,
643
	.completed	= rcu_no_completed,
644
	.deferred_free	= rcu_sched_torture_deferred_free,
645
	.sync		= synchronize_sched,
646 647
	.exp_sync	= synchronize_sched_expedited,
	.call		= call_rcu_sched,
648
	.cb_barrier	= rcu_barrier_sched,
649
	.fqs		= rcu_sched_force_quiescent_state,
650 651 652
	.stats		= NULL,
	.irq_capable	= 1,
	.name		= "sched"
653 654
};

655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692
/*
 * RCU torture priority-boost testing.  Runs one real-time thread per
 * CPU for moderate bursts, repeatedly registering RCU callbacks and
 * spinning waiting for them to be invoked.  If a given callback takes
 * too long to be invoked, we assume that priority inversion has occurred.
 */

struct rcu_boost_inflight {
	struct rcu_head rcu;
	int inflight;
};

static void rcu_torture_boost_cb(struct rcu_head *head)
{
	struct rcu_boost_inflight *rbip =
		container_of(head, struct rcu_boost_inflight, rcu);

	smp_mb(); /* Ensure RCU-core accesses precede clearing ->inflight */
	rbip->inflight = 0;
}

static int rcu_torture_boost(void *arg)
{
	unsigned long call_rcu_time;
	unsigned long endtime;
	unsigned long oldstarttime;
	struct rcu_boost_inflight rbi = { .inflight = 0 };
	struct sched_param sp;

	VERBOSE_PRINTK_STRING("rcu_torture_boost started");

	/* Set real-time priority. */
	sp.sched_priority = 1;
	if (sched_setscheduler(current, SCHED_FIFO, &sp) < 0) {
		VERBOSE_PRINTK_STRING("rcu_torture_boost RT prio failed!");
		n_rcu_torture_boost_rterror++;
	}

693
	init_rcu_head_on_stack(&rbi.rcu);
694 695 696 697
	/* Each pass through the following loop does one boost-test cycle. */
	do {
		/* Wait for the next test interval. */
		oldstarttime = boost_starttime;
698
		while (ULONG_CMP_LT(jiffies, oldstarttime)) {
699
			schedule_timeout_interruptible(oldstarttime - jiffies);
700 701 702 703 704 705 706 707 708
			rcu_stutter_wait("rcu_torture_boost");
			if (kthread_should_stop() ||
			    fullstop != FULLSTOP_DONTSTOP)
				goto checkwait;
		}

		/* Do one boost-test interval. */
		endtime = oldstarttime + test_boost_duration * HZ;
		call_rcu_time = jiffies;
709
		while (ULONG_CMP_LT(jiffies, endtime)) {
710 711 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732 733 734 735
			/* If we don't have a callback in flight, post one. */
			if (!rbi.inflight) {
				smp_mb(); /* RCU core before ->inflight = 1. */
				rbi.inflight = 1;
				call_rcu(&rbi.rcu, rcu_torture_boost_cb);
				if (jiffies - call_rcu_time >
					 test_boost_duration * HZ - HZ / 2) {
					VERBOSE_PRINTK_STRING("rcu_torture_boost boosting failed");
					n_rcu_torture_boost_failure++;
				}
				call_rcu_time = jiffies;
			}
			cond_resched();
			rcu_stutter_wait("rcu_torture_boost");
			if (kthread_should_stop() ||
			    fullstop != FULLSTOP_DONTSTOP)
				goto checkwait;
		}

		/*
		 * Set the start time of the next test interval.
		 * Yes, this is vulnerable to long delays, but such
		 * delays simply cause a false negative for the next
		 * interval.  Besides, we are running at RT priority,
		 * so delays should be relatively rare.
		 */
736 737
		while (oldstarttime == boost_starttime &&
		       !kthread_should_stop()) {
738 739 740 741 742 743 744 745 746 747 748 749 750 751 752 753 754 755 756 757
			if (mutex_trylock(&boost_mutex)) {
				boost_starttime = jiffies +
						  test_boost_interval * HZ;
				n_rcu_torture_boosts++;
				mutex_unlock(&boost_mutex);
				break;
			}
			schedule_timeout_uninterruptible(1);
		}

		/* Go do the stutter. */
checkwait:	rcu_stutter_wait("rcu_torture_boost");
	} while (!kthread_should_stop() && fullstop  == FULLSTOP_DONTSTOP);

	/* Clean up and exit. */
	VERBOSE_PRINTK_STRING("rcu_torture_boost task stopping");
	rcutorture_shutdown_absorb("rcu_torture_boost");
	while (!kthread_should_stop() || rbi.inflight)
		schedule_timeout_uninterruptible(1);
	smp_mb(); /* order accesses to ->inflight before stack-frame death. */
758
	destroy_rcu_head_on_stack(&rbi.rcu);
759 760 761
	return 0;
}

762 763 764 765 766 767 768 769 770 771 772 773 774 775
/*
 * RCU torture force-quiescent-state kthread.  Repeatedly induces
 * bursts of calls to force_quiescent_state(), increasing the probability
 * of occurrence of some important types of race conditions.
 */
static int
rcu_torture_fqs(void *arg)
{
	unsigned long fqs_resume_time;
	int fqs_burst_remaining;

	VERBOSE_PRINTK_STRING("rcu_torture_fqs task started");
	do {
		fqs_resume_time = jiffies + fqs_stutter * HZ;
776 777
		while (ULONG_CMP_LT(jiffies, fqs_resume_time) &&
		       !kthread_should_stop()) {
778 779 780
			schedule_timeout_interruptible(1);
		}
		fqs_burst_remaining = fqs_duration;
781 782
		while (fqs_burst_remaining > 0 &&
		       !kthread_should_stop()) {
783 784 785 786 787 788 789 790 791 792 793 794 795
			cur_ops->fqs();
			udelay(fqs_holdoff);
			fqs_burst_remaining -= fqs_holdoff;
		}
		rcu_stutter_wait("rcu_torture_fqs");
	} while (!kthread_should_stop() && fullstop == FULLSTOP_DONTSTOP);
	VERBOSE_PRINTK_STRING("rcu_torture_fqs task stopping");
	rcutorture_shutdown_absorb("rcu_torture_fqs");
	while (!kthread_should_stop())
		schedule_timeout_uninterruptible(1);
	return 0;
}

796 797 798 799 800 801 802 803
/*
 * RCU torture writer kthread.  Repeatedly substitutes a new structure
 * for that pointed to by rcu_torture_current, freeing the old structure
 * after a series of grace periods (the "pipeline").
 */
static int
rcu_torture_writer(void *arg)
{
804
	bool exp;
805 806
	int i;
	struct rcu_torture *rp;
807
	struct rcu_torture *rp1;
808 809 810 811
	struct rcu_torture *old_rp;
	static DEFINE_RCU_RANDOM(rand);

	VERBOSE_PRINTK_STRING("rcu_torture_writer task started");
812 813
	set_user_nice(current, 19);

814 815
	do {
		schedule_timeout_uninterruptible(1);
816 817
		rp = rcu_torture_alloc();
		if (rp == NULL)
818 819 820
			continue;
		rp->rtort_pipe_count = 0;
		udelay(rcu_random(&rand) & 0x3ff);
821 822
		old_rp = rcu_dereference_check(rcu_torture_current,
					       current == writer_task);
823
		rp->rtort_mbtest = 1;
824
		rcu_assign_pointer(rcu_torture_current, rp);
825
		smp_wmb(); /* Mods to old_rp must follow rcu_assign_pointer() */
826
		if (old_rp) {
827 828 829 830 831
			i = old_rp->rtort_pipe_count;
			if (i > RCU_TORTURE_PIPE_LEN)
				i = RCU_TORTURE_PIPE_LEN;
			atomic_inc(&rcu_torture_wcount[i]);
			old_rp->rtort_pipe_count++;
832 833 834 835 836 837 838 839 840 841 842 843 844 845 846 847 848 849 850 851 852 853 854 855 856
			if (gp_normal == gp_exp)
				exp = !!(rcu_random(&rand) & 0x80);
			else
				exp = gp_exp;
			if (!exp) {
				cur_ops->deferred_free(old_rp);
			} else {
				cur_ops->exp_sync();
				list_add(&old_rp->rtort_free,
					 &rcu_torture_removed);
				list_for_each_entry_safe(rp, rp1,
							 &rcu_torture_removed,
							 rtort_free) {
					i = rp->rtort_pipe_count;
					if (i > RCU_TORTURE_PIPE_LEN)
						i = RCU_TORTURE_PIPE_LEN;
					atomic_inc(&rcu_torture_wcount[i]);
					if (++rp->rtort_pipe_count >=
					    RCU_TORTURE_PIPE_LEN) {
						rp->rtort_mbtest = 0;
						list_del(&rp->rtort_free);
						rcu_torture_free(rp);
					}
				 }
			}
857
		}
858
		rcutorture_record_progress(++rcu_torture_current_version);
859 860
		rcu_stutter_wait("rcu_torture_writer");
	} while (!kthread_should_stop() && fullstop == FULLSTOP_DONTSTOP);
861
	VERBOSE_PRINTK_STRING("rcu_torture_writer task stopping");
862 863
	rcutorture_shutdown_absorb("rcu_torture_writer");
	while (!kthread_should_stop())
864 865 866 867
		schedule_timeout_uninterruptible(1);
	return 0;
}

868 869 870 871 872 873 874 875 876 877 878 879 880 881 882
/*
 * RCU torture fake writer kthread.  Repeatedly calls sync, with a random
 * delay between calls.
 */
static int
rcu_torture_fakewriter(void *arg)
{
	DEFINE_RCU_RANDOM(rand);

	VERBOSE_PRINTK_STRING("rcu_torture_fakewriter task started");
	set_user_nice(current, 19);

	do {
		schedule_timeout_uninterruptible(1 + rcu_random(&rand)%10);
		udelay(rcu_random(&rand) & 0x3ff);
883
		if (cur_ops->cb_barrier != NULL &&
884
		    rcu_random(&rand) % (nfakewriters * 8) == 0) {
885
			cur_ops->cb_barrier();
886 887 888 889 890 891
		} else if (gp_normal == gp_exp) {
			if (rcu_random(&rand) & 0x80)
				cur_ops->sync();
			else
				cur_ops->exp_sync();
		} else if (gp_normal) {
892
			cur_ops->sync();
893 894 895
		} else {
			cur_ops->exp_sync();
		}
896 897
		rcu_stutter_wait("rcu_torture_fakewriter");
	} while (!kthread_should_stop() && fullstop == FULLSTOP_DONTSTOP);
898 899

	VERBOSE_PRINTK_STRING("rcu_torture_fakewriter task stopping");
900 901
	rcutorture_shutdown_absorb("rcu_torture_fakewriter");
	while (!kthread_should_stop())
902 903 904 905
		schedule_timeout_uninterruptible(1);
	return 0;
}

906 907 908 909 910 911 912 913 914 915 916
void rcutorture_trace_dump(void)
{
	static atomic_t beenhere = ATOMIC_INIT(0);

	if (atomic_read(&beenhere))
		return;
	if (atomic_xchg(&beenhere, 1) != 0)
		return;
	ftrace_dump(DUMP_ALL);
}

917 918 919 920 921 922 923 924 925 926
/*
 * RCU torture reader from timer handler.  Dereferences rcu_torture_current,
 * incrementing the corresponding element of the pipeline array.  The
 * counter in the element should never be greater than 1, otherwise, the
 * RCU implementation is broken.
 */
static void rcu_torture_timer(unsigned long unused)
{
	int idx;
	int completed;
927
	int completed_end;
928 929 930 931
	static DEFINE_RCU_RANDOM(rand);
	static DEFINE_SPINLOCK(rand_lock);
	struct rcu_torture *p;
	int pipe_count;
932
	unsigned long long ts;
933 934 935

	idx = cur_ops->readlock();
	completed = cur_ops->completed();
936
	ts = rcu_trace_clock_local();
937 938 939 940
	p = rcu_dereference_check(rcu_torture_current,
				  rcu_read_lock_bh_held() ||
				  rcu_read_lock_sched_held() ||
				  srcu_read_lock_held(&srcu_ctl));
941 942 943 944 945 946 947 948
	if (p == NULL) {
		/* Leave because rcu_torture_writer is not yet underway */
		cur_ops->readunlock(idx);
		return;
	}
	if (p->rtort_mbtest == 0)
		atomic_inc(&n_rcu_torture_mberror);
	spin_lock(&rand_lock);
949
	cur_ops->read_delay(&rand);
950 951 952 953 954 955 956 957
	n_rcu_torture_timers++;
	spin_unlock(&rand_lock);
	preempt_disable();
	pipe_count = p->rtort_pipe_count;
	if (pipe_count > RCU_TORTURE_PIPE_LEN) {
		/* Should not happen, but... */
		pipe_count = RCU_TORTURE_PIPE_LEN;
	}
958 959 960 961
	completed_end = cur_ops->completed();
	if (pipe_count > 1) {
		do_trace_rcu_torture_read(cur_ops->name, &p->rtort_rcu, ts,
					  completed, completed_end);
962
		rcutorture_trace_dump();
963
	}
R
Rusty Russell 已提交
964
	__this_cpu_inc(rcu_torture_count[pipe_count]);
965
	completed = completed_end - completed;
966 967 968 969
	if (completed > RCU_TORTURE_PIPE_LEN) {
		/* Should not happen, but... */
		completed = RCU_TORTURE_PIPE_LEN;
	}
R
Rusty Russell 已提交
970
	__this_cpu_inc(rcu_torture_batch[completed]);
971 972 973 974
	preempt_enable();
	cur_ops->readunlock(idx);
}

975 976 977 978 979 980 981 982 983 984
/*
 * RCU torture reader kthread.  Repeatedly dereferences rcu_torture_current,
 * incrementing the corresponding element of the pipeline array.  The
 * counter in the element should never be greater than 1, otherwise, the
 * RCU implementation is broken.
 */
static int
rcu_torture_reader(void *arg)
{
	int completed;
985
	int completed_end;
986
	int idx;
987 988 989
	DEFINE_RCU_RANDOM(rand);
	struct rcu_torture *p;
	int pipe_count;
990
	struct timer_list t;
991
	unsigned long long ts;
992 993

	VERBOSE_PRINTK_STRING("rcu_torture_reader task started");
994
	set_user_nice(current, 19);
995
	if (irqreader && cur_ops->irq_capable)
996
		setup_timer_on_stack(&t, rcu_torture_timer, 0);
997

998
	do {
999
		if (irqreader && cur_ops->irq_capable) {
1000
			if (!timer_pending(&t))
1001
				mod_timer(&t, jiffies + 1);
1002
		}
1003 1004
		idx = cur_ops->readlock();
		completed = cur_ops->completed();
1005
		ts = rcu_trace_clock_local();
1006 1007 1008 1009
		p = rcu_dereference_check(rcu_torture_current,
					  rcu_read_lock_bh_held() ||
					  rcu_read_lock_sched_held() ||
					  srcu_read_lock_held(&srcu_ctl));
1010 1011
		if (p == NULL) {
			/* Wait for rcu_torture_writer to get underway */
1012
			cur_ops->readunlock(idx);
1013 1014 1015
			schedule_timeout_interruptible(HZ);
			continue;
		}
1016 1017
		if (p->rtort_mbtest == 0)
			atomic_inc(&n_rcu_torture_mberror);
1018
		cur_ops->read_delay(&rand);
1019 1020 1021 1022 1023 1024
		preempt_disable();
		pipe_count = p->rtort_pipe_count;
		if (pipe_count > RCU_TORTURE_PIPE_LEN) {
			/* Should not happen, but... */
			pipe_count = RCU_TORTURE_PIPE_LEN;
		}
1025 1026 1027 1028
		completed_end = cur_ops->completed();
		if (pipe_count > 1) {
			do_trace_rcu_torture_read(cur_ops->name, &p->rtort_rcu,
						  ts, completed, completed_end);
1029
			rcutorture_trace_dump();
1030
		}
R
Rusty Russell 已提交
1031
		__this_cpu_inc(rcu_torture_count[pipe_count]);
1032
		completed = completed_end - completed;
1033 1034 1035 1036
		if (completed > RCU_TORTURE_PIPE_LEN) {
			/* Should not happen, but... */
			completed = RCU_TORTURE_PIPE_LEN;
		}
R
Rusty Russell 已提交
1037
		__this_cpu_inc(rcu_torture_batch[completed]);
1038
		preempt_enable();
1039
		cur_ops->readunlock(idx);
1040
		schedule();
1041 1042
		rcu_stutter_wait("rcu_torture_reader");
	} while (!kthread_should_stop() && fullstop == FULLSTOP_DONTSTOP);
1043
	VERBOSE_PRINTK_STRING("rcu_torture_reader task stopping");
1044
	rcutorture_shutdown_absorb("rcu_torture_reader");
1045
	if (irqreader && cur_ops->irq_capable)
1046
		del_timer_sync(&t);
1047
	while (!kthread_should_stop())
1048 1049 1050 1051 1052 1053 1054 1055 1056 1057 1058 1059 1060 1061 1062 1063
		schedule_timeout_uninterruptible(1);
	return 0;
}

/*
 * Create an RCU-torture statistics message in the specified buffer.
 */
static int
rcu_torture_printk(char *page)
{
	int cnt = 0;
	int cpu;
	int i;
	long pipesummary[RCU_TORTURE_PIPE_LEN + 1] = { 0 };
	long batchsummary[RCU_TORTURE_PIPE_LEN + 1] = { 0 };

1064
	for_each_possible_cpu(cpu) {
1065 1066 1067 1068 1069 1070 1071 1072 1073
		for (i = 0; i < RCU_TORTURE_PIPE_LEN + 1; i++) {
			pipesummary[i] += per_cpu(rcu_torture_count, cpu)[i];
			batchsummary[i] += per_cpu(rcu_torture_batch, cpu)[i];
		}
	}
	for (i = RCU_TORTURE_PIPE_LEN - 1; i >= 0; i--) {
		if (pipesummary[i] != 0)
			break;
	}
1074
	cnt += sprintf(&page[cnt], "%s%s ", torture_type, TORTURE_FLAG);
1075
	cnt += sprintf(&page[cnt],
1076
		       "rtc: %p ver: %lu tfle: %d rta: %d rtaf: %d rtf: %d ",
1077 1078 1079 1080 1081
		       rcu_torture_current,
		       rcu_torture_current_version,
		       list_empty(&rcu_torture_freelist),
		       atomic_read(&n_rcu_torture_alloc),
		       atomic_read(&n_rcu_torture_alloc_fail),
1082 1083
		       atomic_read(&n_rcu_torture_free));
	cnt += sprintf(&page[cnt], "rtmbe: %d rtbke: %ld rtbre: %ld ",
1084
		       atomic_read(&n_rcu_torture_mberror),
1085
		       n_rcu_torture_boost_ktrerror,
1086 1087
		       n_rcu_torture_boost_rterror);
	cnt += sprintf(&page[cnt], "rtbf: %ld rtb: %ld nt: %ld ",
1088 1089
		       n_rcu_torture_boost_failure,
		       n_rcu_torture_boosts,
1090
		       n_rcu_torture_timers);
1091 1092 1093 1094 1095 1096 1097
	cnt += sprintf(&page[cnt],
		       "onoff: %ld/%ld:%ld/%ld %d,%d:%d,%d %lu:%lu (HZ=%d) ",
		       n_online_successes, n_online_attempts,
		       n_offline_successes, n_offline_attempts,
		       min_online, max_online,
		       min_offline, max_offline,
		       sum_online, sum_offline, HZ);
1098
	cnt += sprintf(&page[cnt], "barrier: %ld/%ld:%ld",
1099 1100 1101 1102
		       n_barrier_successes,
		       n_barrier_attempts,
		       n_rcu_torture_barrier_error);
	cnt += sprintf(&page[cnt], "\n%s%s ", torture_type, TORTURE_FLAG);
1103
	if (atomic_read(&n_rcu_torture_mberror) != 0 ||
1104
	    n_rcu_torture_barrier_error != 0 ||
1105 1106
	    n_rcu_torture_boost_ktrerror != 0 ||
	    n_rcu_torture_boost_rterror != 0 ||
1107 1108
	    n_rcu_torture_boost_failure != 0 ||
	    i > 1) {
1109
		cnt += sprintf(&page[cnt], "!!! ");
1110
		atomic_inc(&n_rcu_torture_error);
1111
		WARN_ON_ONCE(1);
1112
	}
1113 1114 1115
	cnt += sprintf(&page[cnt], "Reader Pipe: ");
	for (i = 0; i < RCU_TORTURE_PIPE_LEN + 1; i++)
		cnt += sprintf(&page[cnt], " %ld", pipesummary[i]);
1116
	cnt += sprintf(&page[cnt], "\n%s%s ", torture_type, TORTURE_FLAG);
1117
	cnt += sprintf(&page[cnt], "Reader Batch: ");
1118
	for (i = 0; i < RCU_TORTURE_PIPE_LEN + 1; i++)
1119
		cnt += sprintf(&page[cnt], " %ld", batchsummary[i]);
1120
	cnt += sprintf(&page[cnt], "\n%s%s ", torture_type, TORTURE_FLAG);
1121 1122 1123 1124 1125 1126
	cnt += sprintf(&page[cnt], "Free-Block Circulation: ");
	for (i = 0; i < RCU_TORTURE_PIPE_LEN + 1; i++) {
		cnt += sprintf(&page[cnt], " %d",
			       atomic_read(&rcu_torture_wcount[i]));
	}
	cnt += sprintf(&page[cnt], "\n");
1127
	if (cur_ops->stats)
1128
		cnt += cur_ops->stats(&page[cnt]);
1129 1130 1131 1132 1133 1134 1135 1136 1137 1138 1139 1140 1141 1142 1143 1144 1145
	return cnt;
}

/*
 * Print torture statistics.  Caller must ensure that there is only
 * one call to this function at a given time!!!  This is normally
 * accomplished by relying on the module system to only have one copy
 * of the module loaded, and then by giving the rcu_torture_stats
 * kthread full control (or the init/cleanup functions when rcu_torture_stats
 * thread is not running).
 */
static void
rcu_torture_stats_print(void)
{
	int cnt;

	cnt = rcu_torture_printk(printk_buf);
1146
	pr_alert("%s", printk_buf);
1147 1148 1149 1150 1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 1161 1162
}

/*
 * Periodically prints torture statistics, if periodic statistics printing
 * was specified via the stat_interval module parameter.
 *
 * No need to worry about fullstop here, since this one doesn't reference
 * volatile state or register callbacks.
 */
static int
rcu_torture_stats(void *arg)
{
	VERBOSE_PRINTK_STRING("rcu_torture_stats task started");
	do {
		schedule_timeout_interruptible(stat_interval * HZ);
		rcu_torture_stats_print();
1163 1164
		rcutorture_shutdown_absorb("rcu_torture_stats");
	} while (!kthread_should_stop());
1165 1166 1167 1168
	VERBOSE_PRINTK_STRING("rcu_torture_stats task stopping");
	return 0;
}

1169 1170 1171 1172 1173
static int rcu_idle_cpu;	/* Force all torture tasks off this CPU */

/* Shuffle tasks such that we allow @rcu_idle_cpu to become idle. A special case
 * is when @rcu_idle_cpu = -1, when we allow the tasks to run on all CPUs.
 */
1174
static void rcu_torture_shuffle_tasks(void)
1175 1176 1177
{
	int i;

R
Rusty Russell 已提交
1178
	cpumask_setall(shuffle_tmp_mask);
1179
	get_online_cpus();
1180 1181

	/* No point in shuffling if there is only one online CPU (ex: UP) */
1182 1183 1184 1185
	if (num_online_cpus() == 1) {
		put_online_cpus();
		return;
	}
1186 1187

	if (rcu_idle_cpu != -1)
R
Rusty Russell 已提交
1188
		cpumask_clear_cpu(rcu_idle_cpu, shuffle_tmp_mask);
1189

R
Rusty Russell 已提交
1190
	set_cpus_allowed_ptr(current, shuffle_tmp_mask);
1191

1192
	if (reader_tasks) {
1193 1194
		for (i = 0; i < nrealreaders; i++)
			if (reader_tasks[i])
1195
				set_cpus_allowed_ptr(reader_tasks[i],
R
Rusty Russell 已提交
1196
						     shuffle_tmp_mask);
1197
	}
1198
	if (fakewriter_tasks) {
1199 1200
		for (i = 0; i < nfakewriters; i++)
			if (fakewriter_tasks[i])
1201
				set_cpus_allowed_ptr(fakewriter_tasks[i],
R
Rusty Russell 已提交
1202
						     shuffle_tmp_mask);
1203
	}
1204
	if (writer_task)
R
Rusty Russell 已提交
1205
		set_cpus_allowed_ptr(writer_task, shuffle_tmp_mask);
1206
	if (stats_task)
R
Rusty Russell 已提交
1207
		set_cpus_allowed_ptr(stats_task, shuffle_tmp_mask);
1208 1209 1210 1211 1212 1213 1214 1215 1216 1217 1218 1219 1220 1221 1222 1223 1224 1225 1226
	if (stutter_task)
		set_cpus_allowed_ptr(stutter_task, shuffle_tmp_mask);
	if (fqs_task)
		set_cpus_allowed_ptr(fqs_task, shuffle_tmp_mask);
	if (shutdown_task)
		set_cpus_allowed_ptr(shutdown_task, shuffle_tmp_mask);
#ifdef CONFIG_HOTPLUG_CPU
	if (onoff_task)
		set_cpus_allowed_ptr(onoff_task, shuffle_tmp_mask);
#endif /* #ifdef CONFIG_HOTPLUG_CPU */
	if (stall_task)
		set_cpus_allowed_ptr(stall_task, shuffle_tmp_mask);
	if (barrier_cbs_tasks)
		for (i = 0; i < n_barrier_cbs; i++)
			if (barrier_cbs_tasks[i])
				set_cpus_allowed_ptr(barrier_cbs_tasks[i],
						     shuffle_tmp_mask);
	if (barrier_task)
		set_cpus_allowed_ptr(barrier_task, shuffle_tmp_mask);
1227 1228 1229 1230 1231 1232

	if (rcu_idle_cpu == -1)
		rcu_idle_cpu = num_online_cpus() - 1;
	else
		rcu_idle_cpu--;

1233
	put_online_cpus();
1234 1235 1236 1237 1238 1239 1240 1241 1242 1243 1244 1245 1246
}

/* Shuffle tasks across CPUs, with the intent of allowing each CPU in the
 * system to become idle at a time and cut off its timer ticks. This is meant
 * to test the support for such tickless idle CPU in RCU.
 */
static int
rcu_torture_shuffle(void *arg)
{
	VERBOSE_PRINTK_STRING("rcu_torture_shuffle task started");
	do {
		schedule_timeout_interruptible(shuffle_interval * HZ);
		rcu_torture_shuffle_tasks();
1247 1248
		rcutorture_shutdown_absorb("rcu_torture_shuffle");
	} while (!kthread_should_stop());
1249 1250 1251 1252
	VERBOSE_PRINTK_STRING("rcu_torture_shuffle task stopping");
	return 0;
}

1253 1254 1255 1256 1257 1258 1259 1260 1261 1262
/* Cause the rcutorture test to "stutter", starting and stopping all
 * threads periodically.
 */
static int
rcu_torture_stutter(void *arg)
{
	VERBOSE_PRINTK_STRING("rcu_torture_stutter task started");
	do {
		schedule_timeout_interruptible(stutter * HZ);
		stutter_pause_test = 1;
1263
		if (!kthread_should_stop())
1264 1265
			schedule_timeout_interruptible(stutter * HZ);
		stutter_pause_test = 0;
1266 1267
		rcutorture_shutdown_absorb("rcu_torture_stutter");
	} while (!kthread_should_stop());
1268 1269 1270 1271
	VERBOSE_PRINTK_STRING("rcu_torture_stutter task stopping");
	return 0;
}

1272
static inline void
1273
rcu_torture_print_module_parms(struct rcu_torture_ops *cur_ops, const char *tag)
1274
{
1275 1276 1277 1278 1279 1280 1281
	pr_alert("%s" TORTURE_FLAG
		 "--- %s: nreaders=%d nfakewriters=%d "
		 "stat_interval=%d verbose=%d test_no_idle_hz=%d "
		 "shuffle_interval=%d stutter=%d irqreader=%d "
		 "fqs_duration=%d fqs_holdoff=%d fqs_stutter=%d "
		 "test_boost=%d/%d test_boost_interval=%d "
		 "test_boost_duration=%d shutdown_secs=%d "
1282 1283
		 "stall_cpu=%d stall_cpu_holdoff=%d "
		 "n_barrier_cbs=%d "
1284 1285 1286 1287 1288 1289
		 "onoff_interval=%d onoff_holdoff=%d\n",
		 torture_type, tag, nrealreaders, nfakewriters,
		 stat_interval, verbose, test_no_idle_hz, shuffle_interval,
		 stutter, irqreader, fqs_duration, fqs_holdoff, fqs_stutter,
		 test_boost, cur_ops->can_boost,
		 test_boost_interval, test_boost_duration, shutdown_secs,
1290 1291
		 stall_cpu, stall_cpu_holdoff,
		 n_barrier_cbs,
1292
		 onoff_interval, onoff_holdoff);
1293 1294
}

1295
static struct notifier_block rcutorture_shutdown_nb = {
1296 1297 1298
	.notifier_call = rcutorture_shutdown_notify,
};

1299 1300 1301 1302 1303 1304 1305 1306 1307 1308 1309 1310 1311 1312
static void rcutorture_booster_cleanup(int cpu)
{
	struct task_struct *t;

	if (boost_tasks[cpu] == NULL)
		return;
	mutex_lock(&boost_mutex);
	VERBOSE_PRINTK_STRING("Stopping rcu_torture_boost task");
	t = boost_tasks[cpu];
	boost_tasks[cpu] = NULL;
	mutex_unlock(&boost_mutex);

	/* This must be outside of the mutex, otherwise deadlock! */
	kthread_stop(t);
1313
	boost_tasks[cpu] = NULL;
1314 1315 1316 1317 1318 1319 1320 1321 1322 1323 1324 1325
}

static int rcutorture_booster_init(int cpu)
{
	int retval;

	if (boost_tasks[cpu] != NULL)
		return 0;  /* Already created, nothing more to do. */

	/* Don't allow time recalculation while creating a new task. */
	mutex_lock(&boost_mutex);
	VERBOSE_PRINTK_STRING("Creating rcu_torture_boost task");
E
Eric Dumazet 已提交
1326 1327 1328
	boost_tasks[cpu] = kthread_create_on_node(rcu_torture_boost, NULL,
						  cpu_to_node(cpu),
						  "rcu_torture_boost");
1329 1330 1331 1332 1333 1334 1335 1336 1337 1338 1339 1340 1341 1342
	if (IS_ERR(boost_tasks[cpu])) {
		retval = PTR_ERR(boost_tasks[cpu]);
		VERBOSE_PRINTK_STRING("rcu_torture_boost task create failed");
		n_rcu_torture_boost_ktrerror++;
		boost_tasks[cpu] = NULL;
		mutex_unlock(&boost_mutex);
		return retval;
	}
	kthread_bind(boost_tasks[cpu], cpu);
	wake_up_process(boost_tasks[cpu]);
	mutex_unlock(&boost_mutex);
	return 0;
}

1343 1344 1345 1346 1347 1348 1349 1350 1351 1352 1353 1354 1355 1356 1357 1358
/*
 * Cause the rcutorture test to shutdown the system after the test has
 * run for the time specified by the shutdown_secs module parameter.
 */
static int
rcu_torture_shutdown(void *arg)
{
	long delta;
	unsigned long jiffies_snap;

	VERBOSE_PRINTK_STRING("rcu_torture_shutdown task started");
	jiffies_snap = ACCESS_ONCE(jiffies);
	while (ULONG_CMP_LT(jiffies_snap, shutdown_time) &&
	       !kthread_should_stop()) {
		delta = shutdown_time - jiffies_snap;
		if (verbose)
1359 1360 1361
			pr_alert("%s" TORTURE_FLAG
				 "rcu_torture_shutdown task: %lu jiffies remaining\n",
				 torture_type, delta);
1362 1363 1364
		schedule_timeout_interruptible(delta);
		jiffies_snap = ACCESS_ONCE(jiffies);
	}
1365
	if (kthread_should_stop()) {
1366 1367 1368 1369 1370 1371 1372 1373 1374 1375 1376 1377 1378
		VERBOSE_PRINTK_STRING("rcu_torture_shutdown task stopping");
		return 0;
	}

	/* OK, shut down the system. */

	VERBOSE_PRINTK_STRING("rcu_torture_shutdown task shutting down system");
	shutdown_task = NULL;	/* Avoid self-kill deadlock. */
	rcu_torture_cleanup();	/* Get the success/failure message. */
	kernel_power_off();	/* Shut down the system. */
	return 0;
}

1379 1380 1381 1382 1383 1384
#ifdef CONFIG_HOTPLUG_CPU

/*
 * Execute random CPU-hotplug operations at the interval specified
 * by the onoff_interval.
 */
1385
static int
1386 1387 1388
rcu_torture_onoff(void *arg)
{
	int cpu;
1389
	unsigned long delta;
1390 1391
	int maxcpu = -1;
	DEFINE_RCU_RANDOM(rand);
1392
	int ret;
1393
	unsigned long starttime;
1394 1395 1396 1397 1398

	VERBOSE_PRINTK_STRING("rcu_torture_onoff task started");
	for_each_online_cpu(cpu)
		maxcpu = cpu;
	WARN_ON(maxcpu < 0);
1399 1400 1401 1402 1403
	if (onoff_holdoff > 0) {
		VERBOSE_PRINTK_STRING("rcu_torture_onoff begin holdoff");
		schedule_timeout_interruptible(onoff_holdoff * HZ);
		VERBOSE_PRINTK_STRING("rcu_torture_onoff end holdoff");
	}
1404 1405
	while (!kthread_should_stop()) {
		cpu = (rcu_random(&rand) >> 4) % (maxcpu + 1);
1406
		if (cpu_online(cpu) && cpu_is_hotpluggable(cpu)) {
1407
			if (verbose)
1408 1409 1410
				pr_alert("%s" TORTURE_FLAG
					 "rcu_torture_onoff task: offlining %d\n",
					 torture_type, cpu);
1411
			starttime = jiffies;
1412
			n_offline_attempts++;
1413 1414 1415 1416 1417 1418 1419
			ret = cpu_down(cpu);
			if (ret) {
				if (verbose)
					pr_alert("%s" TORTURE_FLAG
						 "rcu_torture_onoff task: offline %d failed: errno %d\n",
						 torture_type, cpu, ret);
			} else {
1420
				if (verbose)
1421 1422 1423
					pr_alert("%s" TORTURE_FLAG
						 "rcu_torture_onoff task: offlined %d\n",
						 torture_type, cpu);
1424
				n_offline_successes++;
1425 1426 1427 1428 1429 1430 1431 1432 1433 1434
				delta = jiffies - starttime;
				sum_offline += delta;
				if (min_offline < 0) {
					min_offline = delta;
					max_offline = delta;
				}
				if (min_offline > delta)
					min_offline = delta;
				if (max_offline < delta)
					max_offline = delta;
1435
			}
1436
		} else if (cpu_is_hotpluggable(cpu)) {
1437
			if (verbose)
1438 1439 1440
				pr_alert("%s" TORTURE_FLAG
					 "rcu_torture_onoff task: onlining %d\n",
					 torture_type, cpu);
1441
			starttime = jiffies;
1442
			n_online_attempts++;
1443 1444 1445 1446 1447 1448 1449
			ret = cpu_up(cpu);
			if (ret) {
				if (verbose)
					pr_alert("%s" TORTURE_FLAG
						 "rcu_torture_onoff task: online %d failed: errno %d\n",
						 torture_type, cpu, ret);
			} else {
1450
				if (verbose)
1451 1452 1453
					pr_alert("%s" TORTURE_FLAG
						 "rcu_torture_onoff task: onlined %d\n",
						 torture_type, cpu);
1454
				n_online_successes++;
1455 1456 1457 1458 1459 1460 1461 1462 1463 1464
				delta = jiffies - starttime;
				sum_online += delta;
				if (min_online < 0) {
					min_online = delta;
					max_online = delta;
				}
				if (min_online > delta)
					min_online = delta;
				if (max_online < delta)
					max_online = delta;
1465 1466 1467 1468 1469 1470 1471 1472
			}
		}
		schedule_timeout_interruptible(onoff_interval * HZ);
	}
	VERBOSE_PRINTK_STRING("rcu_torture_onoff task stopping");
	return 0;
}

1473
static int
1474 1475
rcu_torture_onoff_init(void)
{
1476 1477
	int ret;

1478 1479 1480 1481
	if (onoff_interval <= 0)
		return 0;
	onoff_task = kthread_run(rcu_torture_onoff, NULL, "rcu_torture_onoff");
	if (IS_ERR(onoff_task)) {
1482
		ret = PTR_ERR(onoff_task);
1483
		onoff_task = NULL;
1484
		return ret;
1485 1486 1487 1488 1489 1490 1491 1492 1493 1494
	}
	return 0;
}

static void rcu_torture_onoff_cleanup(void)
{
	if (onoff_task == NULL)
		return;
	VERBOSE_PRINTK_STRING("Stopping rcu_torture_onoff task");
	kthread_stop(onoff_task);
1495
	onoff_task = NULL;
1496 1497 1498 1499
}

#else /* #ifdef CONFIG_HOTPLUG_CPU */

1500
static int
1501 1502
rcu_torture_onoff_init(void)
{
1503
	return 0;
1504 1505 1506 1507 1508 1509 1510 1511
}

static void rcu_torture_onoff_cleanup(void)
{
}

#endif /* #else #ifdef CONFIG_HOTPLUG_CPU */

1512 1513 1514 1515
/*
 * CPU-stall kthread.  It waits as specified by stall_cpu_holdoff, then
 * induces a CPU stall for the time specified by stall_cpu.
 */
1516
static int rcu_torture_stall(void *args)
1517 1518 1519 1520 1521 1522 1523 1524 1525 1526 1527 1528
{
	unsigned long stop_at;

	VERBOSE_PRINTK_STRING("rcu_torture_stall task started");
	if (stall_cpu_holdoff > 0) {
		VERBOSE_PRINTK_STRING("rcu_torture_stall begin holdoff");
		schedule_timeout_interruptible(stall_cpu_holdoff * HZ);
		VERBOSE_PRINTK_STRING("rcu_torture_stall end holdoff");
	}
	if (!kthread_should_stop()) {
		stop_at = get_seconds() + stall_cpu;
		/* RCU CPU stall is expected behavior in following code. */
1529
		pr_alert("rcu_torture_stall start.\n");
1530 1531 1532 1533 1534 1535
		rcu_read_lock();
		preempt_disable();
		while (ULONG_CMP_LT(get_seconds(), stop_at))
			continue;  /* Induce RCU CPU stall warning. */
		preempt_enable();
		rcu_read_unlock();
1536
		pr_alert("rcu_torture_stall end.\n");
1537 1538 1539 1540 1541 1542 1543 1544 1545 1546 1547 1548 1549 1550 1551 1552 1553 1554 1555 1556 1557 1558 1559 1560 1561 1562 1563 1564 1565 1566
	}
	rcutorture_shutdown_absorb("rcu_torture_stall");
	while (!kthread_should_stop())
		schedule_timeout_interruptible(10 * HZ);
	return 0;
}

/* Spawn CPU-stall kthread, if stall_cpu specified. */
static int __init rcu_torture_stall_init(void)
{
	int ret;

	if (stall_cpu <= 0)
		return 0;
	stall_task = kthread_run(rcu_torture_stall, NULL, "rcu_torture_stall");
	if (IS_ERR(stall_task)) {
		ret = PTR_ERR(stall_task);
		stall_task = NULL;
		return ret;
	}
	return 0;
}

/* Clean up after the CPU-stall kthread, if one was spawned. */
static void rcu_torture_stall_cleanup(void)
{
	if (stall_task == NULL)
		return;
	VERBOSE_PRINTK_STRING("Stopping rcu_torture_stall_task.");
	kthread_stop(stall_task);
1567
	stall_task = NULL;
1568 1569
}

1570 1571 1572 1573 1574 1575 1576 1577 1578 1579
/* Callback function for RCU barrier testing. */
void rcu_torture_barrier_cbf(struct rcu_head *rcu)
{
	atomic_inc(&barrier_cbs_invoked);
}

/* kthread function to register callbacks used to test RCU barriers. */
static int rcu_torture_barrier_cbs(void *arg)
{
	long myid = (long)arg;
1580
	bool lastphase = 0;
1581 1582 1583 1584 1585 1586 1587
	struct rcu_head rcu;

	init_rcu_head_on_stack(&rcu);
	VERBOSE_PRINTK_STRING("rcu_torture_barrier_cbs task started");
	set_user_nice(current, 19);
	do {
		wait_event(barrier_cbs_wq[myid],
1588
			   barrier_phase != lastphase ||
1589 1590
			   kthread_should_stop() ||
			   fullstop != FULLSTOP_DONTSTOP);
1591 1592
		lastphase = barrier_phase;
		smp_mb(); /* ensure barrier_phase load before ->call(). */
1593 1594 1595 1596 1597 1598 1599 1600 1601 1602 1603 1604 1605 1606 1607 1608 1609 1610 1611 1612 1613 1614 1615 1616
		if (kthread_should_stop() || fullstop != FULLSTOP_DONTSTOP)
			break;
		cur_ops->call(&rcu, rcu_torture_barrier_cbf);
		if (atomic_dec_and_test(&barrier_cbs_count))
			wake_up(&barrier_wq);
	} while (!kthread_should_stop() && fullstop == FULLSTOP_DONTSTOP);
	VERBOSE_PRINTK_STRING("rcu_torture_barrier_cbs task stopping");
	rcutorture_shutdown_absorb("rcu_torture_barrier_cbs");
	while (!kthread_should_stop())
		schedule_timeout_interruptible(1);
	cur_ops->cb_barrier();
	destroy_rcu_head_on_stack(&rcu);
	return 0;
}

/* kthread function to drive and coordinate RCU barrier testing. */
static int rcu_torture_barrier(void *arg)
{
	int i;

	VERBOSE_PRINTK_STRING("rcu_torture_barrier task starting");
	do {
		atomic_set(&barrier_cbs_invoked, 0);
		atomic_set(&barrier_cbs_count, n_barrier_cbs);
1617 1618
		smp_mb(); /* Ensure barrier_phase after prior assignments. */
		barrier_phase = !barrier_phase;
1619 1620 1621 1622 1623 1624 1625 1626 1627 1628 1629 1630 1631 1632 1633 1634 1635 1636
		for (i = 0; i < n_barrier_cbs; i++)
			wake_up(&barrier_cbs_wq[i]);
		wait_event(barrier_wq,
			   atomic_read(&barrier_cbs_count) == 0 ||
			   kthread_should_stop() ||
			   fullstop != FULLSTOP_DONTSTOP);
		if (kthread_should_stop() || fullstop != FULLSTOP_DONTSTOP)
			break;
		n_barrier_attempts++;
		cur_ops->cb_barrier();
		if (atomic_read(&barrier_cbs_invoked) != n_barrier_cbs) {
			n_rcu_torture_barrier_error++;
			WARN_ON_ONCE(1);
		}
		n_barrier_successes++;
		schedule_timeout_interruptible(HZ / 10);
	} while (!kthread_should_stop() && fullstop == FULLSTOP_DONTSTOP);
	VERBOSE_PRINTK_STRING("rcu_torture_barrier task stopping");
1637
	rcutorture_shutdown_absorb("rcu_torture_barrier");
1638 1639 1640 1641 1642 1643 1644 1645 1646 1647 1648 1649 1650 1651
	while (!kthread_should_stop())
		schedule_timeout_interruptible(1);
	return 0;
}

/* Initialize RCU barrier testing. */
static int rcu_torture_barrier_init(void)
{
	int i;
	int ret;

	if (n_barrier_cbs == 0)
		return 0;
	if (cur_ops->call == NULL || cur_ops->cb_barrier == NULL) {
1652 1653 1654 1655 1656 1657
		pr_alert("%s" TORTURE_FLAG
			 " Call or barrier ops missing for %s,\n",
			 torture_type, cur_ops->name);
		pr_alert("%s" TORTURE_FLAG
			 " RCU barrier testing omitted from run.\n",
			 torture_type);
1658 1659 1660 1661 1662 1663 1664 1665 1666 1667
		return 0;
	}
	atomic_set(&barrier_cbs_count, 0);
	atomic_set(&barrier_cbs_invoked, 0);
	barrier_cbs_tasks =
		kzalloc(n_barrier_cbs * sizeof(barrier_cbs_tasks[0]),
			GFP_KERNEL);
	barrier_cbs_wq =
		kzalloc(n_barrier_cbs * sizeof(barrier_cbs_wq[0]),
			GFP_KERNEL);
1668
	if (barrier_cbs_tasks == NULL || !barrier_cbs_wq)
1669 1670 1671 1672
		return -ENOMEM;
	for (i = 0; i < n_barrier_cbs; i++) {
		init_waitqueue_head(&barrier_cbs_wq[i]);
		barrier_cbs_tasks[i] = kthread_run(rcu_torture_barrier_cbs,
1673
						   (void *)(long)i,
1674 1675 1676 1677 1678 1679 1680 1681 1682 1683 1684 1685 1686 1687 1688 1689 1690 1691 1692 1693 1694 1695 1696 1697 1698 1699 1700 1701 1702 1703 1704 1705 1706 1707 1708 1709 1710 1711 1712 1713 1714 1715 1716 1717 1718
						   "rcu_torture_barrier_cbs");
		if (IS_ERR(barrier_cbs_tasks[i])) {
			ret = PTR_ERR(barrier_cbs_tasks[i]);
			VERBOSE_PRINTK_ERRSTRING("Failed to create rcu_torture_barrier_cbs");
			barrier_cbs_tasks[i] = NULL;
			return ret;
		}
	}
	barrier_task = kthread_run(rcu_torture_barrier, NULL,
				   "rcu_torture_barrier");
	if (IS_ERR(barrier_task)) {
		ret = PTR_ERR(barrier_task);
		VERBOSE_PRINTK_ERRSTRING("Failed to create rcu_torture_barrier");
		barrier_task = NULL;
	}
	return 0;
}

/* Clean up after RCU barrier testing. */
static void rcu_torture_barrier_cleanup(void)
{
	int i;

	if (barrier_task != NULL) {
		VERBOSE_PRINTK_STRING("Stopping rcu_torture_barrier task");
		kthread_stop(barrier_task);
		barrier_task = NULL;
	}
	if (barrier_cbs_tasks != NULL) {
		for (i = 0; i < n_barrier_cbs; i++) {
			if (barrier_cbs_tasks[i] != NULL) {
				VERBOSE_PRINTK_STRING("Stopping rcu_torture_barrier_cbs task");
				kthread_stop(barrier_cbs_tasks[i]);
				barrier_cbs_tasks[i] = NULL;
			}
		}
		kfree(barrier_cbs_tasks);
		barrier_cbs_tasks = NULL;
	}
	if (barrier_cbs_wq != NULL) {
		kfree(barrier_cbs_wq);
		barrier_cbs_wq = NULL;
	}
}

1719 1720 1721 1722 1723 1724 1725 1726 1727 1728 1729 1730 1731 1732 1733 1734 1735 1736 1737 1738 1739 1740 1741
static int rcutorture_cpu_notify(struct notifier_block *self,
				 unsigned long action, void *hcpu)
{
	long cpu = (long)hcpu;

	switch (action) {
	case CPU_ONLINE:
	case CPU_DOWN_FAILED:
		(void)rcutorture_booster_init(cpu);
		break;
	case CPU_DOWN_PREPARE:
		rcutorture_booster_cleanup(cpu);
		break;
	default:
		break;
	}
	return NOTIFY_OK;
}

static struct notifier_block rcutorture_cpu_nb = {
	.notifier_call = rcutorture_cpu_notify,
};

1742 1743 1744 1745 1746
static void
rcu_torture_cleanup(void)
{
	int i;

1747
	mutex_lock(&fullstop_mutex);
1748
	rcutorture_record_test_transition();
1749
	if (fullstop == FULLSTOP_SHUTDOWN) {
1750
		pr_warn(/* but going down anyway, so... */
1751
		       "Concurrent 'rmmod rcutorture' and shutdown illegal!\n");
1752
		mutex_unlock(&fullstop_mutex);
1753
		schedule_timeout_uninterruptible(10);
1754 1755 1756 1757
		if (cur_ops->cb_barrier != NULL)
			cur_ops->cb_barrier();
		return;
	}
1758
	fullstop = FULLSTOP_RMMOD;
1759
	mutex_unlock(&fullstop_mutex);
1760
	unregister_reboot_notifier(&rcutorture_shutdown_nb);
1761
	rcu_torture_barrier_cleanup();
1762
	rcu_torture_stall_cleanup();
1763 1764 1765 1766 1767
	if (stutter_task) {
		VERBOSE_PRINTK_STRING("Stopping rcu_torture_stutter task");
		kthread_stop(stutter_task);
	}
	stutter_task = NULL;
1768
	if (shuffler_task) {
1769 1770
		VERBOSE_PRINTK_STRING("Stopping rcu_torture_shuffle task");
		kthread_stop(shuffler_task);
R
Rusty Russell 已提交
1771
		free_cpumask_var(shuffle_tmp_mask);
1772 1773 1774
	}
	shuffler_task = NULL;

1775
	if (writer_task) {
1776 1777 1778 1779 1780
		VERBOSE_PRINTK_STRING("Stopping rcu_torture_writer task");
		kthread_stop(writer_task);
	}
	writer_task = NULL;

1781
	if (reader_tasks) {
1782
		for (i = 0; i < nrealreaders; i++) {
1783
			if (reader_tasks[i]) {
1784 1785 1786 1787 1788 1789 1790 1791 1792 1793 1794
				VERBOSE_PRINTK_STRING(
					"Stopping rcu_torture_reader task");
				kthread_stop(reader_tasks[i]);
			}
			reader_tasks[i] = NULL;
		}
		kfree(reader_tasks);
		reader_tasks = NULL;
	}
	rcu_torture_current = NULL;

1795
	if (fakewriter_tasks) {
1796
		for (i = 0; i < nfakewriters; i++) {
1797
			if (fakewriter_tasks[i]) {
1798 1799 1800 1801 1802 1803 1804 1805 1806 1807
				VERBOSE_PRINTK_STRING(
					"Stopping rcu_torture_fakewriter task");
				kthread_stop(fakewriter_tasks[i]);
			}
			fakewriter_tasks[i] = NULL;
		}
		kfree(fakewriter_tasks);
		fakewriter_tasks = NULL;
	}

1808
	if (stats_task) {
1809 1810 1811 1812 1813
		VERBOSE_PRINTK_STRING("Stopping rcu_torture_stats task");
		kthread_stop(stats_task);
	}
	stats_task = NULL;

1814 1815 1816 1817 1818
	if (fqs_task) {
		VERBOSE_PRINTK_STRING("Stopping rcu_torture_fqs task");
		kthread_stop(fqs_task);
	}
	fqs_task = NULL;
1819 1820 1821 1822 1823 1824
	if ((test_boost == 1 && cur_ops->can_boost) ||
	    test_boost == 2) {
		unregister_cpu_notifier(&rcutorture_cpu_nb);
		for_each_possible_cpu(i)
			rcutorture_booster_cleanup(i);
	}
1825 1826 1827 1828
	if (shutdown_task != NULL) {
		VERBOSE_PRINTK_STRING("Stopping rcu_torture_shutdown task");
		kthread_stop(shutdown_task);
	}
1829
	shutdown_task = NULL;
1830
	rcu_torture_onoff_cleanup();
1831

1832
	/* Wait for all RCU callbacks to fire.  */
1833 1834 1835

	if (cur_ops->cb_barrier != NULL)
		cur_ops->cb_barrier();
1836 1837

	rcu_torture_stats_print();  /* -After- the stats thread is stopped! */
1838

1839
	if (atomic_read(&n_rcu_torture_error) || n_rcu_torture_barrier_error)
1840
		rcu_torture_print_module_parms(cur_ops, "End of test: FAILURE");
1841 1842 1843 1844
	else if (n_online_successes != n_online_attempts ||
		 n_offline_successes != n_offline_attempts)
		rcu_torture_print_module_parms(cur_ops,
					       "End of test: RCU_HOTPLUG");
1845
	else
1846
		rcu_torture_print_module_parms(cur_ops, "End of test: SUCCESS");
1847 1848
}

1849 1850 1851 1852 1853 1854 1855 1856 1857 1858 1859 1860 1861 1862 1863 1864 1865 1866 1867 1868 1869 1870 1871 1872 1873 1874 1875 1876 1877 1878 1879 1880 1881 1882 1883 1884 1885 1886 1887 1888 1889 1890 1891 1892 1893 1894 1895 1896 1897 1898 1899 1900 1901 1902 1903 1904
#ifdef CONFIG_DEBUG_OBJECTS_RCU_HEAD
static void rcu_torture_leak_cb(struct rcu_head *rhp)
{
}

static void rcu_torture_err_cb(struct rcu_head *rhp)
{
	/*
	 * This -might- happen due to race conditions, but is unlikely.
	 * The scenario that leads to this happening is that the
	 * first of the pair of duplicate callbacks is queued,
	 * someone else starts a grace period that includes that
	 * callback, then the second of the pair must wait for the
	 * next grace period.  Unlikely, but can happen.  If it
	 * does happen, the debug-objects subsystem won't have splatted.
	 */
	pr_alert("rcutorture: duplicated callback was invoked.\n");
}
#endif /* #ifdef CONFIG_DEBUG_OBJECTS_RCU_HEAD */

/*
 * Verify that double-free causes debug-objects to complain, but only
 * if CONFIG_DEBUG_OBJECTS_RCU_HEAD=y.  Otherwise, say that the test
 * cannot be carried out.
 */
static void rcu_test_debug_objects(void)
{
#ifdef CONFIG_DEBUG_OBJECTS_RCU_HEAD
	struct rcu_head rh1;
	struct rcu_head rh2;

	init_rcu_head_on_stack(&rh1);
	init_rcu_head_on_stack(&rh2);
	pr_alert("rcutorture: WARN: Duplicate call_rcu() test starting.\n");

	/* Try to queue the rh2 pair of callbacks for the same grace period. */
	preempt_disable(); /* Prevent preemption from interrupting test. */
	rcu_read_lock(); /* Make it impossible to finish a grace period. */
	call_rcu(&rh1, rcu_torture_leak_cb); /* Start grace period. */
	local_irq_disable(); /* Make it harder to start a new grace period. */
	call_rcu(&rh2, rcu_torture_leak_cb);
	call_rcu(&rh2, rcu_torture_err_cb); /* Duplicate callback. */
	local_irq_enable();
	rcu_read_unlock();
	preempt_enable();

	/* Wait for them all to get done so we can safely return. */
	rcu_barrier();
	pr_alert("rcutorture: WARN: Duplicate call_rcu() test complete.\n");
	destroy_rcu_head_on_stack(&rh1);
	destroy_rcu_head_on_stack(&rh2);
#else /* #ifdef CONFIG_DEBUG_OBJECTS_RCU_HEAD */
	pr_alert("rcutorture: !CONFIG_DEBUG_OBJECTS_RCU_HEAD, not testing duplicate call_rcu()\n");
#endif /* #else #ifdef CONFIG_DEBUG_OBJECTS_RCU_HEAD */
}

1905
static int __init
1906 1907 1908 1909 1910
rcu_torture_init(void)
{
	int i;
	int cpu;
	int firsterr = 0;
1911
	int retval;
1912 1913 1914
	static struct rcu_torture_ops *torture_ops[] = {
		&rcu_ops, &rcu_bh_ops, &srcu_ops, &sched_ops,
	};
1915

1916 1917
	mutex_lock(&fullstop_mutex);

1918
	/* Process args and tell the world that the torturer is on the job. */
1919
	for (i = 0; i < ARRAY_SIZE(torture_ops); i++) {
1920
		cur_ops = torture_ops[i];
1921
		if (strcmp(torture_type, cur_ops->name) == 0)
1922 1923
			break;
	}
1924
	if (i == ARRAY_SIZE(torture_ops)) {
1925 1926 1927
		pr_alert("rcu-torture: invalid torture type: \"%s\"\n",
			 torture_type);
		pr_alert("rcu-torture types:");
1928
		for (i = 0; i < ARRAY_SIZE(torture_ops); i++)
1929 1930
			pr_alert(" %s", torture_ops[i]->name);
		pr_alert("\n");
1931
		mutex_unlock(&fullstop_mutex);
1932
		return -EINVAL;
1933
	}
1934
	if (cur_ops->fqs == NULL && fqs_duration != 0) {
1935
		pr_alert("rcu-torture: ->fqs NULL and non-zero fqs_duration, fqs disabled.\n");
1936 1937
		fqs_duration = 0;
	}
1938
	if (cur_ops->init)
1939 1940
		cur_ops->init(); /* no "goto unwind" prior to this point!!! */

1941 1942 1943 1944
	if (nreaders >= 0)
		nrealreaders = nreaders;
	else
		nrealreaders = 2 * num_online_cpus();
1945
	rcu_torture_print_module_parms(cur_ops, "Start of test");
1946
	fullstop = FULLSTOP_DONTSTOP;
1947 1948 1949 1950

	/* Set up the freelist. */

	INIT_LIST_HEAD(&rcu_torture_freelist);
1951
	for (i = 0; i < ARRAY_SIZE(rcu_tortures); i++) {
1952
		rcu_tortures[i].rtort_mbtest = 0;
1953 1954 1955 1956 1957 1958 1959 1960 1961 1962 1963
		list_add_tail(&rcu_tortures[i].rtort_free,
			      &rcu_torture_freelist);
	}

	/* Initialize the statistics so that each run gets its own numbers. */

	rcu_torture_current = NULL;
	rcu_torture_current_version = 0;
	atomic_set(&n_rcu_torture_alloc, 0);
	atomic_set(&n_rcu_torture_alloc_fail, 0);
	atomic_set(&n_rcu_torture_free, 0);
1964 1965
	atomic_set(&n_rcu_torture_mberror, 0);
	atomic_set(&n_rcu_torture_error, 0);
1966
	n_rcu_torture_barrier_error = 0;
1967 1968 1969 1970
	n_rcu_torture_boost_ktrerror = 0;
	n_rcu_torture_boost_rterror = 0;
	n_rcu_torture_boost_failure = 0;
	n_rcu_torture_boosts = 0;
1971 1972
	for (i = 0; i < RCU_TORTURE_PIPE_LEN + 1; i++)
		atomic_set(&rcu_torture_wcount[i], 0);
1973
	for_each_possible_cpu(cpu) {
1974 1975 1976 1977 1978 1979 1980 1981 1982
		for (i = 0; i < RCU_TORTURE_PIPE_LEN + 1; i++) {
			per_cpu(rcu_torture_count, cpu)[i] = 0;
			per_cpu(rcu_torture_batch, cpu)[i] = 0;
		}
	}

	/* Start up the kthreads. */

	VERBOSE_PRINTK_STRING("Creating rcu_torture_writer task");
1983 1984
	writer_task = kthread_create(rcu_torture_writer, NULL,
				     "rcu_torture_writer");
1985 1986 1987 1988 1989 1990
	if (IS_ERR(writer_task)) {
		firsterr = PTR_ERR(writer_task);
		VERBOSE_PRINTK_ERRSTRING("Failed to create writer");
		writer_task = NULL;
		goto unwind;
	}
1991
	wake_up_process(writer_task);
1992
	fakewriter_tasks = kzalloc(nfakewriters * sizeof(fakewriter_tasks[0]),
1993
				   GFP_KERNEL);
1994 1995 1996 1997 1998 1999 2000 2001
	if (fakewriter_tasks == NULL) {
		VERBOSE_PRINTK_ERRSTRING("out of memory");
		firsterr = -ENOMEM;
		goto unwind;
	}
	for (i = 0; i < nfakewriters; i++) {
		VERBOSE_PRINTK_STRING("Creating rcu_torture_fakewriter task");
		fakewriter_tasks[i] = kthread_run(rcu_torture_fakewriter, NULL,
2002
						  "rcu_torture_fakewriter");
2003 2004 2005 2006 2007 2008 2009
		if (IS_ERR(fakewriter_tasks[i])) {
			firsterr = PTR_ERR(fakewriter_tasks[i]);
			VERBOSE_PRINTK_ERRSTRING("Failed to create fakewriter");
			fakewriter_tasks[i] = NULL;
			goto unwind;
		}
	}
2010
	reader_tasks = kzalloc(nrealreaders * sizeof(reader_tasks[0]),
2011 2012 2013 2014 2015 2016 2017 2018 2019 2020 2021 2022 2023 2024 2025 2026 2027 2028 2029 2030 2031 2032 2033 2034 2035 2036 2037 2038
			       GFP_KERNEL);
	if (reader_tasks == NULL) {
		VERBOSE_PRINTK_ERRSTRING("out of memory");
		firsterr = -ENOMEM;
		goto unwind;
	}
	for (i = 0; i < nrealreaders; i++) {
		VERBOSE_PRINTK_STRING("Creating rcu_torture_reader task");
		reader_tasks[i] = kthread_run(rcu_torture_reader, NULL,
					      "rcu_torture_reader");
		if (IS_ERR(reader_tasks[i])) {
			firsterr = PTR_ERR(reader_tasks[i]);
			VERBOSE_PRINTK_ERRSTRING("Failed to create reader");
			reader_tasks[i] = NULL;
			goto unwind;
		}
	}
	if (stat_interval > 0) {
		VERBOSE_PRINTK_STRING("Creating rcu_torture_stats task");
		stats_task = kthread_run(rcu_torture_stats, NULL,
					"rcu_torture_stats");
		if (IS_ERR(stats_task)) {
			firsterr = PTR_ERR(stats_task);
			VERBOSE_PRINTK_ERRSTRING("Failed to create stats");
			stats_task = NULL;
			goto unwind;
		}
	}
2039 2040
	if (test_no_idle_hz) {
		rcu_idle_cpu = num_online_cpus() - 1;
R
Rusty Russell 已提交
2041 2042 2043 2044 2045 2046 2047

		if (!alloc_cpumask_var(&shuffle_tmp_mask, GFP_KERNEL)) {
			firsterr = -ENOMEM;
			VERBOSE_PRINTK_ERRSTRING("Failed to alloc mask");
			goto unwind;
		}

2048 2049 2050 2051
		/* Create the shuffler thread */
		shuffler_task = kthread_run(rcu_torture_shuffle, NULL,
					  "rcu_torture_shuffle");
		if (IS_ERR(shuffler_task)) {
R
Rusty Russell 已提交
2052
			free_cpumask_var(shuffle_tmp_mask);
2053 2054 2055 2056 2057 2058
			firsterr = PTR_ERR(shuffler_task);
			VERBOSE_PRINTK_ERRSTRING("Failed to create shuffler");
			shuffler_task = NULL;
			goto unwind;
		}
	}
2059 2060 2061 2062 2063 2064 2065 2066 2067 2068 2069 2070 2071
	if (stutter < 0)
		stutter = 0;
	if (stutter) {
		/* Create the stutter thread */
		stutter_task = kthread_run(rcu_torture_stutter, NULL,
					  "rcu_torture_stutter");
		if (IS_ERR(stutter_task)) {
			firsterr = PTR_ERR(stutter_task);
			VERBOSE_PRINTK_ERRSTRING("Failed to create stutter");
			stutter_task = NULL;
			goto unwind;
		}
	}
2072 2073 2074 2075 2076 2077 2078 2079 2080 2081 2082 2083 2084
	if (fqs_duration < 0)
		fqs_duration = 0;
	if (fqs_duration) {
		/* Create the stutter thread */
		fqs_task = kthread_run(rcu_torture_fqs, NULL,
				       "rcu_torture_fqs");
		if (IS_ERR(fqs_task)) {
			firsterr = PTR_ERR(fqs_task);
			VERBOSE_PRINTK_ERRSTRING("Failed to create fqs");
			fqs_task = NULL;
			goto unwind;
		}
	}
2085 2086 2087 2088 2089 2090 2091 2092 2093 2094 2095 2096 2097 2098 2099 2100 2101 2102 2103
	if (test_boost_interval < 1)
		test_boost_interval = 1;
	if (test_boost_duration < 2)
		test_boost_duration = 2;
	if ((test_boost == 1 && cur_ops->can_boost) ||
	    test_boost == 2) {

		boost_starttime = jiffies + test_boost_interval * HZ;
		register_cpu_notifier(&rcutorture_cpu_nb);
		for_each_possible_cpu(i) {
			if (cpu_is_offline(i))
				continue;  /* Heuristic: CPU can go offline. */
			retval = rcutorture_booster_init(i);
			if (retval < 0) {
				firsterr = retval;
				goto unwind;
			}
		}
	}
2104 2105
	if (shutdown_secs > 0) {
		shutdown_time = jiffies + shutdown_secs * HZ;
2106 2107
		shutdown_task = kthread_create(rcu_torture_shutdown, NULL,
					       "rcu_torture_shutdown");
2108 2109 2110 2111 2112 2113
		if (IS_ERR(shutdown_task)) {
			firsterr = PTR_ERR(shutdown_task);
			VERBOSE_PRINTK_ERRSTRING("Failed to create shutdown");
			shutdown_task = NULL;
			goto unwind;
		}
2114
		wake_up_process(shutdown_task);
2115
	}
2116 2117 2118 2119 2120
	i = rcu_torture_onoff_init();
	if (i != 0) {
		firsterr = i;
		goto unwind;
	}
2121
	register_reboot_notifier(&rcutorture_shutdown_nb);
2122 2123 2124 2125 2126
	i = rcu_torture_stall_init();
	if (i != 0) {
		firsterr = i;
		goto unwind;
	}
2127 2128 2129 2130 2131
	retval = rcu_torture_barrier_init();
	if (retval != 0) {
		firsterr = retval;
		goto unwind;
	}
2132 2133
	if (object_debug)
		rcu_test_debug_objects();
2134
	rcutorture_record_test_transition();
2135
	mutex_unlock(&fullstop_mutex);
2136 2137 2138
	return 0;

unwind:
2139
	mutex_unlock(&fullstop_mutex);
2140 2141 2142 2143 2144 2145
	rcu_torture_cleanup();
	return firsterr;
}

module_init(rcu_torture_init);
module_exit(rcu_torture_cleanup);