summaryrefslogtreecommitdiff
path: root/sys/arch/m68k/060sp/iskeletn.s
blob: b6ba19ec952e40555168626cec448b33f739a382 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
#
# $OpenBSD: iskeletn.s,v 1.2 1996/05/30 22:14:43 niklas Exp $
# $NetBSD: iskeletn.s,v 1.2 1996/05/15 19:48:41 is Exp $
#

#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# MOTOROLA MICROPROCESSOR & MEMORY TECHNOLOGY GROUP
# M68000 Hi-Performance Microprocessor Division
# M68060 Software Package Production Release 
# 
# M68060 Software Package Copyright (C) 1993, 1994, 1995, 1996 Motorola Inc.
# All rights reserved.
# 
# THE SOFTWARE is provided on an "AS IS" basis and without warranty.
# To the maximum extent permitted by applicable law,
# MOTOROLA DISCLAIMS ALL WARRANTIES WHETHER EXPRESS OR IMPLIED,
# INCLUDING IMPLIED WARRANTIES OF MERCHANTABILITY OR FITNESS
# FOR A PARTICULAR PURPOSE and any warranty against infringement with
# regard to the SOFTWARE (INCLUDING ANY MODIFIED VERSIONS THEREOF)
# and any accompanying written materials. 
# 
# To the maximum extent permitted by applicable law,
# IN NO EVENT SHALL MOTOROLA BE LIABLE FOR ANY DAMAGES WHATSOEVER
# (INCLUDING WITHOUT LIMITATION, DAMAGES FOR LOSS OF BUSINESS PROFITS,
# BUSINESS INTERRUPTION, LOSS OF BUSINESS INFORMATION, OR OTHER PECUNIARY LOSS)
# ARISING OF THE USE OR INABILITY TO USE THE SOFTWARE.
# 
# Motorola assumes no responsibility for the maintenance and support
# of the SOFTWARE.  
# 
# You are hereby granted a copyright license to use, modify, and distribute the
# SOFTWARE so long as this entire notice is retained without alteration
# in any modified and/or redistributed versions, and that such modified
# versions are clearly identified as such.
# No licenses are granted by implication, estoppel or otherwise under any
# patents or trademarks of Motorola, Inc.
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

#
# iskeleton.s
#
# This file contains:
#	(1) example "Call-out"s
#	(2) example package entry code
#	(3) example "Call-out" table
#


#################################
# (1) EXAMPLE CALL-OUTS 	#
#				#
# _060_isp_done()		#
# _060_real_chk()		#
# _060_real_divbyzero()		#
#				#
# _060_real_cas()		#
# _060_real_cas2()		#
# _060_real_lock_page()		#
# _060_real_unlock_page()	#
#################################

#
# _060_isp_done():
#
# This is and example main exit point for the Unimplemented Integer
# Instruction exception handler. For a normal exit, the 
# _isp_unimp() branches to here so that the operating system
# can do any clean-up desired. The stack frame is the
# Unimplemented Integer Instruction stack frame with
# the PC pointing to the instruction following the instruction
# just emulated.
# To simply continue execution at the next instruction, just
# do an "rte".
#
	global		_060_isp_done
_060_isp_done:
	rte

#
# _060_real_chk():
#
# This is an alternate exit point for the Unimplemented Integer
# Instruction exception handler. If the instruction was a "chk2"
# and the operand was out of bounds, then _isp_unimp() creates
# a CHK exception stack frame from the Unimplemented Integer Instrcution
# stack frame and branches to this routine.
#
	global		_060_real_chk
_060_real_chk:
	tst.b		(%sp)			# is tracing enabled?
	bpl.b		real_chk_end		# no

#
#	    CHK FRAME		   TRACE FRAME
#	*****************	*****************
#	*   Current PC	*	*   Current PC	*
#	*****************	*****************
#	* 0x2 *  0x018	*	* 0x2 *  0x024	*
#	*****************	*****************
#	*     Next	*	*     Next	*
#	*      PC	*	*      PC	*
#	*****************	*****************
#	*      SR	*	*      SR	*
#	*****************	*****************
#
	mov.b		&0x24,0x7(%sp)		# set trace vecno
	bra.l		_060_real_trace

real_chk_end:
	rte

#
# _060_real_divbyzero:
#
# This is an alternate exit point for the Unimplemented Integer 
# Instruction exception handler isp_unimp(). If the instruction is a 64-bit
# integer divide where the source operand is a zero, then the _isp_unimp() 
# creates a Divide-by-zero exception stack frame from the Unimplemented
# Integer Instruction stack frame and branches to this routine.
#
# Remember that a trace exception may be pending. The code below performs
# no action associated with the "chk" exception. If tracing is enabled,
# then it create a Trace exception stack frame from the "chk" exception
# stack frame and branches to the _real_trace() entry point.
# 
	global		_060_real_divbyzero
_060_real_divbyzero:
	tst.b		(%sp)			# is tracing enabled?
	bpl.b		real_divbyzero_end	# no

#
#	 DIVBYZERO FRAME	   TRACE FRAME
#	*****************	*****************
#	*   Current PC	*	*   Current PC	*
#	*****************	*****************
#	* 0x2 *  0x014	*	* 0x2 *  0x024	*
#	*****************	*****************
#	*     Next	*	*     Next	*
#	*      PC	*	*      PC	*
#	*****************	*****************
#	*      SR	*	*      SR	*
#	*****************	*****************
#
	mov.b		&0x24,0x7(%sp)		# set trace vecno
	bra.l		_060_real_trace

