##=============================================================================
##
##	context.S
##
##	H8/300 context switch code
##
##=============================================================================
## ####ECOSGPLCOPYRIGHTBEGIN####                                            
## -------------------------------------------                              
## This file is part of eCos, the Embedded Configurable Operating System.   
## Copyright (C) 1998, 1999, 2000, 2001, 2002 Free Software Foundation, Inc.
##
## eCos is free software; you can redistribute it and/or modify it under    
## the terms of the GNU General Public License as published by the Free     
## Software Foundation; either version 2 or (at your option) any later      
## version.                                                                 
##
## eCos is distributed in the hope that it will be useful, but WITHOUT      
## ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or    
## FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License    
## for more details.                                                        
##
## You should have received a copy of the GNU General Public License        
## along with eCos; if not, write to the Free Software Foundation, Inc.,    
## 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.            
##
## As a special exception, if other files instantiate templates or use      
## macros or inline functions from this file, or you compile this file      
## and link it with other works to produce a work based on this file,       
## this file does not by itself cause the resulting work to be covered by   
## the GNU General Public License. However the source code for this file    
## must still be made available in accordance with section (3) of the GNU   
## General Public License v2.                                               
##
## This exception does not invalidate any other reasons why a work based    
## on this file might be covered by the GNU General Public License.         
## -------------------------------------------                              
## ####ECOSGPLCOPYRIGHTEND####                                              
##=============================================================================
#######DESCRIPTIONBEGIN####
##
## Author(s): 	yoshinori sato
## Contributors:	yoshinori sato
## Date:	2002-02-17
## Purpose:	H8/300 context switch code
## Description:	This file contains implementations of the thread context 
##		switch routines. It also contains the longjmp() and setjmp()
##              routines.
##
######DESCRIPTIONEND####
##
##=============================================================================

#include <pkgconf/hal.h>

#include <cyg/hal/arch.inc>
#include <cyg/hal/basetype.h>


#ifdef CYGPKG_HAL_H8300_H8300H
	.h8300h
#endif
#ifdef CYGPKG_HAL_H8300_H8S
	.h8300s
#endif
	
#------------------------------------------------------------------------------
# hal_thread_switch_context
# Switch thread contexts
# er0 = address of sp of next thread to execute
# er1 = address of sp save location of current thread

	.global	CYG_LABEL_DEFN(hal_thread_switch_context)
CYG_LABEL_DEFN(hal_thread_switch_context):
	mov.w	@sp,r2		; save ccr
	stc	ccr,r2h
	mov.w	r2,@sp
	hal_cpu_save_context
	mov.l	sp,@er1
	
	# Now load the destination thread by dropping through
	# to hal_thread_load_context
	
#------------------------------------------------------------------------------
# hal_thread_load_context
# Load thread context
# D0 = address of sp of next thread to execute
# Note that this function is also the second half of hal_thread_switch_context
# and is simply dropped into from it.
	
	.global	CYG_LABEL_DEFN(hal_thread_load_context)
CYG_LABEL_DEFN(hal_thread_load_context):

	mov.l	@er0,sp
	hal_cpu_load_all
	rte
	
##-----------------------------------------------------------------------------
## HAL longjmp(), setjmp() implementations
## These implementations omit the usual movm [d2,d3,a2,a3],(sp)
## Which is the first instruction of all C compiled functions.	
## Note: These definitions are repeated in hal_arch.h. If changes are required
## remember to update both sets.

#define CYGARC_JMP_BUF_SP        0
#define CYGARC_JMP_BUF_ER3       1
#define CYGARC_JMP_BUF_ER4       2
#define CYGARC_JMP_BUF_ER5       3
#define CYGARC_JMP_BUF_ER6       4
#define CYGARC_JMP_BUF_PC        5

#define CYGARC_JMP_BUF_SIZE      6

        
	# This just preserves the callee save registers 
	# namely a2,a3,d2,d3
	# setjmp cannot use movm to do this as we need to keep 
	# the sp underneath all live data at all times.
	.globl CYG_LABEL_DEFN(hal_setjmp)
CYG_LABEL_DEFN(hal_setjmp):				 ; er0=env  
	mov.l	er3,@(CYGARC_JMP_BUF_ER3*4,er0)
	mov.l	er4,@(CYGARC_JMP_BUF_ER4*4,er0)
	mov.l	er5,@(CYGARC_JMP_BUF_ER5*4,er0)
	mov.l	er6,@(CYGARC_JMP_BUF_ER6*4,er0)
	mov.l	@sp,er1
	mov.l	er1,@(CYGARC_JMP_BUF_PC*4,er0)	
	mov	sp,er1
	mov	er1,@(CYGARC_JMP_BUF_SP*4,er0)
	sub.l	er0,er0
	rts

	# longjmp returns to caller of setjmp
	# after restoring callee save registers
	.globl CYG_LABEL_DEFN(hal_longjmp)
CYG_LABEL_DEFN(hal_longjmp):	
	mov.l	@(CYGARC_JMP_BUF_ER3*4,er0),er3
	mov.l	@(CYGARC_JMP_BUF_ER4*4,er0),er4
	mov.l	@(CYGARC_JMP_BUF_ER5*4,er0),er5
	mov.l	@(CYGARC_JMP_BUF_ER6*4,er0),er6
	mov.l	@(CYGARC_JMP_BUF_PC*4,er0),er2
	mov.l	@(CYGARC_JMP_BUF_SP*4,er0),sp
	mov.l	er2,@sp
	mov.l	er1,er0
	rts

	
#------------------------------------------------------------------------------
# end of context.S