Subversion Repositories HelenOS

Rev

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

Rev 3763 Rev 3764
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 ia64
29
/** @addtogroup ia64
30
 * @{
30
 * @{
31
 */
31
 */
32
/** @file
32
/** @file
33
 */
33
 */
34
 
34
 
35
#include <arch.h>
35
#include <arch.h>
36
#include <arch/ski/ski.h>
36
#include <arch/ski/ski.h>
37
#include <arch/drivers/it.h>
37
#include <arch/drivers/it.h>
38
#include <arch/interrupt.h>
38
#include <arch/interrupt.h>
39
#include <arch/barrier.h>
39
#include <arch/barrier.h>
40
#include <arch/asm.h>
40
#include <arch/asm.h>
41
#include <arch/register.h>
41
#include <arch/register.h>
42
#include <arch/types.h>
42
#include <arch/types.h>
43
#include <arch/context.h>
43
#include <arch/context.h>
44
#include <arch/stack.h>
44
#include <arch/stack.h>
45
#include <arch/mm/page.h>
45
#include <arch/mm/page.h>
46
#include <mm/as.h>
46
#include <mm/as.h>
47
#include <config.h>
47
#include <config.h>
48
#include <userspace.h>
48
#include <userspace.h>
49
#include <console/console.h>
49
#include <console/console.h>
50
#include <proc/uarg.h>
50
#include <proc/uarg.h>
51
#include <syscall/syscall.h>
51
#include <syscall/syscall.h>
52
#include <ddi/irq.h>
52
#include <ddi/irq.h>
53
#include <ddi/device.h>
53
#include <ddi/device.h>
54
#include <arch/drivers/ega.h>
54
#include <arch/drivers/ega.h>
55
#include <arch/bootinfo.h>
55
#include <arch/bootinfo.h>
56
#include <genarch/kbd/i8042.h>
56
#include <genarch/kbd/i8042.h>
57
#include <genarch/kbd/ns16550.h>
57
#include <genarch/kbd/ns16550.h>
58
#include <smp/smp.h>
58
#include <smp/smp.h>
59
#include <smp/ipi.h>
59
#include <smp/ipi.h>
60
#include <arch/atomic.h>
60
#include <arch/atomic.h>
61
#include <panic.h>
61
#include <panic.h>
62
#include <print.h>
62
#include <print.h>
63
#include <sysinfo/sysinfo.h>
63
#include <sysinfo/sysinfo.h>
64
 
64
 
65
/*NS16550 as a COM 1*/
65
/*NS16550 as a COM 1*/
66
#define NS16550_IRQ (4+LAGACY_INTERRUPT_BASE)
66
#define NS16550_IRQ (4+LEGACY_INTERRUPT_BASE)
67
#define NS16550_PORT 0x3f8
67
#define NS16550_PORT 0x3f8
68
 
68
 
69
bootinfo_t *bootinfo;
69
bootinfo_t *bootinfo;
70
 
70
 
71
static uint64_t iosapic_base=0xfec00000;
71
static uint64_t iosapic_base=0xfec00000;
72
 
72
 
73
void arch_pre_main(void)
73
void arch_pre_main(void)
74
{
74
{
75
    /* Setup usermode init tasks. */
75
    /* Setup usermode init tasks. */
76
 
76
 
77
    unsigned int i;
77
    unsigned int i;
78
   
78
   
79
    init.cnt = bootinfo->taskmap.count;
79
    init.cnt = bootinfo->taskmap.count;
80
   
80
   
81
    for (i = 0; i < init.cnt; i++) {
81
    for (i = 0; i < init.cnt; i++) {
82
        init.tasks[i].addr = ((unsigned long) bootinfo->taskmap.tasks[i].addr) | VRN_MASK;
82
        init.tasks[i].addr = ((unsigned long) bootinfo->taskmap.tasks[i].addr) | VRN_MASK;
83
        init.tasks[i].size = bootinfo->taskmap.tasks[i].size;
83
        init.tasks[i].size = bootinfo->taskmap.tasks[i].size;
84
    }
84
    }
85
}
85
}
86
 
86
 
87
void arch_pre_mm_init(void)
87
void arch_pre_mm_init(void)
88
{
88
{
89
    /* Set Interruption Vector Address (i.e. location of interruption vector table). */
89
    /* Set Interruption Vector Address (i.e. location of interruption vector table). */
90
    iva_write((uintptr_t) &ivt);
90
    iva_write((uintptr_t) &ivt);
91
    srlz_d();
91
    srlz_d();
92
   
92
   
93
}
93
}
94
 
