Subversion Repositories HelenOS

Rev

Rev 4267 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
36 jermar 1
/*
2071 jermar 2
 * Copyright (c) 2005 Jakub Jermar
36 jermar 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
 
1888 jermar 29
/** @addtogroup ia64
1702 cejka 30
 * @{
31
 */
32
/** @file
33
 */
34
 
78 jermar 35
#include <arch.h>
4311 decky 36
#include <arch/drivers/ski.h>
435 jermar 37
#include <arch/drivers/it.h>
470 jermar 38
#include <arch/interrupt.h>
39
#include <arch/barrier.h>
919 jermar 40
#include <arch/asm.h>
41
#include <arch/register.h>
470 jermar 42
#include <arch/types.h>
919 jermar 43
#include <arch/context.h>
962 jermar 44
#include <arch/stack.h>
919 jermar 45
#include <arch/mm/page.h>
46
#include <mm/as.h>
47
#include <config.h>
48
#include <userspace.h>
519 vana 49
#include <console/console.h>
1078 jermar 50
#include <proc/uarg.h>
1121 jermar 51
#include <syscall/syscall.h>
1942 jermar 52
#include <ddi/irq.h>
3779 jermar 53
#include <arch/bootinfo.h>
3932 jermar 54
#include <genarch/drivers/legacy/ia32/io.h>
3779 jermar 55
#include <genarch/drivers/ega/ega.h>
4042 jermar 56
#include <genarch/kbrd/kbrd.h>
4043 jermar 57
#include <genarch/srln/srln.h>
4042 jermar 58
#include <genarch/drivers/i8042/i8042.h>
4043 jermar 59
#include <genarch/drivers/ns16550/ns16550.h>
60
#include <arch/drivers/kbd.h>
3578 vana 61
#include <smp/smp.h>
62
#include <smp/ipi.h>
63
#include <arch/atomic.h>
64
#include <panic.h>
65
#include <print.h>
3635 vana 66
#include <sysinfo/sysinfo.h>
4031 svoboda 67
#include <string.h>
519 vana 68
 
3766 jermar 69
/* NS16550 as a COM 1 */
4122 decky 70
#define NS16550_IRQ  (4 + LEGACY_INTERRUPT_BASE)
3578 vana 71
 
2513 vana 72
bootinfo_t *bootinfo;
73
 
3766 jermar 74
static uint64_t iosapic_base = 0xfec00000;
3657 vana 75
 
4023 svoboda 76
/** Performs ia64-specific initialization before main_bsp() is called. */
1223 jermar 77
void arch_pre_main(void)
78
{
79
    /* Setup usermode init tasks. */
2513 vana 80
 
2745 decky 81
    unsigned int i;
82
 
2513 vana 83
    init.cnt = bootinfo->taskmap.count;
2745 decky 84
 
85
    for (i = 0; i < init.cnt; i++) {
3766 jermar 86
        init.tasks[i].addr =
87
            ((unsigned long) bootinfo->taskmap.tasks[i].addr) |
88
            VRN_MASK;
2745 decky 89
        init.tasks[i].size = bootinfo->taskmap.tasks[i].size;
4267 svoboda 90
        str_cpy(init.tasks[i].name, CONFIG_TASK_NAME_BUFLEN,
91
            bootinfo->taskmap.tasks[i].name);
2513 vana 92
    }
1223 jermar 93
}
94
 
78 jermar 95
void arch_pre_mm_init(void)
96
{
3766 jermar 97
    /*
98
     * Set Interruption Vector Address (i.e. location of interruption vector
99
     * table).
100
     */
1780 jermar 101
    iva_write((uintptr_t) &ivt);
470 jermar 102
    srlz_d();
103
 
78 jermar 104
}
105
 
