WebSVN – HelenOS – Diff – /trunk/kernel/arch/ia32xen/src/ia32xen.c


/*
 * Copyright (c) 2006 Martin Decky
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 * - Redistributions of source code must retain the above copyright
 *   notice, this list of conditions and the following disclaimer.
 * - Redistributions in binary form must reproduce the above copyright
 *   notice, this list of conditions and the following disclaimer in the
 *   documentation and/or other materials provided with the distribution.
 * - The name of the author may not be used to endorse or promote products
 *   derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */
 
/** @addtogroup ia32xen
 * @{
 */
/** @file
 */
 
#include <arch.h>
#include <main/main.h>
 
#include <arch/types.h>
#include <align.h>
 
#include <arch/pm.h>
 
#include <arch/drivers/xconsole.h>
#include <arch/mm/page.h>
 
#include <arch/context.h>
 
#include <config.h>
 
#include <arch/interrupt.h>
#include <arch/asm.h>
#include <genarch/acpi/acpi.h>
 
#include <arch/bios/bios.h>
 
#include <arch/mm/memory_init.h>
#include <interrupt.h>
#include <arch/debugger.h>
#include <proc/thread.h>
#include <syscall/syscall.h>
#include <console/console.h>
#include <ddi/irq.h>
 
start_info_t start_info;
memzone_t meminfo;
 
extern void xen_callback(void);
extern void xen_failsafe_callback(void);
 
void arch_pre_main(void)
{
    pte_t pte;
    memsetb((uintptr_t) &pte, sizeof(pte), 0);
   
    pte.present = 1;
    pte.writeable = 1;
    pte.frame_address = ADDR2PFN((uintptr_t) start_info.shared_info);
    ASSERT(xen_update_va_mapping(&shared_info, pte, UVMF_INVLPG) == 0);
   
    if (!(start_info.flags & SIF_INITDOMAIN)) {
        /* Map console frame */
        pte.present = 1;
        pte.writeable = 1;
        pte.frame_address = start_info.console.domU.mfn;
        ASSERT(xen_update_va_mapping(&console_page, pte, UVMF_INVLPG) == 0);
    } else
        start_info.console.domU.evtchn = 0;
   
    ASSERT(xen_set_callbacks(XEN_CS, xen_callback, XEN_CS, xen_failsafe_callback) == 0);
   
    /* Create identity mapping */
   
    meminfo.start = ADDR2PFN(ALIGN_UP(KA2PA(start_info.ptl0), PAGE_SIZE)) + start_info.pt_frames;
    meminfo.size = start_info.frames - meminfo.start;
    meminfo.reserved = 0;
 
    uintptr_t pa;
    index_t last_ptl0 = 0;
    for (pa = PFN2ADDR(meminfo.start); pa < PFN2ADDR(meminfo.start + meminfo.size); pa += FRAME_SIZE) {
        uintptr_t va = PA2KA(pa);
       
        if ((PTL0_INDEX(va) != last_ptl0) && (GET_PTL1_FLAGS(start_info.ptl0, PTL0_INDEX(va)) & PAGE_NOT_PRESENT)) {
            /* New page directory entry needed */
            uintptr_t tpa = PFN2ADDR(meminfo.start + meminfo.reserved);
            uintptr_t tva = PA2KA(tpa);
           
            memsetb(tva, PAGE_SIZE, 0);
           
            pte_t *tptl3 = (pte_t *) PA2KA(GET_PTL1_ADDRESS(start_info.ptl0, PTL0_INDEX(tva)));
            SET_FRAME_ADDRESS(tptl3, PTL3_INDEX(tva), 0);
            SET_PTL1_ADDRESS(start_info.ptl0, PTL0_INDEX(va), tpa);
            SET_FRAME_ADDRESS(tptl3, PTL3_INDEX(tva), tpa);
           
            last_ptl0 = PTL0_INDEX(va);
            meminfo.reserved++;
        }
       
        pte_t *ptl3 = (pte_t *) PA2KA(GET_PTL1_ADDRESS(start_info.ptl0, PTL0_INDEX(va)));
       
        SET_FRAME_ADDRESS(ptl3, PTL3_INDEX(va), pa);
        SET_FRAME_FLAGS(ptl3, PTL3_INDEX(va), PAGE_PRESENT | PAGE_WRITE);
    }
   
    /* Put initial stack safely in the mapped area */
    stack_safe = PA2KA(PFN2ADDR(meminfo.start + meminfo.reserved));
}
 
void arch_pre_mm_init(void)
{
    pm_init();
 
    if (config.cpu_active == 1) {
        interrupt_init();
//      bios_init();
       
    }
}
 