94
 
95
static void iosapic_init(void)
95
static void iosapic_init(void)
96
{
96
{
97
 
97
 
98
    uint64_t IOSAPIC = PA2KA((unative_t)(iosapic_base))|FW_OFFSET;
98
    uint64_t IOSAPIC = PA2KA((unative_t)(iosapic_base))|FW_OFFSET;
99
    int i;
99
    int i;
100
   
100
   
101
    int myid,myeid;
101
    int myid,myeid;
102
   
102
   
103
    myid=ia64_get_cpu_id();
103
    myid=ia64_get_cpu_id();
104
    myeid=ia64_get_cpu_eid();
104
    myeid=ia64_get_cpu_eid();
105
 
105
 
106
    for(i=0;i<16;i++)
106
    for(i=0;i<16;i++)
107
    {
107
    {
108
   
108
   
109
        if(i==2) continue;   //Disable Cascade interrupt
109
        if(i==2) continue;   //Disable Cascade interrupt
110
        ((uint32_t*)(IOSAPIC+0x00))[0]=0x10+2*i;
110
        ((uint32_t*)(IOSAPIC+0x00))[0]=0x10+2*i;
111
        srlz_d();
111
        srlz_d();
112
        ((uint32_t*)(IOSAPIC+0x10))[0]=LAGACY_INTERRUPT_BASE+i;
112
        ((uint32_t*)(IOSAPIC+0x10))[0]=LEGACY_INTERRUPT_BASE+i;
113
        srlz_d();
113
        srlz_d();
114
        ((uint32_t*)(IOSAPIC+0x00))[0]=0x10+2*i+1;
114
        ((uint32_t*)(IOSAPIC+0x00))[0]=0x10+2*i+1;
115
        srlz_d();
115
        srlz_d();
116
        ((uint32_t*)(IOSAPIC+0x10))[0]=myid<<(56-32) | myeid<<(48-32);
116
        ((uint32_t*)(IOSAPIC+0x10))[0]=myid<<(56-32) | myeid<<(48-32);
117
        srlz_d();
117
        srlz_d();
118
    }
118
    }
119
 
119
 
120
}
120
}
121
 
121
 
122
 
122
 
123
void arch_post_mm_init(void)
123
void arch_post_mm_init(void)
124
{
124
{
125
    if(config.cpu_active==1)
125
    if(config.cpu_active==1)
126
    {
126
    {
127
        iosapic_init();
127
        iosapic_init();
128
   
128
   
129
        irq_init(INR_COUNT, INR_COUNT);
129
        irq_init(INR_COUNT, INR_COUNT);
130
#ifdef SKI
130
#ifdef SKI
131
        ski_init_console();
131
        ski_init_console();
132
#else   
132
#else   
133
        ega_init();
133
        ega_init();
134
#endif  
134
#endif  
135
    }
135
    }
136
    it_init();
136
    it_init();
137
       
137
       
138
}
138
}
139
 
139
 
140
void arch_post_cpu_init(void)
140
void arch_post_cpu_init(void)
141
{
141
{
142
}
142
}
143
 
143
 
144
void arch_pre_smp_init(void)
144
void arch_pre_smp_init(void)
145
{
145
{
146
}
146
}
147
 
147
 
148
 
148
 
149
#ifdef I460GX
149
#ifdef I460GX
150
#define POLL_INTERVAL       50000       /* 50 ms */
150
#define POLL_INTERVAL       50000       /* 50 ms */
151
/** Kernel thread for polling keyboard. */
151
/** Kernel thread for polling keyboard. */
152
static void i8042_kkbdpoll(void *arg)
152
static void i8042_kkbdpoll(void *arg)
153
{
153
{
154
    while (1) {
154
    while (1) {
155
#ifdef CONFIG_NS16550
155
#ifdef CONFIG_NS16550
156
    #ifndef CONFIG_NS16550_INTERRUPT_DRIVEN
156
    #ifndef CONFIG_NS16550_INTERRUPT_DRIVEN
157
        ns16550_poll();
157
        ns16550_poll();
158
    #endif  
158
    #endif  
159
#else
159
#else
160
    #ifndef CONFIG_I8042_INTERRUPT_DRIVEN
160
    #ifndef CONFIG_I8042_INTERRUPT_DRIVEN
161
        i8042_poll();
161
        i8042_poll();
162
    #endif  
162
    #endif  
163
#endif
163
#endif
164
        thread_usleep(POLL_INTERVAL);
164
        thread_usleep(POLL_INTERVAL);
165
    }
165
    }
166
}
166
}
167
#endif
167
#endif
168
 
