rcutorture.c 58.7 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
#include <linux/torture.h>
52 53

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

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

62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95
torture_param(int, fqs_duration, 0,
	      "Duration of fqs bursts (us), 0 to disable");
torture_param(int, fqs_holdoff, 0, "Holdoff time within fqs bursts (us)");
torture_param(int, fqs_stutter, 3, "Wait time between fqs bursts (s)");
torture_param(bool, gp_exp, false, "Use expedited GP wait primitives");
torture_param(bool, gp_normal, false,
	     "Use normal (non-expedited) GP wait primitives");
torture_param(int, irqreader, 1, "Allow RCU readers from irq handlers");
torture_param(int, n_barrier_cbs, 0,
	     "# of callbacks/kthreads for barrier testing");
torture_param(int, nfakewriters, 4, "Number of RCU fake writer threads");
torture_param(int, nreaders, -1, "Number of RCU reader threads");
torture_param(int, object_debug, 0,
	     "Enable debug-object double call_rcu() testing");
torture_param(int, onoff_holdoff, 0, "Time after boot before CPU hotplugs (s)");
torture_param(int, onoff_interval, 0,
	     "Time between CPU hotplugs (s), 0=disable");
torture_param(int, shuffle_interval, 3, "Number of seconds between shuffles");
torture_param(int, shutdown_secs, 0, "Shutdown time (s), <= zero to disable.");
torture_param(int, stall_cpu, 0, "Stall duration (s), zero to disable.");
torture_param(int, stall_cpu_holdoff, 10,
	     "Time to wait before starting stall (s).");
torture_param(int, stat_interval, 60,
	     "Number of seconds between stats printk()s");
torture_param(int, stutter, 5, "Number of seconds to run/halt test");
torture_param(int, test_boost, 1, "Test RCU prio boost: 0=no, 1=maybe, 2=yes.");
torture_param(int, test_boost_duration, 4,
	     "Duration of each boost test, seconds.");
torture_param(int, test_boost_interval, 7,
	     "Interval between boost tests, seconds.");
torture_param(bool, test_no_idle_hz, true,
	     "Test support for tickless idle CPUs");
torture_param(bool, verbose, false, "Enable verbose debugging printk()s");

96
static char *torture_type = "rcu";
97
module_param(torture_type, charp, 0444);
98
MODULE_PARM_DESC(torture_type, "Type of RCU to torture (rcu, rcu_bh, ...)");
99

100 101
static int nrealreaders;
static struct task_struct *writer_task;
102
static struct task_struct **fakewriter_tasks;
103 104
static struct task_struct **reader_tasks;
static struct task_struct *stats_task;
105
static struct task_struct *shuffler_task;
106
static struct task_struct *stutter_task;
107
static struct task_struct *fqs_task;
108
static struct task_struct *boost_tasks[NR_CPUS];
109
static struct task_struct *shutdown_task;
110 111 112
#ifdef CONFIG_HOTPLUG_CPU
static struct task_struct *onoff_task;
#endif /* #ifdef CONFIG_HOTPLUG_CPU */
113
static struct task_struct *stall_task;
114 115
static struct task_struct **barrier_cbs_tasks;
static struct task_struct *barrier_task;
116 117 118 119 120 121 122

#define RCU_TORTURE_PIPE_LEN 10

struct rcu_torture {
	struct rcu_head rtort_rcu;
	int rtort_pipe_count;
	struct list_head rtort_free;
123
	int rtort_mbtest;
124 125 126
};

static LIST_HEAD(rcu_torture_freelist);
127
static struct rcu_torture __rcu *rcu_torture_current;
128
static unsigned long rcu_torture_current_version;
129 130
static struct rcu_torture rcu_tortures[10 * RCU_TORTURE_PIPE_LEN];
static DEFINE_SPINLOCK(rcu_torture_lock);
131 132 133 134
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 };
135
static atomic_t rcu_torture_wcount[RCU_TORTURE_PIPE_LEN + 1];
136 137 138 139 140
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;
141
static long n_rcu_torture_barrier_error;
142 143 144 145
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;
146
static long n_rcu_torture_timers;
147 148
static long n_offline_attempts;
static long n_offline_successes;
149 150 151
static unsigned long sum_offline;
static int min_offline = -1;
static int max_offline;
152 153
static long n_online_attempts;
static long n_online_successes;
154 155 156
static unsigned long sum_online;
static int min_online = -1;
static int max_online;
157 158
static long n_barrier_attempts;
static long n_barrier_successes;
159
static struct list_head rcu_torture_removed;
R
Rusty Russell 已提交
160
static cpumask_var_t shuffle_tmp_mask;
161

162
static int stutter_pause_test;
163

164 165 166 167 168 169
#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;
170 171
module_param(rcutorture_runnable, int, 0444);
MODULE_PARM_DESC(rcutorture_runnable, "Start rcutorture at boot");
172

173
#if defined(CONFIG_RCU_BOOST) && !defined(CONFIG_HOTPLUG_CPU)
174
#define rcu_can_boost() 1
175
#else /* #if defined(CONFIG_RCU_BOOST) && !defined(CONFIG_HOTPLUG_CPU) */
176
#define rcu_can_boost() 0
177
#endif /* #else #if defined(CONFIG_RCU_BOOST) && !defined(CONFIG_HOTPLUG_CPU) */
178

179 180 181 182 183 184 185 186 187 188 189 190 191 192
#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 */

193
static unsigned long shutdown_time;	/* jiffies to system shutdown. */
194 195 196
static unsigned long boost_starttime;	/* jiffies of next boost test start. */
DEFINE_MUTEX(boost_mutex);		/* protect setting boost_starttime */
					/*  and boost task create/destroy. */
197
static atomic_t barrier_cbs_count;	/* Barrier callbacks registered. */
198
static bool barrier_phase;		/* Test phase. */
199 200 201
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);
202

203 204 205 206 207 208
/* 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;
209 210 211 212
/*
 * Protect fullstop transitions and spawning of kthreads.
 */
static DEFINE_MUTEX(fullstop_mutex);
213

214 215 216
/* Forward reference. */
static void rcu_torture_cleanup(void);

217
/*
218
 * Detect and respond to a system shutdown.
219 220 221 222 223
 */
static int
rcutorture_shutdown_notify(struct notifier_block *unused1,
			   unsigned long unused2, void *unused3)
{
P
Paul E. McKenney 已提交
224
	mutex_lock(&fullstop_mutex);
225
	if (fullstop == FULLSTOP_DONTSTOP)
P
Paul E. McKenney 已提交
226
		fullstop = FULLSTOP_SHUTDOWN;
227
	else
228
		pr_warn(/* but going down anyway, so... */
229
		       "Concurrent 'rmmod rcutorture' and shutdown illegal!\n");
P
Paul E. McKenney 已提交
230
	mutex_unlock(&fullstop_mutex);
231 232 233
	return NOTIFY_DONE;
}

234 235 236 237
/*
 * Absorb kthreads into a kernel function that won't return, so that
 * they won't ever access module text or data again.
 */
238
static void rcutorture_shutdown_absorb(const char *title)
239 240
{
	if (ACCESS_ONCE(fullstop) == FULLSTOP_SHUTDOWN) {
241
		pr_notice(
242 243 244 245 246 247
		       "rcutorture thread %s parking due to system shutdown\n",
		       title);
		schedule_timeout_uninterruptible(MAX_SCHEDULE_TIMEOUT);
	}
}

248 249 250
/*
 * Allocate an element from the rcu_tortures pool.
 */
