[linux.git] / arch / alpha / lib / callback_srm.S

/* SPDX-License-Identifier: GPL-2.0 */
/*
 *	arch/alpha/lib/callback_srm.S
 */

#include <asm/console.h>
#include <asm/export.h>

.text
#define HWRPB_CRB_OFFSET 0xc0

#if defined(CONFIG_ALPHA_SRM) || defined(CONFIG_ALPHA_GENERIC)
.align 4
srm_dispatch:
#if defined(CONFIG_ALPHA_GENERIC)
	ldl	$4,alpha_using_srm
	beq	$4,nosrm
#endif
	ldq	$0,hwrpb	# gp is set up by CALLBACK macro.
	ldl	$25,0($25)	# Pick up the wrapper data.
	mov	$20,$21		# Shift arguments right.
	mov	$19,$20
	ldq	$1,HWRPB_CRB_OFFSET($0)
	mov	$18,$19
	mov	$17,$18
	mov	$16,$17
	addq	$0,$1,$2	# CRB address
	ldq	$27,0($2)	# DISPATCH procedure descriptor (VMS call std)
	extwl	$25,0,$16	# SRM callback function code
	ldq	$3,8($27)	# call address
	extwl	$25,2,$25	# argument information (VMS calling std)
	jmp	($3)		# Return directly to caller of wrapper.

.align 4
.globl	srm_fixup
.ent	srm_fixup
srm_fixup:
	ldgp	$29,0($27)
#if defined(CONFIG_ALPHA_GENERIC)
	ldl	$4,alpha_using_srm
	beq	$4,nosrm
#endif
	ldq	$0,hwrpb
	ldq	$1,HWRPB_CRB_OFFSET($0)
	addq	$0,$1,$2	# CRB address
	ldq	$27,16($2)	# VA of FIXUP procedure descriptor
	ldq	$3,8($27)	# call address
	lda	$25,2($31)	# two integer arguments
	jmp	($3)		# Return directly to caller of srm_fixup.
.end    srm_fixup

#if defined(CONFIG_ALPHA_GENERIC)
.align 3
nosrm:
	lda	$0,-1($31)
	ret
#endif

#define CALLBACK(NAME, CODE, ARG_CNT) \
.align 4; .globl callback_##NAME; .ent callback_##NAME; callback_##NAME##: \
ldgp $29,0($27); br $25,srm_dispatch; .word CODE, ARG_CNT; .end callback_##NAME

#else /* defined(CONFIG_ALPHA_SRM) || defined(CONFIG_ALPHA_GENERIC) */

#define CALLBACK(NAME, CODE, ARG_CNT) \
.align 3; .globl callback_##NAME; .ent callback_##NAME; callback_##NAME##: \
lda $0,-1($31); ret; .end callback_##NAME

.align 3
.globl	srm_fixup
.ent	srm_fixup
srm_fixup:
	lda	$0,-1($31)
	ret
.end	srm_fixup
#endif /* defined(CONFIG_ALPHA_SRM) || defined(CONFIG_ALPHA_GENERIC) */

CALLBACK(puts, CCB_PUTS, 4)
CALLBACK(open, CCB_OPEN, 3)
CALLBACK(close, CCB_CLOSE, 2)
CALLBACK(read, CCB_READ, 5)
CALLBACK(open_console, CCB_OPEN_CONSOLE, 1)
CALLBACK(close_console, CCB_CLOSE_CONSOLE, 1)
CALLBACK(getenv, CCB_GET_ENV, 4)
CALLBACK(setenv, CCB_SET_ENV, 4)
CALLBACK(getc, CCB_GETC, 2)
CALLBACK(reset_term, CCB_RESET_TERM, 2)
CALLBACK(term_int, CCB_SET_TERM_INT, 3)
CALLBACK(term_ctl, CCB_SET_TERM_CTL, 3)
CALLBACK(process_keycode, CCB_PROCESS_KEYCODE, 3)
CALLBACK(ioctl, CCB_IOCTL, 6)
CALLBACK(write, CCB_WRITE, 5)
CALLBACK(reset_env, CCB_RESET_ENV, 4)
CALLBACK(save_env, CCB_SAVE_ENV, 1)
CALLBACK(pswitch, CCB_PSWITCH, 3)
CALLBACK(bios_emul, CCB_BIOS_EMUL, 5)

EXPORT_SYMBOL(callback_getenv)
EXPORT_SYMBOL(callback_setenv)
EXPORT_SYMBOL(callback_save_env)
	
.data
__alpha_using_srm:		# For use by bootpheader
	.long 7			# value is not 1 for link debugging
	.weak alpha_using_srm; alpha_using_srm = __alpha_using_srm
__callback_init_done:		# For use by bootpheader
	.long 7			# value is not 1 for link debugging
	.weak callback_init_done; callback_init_done = __callback_init_done
Commit	Line	Data
b2441318	1	/* SPDX-License-Identifier: GPL-2.0 */
1da177e4 LT	2	/*
	3	* arch/alpha/lib/callback_srm.S
	4	*/
	5
