Subversion Repositories HelenOS

Rev

Rev 195 | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 195 Rev 219
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 <arch/types.h>
29
#include <arch/types.h>
30
#include <func.h>
30
#include <func.h>
31
 
31
 
32
#include <mm/heap.h>
32
#include <mm/heap.h>
33
#include <mm/frame.h>
33
#include <mm/frame.h>
34
#include <mm/page.h>
34
#include <mm/page.h>
35
#include <mm/vm.h>
35
#include <mm/vm.h>
36
#include <arch/mm/page.h>
36
#include <arch/mm/page.h>
37
 
37
 
38
#include <config.h>
38
#include <config.h>
39
#include <memstr.h>
39
#include <memstr.h>
40
 
40
 
41
#include <panic.h>
41
#include <panic.h>
42
 
42
 
43
#include <synch/spinlock.h>
43
#include <synch/spinlock.h>
44
 
44
 
45
#include <arch/asm.h>
45
#include <arch/asm.h>
46
#include <arch.h>
46
#include <arch.h>
47
 
47
 
48
count_t frames = 0;
48
count_t frames = 0;
49
count_t frames_free;
49
count_t frames_free;
50
 
50
 
51
__u8 *frame_bitmap;
51
__u8 *frame_bitmap;
52
count_t frame_bitmap_octets;
52
count_t frame_bitmap_octets;
53
 
53
 
54
static spinlock_t framelock;
54
static spinlock_t framelock;
55
 
55
 
56
void frame_init(void)
56
void frame_init(void)
57
{
57
{
58
    if (config.cpu_active == 1) {
58
    if (config.cpu_active == 1) {
59
 
59
 
60
        /*
60
        /*
61
         * The bootstrap processor will allocate all necessary memory for frame allocation.
61
         * The bootstrap processor will allocate all necessary memory for frame allocation.
62
         */
62
         */
63
 
63
 
64
        frames = config.memory_size / FRAME_SIZE;
64
        frames = config.memory_size / FRAME_SIZE;
65
        frame_bitmap_octets = frames / 8 + (frames % 8 > 0);
65
        frame_bitmap_octets = frames / 8 + (frames % 8 > 0);
66
        frame_bitmap = (__u8 *) malloc(frame_bitmap_octets);
66
        frame_bitmap = (__u8 *) malloc(frame_bitmap_octets);
67
        if (!frame_bitmap)
67
        if (!frame_bitmap)
68
            panic("malloc/frame_bitmap\n");
68
            panic("malloc/frame_bitmap\n");
69
 
69
 
70
        /*
70
        /*
71
         * Mark all frames free.
71
         * Mark all frames free.
72
         */
72
         */
73
        memsetb((__address) frame_bitmap, frame_bitmap_octets, 0);
73
        memsetb((__address) frame_bitmap, frame_bitmap_octets, 0);
74
        frames_free = frames;
74
        frames_free = frames;
75
    }
75
    }
76
 
76
 
77
    /*
77
    /*
78
     * No frame allocations/reservations prior this point.
78
     * No frame allocations/reservations prior this point.
79
     */
79
     */
80
 
80
 
81
    frame_arch_init();
81
    frame_arch_init();
82
 
82
 
83
    if (config.cpu_active == 1) {
83
    if (config.cpu_active == 1) {
84
        /*
84
        /*
85
         * Create the memory address space map. Marked frames and frame
85
         * Create the memory address space map. Marked frames and frame
86
         * regions cannot be used for allocation.
86
         * regions cannot be used for allocation.
87
         */
87
         */
88
        frame_region_not_free(config.base, config.base + config.kernel_size);
88
        frame_region_not_free(config.base, config.base + config.kernel_size);
89
    }
89
    }
90
}
90
}
91
 
91
 
92
/*
92
/*
93
 * Allocate a frame.
93
 * Allocate a frame.
94
 */
94
 */
95
__address frame_alloc(int flags)
95
__address frame_alloc(int flags)
96
{
96
{
97
    int i;
97
    int i;
98
    pri_t pri;
98
    pri_t pri;
99
   
99
   
100
loop:
100
loop:
101
    pri = cpu_priority_high();
101
    pri = cpu_priority_high();
102
    spinlock_lock(&framelock);
102
    spinlock_lock(&framelock);
103
    if (frames_free) {
103
    if (frames_free) {
104
        for (i=0; i < frames; i++) {
104
        for (i=0; i < frames; i++) {
105
            int m, n;
105
            int m, n;
106
       
106
       
107
            m = i / 8;
107
            m = i / 8;
108
            n = i % 8;
108
            n = i % 8;
109
 
109
 
110
            if ((frame_bitmap[m] & (1<<n)) == 0) {
110
            if ((frame_bitmap[m] & (1<<n)) == 0) {
111
                frame_bitmap[m] |= (1<<n);
111
                frame_bitmap[m] |= (1<<n);
112
                frames_free--;
112
                frames_free--;
113
                spinlock_unlock(&framelock);
113
                spinlock_unlock(&framelock);
114
                cpu_priority_restore(pri);
114
                cpu_priority_restore(pri);
115
                if (flags & FRAME_KA) return PA2KA(i*FRAME_SIZE);
115
                if (flags & FRAME_KA) return PA2KA(i*FRAME_SIZE);
116
                return i*FRAME_SIZE;
116
                return i*FRAME_SIZE;
117
            }
117
            }
118
        }
118
        }
119
        panic("frames_free inconsistent (%d)\n", frames_free);
119
        panic("frames_free inconsistent (%d)\n", frames_free);
120
    }
120
    }
121
    spinlock_unlock(&framelock);
121
    spinlock_unlock(&framelock);
122
    cpu_priority_restore(pri);
122
    cpu_priority_restore(pri);
123
 
123
 
124
    if (flags & FRAME_PANIC)
124
    if (flags & FRAME_PANIC)
125
        panic("unable to allocate frame\n");
125
        panic("unable to allocate frame\n");
126
       
126
       
127
    /* TODO: implement sleeping logic here */
127
    /* TODO: implement sleeping logic here */
128
    panic("sleep not supported\n");
128
    panic("sleep not supported\n");
129
   
129
   
130
    goto loop;
130
    goto loop;
131
}
131
}
132
 
