2005-10-31 02:03:12 +03:00
/*
2006-06-27 13:54:02 +04:00
* Read - Copy Update module - based torture test facility
2005-10-31 02:03:12 +03:00
*
* 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 .
*
* Copyright ( C ) IBM Corporation , 2005
*
* Authors : Paul E . McKenney < paulmck @ us . ibm . com >
*
* 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>
# include <asm/atomic.h>
# include <linux/bitops.h>
# include <linux/module.h>
# include <linux/completion.h>
# include <linux/moduleparam.h>
# include <linux/percpu.h>
# include <linux/notifier.h>
# include <linux/cpu.h>
# include <linux/random.h>
# include <linux/delay.h>
# include <linux/byteorder/swabb.h>
# include <linux/stat.h>
MODULE_LICENSE ( " GPL " ) ;
2006-10-04 01:26:16 +04:00
static int nreaders = - 1 ; /* # reader threads, defaults to 2*ncpus */
2006-01-08 12:03:42 +03:00
static int stat_interval ; /* Interval between stats, in seconds. */
2005-10-31 02:03:12 +03:00
/* Defaults to "only at end of test". */
2006-01-08 12:03:42 +03:00
static int verbose ; /* Print more debug info. */
static int test_no_idle_hz ; /* Test RCU's support for tickless idle CPUs. */
static int shuffle_interval = 5 ; /* Interval between shuffles (in sec)*/
2006-06-27 13:54:03 +04:00
static char * torture_type = " rcu " ; /* What to torture. */
2005-10-31 02:03:12 +03:00
2006-03-25 14:07:05 +03:00
module_param ( nreaders , int , 0 ) ;
2005-10-31 02:03:12 +03:00
MODULE_PARM_DESC ( nreaders , " Number of RCU reader threads " ) ;
2006-03-25 14:07:05 +03:00
module_param ( stat_interval , int , 0 ) ;
2005-10-31 02:03:12 +03:00
MODULE_PARM_DESC ( stat_interval , " Number of seconds between stats printk()s " ) ;
2006-03-25 14:07:05 +03:00
module_param ( verbose , bool , 0 ) ;
2005-10-31 02:03:12 +03:00
MODULE_PARM_DESC ( verbose , " Enable verbose debugging printk()s " ) ;
2006-03-25 14:07:05 +03:00
module_param ( test_no_idle_hz , bool , 0 ) ;
2006-01-08 12:03:42 +03:00
MODULE_PARM_DESC ( test_no_idle_hz , " Test support for tickless idle CPUs " ) ;
2006-03-25 14:07:05 +03:00
module_param ( shuffle_interval , int , 0 ) ;
2006-01-08 12:03:42 +03:00
MODULE_PARM_DESC ( shuffle_interval , " Number of seconds between shuffles " ) ;
2006-06-27 13:54:03 +04:00
module_param ( torture_type , charp , 0 ) ;
2006-06-27 13:54:04 +04:00
MODULE_PARM_DESC ( torture_type , " Type of RCU to torture (rcu, rcu_bh) " ) ;
2006-06-27 13:54:03 +04:00
# define TORTURE_FLAG "-torture:"
2005-10-31 02:03:12 +03:00
# define PRINTK_STRING(s) \
2006-06-27 13:54:03 +04:00
do { printk ( KERN_ALERT " %s " TORTURE_FLAG s " \n " , torture_type ) ; } while ( 0 )
2005-10-31 02:03:12 +03:00
# define VERBOSE_PRINTK_STRING(s) \
2006-06-27 13:54:03 +04:00
do { if ( verbose ) printk ( KERN_ALERT " %s " TORTURE_FLAG s " \n " , torture_type ) ; } while ( 0 )
2005-10-31 02:03:12 +03:00
# define VERBOSE_PRINTK_ERRSTRING(s) \
2006-06-27 13:54:03 +04:00
do { if ( verbose ) printk ( KERN_ALERT " %s " TORTURE_FLAG " !!! " s " \n " , torture_type ) ; } while ( 0 )
2005-10-31 02:03:12 +03:00
static char printk_buf [ 4096 ] ;
static int nrealreaders ;
static struct task_struct * writer_task ;
static struct task_struct * * reader_tasks ;
static struct task_struct * stats_task ;
2006-01-08 12:03:42 +03:00
static struct task_struct * shuffler_task ;
2005-10-31 02:03:12 +03:00
# define RCU_TORTURE_PIPE_LEN 10
struct rcu_torture {
struct rcu_head rtort_rcu ;
int rtort_pipe_count ;
struct list_head rtort_free ;
2005-11-18 12:10:50 +03:00
int rtort_mbtest ;
2005-10-31 02:03:12 +03:00
} ;
static int fullstop = 0 ; /* stop generating callbacks at test end. */
static LIST_HEAD ( rcu_torture_freelist ) ;
static struct rcu_torture * rcu_torture_current = NULL ;
static long rcu_torture_current_version = 0 ;
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 ] ;
atomic_t n_rcu_torture_alloc ;
atomic_t n_rcu_torture_alloc_fail ;
atomic_t n_rcu_torture_free ;
2005-11-18 12:10:50 +03:00
atomic_t n_rcu_torture_mberror ;
atomic_t n_rcu_torture_error ;
2005-10-31 02:03:12 +03:00
/*
* Allocate an element from the rcu_tortures pool .
*/
2006-01-08 12:02:17 +03:00
static struct rcu_torture *
2005-10-31 02:03:12 +03:00
rcu_torture_alloc ( void )
{
struct list_head * p ;
2006-01-25 21:50:12 +03:00
spin_lock_bh ( & rcu_torture_lock ) ;
2005-10-31 02:03:12 +03:00
if ( list_empty ( & rcu_torture_freelist ) ) {
atomic_inc ( & n_rcu_torture_alloc_fail ) ;
2006-01-25 21:50:12 +03:00
spin_unlock_bh ( & rcu_torture_lock ) ;
2005-10-31 02:03:12 +03:00
return NULL ;
}
atomic_inc ( & n_rcu_torture_alloc ) ;
p = rcu_torture_freelist . next ;
list_del_init ( p ) ;
2006-01-25 21:50:12 +03:00
spin_unlock_bh ( & rcu_torture_lock ) ;
2005-10-31 02:03:12 +03:00
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 ) ;
2006-01-25 21:50:12 +03:00
spin_lock_bh ( & rcu_torture_lock ) ;
2005-10-31 02:03:12 +03:00
list_add_tail ( & p - > rtort_free , & rcu_torture_freelist ) ;
2006-01-25 21:50:12 +03:00
spin_unlock_bh ( & rcu_torture_lock ) ;
2005-10-31 02:03:12 +03:00
}
struct rcu_random_state {
unsigned long rrs_state ;
unsigned long rrs_count ;
} ;
# 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
* generator , with occasional help from get_random_bytes ( ) .
*/
static long
rcu_random ( struct rcu_random_state * rrsp )
{
long refresh ;
if ( - - rrsp - > rrs_count < 0 ) {
get_random_bytes ( & refresh , sizeof ( refresh ) ) ;
rrsp - > rrs_state + = refresh ;
rrsp - > rrs_count = RCU_RANDOM_REFRESH ;
}
rrsp - > rrs_state = rrsp - > rrs_state * RCU_RANDOM_MULT + RCU_RANDOM_ADD ;
return swahw32 ( rrsp - > rrs_state ) ;
}
2006-06-27 13:54:03 +04:00
/*
* Operations vector for selecting different types of tests .
*/
struct rcu_torture_ops {
void ( * init ) ( void ) ;
void ( * cleanup ) ( void ) ;
int ( * readlock ) ( void ) ;
void ( * readunlock ) ( int idx ) ;
int ( * completed ) ( void ) ;
void ( * deferredfree ) ( struct rcu_torture * p ) ;
int ( * stats ) ( char * page ) ;
char * name ;
} ;
static struct rcu_torture_ops * cur_ops = NULL ;
/*
* Definitions for rcu torture testing .
*/
2006-09-29 12:59:30 +04:00
static int rcu_torture_read_lock ( void ) __acquires ( RCU )
2006-06-27 13:54:03 +04:00
{
rcu_read_lock ( ) ;
return 0 ;
}
2006-09-29 12:59:30 +04:00
static void rcu_torture_read_unlock ( int idx ) __releases ( RCU )
2006-06-27 13:54:03 +04:00
{
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 ) ;
if ( fullstop ) {
/* 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 ) ;
} else
cur_ops - > deferredfree ( rp ) ;
}
static void rcu_torture_deferred_free ( struct rcu_torture * p )
{
call_rcu ( & p - > rtort_rcu , rcu_torture_cb ) ;
}
static struct rcu_torture_ops rcu_ops = {
. init = NULL ,
. cleanup = NULL ,
. readlock = rcu_torture_read_lock ,
. readunlock = rcu_torture_read_unlock ,
. completed = rcu_torture_completed ,
. deferredfree = rcu_torture_deferred_free ,
. stats = NULL ,
. name = " rcu "
} ;
2006-06-27 13:54:04 +04:00
/*
* Definitions for rcu_bh torture testing .
*/
2006-09-29 12:59:30 +04:00
static int rcu_bh_torture_read_lock ( void ) __acquires ( RCU_BH )
2006-06-27 13:54:04 +04:00
{
rcu_read_lock_bh ( ) ;
return 0 ;
}
2006-09-29 12:59:30 +04:00
static void rcu_bh_torture_read_unlock ( int idx ) __releases ( RCU_BH )
2006-06-27 13:54:04 +04:00
{
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 = {
. init = NULL ,
. cleanup = NULL ,
. readlock = rcu_bh_torture_read_lock ,
. readunlock = rcu_bh_torture_read_unlock ,
. completed = rcu_bh_torture_completed ,
. deferredfree = rcu_bh_torture_deferred_free ,
. stats = NULL ,
. name = " rcu_bh "
} ;
2006-06-27 13:54:03 +04:00
static struct rcu_torture_ops * torture_ops [ ] =
2006-06-27 13:54:04 +04:00
{ & rcu_ops , & rcu_bh_ops , NULL } ;
2006-06-27 13:54:03 +04:00
2005-10-31 02:03:12 +03:00
/*
* 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 )
{
int i ;
long oldbatch = rcu_batches_completed ( ) ;
struct rcu_torture * rp ;
struct rcu_torture * old_rp ;
static DEFINE_RCU_RANDOM ( rand ) ;
VERBOSE_PRINTK_STRING ( " rcu_torture_writer task started " ) ;
2005-11-14 03:07:22 +03:00
set_user_nice ( current , 19 ) ;
2005-10-31 02:03:12 +03:00
do {
schedule_timeout_uninterruptible ( 1 ) ;
if ( ( rp = rcu_torture_alloc ( ) ) = = NULL )
continue ;
rp - > rtort_pipe_count = 0 ;
udelay ( rcu_random ( & rand ) & 0x3ff ) ;
old_rp = rcu_torture_current ;
2005-11-18 12:10:50 +03:00
rp - > rtort_mbtest = 1 ;
2005-10-31 02:03:12 +03:00
rcu_assign_pointer ( rcu_torture_current , rp ) ;
smp_wmb ( ) ;
if ( old_rp ! = NULL ) {
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 + + ;
2006-06-27 13:54:03 +04:00
cur_ops - > deferredfree ( old_rp ) ;
2005-10-31 02:03:12 +03:00
}
rcu_torture_current_version + + ;
2006-06-27 13:54:03 +04:00
oldbatch = cur_ops - > completed ( ) ;
2005-10-31 02:03:12 +03:00
} while ( ! kthread_should_stop ( ) & & ! fullstop ) ;
VERBOSE_PRINTK_STRING ( " rcu_torture_writer task stopping " ) ;
while ( ! kthread_should_stop ( ) )
schedule_timeout_uninterruptible ( 1 ) ;
return 0 ;
}
/*
* 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 ;
2006-06-27 13:54:03 +04:00
int idx ;
2005-10-31 02:03:12 +03:00
DEFINE_RCU_RANDOM ( rand ) ;
struct rcu_torture * p ;
int pipe_count ;
VERBOSE_PRINTK_STRING ( " rcu_torture_reader task started " ) ;
2005-11-14 03:07:22 +03:00
set_user_nice ( current , 19 ) ;
2005-10-31 02:03:12 +03:00
do {
2006-06-27 13:54:03 +04:00
idx = cur_ops - > readlock ( ) ;
completed = cur_ops - > completed ( ) ;
2005-10-31 02:03:12 +03:00
p = rcu_dereference ( rcu_torture_current ) ;
if ( p = = NULL ) {
/* Wait for rcu_torture_writer to get underway */
2006-06-27 13:54:03 +04:00
cur_ops - > readunlock ( idx ) ;
2005-10-31 02:03:12 +03:00
schedule_timeout_interruptible ( HZ ) ;
continue ;
}
2005-11-18 12:10:50 +03:00
if ( p - > rtort_mbtest = = 0 )
atomic_inc ( & n_rcu_torture_mberror ) ;
2005-10-31 02:03:12 +03:00
udelay ( rcu_random ( & rand ) & 0x7f ) ;
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 ;
}
+ + __get_cpu_var ( rcu_torture_count ) [ pipe_count ] ;
2006-06-27 13:54:03 +04:00
completed = cur_ops - > completed ( ) - completed ;
2005-10-31 02:03:12 +03:00
if ( completed > RCU_TORTURE_PIPE_LEN ) {
/* Should not happen, but... */
completed = RCU_TORTURE_PIPE_LEN ;
}
+ + __get_cpu_var ( rcu_torture_batch ) [ completed ] ;
preempt_enable ( ) ;
2006-06-27 13:54:03 +04:00
cur_ops - > readunlock ( idx ) ;
2005-10-31 02:03:12 +03:00
schedule ( ) ;
} while ( ! kthread_should_stop ( ) & & ! fullstop ) ;
VERBOSE_PRINTK_STRING ( " rcu_torture_reader task stopping " ) ;
while ( ! kthread_should_stop ( ) )
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 } ;
2006-03-28 13:56:37 +04:00
for_each_possible_cpu ( cpu ) {
2005-10-31 02:03:12 +03:00
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 ;
}
2006-06-27 13:54:03 +04:00
cnt + = sprintf ( & page [ cnt ] , " %s%s " , torture_type , TORTURE_FLAG ) ;
2005-10-31 02:03:12 +03:00
cnt + = sprintf ( & page [ cnt ] ,
2005-11-18 12:10:50 +03:00
" rtc: %p ver: %ld tfle: %d rta: %d rtaf: %d rtf: %d "
" rtmbe: %d " ,
2005-10-31 02:03:12 +03:00
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 ) ,
2005-11-18 12:10:50 +03:00
atomic_read ( & n_rcu_torture_free ) ,
atomic_read ( & n_rcu_torture_mberror ) ) ;
if ( atomic_read ( & n_rcu_torture_mberror ) ! = 0 )
cnt + = sprintf ( & page [ cnt ] , " !!! " ) ;
2006-06-27 13:54:03 +04:00
cnt + = sprintf ( & page [ cnt ] , " \n %s%s " , torture_type , TORTURE_FLAG ) ;
2005-11-18 12:10:50 +03:00
if ( i > 1 ) {
2005-10-31 02:03:12 +03:00
cnt + = sprintf ( & page [ cnt ] , " !!! " ) ;
2005-11-18 12:10:50 +03:00
atomic_inc ( & n_rcu_torture_error ) ;
}
2005-10-31 02:03:12 +03:00
cnt + = sprintf ( & page [ cnt ] , " Reader Pipe: " ) ;
for ( i = 0 ; i < RCU_TORTURE_PIPE_LEN + 1 ; i + + )
cnt + = sprintf ( & page [ cnt ] , " %ld " , pipesummary [ i ] ) ;
2006-06-27 13:54:03 +04:00
cnt + = sprintf ( & page [ cnt ] , " \n %s%s " , torture_type , TORTURE_FLAG ) ;
2005-10-31 02:03:12 +03:00
cnt + = sprintf ( & page [ cnt ] , " Reader Batch: " ) ;
2006-06-27 13:54:03 +04:00
for ( i = 0 ; i < RCU_TORTURE_PIPE_LEN + 1 ; i + + )
2005-10-31 02:03:12 +03:00
cnt + = sprintf ( & page [ cnt ] , " %ld " , batchsummary [ i ] ) ;
2006-06-27 13:54:03 +04:00
cnt + = sprintf ( & page [ cnt ] , " \n %s%s " , torture_type , TORTURE_FLAG ) ;
2005-10-31 02:03:12 +03:00
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 " ) ;
2006-06-27 13:54:03 +04:00
if ( cur_ops - > stats ! = NULL )
cnt + = cur_ops - > stats ( & page [ cnt ] ) ;
2005-10-31 02:03:12 +03:00
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 ) ;
printk ( KERN_ALERT " %s " , printk_buf ) ;
}
/*
* 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 ( ) ;
} while ( ! kthread_should_stop ( ) ) ;
VERBOSE_PRINTK_STRING ( " rcu_torture_stats task stopping " ) ;
return 0 ;
}
2006-01-08 12:03:42 +03:00
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 .
*/
void rcu_torture_shuffle_tasks ( void )
{
cpumask_t tmp_mask = CPU_MASK_ALL ;
int i ;
lock_cpu_hotplug ( ) ;
/* No point in shuffling if there is only one online CPU (ex: UP) */
if ( num_online_cpus ( ) = = 1 ) {
unlock_cpu_hotplug ( ) ;
return ;
}
if ( rcu_idle_cpu ! = - 1 )
cpu_clear ( rcu_idle_cpu , tmp_mask ) ;
set_cpus_allowed ( current , tmp_mask ) ;
if ( reader_tasks ! = NULL ) {
for ( i = 0 ; i < nrealreaders ; i + + )
if ( reader_tasks [ i ] )
set_cpus_allowed ( reader_tasks [ i ] , tmp_mask ) ;
}
if ( writer_task )
set_cpus_allowed ( writer_task , tmp_mask ) ;
if ( stats_task )
set_cpus_allowed ( stats_task , tmp_mask ) ;
if ( rcu_idle_cpu = = - 1 )
rcu_idle_cpu = num_online_cpus ( ) - 1 ;
else
rcu_idle_cpu - - ;
unlock_cpu_hotplug ( ) ;
}
/* 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 ( ) ;
} while ( ! kthread_should_stop ( ) ) ;
VERBOSE_PRINTK_STRING ( " rcu_torture_shuffle task stopping " ) ;
return 0 ;
}
2006-03-24 14:15:58 +03:00
static inline void
rcu_torture_print_module_parms ( char * tag )
{
2006-06-27 13:54:03 +04:00
printk ( KERN_ALERT " %s " TORTURE_FLAG " --- %s: nreaders=%d "
2006-03-24 14:15:58 +03:00
" stat_interval=%d verbose=%d test_no_idle_hz=%d "
" shuffle_interval = %d \n " ,
2006-06-27 13:54:03 +04:00
torture_type , tag , nrealreaders , stat_interval , verbose ,
test_no_idle_hz , shuffle_interval ) ;
2006-03-24 14:15:58 +03:00
}
2005-10-31 02:03:12 +03:00
static void
rcu_torture_cleanup ( void )
{
int i ;
fullstop = 1 ;
2006-01-08 12:03:42 +03:00
if ( shuffler_task ! = NULL ) {
VERBOSE_PRINTK_STRING ( " Stopping rcu_torture_shuffle task " ) ;
kthread_stop ( shuffler_task ) ;
}
shuffler_task = NULL ;
2005-10-31 02:03:12 +03:00
if ( writer_task ! = NULL ) {
VERBOSE_PRINTK_STRING ( " Stopping rcu_torture_writer task " ) ;
kthread_stop ( writer_task ) ;
}
writer_task = NULL ;
if ( reader_tasks ! = NULL ) {
for ( i = 0 ; i < nrealreaders ; i + + ) {
if ( reader_tasks [ i ] ! = NULL ) {
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 ;
if ( stats_task ! = NULL ) {
VERBOSE_PRINTK_STRING ( " Stopping rcu_torture_stats task " ) ;
kthread_stop ( stats_task ) ;
}
stats_task = NULL ;
/* Wait for all RCU callbacks to fire. */
2005-12-12 11:37:06 +03:00
rcu_barrier ( ) ;
2005-10-31 02:03:12 +03:00
rcu_torture_stats_print ( ) ; /* -After- the stats thread is stopped! */
2006-06-27 13:54:03 +04:00
if ( cur_ops - > cleanup ! = NULL )
cur_ops - > cleanup ( ) ;
2006-03-24 14:15:58 +03:00
if ( atomic_read ( & n_rcu_torture_error ) )
rcu_torture_print_module_parms ( " End of test: FAILURE " ) ;
else
rcu_torture_print_module_parms ( " End of test: SUCCESS " ) ;
2005-10-31 02:03:12 +03:00
}
static int
rcu_torture_init ( void )
{
int i ;
int cpu ;
int firsterr = 0 ;
/* Process args and tell the world that the torturer is on the job. */
2006-06-27 13:54:03 +04:00
for ( i = 0 ; cur_ops = torture_ops [ i ] , cur_ops ! = NULL ; i + + ) {
cur_ops = torture_ops [ i ] ;
if ( strcmp ( torture_type , cur_ops - > name ) = = 0 ) {
break ;
}
}
if ( cur_ops = = NULL ) {
printk ( KERN_ALERT " rcutorture: invalid torture type: \" %s \" \n " ,
torture_type ) ;
return ( - EINVAL ) ;
}
if ( cur_ops - > init ! = NULL )
cur_ops - > init ( ) ; /* no "goto unwind" prior to this point!!! */
2005-10-31 02:03:12 +03:00
if ( nreaders > = 0 )
nrealreaders = nreaders ;
else
nrealreaders = 2 * num_online_cpus ( ) ;
2006-03-24 14:15:58 +03:00
rcu_torture_print_module_parms ( " Start of test " ) ;
2005-10-31 02:03:12 +03:00
fullstop = 0 ;
/* Set up the freelist. */
INIT_LIST_HEAD ( & rcu_torture_freelist ) ;
for ( i = 0 ; i < sizeof ( rcu_tortures ) / sizeof ( rcu_tortures [ 0 ] ) ; i + + ) {
2005-11-18 12:10:50 +03:00
rcu_tortures [ i ] . rtort_mbtest = 0 ;
2005-10-31 02:03:12 +03:00
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 ) ;
2005-11-18 12:10:50 +03:00
atomic_set ( & n_rcu_torture_mberror , 0 ) ;
atomic_set ( & n_rcu_torture_error , 0 ) ;
2005-10-31 02:03:12 +03:00
for ( i = 0 ; i < RCU_TORTURE_PIPE_LEN + 1 ; i + + )
atomic_set ( & rcu_torture_wcount [ i ] , 0 ) ;
2006-03-28 13:56:37 +04:00
for_each_possible_cpu ( cpu ) {
2005-10-31 02:03:12 +03:00
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 " ) ;
writer_task = kthread_run ( rcu_torture_writer , NULL ,
" rcu_torture_writer " ) ;
if ( IS_ERR ( writer_task ) ) {
firsterr = PTR_ERR ( writer_task ) ;
VERBOSE_PRINTK_ERRSTRING ( " Failed to create writer " ) ;
writer_task = NULL ;
goto unwind ;
}
reader_tasks = kmalloc ( nrealreaders * sizeof ( reader_tasks [ 0 ] ) ,
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 ;
}
}
2006-01-08 12:03:42 +03:00
if ( test_no_idle_hz ) {
rcu_idle_cpu = num_online_cpus ( ) - 1 ;
/* Create the shuffler thread */
shuffler_task = kthread_run ( rcu_torture_shuffle , NULL ,
" rcu_torture_shuffle " ) ;
if ( IS_ERR ( shuffler_task ) ) {
firsterr = PTR_ERR ( shuffler_task ) ;
VERBOSE_PRINTK_ERRSTRING ( " Failed to create shuffler " ) ;
shuffler_task = NULL ;
goto unwind ;
}
}
2005-10-31 02:03:12 +03:00
return 0 ;
unwind :
rcu_torture_cleanup ( ) ;
return firsterr ;
}
module_init ( rcu_torture_init ) ;
module_exit ( rcu_torture_cleanup ) ;