Subversion Repositories HelenOS

Rev

Rev 3880 | Rev 3910 | Go to most recent revision | Only display areas with differences | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 3880 Rev 3908
1
/*
1
/*
2
 * Copyright (c) 2005 Jakub Jermar
2
 * Copyright (c) 2005 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
/** @addtogroup mips32mm   
29
/** @addtogroup mips32mm   
30
 * @{
30
 * @{
31
 */
31
 */
32
/** @file
32
/** @file
33
 */
33
 */
34
 
34
 
35
#include <macros.h>
35
#include <macros.h>
36
#include <arch/mm/frame.h>
36
#include <arch/mm/frame.h>
37
#include <arch/mm/tlb.h>
37
#include <arch/mm/tlb.h>
38
#include <interrupt.h>
38
#include <interrupt.h>
39
#include <mm/frame.h>
39
#include <mm/frame.h>
40
#include <mm/asid.h>
40
#include <mm/asid.h>
41
#include <config.h>
41
#include <config.h>
42
#include <arch/drivers/msim.h>
42
#include <arch/drivers/msim.h>
43
#include <arch/drivers/serial.h>
43
#include <arch/drivers/serial.h>
44
#include <print.h>
44
#include <print.h>
45
 
45
 
46
#define ZERO_PAGE_MASK      TLB_PAGE_MASK_256K
46
#define ZERO_PAGE_MASK      TLB_PAGE_MASK_256K
47
#define ZERO_FRAMES         2048
47
#define ZERO_FRAMES         2048
48
#define ZERO_PAGE_WIDTH     18  /* 256K */
48
#define ZERO_PAGE_WIDTH     18  /* 256K */
49
#define ZERO_PAGE_SIZE      (1 << ZERO_PAGE_WIDTH)
49
#define ZERO_PAGE_SIZE      (1 << ZERO_PAGE_WIDTH)
50
#define ZERO_PAGE_ASID      ASID_INVALID
50
#define ZERO_PAGE_ASID      ASID_INVALID
51
#define ZERO_PAGE_TLBI      0
51
#define ZERO_PAGE_TLBI      0
52
#define ZERO_PAGE_ADDR      0
52
#define ZERO_PAGE_ADDR      0
53
#define ZERO_PAGE_OFFSET    (ZERO_PAGE_SIZE / sizeof(uint32_t) - 1)
53
#define ZERO_PAGE_OFFSET    (ZERO_PAGE_SIZE / sizeof(uint32_t) - 1)
54
#define ZERO_PAGE_VALUE     (((volatile uint32_t *) ZERO_PAGE_ADDR)[ZERO_PAGE_OFFSET])
54
#define ZERO_PAGE_VALUE     (((volatile uint32_t *) ZERO_PAGE_ADDR)[ZERO_PAGE_OFFSET])
55
 
55
 
56
#define ZERO_PAGE_VALUE_KSEG1(frame) (((volatile uint32_t *) (0xa0000000 + (frame << ZERO_PAGE_WIDTH)))[ZERO_PAGE_OFFSET])
56
#define ZERO_PAGE_VALUE_KSEG1(frame) (((volatile uint32_t *) (0xa0000000 + (frame << ZERO_PAGE_WIDTH)))[ZERO_PAGE_OFFSET])
57
 
57
 
58
#define MAX_REGIONS         32
58
#define MAX_REGIONS         32
59
 
59
 
60
typedef struct {
60
typedef struct {
61
    pfn_t start;
61
    pfn_t start;
62
    pfn_t count;
62
    pfn_t count;
63
} phys_region_t;
63
} phys_region_t;
64
 
64
 
65
static count_t phys_regions_count = 0;
65
static count_t phys_regions_count = 0;
66
static phys_region_t phys_regions[MAX_REGIONS];
66
static phys_region_t phys_regions[MAX_REGIONS];
67
 
67
 
-
 
68
uintptr_t end_frame = 0;
-
 
69
 
68
 
70
 
69
/** Check whether frame is available
71
/** Check whether frame is available
70
 *
72
 *
71
 * Returns true if given frame is generally available for use.
73
 * Returns true if given frame is generally available for use.
72
 * Returns false if given frame is used for physical memory
74
 * Returns false if given frame is used for physical memory
73
 * mapped devices and cannot be used.
75
 * mapped devices and cannot be used.
74
 *
76
 *
75
 */
77
 */
