WebSVN – HelenOS – Diff – /branches/dynload/kernel/arch/ia64/src/asm.S


#
# Copyright (c) 2005 Jakub Jermar
# 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.
#
 
#include <arch/register.h>
 
.text
 
/** Copy memory from/to userspace.
 *
 * This memcpy() has been taken from the assembler output of
 * the generic _memcpy() and modified to have the failover part.
 *
 * @param in0 Destination address.
 * @param in1 Source address.
 * @param in2 Number of byte to copy.
 */
.global memcpy
.global memcpy_from_uspace
.global memcpy_to_uspace
.global memcpy_from_uspace_failover_address
.global memcpy_to_uspace_failover_address
memcpy:
memcpy_from_uspace:
memcpy_to_uspace:
	alloc loc0 = ar.pfs, 3, 1, 0, 0
 
	adds r14 = 7, in1
	mov r2 = ar.lc
	mov r8 = in0 ;;
	and r14 = -8, r14 ;;
	cmp.ne p6, p7 = r14, in1
(p7)	br.cond.dpnt 3f	;;
0:
	cmp.ne p6, p7 = 0, in2
(p7)	br.cond.dpnt 2f	;;
(p6)	adds r14 = -1, in2
(p6)	mov r16 = r0
(p6)	mov r17 = r0 ;;
(p6)	mov ar.lc = r14
1:
	add r14 = r16, in1 
	add r15 = r16, in0
	adds r17 = 1, r17 ;;
	ld1 r14 = [r14]
	mov r16 = r17 ;;
	st1 [r15] = r14
	br.cloop.sptk.few 1b ;;
2:
	mov ar.lc = r2
	mov ar.pfs = loc0
	br.ret.sptk.many rp
3:
	adds r14 = 7, in0 ;;
	and r14 = -8, r14 ;;
	cmp.eq p6, p7 = r14, in0
(p7)	br.cond.dptk 0b
	shr.u r18 = in2, 3 ;;
	cmp.ne p6, p7 = 0, r18
(p7)	br.cond.dpnt 5f	;;
(p6)	adds r14 = -1, r18
(p6)	mov r16 = r0
(p6)	mov r17 = r0 ;;
(p6)	mov ar.lc = r14
4:
	shladd r14 = r16, 3, r0
	adds r16 = 1, r17 ;;
	add r15 = in1, r14
	add r14 = in0, r14
	mov r17 = r16 ;;
	ld8 r15 = [r15] ;;
	st8 [r14] = r15
	br.cloop.sptk.few 4b
5:
	and r15 = 7, in2
	shladd r14 = r18, 3, r0
	mov r16 = r0
	mov r18 = r0 ;;
	cmp.eq p6, p7 = 0, r15
	add in0 = r14, in0
	adds r15 = -1, r15
	add r17 = r14, in1 
(p6)	br.cond.dpnt 2b	;;
	mov ar.lc = r15
6:
	add r14 = r16, r17
	add r15 = r16, in0
	adds r16 = 1, r18 ;;
	ld1 r14 = [r14]
	mov r18 = r16 ;;
	st1 [r15] = r14
	br.cloop.sptk.few 6b ;;
	mov ar.lc = r2
	mov ar.pfs = loc0
	br.ret.sptk.many rp
	
memcpy_from_uspace_failover_address:
memcpy_to_uspace_failover_address:
	mov r8 = r0			/* return 0 on failure */
	mov ar.pfs = loc0
	br.ret.sptk.many rp
 
.global memsetb
memsetb:
	br _memsetb
 
.global memsetw
memsetw:
	br _memsetw
 
.global cpu_halt
cpu_halt:
	br cpu_halt
 
.global panic_printf
panic_printf:
	{
		br.call.sptk.many b0=printf
	}
	br halt
 
/** Switch to userspace - low level code.
 *
 * @param in0 Userspace entry point address.
 * @param in1 Userspace stack pointer address.
 * @param in2 Userspace register stack pointer address.
 * @param in3 Userspace address of thread uspace_arg_t structure.
 * @param in4 Value to be stored in IPSR.
 * @param in5 Value to be stored in RSC.
 */
