Subversion Repositories HelenOS

Rev

Rev 3191 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
767 palkovsky 1
/*
2071 jermar 2
 * Copyright (c) 2006 Ondrej Palkovsky
767 palkovsky 3
 * All rights reserved.
4
 *
5
 * Redistribution and use in source and binary forms, with or without
6
 * modification, are permitted provided that the following conditions
7
 * are met:
8
 *
9
 * - Redistributions of source code must retain the above copyright
10
 *   notice, this list of conditions and the following disclaimer.
11
 * - Redistributions in binary form must reproduce the above copyright
12
 *   notice, this list of conditions and the following disclaimer in the
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
15
 *   derived from this software without specific prior written permission.
16
 *
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
19
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
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
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
26
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27
 */
28
 
29
#include <test.h>
30
#include <mm/slab.h>
31
#include <print.h>
32
#include <proc/thread.h>
33
#include <arch.h>
34
#include <mm/frame.h>
768 palkovsky 35
#include <memstr.h>
842 palkovsky 36
#include <synch/condvar.h>
37
#include <synch/mutex.h>
767 palkovsky 38
 
4348 svoboda 39
#define ITEM_SIZE  256
767 palkovsky 40
 
41
/** Fill memory with 2 caches, when allocation fails,
42
 *  free one of the caches. We should have everything in magazines,
43
 *  now allocation should clean magazines and allow for full allocation.
44
 */
4348 svoboda 45
static void totalmemtest(void)
767 palkovsky 46
{
47
    slab_cache_t *cache1;
48
    slab_cache_t *cache2;
49
    int i;
4348 svoboda 50
 
767 palkovsky 51
    void *data1, *data2;
2053 decky 52
    void *olddata1 = NULL, *olddata2 = NULL;
767 palkovsky 53
 
54
    cache1 = slab_cache_create("cache1_tst", ITEM_SIZE, 0, NULL, NULL, 0);
55
    cache2 = slab_cache_create("cache2_tst", ITEM_SIZE, 0, NULL, NULL, 0);
2053 decky 56
 
4348 svoboda 57
    TPRINTF("Allocating...");
2053 decky 58
 
767 palkovsky 59
    /* Use atomic alloc, so that we find end of memory */
60
    do {
61
        data1 = slab_alloc(cache1, FRAME_ATOMIC);
62
        data2 = slab_alloc(cache2, FRAME_ATOMIC);
2053 decky 63
        if ((!data1) || (!data2)) {
767 palkovsky 64
            if (data1)
2053 decky 65
                slab_free(cache1, data1);
767 palkovsky 66
            if (data2)
2053 decky 67
                slab_free(cache2, data2);
767 palkovsky 68
            break;
69
        }
3153 svoboda 70
        memsetb(data1, ITEM_SIZE, 0);
71
        memsetb(data2, ITEM_SIZE, 0);
2053 decky 72
        *((void **) data1) = olddata1;
73
        *((void **) data2) = olddata2;
767 palkovsky 74
        olddata1 = data1;
75
        olddata2 = data2;
4348 svoboda 76
    } while (true);
2053 decky 77
 
4348 svoboda 78
    TPRINTF("done.\n");
2053 decky 79
 
4348 svoboda 80
    TPRINTF("Deallocating cache2...");
81
 
767 palkovsky 82
    /* We do not have memory - now deallocate cache2 */
83
    while (olddata2) {
2053 decky 84
        data2 = *((void **) olddata2);
767 palkovsky 85
        slab_free(cache2, olddata2);
86
        olddata2 = data2;
87
    }
2053 decky 88
 
4348 svoboda 89
    TPRINTF("done.\n");
2053 decky 90
 
4348 svoboda 91
    TPRINTF("Allocating to cache1...\n");
92
 
2053 decky 93
    for (i = 0; i < 30; i++) {
767 palkovsky 94
        data1 = slab_alloc(cache1, FRAME_ATOMIC);
95
        if (!data1) {
4348 svoboda 96
            TPRINTF("Incorrect memory size - use another test.");
2029 decky 97
            return;
767 palkovsky 98
        }
3153 svoboda 99
        memsetb(data1, ITEM_SIZE, 0);
2053 decky 100
        *((void **) data1) = olddata1;
767 palkovsky 101
        olddata1 = data1;
102
    }
4348 svoboda 103
    while (true) {
767 palkovsky 104
        data1 = slab_alloc(cache1, FRAME_ATOMIC);
2053 decky 105
        if (!data1)
767 palkovsky 106
            break;
3153 svoboda 107
        memsetb(data1, ITEM_SIZE, 0);
2053 decky 108
        *((void **) data1) = olddata1;
767 palkovsky 109
        olddata1 = data1;
110
    }
2053 decky 111
 
4348 svoboda 112
    TPRINTF("Deallocating cache1...");
2053 decky 113
 
768 palkovsky 114
    while (olddata1) {
2053 decky 115
        data1 = *((void **) olddata1);
768 palkovsky 116
        slab_free(cache1, olddata1);
117
        olddata1 = data1;
118
    }
2053 decky 119
 
4348 svoboda 120
    TPRINTF("done.\n");
121
 
122
    if (!test_quiet)
2053 decky 123
        slab_print_list();
124
 
768 palkovsky 125
    slab_cache_destroy(cache1);
126
    slab_cache_destroy(cache2);
767 palkovsky 127
}
128
 