76
static bool frame_available(pfn_t frame)
78
static bool frame_available(pfn_t frame)
77
{
79
{
78
#ifdef msim
80
#ifdef msim
79
    /* MSIM device (dprinter) */
81
    /* MSIM device (dprinter) */
80
    if (frame == (KA2PA(MSIM_VIDEORAM) >> ZERO_PAGE_WIDTH))
82
    if (frame == (KA2PA(MSIM_VIDEORAM) >> ZERO_PAGE_WIDTH))
81
        return false;
83
        return false;
82
   
84
   
83
    /* MSIM device (dkeyboard) */
85
    /* MSIM device (dkeyboard) */
84
    if (frame == (KA2PA(MSIM_KBD_ADDRESS) >> ZERO_PAGE_WIDTH))
86
    if (frame == (KA2PA(MSIM_KBD_ADDRESS) >> ZERO_PAGE_WIDTH))
85
        return false;
87
        return false;
86
#endif
88
#endif
87
 
89
 
88
#ifdef simics
90
#ifdef simics
89
    /* Simics device (serial line) */
91
    /* Simics device (serial line) */
90
    if (frame == (KA2PA(SERIAL_ADDRESS) >> ZERO_PAGE_WIDTH))
92
    if (frame == (KA2PA(SERIAL_ADDRESS) >> ZERO_PAGE_WIDTH))
91
        return false;
93
        return false;
92
#endif
94
#endif
93
 
95
 
94
#if defined(lgxemul) || defined(bgxemul)
96
#if defined(lgxemul) || defined(bgxemul)
95
    /* gxemul devices */
97
    /* gxemul devices */
96
    if (overlaps(frame << ZERO_PAGE_WIDTH, ZERO_PAGE_SIZE,
98
    if (overlaps(frame << ZERO_PAGE_WIDTH, ZERO_PAGE_SIZE,
97
        0x10000000, MB2SIZE(256)))
99
        0x10000000, MB2SIZE(256)))
98
        return false;
100
        return false;
99
#endif
101
#endif
100
   
102
   
101
    return true;
103
    return true;
102
}
104
}
103
 
105
 
104
 
106
 
105
/** Check whether frame is safe to write
107
/** Check whether frame is safe to write
106
 *
108
 *
107
 * Returns true if given frame is safe for read/write test.
109
 * Returns true if given frame is safe for read/write test.
108
 * Returns false if given frame should not be touched.
110
 * Returns false if given frame should not be touched.
109
 *
111
 *
110
 */
112
 */
111
static bool frame_safe(pfn_t frame)
113
static bool frame_safe(pfn_t frame)
112
{
114
{
113
    /* Kernel structures */
115
    /* Kernel structures */
114
    if ((frame << ZERO_PAGE_WIDTH) < KA2PA(config.base))
116
    if ((frame << ZERO_PAGE_WIDTH) < KA2PA(config.base))
115
        return false;
117
        return false;
116
   
118
   
117
    /* Kernel */
119
    /* Kernel */
118
    if (overlaps(frame << ZERO_PAGE_WIDTH, ZERO_PAGE_SIZE,
120
    if (overlaps(frame << ZERO_PAGE_WIDTH, ZERO_PAGE_SIZE,
119
        KA2PA(config.base), config.kernel_size))
121
        KA2PA(config.base), config.kernel_size))
120
        return false;
122
        return false;
121
   
123
   
122
    /* Kernel stack */
124
    /* Kernel stack */
123
    if (overlaps(frame << ZERO_PAGE_WIDTH, ZERO_PAGE_SIZE,
125
    if (overlaps(frame << ZERO_PAGE_WIDTH, ZERO_PAGE_SIZE,
124
        KA2PA(config.stack_base), config.stack_size))
126
        KA2PA(config.stack_base), config.stack_size))
125
        return false;
127
        return false;
126
   
128
   
127
    /* Init tasks */
129
    /* Init tasks */
128
    bool safe = true;
130
    bool safe = true;
129
    count_t i;
131
    count_t i;
130
    for (i = 0; i < init.cnt; i++)
132
    for (i = 0; i < init.cnt; i++)
131
        if (overlaps(frame << ZERO_PAGE_WIDTH, ZERO_PAGE_SIZE,
133
        if (overlaps(frame << ZERO_PAGE_WIDTH, ZERO_PAGE_SIZE,
132
            KA2PA(init.tasks[i].addr), init.tasks[i].size)) {
134
            KA2PA(init.tasks[i].addr), init.tasks[i].size)) {
133
            safe = false;
135
            safe = false;
134
            break;
136
            break;
135
        }
137
        }
136
   
138
   
137
    return safe;
139
    return safe;
138
}
140
}
139
 
141
 