1da177e4	6	#include <asm/console.h>
00fc0e0d	7	#include <asm/export.h>
1da177e4 LT	8
	9	.text
	10	#define HWRPB_CRB_OFFSET 0xc0
	11
	12	#if defined(CONFIG_ALPHA_SRM) \|\| defined(CONFIG_ALPHA_GENERIC)
	13	.align 4
	14	srm_dispatch:
	15	#if defined(CONFIG_ALPHA_GENERIC)
	16	ldl $4,alpha_using_srm
	17	beq $4,nosrm
	18	#endif
	19	ldq $0,hwrpb # gp is set up by CALLBACK macro.
	20	ldl $25,0($25) # Pick up the wrapper data.
	21	mov $20,$21 # Shift arguments right.
	22	mov $19,$20
	23	ldq $1,HWRPB_CRB_OFFSET($0)
	24	mov $18,$19
	25	mov $17,$18
	26	mov $16,$17
	27	addq $0,$1,$2 # CRB address
	28	ldq $27,0($2) # DISPATCH procedure descriptor (VMS call std)
	29	extwl $25,0,$16 # SRM callback function code
	30	ldq $3,8($27) # call address
	31	extwl $25,2,$25 # argument information (VMS calling std)
	32	jmp ($3) # Return directly to caller of wrapper.
	33
	34	.align 4
	35	.globl srm_fixup
	36	.ent srm_fixup
	37	srm_fixup:
	38	ldgp $29,0($27)
	39	#if defined(CONFIG_ALPHA_GENERIC)
	40	ldl $4,alpha_using_srm
	41	beq $4,nosrm
	42	#endif
	43	ldq $0,hwrpb
	44	ldq $1,HWRPB_CRB_OFFSET($0)
	45	addq $0,$1,$2 # CRB address
	46	ldq $27,16($2) # VA of FIXUP procedure descriptor
	47	ldq $3,8($27) # call address
	48	lda $25,2($31) # two integer arguments
	49	jmp ($3) # Return directly to caller of srm_fixup.
	50	.end srm_fixup
	51
	52	#if defined(CONFIG_ALPHA_GENERIC)
	53	.align 3
	54	nosrm:
	55	lda $0,-1($31)
	56	ret
	57	#endif
	58
	59	#define CALLBACK(NAME, CODE, ARG_CNT) \
	60	.align 4; .globl callback_##NAME; .ent callback_##NAME; callback_##NAME##: \
	61	ldgp $29,0($27); br $25,srm_dispatch; .word CODE, ARG_CNT; .end callback_##NAME
	62
	63	#else /* defined(CONFIG_ALPHA_SRM) \|\| defined(CONFIG_ALPHA_GENERIC) */
	64
	65	#define CALLBACK(NAME, CODE, ARG_CNT) \
	66	.align 3; .globl callback_##NAME; .ent callback_##NAME; callback_##NAME##: \
	67	lda $0,-1($31); ret; .end callback_##NAME
	68
	69	.align 3
	70	.globl srm_fixup
	71	.ent srm_fixup
72	srm_fixup:
73	lda $0,-1($31)
74	ret
75	.end srm_fixup
76	#endif /* defined(CONFIG_ALPHA_SRM) \|\| defined(CONFIG_ALPHA_GENERIC) */
77
78	CALLBACK(puts, CCB_PUTS, 4)
79	CALLBACK(open, CCB_OPEN, 3)
80	CALLBACK(close, CCB_CLOSE, 2)
81	CALLBACK(read, CCB_READ, 5)
82	CALLBACK(open_console, CCB_OPEN_CONSOLE, 1)
83	CALLBACK(close_console, CCB_CLOSE_CONSOLE, 1)
84	CALLBACK(getenv, CCB_GET_ENV, 4)
85	CALLBACK(setenv, CCB_SET_ENV, 4)
86	CALLBACK(getc, CCB_GETC, 2)
87	CALLBACK(reset_term, CCB_RESET_TERM, 2)
88	CALLBACK(term_int, CCB_SET_TERM_INT, 3)
89	CALLBACK(term_ctl, CCB_SET_TERM_CTL, 3)
90	CALLBACK(process_keycode, CCB_PROCESS_KEYCODE, 3)
91	CALLBACK(ioctl, CCB_IOCTL, 6)
92	CALLBACK(write, CCB_WRITE, 5)
93	CALLBACK(reset_env, CCB_RESET_ENV, 4)
94	CALLBACK(save_env, CCB_SAVE_ENV, 1)
95	CALLBACK(pswitch, CCB_PSWITCH, 3)
96	CALLBACK(bios_emul, CCB_BIOS_EMUL, 5)
00fc0e0d AV	97
	98	EXPORT_SYMBOL(callback_getenv)
	99	EXPORT_SYMBOL(callback_setenv)
	100	EXPORT_SYMBOL(callback_save_env)
1da177e4 LT	101
	102	.data
	103	__alpha_using_srm: # For use by bootpheader
	104	.long 7 # value is not 1 for link debugging
	105	.weak alpha_using_srm; alpha_using_srm = __alpha_using_srm
	106	__callback_init_done: # For use by bootpheader
	107	.long 7 # value is not 1 for link debugging
	108	.weak callback_init_done; callback_init_done = __callback_init_done
	109