forked from Qortal/Brooklyn
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
187 lines
5.0 KiB
187 lines
5.0 KiB
/* SPDX-License-Identifier: GPL-2.0 */ |
|
#ifndef __ALPHA_PAL_H |
|
#define __ALPHA_PAL_H |
|
|
|
#include <uapi/asm/pal.h> |
|
|
|
#ifndef __ASSEMBLY__ |
|
|
|
extern void halt(void) __attribute__((noreturn)); |
|
#define __halt() __asm__ __volatile__ ("call_pal %0 #halt" : : "i" (PAL_halt)) |
|
|
|
#define imb() \ |
|
__asm__ __volatile__ ("call_pal %0 #imb" : : "i" (PAL_imb) : "memory") |
|
|
|
#define draina() \ |
|
__asm__ __volatile__ ("call_pal %0 #draina" : : "i" (PAL_draina) : "memory") |
|
|
|
#define __CALL_PAL_R0(NAME, TYPE) \ |
|
extern inline TYPE NAME(void) \ |
|
{ \ |
|
register TYPE __r0 __asm__("$0"); \ |
|
__asm__ __volatile__( \ |
|
"call_pal %1 # " #NAME \ |
|
:"=r" (__r0) \ |
|
:"i" (PAL_ ## NAME) \ |
|
:"$1", "$16", "$22", "$23", "$24", "$25"); \ |
|
return __r0; \ |
|
} |
|
|
|
#define __CALL_PAL_W1(NAME, TYPE0) \ |
|
extern inline void NAME(TYPE0 arg0) \ |
|
{ \ |
|
register TYPE0 __r16 __asm__("$16") = arg0; \ |
|
__asm__ __volatile__( \ |
|
"call_pal %1 # "#NAME \ |
|
: "=r"(__r16) \ |
|
: "i"(PAL_ ## NAME), "0"(__r16) \ |
|
: "$1", "$22", "$23", "$24", "$25"); \ |
|
} |
|
|
|
#define __CALL_PAL_W2(NAME, TYPE0, TYPE1) \ |
|
extern inline void NAME(TYPE0 arg0, TYPE1 arg1) \ |
|
{ \ |
|
register TYPE0 __r16 __asm__("$16") = arg0; \ |
|
register TYPE1 __r17 __asm__("$17") = arg1; \ |
|
__asm__ __volatile__( \ |
|
"call_pal %2 # "#NAME \ |
|
: "=r"(__r16), "=r"(__r17) \ |
|
: "i"(PAL_ ## NAME), "0"(__r16), "1"(__r17) \ |
|
: "$1", "$22", "$23", "$24", "$25"); \ |
|
} |
|
|
|
#define __CALL_PAL_RW1(NAME, RTYPE, TYPE0) \ |
|
extern inline RTYPE NAME(TYPE0 arg0) \ |
|
{ \ |
|
register RTYPE __r0 __asm__("$0"); \ |
|
register TYPE0 __r16 __asm__("$16") = arg0; \ |
|
__asm__ __volatile__( \ |
|
"call_pal %2 # "#NAME \ |
|
: "=r"(__r16), "=r"(__r0) \ |
|
: "i"(PAL_ ## NAME), "0"(__r16) \ |
|
: "$1", "$22", "$23", "$24", "$25"); \ |
|
return __r0; \ |
|
} |
|
|
|
#define __CALL_PAL_RW2(NAME, RTYPE, TYPE0, TYPE1) \ |
|
extern inline RTYPE NAME(TYPE0 arg0, TYPE1 arg1) \ |
|
{ \ |
|
register RTYPE __r0 __asm__("$0"); \ |
|
register TYPE0 __r16 __asm__("$16") = arg0; \ |
|
register TYPE1 __r17 __asm__("$17") = arg1; \ |
|
__asm__ __volatile__( \ |
|
"call_pal %3 # "#NAME \ |
|
: "=r"(__r16), "=r"(__r17), "=r"(__r0) \ |
|
: "i"(PAL_ ## NAME), "0"(__r16), "1"(__r17) \ |
|
: "$1", "$22", "$23", "$24", "$25"); \ |
|
return __r0; \ |
|
} |
|
|
|
__CALL_PAL_W1(cflush, unsigned long); |
|
__CALL_PAL_R0(rdmces, unsigned long); |
|
__CALL_PAL_R0(rdps, unsigned long); |
|
__CALL_PAL_R0(rdusp, unsigned long); |
|
__CALL_PAL_RW1(swpipl, unsigned long, unsigned long); |
|
__CALL_PAL_R0(whami, unsigned long); |
|
__CALL_PAL_W2(wrent, void*, unsigned long); |
|
__CALL_PAL_W1(wripir, unsigned long); |
|
__CALL_PAL_W1(wrkgp, unsigned long); |
|
__CALL_PAL_W1(wrmces, unsigned long); |
|
__CALL_PAL_RW2(wrperfmon, unsigned long, unsigned long, unsigned long); |
|
__CALL_PAL_W1(wrusp, unsigned long); |
|
__CALL_PAL_W1(wrvptptr, unsigned long); |
|
__CALL_PAL_RW1(wtint, unsigned long, unsigned long); |
|
|
|
/* |
|
* TB routines.. |
|
*/ |
|
#define __tbi(nr,arg,arg1...) \ |
|
({ \ |
|
register unsigned long __r16 __asm__("$16") = (nr); \ |
|
register unsigned long __r17 __asm__("$17"); arg; \ |
|
__asm__ __volatile__( \ |
|
"call_pal %3 #__tbi" \ |
|
:"=r" (__r16),"=r" (__r17) \ |
|
:"0" (__r16),"i" (PAL_tbi) ,##arg1 \ |
|
:"$0", "$1", "$22", "$23", "$24", "$25"); \ |
|
}) |
|
|
|
#define tbi(x,y) __tbi(x,__r17=(y),"1" (__r17)) |
|
#define tbisi(x) __tbi(1,__r17=(x),"1" (__r17)) |
|
#define tbisd(x) __tbi(2,__r17=(x),"1" (__r17)) |
|
#define tbis(x) __tbi(3,__r17=(x),"1" (__r17)) |
|
#define tbiap() __tbi(-1, /* no second argument */) |
|
#define tbia() __tbi(-2, /* no second argument */) |
|
|
|
/* |
|
* QEMU Cserv routines.. |
|
*/ |
|
|
|
static inline unsigned long |
|
qemu_get_walltime(void) |
|
{ |
|
register unsigned long v0 __asm__("$0"); |
|
register unsigned long a0 __asm__("$16") = 3; |
|
|
|
asm("call_pal %2 # cserve get_time" |
|
: "=r"(v0), "+r"(a0) |
|
: "i"(PAL_cserve) |
|
: "$17", "$18", "$19", "$20", "$21"); |
|
|
|
return v0; |
|
} |
|
|
|
static inline unsigned long |
|
qemu_get_alarm(void) |
|
{ |
|
register unsigned long v0 __asm__("$0"); |
|
register unsigned long a0 __asm__("$16") = 4; |
|
|
|
asm("call_pal %2 # cserve get_alarm" |
|
: "=r"(v0), "+r"(a0) |
|
: "i"(PAL_cserve) |
|
: "$17", "$18", "$19", "$20", "$21"); |
|
|
|
return v0; |
|
} |
|
|
|
static inline void |
|
qemu_set_alarm_rel(unsigned long expire) |
|
{ |
|
register unsigned long a0 __asm__("$16") = 5; |
|
register unsigned long a1 __asm__("$17") = expire; |
|
|
|
asm volatile("call_pal %2 # cserve set_alarm_rel" |
|
: "+r"(a0), "+r"(a1) |
|
: "i"(PAL_cserve) |
|
: "$0", "$18", "$19", "$20", "$21"); |
|
} |
|
|
|
static inline void |
|
qemu_set_alarm_abs(unsigned long expire) |
|
{ |
|
register unsigned long a0 __asm__("$16") = 6; |
|
register unsigned long a1 __asm__("$17") = expire; |
|
|
|
asm volatile("call_pal %2 # cserve set_alarm_abs" |
|
: "+r"(a0), "+r"(a1) |
|
: "i"(PAL_cserve) |
|
: "$0", "$18", "$19", "$20", "$21"); |
|
} |
|
|
|
static inline unsigned long |
|
qemu_get_vmtime(void) |
|
{ |
|
register unsigned long v0 __asm__("$0"); |
|
register unsigned long a0 __asm__("$16") = 7; |
|
|
|
asm("call_pal %2 # cserve get_time" |
|
: "=r"(v0), "+r"(a0) |
|
: "i"(PAL_cserve) |
|
: "$17", "$18", "$19", "$20", "$21"); |
|
|
|
return v0; |
|
} |
|
|
|
#endif /* !__ASSEMBLY__ */ |
|
#endif /* __ALPHA_PAL_H */
|
|
|