168
 
169
 
169
 
170
void end_of_irq_void(void *cir_arg __attribute__((unused)),inr_t inr __attribute__((unused)));
170
void end_of_irq_void(void *cir_arg __attribute__((unused)),inr_t inr __attribute__((unused)));
171
void end_of_irq_void(void *cir_arg __attribute__((unused)),inr_t inr __attribute__((unused)))
171
void end_of_irq_void(void *cir_arg __attribute__((unused)),inr_t inr __attribute__((unused)))
172
{
172
{
173
    return;
173
    return;
174
}
174
}
175
 
175
 
176
 
176
 
177
void arch_post_smp_init(void)
177
void arch_post_smp_init(void)
178
{
178
{
179
 
179
 
180
    {
180
    {
181
        /*
181
        /*
182
         * Create thread that polls keyboard.
182
         * Create thread that polls keyboard.
183
         */
183
         */
184
#ifdef SKI
184
#ifdef SKI
185
        thread_t *t;
185
        thread_t *t;
186
        t = thread_create(kkbdpoll, NULL, TASK, 0, "kkbdpoll", true);
186
        t = thread_create(kkbdpoll, NULL, TASK, 0, "kkbdpoll", true);
187
        if (!t)
187
        if (!t)
188
            panic("cannot create kkbdpoll\n");
188
            panic("cannot create kkbdpoll\n");
189
        thread_ready(t);
189
        thread_ready(t);
190
#endif      
190
#endif      
191
 
191
 
192
#ifdef I460GX
192
#ifdef I460GX
193
        devno_t kbd = device_assign_devno();
193
        devno_t kbd = device_assign_devno();
194
        /* keyboard controller */
194
        /* keyboard controller */
195
 
195
 
196
#ifdef CONFIG_NS16550
196
#ifdef CONFIG_NS16550
197
        ns16550_init(kbd, NS16550_PORT, NS16550_IRQ,end_of_irq_void,NULL); // as a COM 1
197
        ns16550_init(kbd, NS16550_PORT, NS16550_IRQ,end_of_irq_void,NULL); // as a COM 1
198
#else
198
#else
199
        devno_t mouse = device_assign_devno();
199
        devno_t mouse = device_assign_devno();
200
        i8042_init(kbd, IRQ_KBD, mouse, IRQ_MOUSE);
200
        i8042_init(kbd, IRQ_KBD, mouse, IRQ_MOUSE);
201
#endif
201
#endif
202
        thread_t *t;
202
        thread_t *t;
203
        t = thread_create(i8042_kkbdpoll, NULL, TASK, 0, "kkbdpoll", true);
203
        t = thread_create(i8042_kkbdpoll, NULL, TASK, 0, "kkbdpoll", true);
204
        if (!t)
204
        if (!t)
205
            panic("cannot create kkbdpoll\n");
205
            panic("cannot create kkbdpoll\n");
206
        thread_ready(t);
206
        thread_ready(t);
207
 
207
 
208
#endif
208
#endif
209
 
209
 
210
    }
210
    }
211
   
211
   
212
    sysinfo_set_item_val("ia64_iospace", NULL, true);
212
    sysinfo_set_item_val("ia64_iospace", NULL, true);
213
    sysinfo_set_item_val("ia64_iospace.address", NULL, true);
213
    sysinfo_set_item_val("ia64_iospace.address", NULL, true);
214
    sysinfo_set_item_val("ia64_iospace.address.virtual", NULL, IO_OFFSET);
214
    sysinfo_set_item_val("ia64_iospace.address.virtual", NULL, IO_OFFSET);
215
 
215
 
216
 
216
 
217
 
217
 
218
 
218
 
219
 
219
 
220
}
220
}
221
 
221
 
222
 
222
 
