Orange Pi5 kernel

^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300   1) // SPDX-License-Identifier: GPL-2.0-or-later
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300   2) /*
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300   3)     NetWinder Floating Point Emulator
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300   4)     (c) Rebel.com, 1998-1999
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300   5)     (c) Philip Blundell, 1998, 2001
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300   6) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300   7)     Direct questions, comments to Scott Bambrough <scottb@netwinder.org>
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300   8) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300   9) */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  10) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  11) #include "fpa11.h"
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  12) #include "softfloat.h"
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  13) #include "fpopcode.h"
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  14) #include "fpmodule.h"
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  15) #include "fpmodule.inl"
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  16) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  17) #include <linux/uaccess.h>
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  18) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  19) static inline void loadSingle(const unsigned int Fn, const unsigned int __user *pMem)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  20) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  21) 	FPA11 *fpa11 = GET_FPA11();
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  22) 	fpa11->fType[Fn] = typeSingle;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  23) 	get_user(fpa11->fpreg[Fn].fSingle, pMem);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  24) }
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  25) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  26) static inline void loadDouble(const unsigned int Fn, const unsigned int __user *pMem)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  27) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  28) 	FPA11 *fpa11 = GET_FPA11();
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  29) 	unsigned int *p;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  30) 	p = (unsigned int *) &fpa11->fpreg[Fn].fDouble;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  31) 	fpa11->fType[Fn] = typeDouble;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  32) #ifdef __ARMEB__
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  33) 	get_user(p[0], &pMem[0]);	/* sign & exponent */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  34) 	get_user(p[1], &pMem[1]);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  35) #else
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  36) 	get_user(p[0], &pMem[1]);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  37) 	get_user(p[1], &pMem[0]);	/* sign & exponent */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  38) #endif
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  39) }
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  40) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  41) #ifdef CONFIG_FPE_NWFPE_XP
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  42) static inline void loadExtended(const unsigned int Fn, const unsigned int __user *pMem)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  43) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  44) 	FPA11 *fpa11 = GET_FPA11();
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  45) 	unsigned int *p;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  46) 	p = (unsigned int *) &fpa11->fpreg[Fn].fExtended;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  47) 	fpa11->fType[Fn] = typeExtended;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  48) 	get_user(p[0], &pMem[0]);	/* sign & exponent */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  49) #ifdef __ARMEB__
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  50) 	get_user(p[1], &pMem[1]);	/* ms bits */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  51) 	get_user(p[2], &pMem[2]);	/* ls bits */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  52) #else
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  53) 	get_user(p[1], &pMem[2]);	/* ls bits */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  54) 	get_user(p[2], &pMem[1]);	/* ms bits */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  55) #endif
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  56) }
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  57) #endif
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  58) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  59) static inline void loadMultiple(const unsigned int Fn, const unsigned int __user *pMem)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  60) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  61) 	FPA11 *fpa11 = GET_FPA11();
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  62) 	register unsigned int *p;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  63) 	unsigned long x;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  64) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  65) 	p = (unsigned int *) &(fpa11->fpreg[Fn]);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  66) 	get_user(x, &pMem[0]);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  67) 	fpa11->fType[Fn] = (x >> 14) & 0x00000003;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  68) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  69) 	switch (fpa11->fType[Fn]) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  70) 	case typeSingle:
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  71) 	case typeDouble:
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  72) 		{
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  73) 			get_user(p[0], &pMem[2]);	/* Single */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  74) 			get_user(p[1], &pMem[1]);	/* double msw */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  75) 			p[2] = 0;			/* empty */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  76) 		}
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  77) 		break;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  78) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  79) #ifdef CONFIG_FPE_NWFPE_XP
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  80) 	case typeExtended:
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  81) 		{
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  82) 			get_user(p[1], &pMem[2]);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  83) 			get_user(p[2], &pMem[1]);	/* msw */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  84) 			p[0] = (x & 0x80003fff);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  85) 		}
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  86) 		break;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  87) #endif
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  88) 	}
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  89) }
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  90) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  91) static inline void storeSingle(struct roundingData *roundData, const unsigned int Fn, unsigned int __user *pMem)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  92) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  93) 	FPA11 *fpa11 = GET_FPA11();
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  94) 	union {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  95) 		float32 f;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  96) 		unsigned int i[1];
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  97) 	} val;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  98) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  99) 	switch (fpa11->fType[Fn]) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 100) 	case typeDouble:
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 101) 		val.f = float64_to_float32(roundData, fpa11->fpreg[Fn].fDouble);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 102) 		break;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 103) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 104) #ifdef CONFIG_FPE_NWFPE_XP
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 105) 	case typeExtended:
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 106) 		val.f = floatx80_to_float32(roundData, fpa11->fpreg[Fn].fExtended);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 107) 		break;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 108) #endif
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 109) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 110) 	default:
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 111) 		val.f = fpa11->fpreg[Fn].fSingle;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 112) 	}
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 113) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 114) 	put_user(val.i[0], pMem);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 115) }
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 116) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 117) static inline void storeDouble(struct roundingData *roundData, const unsigned int Fn, unsigned int __user *pMem)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 118) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 119) 	FPA11 *fpa11 = GET_FPA11();
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 120) 	union {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 121) 		float64 f;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 122) 		unsigned int i[2];
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 123) 	} val;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 124) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 125) 	switch (fpa11->fType[Fn]) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 126) 	case typeSingle:
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 127) 		val.f = float32_to_float64(fpa11->fpreg[Fn].fSingle);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 128) 		break;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 129) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 130) #ifdef CONFIG_FPE_NWFPE_XP
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 131) 	case typeExtended:
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 132) 		val.f = floatx80_to_float64(roundData, fpa11->fpreg[Fn].fExtended);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 133) 		break;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 134) #endif
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 135) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 136) 	default:
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 137) 		val.f = fpa11->fpreg[Fn].fDouble;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 138) 	}
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 139) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 140) #ifdef __ARMEB__
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 141) 	put_user(val.i[0], &pMem[0]);	/* msw */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 142) 	put_user(val.i[1], &pMem[1]);	/* lsw */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 143) #else
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 144) 	put_user(val.i[1], &pMem[0]);	/* msw */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 145) 	put_user(val.i[0], &pMem[1]);	/* lsw */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 146) #endif
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 147) }
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 148) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 149) #ifdef CONFIG_FPE_NWFPE_XP
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 150) static inline void storeExtended(const unsigned int Fn, unsigned int __user *pMem)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 151) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 152) 	FPA11 *fpa11 = GET_FPA11();
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 153) 	union {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 154) 		floatx80 f;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 155) 		unsigned int i[3];
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 156) 	} val;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 157) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 158) 	switch (fpa11->fType[Fn]) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 159) 	case typeSingle:
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 160) 		val.f = float32_to_floatx80(fpa11->fpreg[Fn].fSingle);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 161) 		break;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 162) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 163) 	case typeDouble:
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 164) 		val.f = float64_to_floatx80(fpa11->fpreg[Fn].fDouble);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 165) 		break;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 166) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 167) 	default:
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 168) 		val.f = fpa11->fpreg[Fn].fExtended;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 169) 	}
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 170) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 171) 	put_user(val.i[0], &pMem[0]);	/* sign & exp */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 172) #ifdef __ARMEB__
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 173) 	put_user(val.i[1], &pMem[1]);	/* msw */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 174) 	put_user(val.i[2], &pMem[2]);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 175) #else
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 176) 	put_user(val.i[1], &pMem[2]);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 177) 	put_user(val.i[2], &pMem[1]);	/* msw */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 178) #endif
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 179) }
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 180) #endif
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 181) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 182) static inline void storeMultiple(const unsigned int Fn, unsigned int __user *pMem)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 183) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 184) 	FPA11 *fpa11 = GET_FPA11();
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 185) 	register unsigned int nType, *p;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 186) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 187) 	p = (unsigned int *) &(fpa11->fpreg[Fn]);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 188) 	nType = fpa11->fType[Fn];
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 189) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 190) 	switch (nType) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 191) 	case typeSingle:
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 192) 	case typeDouble:
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 193) 		{
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 194) 			put_user(p[0], &pMem[2]);	/* single */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 195) 			put_user(p[1], &pMem[1]);	/* double msw */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 196) 			put_user(nType << 14, &pMem[0]);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 197) 		}
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 198) 		break;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 199) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 200) #ifdef CONFIG_FPE_NWFPE_XP
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 201) 	case typeExtended:
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 202) 		{
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 203) 			put_user(p[2], &pMem[1]);	/* msw */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 204) 			put_user(p[1], &pMem[2]);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 205) 			put_user((p[0] & 0x80003fff) | (nType << 14), &pMem[0]);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 206) 		}
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 207) 		break;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 208) #endif
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 209) 	}
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 210) }
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 211) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 212) unsigned int PerformLDF(const unsigned int opcode)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 213) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 214) 	unsigned int __user *pBase, *pAddress, *pFinal;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 215) 	unsigned int nRc = 1, write_back = WRITE_BACK(opcode);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 216) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 217) 	pBase = (unsigned int __user *) readRegister(getRn(opcode));
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 218) 	if (REG_PC == getRn(opcode)) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 219) 		pBase += 2;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 220) 		write_back = 0;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 221) 	}
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 222) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 223) 	pFinal = pBase;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 224) 	if (BIT_UP_SET(opcode))
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 225) 		pFinal += getOffset(opcode);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 226) 	else
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 227) 		pFinal -= getOffset(opcode);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 228) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 229) 	if (PREINDEXED(opcode))
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 230) 		pAddress = pFinal;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 231) 	else
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 232) 		pAddress = pBase;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 233) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 234) 	switch (opcode & MASK_TRANSFER_LENGTH) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 235) 	case TRANSFER_SINGLE:
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 236) 		loadSingle(getFd(opcode), pAddress);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 237) 		break;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 238) 	case TRANSFER_DOUBLE:
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 239) 		loadDouble(getFd(opcode), pAddress);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 240) 		break;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 241) #ifdef CONFIG_FPE_NWFPE_XP
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 242) 	case TRANSFER_EXTENDED:
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 243) 		loadExtended(getFd(opcode), pAddress);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 244) 		break;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 245) #endif
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 246) 	default:
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 247) 		nRc = 0;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 248) 	}
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 249) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 250) 	if (write_back)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 251) 		writeRegister(getRn(opcode), (unsigned long) pFinal);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 252) 	return nRc;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 253) }
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 254) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 255) unsigned int PerformSTF(const unsigned int opcode)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 256) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 257) 	unsigned int __user *pBase, *pAddress, *pFinal;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 258) 	unsigned int nRc = 1, write_back = WRITE_BACK(opcode);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 259) 	struct roundingData roundData;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 260) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 261) 	roundData.mode = SetRoundingMode(opcode);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 262) 	roundData.precision = SetRoundingPrecision(opcode);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 263) 	roundData.exception = 0;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 264) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 265) 	pBase = (unsigned int __user *) readRegister(getRn(opcode));
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 266) 	if (REG_PC == getRn(opcode)) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 267) 		pBase += 2;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 268) 		write_back = 0;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 269) 	}
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 270) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 271) 	pFinal = pBase;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 272) 	if (BIT_UP_SET(opcode))
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 273) 		pFinal += getOffset(opcode);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 274) 	else
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 275) 		pFinal -= getOffset(opcode);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 276) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 277) 	if (PREINDEXED(opcode))
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 278) 		pAddress = pFinal;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 279) 	else
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 280) 		pAddress = pBase;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 281) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 282) 	switch (opcode & MASK_TRANSFER_LENGTH) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 283) 	case TRANSFER_SINGLE:
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 284) 		storeSingle(&roundData, getFd(opcode), pAddress);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 285) 		break;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 286) 	case TRANSFER_DOUBLE:
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 287) 		storeDouble(&roundData, getFd(opcode), pAddress);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 288) 		break;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 289) #ifdef CONFIG_FPE_NWFPE_XP
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 290) 	case TRANSFER_EXTENDED:
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 291) 		storeExtended(getFd(opcode), pAddress);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 292) 		break;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 293) #endif
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 294) 	default:
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 295) 		nRc = 0;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 296) 	}
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 297) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 298) 	if (roundData.exception)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 299) 		float_raise(roundData.exception);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 300) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 301) 	if (write_back)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 302) 		writeRegister(getRn(opcode), (unsigned long) pFinal);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 303) 	return nRc;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 304) }
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 305) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 306) unsigned int PerformLFM(const unsigned int opcode)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 307) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 308) 	unsigned int __user *pBase, *pAddress, *pFinal;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 309) 	unsigned int i, Fd, write_back = WRITE_BACK(opcode);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 310) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 311) 	pBase = (unsigned int __user *) readRegister(getRn(opcode));
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 312) 	if (REG_PC == getRn(opcode)) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 313) 		pBase += 2;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 314) 		write_back = 0;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 315) 	}
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 316) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 317) 	pFinal = pBase;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 318) 	if (BIT_UP_SET(opcode))
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 319) 		pFinal += getOffset(opcode);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 320) 	else
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 321) 		pFinal -= getOffset(opcode);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 322) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 323) 	if (PREINDEXED(opcode))
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 324) 		pAddress = pFinal;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 325) 	else
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 326) 		pAddress = pBase;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 327) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 328) 	Fd = getFd(opcode);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 329) 	for (i = getRegisterCount(opcode); i > 0; i--) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 330) 		loadMultiple(Fd, pAddress);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 331) 		pAddress += 3;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 332) 		Fd++;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 333) 		if (Fd == 8)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 334) 			Fd = 0;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 335) 	}
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 336) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 337) 	if (write_back)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 338) 		writeRegister(getRn(opcode), (unsigned long) pFinal);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 339) 	return 1;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 340) }
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 341) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 342) unsigned int PerformSFM(const unsigned int opcode)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 343) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 344) 	unsigned int __user *pBase, *pAddress, *pFinal;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 345) 	unsigned int i, Fd, write_back = WRITE_BACK(opcode);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 346) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 347) 	pBase = (unsigned int __user *) readRegister(getRn(opcode));
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 348) 	if (REG_PC == getRn(opcode)) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 349) 		pBase += 2;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 350) 		write_back = 0;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 351) 	}
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 352) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 353) 	pFinal = pBase;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 354) 	if (BIT_UP_SET(opcode))
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 355) 		pFinal += getOffset(opcode);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 356) 	else
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 357) 		pFinal -= getOffset(opcode);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 358) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 359) 	if (PREINDEXED(opcode))
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 360) 		pAddress = pFinal;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 361) 	else
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 362) 		pAddress = pBase;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 363) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 364) 	Fd = getFd(opcode);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 365) 	for (i = getRegisterCount(opcode); i > 0; i--) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 366) 		storeMultiple(Fd, pAddress);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 367) 		pAddress += 3;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 368) 		Fd++;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 369) 		if (Fd == 8)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 370) 			Fd = 0;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 371) 	}
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 372) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 373) 	if (write_back)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 374) 		writeRegister(getRn(opcode), (unsigned long) pFinal);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 375) 	return 1;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 376) }
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 377) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 378) unsigned int EmulateCPDT(const unsigned int opcode)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 379) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 380) 	unsigned int nRc = 0;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 381) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 382) 	if (LDF_OP(opcode)) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 383) 		nRc = PerformLDF(opcode);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 384) 	} else if (LFM_OP(opcode)) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 385) 		nRc = PerformLFM(opcode);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 386) 	} else if (STF_OP(opcode)) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 387) 		nRc = PerformSTF(opcode);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 388) 	} else if (SFM_OP(opcode)) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 389) 		nRc = PerformSFM(opcode);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 390) 	} else {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 391) 		nRc = 0;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 392) 	}
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 393) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 394) 	return nRc;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 395) }