A
Adrian Bunk 已提交
251
static struct rcu_torture *
252 253 254 255
rcu_torture_alloc(void)
{
	struct list_head *p;

256
	spin_lock_bh(&rcu_torture_lock);
257 258
	if (list_empty(&rcu_torture_freelist)) {
		atomic_inc(&n_rcu_torture_alloc_fail);
259
		spin_unlock_bh(&rcu_torture_lock);
260 261 262 263 264
		return NULL;
	}
	atomic_inc(&n_rcu_torture_alloc);
	p = rcu_torture_freelist.next;
	list_del_init(p);
265
	spin_unlock_bh(&rcu_torture_lock);
266 267 268 269 270 271 272 273 274 275
	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);
276
	spin_lock_bh(&rcu_torture_lock);
277
	list_add_tail(&p->rtort_free, &rcu_torture_freelist);
278
	spin_unlock_bh(&rcu_torture_lock);
279 280
}

281
static void
282
rcu_stutter_wait(const char *title)
283
{
284
	while (stutter_pause_test || !rcutorture_runnable) {
285 286 287
		if (rcutorture_runnable)
			schedule_timeout_interruptible(1);
		else
288
			schedule_timeout_interruptible(round_jiffies_relative(HZ));
289
		rcutorture_shutdown_absorb(title);
290
	}
291 292
}

293 294 295 296 297 298 299
/*
 * Operations vector for selecting different types of tests.
 */

struct rcu_torture_ops {
	void (*init)(void);
	int (*readlock)(void);
300
	void (*read_delay)(struct torture_random_state *rrsp);
301 302
	void (*readunlock)(int idx);
	int (*completed)(void);
303
	void (*deferred_free)(struct rcu_torture *p);
304
	void (*sync)(void);
305
	void (*exp_sync)(void);
306
	void (*call)(struct rcu_head *head, void (*func)(struct rcu_head *rcu));
307
	void (*cb_barrier)(void);
308
	void (*fqs)(void);
309
	void (*stats)(char *page);
310
	int irq_capable;
311
	int can_boost;
312
	const char *name;
313
};
314 315

static struct rcu_torture_ops *cur_ops;
316 317 318 319 320

/*
 * Definitions for rcu torture testing.
 */

321
static int rcu_torture_read_lock(void) __acquires(RCU)
322 323 324 325 326
{
	rcu_read_lock();
	return 0;
}

327
static void rcu_read_delay(struct torture_random_state *rrsp)
328
{
329 330
	const unsigned long shortdelay_us = 200;
	const unsigned long longdelay_ms = 50;
331

332 333 334
	/* 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. */
335

336
	if (!(torture_random(rrsp) % (nrealreaders * 2000 * longdelay_ms)))
337
		mdelay(longdelay_ms);
338
	if (!(torture_random(rrsp) % (nrealreaders * 2 * shortdelay_us)))
339
		udelay(shortdelay_us);
340
#ifdef CONFIG_PREEMPT
341 342
	if (!preempt_count() &&
	    !(torture_random(rrsp) % (nrealreaders * 20000)))
343 344
		preempt_schedule();  /* No QS if preempt_disable() in effect */
#endif
345 346
}

347
static void rcu_torture_read_unlock(int idx) __releases(RCU)
348 349 350 351 352 353 354 355 356 357 358 359 360 361 362
{
	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);

363
	if (fullstop != FULLSTOP_DONTSTOP) {
364 365 366 367 368 369 370 371 372 373 374
		/* 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);
375
	} else {
376
		cur_ops->deferred_free(rp);
377
	}
378 379
}

380 381 382 383 384
static int rcu_no_completed(void)
{
	return 0;
}

385 386 387 388 389
static void rcu_torture_deferred_free(struct rcu_torture *p)
{
	call_rcu(&p->rtort_rcu, rcu_torture_cb);
}

390 391 392 393 394
static void rcu_sync_torture_init(void)
{
	INIT_LIST_HEAD(&rcu_torture_removed);
}

395
static struct rcu_torture_ops rcu_ops = {
396 397 398 399 400
	.init		= rcu_sync_torture_init,
	.readlock	= rcu_torture_read_lock,
	.read_delay	= rcu_read_delay,
	.readunlock	= rcu_torture_read_unlock,
	.completed	= rcu_torture_completed,
401
	.deferred_free	= rcu_torture_deferred_free,
402
	.sync		= synchronize_rcu,
403 404 405
	.exp_sync	= synchronize_rcu_expedited,
	.call		= call_rcu,
	.cb_barrier	= rcu_barrier,
406
	.fqs		= rcu_force_quiescent_state,
407 408
	.stats		= NULL,
	.irq_capable	= 1,
409
	.can_boost	= rcu_can_boost(),
410
	.name		= "rcu"
411 412
};

413 414 415 416
/*
 * Definitions for rcu_bh torture testing.
 */

417
static int rcu_bh_torture_read_lock(void) __acquires(RCU_BH)
418 419 420 421 422
{
	rcu_read_lock_bh();
	return 0;
}

423
static void rcu_bh_torture_read_unlock(int idx) __releases(RCU_BH)
424 425 426 427 428 429 430 431 432 433 434 435 436 437 438
{
	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 = {
439
	.init		= rcu_sync_torture_init,
440 441 442 443 444
	.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,
445
	.sync		= synchronize_rcu_bh,
446
	.exp_sync	= synchronize_rcu_bh_expedited,
447
	.call		= call_rcu_bh,
448
	.cb_barrier	= rcu_barrier_bh,
449
	.fqs		= rcu_bh_force_quiescent_state,
450 451 452
	.stats		= NULL,
	.irq_capable	= 1,
	.name		= "rcu_bh"
453 454
};

455 456 457 458
/*
 * Definitions for srcu torture testing.
 */

459
DEFINE_STATIC_SRCU(srcu_ctl);
460

461
static int srcu_torture_read_lock(void) __acquires(&srcu_ctl)
462 463 464 465
{
	return srcu_read_lock(&srcu_ctl);
}

466
static void srcu_read_delay(struct torture_random_state *rrsp)
467 468 469 470 471 472 473
{
	long delay;
	const long uspertick = 1000000 / HZ;
	const long longdelay = 10;

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

474 475
	delay = torture_random(rrsp) %
		(nrealreaders * 2 * longdelay * uspertick);
476 477
	if (!delay)
		schedule_timeout_interruptible(longdelay);
478 479
	else
		rcu_read_delay(rrsp);
480 481
}

482
static void srcu_torture_read_unlock(int idx) __releases(&srcu_ctl)
483 484 485 486 487 488 489 490 491
{
	srcu_read_unlock(&srcu_ctl, idx);
}

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

492 493 494 495 496
static void srcu_torture_deferred_free(struct rcu_torture *rp)
{
	call_srcu(&srcu_ctl, &rp->rtort_rcu, rcu_torture_cb);
}

497 498 499 500 501
static void srcu_torture_synchronize(void)
{
	synchronize_srcu(&srcu_ctl);
}

502 503 504 505 506 507 508 509 510 511 512
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);
}

513
static void srcu_torture_stats(char *page)
514 515 516 517
{
	int cpu;
	int idx = srcu_ctl.completed & 0x1;

518
	page += sprintf(page, "%s%s per-CPU(idx=%d):",
519 520
		       torture_type, TORTURE_FLAG, idx);
	for_each_possible_cpu(cpu) {
521
		page += sprintf(page, " %d(%lu,%lu)", cpu,
522 523 524
			       per_cpu_ptr(srcu_ctl.per_cpu_ref, cpu)->c[!idx],
			       per_cpu_ptr(srcu_ctl.per_cpu_ref, cpu)->c[idx]);
	}
525
	sprintf(page, "\n");
526 527
}

528 529 530 531 532
static void srcu_torture_synchronize_expedited(void)
{
	synchronize_srcu_expedited(&srcu_ctl);
}