void arch_post_mm_init(void)
{
    if (config.cpu_active == 1) {
        /* Initialize IRQ routing */
        irq_init(IRQ_COUNT, IRQ_COUNT);
       
        /* Video */
        xen_console_init();
       
        /* Enable debugger */
        debugger_init();
       
        /* Merge all memory zones to 1 big zone */
        zone_merge_all();
    }
}
 
void arch_post_cpu_init(void)
{
}
 
void arch_pre_smp_init(void)
{
    if (config.cpu_active == 1) {
 
 
#ifdef CONFIG_SMP
        acpi_init();
#endif /* CONFIG_SMP */
    }
}
 
void arch_post_smp_init(void)
{
}
 
void calibrate_delay_loop(void)
{
//  i8254_calibrate_delay_loop();
    if (config.cpu_active == 1) {
        /*
         * This has to be done only on UP.
         * On SMP, i8254 is not used for time keeping and its interrupt pin remains masked.
         */
//      i8254_normal_operation();
    }
}
 
/** Set thread-local-storage pointer
 *
 * TLS pointer is set in GS register. That means, the GS contains
 * selector, and the descriptor->base is the correct address.
 */
unative_t sys_tls_set(unative_t addr)
{
    THREAD->arch.tls = addr;
    set_tls_desc(addr);
 
    return 0;
}
 
/** Acquire console back for kernel
 *
 */
void arch_grab_console(void)
{
}
 
/** Return console to userspace
 *
 */
void arch_release_console(void)
{
}
 
void arch_reboot(void)
{
    // TODO
    while (1);
}
 
/** @}
 */
 

