2 * Read-Copy Update module-based performance-test facility
4 * This program is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published by
6 * the Free Software Foundation; either version 2 of the License, or
7 * (at your option) any later version.
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this program; if not, you can access it online at
16 * http://www.gnu.org/licenses/gpl-2.0.html.
18 * Copyright (C) IBM Corporation, 2015
20 * Authors: Paul E. McKenney <paulmck@us.ibm.com>
22 #include <linux/types.h>
23 #include <linux/kernel.h>
24 #include <linux/init.h>
25 #include <linux/module.h>
26 #include <linux/kthread.h>
27 #include <linux/err.h>
28 #include <linux/spinlock.h>
29 #include <linux/smp.h>
30 #include <linux/rcupdate.h>
31 #include <linux/interrupt.h>
32 #include <linux/sched.h>
33 #include <uapi/linux/sched/types.h>
34 #include <linux/atomic.h>
35 #include <linux/bitops.h>
36 #include <linux/completion.h>
37 #include <linux/moduleparam.h>
38 #include <linux/percpu.h>
39 #include <linux/notifier.h>
40 #include <linux/reboot.h>
41 #include <linux/freezer.h>
42 #include <linux/cpu.h>
43 #include <linux/delay.h>
44 #include <linux/stat.h>
45 #include <linux/srcu.h>
46 #include <linux/slab.h>
47 #include <asm/byteorder.h>
48 #include <linux/torture.h>
49 #include <linux/vmalloc.h>
53 MODULE_LICENSE("GPL");
54 MODULE_AUTHOR("Paul E. McKenney <paulmck@linux.vnet.ibm.com>");
56 #define PERF_FLAG "-perf:"
57 #define PERFOUT_STRING(s) \
58 pr_alert("%s" PERF_FLAG " %s\n", perf_type, s)
59 #define VERBOSE_PERFOUT_STRING(s) \
60 do { if (verbose) pr_alert("%s" PERF_FLAG " %s\n", perf_type, s); } while (0)
61 #define VERBOSE_PERFOUT_ERRSTRING(s) \
62 do { if (verbose) pr_alert("%s" PERF_FLAG "!!! %s\n", perf_type, s); } while (0)
64 torture_param(bool, gp_async
, false, "Use asynchronous GP wait primitives");
65 torture_param(int, gp_async_max
, 1000, "Max # outstanding waits per reader");
66 torture_param(bool, gp_exp
, false, "Use expedited GP wait primitives");
67 torture_param(int, holdoff
, 10, "Holdoff time before test start (s)");
68 torture_param(int, nreaders
, 0, "Number of RCU reader threads");
69 torture_param(int, nwriters
, -1, "Number of RCU updater threads");
70 torture_param(bool, shutdown
, !IS_ENABLED(MODULE
),
71 "Shutdown at end of performance tests.");
72 torture_param(bool, verbose
, true, "Enable verbose debugging printk()s");
73 torture_param(int, writer_holdoff
, 0, "Holdoff (us) between GPs, zero to disable");
75 static char *perf_type
= "rcu";
76 module_param(perf_type
, charp
, 0444);
77 MODULE_PARM_DESC(perf_type
, "Type of RCU to performance-test (rcu, rcu_bh, ...)");
79 static int nrealreaders
;
80 static int nrealwriters
;
81 static struct task_struct
**writer_tasks
;
82 static struct task_struct
**reader_tasks
;
83 static struct task_struct
*shutdown_task
;
85 static u64
**writer_durations
;
86 static int *writer_n_durations
;
87 static atomic_t n_rcu_perf_reader_started
;
88 static atomic_t n_rcu_perf_writer_started
;
89 static atomic_t n_rcu_perf_writer_finished
;
90 static wait_queue_head_t shutdown_wq
;
91 static u64 t_rcu_perf_writer_started
;
92 static u64 t_rcu_perf_writer_finished
;
93 static unsigned long b_rcu_perf_writer_started
;
94 static unsigned long b_rcu_perf_writer_finished
;
95 static DEFINE_PER_CPU(atomic_t
, n_async_inflight
);
97 static int rcu_perf_writer_state
;
100 #define RTWS_BARRIER 2
101 #define RTWS_EXP_SYNC 3
104 #define RTWS_STOPPING 6
106 #define MAX_MEAS 10000
110 * Operations vector for selecting different types of tests.
113 struct rcu_perf_ops
{
116 void (*cleanup
)(void);
117 int (*readlock
)(void);
118 void (*readunlock
)(int idx
);
119 unsigned long (*started
)(void);
120 unsigned long (*completed
)(void);
121 unsigned long (*exp_completed
)(void);
122 void (*async
)(struct rcu_head
*head
, rcu_callback_t func
);
123 void (*gp_barrier
)(void);
125 void (*exp_sync
)(void);
129 static struct rcu_perf_ops
*cur_ops
;
132 * Definitions for rcu perf testing.
135 static int rcu_perf_read_lock(void) __acquires(RCU
)
141 static void rcu_perf_read_unlock(int idx
) __releases(RCU
)
146 static unsigned long __maybe_unused
rcu_no_completed(void)
151 static void rcu_sync_perf_init(void)
155 static struct rcu_perf_ops rcu_ops
= {
157 .init
= rcu_sync_perf_init
,
158 .readlock
= rcu_perf_read_lock
,
159 .readunlock
= rcu_perf_read_unlock
,
160 .started
= rcu_batches_started
,
161 .completed
= rcu_batches_completed
,
162 .exp_completed
= rcu_exp_batches_completed
,
164 .gp_barrier
= rcu_barrier
,
165 .sync
= synchronize_rcu
,
166 .exp_sync
= synchronize_rcu_expedited
,
171 * Definitions for rcu_bh perf testing.
174 static int rcu_bh_perf_read_lock(void) __acquires(RCU_BH
)
180 static void rcu_bh_perf_read_unlock(int idx
) __releases(RCU_BH
)
182 rcu_read_unlock_bh();
185 static struct rcu_perf_ops rcu_bh_ops
= {
186 .ptype
= RCU_BH_FLAVOR
,
187 .init
= rcu_sync_perf_init
,
188 .readlock
= rcu_bh_perf_read_lock
,
189 .readunlock
= rcu_bh_perf_read_unlock
,
190 .started
= rcu_batches_started_bh
,
191 .completed
= rcu_batches_completed_bh
,
192 .exp_completed
= rcu_exp_batches_completed_sched
,
193 .async
= call_rcu_bh
,
194 .gp_barrier
= rcu_barrier_bh
,
195 .sync
= synchronize_rcu_bh
,
196 .exp_sync
= synchronize_rcu_bh_expedited
,
201 * Definitions for srcu perf testing.
204 DEFINE_STATIC_SRCU(srcu_ctl_perf
);
205 static struct srcu_struct
*srcu_ctlp
= &srcu_ctl_perf
;
207 static int srcu_perf_read_lock(void) __acquires(srcu_ctlp
)
209 return srcu_read_lock(srcu_ctlp
);
212 static void srcu_perf_read_unlock(int idx
) __releases(srcu_ctlp
)
214 srcu_read_unlock(srcu_ctlp
, idx
);
217 static unsigned long srcu_perf_completed(void)
219 return srcu_batches_completed(srcu_ctlp
);
222 static void srcu_call_rcu(struct rcu_head
*head
, rcu_callback_t func
)
224 call_srcu(srcu_ctlp
, head
, func
);
227 static void srcu_rcu_barrier(void)
229 srcu_barrier(srcu_ctlp
);
232 static void srcu_perf_synchronize(void)
234 synchronize_srcu(srcu_ctlp
);
237 static void srcu_perf_synchronize_expedited(void)
239 synchronize_srcu_expedited(srcu_ctlp
);
242 static struct rcu_perf_ops srcu_ops
= {
243 .ptype
= SRCU_FLAVOR
,
244 .init
= rcu_sync_perf_init
,
245 .readlock
= srcu_perf_read_lock
,
246 .readunlock
= srcu_perf_read_unlock
,
248 .completed
= srcu_perf_completed
,
249 .exp_completed
= srcu_perf_completed
,
250 .async
= srcu_call_rcu
,
251 .gp_barrier
= srcu_rcu_barrier
,
252 .sync
= srcu_perf_synchronize
,
253 .exp_sync
= srcu_perf_synchronize_expedited
,
257 static struct srcu_struct srcud
;
259 static void srcu_sync_perf_init(void)
262 init_srcu_struct(srcu_ctlp
);
265 static void srcu_sync_perf_cleanup(void)
267 cleanup_srcu_struct(srcu_ctlp
);
270 static struct rcu_perf_ops srcud_ops
= {
271 .ptype
= SRCU_FLAVOR
,
272 .init
= srcu_sync_perf_init
,
273 .cleanup
= srcu_sync_perf_cleanup
,
274 .readlock
= srcu_perf_read_lock
,
275 .readunlock
= srcu_perf_read_unlock
,
277 .completed
= srcu_perf_completed
,
278 .exp_completed
= srcu_perf_completed
,
279 .async
= srcu_call_rcu
,
280 .gp_barrier
= srcu_rcu_barrier
,
281 .sync
= srcu_perf_synchronize
,
282 .exp_sync
= srcu_perf_synchronize_expedited
,
287 * Definitions for sched perf testing.
290 static int sched_perf_read_lock(void)
296 static void sched_perf_read_unlock(int idx
)
301 static struct rcu_perf_ops sched_ops
= {
302 .ptype
= RCU_SCHED_FLAVOR
,
303 .init
= rcu_sync_perf_init
,
304 .readlock
= sched_perf_read_lock
,
305 .readunlock
= sched_perf_read_unlock
,
306 .started
= rcu_batches_started_sched
,
307 .completed
= rcu_batches_completed_sched
,
308 .exp_completed
= rcu_exp_batches_completed_sched
,
309 .async
= call_rcu_sched
,
310 .gp_barrier
= rcu_barrier_sched
,
311 .sync
= synchronize_sched
,
312 .exp_sync
= synchronize_sched_expedited
,
317 * Definitions for RCU-tasks perf testing.
320 static int tasks_perf_read_lock(void)
325 static void tasks_perf_read_unlock(int idx
)
329 static struct rcu_perf_ops tasks_ops
= {
330 .ptype
= RCU_TASKS_FLAVOR
,
331 .init
= rcu_sync_perf_init
,
332 .readlock
= tasks_perf_read_lock
,
333 .readunlock
= tasks_perf_read_unlock
,
334 .started
= rcu_no_completed
,
335 .completed
= rcu_no_completed
,
336 .async
= call_rcu_tasks
,
337 .gp_barrier
= rcu_barrier_tasks
,
338 .sync
= synchronize_rcu_tasks
,
339 .exp_sync
= synchronize_rcu_tasks
,
343 static bool __maybe_unused
torturing_tasks(void)
345 return cur_ops
== &tasks_ops
;
349 * If performance tests complete, wait for shutdown to commence.
351 static void rcu_perf_wait_shutdown(void)
353 cond_resched_rcu_qs();
354 if (atomic_read(&n_rcu_perf_writer_finished
) < nrealwriters
)
356 while (!torture_must_stop())
357 schedule_timeout_uninterruptible(1);
361 * RCU perf reader kthread. Repeatedly does empty RCU read-side
362 * critical section, minimizing update-side interference.
365 rcu_perf_reader(void *arg
)
371 VERBOSE_PERFOUT_STRING("rcu_perf_reader task started");
372 set_cpus_allowed_ptr(current
, cpumask_of(me
% nr_cpu_ids
));
373 set_user_nice(current
, MAX_NICE
);
374 atomic_inc(&n_rcu_perf_reader_started
);
377 local_irq_save(flags
);
378 idx
= cur_ops
->readlock();
379 cur_ops
->readunlock(idx
);
380 local_irq_restore(flags
);
381 rcu_perf_wait_shutdown();
382 } while (!torture_must_stop());
383 torture_kthread_stopping("rcu_perf_reader");
388 * Callback function for asynchronous grace periods from rcu_perf_writer().
390 static void rcu_perf_async_cb(struct rcu_head
*rhp
)
392 atomic_dec(this_cpu_ptr(&n_async_inflight
));
397 * RCU perf writer kthread. Repeatedly does a grace period.
400 rcu_perf_writer(void *arg
)
405 struct rcu_head
*rhp
= NULL
;
406 struct sched_param sp
;
407 bool started
= false, done
= false, alldone
= false;
410 u64
*wdpp
= writer_durations
[me
];
412 VERBOSE_PERFOUT_STRING("rcu_perf_writer task started");
414 set_cpus_allowed_ptr(current
, cpumask_of(me
% nr_cpu_ids
));
415 sp
.sched_priority
= 1;
416 sched_setscheduler_nocheck(current
, SCHED_FIFO
, &sp
);
419 schedule_timeout_uninterruptible(holdoff
* HZ
);
421 t
= ktime_get_mono_fast_ns();
422 if (atomic_inc_return(&n_rcu_perf_writer_started
) >= nrealwriters
) {
423 t_rcu_perf_writer_started
= t
;
425 b_rcu_perf_writer_started
=
426 cur_ops
->exp_completed() / 2;
428 b_rcu_perf_writer_started
=
429 cur_ops
->completed();
435 udelay(writer_holdoff
);
437 *wdp
= ktime_get_mono_fast_ns();
441 rhp
= kmalloc(sizeof(*rhp
), GFP_KERNEL
);
442 if (rhp
&& atomic_read(this_cpu_ptr(&n_async_inflight
)) < gp_async_max
) {
443 rcu_perf_writer_state
= RTWS_ASYNC
;
444 atomic_inc(this_cpu_ptr(&n_async_inflight
));
445 cur_ops
->async(rhp
, rcu_perf_async_cb
);
447 } else if (!kthread_should_stop()) {
448 rcu_perf_writer_state
= RTWS_BARRIER
;
449 cur_ops
->gp_barrier();
452 kfree(rhp
); /* Because we are stopping. */
455 rcu_perf_writer_state
= RTWS_EXP_SYNC
;
458 rcu_perf_writer_state
= RTWS_SYNC
;
461 rcu_perf_writer_state
= RTWS_IDLE
;
462 t
= ktime_get_mono_fast_ns();
466 atomic_read(&n_rcu_perf_writer_started
) >= nrealwriters
)
468 if (!done
&& i
>= MIN_MEAS
) {
470 sp
.sched_priority
= 0;
471 sched_setscheduler_nocheck(current
,
473 pr_alert("%s%s rcu_perf_writer %ld has %d measurements\n",
474 perf_type
, PERF_FLAG
, me
, MIN_MEAS
);
475 if (atomic_inc_return(&n_rcu_perf_writer_finished
) >=
477 schedule_timeout_interruptible(10);
478 rcu_ftrace_dump(DUMP_ALL
);
479 PERFOUT_STRING("Test complete");
480 t_rcu_perf_writer_finished
= t
;
482 b_rcu_perf_writer_finished
=
483 cur_ops
->exp_completed() / 2;
485 b_rcu_perf_writer_finished
=
486 cur_ops
->completed();
489 smp_mb(); /* Assign before wake. */
490 wake_up(&shutdown_wq
);
494 if (done
&& !alldone
&&
495 atomic_read(&n_rcu_perf_writer_finished
) >= nrealwriters
)
497 if (started
&& !alldone
&& i
< MAX_MEAS
- 1)
499 rcu_perf_wait_shutdown();
500 } while (!torture_must_stop());
502 rcu_perf_writer_state
= RTWS_BARRIER
;
503 cur_ops
->gp_barrier();
505 rcu_perf_writer_state
= RTWS_STOPPING
;
506 writer_n_durations
[me
] = i_max
;
507 torture_kthread_stopping("rcu_perf_writer");
512 rcu_perf_print_module_parms(struct rcu_perf_ops
*cur_ops
, const char *tag
)
514 pr_alert("%s" PERF_FLAG
515 "--- %s: nreaders=%d nwriters=%d verbose=%d shutdown=%d\n",
516 perf_type
, tag
, nrealreaders
, nrealwriters
, verbose
, shutdown
);
520 rcu_perf_cleanup(void)
529 * Would like warning at start, but everything is expedited
530 * during the mid-boot phase, so have to wait till the end.
532 if (rcu_gp_is_expedited() && !rcu_gp_is_normal() && !gp_exp
)
533 VERBOSE_PERFOUT_ERRSTRING("All grace periods expedited, no normal ones to measure!");
534 if (rcu_gp_is_normal() && gp_exp
)
535 VERBOSE_PERFOUT_ERRSTRING("All grace periods normal, no expedited ones to measure!");
536 if (gp_exp
&& gp_async
)
537 VERBOSE_PERFOUT_ERRSTRING("No expedited async GPs, so went with async!");
539 if (torture_cleanup_begin())
543 for (i
= 0; i
< nrealreaders
; i
++)
544 torture_stop_kthread(rcu_perf_reader
,
550 for (i
= 0; i
< nrealwriters
; i
++) {
551 torture_stop_kthread(rcu_perf_writer
,
553 if (!writer_n_durations
)
555 j
= writer_n_durations
[i
];
556 pr_alert("%s%s writer %d gps: %d\n",
557 perf_type
, PERF_FLAG
, i
, j
);
560 pr_alert("%s%s start: %llu end: %llu duration: %llu gps: %d batches: %ld\n",
561 perf_type
, PERF_FLAG
,
562 t_rcu_perf_writer_started
, t_rcu_perf_writer_finished
,
563 t_rcu_perf_writer_finished
-
564 t_rcu_perf_writer_started
,
566 b_rcu_perf_writer_finished
-
567 b_rcu_perf_writer_started
);
568 for (i
= 0; i
< nrealwriters
; i
++) {
569 if (!writer_durations
)
571 if (!writer_n_durations
)
573 wdpp
= writer_durations
[i
];
576 for (j
= 0; j
<= writer_n_durations
[i
]; j
++) {
578 pr_alert("%s%s %4d writer-duration: %5d %llu\n",
579 perf_type
, PERF_FLAG
,
582 schedule_timeout_uninterruptible(1);
584 kfree(writer_durations
[i
]);
587 kfree(writer_durations
);
588 kfree(writer_n_durations
);
591 /* Do flavor-specific cleanup operations. */
592 if (cur_ops
->cleanup
!= NULL
)
595 torture_cleanup_end();
599 * Return the number if non-negative. If -1, the number of CPUs.
600 * If less than -1, that much less than the number of CPUs, but
603 static int compute_real(int n
)
610 nr
= num_online_cpus() + 1 + n
;
618 * RCU perf shutdown kthread. Just waits to be awakened, then shuts
622 rcu_perf_shutdown(void *arg
)
625 wait_event(shutdown_wq
,
626 atomic_read(&n_rcu_perf_writer_finished
) >=
628 } while (atomic_read(&n_rcu_perf_writer_finished
) < nrealwriters
);
629 smp_mb(); /* Wake before output. */
640 static struct rcu_perf_ops
*perf_ops
[] = {
641 &rcu_ops
, &rcu_bh_ops
, &srcu_ops
, &srcud_ops
, &sched_ops
,
645 if (!torture_init_begin(perf_type
, verbose
))
648 /* Process args and tell the world that the perf'er is on the job. */
649 for (i
= 0; i
< ARRAY_SIZE(perf_ops
); i
++) {
650 cur_ops
= perf_ops
[i
];
651 if (strcmp(perf_type
, cur_ops
->name
) == 0)
654 if (i
== ARRAY_SIZE(perf_ops
)) {
655 pr_alert("rcu-perf: invalid perf type: \"%s\"\n",
657 pr_alert("rcu-perf types:");
658 for (i
= 0; i
< ARRAY_SIZE(perf_ops
); i
++)
659 pr_alert(" %s", perf_ops
[i
]->name
);
667 nrealwriters
= compute_real(nwriters
);
668 nrealreaders
= compute_real(nreaders
);
669 atomic_set(&n_rcu_perf_reader_started
, 0);
670 atomic_set(&n_rcu_perf_writer_started
, 0);
671 atomic_set(&n_rcu_perf_writer_finished
, 0);
672 rcu_perf_print_module_parms(cur_ops
, "Start of test");
674 /* Start up the kthreads. */
677 init_waitqueue_head(&shutdown_wq
);
678 firsterr
= torture_create_kthread(rcu_perf_shutdown
, NULL
,
682 schedule_timeout_uninterruptible(1);
684 reader_tasks
= kcalloc(nrealreaders
, sizeof(reader_tasks
[0]),
686 if (reader_tasks
== NULL
) {
687 VERBOSE_PERFOUT_ERRSTRING("out of memory");
691 for (i
= 0; i
< nrealreaders
; i
++) {
692 firsterr
= torture_create_kthread(rcu_perf_reader
, (void *)i
,
697 while (atomic_read(&n_rcu_perf_reader_started
) < nrealreaders
)
698 schedule_timeout_uninterruptible(1);
699 writer_tasks
= kcalloc(nrealwriters
, sizeof(reader_tasks
[0]),
701 writer_durations
= kcalloc(nrealwriters
, sizeof(*writer_durations
),
704 kcalloc(nrealwriters
, sizeof(*writer_n_durations
),
706 if (!writer_tasks
|| !writer_durations
|| !writer_n_durations
) {
707 VERBOSE_PERFOUT_ERRSTRING("out of memory");
711 for (i
= 0; i
< nrealwriters
; i
++) {
712 writer_durations
[i
] =
713 kcalloc(MAX_MEAS
, sizeof(*writer_durations
[i
]),
715 if (!writer_durations
[i
]) {
719 firsterr
= torture_create_kthread(rcu_perf_writer
, (void *)i
,
733 module_init(rcu_perf_init
);
734 module_exit(rcu_perf_cleanup
);