533
static struct rcu_torture_ops srcu_ops = {
534
	.init		= rcu_sync_torture_init,
535 536 537 538
	.readlock	= srcu_torture_read_lock,
	.read_delay	= srcu_read_delay,
	.readunlock	= srcu_torture_read_unlock,
	.completed	= srcu_torture_completed,
539
	.deferred_free	= srcu_torture_deferred_free,
540
	.sync		= srcu_torture_synchronize,
541
	.exp_sync	= srcu_torture_synchronize_expedited,
542 543
	.call		= srcu_torture_call,
	.cb_barrier	= srcu_torture_barrier,
544 545
	.stats		= srcu_torture_stats,
	.name		= "srcu"
546 547
};

548 549 550 551 552 553 554 555 556 557 558 559 560 561 562
/*
 * 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();
}

563 564 565 566 567
static void rcu_sched_torture_deferred_free(struct rcu_torture *p)
{
	call_rcu_sched(&p->rtort_rcu, rcu_torture_cb);
}

568
static struct rcu_torture_ops sched_ops = {
569 570 571 572
	.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,
573
	.completed	= rcu_no_completed,
574
	.deferred_free	= rcu_sched_torture_deferred_free,
575
	.sync		= synchronize_sched,
576 577
	.exp_sync	= synchronize_sched_expedited,
	.call		= call_rcu_sched,
578
	.cb_barrier	= rcu_barrier_sched,
579
	.fqs		= rcu_sched_force_quiescent_state,
580 581 582
	.stats		= NULL,
	.irq_capable	= 1,
	.name		= "sched"
583 584
};

585 586 587 588 589 590 591 592 593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613
/*
 * 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;

614
	VERBOSE_TOROUT_STRING("rcu_torture_boost started");
615 616 617 618

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

623
	init_rcu_head_on_stack(&rbi.rcu);
624 625 626 627
	/* Each pass through the following loop does one boost-test cycle. */
	do {
		/* Wait for the next test interval. */
		oldstarttime = boost_starttime;
628
		while (ULONG_CMP_LT(jiffies, oldstarttime)) {
629
			schedule_timeout_interruptible(oldstarttime - jiffies);
630 631 632 633 634 635 636 637 638
			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;
639
		while (ULONG_CMP_LT(jiffies, endtime)) {
640 641 642 643 644 645 646
			/* 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) {
647
					VERBOSE_TOROUT_STRING("rcu_torture_boost boosting failed");
648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665
					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.
		 */
666 667
		while (oldstarttime == boost_starttime &&
		       !kthread_should_stop()) {
668 669 670 671 672 673 674 675 676 677 678 679 680 681 682
			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. */
683
	VERBOSE_TOROUT_STRING("rcu_torture_boost task stopping");
684 685 686 687
	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. */
688
	destroy_rcu_head_on_stack(&rbi.rcu);
689 690 691
	return 0;
}

692 693 694 695 696 697 698 699 700 701 702
/*
 * 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;

703
	VERBOSE_TOROUT_STRING("rcu_torture_fqs task started");
704 705
	do {
		fqs_resume_time = jiffies + fqs_stutter * HZ;
706 707
		while (ULONG_CMP_LT(jiffies, fqs_resume_time) &&
		       !kthread_should_stop()) {
708 709 710
			schedule_timeout_interruptible(1);
		}
		fqs_burst_remaining = fqs_duration;
711 712
		while (fqs_burst_remaining > 0 &&
		       !kthread_should_stop()) {
713 714 715 716 717 718
			cur_ops->fqs();
			udelay(fqs_holdoff);
			fqs_burst_remaining -= fqs_holdoff;
		}
		rcu_stutter_wait("rcu_torture_fqs");
	} while (!kthread_should_stop() && fullstop == FULLSTOP_DONTSTOP);
719
	VERBOSE_TOROUT_STRING("rcu_torture_fqs task stopping");
720 721 722 723 724 725
	rcutorture_shutdown_absorb("rcu_torture_fqs");
	while (!kthread_should_stop())
		schedule_timeout_uninterruptible(1);
	return 0;
}

726 727 728 729 730 731 732 733
/*
 * 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)
{
734
	bool exp;
735 736
	int i;
	struct rcu_torture *rp;
737
	struct rcu_torture *rp1;
738
	struct rcu_torture *old_rp;
739
	static DEFINE_TORTURE_RANDOM(rand);
740

741
	VERBOSE_TOROUT_STRING("rcu_torture_writer task started");
742 743
	set_user_nice(current, 19);

744 745
	do {
		schedule_timeout_uninterruptible(1);
746 747
		rp = rcu_torture_alloc();
		if (rp == NULL)
748 749
			continue;
		rp->rtort_pipe_count = 0;
750
		udelay(torture_random(&rand) & 0x3ff);
751 752
		old_rp = rcu_dereference_check(rcu_torture_current,
					       current == writer_task);
753
		rp->rtort_mbtest = 1;
754
		rcu_assign_pointer(rcu_torture_current, rp);
755
		smp_wmb(); /* Mods to old_rp must follow rcu_assign_pointer() */
756
		if (old_rp) {
757 758 759 760 761
			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++;
762
			if (gp_normal == gp_exp)
763
				exp = !!(torture_random(&rand) & 0x80);
764 765 766 767 768 769 770 771 772 773 774 775 776 777 778 779 780 781 782 783 784 785 786
			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);
					}
				 }
			}
787
		}
788
		rcutorture_record_progress(++rcu_torture_current_version);
789 790
		rcu_stutter_wait("rcu_torture_writer");
	} while (!kthread_should_stop() && fullstop == FULLSTOP_DONTSTOP);
791
	VERBOSE_TOROUT_STRING("rcu_torture_writer task stopping");
792 793
	rcutorture_shutdown_absorb("rcu_torture_writer");
	while (!kthread_should_stop())
794 795 796 797
		schedule_timeout_uninterruptible(1);
	return 0;
}

798 799 800 801 802 803 804
/*
 * RCU torture fake writer kthread.  Repeatedly calls sync, with a random
 * delay between calls.
 */
static int
rcu_torture_fakewriter(void *arg)
{
805
	DEFINE_TORTURE_RANDOM(rand);
806

807
	VERBOSE_TOROUT_STRING("rcu_torture_fakewriter task started");
808 809 810
	set_user_nice(current, 19);

	do {
811 812
		schedule_timeout_uninterruptible(1 + torture_random(&rand)%10);
		udelay(torture_random(&rand) & 0x3ff);
813
		if (cur_ops->cb_barrier != NULL &&
814
		    torture_random(&rand) % (nfakewriters * 8) == 0) {
815
			cur_ops->cb_barrier();
816
		} else if (gp_normal == gp_exp) {
817
			if (torture_random(&rand) & 0x80)
818 819 820 821
				cur_ops->sync();
			else
				cur_ops->exp_sync();
		} else if (gp_normal) {
822
			cur_ops->sync();
823 824 825
		} else {
			cur_ops->exp_sync();
		}
826 827
		rcu_stutter_wait("rcu_torture_fakewriter");
	} while (!kthread_should_stop() && fullstop == FULLSTOP_DONTSTOP);
828

829
	VERBOSE_TOROUT_STRING("rcu_torture_fakewriter task stopping");
830 831
	rcutorture_shutdown_absorb("rcu_torture_fakewriter");
	while (!kthread_should_stop())
832 833 834 835
		schedule_timeout_uninterruptible(1);
	return 0;
}

836 837 838 839 840 841 842 843 844 845 846
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);
}

