WebSVN – HelenOS – Diff – /SPARTAN/trunk/test/synch/rwlock4/test.c


/*
 * Copyright (C) 2001-2004 Jakub Jermar
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 * - Redistributions of source code must retain the above copyright
 *   notice, this list of conditions and the following disclaimer.
 * - Redistributions in binary form must reproduce the above copyright
 *   notice, this list of conditions and the following disclaimer in the
 *   documentation and/or other materials provided with the distribution.
 * - The name of the author may not be used to endorse or promote products
 *   derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */
 
#include <test.h>
#include <arch.h>
#include <arch/atomic.h>
#include <print.h>
#include <proc/thread.h>
#include <arch/types.h>
#include <arch/context.h>
#include <panic.h>
 
#include <synch/waitq.h>
#include <synch/rwlock.h>
#include <synch/synch.h>
 
#define READERS     50
#define WRITERS     50
 
static rwlock_t rwlock;
 
static spinlock_t lock;
 
static waitq_t can_start;
 
__u32 seed = 0xdeadbeaf;
 
static __u32 random(__u32 max);
 
static void writer(void *arg);
static void reader(void *arg);
static void failed(void);
 
__u32 random(__u32 max)
{
    __u32 rc;
    pri_t pri;
 
    pri = cpu_priority_high();
    spinlock_lock(&lock);  
    rc = seed % max;
    seed = (((seed<<2) ^ (seed>>2)) * 487) + rc;
    spinlock_unlock(&lock);
    cpu_priority_restore(pri);
    return rc;
}
 
 
void writer(void *arg)
{
    int rc, to;
    waitq_sleep(&can_start);
 
    to = random(40000);
    printf("cpu%d, tid %d w+ (%d)\n", CPU->id, THREAD->tid, to);
    rc = rwlock_write_lock_timeout(&rwlock, to);
    if (SYNCH_FAILED(rc)) {
        printf("cpu%d, tid %d w!\n", CPU->id, THREAD->tid);
        return;
    };
    printf("cpu%d, tid %d w=\n", CPU->id, THREAD->tid);
 
    if (rwlock.readers_in) panic("Oops.");
    thread_usleep(random(1000000));
    if (rwlock.readers_in) panic("Oops."); 
 
    rwlock_write_unlock(&rwlock);
    printf("cpu%d, tid %d w-\n", CPU->id, THREAD->tid);
}
 
void reader(void *arg)
{
    int rc, to;
    waitq_sleep(&can_start);
   
    to = random(2000);
    printf("cpu%d, tid %d r+ (%d)\n", CPU->id, THREAD->tid, to);
    rc = rwlock_read_lock_timeout(&rwlock, to);
    if (SYNCH_FAILED(rc)) {
        printf("cpu%d, tid %d r!\n", CPU->id, THREAD->tid);
        return;
    }
    printf("cpu%d, tid %d r=\n", CPU->id, THREAD->tid);
    thread_usleep(30000);
    rwlock_read_unlock(&rwlock);
    printf("cpu%d, tid %d r-\n", CPU->id, THREAD->tid);    
}
 
void failed(void)
{
    printf("Test failed prematurely.\n");
    thread_exit();
}
 
void test(void)
{
    context_t ctx;
    __u32 i, k;
   
    printf("Read/write locks test #4\n");
   
    waitq_initialize(&can_start);
    rwlock_initialize(&rwlock);
   
 
   
    for (; ;) {
        thread_t *thrd;
       
        context_save(&ctx);
        printf("sp=%X, readers_in=%d\n", ctx.sp, rwlock.readers_in);
       
        k = random(7) + 1;
        printf("Creating %d readers\n", k);
        for (i=0; i<k; i++) {
            thrd = thread_create(reader, NULL, TASK, 0);
            if (thrd)
                thread_ready(thrd);
            else
                failed();
        }
 
        k = random(5) + 1;
        printf("Creating %d writers\n", k);
        for (i=0; i<k; i++) {
            thrd = thread_create(writer, NULL, TASK, 0);
            if (thrd)
                thread_ready(thrd);
            else
                failed();
        }
       
        thread_usleep(20000);
        waitq_wakeup(&can_start, WAKEUP_ALL);
    }      
 
}
 