132
 
133
/*
133
/*
134
 * Free a frame.
134
 * Free a frame.
135
 */
135
 */
136
void frame_free(__address addr)
136
void frame_free(__address addr)
137
{
137
{
138
    pri_t pri;
138
    pri_t pri;
139
    __u32 frame;
139
    __u32 frame;
140
 
140
 
141
    pri = cpu_priority_high();
141
    pri = cpu_priority_high();
142
    spinlock_lock(&framelock);
142
    spinlock_lock(&framelock);
143
   
143
   
144
    frame = IS_KA(addr) ? KA2PA(addr) : addr;
144
    frame = IS_KA(addr) ? KA2PA(addr) : addr;
145
    frame /= FRAME_SIZE;
145
    frame /= FRAME_SIZE;
146
    if (frame < frames) {
146
    if (frame < frames) {
147
        int m, n;
147
        int m, n;
148
   
148
   
149
        m = frame / 8;
149
        m = frame / 8;
150
        n = frame % 8;
150
        n = frame % 8;
151
   
151
   
152
        if (frame_bitmap[m] & (1<<n)) {
152
        if (frame_bitmap[m] & (1<<n)) {
153
            frame_bitmap[m] &= ~(1<<n);
153
            frame_bitmap[m] &= ~(1<<n);
154
            frames_free++;
154
            frames_free++;
155
        }
155
        }
156
        else panic("frame already free\n");
156
        else panic("frame already free\n");
157
    }
157
    }
158
    else panic("frame number too big\n");
158
    else panic("frame number too big\n");
159
   
159
   
160
    spinlock_unlock(&framelock);
160
    spinlock_unlock(&framelock);
161
    cpu_priority_restore(pri);
161
    cpu_priority_restore(pri);
162
}
162
}
163
 
163
 
164
/*
164
/*
165
 * Don't use this function for normal allocation. Use frame_alloc() instead.
165
 * Don't use this function for normal allocation. Use frame_alloc() instead.
166
 * Use this function to declare that some special frame is not free.
166
 * Use this function to declare that some special frame is not free.
167
 */
167
 */
168
void frame_not_free(__address addr)
168
void frame_not_free(__address addr)
169
{
169
{
170
    pri_t pri;
170
    pri_t pri;
171
    __u32 frame;
171
    __u32 frame;
172
   
172
   
173
    pri = cpu_priority_high();
173
    pri = cpu_priority_high();
174
    spinlock_lock(&framelock);
174
    spinlock_lock(&framelock);
175
    frame = IS_KA(addr) ? KA2PA(addr) : addr;
175
    frame = IS_KA(addr) ? KA2PA(addr) : addr;
176
    frame /= FRAME_SIZE;
176
    frame /= FRAME_SIZE;
177
    if (frame < frames) {
177
    if (frame < frames) {
178
        int m, n;
178
        int m, n;
179
 
179
 
180
        m = frame / 8;
180
        m = frame / 8;
181
        n = frame % 8;
181
        n = frame % 8;
182
   
182
   
183
        if ((frame_bitmap[m] & (1<<n)) == 0) { 
183
        if ((frame_bitmap[m] & (1<<n)) == 0) { 
184
            frame_bitmap[m] |= (1<<n);
184
            frame_bitmap[m] |= (1<<n);
185
            frames_free--; 
185
            frames_free--; 
186
        }
186
        }
187
    }
187
    }
188
    spinlock_unlock(&framelock);
188
    spinlock_unlock(&framelock);
189
    cpu_priority_restore(pri);
189
    cpu_priority_restore(pri);
190
}
190
}
191
 
191
 
192
void frame_region_not_free(__address start, __address stop)
192
void frame_region_not_free(__address start, __address stop)
193
{
193
{
194
    __u32 i;
194
    __address a;
195
 
195
 
196
    start /= FRAME_SIZE;
196
    start /= FRAME_SIZE;
197
    stop /= FRAME_SIZE;
197
    stop /= FRAME_SIZE;
198
    for (i = start; i <= stop; i++)
198
    for (a = start; a <= stop; a++)
199
        frame_not_free(i * FRAME_SIZE);
199
        frame_not_free(a * FRAME_SIZE);
200
}
200
}
201
 
201