847 848 849 850 851 852 853 854 855 856
/*
 * 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;
857
	int completed_end;
858
	static DEFINE_TORTURE_RANDOM(rand);
859 860 861
	static DEFINE_SPINLOCK(rand_lock);
	struct rcu_torture *p;
	int pipe_count;
862
	unsigned long long ts;
863 864 865

	idx = cur_ops->readlock();
	completed = cur_ops->completed();
866
	ts = rcu_trace_clock_local();
867 868 869 870
	p = rcu_dereference_check(rcu_torture_current,
				  rcu_read_lock_bh_held() ||
				  rcu_read_lock_sched_held() ||
				  srcu_read_lock_held(&srcu_ctl));
871 872 873 874 875 876 877 878
	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);
879
	cur_ops->read_delay(&rand);
880 881 882 883 884 885 886 887
	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;
	}
888 889 890 891
	completed_end = cur_ops->completed();
	if (pipe_count > 1) {
		do_trace_rcu_torture_read(cur_ops->name, &p->rtort_rcu, ts,
					  completed, completed_end);
892
		rcutorture_trace_dump();
893
	}
R
Rusty Russell 已提交
894
	__this_cpu_inc(rcu_torture_count[pipe_count]);
895
	completed = completed_end - completed;
896 897 898 899
	if (completed > RCU_TORTURE_PIPE_LEN) {
		/* Should not happen, but... */
		completed = RCU_TORTURE_PIPE_LEN;
	}
R
Rusty Russell 已提交
900
	__this_cpu_inc(rcu_torture_batch[completed]);
901 902 903 904
	preempt_enable();
	cur_ops->readunlock(idx);
}

905 906 907 908 909 910 911 912 913 914
/*
 * 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;
915
	int completed_end;
916
	int idx;
917
	DEFINE_TORTURE_RANDOM(rand);
918 919
	struct rcu_torture *p;
	int pipe_count;
920
	struct timer_list t;
921
	unsigned long long ts;
922

923
	VERBOSE_TOROUT_STRING("rcu_torture_reader task started");
924
	set_user_nice(current, 19);
925
	if (irqreader && cur_ops->irq_capable)
926
		setup_timer_on_stack(&t, rcu_torture_timer, 0);
927

928
	do {
929
		if (irqreader && cur_ops->irq_capable) {
930
			if (!timer_pending(&t))
931
				mod_timer(&t, jiffies + 1);
932
		}
933 934
		idx = cur_ops->readlock();
		completed = cur_ops->completed();
935
		ts = rcu_trace_clock_local();
936 937 938 939
		p = rcu_dereference_check(rcu_torture_current,
					  rcu_read_lock_bh_held() ||
					  rcu_read_lock_sched_held() ||
					  srcu_read_lock_held(&srcu_ctl));
940 941
		if (p == NULL) {
			/* Wait for rcu_torture_writer to get underway */
942
			cur_ops->readunlock(idx);
943 944 945
			schedule_timeout_interruptible(HZ);
			continue;
		}
946 947
		if (p->rtort_mbtest == 0)
			atomic_inc(&n_rcu_torture_mberror);
948
		cur_ops->read_delay(&rand);
949 950 951 952 953 954
		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;
		}
955 956 957 958
		completed_end = cur_ops->completed();
		if (pipe_count > 1) {
			do_trace_rcu_torture_read(cur_ops->name, &p->rtort_rcu,
						  ts, completed, completed_end);
959
			rcutorture_trace_dump();
960
		}
R
Rusty Russell 已提交
961
		__this_cpu_inc(rcu_torture_count[pipe_count]);
962
		completed = completed_end - completed;
963 964 965 966
		if (completed > RCU_TORTURE_PIPE_LEN) {
			/* Should not happen, but... */
			completed = RCU_TORTURE_PIPE_LEN;
		}
R
Rusty Russell 已提交
967
		__this_cpu_inc(rcu_torture_batch[completed]);
968
		preempt_enable();
969
		cur_ops->readunlock(idx);
970
		schedule();
971 972
		rcu_stutter_wait("rcu_torture_reader");
	} while (!kthread_should_stop() && fullstop == FULLSTOP_DONTSTOP);
973
	VERBOSE_TOROUT_STRING("rcu_torture_reader task stopping");
974
	rcutorture_shutdown_absorb("rcu_torture_reader");
975
	if (irqreader && cur_ops->irq_capable)
976
		del_timer_sync(&t);
977
	while (!kthread_should_stop())
978 979 980 981 982 983 984
		schedule_timeout_uninterruptible(1);
	return 0;
}

/*
 * Create an RCU-torture statistics message in the specified buffer.
 */
985
static void
986 987 988 989 990 991 992
rcu_torture_printk(char *page)
{
	int cpu;
	int i;
	long pipesummary[RCU_TORTURE_PIPE_LEN + 1] = { 0 };
	long batchsummary[RCU_TORTURE_PIPE_LEN + 1] = { 0 };

993
	for_each_possible_cpu(cpu) {
994 995 996 997 998 999 1000 1001 1002
		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;
	}
1003 1004
	page += sprintf(page, "%s%s ", torture_type, TORTURE_FLAG);
	page += sprintf(page,
1005
		       "rtc: %p ver: %lu tfle: %d rta: %d rtaf: %d rtf: %d ",
1006 1007 1008 1009 1010
		       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),
1011
		       atomic_read(&n_rcu_torture_free));
1012
	page += sprintf(page, "rtmbe: %d rtbke: %ld rtbre: %ld ",
1013
		       atomic_read(&n_rcu_torture_mberror),
1014
		       n_rcu_torture_boost_ktrerror,
1015
		       n_rcu_torture_boost_rterror);
1016
	page += sprintf(page, "rtbf: %ld rtb: %ld nt: %ld ",
1017 1018
		       n_rcu_torture_boost_failure,
		       n_rcu_torture_boosts,
1019
		       n_rcu_torture_timers);
1020
	page += sprintf(page,
1021 1022 1023 1024 1025 1026
		       "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);
1027
	page += sprintf(page, "barrier: %ld/%ld:%ld",
1028 1029 1030
		       n_barrier_successes,
		       n_barrier_attempts,
		       n_rcu_torture_barrier_error);
1031
	page += sprintf(page, "\n%s%s ", torture_type, TORTURE_FLAG);
1032
	if (atomic_read(&n_rcu_torture_mberror) != 0 ||
1033
	    n_rcu_torture_barrier_error != 0 ||
1034 1035
	    n_rcu_torture_boost_ktrerror != 0 ||
	    n_rcu_torture_boost_rterror != 0 ||
1036 1037
	    n_rcu_torture_boost_failure != 0 ||
	    i > 1) {
1038
		page += sprintf(page, "!!! ");
1039
		atomic_inc(&n_rcu_torture_error);
1040
		WARN_ON_ONCE(1);
1041
	}
1042
	page += sprintf(page, "Reader Pipe: ");
1043
	for (i = 0; i < RCU_TORTURE_PIPE_LEN + 1; i++)
1044 1045 1046
		page += sprintf(page, " %ld", pipesummary[i]);
	page += sprintf(page, "\n%s%s ", torture_type, TORTURE_FLAG);
	page += sprintf(page, "Reader Batch: ");
1047
	for (i = 0; i < RCU_TORTURE_PIPE_LEN + 1; i++)
1048 1049 1050
		page += sprintf(page, " %ld", batchsummary[i]);
	page += sprintf(page, "\n%s%s ", torture_type, TORTURE_FLAG);
	page += sprintf(page, "Free-Block Circulation: ");
1051
	for (i = 0; i < RCU_TORTURE_PIPE_LEN + 1; i++) {
1052
		page += sprintf(page, " %d",
1053 1054
			       atomic_read(&rcu_torture_wcount[i]));
	}
1055
	page += sprintf(page, "\n");
1056
	if (cur_ops->stats)
1057
		cur_ops->stats(page);
1058 1059 1060 1061 1062 1063 1064 1065 1066 1067 1068 1069 1070
}

