119 lines
		
	
	
		
			2.5 KiB
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
			
		
		
	
	
			119 lines
		
	
	
		
			2.5 KiB
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
| /*
 | |
|  * cpu32bug.S -- board support for the CPU32BUG monitor.
 | |
|  *
 | |
|  * Copyright (c) 1995, 1996 Cygnus Support
 | |
|  *
 | |
|  * The authors hereby grant permission to use, copy, modify, distribute,
 | |
|  * and license this software and its documentation for any purpose, provided
 | |
|  * that existing copyright notices are retained in all copies and that this
 | |
|  * notice is included verbatim in any distributions. No written agreement,
 | |
|  * license, or royalty fee is required for any of the authorized uses.
 | |
|  * Modifications to this software may be copyrighted by their authors
 | |
|  * and need not follow the licensing terms described here, provided that
 | |
|  * the new terms are clearly indicated on the first page of each file where
 | |
|  * they apply.
 | |
|  */
 | |
| 
 | |
| #include "asm.h"
 | |
| #include "cpu32bug.h"
 | |
| 
 | |
| 	.title "cpu32bug.S for m68k-coff"
 | |
| 
 | |
| 	.text
 | |
| 	.global SYM (_exit)
 | |
| 	.global SYM (outln)
 | |
| 	.global SYM (outbyte)
 | |
| 	.global SYM (putDebugChar)
 | |
| 	.global SYM (inbyte)
 | |
| 	.global SYM (getDebugChar)
 | |
| 	.global SYM (havebyte)
 | |
| 
 | |
| /*
 | |
|  * _exit -- Exit from the application. Normally we cause a user trap
 | |
|  *          to return to the ROM monitor for another run.
 | |
|  */
 | |
| 	.text
 | |
| 	.align	2
 | |
| SYM (_exit):
 | |
| 	link	fp, IMM(0)
 | |
|         trap	IMM(15)
 | |
|         .word	RETURN
 | |
| 
 | |
| /*
 | |
|  * inbyte -- get a byte from the serial port
 | |
|  *	d0 - contains the byte read in
 | |
|  */
 | |
| 	.text
 | |
| 	.align	2
 | |
| SYM (getDebugChar):		/* symbol name used by m68k-stub */
 | |
| SYM (inbyte):
 | |
| 	link	fp, IMM(-8)
 | |
| 	trap 	IMM(15)
 | |
| 	.word	INCHR
 | |
| 	moveb 	sp@, d0
 | |
| 	extw	d0
 | |
| 	extl	d0
 | |
| 	unlk	fp
 | |
| 	rts
 | |
| 
 | |
| /*
 | |
|  * outbyte -- sends a byte out the serial port
 | |
|  *	d0 - contains the byte to be sent
 | |
|  */
 | |
| 	.text
 | |
| 	.align	2
 | |
| SYM (putDebugChar):		/* symbol name used by m68k-stub */
 | |
| SYM (outbyte):
 | |
| 	link	fp, IMM(-4)
 | |
|  	moveb	fp@(11), sp@
 | |
| 	trap 	IMM(15)
 | |
| 	.word	OUTCHR
 | |
| 	unlk	fp
 | |
| 	rts
 | |
| 
 | |
| /*
 | |
|  * outln -- sends a string of bytes out the serial port with a CR/LF
 | |
|  *	a0 - contains the address of the string's first byte
 | |
|  *	a1 - contains the address of the string's last byte
 | |
|  */
 | |
| 	.text
 | |
| 	.align	2
 | |
| SYM (outln):
 | |
| 	link	fp, IMM(-8)
 | |
| 	moveml	a0/a1, sp@
 | |
| 	trap 	IMM(15)
 | |
| 	.word 	OUTLN
 | |
| 	unlk	fp
 | |
| 	rts
 | |
| 
 | |
| /*
 | |
|  * outstr -- sends a string of bytes out the serial port without a CR/LF
 | |
|  *	a0 - contains the address of the string's first byte
 | |
|  *	a1 - contains the address of the string's last byte
 | |
|  */
 | |
| 	.text
 | |
| 	.align	2
 | |
| SYM (outstr):
 | |
| 	link	fp, IMM(-8)
 | |
| 	moveml	a0/a1, sp@
 | |
| 	trap 	IMM(15)
 | |
| 	.word 	OUTSTR
 | |
| 	unlk	fp
 | |
| 	rts
 | |
| 
 | |
| /*
 | |
|  * havebyte -- checks to see if there is a byte in the serial port,
 | |
|  *             returns 1 if there is a byte, 0 otherwise.
 | |
|  */
 | |
| 	.text
 | |
| 	.align	2
 | |
| SYM (havebyte):
 | |
| 	trap 	IMM(15)
 | |
| 	.word	INSTAT
 | |
| 	beqs	empty
 | |
| 	movel 	IMM(1), d0
 | |
| 	rts
 | |
| empty:
 | |
| 	movel	IMM(0), d0
 | |
| 	rts
 |