140
static void frame_add_region(pfn_t start_frame, pfn_t end_frame)
142
static void frame_add_region(pfn_t start_frame, pfn_t end_frame)
141
{
143
{
142
    if (end_frame > start_frame) {
144
    if (end_frame > start_frame) {
143
        /* Convert 1M frames to 16K frames */
145
        /* Convert 1M frames to 16K frames */
144
        pfn_t first = ADDR2PFN(start_frame << ZERO_PAGE_WIDTH);
146
        pfn_t first = ADDR2PFN(start_frame << ZERO_PAGE_WIDTH);
145
        pfn_t count = ADDR2PFN((end_frame - start_frame) << ZERO_PAGE_WIDTH);
147
        pfn_t count = ADDR2PFN((end_frame - start_frame) << ZERO_PAGE_WIDTH);
146
       
148
       
147
        /* Interrupt vector frame is blacklisted */
149
        /* Interrupt vector frame is blacklisted */
148
        pfn_t conf_frame;
150
        pfn_t conf_frame;
149
        if (first == 0)
151
        if (first == 0)
150
            conf_frame = 1;
152
            conf_frame = 1;
151
        else
153
        else
152
            conf_frame = first;
154
            conf_frame = first;
153
       
155
       
154
        zone_create(first, count, conf_frame, 0);
156
        zone_create(first, count, conf_frame, 0);
155
       
157
       
156
        if (phys_regions_count < MAX_REGIONS) {
158
        if (phys_regions_count < MAX_REGIONS) {
157
            phys_regions[phys_regions_count].start = first;
159
            phys_regions[phys_regions_count].start = first;
158
            phys_regions[phys_regions_count].count = count;
160
            phys_regions[phys_regions_count].count = count;
159
            phys_regions_count++;
161
            phys_regions_count++;
160
        }
162
        }
161
    }
163
    }
162
}
164
}
163
 
165
 
164
 
166
 
165
/** Create memory zones
167
/** Create memory zones
166
 *
168
 *
167
 * Walk through available 256 KB chunks of physical
169
 * Walk through available 256 KB chunks of physical
168
 * memory and create zones.
170
 * memory and create zones.
169
 *
171
 *
170
 * Note: It is assumed that the TLB is not yet being
172
 * Note: It is assumed that the TLB is not yet being
171
 * used in any way, thus there is no interference.
173
 * used in any way, thus there is no interference.
172
 *
174
 *
173
 */
175
 */