/*
 * 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)
{
1071 1072
	int size = nr_cpu_ids * 200 + 8192;
	char *buf;
1073

1074 1075 1076 1077 1078 1079 1080 1081
	buf = kmalloc(size, GFP_KERNEL);
	if (!buf) {
		pr_err("rcu-torture: Out of memory, need: %d", size);
		return;
	}
	rcu_torture_printk(buf);
	pr_alert("%s", buf);
	kfree(buf);
1082 1083 1084 1085 1086 1087 1088 1089 1090 1091 1092 1093
}

/*
 * 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)
{
1094
	VERBOSE_TOROUT_STRING("rcu_torture_stats task started");
1095 1096 1097
	do {
		schedule_timeout_interruptible(stat_interval * HZ);
		rcu_torture_stats_print();
1098 1099
		rcutorture_shutdown_absorb("rcu_torture_stats");
	} while (!kthread_should_stop());
1100
	VERBOSE_TOROUT_STRING("rcu_torture_stats task stopping");
1101 1102 1103
	return 0;
}

1104 1105 1106 1107 1108
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.
 */
1109
static void rcu_torture_shuffle_tasks(void)
1110 1111 1112
{
	int i;

R
Rusty Russell 已提交
1113
	cpumask_setall(shuffle_tmp_mask);
1114
	get_online_cpus();
1115 1116

	/* No point in shuffling if there is only one online CPU (ex: UP) */
1117 1118 1119 1120
	if (num_online_cpus() == 1) {
		put_online_cpus();
		return;
	}
1121 1122

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

R
Rusty Russell 已提交
1125
	set_cpus_allowed_ptr(current, shuffle_tmp_mask);
1126

1127
	if (reader_tasks) {
1128 1129
		for (i = 0; i < nrealreaders; i++)
			if (reader_tasks[i])
1130
				set_cpus_allowed_ptr(reader_tasks[i],
R
Rusty Russell 已提交
1131
						     shuffle_tmp_mask);
1132
	}
1133
	if (fakewriter_tasks) {
1134 1135
		for (i = 0; i < nfakewriters; i++)
			if (fakewriter_tasks[i])
1136
				set_cpus_allowed_ptr(fakewriter_tasks[i],
R
Rusty Russell 已提交
1137
						     shuffle_tmp_mask);
1138
	}
1139
	if (writer_task)
R
Rusty Russell 已提交
1140
		set_cpus_allowed_ptr(writer_task, shuffle_tmp_mask);
1141
	if (stats_task)
R
Rusty Russell 已提交
1142
		set_cpus_allowed_ptr(stats_task, shuffle_tmp_mask);
1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 1161
	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);
1162 1163 1164 1165 1166 1167

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

1168
	put_online_cpus();
1169 1170 1171 1172 1173 1174 1175 1176 1177
}

/* 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)
{
1178
	VERBOSE_TOROUT_STRING("rcu_torture_shuffle task started");
1179 1180 1181
	do {
		schedule_timeout_interruptible(shuffle_interval * HZ);
		rcu_torture_shuffle_tasks();
1182 1183
		rcutorture_shutdown_absorb("rcu_torture_shuffle");
	} while (!kthread_should_stop());
1184
	VERBOSE_TOROUT_STRING("rcu_torture_shuffle task stopping");
1185 1186 1187
	return 0;
}

1188 1189 1190 1191 1192 1193
/* Cause the rcutorture test to "stutter", starting and stopping all
 * threads periodically.
 */
static int
rcu_torture_stutter(void *arg)
{
1194
	VERBOSE_TOROUT_STRING("rcu_torture_stutter task started");
1195 1196 1197
	do {
		schedule_timeout_interruptible(stutter * HZ);
		stutter_pause_test = 1;
1198
		if (!kthread_should_stop())
1199 1200
			schedule_timeout_interruptible(stutter * HZ);
		stutter_pause_test = 0;
1201 1202
		rcutorture_shutdown_absorb("rcu_torture_stutter");
	} while (!kthread_should_stop());
1203
	VERBOSE_TOROUT_STRING("rcu_torture_stutter task stopping");
1204 1205 1206
	return 0;
}

1207
static inline void
1208
rcu_torture_print_module_parms(struct rcu_torture_ops *cur_ops, const char *tag)
1209
{
1210 1211 1212 1213 1214 1215 1216
	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 "
1217 1218
		 "stall_cpu=%d stall_cpu_holdoff=%d "
		 "n_barrier_cbs=%d "
1219 1220 1221 1222 1223 1224
		 "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,
1225 1226
		 stall_cpu, stall_cpu_holdoff,
		 n_barrier_cbs,
1227
		 onoff_interval, onoff_holdoff);
1228 1229
}

1230
static struct notifier_block rcutorture_shutdown_nb = {
1231 1232 1233
	.notifier_call = rcutorture_shutdown_notify,
};

1234 1235 1236 1237 1238 1239 1240
static void rcutorture_booster_cleanup(int cpu)
{
	struct task_struct *t;

	if (boost_tasks[cpu] == NULL)
		return;
	mutex_lock(&boost_mutex);
1241
	VERBOSE_TOROUT_STRING("Stopping rcu_torture_boost task");
1242 1243 1244 1245 1246 1247
	t = boost_tasks[cpu];
	boost_tasks[cpu] = NULL;
	mutex_unlock(&boost_mutex);

	/* This must be outside of the mutex, otherwise deadlock! */
	kthread_stop(t);
1248
	boost_tasks[cpu] = NULL;
1249 1250 1251 1252 1253 1254 1255 1256 1257 1258 1259
}

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);
1260
	VERBOSE_TOROUT_STRING("Creating rcu_torture_boost task");
E
Eric Dumazet 已提交
1261 1262 1263
	boost_tasks[cpu] = kthread_create_on_node(rcu_torture_boost, NULL,
						  cpu_to_node(cpu),
						  "rcu_torture_boost");
1264 1265
	if (IS_ERR(boost_tasks[cpu])) {
		retval = PTR_ERR(boost_tasks[cpu]);
1266
		VERBOSE_TOROUT_STRING("rcu_torture_boost task create failed");
1267 1268 1269 1270 1271 1272 1273 1274 1275 1276 1277
		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;
}

1278 1279 1280 1281 1282 1283 1284 1285 1286 1287
/*
 * 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;

1288
	VERBOSE_TOROUT_STRING("rcu_torture_shutdown task started");
1289 1290 1291 1292 1293
	jiffies_snap = ACCESS_ONCE(jiffies);
	while (ULONG_CMP_LT(jiffies_snap, shutdown_time) &&
	       !kthread_should_stop()) {
		delta = shutdown_time - jiffies_snap;
		if (verbose)
1294 1295 1296
			pr_alert("%s" TORTURE_FLAG
				 "rcu_torture_shutdown task: %lu jiffies remaining\n",
				 torture_type, delta);
1297 1298 1299
		schedule_timeout_interruptible(delta);
		jiffies_snap = ACCESS_ONCE(jiffies);
	}
1300
	if (kthread_should_stop()) {
1301
		VERBOSE_TOROUT_STRING("rcu_torture_shutdown task stopping");
1302 1303 1304 1305 1306
		return 0;
	}

	/* OK, shut down the system. */

1307
	VERBOSE_TOROUT_STRING("rcu_torture_shutdown task shutting down system");
1308 1309 1310 1311 1312 1313
	shutdown_task = NULL;	/* Avoid self-kill deadlock. */
	rcu_torture_cleanup();	/* Get the success/failure message. */
	kernel_power_off();	/* Shut down the system. */
	return 0;
}

1314 1315 1316 1317 1318 1319
#ifdef CONFIG_HOTPLUG_CPU

/*
 * Execute random CPU-hotplug operations at the interval specified
 * by the onoff_interval.
 */