real_divbyzero_end:
	rte

###########################

#
# _060_real_cas():
#
# Entry point for the selected cas emulation code implementation.
# If the implementation provided by the 68060ISP is sufficient,
# then this routine simply re-enters the package through _isp_cas.
#
	global		_060_real_cas
_060_real_cas:
	bra.l		_I_CALL_TOP+0x80+0x08

#
# _060_real_cas2():
#
# Entry point for the selected cas2 emulation code implementation.
# If the implementation provided by the 68060ISP is sufficient,
# then this routine simply re-enters the package through _isp_cas2.
#
	global		_060_real_cas2
_060_real_cas2:
	bra.l		_I_CALL_TOP+0x80+0x10

#
# _060_lock_page():
#
# Entry point for the operating system's routine to "lock" a page
# from being paged out. This routine is needed by the cas/cas2
# algorithms so that no page faults occur within the "core" code
# region. Note: the routine must lock two pages if the operand 
# spans two pages.
# NOTE: THE ROUTINE SHOULD RETURN AN FSLW VALUE IN D0 ON FAILURE
# SO THAT THE 060SP CAN CREATE A PROPER ACCESS ERROR FRAME.
# Arguments:
#	a0 = operand address
#	d0 = `xxxxxxff -> supervisor; `xxxxxx00 -> user
#	d1 = `xxxxxxff -> longword; `xxxxxx00 -> word
# Expected outputs:
#	d0 = 0 -> success; non-zero -> failure
#
	global		_060_real_lock_page
_060_real_lock_page:
	clr.l		%d0
	rts

#
# _060_unlock_page():
#
# Entry point for the operating system's routine to "unlock" a
# page that has been "locked" previously with _real_lock_page.
# Note: the routine must unlock two pages if the operand spans
# two pages.
# Arguments:
# 	a0 = operand address
#	d0 = `xxxxxxff -> supervisor; `xxxxxx00 -> user
#	d1 = `xxxxxxff -> longword; `xxxxxx00 -> word
#
	global		_060_real_unlock_page
_060_real_unlock_page:
	clr.l		%d0
	rts

############################################################################

##################################
# (2) EXAMPLE PACKAGE ENTRY CODE #
##################################

	global		_060_isp_unimp
_060_isp_unimp:
	bra.l		_I_CALL_TOP+0x80+0x00

	global		_060_isp_cas
_060_isp_cas:
	bra.l		_I_CALL_TOP+0x80+0x08

	global		_060_isp_cas2
_060_isp_cas2:
	bra.l		_I_CALL_TOP+0x80+0x10

	global		_060_isp_cas_finish
_060_isp_cas_finish:
	bra.l		_I_CALL_TOP+0x80+0x18

	global		_060_isp_cas2_finish
_060_isp_cas2_finish:
	bra.l		_I_CALL_TOP+0x80+0x20

	global		_060_isp_cas_inrange
_060_isp_cas_inrange:
	bra.l		_I_CALL_TOP+0x80+0x28

	global		_060_isp_cas_terminate
_060_isp_cas_terminate:
	bra.l		_I_CALL_TOP+0x80+0x30

	global		_060_isp_cas_restart
_060_isp_cas_restart:
	bra.l		_I_CALL_TOP+0x80+0x38

############################################################################

################################
# (3) EXAMPLE CALL-OUT SECTION #
################################

# The size of this section MUST be 128 bytes!!!

	global	_I_CALL_TOP
_I_CALL_TOP:
	long	_060_real_chk		- _I_CALL_TOP
	long	_060_real_divbyzero	- _I_CALL_TOP
	long	_060_real_trace		- _I_CALL_TOP
	long	_060_real_access	- _I_CALL_TOP
	long	_060_isp_done		- _I_CALL_TOP

	long	_060_real_cas		- _I_CALL_TOP
	long	_060_real_cas2		- _I_CALL_TOP
	long	_060_real_lock_page	- _I_CALL_TOP
	long	_060_real_unlock_page	- _I_CALL_TOP

	long	0x00000000, 0x00000000, 0x00000000, 0x00000000
	long	0x00000000, 0x00000000, 0x00000000

	long	_060_imem_read		- _I_CALL_TOP
	long	_060_dmem_read		- _I_CALL_TOP
	long	_060_dmem_write		- _I_CALL_TOP
	long	_060_imem_read_word	- _I_CALL_TOP
	long	_060_imem_read_long	- _I_CALL_TOP
	long	_060_dmem_read_byte	- _I_CALL_TOP
	long	_060_dmem_read_word	- _I_CALL_TOP
	long	_060_dmem_read_long	- _I_CALL_TOP
	long	_060_dmem_write_byte	- _I_CALL_TOP
	long	_060_dmem_write_word	- _I_CALL_TOP
	long	_060_dmem_write_long	- _I_CALL_TOP

	long	0x00000000
	long	0x00000000, 0x00000000, 0x00000000, 0x00000000

############################################################################

# 060 INTEGER KERNEL PACKAGE MUST GO HERE!!!