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 <typedefs.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/boot/boot.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) {
        memory_print_map();
       
        #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)
{
}
 
/** @}
 */
 

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

Subversion Repositories HelenOS

(root)/trunk/kernel/arch/ia32xen/src/ia32xen.c – Rev 2017 → 2071