1320
static int
1321 1322 1323
rcu_torture_onoff(void *arg)
{
	int cpu;
1324
	unsigned long delta;
1325
	int maxcpu = -1;
1326
	DEFINE_TORTURE_RANDOM(rand);
1327
	int ret;
1328
	unsigned long starttime;
1329

1330
	VERBOSE_TOROUT_STRING("rcu_torture_onoff task started");
1331 1332 1333
	for_each_online_cpu(cpu)
		maxcpu = cpu;
	WARN_ON(maxcpu < 0);
1334
	if (onoff_holdoff > 0) {
1335
		VERBOSE_TOROUT_STRING("rcu_torture_onoff begin holdoff");
1336
		schedule_timeout_interruptible(onoff_holdoff * HZ);
1337
		VERBOSE_TOROUT_STRING("rcu_torture_onoff end holdoff");
1338
	}
1339
	while (!kthread_should_stop()) {
1340
		cpu = (torture_random(&rand) >> 4) % (maxcpu + 1);
1341
		if (cpu_online(cpu) && cpu_is_hotpluggable(cpu)) {
1342
			if (verbose)
1343 1344 1345
				pr_alert("%s" TORTURE_FLAG
					 "rcu_torture_onoff task: offlining %d\n",
					 torture_type, cpu);
1346
			starttime = jiffies;
1347
			n_offline_attempts++;
1348 1349 1350 1351 1352 1353 1354
			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 {
1355
				if (verbose)
1356 1357 1358
					pr_alert("%s" TORTURE_FLAG
						 "rcu_torture_onoff task: offlined %d\n",
						 torture_type, cpu);
1359
				n_offline_successes++;
1360 1361 1362 1363 1364 1365 1366 1367 1368 1369
				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;
1370
			}
1371
		} else if (cpu_is_hotpluggable(cpu)) {
1372
			if (verbose)
1373 1374 1375
				pr_alert("%s" TORTURE_FLAG
					 "rcu_torture_onoff task: onlining %d\n",
					 torture_type, cpu);
1376
			starttime = jiffies;
1377
			n_online_attempts++;
1378 1379 1380 1381 1382 1383 1384
			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 {
1385
				if (verbose)
1386 1387 1388
					pr_alert("%s" TORTURE_FLAG
						 "rcu_torture_onoff task: onlined %d\n",
						 torture_type, cpu);
1389
				n_online_successes++;
1390 1391 1392 1393 1394 1395 1396 1397 1398 1399
				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;
1400 1401 1402 1403
			}
		}
		schedule_timeout_interruptible(onoff_interval * HZ);
	}
1404
	VERBOSE_TOROUT_STRING("rcu_torture_onoff task stopping");
1405 1406 1407
	return 0;
}

1408
static int
1409 1410
rcu_torture_onoff_init(void)
{
1411 1412
	int ret;

1413 1414 1415 1416
	if (onoff_interval <= 0)
		return 0;
	onoff_task = kthread_run(rcu_torture_onoff, NULL, "rcu_torture_onoff");
	if (IS_ERR(onoff_task)) {
1417
		ret = PTR_ERR(onoff_task);
1418
		onoff_task = NULL;
1419
		return ret;
1420 1421 1422 1423 1424 1425 1426 1427
	}
	return 0;
}

static void rcu_torture_onoff_cleanup(void)
{
	if (onoff_task == NULL)
		return;
1428
	VERBOSE_TOROUT_STRING("Stopping rcu_torture_onoff task");
1429
	kthread_stop(onoff_task);
1430
	onoff_task = NULL;
1431 1432 1433 1434
}

#else /* #ifdef CONFIG_HOTPLUG_CPU */

1435
static int
1436 1437
rcu_torture_onoff_init(void)
{
1438
	return 0;
1439 1440 1441 1442 1443 1444 1445 1446
}

static void rcu_torture_onoff_cleanup(void)
{
}

#endif /* #else #ifdef CONFIG_HOTPLUG_CPU */

1447 1448 1449 1450
/*
 * CPU-stall kthread.  It waits as specified by stall_cpu_holdoff, then
 * induces a CPU stall for the time specified by stall_cpu.
 */
1451
static int rcu_torture_stall(void *args)
1452 1453 1454
{
	unsigned long stop_at;

1455
	VERBOSE_TOROUT_STRING("rcu_torture_stall task started");
1456
	if (stall_cpu_holdoff > 0) {
1457
		VERBOSE_TOROUT_STRING("rcu_torture_stall begin holdoff");
1458
		schedule_timeout_interruptible(stall_cpu_holdoff * HZ);
1459
		VERBOSE_TOROUT_STRING("rcu_torture_stall end holdoff");
1460 1461 1462 1463
	}
	if (!kthread_should_stop()) {
		stop_at = get_seconds() + stall_cpu;
		/* RCU CPU stall is expected behavior in following code. */
1464
		pr_alert("rcu_torture_stall start.\n");
1465 1466 1467 1468 1469 1470
		rcu_read_lock();
		preempt_disable();
		while (ULONG_CMP_LT(get_seconds(), stop_at))
			continue;  /* Induce RCU CPU stall warning. */
		preempt_enable();
		rcu_read_unlock();
1471
		pr_alert("rcu_torture_stall end.\n");
1472 1473 1474 1475 1476 1477 1478 1479 1480 1481 1482 1483 1484 1485 1486 1487 1488 1489 1490 1491 1492 1493 1494 1495 1496 1497 1498 1499
	}
	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;
1500
	VERBOSE_TOROUT_STRING("Stopping rcu_torture_stall_task.");
1501
	kthread_stop(stall_task);
1502
	stall_task = NULL;
1503 1504
}

1505 1506 1507 1508 1509 1510 1511 1512 1513 1514
/* 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;
1515
	bool lastphase = 0;
1516
	bool newphase;
1517 1518 1519
	struct rcu_head rcu;

	init_rcu_head_on_stack(&rcu);
1520
	VERBOSE_TOROUT_STRING("rcu_torture_barrier_cbs task started");
1521 1522 1523
	set_user_nice(current, 19);
	do {
		wait_event(barrier_cbs_wq[myid],
1524 1525
			   (newphase =
			    ACCESS_ONCE(barrier_phase)) != lastphase ||
1526 1527
			   kthread_should_stop() ||
			   fullstop != FULLSTOP_DONTSTOP);
1528
		lastphase = newphase;
1529
		smp_mb(); /* ensure barrier_phase load before ->call(). */
1530 1531 1532 1533 1534 1535
		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);
1536
	VERBOSE_TOROUT_STRING("rcu_torture_barrier_cbs task stopping");
1537 1538 1539 1540 1541 1542 1543 1544 1545 1546 1547 1548 1549
	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;

1550
	VERBOSE_TOROUT_STRING("rcu_torture_barrier task starting");
1551 1552 1553
	do {
		atomic_set(&barrier_cbs_invoked, 0);
		atomic_set(&barrier_cbs_count, n_barrier_cbs);
1554 1555
		smp_mb(); /* Ensure barrier_phase after prior assignments. */
		barrier_phase = !barrier_phase;
1556 1557 1558 1559 1560 1561 1562 1563 1564
		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++;
1565
		cur_ops->cb_barrier(); /* Implies smp_mb() for wait_event(). */
1566 1567 1568 1569 1570 1571 1572
		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);
1573
	VERBOSE_TOROUT_STRING("rcu_torture_barrier task stopping");
1574
	rcutorture_shutdown_absorb("rcu_torture_barrier");
1575 1576 1577 1578 1579 1580 1581 1582 1583 1584 1585 1586 1587 1588
	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) {
1589 1590 1591 1592 1593 1594
		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);
1595 1596 1597 1598 1599 1600 1601 1602 1603 1604
		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);