223
/** Enter userspace and never return. */
223
/** Enter userspace and never return. */
224
void userspace(uspace_arg_t *kernel_uarg)
224
void userspace(uspace_arg_t *kernel_uarg)
225
{
225
{
226
    psr_t psr;
226
    psr_t psr;
227
    rsc_t rsc;
227
    rsc_t rsc;
228
 
228
 
229
    psr.value = psr_read();
229
    psr.value = psr_read();
230
    psr.cpl = PL_USER;
230
    psr.cpl = PL_USER;
231
    psr.i = true;               /* start with interrupts enabled */
231
    psr.i = true;               /* start with interrupts enabled */
232
    psr.ic = true;
232
    psr.ic = true;
233
    psr.ri = 0;             /* start with instruction #0 */
233
    psr.ri = 0;             /* start with instruction #0 */
234
    psr.bn = 1;             /* start in bank 0 */
234
    psr.bn = 1;             /* start in bank 0 */
235
 
235
 
236
    asm volatile ("mov %0 = ar.rsc\n" : "=r" (rsc.value));
236
    asm volatile ("mov %0 = ar.rsc\n" : "=r" (rsc.value));
237
    rsc.loadrs = 0;
237
    rsc.loadrs = 0;
238
    rsc.be = false;
238
    rsc.be = false;
239
    rsc.pl = PL_USER;
239
    rsc.pl = PL_USER;
240
    rsc.mode = 3;               /* eager mode */
240
    rsc.mode = 3;               /* eager mode */
241
 
241
 
242
    switch_to_userspace((uintptr_t) kernel_uarg->uspace_entry,
242
    switch_to_userspace((uintptr_t) kernel_uarg->uspace_entry,
243
                ((uintptr_t) kernel_uarg->uspace_stack)+PAGE_SIZE-ALIGN_UP(STACK_ITEM_SIZE, STACK_ALIGNMENT),
243
                ((uintptr_t) kernel_uarg->uspace_stack)+PAGE_SIZE-ALIGN_UP(STACK_ITEM_SIZE, STACK_ALIGNMENT),
244
                ((uintptr_t) kernel_uarg->uspace_stack)+PAGE_SIZE,
244
                ((uintptr_t) kernel_uarg->uspace_stack)+PAGE_SIZE,
245
                (uintptr_t) kernel_uarg->uspace_uarg,
245
                (uintptr_t) kernel_uarg->uspace_uarg,
246
                psr.value, rsc.value);
246
                psr.value, rsc.value);
247
 
247
 
248
    while (1) {
248
    while (1) {
249
        ;
249
        ;
250
    }
250
    }
251
}
251
}
252
 
252
 
253
/** Set thread-local-storage pointer.
253
/** Set thread-local-storage pointer.
254
 *
254
 *
255
 * We use r13 (a.k.a. tp) for this purpose.
255
 * We use r13 (a.k.a. tp) for this purpose.
256
 */
256
 */
257
unative_t sys_tls_set(unative_t addr)
257
unative_t sys_tls_set(unative_t addr)
258
{
258
{
259
        return 0;
259
        return 0;
260
}
260
}
261
 
261
 
262
/** Acquire console back for kernel
262
/** Acquire console back for kernel
263
 *
263
 *
264
 */
264
 */
265
void arch_grab_console(void)
265
void arch_grab_console(void)
266
{
266
{
267
#ifdef SKI
267
#ifdef SKI
268
    ski_kbd_grab();
268
    ski_kbd_grab();
269
#else
269
#else
270
    #ifdef CONFIG_NS16550
270
    #ifdef CONFIG_NS16550
271
        ns16550_grab();
271
        ns16550_grab();
272
    #else
272
    #else
273
        i8042_grab();
273
        i8042_grab();
274
    #endif  
274
    #endif  
275
#endif  
275
#endif  
276
}
276
}
277
/** Return console to userspace
277
/** Return console to userspace
278
 *
278
 *
279
 */
279
 */
280
void arch_release_console(void)
280
void arch_release_console(void)
281
{
281
{
282
#ifdef SKI
282
#ifdef SKI
283
    ski_kbd_release();
283
    ski_kbd_release();
284
#else   
284
#else   
285
    #ifdef CONFIG_NS16550
285
    #ifdef CONFIG_NS16550
286
        ns16550_release();
286
        ns16550_release();
287
    #else   
287
    #else   
288
        i8042_release();
288
        i8042_release();
289
    #endif  
289
    #endif  
290
 
290
 
291
#endif
291
#endif
292
}
292
}
293
 
293
 
294
void arch_reboot(void)
294
void arch_reboot(void)
295
{
295
{
296
    outb(0x64,0xfe);
296
    outb(0x64,0xfe);
297
    while (1);
297
    while (1);
298
}
298
}
299
 
299
 
300
/** @}
300
/** @}
301
 */
301
 */
302
 
302