3657 vana 106
static void iosapic_init(void)
107
{
3766 jermar 108
    uint64_t IOSAPIC = PA2KA((unative_t)(iosapic_base)) | FW_OFFSET;
3657 vana 109
    int i;
110
 
3775 jermar 111
    int myid, myeid;
3657 vana 112
 
3766 jermar 113
    myid = ia64_get_cpu_id();
114
    myeid = ia64_get_cpu_eid();
3661 vana 115
 
3766 jermar 116
    for (i = 0; i < 16; i++) {
117
        if (i == 2)
118
            continue;    /* Disable Cascade interrupt */
119
        ((uint32_t *)(IOSAPIC + 0x00))[0] = 0x10 + 2 * i;
3657 vana 120
        srlz_d();
3766 jermar 121
        ((uint32_t *)(IOSAPIC + 0x10))[0] = LEGACY_INTERRUPT_BASE + i;
3657 vana 122
        srlz_d();
3766 jermar 123
        ((uint32_t *)(IOSAPIC + 0x00))[0] = 0x10 + 2 * i + 1;
3657 vana 124
        srlz_d();
3766 jermar 125
        ((uint32_t *)(IOSAPIC + 0x10))[0] = myid << (56 - 32) |
126
            myeid << (48 - 32);
3657 vana 127
        srlz_d();
128
    }
129
 
130
}
131
 
78 jermar 132
void arch_post_mm_init(void)
133
{
3766 jermar 134
    if (config.cpu_active == 1) {
3657 vana 135
        iosapic_init();
3578 vana 136
        irq_init(INR_COUNT, INR_COUNT);
137
    }
4060 jermar 138
    it_init(); 
78 jermar 139
}
503 jermar 140
 
1901 jermar 141
void arch_post_cpu_init(void)
142
{
143
}
144
 
503 jermar 145
void arch_pre_smp_init(void)
146
{
147
}
148
 
149
void arch_post_smp_init(void)
150
{
4311 decky 151
#ifdef MACHINE_ski
152
    ski_instance_t *ski_instance = skiin_init();
153
    if (ski_instance) {
154
        srln_instance_t *srln_instance = srln_init();
155
        if (srln_instance) {
156
            indev_t *sink = stdin_wire();
157
            indev_t *srln = srln_wire(srln_instance, sink);
158
            skiin_wire(ski_instance, srln);
159
        }
160
    }
161
 
4114 jermar 162
    skiout_init();
4103 decky 163
#endif
164
 
4060 jermar 165
#ifdef CONFIG_EGA
166
    ega_init(EGA_BASE, EGA_VIDEORAM);
167
#endif
4103 decky 168
 
3578 vana 169
#ifdef CONFIG_NS16550
4311 decky 170
    ns16550_instance_t *ns16550_instance
4148 decky 171
        = ns16550_init((ns16550_t *) NS16550_BASE, NS16550_IRQ, NULL, NULL);
4311 decky 172
    if (ns16550_instance) {
173
        srln_instance_t *srln_instance = srln_init();
174
        if (srln_instance) {
175
            indev_t *sink = stdin_wire();
176
            indev_t *srln = srln_wire(srln_instance, sink);
177
            ns16550_wire(ns16550_instance, srln);
178
        }
179
    }
4103 decky 180
 
4122 decky 181
    sysinfo_set_item_val("kbd", NULL, true);
182
    sysinfo_set_item_val("kbd.inr", NULL, NS16550_IRQ);
3982 jermar 183
    sysinfo_set_item_val("kbd.type", NULL, KBD_NS16550);
4026 jermar 184
    sysinfo_set_item_val("kbd.address.physical", NULL,
185
        (uintptr_t) NS16550_BASE);
186
    sysinfo_set_item_val("kbd.address.kernel", NULL,
187
        (uintptr_t) NS16550_BASE);
4122 decky 188
#endif
4103 decky 189
 
4122 decky 190
#ifdef CONFIG_I8042
4311 decky 191
    i8042_instance_t *i8042_instance = i8042_init((i8042_t *) I8042_BASE, IRQ_KBD);
192
    if (i8042_instance) {
193
        kbrd_instance_t *kbrd_instance = kbrd_init();
194
        if (kbrd_instance) {
195
            indev_t *sink = stdin_wire();
196
            indev_t *kbrd = kbrd_wire(kbrd_instance, sink);
197
            i8042_wire(i8042_instance, kbrd);
198
        }
199
    }
4122 decky 200
 
201
    sysinfo_set_item_val("kbd", NULL, true);
202
    sysinfo_set_item_val("kbd.inr", NULL, IRQ_KBD);
3982 jermar 203
    sysinfo_set_item_val("kbd.type", NULL, KBD_LEGACY);
4026 jermar 204
    sysinfo_set_item_val("kbd.address.physical", NULL,
205
        (uintptr_t) I8042_BASE);
206
    sysinfo_set_item_val("kbd.address.kernel", NULL,
207
        (uintptr_t) I8042_BASE);
3578 vana 208
#endif
4103 decky 209
 
3635 vana 210
    sysinfo_set_item_val("ia64_iospace", NULL, true);
211
    sysinfo_set_item_val("ia64_iospace.address", NULL, true);
212
    sysinfo_set_item_val("ia64_iospace.address.virtual", NULL, IO_OFFSET);
503 jermar 213
}
919 jermar 214
 