1605
	if (barrier_cbs_tasks == NULL || !barrier_cbs_wq)
1606 1607 1608 1609
		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,
1610
						   (void *)(long)i,
1611 1612 1613
						   "rcu_torture_barrier_cbs");
		if (IS_ERR(barrier_cbs_tasks[i])) {
			ret = PTR_ERR(barrier_cbs_tasks[i]);
1614
			VERBOSE_TOROUT_ERRSTRING("Failed to create rcu_torture_barrier_cbs");
1615 1616 1617 1618 1619 1620 1621 1622
			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);
1623
		VERBOSE_TOROUT_ERRSTRING("Failed to create rcu_torture_barrier");
1624 1625 1626 1627 1628 1629 1630 1631 1632 1633 1634
		barrier_task = NULL;
	}
	return 0;
}

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

	if (barrier_task != NULL) {
1635
		VERBOSE_TOROUT_STRING("Stopping rcu_torture_barrier task");
1636 1637 1638 1639 1640 1641
		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) {
1642
				VERBOSE_TOROUT_STRING("Stopping rcu_torture_barrier_cbs task");
1643 1644 1645 1646 1647 1648 1649 1650 1651 1652 1653 1654 1655
				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;
	}
}

1656 1657 1658 1659 1660 1661 1662 1663 1664 1665 1666 1667 1668 1669 1670 1671 1672 1673 1674 1675 1676 1677 1678
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,
};

1679 1680 1681 1682 1683
static void
rcu_torture_cleanup(void)
{
	int i;

1684
	mutex_lock(&fullstop_mutex);
1685
	rcutorture_record_test_transition();
1686
	if (fullstop == FULLSTOP_SHUTDOWN) {
1687
		pr_warn(/* but going down anyway, so... */
1688
		       "Concurrent 'rmmod rcutorture' and shutdown illegal!\n");
1689
		mutex_unlock(&fullstop_mutex);
1690
		schedule_timeout_uninterruptible(10);
1691 1692 1693 1694
		if (cur_ops->cb_barrier != NULL)
			cur_ops->cb_barrier();
		return;
	}
1695
	fullstop = FULLSTOP_RMMOD;
1696
	mutex_unlock(&fullstop_mutex);
1697
	unregister_reboot_notifier(&rcutorture_shutdown_nb);
1698
	rcu_torture_barrier_cleanup();
1699
	rcu_torture_stall_cleanup();
1700
	if (stutter_task) {
1701
		VERBOSE_TOROUT_STRING("Stopping rcu_torture_stutter task");
1702 1703 1704
		kthread_stop(stutter_task);
	}
	stutter_task = NULL;
1705
	if (shuffler_task) {
1706
		VERBOSE_TOROUT_STRING("Stopping rcu_torture_shuffle task");
1707
		kthread_stop(shuffler_task);
R
Rusty Russell 已提交
1708
		free_cpumask_var(shuffle_tmp_mask);
1709 1710 1711
	}
	shuffler_task = NULL;

1712
	if (writer_task) {
1713
		VERBOSE_TOROUT_STRING("Stopping rcu_torture_writer task");
1714 1715 1716 1717
		kthread_stop(writer_task);
	}
	writer_task = NULL;

1718
	if (reader_tasks) {
1719
		for (i = 0; i < nrealreaders; i++) {
1720
			if (reader_tasks[i]) {
1721
				VERBOSE_TOROUT_STRING(
1722 1723 1724 1725 1726 1727 1728 1729 1730 1731
					"Stopping rcu_torture_reader task");
				kthread_stop(reader_tasks[i]);
			}
			reader_tasks[i] = NULL;
		}
		kfree(reader_tasks);
		reader_tasks = NULL;
	}
	rcu_torture_current = NULL;

1732
	if (fakewriter_tasks) {
1733
		for (i = 0; i < nfakewriters; i++) {
1734
			if (fakewriter_tasks[i]) {
1735
				VERBOSE_TOROUT_STRING(
1736 1737 1738 1739 1740 1741 1742 1743 1744
					"Stopping rcu_torture_fakewriter task");
				kthread_stop(fakewriter_tasks[i]);
			}
			fakewriter_tasks[i] = NULL;
		}
		kfree(fakewriter_tasks);
		fakewriter_tasks = NULL;
	}

1745
	if (stats_task) {
1746
		VERBOSE_TOROUT_STRING("Stopping rcu_torture_stats task");
1747 1748 1749 1750
		kthread_stop(stats_task);
	}
	stats_task = NULL;

1751
	if (fqs_task) {
1752
		VERBOSE_TOROUT_STRING("Stopping rcu_torture_fqs task");
1753 1754 1755
		kthread_stop(fqs_task);
	}
	fqs_task = NULL;
1756 1757 1758 1759 1760 1761
	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);
	}
1762
	if (shutdown_task != NULL) {
1763
		VERBOSE_TOROUT_STRING("Stopping rcu_torture_shutdown task");
1764 1765
		kthread_stop(shutdown_task);
	}
1766
	shutdown_task = NULL;
1767
	rcu_torture_onoff_cleanup();
1768

1769
	/* Wait for all RCU callbacks to fire.  */
1770 1771 1772

	if (cur_ops->cb_barrier != NULL)
		cur_ops->cb_barrier();
1773 1774

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

1776
	if (atomic_read(&n_rcu_torture_error) || n_rcu_torture_barrier_error)
1777
		rcu_torture_print_module_parms(cur_ops, "End of test: FAILURE");
1778 1779 1780 1781
	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");
1782
	else
1783
		rcu_torture_print_module_parms(cur_ops, "End of test: SUCCESS");
1784 1785
}

1786 1787 1788 1789 1790 1791 1792 1793 1794 1795 1796 1797 1798 1799 1800 1801 1802 1803 1804 1805 1806 1807 1808 1809 1810 1811 1812 1813 1814 1815 1816 1817 1818 1819 1820 1821 1822 1823 1824 1825 1826 1827 1828 1829 1830 1831 1832 1833 1834 1835 1836 1837 1838 1839 1840 1841
#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 */
}

