WebSVN – HelenOS-historic – Diff – /kernel/trunk/test/mm/slab2/test.c


/*
 * Copyright (C) 2006 Ondrej Palkovsky
 * 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 <mm/slab.h>
#include <print.h>
#include <proc/thread.h>
#include <arch.h>
#include <panic.h>
#include <mm/frame.h>
#include <memstr.h>
#include <synch/condvar.h>
#include <synch/mutex.h>
 
#define ITEM_SIZE 256
 
/** Fill memory with 2 caches, when allocation fails,
 *  free one of the caches. We should have everything in magazines,
 *  now allocation should clean magazines and allow for full allocation.
 */
static void totalmemtest(void)
{
    slab_cache_t *cache1;
    slab_cache_t *cache2;
    int i;
 
    void *data1, *data2;
    void *olddata1=NULL, *olddata2=NULL;
   
    cache1 = slab_cache_create("cache1_tst", ITEM_SIZE, 0, NULL, NULL, 0);
    cache2 = slab_cache_create("cache2_tst", ITEM_SIZE, 0, NULL, NULL, 0);
 
    printf("Allocating...");
    /* Use atomic alloc, so that we find end of memory */
    do {
        data1 = slab_alloc(cache1, FRAME_ATOMIC);
        data2 = slab_alloc(cache2, FRAME_ATOMIC);
        if (!data1 || !data2) {
            if (data1)
                slab_free(cache1,data1);
            if (data2)
                slab_free(cache2,data2);
            break;
        }
        memsetb((__address)data1, ITEM_SIZE, 0);
        memsetb((__address)data2, ITEM_SIZE, 0);
        *((void **)data1) = olddata1;
        *((void **)data2) = olddata2;
        olddata1 = data1;
        olddata2 = data2;
    }while(1);
    printf("done.\n");
    /* We do not have memory - now deallocate cache2 */
    printf("Deallocating cache2...");
    while (olddata2) {
        data2 = *((void **)olddata2);
        slab_free(cache2, olddata2);
        olddata2 = data2;
    }
    printf("done.\n");
 
    printf("Allocating to cache1...\n");
    for (i=0; i<30; i++) {
        data1 = slab_alloc(cache1, FRAME_ATOMIC);
        if (!data1) {
            panic("Incorrect memory size - use another test.");
        }
        memsetb((__address)data1, ITEM_SIZE, 0);
        *((void **)data1) = olddata1;
        olddata1 = data1;
    }
    while (1) {
        data1 = slab_alloc(cache1, FRAME_ATOMIC);
        if (!data1) {
            break;
        }
        memsetb((__address)data1, ITEM_SIZE, 0);
        *((void **)data1) = olddata1;
        olddata1 = data1;
    }
    printf("Deallocating cache1...");
    while (olddata1) {
        data1 = *((void **)olddata1);
        slab_free(cache1, olddata1);
        olddata1 = data1;
    }
    printf("done.\n");
    slab_print_list();
    slab_cache_destroy(cache1);
    slab_cache_destroy(cache2);
}
 
slab_cache_t *thr_cache;
semaphore_t thr_sem;
condvar_t thread_starter;
mutex_t starter_mutex;
 
#define THREADS 8
 
static void thread(void *priv)
{
    void *data=NULL, *new;
 
    mutex_lock(&starter_mutex);
    condvar_wait(&thread_starter,&starter_mutex);
    mutex_unlock(&starter_mutex);
       
    printf("Starting thread #%d...\n",THREAD->tid);
 
    /* Alloc all */
    printf("Thread #%d allocating...\n", THREAD->tid);
    while (1) {
        /* Call with atomic to detect end of memory */
        new = slab_alloc(thr_cache, FRAME_ATOMIC);
        if (!new)
            break;
        *((void **)new) = data;
        data = new;
    }
    printf("Thread #%d releasing...\n", THREAD->tid);
    while (data) {
        new = *((void **)data);
        slab_free(thr_cache, data);
        data = new;
    }
    printf("Thread #%d allocating...\n", THREAD->tid);
    while (1) {
        /* Call with atomic to detect end of memory */
        new = slab_alloc(thr_cache, FRAME_ATOMIC);
        if (!new)
            break;
        *((void **)new) = data;
        data = new;
    }
    printf("Thread #%d releasing...\n", THREAD->tid);
    while (data) {
        new = *((void **)data);
        slab_free(thr_cache, data);
        data = new;
    }
 
 
    printf("Thread #%d finished\n", THREAD->tid);
    slab_print_list();
    semaphore_up(&thr_sem);
}
 
 
static void multitest(int size)
{
    /* Start 8 threads that just allocate as much as possible,
     * then release everything, then again allocate, then release
     */
    thread_t *t;
    int i;
 
    printf("Running stress test with size %d\n", size);
    condvar_initialize(&thread_starter);
    mutex_initialize(&starter_mutex);
 
    thr_cache = slab_cache_create("thread_cache", size, 0,
                      NULL, NULL,
                      0);
    semaphore_initialize(&thr_sem,0);
    for (i=0; i<THREADS; i++) {  
        if (!(t = thread_create(thread, NULL, TASK, 0)))
            panic("could not create thread\n");
        thread_ready(t);
    }
    thread_sleep(1);
    condvar_broadcast(&thread_starter);
 
    for (i=0; i<THREADS; i++)
        semaphore_down(&thr_sem);
   
    slab_cache_destroy(thr_cache);
    printf("Stress test complete.\n");
}
 
