WebSVN – HelenOS – Diff – /trunk/uspace/lib/libc/arch/ia32/src/fibril.S


#
# Copyright (c) 2001-2004 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.
#
 
.text
 
.global context_save
.global context_restore
 
 
## Save current CPU context
#
# Save CPU context to the context_t variable
# pointed by the 1st argument. Returns 1 in EAX.
#
context_save:
	movl 0(%esp),%eax	# the caller's return %eip
	movl 4(%esp),%edx	# address of the context variable to save context to
 
	movl %esp,0(%edx)	# %esp -> ctx->sp
	movl %eax,4(%edx)	# %eip -> ctx->pc
	movl %ebx,8(%edx)	# %ebx -> ctx->ebx
	movl %esi,12(%edx)	# %esi -> ctx->esi
	movl %edi,16(%edx)	# %edi -> ctx->edi
	movl %ebp,20(%edx)	# %ebp -> ctx->ebp
 
	# Save TLS
	movl %gs:0, %eax
	movl %eax, 24(%edx)     # tls -> ctx->tls
	
	xorl %eax,%eax		# context_save returns 1
	incl %eax
	ret
 
 
## Restore saved CPU context
#
# Restore CPU context from context_t variable
# pointed by the 1st argument. Returns 0 in EAX.
#
context_restore:
	movl 4(%esp),%eax	# address of the context variable to restore context from
	movl 0(%eax),%esp	# ctx->sp -> %esp
	movl 4(%eax),%edx	# ctx->pc -> %edx
	movl 8(%eax),%ebx	# ctx->ebx -> %ebx
	movl 12(%eax),%esi	# ctx->esi -> %esi
	movl 16(%eax),%edi	# ctx->edi -> %edi
	movl 20(%eax),%ebp	# ctx->ebp -> %ebp
 
	movl %edx,0(%esp)	# ctx->pc -> saver's return %eip
 
	# Set thread local storage
	pushl %edx
	movl 24(%eax), %edx   # Set arg1 to TLS addr
	movl $1, %eax         # Syscall SYS_TLS_SET
	int $0x30
	popl %edx
	
	xorl %eax,%eax		# context_restore returns 0
	ret
 
 
Generated by GNU Enscript 1.6.6.
 
 
 

Subversion Repositories HelenOS

(root)/trunk/uspace/lib/libc/arch/ia32/src/fibril.S @ 2626 – Rev 2482 → 2613

Rev 2482		Rev 2613
1	#	1	#
2	# Copyright (c) 2001-2004 Jakub Jermar	2	# Copyright (c) 2001-2004 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	.text	29	.text
30		30
31	.global context_save	31	.global context_save
32	.global context_restore	32	.global context_restore
33		33
34		34
35	## Save current CPU context	35	## Save current CPU context
36	#	36	#
37	# Save CPU context to the context_t variable	37	# Save CPU context to the context_t variable
38	# pointed by the 1st argument. Returns 1 in EAX.	38	# pointed by the 1st argument. Returns 1 in EAX.
39	#	39	#
40	context_save:	40	context_save:
41	movl 0(%esp),%eax # the caller's return %eip	41	movl 0(%esp),%eax # the caller's return %eip
42	movl 4(%esp),%edx # address of the context variable to save context to	42	movl 4(%esp),%edx # address of the context variable to save context to
43		43
44	movl %esp,0(%edx) # %esp -> ctx->sp	44	movl %esp,0(%edx) # %esp -> ctx->sp
45	movl %eax,4(%edx) # %eip -> ctx->pc	45	movl %eax,4(%edx) # %eip -> ctx->pc
46	movl %ebx,8(%edx) # %ebx -> ctx->ebx	46	movl %ebx,8(%edx) # %ebx -> ctx->ebx
47	movl %esi,12(%edx) # %esi -> ctx->esi	47	movl %esi,12(%edx) # %esi -> ctx->esi
48	movl %edi,16(%edx) # %edi -> ctx->edi	48	movl %edi,16(%edx) # %edi -> ctx->edi
49	movl %ebp,20(%edx) # %ebp -> ctx->ebp	49	movl %ebp,20(%edx) # %ebp -> ctx->ebp
50		50
51	# Save TLS	51	# Save TLS
52	movl %gs:0, %eax	52	movl %gs:0, %eax
53	movl %eax, 24(%edx) # tls -> ctx->tls	53	movl %eax, 24(%edx) # tls -> ctx->tls
54		54
55	xorl %eax,%eax # context_save returns 1	55	xorl %eax,%eax # context_save returns 1
56	incl %eax	56	incl %eax
57	ret	57	ret
58		58
59		59
60	## Restore saved CPU context	60	## Restore saved CPU context
61	#	61	#
62	# Restore CPU context from context_t variable	62	# Restore CPU context from context_t variable
63	# pointed by the 1st argument. Returns 0 in EAX.	63	# pointed by the 1st argument. Returns 0 in EAX.
64	#	64	#
65	context_restore:	65	context_restore:
66	movl 4(%esp),%eax # address of the context variable to restore context from	66	movl 4(%esp),%eax # address of the context variable to restore context from
67	movl 0(%eax),%esp # ctx->sp -> %esp	67	movl 0(%eax),%esp # ctx->sp -> %esp
68	movl 4(%eax),%edx # ctx->pc -> %edx	68	movl 4(%eax),%edx # ctx->pc -> %edx
69	movl 8(%eax),%ebx # ctx->ebx -> %ebx	69	movl 8(%eax),%ebx # ctx->ebx -> %ebx
70	movl 12(%eax),%esi # ctx->esi -> %esi	70	movl 12(%eax),%esi # ctx->esi -> %esi
71	movl 16(%eax),%edi # ctx->edi -> %edi	71	movl 16(%eax),%edi # ctx->edi -> %edi
72	movl 20(%eax),%ebp # ctx->ebp -> %ebp	72	movl 20(%eax),%ebp # ctx->ebp -> %ebp
73		73
74	movl %edx,0(%esp) # ctx->pc -> saver's return %eip	74	movl %edx,0(%esp) # ctx->pc -> saver's return %eip
75		75
76	# Set thread local storage	76	# Set thread local storage
77	pushl %edi	77	pushl %edx
78	movl 24(%eax), %eax # Set arg1 to TLS addr	78	movl 24(%eax), %edx # Set arg1 to TLS addr
79	movl $1, %edi # Syscall 1	79	movl $1, %eax # Syscall SYS_TLS_SET
80	int $0x30	80	int $0x30
81	popl %edi	81	popl %edx
82		82
83	xorl %eax,%eax # context_restore returns 0	83	xorl %eax,%eax # context_restore returns 0
84	ret	84	ret
85		85
86		86
87	Generated by GNU Enscript 1.6.6.	87	Generated by GNU Enscript 1.6.6.
88		88
89		89
90		90