Rev 111	Rev 171
1	/*	1	/*
2	* Copyright (C) 2001-2004 Jakub Jermar	2	* Copyright (C) 2001-2004 Jakub Jermar
3	* All rights reserved.	3	* All rights reserved.
4	*	4	*
5	* Redistribution and use in source and binary forms, with or without	5	* Redistribution and use in source and binary forms, with or without
6	* modification, are permitted provided that the following conditions	6	* modification, are permitted provided that the following conditions
7	* are met:	7	* are met:
8	*	8	*
9	* - Redistributions of source code must retain the above copyright	9	* - Redistributions of source code must retain the above copyright
10	* notice, this list of conditions and the following disclaimer.	10	* notice, this list of conditions and the following disclaimer.
11	* - Redistributions in binary form must reproduce the above copyright	11	* - Redistributions in binary form must reproduce the above copyright
12	* notice, this list of conditions and the following disclaimer in the	12	* notice, this list of conditions and the following disclaimer in the
13	* documentation and/or other materials provided with the distribution.	13	* documentation and/or other materials provided with the distribution.
14	* - The name of the author may not be used to endorse or promote products	14	* - The name of the author may not be used to endorse or promote products
15	* derived from this software without specific prior written permission.	15	* derived from this software without specific prior written permission.
16	*	16	*
17	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR	17	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES	18	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.	19	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,	20	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT	21	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,	22	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY	23	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT	24	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF	25	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.	26	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27	*/	27	*/
28		28
29	#include <test.h>	29	#include <test.h>
30	#include <arch.h>	30	#include <arch.h>
31	#include <arch/atomic.h>	31	#include <arch/atomic.h>
32	#include <print.h>	32	#include <print.h>
33	#include <proc/thread.h>	33	#include <proc/thread.h>
34	#include <arch/types.h>	34	#include <arch/types.h>
35	#include <arch/context.h>	35	#include <arch/context.h>
36	#include <panic.h>	36	#include <panic.h>
37		37
38	#include <synch/waitq.h>	38	#include <synch/waitq.h>
39	#include <synch/rwlock.h>	39	#include <synch/rwlock.h>
40	#include <synch/synch.h>	40	#include <synch/synch.h>
41		41
42	#define READERS 50	42	#define READERS 50
43	#define WRITERS 50	43	#define WRITERS 50
44		44
45	static rwlock_t rwlock;	45	static rwlock_t rwlock;
46		46
47	static spinlock_t lock;	47	static spinlock_t lock;
48		48
49	static waitq_t can_start;	49	static waitq_t can_start;
50		50
51	__u32 seed = 0xdeadbeaf;	51	__u32 seed = 0xdeadbeaf;
52		52
53	static __u32 random(__u32 max);	53	static __u32 random(__u32 max);
54		54
55	static void writer(void *arg);	55	static void writer(void *arg);
56	static void reader(void *arg);	56	static void reader(void *arg);
57	static void failed(void);	57	static void failed(void);
58		58
59	__u32 random(__u32 max)	59	__u32 random(__u32 max)
60	{	60	{
61	__u32 rc;	61	__u32 rc;
-		62	pri_t pri;
62		63
-		64	pri = cpu_priority_high();
63	spinlock_lock(&lock);	65	spinlock_lock(&lock);
64	rc = seed % max;	66	rc = seed % max;
65	seed = (((seed<<2) ^ (seed>>2)) * 487) + rc;	67	seed = (((seed<<2) ^ (seed>>2)) * 487) + rc;
66	spinlock_unlock(&lock);	68	spinlock_unlock(&lock);
-		69	cpu_priority_restore(pri);
67	return rc;	70	return rc;
68	}	71	}
69		72
70		73
71	void writer(void *arg)	74	void writer(void *arg)
72	{	75	{
73	int rc, to;	76	int rc, to;
74	waitq_sleep(&can_start);	77	waitq_sleep(&can_start);
75		78
76	to = random(40000);	79	to = random(40000);
77	printf("cpu%d, tid %d w+ (%d)\n", CPU->id, THREAD->tid, to);	80	printf("cpu%d, tid %d w+ (%d)\n", CPU->id, THREAD->tid, to);
78	rc = rwlock_write_lock_timeout(&rwlock, to);	81	rc = rwlock_write_lock_timeout(&rwlock, to);
79	if (SYNCH_FAILED(rc)) {	82	if (SYNCH_FAILED(rc)) {
80	printf("cpu%d, tid %d w!\n", CPU->id, THREAD->tid);	83	printf("cpu%d, tid %d w!\n", CPU->id, THREAD->tid);
81	return;	84	return;
82	};	85	};
83	printf("cpu%d, tid %d w=\n", CPU->id, THREAD->tid);	86	printf("cpu%d, tid %d w=\n", CPU->id, THREAD->tid);
84		87
85	if (rwlock.readers_in) panic("Oops.");	88	if (rwlock.readers_in) panic("Oops.");
86	thread_usleep(random(1000000));	89	thread_usleep(random(1000000));
87	if (rwlock.readers_in) panic("Oops.");	90	if (rwlock.readers_in) panic("Oops.");
88		91
89	rwlock_write_unlock(&rwlock);	92	rwlock_write_unlock(&rwlock);
90	printf("cpu%d, tid %d w-\n", CPU->id, THREAD->tid);	93	printf("cpu%d, tid %d w-\n", CPU->id, THREAD->tid);
91	}	94	}
92		95
93	void reader(void *arg)	96	void reader(void *arg)
94	{	97	{
95	int rc, to;	98	int rc, to;
96	waitq_sleep(&can_start);	99	waitq_sleep(&can_start);
97		100
98	to = random(2000);	101	to = random(2000);
99	printf("cpu%d, tid %d r+ (%d)\n", CPU->id, THREAD->tid, to);	102	printf("cpu%d, tid %d r+ (%d)\n", CPU->id, THREAD->tid, to);
100	rc = rwlock_read_lock_timeout(&rwlock, to);	103	rc = rwlock_read_lock_timeout(&rwlock, to);
101	if (SYNCH_FAILED(rc)) {	104	if (SYNCH_FAILED(rc)) {
102	printf("cpu%d, tid %d r!\n", CPU->id, THREAD->tid);	105	printf("cpu%d, tid %d r!\n", CPU->id, THREAD->tid);
103	return;	106	return;
104	}	107	}
105	printf("cpu%d, tid %d r=\n", CPU->id, THREAD->tid);	108	printf("cpu%d, tid %d r=\n", CPU->id, THREAD->tid);
106	thread_usleep(30000);	109	thread_usleep(30000);
107	rwlock_read_unlock(&rwlock);	110	rwlock_read_unlock(&rwlock);
108	printf("cpu%d, tid %d r-\n", CPU->id, THREAD->tid);	111	printf("cpu%d, tid %d r-\n", CPU->id, THREAD->tid);
109	}	112	}
110		113
111	void failed(void)	114	void failed(void)
112	{	115	{
113	printf("Test failed prematurely.\n");	116	printf("Test failed prematurely.\n");
114	thread_exit();	117	thread_exit();
115	}	118	}
116		119
117	void test(void)	120	void test(void)
118	{	121	{
119	context_t ctx;	122	context_t ctx;
120	__u32 i, k;	123	__u32 i, k;
121		124
122	printf("Read/write locks test #4\n");	125	printf("Read/write locks test #4\n");
123		126
124	waitq_initialize(&can_start);	127	waitq_initialize(&can_start);
125	rwlock_initialize(&rwlock);	128	rwlock_initialize(&rwlock);
126		129
127		130
128		131
129	for (; ;) {	132	for (; ;) {
130	thread_t *thrd;	133	thread_t *thrd;
131		134
132	context_save(&ctx);	135	context_save(&ctx);
133	printf("sp=%X, readers_in=%d\n", ctx.sp, rwlock.readers_in);	136	printf("sp=%X, readers_in=%d\n", ctx.sp, rwlock.readers_in);
134		137
135	k = random(7) + 1;	138	k = random(7) + 1;
136	printf("Creating %d readers\n", k);	139	printf("Creating %d readers\n", k);
137	for (i=0; i<k; i++) {	140	for (i=0; i<k; i++) {
138	thrd = thread_create(reader, NULL, TASK, 0);	141	thrd = thread_create(reader, NULL, TASK, 0);
139	if (thrd)	142	if (thrd)
140	thread_ready(thrd);	143	thread_ready(thrd);
141	else	144	else
142	failed();	145	failed();
143	}	146	}
144		147
145	k = random(5) + 1;	148	k = random(5) + 1;
146	printf("Creating %d writers\n", k);	149	printf("Creating %d writers\n", k);
147	for (i=0; i<k; i++) {	150	for (i=0; i<k; i++) {
148	thrd = thread_create(writer, NULL, TASK, 0);	151	thrd = thread_create(writer, NULL, TASK, 0);
149	if (thrd)	152	if (thrd)
150	thread_ready(thrd);	153	thread_ready(thrd);
151	else	154	else
152	failed();	155	failed();
153	}	156	}
154		157
155	thread_usleep(20000);	158	thread_usleep(20000);
156	waitq_wakeup(&can_start, WAKEUP_ALL);	159	waitq_wakeup(&can_start, WAKEUP_ALL);
157	}	160	}
158		161
159	}	162	}
160		163

Subversion Repositories HelenOS

(root)/SPARTAN/trunk/test/synch/rwlock4/test.c @ 356 – Rev 111 → 171