1842
static int __init
1843 1844 1845 1846 1847
rcu_torture_init(void)
{
	int i;
	int cpu;
	int firsterr = 0;
1848
	int retval;
1849 1850 1851
	static struct rcu_torture_ops *torture_ops[] = {
		&rcu_ops, &rcu_bh_ops, &srcu_ops, &sched_ops,
	};
1852

1853 1854
	mutex_lock(&fullstop_mutex);

1855
	/* Process args and tell the world that the torturer is on the job. */
1856
	for (i = 0; i < ARRAY_SIZE(torture_ops); i++) {
1857
		cur_ops = torture_ops[i];
1858
		if (strcmp(torture_type, cur_ops->name) == 0)
1859 1860
			break;
	}
1861
	if (i == ARRAY_SIZE(torture_ops)) {
1862 1863 1864
		pr_alert("rcu-torture: invalid torture type: \"%s\"\n",
			 torture_type);
		pr_alert("rcu-torture types:");
1865
		for (i = 0; i < ARRAY_SIZE(torture_ops); i++)
1866 1867
			pr_alert(" %s", torture_ops[i]->name);
		pr_alert("\n");
1868
		mutex_unlock(&fullstop_mutex);
1869
		return -EINVAL;
1870
	}
1871
	if (cur_ops->fqs == NULL && fqs_duration != 0) {
1872
		pr_alert("rcu-torture: ->fqs NULL and non-zero fqs_duration, fqs disabled.\n");
1873 1874
		fqs_duration = 0;
	}
1875
	if (cur_ops->init)
1876 1877
		cur_ops->init(); /* no "goto unwind" prior to this point!!! */

1878 1879 1880 1881
	if (nreaders >= 0)
		nrealreaders = nreaders;
	else
		nrealreaders = 2 * num_online_cpus();
1882
	rcu_torture_print_module_parms(cur_ops, "Start of test");
1883
	fullstop = FULLSTOP_DONTSTOP;
1884 1885 1886 1887

	/* Set up the freelist. */

	INIT_LIST_HEAD(&rcu_torture_freelist);
1888
	for (i = 0; i < ARRAY_SIZE(rcu_tortures); i++) {
1889
		rcu_tortures[i].rtort_mbtest = 0;
1890 1891 1892 1893 1894 1895 1896 1897 1898 1899 1900
		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);
1901 1902
	atomic_set(&n_rcu_torture_mberror, 0);
	atomic_set(&n_rcu_torture_error, 0);
1903
	n_rcu_torture_barrier_error = 0;
1904 1905 1906 1907
	n_rcu_torture_boost_ktrerror = 0;
	n_rcu_torture_boost_rterror = 0;
	n_rcu_torture_boost_failure = 0;
	n_rcu_torture_boosts = 0;
1908 1909
	for (i = 0; i < RCU_TORTURE_PIPE_LEN + 1; i++)
		atomic_set(&rcu_torture_wcount[i], 0);
1910
	for_each_possible_cpu(cpu) {
1911 1912 1913 1914 1915 1916 1917 1918
		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. */

1919
	VERBOSE_TOROUT_STRING("Creating rcu_torture_writer task");
1920 1921
	writer_task = kthread_create(rcu_torture_writer, NULL,
				     "rcu_torture_writer");
1922 1923
	if (IS_ERR(writer_task)) {
		firsterr = PTR_ERR(writer_task);
1924
		VERBOSE_TOROUT_ERRSTRING("Failed to create writer");
1925 1926 1927
		writer_task = NULL;
		goto unwind;
	}
1928
	wake_up_process(writer_task);
1929
	fakewriter_tasks = kzalloc(nfakewriters * sizeof(fakewriter_tasks[0]),
1930
				   GFP_KERNEL);
1931
	if (fakewriter_tasks == NULL) {
1932
		VERBOSE_TOROUT_ERRSTRING("out of memory");
1933 1934 1935 1936
		firsterr = -ENOMEM;
		goto unwind;
	}
	for (i = 0; i < nfakewriters; i++) {
1937
		VERBOSE_TOROUT_STRING("Creating rcu_torture_fakewriter task");
1938
		fakewriter_tasks[i] = kthread_run(rcu_torture_fakewriter, NULL,
1939
						  "rcu_torture_fakewriter");
1940 1941
		if (IS_ERR(fakewriter_tasks[i])) {
			firsterr = PTR_ERR(fakewriter_tasks[i]);
1942
			VERBOSE_TOROUT_ERRSTRING("Failed to create fakewriter");
1943 1944 1945 1946
			fakewriter_tasks[i] = NULL;
			goto unwind;
		}
	}
1947
	reader_tasks = kzalloc(nrealreaders * sizeof(reader_tasks[0]),
1948 1949
			       GFP_KERNEL);
	if (reader_tasks == NULL) {
1950
		VERBOSE_TOROUT_ERRSTRING("out of memory");
1951 1952 1953 1954
		firsterr = -ENOMEM;
		goto unwind;
	}
	for (i = 0; i < nrealreaders; i++) {
1955
		VERBOSE_TOROUT_STRING("Creating rcu_torture_reader task");
1956 1957 1958 1959
		reader_tasks[i] = kthread_run(rcu_torture_reader, NULL,
					      "rcu_torture_reader");
		if (IS_ERR(reader_tasks[i])) {
			firsterr = PTR_ERR(reader_tasks[i]);
1960
			VERBOSE_TOROUT_ERRSTRING("Failed to create reader");
1961 1962 1963 1964 1965
			reader_tasks[i] = NULL;
			goto unwind;
		}
	}
	if (stat_interval > 0) {
1966
		VERBOSE_TOROUT_STRING("Creating rcu_torture_stats task");
1967 1968 1969 1970
		stats_task = kthread_run(rcu_torture_stats, NULL,
					"rcu_torture_stats");
		if (IS_ERR(stats_task)) {
			firsterr = PTR_ERR(stats_task);
1971
			VERBOSE_TOROUT_ERRSTRING("Failed to create stats");
1972 1973 1974 1975
			stats_task = NULL;
			goto unwind;
		}
	}
1976 1977
	if (test_no_idle_hz) {
		rcu_idle_cpu = num_online_cpus() - 1;
R
Rusty Russell 已提交
1978 1979 1980

		if (!alloc_cpumask_var(&shuffle_tmp_mask, GFP_KERNEL)) {
			firsterr = -ENOMEM;
1981
			VERBOSE_TOROUT_ERRSTRING("Failed to alloc mask");
R
Rusty Russell 已提交
1982 1983 1984
			goto unwind;
		}

1985 1986 1987 1988
		/* Create the shuffler thread */
		shuffler_task = kthread_run(rcu_torture_shuffle, NULL,
					  "rcu_torture_shuffle");
		if (IS_ERR(shuffler_task)) {
R
Rusty Russell 已提交
1989
			free_cpumask_var(shuffle_tmp_mask);
1990
			firsterr = PTR_ERR(shuffler_task);
1991
			VERBOSE_TOROUT_ERRSTRING("Failed to create shuffler");
1992 1993 1994 1995
			shuffler_task = NULL;
			goto unwind;
		}
	}
1996 1997 1998 1999 2000 2001 2002 2003
	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);
2004
			VERBOSE_TOROUT_ERRSTRING("Failed to create stutter");
2005 2006 2007 2008
			stutter_task = NULL;
			goto unwind;
		}
	}
2009 2010 2011 2012 2013 2014 2015 2016
	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);
2017
			VERBOSE_TOROUT_ERRSTRING("Failed to create fqs");
2018 2019 2020 2021
			fqs_task = NULL;
			goto unwind;
		}
	}
2022 2023 2024 2025 2026 2027 2028 2029 2030 2031 2032 2033 2034 2035 2036 2037 2038 2039 2040
	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;
			}
		}
	}
2041 2042
	if (shutdown_secs > 0) {
		shutdown_time = jiffies + shutdown_secs * HZ;
2043 2044
		shutdown_task = kthread_create(rcu_torture_shutdown, NULL,
					       "rcu_torture_shutdown");
2045 2046
		if (IS_ERR(shutdown_task)) {
			firsterr = PTR_ERR(shutdown_task);
2047
			VERBOSE_TOROUT_ERRSTRING("Failed to create shutdown");
2048 2049 2050
			shutdown_task = NULL;
			goto unwind;
		}
2051
		wake_up_process(shutdown_task);
2052
	}
2053 2054 2055 2056 2057
	i = rcu_torture_onoff_init();
	if (i != 0) {
		firsterr = i;
		goto unwind;
	}
2058
	register_reboot_notifier(&rcutorture_shutdown_nb);
2059 2060 2061 2062 2063
	i = rcu_torture_stall_init();
	if (i != 0) {
		firsterr = i;
		goto unwind;
	}
2064 2065 2066 2067 2068
	retval = rcu_torture_barrier_init();
	if (retval != 0) {
		firsterr = retval;
		goto unwind;
	}
2069 2070
	if (object_debug)
		rcu_test_debug_objects();
2071
	rcutorture_record_test_transition();
2072
	mutex_unlock(&fullstop_mutex);
2073 2074 2075
	return 0;

unwind:
2076
	mutex_unlock(&fullstop_mutex);
2077 2078 2079 2080 2081 2082
	rcu_torture_cleanup();
	return firsterr;
}

module_init(rcu_torture_init);
module_exit(rcu_torture_cleanup);