.global switch_to_userspace
switch_to_userspace:
	alloc loc0 = ar.pfs, 6, 3, 0, 0
	rsm (PSR_IC_MASK | PSR_I_MASK)		/* disable interruption collection and interrupts */
	srlz.d ;;
	srlz.i ;;
	
	mov cr.ipsr = in4
	mov cr.iip = in0
	mov r12 = in1
 
	xor r1 = r1, r1
	
	/* r2 is defined to hold pcb_ptr - set it to 0 */
	xor r2 = r2, r2
	
	mov loc1 = cr.ifs
	movl loc2 = PFM_MASK ;;
	and loc1 = loc2, loc1 ;;
	mov cr.ifs = loc1 ;;			/* prevent decrementing BSP by rfi */
 
	invala
	
	mov loc1 = ar.rsc ;;
	and loc1 = ~3, loc1 ;;			
	mov ar.rsc = loc1 ;;			/* put RSE into enforced lazy mode */
 
	flushrs ;;
	
	mov ar.bspstore = in2 ;;
	mov ar.rsc = in5 ;;
	
	mov r8 = in3
	
	rfi ;;
 

Rev 4338	Rev 4346
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	#include <arch/register.h>	29	#include <arch/register.h>
30		30
31	.text	31	.text
32		32
33	/** Copy memory from/to userspace.	33	/** Copy memory from/to userspace.
34	*	34	*
35	* This memcpy() has been taken from the assembler output of	35	* This memcpy() has been taken from the assembler output of
36	* the generic _memcpy() and modified to have the failover part.	36	* the generic _memcpy() and modified to have the failover part.
37	*	37	*
38	* @param in0 Destination address.	38	* @param in0 Destination address.
39	* @param in1 Source address.	39	* @param in1 Source address.
40	* @param in2 Number of byte to copy.	40	* @param in2 Number of byte to copy.
41	*/	41	*/
42	.global memcpy	42	.global memcpy
43	.global memcpy_from_uspace	43	.global memcpy_from_uspace
44	.global memcpy_to_uspace	44	.global memcpy_to_uspace
45	.global memcpy_from_uspace_failover_address	45	.global memcpy_from_uspace_failover_address
46	.global memcpy_to_uspace_failover_address	46	.global memcpy_to_uspace_failover_address
47	memcpy:	47	memcpy:
48	memcpy_from_uspace:	48	memcpy_from_uspace:
49	memcpy_to_uspace:	49	memcpy_to_uspace:
50	alloc loc0 = ar.pfs, 3, 1, 0, 0	50	alloc loc0 = ar.pfs, 3, 1, 0, 0
51		51
52	adds r14 = 7, in1	52	adds r14 = 7, in1
53	mov r2 = ar.lc	53	mov r2 = ar.lc
54	mov r8 = in0	54	mov r8 = in0 ;;
55	and r14 = -8, r14 ;;	55	and r14 = -8, r14 ;;
56	cmp.ne p6, p7 = r14, in1	56	cmp.ne p6, p7 = r14, in1
57	(p7) br.cond.dpnt 3f ;;	57	(p7) br.cond.dpnt 3f ;;
58	0:	58	0:
59	cmp.ne p6, p7 = 0, in2	59	cmp.ne p6, p7 = 0, in2
60	(p7) br.cond.dpnt 2f ;;	60	(p7) br.cond.dpnt 2f ;;
61	(p6) adds r14 = -1, in2	61	(p6) adds r14 = -1, in2
62	(p6) mov r16 = r0	62	(p6) mov r16 = r0
63	(p6) mov r17 = r0 ;;	63	(p6) mov r17 = r0 ;;
64	(p6) mov ar.lc = r14	64	(p6) mov ar.lc = r14
65	1:	65	1:
66	add r14 = r16, in1	66	add r14 = r16, in1
67	add r15 = r16, in0	67	add r15 = r16, in0
68	adds r17 = 1, r17 ;;	68	adds r17 = 1, r17 ;;
69	ld1 r14 = [r14]	69	ld1 r14 = [r14]
70	mov r16 = r17 ;;	70	mov r16 = r17 ;;
71	st1 [r15] = r14	71	st1 [r15] = r14
72	br.cloop.sptk.few 1b ;;	72	br.cloop.sptk.few 1b ;;
73	2:	73	2:
74	mov ar.lc = r2	74	mov ar.lc = r2
75	mov ar.pfs = loc0	75	mov ar.pfs = loc0
76	br.ret.sptk.many rp	76	br.ret.sptk.many rp
77	3:	77	3:
78	adds r14 = 7, in0 ;;	78	adds r14 = 7, in0 ;;
79	and r14 = -8, r14 ;;	79	and r14 = -8, r14 ;;
80	cmp.eq p6, p7 = r14, in0	80	cmp.eq p6, p7 = r14, in0
81	(p7) br.cond.dptk 0b	81	(p7) br.cond.dptk 0b
82	shr.u r18 = in2, 3 ;;	82	shr.u r18 = in2, 3 ;;
83	cmp.ne p6, p7 = 0, r18	83	cmp.ne p6, p7 = 0, r18
84	(p7) br.cond.dpnt 5f ;;	84	(p7) br.cond.dpnt 5f ;;
85	(p6) adds r14 = -1, r18	85	(p6) adds r14 = -1, r18
86	(p6) mov r16 = r0	86	(p6) mov r16 = r0
87	(p6) mov r17 = r0 ;;	87	(p6) mov r17 = r0 ;;
88	(p6) mov ar.lc = r14	88	(p6) mov ar.lc = r14
89	4:	89	4:
90	shladd r14 = r16, 3, r0	90	shladd r14 = r16, 3, r0
91	adds r16 = 1, r17 ;;	91	adds r16 = 1, r17 ;;
92	add r15 = in1, r14	92	add r15 = in1, r14
93	add r14 = in0, r14	93	add r14 = in0, r14
94	mov r17 = r16 ;;	94	mov r17 = r16 ;;
95	ld8 r15 = [r15] ;;	95	ld8 r15 = [r15] ;;
96	st8 [r14] = r15	96	st8 [r14] = r15
97	br.cloop.sptk.few 4b	97	br.cloop.sptk.few 4b
98	5:	98	5:
99	and r15 = 7, in2	99	and r15 = 7, in2
100	shladd r14 = r18, 3, r0	100	shladd r14 = r18, 3, r0
101	mov r16 = r0	101	mov r16 = r0
102	mov r18 = r0 ;;	102	mov r18 = r0 ;;
103	cmp.eq p6, p7 = 0, r15	103	cmp.eq p6, p7 = 0, r15
104	add in0 = r14, in0	104	add in0 = r14, in0
105	adds r15 = -1, r15	105	adds r15 = -1, r15
106	add r17 = r14, in1	106	add r17 = r14, in1
107	(p6) br.cond.dpnt 2b ;;	107	(p6) br.cond.dpnt 2b ;;
108	mov ar.lc = r15	108	mov ar.lc = r15
109	6:	109	6:
110	add r14 = r16, r17	110	add r14 = r16, r17
111	add r15 = r16, in0	111	add r15 = r16, in0
112	adds r16 = 1, r18 ;;	112	adds r16 = 1, r18 ;;
113	ld1 r14 = [r14]	113	ld1 r14 = [r14]
114	mov r18 = r16 ;;	114	mov r18 = r16 ;;
115	st1 [r15] = r14	115	st1 [r15] = r14
116	br.cloop.sptk.few 6b ;;	116	br.cloop.sptk.few 6b ;;
117	mov ar.lc = r2	117	mov ar.lc = r2
118	mov ar.pfs = loc0	118	mov ar.pfs = loc0
119	br.ret.sptk.many rp	119	br.ret.sptk.many rp
120		120
121	memcpy_from_uspace_failover_address:	121	memcpy_from_uspace_failover_address:
122	memcpy_to_uspace_failover_address:	122	memcpy_to_uspace_failover_address:
123	mov r8 = r0 /* return 0 on failure */	123	mov r8 = r0 /* return 0 on failure */
124	mov ar.pfs = loc0	124	mov ar.pfs = loc0
125	br.ret.sptk.many rp	125	br.ret.sptk.many rp
126		126
127	.global memsetb	127	.global memsetb
128	memsetb:	128	memsetb:
129	br _memsetb	129	br _memsetb
130		130
131	.global memsetw	131	.global memsetw
132	memsetw:	132	memsetw:
133	br _memsetw	133	br _memsetw
134		134
135	.global cpu_halt	135	.global cpu_halt
136	cpu_halt:	136	cpu_halt:
137	br cpu_halt	137	br cpu_halt
138		138
139	.global panic_printf	139	.global panic_printf
140	panic_printf:	140	panic_printf:
141	{	141	{
142	br.call.sptk.many b0=printf	142	br.call.sptk.many b0=printf
143	}	143	}
144	br halt	144	br halt
145		145
146	/** Switch to userspace - low level code.	146	/** Switch to userspace - low level code.
147	*	147	*
148	* @param in0 Userspace entry point address.	148	* @param in0 Userspace entry point address.
149	* @param in1 Userspace stack pointer address.	149	* @param in1 Userspace stack pointer address.
150	* @param in2 Userspace register stack pointer address.	150	* @param in2 Userspace register stack pointer address.
151	* @param in3 Userspace address of thread uspace_arg_t structure.	151	* @param in3 Userspace address of thread uspace_arg_t structure.
152	* @param in4 Value to be stored in IPSR.	152	* @param in4 Value to be stored in IPSR.
153	* @param in5 Value to be stored in RSC.	153	* @param in5 Value to be stored in RSC.
154	*/	154	*/
155	.global switch_to_userspace	155	.global switch_to_userspace
156	switch_to_userspace:	156	switch_to_userspace:
157	alloc loc0 = ar.pfs, 6, 3, 0, 0	157	alloc loc0 = ar.pfs, 6, 3, 0, 0
158	rsm (PSR_IC_MASK \| PSR_I_MASK) /* disable interruption collection and interrupts */	158	rsm (PSR_IC_MASK \| PSR_I_MASK) /* disable interruption collection and interrupts */
159	srlz.d ;;	159	srlz.d ;;
160	srlz.i ;;	160	srlz.i ;;
161		161
162	mov cr.ipsr = in4	162	mov cr.ipsr = in4
163	mov cr.iip = in0	163	mov cr.iip = in0
164	mov r12 = in1	164	mov r12 = in1
165		165
166	xor r1 = r1, r1	166	xor r1 = r1, r1
167		167
168	/* r2 is defined to hold pcb_ptr - set it to 0 */	168	/* r2 is defined to hold pcb_ptr - set it to 0 */
169	xor r2 = r2, r2	169	xor r2 = r2, r2
170		170
171	mov loc1 = cr.ifs	171	mov loc1 = cr.ifs
172	movl loc2 = PFM_MASK ;;	172	movl loc2 = PFM_MASK ;;
173	and loc1 = loc2, loc1 ;;	173	and loc1 = loc2, loc1 ;;
174	mov cr.ifs = loc1 ;; /* prevent decrementing BSP by rfi */	174	mov cr.ifs = loc1 ;; /* prevent decrementing BSP by rfi */
175		175
176	invala	176	invala
177		177
178	mov loc1 = ar.rsc ;;	178	mov loc1 = ar.rsc ;;
179	and loc1 = ~3, loc1 ;;	179	and loc1 = ~3, loc1 ;;
180	mov ar.rsc = loc1 ;; /* put RSE into enforced lazy mode */	180	mov ar.rsc = loc1 ;; /* put RSE into enforced lazy mode */
181		181
182	flushrs ;;	182	flushrs ;;
183		183
184	mov ar.bspstore = in2 ;;	184	mov ar.bspstore = in2 ;;
185	mov ar.rsc = in5 ;;	185	mov ar.rsc = in5 ;;
186		186
187	mov r8 = in3	187	mov r8 = in3
188		188
189	rfi ;;	189	rfi ;;
190		190

Subversion Repositories HelenOS

(root)/branches/dynload/kernel/arch/ia64/src/asm.S – Rev 4338 → 4346