void test(void)
{
    printf("Running reclaim single-thread test .. pass1\n");
    totalmemtest();
    printf("Running reclaim single-thread test .. pass2\n");
    totalmemtest();
    printf("Reclaim test OK.\n");
 
    multitest(128);
    multitest(2048);
    multitest(8192);
    printf("All done.\n");
}
 

Rev 780	Rev 842
1	/*	1	/*
2	* Copyright (C) 2006 Ondrej Palkovsky	2	* Copyright (C) 2006 Ondrej Palkovsky
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 <mm/slab.h>	30	#include <mm/slab.h>
31	#include <print.h>	31	#include <print.h>
32	#include <proc/thread.h>	32	#include <proc/thread.h>
33	#include <arch.h>	33	#include <arch.h>
34	#include <panic.h>	34	#include <panic.h>
35	#include <mm/frame.h>	35	#include <mm/frame.h>
36	#include <memstr.h>	36	#include <memstr.h>
-		37	#include <synch/condvar.h>
-		38	#include <synch/mutex.h>
37		39
38	#define ITEM_SIZE 256	40	#define ITEM_SIZE 256
39		41
40	/** Fill memory with 2 caches, when allocation fails,	42	/** Fill memory with 2 caches, when allocation fails,
41	* free one of the caches. We should have everything in magazines,	43	* free one of the caches. We should have everything in magazines,
42	* now allocation should clean magazines and allow for full allocation.	44	* now allocation should clean magazines and allow for full allocation.
43	*/	45	*/
44	static void totalmemtest(void)	46	static void totalmemtest(void)
45	{	47	{
46	slab_cache_t *cache1;	48	slab_cache_t *cache1;
47	slab_cache_t *cache2;	49	slab_cache_t *cache2;
48	int i;	50	int i;
49		51
50	void data1, data2;	52	void data1, data2;
51	void olddata1=NULL, olddata2=NULL;	53	void olddata1=NULL, olddata2=NULL;
52		54
53	cache1 = slab_cache_create("cache1_tst", ITEM_SIZE, 0, NULL, NULL, 0);	55	cache1 = slab_cache_create("cache1_tst", ITEM_SIZE, 0, NULL, NULL, 0);
54	cache2 = slab_cache_create("cache2_tst", ITEM_SIZE, 0, NULL, NULL, 0);	56	cache2 = slab_cache_create("cache2_tst", ITEM_SIZE, 0, NULL, NULL, 0);
55		57
56	printf("Allocating...");	58	printf("Allocating...");
57	/* Use atomic alloc, so that we find end of memory */	59	/* Use atomic alloc, so that we find end of memory */
58	do {	60	do {
59	data1 = slab_alloc(cache1, FRAME_ATOMIC);	61	data1 = slab_alloc(cache1, FRAME_ATOMIC);
60	data2 = slab_alloc(cache2, FRAME_ATOMIC);	62	data2 = slab_alloc(cache2, FRAME_ATOMIC);
61	if (!data1 \|\| !data2) {	63	if (!data1 \|\| !data2) {
62	if (data1)	64	if (data1)
63	slab_free(cache1,data1);	65	slab_free(cache1,data1);
64	if (data2)	66	if (data2)
65	slab_free(cache2,data2);	67	slab_free(cache2,data2);
66	break;	68	break;
67	}	69	}
68	memsetb((__address)data1, ITEM_SIZE, 0);	70	memsetb((__address)data1, ITEM_SIZE, 0);
69	memsetb((__address)data2, ITEM_SIZE, 0);	71	memsetb((__address)data2, ITEM_SIZE, 0);
70	((void *)data1) = olddata1;	72	((void *)data1) = olddata1;
71	((void *)data2) = olddata2;	73	((void *)data2) = olddata2;
72	olddata1 = data1;	74	olddata1 = data1;
73	olddata2 = data2;	75	olddata2 = data2;
74	}while(1);	76	}while(1);
75	printf("done.\n");	77	printf("done.\n");
76	/* We do not have memory - now deallocate cache2 */	78	/* We do not have memory - now deallocate cache2 */
77	printf("Deallocating cache2...");	79	printf("Deallocating cache2...");
78	while (olddata2) {	80	while (olddata2) {
79	data2 = ((void *)olddata2);	81	data2 = ((void *)olddata2);
80	slab_free(cache2, olddata2);	82	slab_free(cache2, olddata2);
81	olddata2 = data2;	83	olddata2 = data2;
82	}	84	}
83	printf("done.\n");	85	printf("done.\n");
84		86
85	printf("Allocating to cache1...\n");	87	printf("Allocating to cache1...\n");
86	for (i=0; i<30; i++) {	88	for (i=0; i<30; i++) {
87	data1 = slab_alloc(cache1, FRAME_ATOMIC);	89	data1 = slab_alloc(cache1, FRAME_ATOMIC);
88	if (!data1) {	90	if (!data1) {
89	panic("Incorrect memory size - use another test.");	91	panic("Incorrect memory size - use another test.");
90	}	92	}
91	memsetb((__address)data1, ITEM_SIZE, 0);	93	memsetb((__address)data1, ITEM_SIZE, 0);
92	((void *)data1) = olddata1;	94	((void *)data1) = olddata1;
93	olddata1 = data1;	95	olddata1 = data1;
94	}	96	}
95	while (1) {	97	while (1) {
96	data1 = slab_alloc(cache1, FRAME_ATOMIC);	98	data1 = slab_alloc(cache1, FRAME_ATOMIC);
97	if (!data1) {	99	if (!data1) {
98	break;	100	break;
99	}	101	}
100	memsetb((__address)data1, ITEM_SIZE, 0);	102	memsetb((__address)data1, ITEM_SIZE, 0);
101	((void *)data1) = olddata1;	103	((void *)data1) = olddata1;
102	olddata1 = data1;	104	olddata1 = data1;
103	}	105	}
104	printf("Deallocating cache1...");	106	printf("Deallocating cache1...");
105	while (olddata1) {	107	while (olddata1) {
106	data1 = ((void *)olddata1);	108	data1 = ((void *)olddata1);
107	slab_free(cache1, olddata1);	109	slab_free(cache1, olddata1);
108	olddata1 = data1;	110	olddata1 = data1;
109	}	111	}
110	printf("done.\n");	112	printf("done.\n");
111	slab_print_list();	113	slab_print_list();
112	slab_cache_destroy(cache1);	114	slab_cache_destroy(cache1);
113	slab_cache_destroy(cache2);	115	slab_cache_destroy(cache2);
114	}	116	}
115		117
116	slab_cache_t *thr_cache;	118	slab_cache_t *thr_cache;
117	semaphore_t thr_sem;	119	semaphore_t thr_sem;
-		120	condvar_t thread_starter;
-		121	mutex_t starter_mutex;
118		122
119	#define THREADS 8	123	#define THREADS 8
120		124
121	static void thread(void *priv)	125	static void thread(void *priv)
122	{	126	{
123	void data=NULL, new;	127	void data=NULL, new;
124		128
-		129	mutex_lock(&starter_mutex);
-		130	condvar_wait(&thread_starter,&starter_mutex);
-		131	mutex_unlock(&starter_mutex);
-		132
125	printf("Starting thread #%d...\n",THREAD->tid);	133	printf("Starting thread #%d...\n",THREAD->tid);
126		134
127	/* Alloc all */	135	/* Alloc all */
128	printf("Thread #%d allocating...\n", THREAD->tid);	136	printf("Thread #%d allocating...\n", THREAD->tid);
129	while (1) {	137	while (1) {
130	/* Call with atomic to detect end of memory */	138	/* Call with atomic to detect end of memory */
131	new = slab_alloc(thr_cache, FRAME_ATOMIC);	139	new = slab_alloc(thr_cache, FRAME_ATOMIC);
132	if (!new)	140	if (!new)
133	break;	141	break;
134	((void *)new) = data;	142	((void *)new) = data;
135	data = new;	143	data = new;
136	}	144	}
137	printf("Thread #%d releasing...\n", THREAD->tid);	145	printf("Thread #%d releasing...\n", THREAD->tid);
138	while (data) {	146	while (data) {
139	new = ((void *)data);	147	new = ((void *)data);
140	slab_free(thr_cache, data);	148	slab_free(thr_cache, data);
141	data = new;	149	data = new;
142	}	150	}
143	printf("Thread #%d allocating...\n", THREAD->tid);	151	printf("Thread #%d allocating...\n", THREAD->tid);
144	while (1) {	152	while (1) {
145	/* Call with atomic to detect end of memory */	153	/* Call with atomic to detect end of memory */
146	new = slab_alloc(thr_cache, FRAME_ATOMIC);	154	new = slab_alloc(thr_cache, FRAME_ATOMIC);
147	if (!new)	155	if (!new)
148	break;	156	break;
149	((void *)new) = data;	157	((void *)new) = data;
150	data = new;	158	data = new;
151	}	159	}
152	printf("Thread #%d releasing...\n", THREAD->tid);	160	printf("Thread #%d releasing...\n", THREAD->tid);
153	while (data) {	161	while (data) {
154	new = ((void *)data);	162	new = ((void *)data);
155	slab_free(thr_cache, data);	163	slab_free(thr_cache, data);
156	data = new;	164	data = new;
157	}	165	}
158		166
159		167
160	printf("Thread #%d finished\n", THREAD->tid);	168	printf("Thread #%d finished\n", THREAD->tid);
161	slab_print_list();	169	slab_print_list();
162	semaphore_up(&thr_sem);	170	semaphore_up(&thr_sem);
163	}	171	}
164		172
165		173
166	static void multitest(int size)	174	static void multitest(int size)
167	{	175	{
168	/* Start 8 threads that just allocate as much as possible,	176	/* Start 8 threads that just allocate as much as possible,
169	* then release everything, then again allocate, then release	177	* then release everything, then again allocate, then release
170	*/	178	*/
171	thread_t *t;	179	thread_t *t;
172	int i;	180	int i;
173		181
174	printf("Running stress test with size %d\n", size);	182	printf("Running stress test with size %d\n", size);
-		183	condvar_initialize(&thread_starter);
-		184	mutex_initialize(&starter_mutex);
-		185
175	thr_cache = slab_cache_create("thread_cache", size, 0,	186	thr_cache = slab_cache_create("thread_cache", size, 0,
176	NULL, NULL,	187	NULL, NULL,
177	0);	188	0);
178	semaphore_initialize(&thr_sem,0);	189	semaphore_initialize(&thr_sem,0);
179	for (i=0; i<THREADS; i++) {	190	for (i=0; i<THREADS; i++) {
180	if (!(t = thread_create(thread, NULL, TASK, 0)))	191	if (!(t = thread_create(thread, NULL, TASK, 0)))
181	panic("could not create thread\n");	192	panic("could not create thread\n");
182	thread_ready(t);	193	thread_ready(t);
183	}	194	}
-		195	thread_sleep(1);
-		196	condvar_broadcast(&thread_starter);
184		197
185	for (i=0; i<THREADS; i++)	198	for (i=0; i<THREADS; i++)
186	semaphore_down(&thr_sem);	199	semaphore_down(&thr_sem);
187		200
188	slab_cache_destroy(thr_cache);	201	slab_cache_destroy(thr_cache);
189	printf("Stress test complete.\n");	202	printf("Stress test complete.\n");
190	}	203	}
191		204
192	void test(void)	205	void test(void)
193	{	206	{
194	printf("Running reclaim single-thread test .. pass1\n");	207	printf("Running reclaim single-thread test .. pass1\n");
195	totalmemtest();	208	totalmemtest();
196	printf("Running reclaim single-thread test .. pass2\n");	209	printf("Running reclaim single-thread test .. pass2\n");
197	totalmemtest();	210	totalmemtest();
198	printf("Reclaim test OK.\n");	211	printf("Reclaim test OK.\n");
199		212
200	multitest(128);	213	multitest(128);
201	multitest(2048);	214	multitest(2048);
202	multitest(8192);	215	multitest(8192);
203	printf("All done.\n");	216	printf("All done.\n");
204	}	217	}
205		218

Subversion Repositories HelenOS-historic

(root)/kernel/trunk/test/mm/slab2/test.c – Rev 780 → 842