Rev 2227	Rev 2723
1	/*	1	/*
2	* Copyright (c) 2006 Martin Decky	2	* Copyright (c) 2006 Martin Decky
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 ia32xen	29	/** @addtogroup ia32xen
30	* @{	30	* @{
31	*/	31	*/
32	/** @file	32	/** @file
33	*/	33	*/
34		34
35	#include <arch.h>	35	#include <arch.h>
36	#include <main/main.h>	36	#include <main/main.h>
37		37
38	#include <arch/types.h>	38	#include <arch/types.h>
39	#include <align.h>	39	#include <align.h>
40		40
41	#include <arch/pm.h>	41	#include <arch/pm.h>
42		42
43	#include <arch/drivers/xconsole.h>	43	#include <arch/drivers/xconsole.h>
44	#include <arch/mm/page.h>	44	#include <arch/mm/page.h>
45		45
46	#include <arch/context.h>	46	#include <arch/context.h>
47		47
48	#include <config.h>	48	#include <config.h>
49		49
50	#include <arch/interrupt.h>	50	#include <arch/interrupt.h>
51	#include <arch/asm.h>	51	#include <arch/asm.h>
52	#include <genarch/acpi/acpi.h>	52	#include <genarch/acpi/acpi.h>
53		53
54	#include <arch/bios/bios.h>	54	#include <arch/bios/bios.h>
55		55
56	#include <arch/mm/memory_init.h>	56	#include <arch/mm/memory_init.h>
57	#include <interrupt.h>	57	#include <interrupt.h>
58	#include <arch/debugger.h>	58	#include <arch/debugger.h>
59	#include <proc/thread.h>	59	#include <proc/thread.h>
60	#include <syscall/syscall.h>	60	#include <syscall/syscall.h>
61	#include <console/console.h>	61	#include <console/console.h>
62	#include <ddi/irq.h>	62	#include <ddi/irq.h>
63		63
64	start_info_t start_info;	64	start_info_t start_info;
65	memzone_t meminfo;	65	memzone_t meminfo;
66		66
67	extern void xen_callback(void);	67	extern void xen_callback(void);
68	extern void xen_failsafe_callback(void);	68	extern void xen_failsafe_callback(void);
69		69
70	void arch_pre_main(void)	70	void arch_pre_main(void)
71	{	71	{
72	pte_t pte;	72	pte_t pte;
73	memsetb((uintptr_t) &pte, sizeof(pte), 0);	73	memsetb((uintptr_t) &pte, sizeof(pte), 0);
74		74
75	pte.present = 1;	75	pte.present = 1;
76	pte.writeable = 1;	76	pte.writeable = 1;
77	pte.frame_address = ADDR2PFN((uintptr_t) start_info.shared_info);	77	pte.frame_address = ADDR2PFN((uintptr_t) start_info.shared_info);
78	ASSERT(xen_update_va_mapping(&shared_info, pte, UVMF_INVLPG) == 0);	78	ASSERT(xen_update_va_mapping(&shared_info, pte, UVMF_INVLPG) == 0);
79		79
80	if (!(start_info.flags & SIF_INITDOMAIN)) {	80	if (!(start_info.flags & SIF_INITDOMAIN)) {
81	/* Map console frame */	81	/* Map console frame */
82	pte.present = 1;	82	pte.present = 1;
83	pte.writeable = 1;	83	pte.writeable = 1;
84	pte.frame_address = start_info.console.domU.mfn;	84	pte.frame_address = start_info.console.domU.mfn;
85	ASSERT(xen_update_va_mapping(&console_page, pte, UVMF_INVLPG) == 0);	85	ASSERT(xen_update_va_mapping(&console_page, pte, UVMF_INVLPG) == 0);
86	} else	86	} else
87	start_info.console.domU.evtchn = 0;	87	start_info.console.domU.evtchn = 0;
88		88
89	ASSERT(xen_set_callbacks(XEN_CS, xen_callback, XEN_CS, xen_failsafe_callback) == 0);	89	ASSERT(xen_set_callbacks(XEN_CS, xen_callback, XEN_CS, xen_failsafe_callback) == 0);
90		90
91	/* Create identity mapping */	91	/* Create identity mapping */
92		92
93	meminfo.start = ADDR2PFN(ALIGN_UP(KA2PA(start_info.ptl0), PAGE_SIZE)) + start_info.pt_frames;	93	meminfo.start = ADDR2PFN(ALIGN_UP(KA2PA(start_info.ptl0), PAGE_SIZE)) + start_info.pt_frames;
94	meminfo.size = start_info.frames - meminfo.start;	94	meminfo.size = start_info.frames - meminfo.start;
95	meminfo.reserved = 0;	95	meminfo.reserved = 0;
96		96
97	uintptr_t pa;	97	uintptr_t pa;
98	index_t last_ptl0 = 0;	98	index_t last_ptl0 = 0;
99	for (pa = PFN2ADDR(meminfo.start); pa < PFN2ADDR(meminfo.start + meminfo.size); pa += FRAME_SIZE) {	99	for (pa = PFN2ADDR(meminfo.start); pa < PFN2ADDR(meminfo.start + meminfo.size); pa += FRAME_SIZE) {
100	uintptr_t va = PA2KA(pa);	100	uintptr_t va = PA2KA(pa);
101		101
102	if ((PTL0_INDEX(va) != last_ptl0) && (GET_PTL1_FLAGS(start_info.ptl0, PTL0_INDEX(va)) & PAGE_NOT_PRESENT)) {	102	if ((PTL0_INDEX(va) != last_ptl0) && (GET_PTL1_FLAGS(start_info.ptl0, PTL0_INDEX(va)) & PAGE_NOT_PRESENT)) {
103	/* New page directory entry needed */	103	/* New page directory entry needed */
104	uintptr_t tpa = PFN2ADDR(meminfo.start + meminfo.reserved);	104	uintptr_t tpa = PFN2ADDR(meminfo.start + meminfo.reserved);
105	uintptr_t tva = PA2KA(tpa);	105	uintptr_t tva = PA2KA(tpa);
106		106
107	memsetb(tva, PAGE_SIZE, 0);	107	memsetb(tva, PAGE_SIZE, 0);
108		108
109	pte_t tptl3 = (pte_t ) PA2KA(GET_PTL1_ADDRESS(start_info.ptl0, PTL0_INDEX(tva)));	109	pte_t tptl3 = (pte_t ) PA2KA(GET_PTL1_ADDRESS(start_info.ptl0, PTL0_INDEX(tva)));
110	SET_FRAME_ADDRESS(tptl3, PTL3_INDEX(tva), 0);	110	SET_FRAME_ADDRESS(tptl3, PTL3_INDEX(tva), 0);
111	SET_PTL1_ADDRESS(start_info.ptl0, PTL0_INDEX(va), tpa);	111	SET_PTL1_ADDRESS(start_info.ptl0, PTL0_INDEX(va), tpa);
112	SET_FRAME_ADDRESS(tptl3, PTL3_INDEX(tva), tpa);	112	SET_FRAME_ADDRESS(tptl3, PTL3_INDEX(tva), tpa);
113		113
114	last_ptl0 = PTL0_INDEX(va);	114	last_ptl0 = PTL0_INDEX(va);
115	meminfo.reserved++;	115	meminfo.reserved++;
116	}	116	}
117		117
118	pte_t ptl3 = (pte_t ) PA2KA(GET_PTL1_ADDRESS(start_info.ptl0, PTL0_INDEX(va)));	118	pte_t ptl3 = (pte_t ) PA2KA(GET_PTL1_ADDRESS(start_info.ptl0, PTL0_INDEX(va)));
119		119
120	SET_FRAME_ADDRESS(ptl3, PTL3_INDEX(va), pa);	120	SET_FRAME_ADDRESS(ptl3, PTL3_INDEX(va), pa);
121	SET_FRAME_FLAGS(ptl3, PTL3_INDEX(va), PAGE_PRESENT \| PAGE_WRITE);	121	SET_FRAME_FLAGS(ptl3, PTL3_INDEX(va), PAGE_PRESENT \| PAGE_WRITE);
122	}	122	}
123		123
124	/* Put initial stack safely in the mapped area */	124	/* Put initial stack safely in the mapped area */
125	stack_safe = PA2KA(PFN2ADDR(meminfo.start + meminfo.reserved));	125	stack_safe = PA2KA(PFN2ADDR(meminfo.start + meminfo.reserved));
126	}	126	}
127		127
128	void arch_pre_mm_init(void)	128	void arch_pre_mm_init(void)
129	{	129	{
130	pm_init();	130	pm_init();
131		131
132	if (config.cpu_active == 1) {	132	if (config.cpu_active == 1) {
133	interrupt_init();	133	interrupt_init();
134	// bios_init();	134	// bios_init();
135		135
136	}	136	}
137	}	137	}
138		138
139	void arch_post_mm_init(void)	139	void arch_post_mm_init(void)
140	{	140	{
141	if (config.cpu_active == 1) {	141	if (config.cpu_active == 1) {
142	/* Initialize IRQ routing */	142	/* Initialize IRQ routing */
143	irq_init(IRQ_COUNT, IRQ_COUNT);	143	irq_init(IRQ_COUNT, IRQ_COUNT);
144		144
145	/* Video */	145	/* Video */
146	xen_console_init();	146	xen_console_init();
147		147
148	/* Enable debugger */	148	/* Enable debugger */
149	debugger_init();	149	debugger_init();
150		150
151	/* Merge all memory zones to 1 big zone */	151	/* Merge all memory zones to 1 big zone */
152	zone_merge_all();	152	zone_merge_all();
153	}	153	}
154	}	154	}
155		155
156	void arch_post_cpu_init(void)	156	void arch_post_cpu_init(void)
157	{	157	{
158	}	158	}
159		159
160	void arch_pre_smp_init(void)	160	void arch_pre_smp_init(void)
161	{	161	{
162	if (config.cpu_active == 1) {	162	if (config.cpu_active == 1) {
163	memory_print_map();	-
164		-
165	#ifdef CONFIG_SMP	163	#ifdef CONFIG_SMP
166	acpi_init();	164	acpi_init();
167	#endif /* CONFIG_SMP */	165	#endif /* CONFIG_SMP */
168	}	166	}
169	}	167	}
170		168
171	void arch_post_smp_init(void)	169	void arch_post_smp_init(void)
172	{	170	{
173	}	171	}
174		172
175	void calibrate_delay_loop(void)	173	void calibrate_delay_loop(void)
176	{	174	{
177	// i8254_calibrate_delay_loop();	175	// i8254_calibrate_delay_loop();
178	if (config.cpu_active == 1) {	176	if (config.cpu_active == 1) {
179	/*	177	/*
180	* This has to be done only on UP.	178	* This has to be done only on UP.
181	* On SMP, i8254 is not used for time keeping and its interrupt pin remains masked.	179	* On SMP, i8254 is not used for time keeping and its interrupt pin remains masked.
182	*/	180	*/
183	// i8254_normal_operation();	181	// i8254_normal_operation();
184	}	182	}
185	}	183	}
186		184
187	/** Set thread-local-storage pointer	185	/** Set thread-local-storage pointer
188	*	186	*
189	* TLS pointer is set in GS register. That means, the GS contains	187	* TLS pointer is set in GS register. That means, the GS contains
190	* selector, and the descriptor->base is the correct address.	188	* selector, and the descriptor->base is the correct address.
191	*/	189	*/
192	unative_t sys_tls_set(unative_t addr)	190	unative_t sys_tls_set(unative_t addr)
193	{	191	{
194	THREAD->arch.tls = addr;	192	THREAD->arch.tls = addr;
195	set_tls_desc(addr);	193	set_tls_desc(addr);
196		194
197	return 0;	195	return 0;
198	}	196	}
199		197
200	/** Acquire console back for kernel	198	/** Acquire console back for kernel
201	*	199	*
202	*/	200	*/
203	void arch_grab_console(void)	201	void arch_grab_console(void)
204	{	202	{
205	}	203	}
206		204
207	/** Return console to userspace	205	/** Return console to userspace
208	*	206	*
209	*/	207	*/
210	void arch_release_console(void)	208	void arch_release_console(void)
211	{	209	{
212	}	210	}
213		211
214	void arch_reboot(void)	212	void arch_reboot(void)
215	{	213	{
216	// TODO	214	// TODO
217	while (1);	215	while (1);
218	}	216	}
219		217
220	/** @}	218	/** @}
221	*/	219	*/
222		220

Subversion Repositories HelenOS

(root)/trunk/kernel/arch/ia32xen/src/ia32xen.c – Rev 2227 → 2723