3578 vana 215
 
919 jermar 216
/** Enter userspace and never return. */
1078 jermar 217
void userspace(uspace_arg_t *kernel_uarg)
919 jermar 218
{
219
    psr_t psr;
220
    rsc_t rsc;
221
 
222
    psr.value = psr_read();
223
    psr.cpl = PL_USER;
3766 jermar 224
    psr.i = true;           /* start with interrupts enabled */
919 jermar 225
    psr.ic = true;
3766 jermar 226
    psr.ri = 0;         /* start with instruction #0 */
227
    psr.bn = 1;         /* start in bank 0 */
919 jermar 228
 
2082 decky 229
    asm volatile ("mov %0 = ar.rsc\n" : "=r" (rsc.value));
919 jermar 230
    rsc.loadrs = 0;
231
    rsc.be = false;
232
    rsc.pl = PL_USER;
3766 jermar 233
    rsc.mode = 3;           /* eager mode */
919 jermar 234
 
1780 jermar 235
    switch_to_userspace((uintptr_t) kernel_uarg->uspace_entry,
3766 jermar 236
        ((uintptr_t) kernel_uarg->uspace_stack) + PAGE_SIZE -
237
        ALIGN_UP(STACK_ITEM_SIZE, STACK_ALIGNMENT),
238
        ((uintptr_t) kernel_uarg->uspace_stack) + PAGE_SIZE,
239
        (uintptr_t) kernel_uarg->uspace_uarg, psr.value, rsc.value);
919 jermar 240
 
3766 jermar 241
    while (1)
919 jermar 242
        ;
243
}
1121 jermar 244
 
245
/** Set thread-local-storage pointer.
246
 *
247
 * We use r13 (a.k.a. tp) for this purpose.
248
 */
1780 jermar 249
unative_t sys_tls_set(unative_t addr)
1121 jermar 250
{
251
        return 0;
252
}
1474 palkovsky 253
 
254
/** Acquire console back for kernel
255
 *
256
 */
257
void arch_grab_console(void)
258
{
4311 decky 259
#ifdef MACHINE_ski
1942 jermar 260
    ski_kbd_grab();
3844 decky 261
#endif
1474 palkovsky 262
}
3766 jermar 263
 
1474 palkovsky 264
/** Return console to userspace
265
 *
266
 */
267
void arch_release_console(void)
268
{
4311 decky 269
#ifdef MACHINE_ski
1942 jermar 270
    ski_kbd_release();
2064 vana 271
#endif
1474 palkovsky 272
}
1702 cejka 273
 
2227 decky 274
void arch_reboot(void)
275
{
3934 jermar 276
    pio_write_8((ioport8_t *)0x64, 0xfe);
3766 jermar 277
    while (1)
278
        ;
2227 decky 279
}
280
 
3880 decky 281
/** Construct function pointer
282
 *
283
 * @param fptr   function pointer structure
284
 * @param addr   function address
285
 * @param caller calling function address
286
 *
287
 * @return address of the function pointer
288
 *
289
 */
290
void *arch_construct_function(fncptr_t *fptr, void *addr, void *caller)
291
{
292
    fptr->fnc = (unative_t) addr;
293
    fptr->gp = ((unative_t *) caller)[1];
294
 
295
    return (void *) fptr;
296
}
297
 
1888 jermar 298
/** @}
1702 cejka 299
 */