Subversion Repositories HelenOS

Rev

Rev 4343 | Rev 4346 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

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