162306a36Sopenharmony_ci/* SPDX-License-Identifier: GPL-2.0 */
262306a36Sopenharmony_ci/*
362306a36Sopenharmony_ci *	arch/alpha/lib/callback_srm.S
462306a36Sopenharmony_ci */
562306a36Sopenharmony_ci
662306a36Sopenharmony_ci#include <linux/export.h>
762306a36Sopenharmony_ci#include <asm/console.h>
862306a36Sopenharmony_ci
962306a36Sopenharmony_ci.text
1062306a36Sopenharmony_ci#define HWRPB_CRB_OFFSET 0xc0
1162306a36Sopenharmony_ci
1262306a36Sopenharmony_ci#if defined(CONFIG_ALPHA_SRM) || defined(CONFIG_ALPHA_GENERIC)
1362306a36Sopenharmony_ci.align 4
1462306a36Sopenharmony_cisrm_dispatch:
1562306a36Sopenharmony_ci#if defined(CONFIG_ALPHA_GENERIC)
1662306a36Sopenharmony_ci	ldl	$4,alpha_using_srm
1762306a36Sopenharmony_ci	beq	$4,nosrm
1862306a36Sopenharmony_ci#endif
1962306a36Sopenharmony_ci	ldq	$0,hwrpb	# gp is set up by CALLBACK macro.
2062306a36Sopenharmony_ci	ldl	$25,0($25)	# Pick up the wrapper data.
2162306a36Sopenharmony_ci	mov	$20,$21		# Shift arguments right.
2262306a36Sopenharmony_ci	mov	$19,$20
2362306a36Sopenharmony_ci	ldq	$1,HWRPB_CRB_OFFSET($0)
2462306a36Sopenharmony_ci	mov	$18,$19
2562306a36Sopenharmony_ci	mov	$17,$18
2662306a36Sopenharmony_ci	mov	$16,$17
2762306a36Sopenharmony_ci	addq	$0,$1,$2	# CRB address
2862306a36Sopenharmony_ci	ldq	$27,0($2)	# DISPATCH procedure descriptor (VMS call std)
2962306a36Sopenharmony_ci	extwl	$25,0,$16	# SRM callback function code
3062306a36Sopenharmony_ci	ldq	$3,8($27)	# call address
3162306a36Sopenharmony_ci	extwl	$25,2,$25	# argument information (VMS calling std)
3262306a36Sopenharmony_ci	jmp	($3)		# Return directly to caller of wrapper.
3362306a36Sopenharmony_ci
3462306a36Sopenharmony_ci.align 4
3562306a36Sopenharmony_ci.globl	srm_fixup
3662306a36Sopenharmony_ci.ent	srm_fixup
3762306a36Sopenharmony_cisrm_fixup:
3862306a36Sopenharmony_ci	ldgp	$29,0($27)
3962306a36Sopenharmony_ci#if defined(CONFIG_ALPHA_GENERIC)
4062306a36Sopenharmony_ci	ldl	$4,alpha_using_srm
4162306a36Sopenharmony_ci	beq	$4,nosrm
4262306a36Sopenharmony_ci#endif
4362306a36Sopenharmony_ci	ldq	$0,hwrpb
4462306a36Sopenharmony_ci	ldq	$1,HWRPB_CRB_OFFSET($0)
4562306a36Sopenharmony_ci	addq	$0,$1,$2	# CRB address
4662306a36Sopenharmony_ci	ldq	$27,16($2)	# VA of FIXUP procedure descriptor
4762306a36Sopenharmony_ci	ldq	$3,8($27)	# call address
4862306a36Sopenharmony_ci	lda	$25,2($31)	# two integer arguments
4962306a36Sopenharmony_ci	jmp	($3)		# Return directly to caller of srm_fixup.
5062306a36Sopenharmony_ci.end    srm_fixup
5162306a36Sopenharmony_ci
5262306a36Sopenharmony_ci#if defined(CONFIG_ALPHA_GENERIC)
5362306a36Sopenharmony_ci.align 3
5462306a36Sopenharmony_cinosrm:
5562306a36Sopenharmony_ci	lda	$0,-1($31)
5662306a36Sopenharmony_ci	ret
5762306a36Sopenharmony_ci#endif
5862306a36Sopenharmony_ci
5962306a36Sopenharmony_ci#define CALLBACK(NAME, CODE, ARG_CNT) \
6062306a36Sopenharmony_ci.align 4; .globl callback_##NAME; .ent callback_##NAME; callback_##NAME##: \
6162306a36Sopenharmony_cildgp $29,0($27); br $25,srm_dispatch; .word CODE, ARG_CNT; .end callback_##NAME
6262306a36Sopenharmony_ci
6362306a36Sopenharmony_ci#else /* defined(CONFIG_ALPHA_SRM) || defined(CONFIG_ALPHA_GENERIC) */
6462306a36Sopenharmony_ci
6562306a36Sopenharmony_ci#define CALLBACK(NAME, CODE, ARG_CNT) \
6662306a36Sopenharmony_ci.align 3; .globl callback_##NAME; .ent callback_##NAME; callback_##NAME##: \
6762306a36Sopenharmony_cilda $0,-1($31); ret; .end callback_##NAME
6862306a36Sopenharmony_ci
6962306a36Sopenharmony_ci.align 3
7062306a36Sopenharmony_ci.globl	srm_fixup
7162306a36Sopenharmony_ci.ent	srm_fixup
7262306a36Sopenharmony_cisrm_fixup:
7362306a36Sopenharmony_ci	lda	$0,-1($31)
7462306a36Sopenharmony_ci	ret
7562306a36Sopenharmony_ci.end	srm_fixup
7662306a36Sopenharmony_ci#endif /* defined(CONFIG_ALPHA_SRM) || defined(CONFIG_ALPHA_GENERIC) */
7762306a36Sopenharmony_ci
7862306a36Sopenharmony_ciCALLBACK(puts, CCB_PUTS, 4)
7962306a36Sopenharmony_ciCALLBACK(open, CCB_OPEN, 3)
8062306a36Sopenharmony_ciCALLBACK(close, CCB_CLOSE, 2)
8162306a36Sopenharmony_ciCALLBACK(read, CCB_READ, 5)
8262306a36Sopenharmony_ciCALLBACK(open_console, CCB_OPEN_CONSOLE, 1)
8362306a36Sopenharmony_ciCALLBACK(close_console, CCB_CLOSE_CONSOLE, 1)
8462306a36Sopenharmony_ciCALLBACK(getenv, CCB_GET_ENV, 4)
8562306a36Sopenharmony_ciCALLBACK(setenv, CCB_SET_ENV, 4)
8662306a36Sopenharmony_ciCALLBACK(getc, CCB_GETC, 2)
8762306a36Sopenharmony_ciCALLBACK(reset_term, CCB_RESET_TERM, 2)
8862306a36Sopenharmony_ciCALLBACK(term_int, CCB_SET_TERM_INT, 3)
8962306a36Sopenharmony_ciCALLBACK(term_ctl, CCB_SET_TERM_CTL, 3)
9062306a36Sopenharmony_ciCALLBACK(process_keycode, CCB_PROCESS_KEYCODE, 3)
9162306a36Sopenharmony_ciCALLBACK(ioctl, CCB_IOCTL, 6)
9262306a36Sopenharmony_ciCALLBACK(write, CCB_WRITE, 5)
9362306a36Sopenharmony_ciCALLBACK(reset_env, CCB_RESET_ENV, 4)
9462306a36Sopenharmony_ciCALLBACK(save_env, CCB_SAVE_ENV, 1)
9562306a36Sopenharmony_ciCALLBACK(pswitch, CCB_PSWITCH, 3)
9662306a36Sopenharmony_ciCALLBACK(bios_emul, CCB_BIOS_EMUL, 5)
9762306a36Sopenharmony_ci
9862306a36Sopenharmony_ciEXPORT_SYMBOL(callback_getenv)
9962306a36Sopenharmony_ciEXPORT_SYMBOL(callback_setenv)
10062306a36Sopenharmony_ciEXPORT_SYMBOL(callback_save_env)
10162306a36Sopenharmony_ci
10262306a36Sopenharmony_ci.data
10362306a36Sopenharmony_ci__alpha_using_srm:		# For use by bootpheader
10462306a36Sopenharmony_ci	.long 7			# value is not 1 for link debugging
10562306a36Sopenharmony_ci	.weak alpha_using_srm; alpha_using_srm = __alpha_using_srm
10662306a36Sopenharmony_ci__callback_init_done:		# For use by bootpheader
10762306a36Sopenharmony_ci	.long 7			# value is not 1 for link debugging
10862306a36Sopenharmony_ci	.weak callback_init_done; callback_init_done = __callback_init_done
10962306a36Sopenharmony_ci
110