2022 decky 129
static slab_cache_t *thr_cache;
130
static semaphore_t thr_sem;
131
static condvar_t thread_starter;
132
static mutex_t starter_mutex;
773 palkovsky 133
 
4348 svoboda 134
#define THREADS  8
773 palkovsky 135
 
1062 jermar 136
static void slabtest(void *priv)
773 palkovsky 137
{
2028 decky 138
    void *data = NULL, *new;
2053 decky 139
 
1658 vana 140
    thread_detach(THREAD);
2053 decky 141
 
842 palkovsky 142
    mutex_lock(&starter_mutex);
143
    condvar_wait(&thread_starter,&starter_mutex);
144
    mutex_unlock(&starter_mutex);
2053 decky 145
 
4348 svoboda 146
    TPRINTF("Starting thread #%" PRIu64 "...\n", THREAD->tid);
773 palkovsky 147
 
148
    /* Alloc all */
4348 svoboda 149
    TPRINTF("Thread #%" PRIu64 " allocating...\n", THREAD->tid);
2053 decky 150
 
4348 svoboda 151
    while (true) {
773 palkovsky 152
        /* Call with atomic to detect end of memory */
153
        new = slab_alloc(thr_cache, FRAME_ATOMIC);
154
        if (!new)
155
            break;
2053 decky 156
        *((void **) new) = data;
773 palkovsky 157
        data = new;
158
    }
2053 decky 159
 
4348 svoboda 160
    TPRINTF("Thread #%" PRIu64 " releasing...\n", THREAD->tid);
2053 decky 161
 
773 palkovsky 162
    while (data) {
163
        new = *((void **)data);
2053 decky 164
        *((void **) data) = NULL;
773 palkovsky 165
        slab_free(thr_cache, data);
166
        data = new;
167
    }
2053 decky 168
 
4348 svoboda 169
    TPRINTF("Thread #%" PRIu64 " allocating...\n", THREAD->tid);
2053 decky 170
 
4348 svoboda 171
    while (true) {
773 palkovsky 172
        /* Call with atomic to detect end of memory */
173
        new = slab_alloc(thr_cache, FRAME_ATOMIC);
174
        if (!new)
175
            break;
2053 decky 176
        *((void **) new) = data;
773 palkovsky 177
        data = new;
178
    }
2053 decky 179
 
4348 svoboda 180
    TPRINTF("Thread #%" PRIu64 " releasing...\n", THREAD->tid);
2053 decky 181
 
773 palkovsky 182
    while (data) {
183
        new = *((void **)data);
2053 decky 184
        *((void **) data) = NULL;
773 palkovsky 185
        slab_free(thr_cache, data);
186
        data = new;
187
    }
2053 decky 188
 
4348 svoboda 189
    TPRINTF("Thread #%" PRIu64 " finished\n", THREAD->tid);
2053 decky 190
 
4348 svoboda 191
    if (!test_quiet)
192
        slab_print_list();
193
 
773 palkovsky 194
    semaphore_up(&thr_sem);
195
}
196
 
4348 svoboda 197
static void multitest(int size)
773 palkovsky 198
{
199
    /* Start 8 threads that just allocate as much as possible,
200
     * then release everything, then again allocate, then release
201
     */
202
    thread_t *t;
203
    int i;
2053 decky 204
 
4348 svoboda 205
    TPRINTF("Running stress test with size %d\n", size);
2053 decky 206
 
842 palkovsky 207
    condvar_initialize(&thread_starter);
3191 svoboda 208
    mutex_initialize(&starter_mutex, MUTEX_PASSIVE);
4348 svoboda 209
 
2053 decky 210
    thr_cache = slab_cache_create("thread_cache", size, 0, NULL, NULL, 0);
773 palkovsky 211
    semaphore_initialize(&thr_sem,0);
2028 decky 212
    for (i = 0; i < THREADS; i++) {  
2053 decky 213
        if (!(t = thread_create(slabtest, NULL, TASK, 0, "slabtest", false))) {
4348 svoboda 214
            TPRINTF("Could not create thread %d\n", i);
2053 decky 215
        } else
2028 decky 216
            thread_ready(t);
773 palkovsky 217
    }
842 palkovsky 218
    thread_sleep(1);
219
    condvar_broadcast(&thread_starter);
4348 svoboda 220
 
2028 decky 221
    for (i = 0; i < THREADS; i++)
773 palkovsky 222
        semaphore_down(&thr_sem);
223
 
224
    slab_cache_destroy(thr_cache);
4348 svoboda 225
    TPRINTF("Stress test complete.\n");
773 palkovsky 226
}
227
 
4348 svoboda 228
char *test_slab2(void)
767 palkovsky 229
{
4348 svoboda 230
    TPRINTF("Running reclaim single-thread test .. pass 1\n");
231
    totalmemtest();
2028 decky 232
 
4348 svoboda 233
    TPRINTF("Running reclaim single-thread test .. pass 2\n");
234
    totalmemtest();
2053 decky 235
 
4348 svoboda 236
    TPRINTF("Reclaim test OK.\n");
2053 decky 237
 
4348 svoboda 238
    multitest(128);
239
    multitest(2048);
240
    multitest(8192);
241
 
2028 decky 242
    return NULL;
767 palkovsky 243
}