174
void frame_arch_init(void)
176
void frame_arch_init(void)
175
{
177
{
176
    ipl_t ipl = interrupts_disable();
178
    ipl_t ipl = interrupts_disable();
177
   
179
   
178
    /* Clear and initialize TLB */
180
    /* Clear and initialize TLB */
179
    cp0_pagemask_write(ZERO_PAGE_MASK);
181
    cp0_pagemask_write(ZERO_PAGE_MASK);
180
    cp0_entry_lo0_write(0);
182
    cp0_entry_lo0_write(0);
181
    cp0_entry_lo1_write(0);
183
    cp0_entry_lo1_write(0);
182
    cp0_entry_hi_write(0);
184
    cp0_entry_hi_write(0);
183
 
185
 
184
    count_t i;
186
    count_t i;
185
    for (i = 0; i < TLB_ENTRY_COUNT; i++) {
187
    for (i = 0; i < TLB_ENTRY_COUNT; i++) {
186
        cp0_index_write(i);
188
        cp0_index_write(i);
187
        tlbwi();
189
        tlbwi();
188
    }
190
    }
189
       
191
       
190
    pfn_t start_frame = 0;
192
    pfn_t start_frame = 0;
191
    pfn_t frame;
193
    pfn_t frame;
192
    bool avail = true;
194
    bool avail = true;
193
   
195
   
194
    /* Walk through all 1 MB frames */
196
    /* Walk through all 1 MB frames */
195
    for (frame = 0; frame < ZERO_FRAMES; frame++) {
197
    for (frame = 0; frame < ZERO_FRAMES; frame++) {
196
        if (!frame_available(frame))
198
        if (!frame_available(frame))
197
            avail = false;
199
            avail = false;
198
        else {
200
        else {
199
            if (frame_safe(frame)) {
201
            if (frame_safe(frame)) {
200
                entry_lo_t lo0;
202
                entry_lo_t lo0;
201
                entry_lo_t lo1;
203
                entry_lo_t lo1;
202
                entry_hi_t hi;
204
                entry_hi_t hi;
203
                tlb_prepare_entry_lo(&lo0, false, true, true, false, frame << (ZERO_PAGE_WIDTH - 12));
205
                tlb_prepare_entry_lo(&lo0, false, true, true, false, frame << (ZERO_PAGE_WIDTH - 12));
204
                tlb_prepare_entry_lo(&lo1, false, false, false, false, 0);
206
                tlb_prepare_entry_lo(&lo1, false, false, false, false, 0);
205
                tlb_prepare_entry_hi(&hi, ZERO_PAGE_ASID, ZERO_PAGE_ADDR);
207
                tlb_prepare_entry_hi(&hi, ZERO_PAGE_ASID, ZERO_PAGE_ADDR);
206
               
208
               
207
                cp0_pagemask_write(ZERO_PAGE_MASK);
209
                cp0_pagemask_write(ZERO_PAGE_MASK);
208
                cp0_entry_lo0_write(lo0.value);
210
                cp0_entry_lo0_write(lo0.value);
209
                cp0_entry_lo1_write(lo1.value);
211
                cp0_entry_lo1_write(lo1.value);
210
                cp0_entry_hi_write(hi.value);
212
                cp0_entry_hi_write(hi.value);
211
                cp0_index_write(ZERO_PAGE_TLBI);
213
                cp0_index_write(ZERO_PAGE_TLBI);
212
                tlbwi();
214
                tlbwi();
213
               
215
               
214
                ZERO_PAGE_VALUE = 0;
216
                ZERO_PAGE_VALUE = 0;
215
                if (ZERO_PAGE_VALUE != 0)
217
                if (ZERO_PAGE_VALUE != 0)
216
                    avail = false;
218
                    avail = false;
217
                else {
219
                else {
218
                    ZERO_PAGE_VALUE = 0xdeadbeef;
220
                    ZERO_PAGE_VALUE = 0xdeadbeef;
219
                    if (ZERO_PAGE_VALUE != 0xdeadbeef)
221
                    if (ZERO_PAGE_VALUE != 0xdeadbeef)
220
                        avail = false;
222
                        avail = false;
221
#if defined(lgxemul) || defined(bgxemul)
223
#if defined(lgxemul) || defined(bgxemul)
222
                    else {
224
                    else {
223
                        ZERO_PAGE_VALUE_KSEG1(frame) = 0xaabbccdd;
225
                        ZERO_PAGE_VALUE_KSEG1(frame) = 0xaabbccdd;
224
                        if (ZERO_PAGE_VALUE_KSEG1(frame) != 0xaabbccdd)
226
                        if (ZERO_PAGE_VALUE_KSEG1(frame) != 0xaabbccdd)
225
                            avail = false;
227
                            avail = false;
226
                    }
228
                    }
227
#endif
229
#endif
228
                }
230
                }
229
            }
231
            }
230
        }
232
        }
231
       
233
       
232
        if (!avail) {
234
        if (!avail) {
233
            frame_add_region(start_frame, frame);
235
            frame_add_region(start_frame, frame);
234
            start_frame = frame + 1;
236
            start_frame = frame + 1;
235
            avail = true;
237
            avail = true;
236
        }
238
        }
237
    }
239
    }
238
   
240
   
-
 
241
    end_frame = frame;
-
 
242
   
239
    frame_add_region(start_frame, frame);
243
    frame_add_region(start_frame, end_frame);
240
   
244
   
241
    /* Blacklist interrupt vector frame */
245
    /* Blacklist interrupt vector frame */
242
    frame_mark_unavailable(0, 1);
246
    frame_mark_unavailable(0, 1);
243
   
247
   
244
    /* Cleanup */
248
    /* Cleanup */
245
    cp0_pagemask_write(ZERO_PAGE_MASK);
249
    cp0_pagemask_write(ZERO_PAGE_MASK);
246
    cp0_entry_lo0_write(0);
250
    cp0_entry_lo0_write(0);
247
    cp0_entry_lo1_write(0);
251
    cp0_entry_lo1_write(0);
248
    cp0_entry_hi_write(0);
252
    cp0_entry_hi_write(0);
249
    cp0_index_write(ZERO_PAGE_TLBI);
253
    cp0_index_write(ZERO_PAGE_TLBI);
250
    tlbwi();
254
    tlbwi();
251
   
255
   
252
    interrupts_restore(ipl);
256
    interrupts_restore(ipl);
253
}
257
}
254
 
258
 
255
 
259
 
256
void physmem_print(void)
260
void physmem_print(void)
257
{
261
{
258
    printf("Base       Size\n");
262
    printf("Base       Size\n");
259
    printf("---------- ----------\n");
263
    printf("---------- ----------\n");
260
   
264
   
261
    count_t i;
265
    count_t i;
262
    for (i = 0; i < phys_regions_count; i++) {
266
    for (i = 0; i < phys_regions_count; i++) {
263
        printf("%#010x %10u\n",
267
        printf("%#010x %10u\n",
264
            PFN2ADDR(phys_regions[i].start), PFN2ADDR(phys_regions[i].count));
268
            PFN2ADDR(phys_regions[i].start), PFN2ADDR(phys_regions[i].count));
265
    }  
269
    }  
266
}
270
}
267
 
271
 
268
/** @}
272
/** @}
269
 */
273
 */
270
 
274