xref: /qemu/linux-user/arm/nwfpe/fpopcode.c (revision 70539e18)
13ebdd119Saurel32 /*
23ebdd119Saurel32     NetWinder Floating Point Emulator
33ebdd119Saurel32     (c) Rebel.COM, 1998,1999
43ebdd119Saurel32 
53ebdd119Saurel32     Direct questions, comments to Scott Bambrough <scottb@netwinder.org>
63ebdd119Saurel32 
73ebdd119Saurel32     This program is free software; you can redistribute it and/or modify
83ebdd119Saurel32     it under the terms of the GNU General Public License as published by
93ebdd119Saurel32     the Free Software Foundation; either version 2 of the License, or
103ebdd119Saurel32     (at your option) any later version.
113ebdd119Saurel32 
123ebdd119Saurel32     This program is distributed in the hope that it will be useful,
133ebdd119Saurel32     but WITHOUT ANY WARRANTY; without even the implied warranty of
143ebdd119Saurel32     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
153ebdd119Saurel32     GNU General Public License for more details.
163ebdd119Saurel32 
173ebdd119Saurel32     You should have received a copy of the GNU General Public License
18*70539e18SBlue Swirl     along with this program; if not, see <http://www.gnu.org/licenses/>.
193ebdd119Saurel32 */
203ebdd119Saurel32 
213ebdd119Saurel32 #include "fpa11.h"
223ebdd119Saurel32 #include "softfloat.h"
233ebdd119Saurel32 #include "fpopcode.h"
243ebdd119Saurel32 #include "fpsr.h"
253ebdd119Saurel32 //#include "fpmodule.h"
263ebdd119Saurel32 //#include "fpmodule.inl"
273ebdd119Saurel32 
283ebdd119Saurel32 const floatx80 floatx80Constant[] = {
293ebdd119Saurel32   { 0x0000000000000000ULL, 0x0000},	/* extended 0.0 */
303ebdd119Saurel32   { 0x8000000000000000ULL, 0x3fff},	/* extended 1.0 */
313ebdd119Saurel32   { 0x8000000000000000ULL, 0x4000},	/* extended 2.0 */
323ebdd119Saurel32   { 0xc000000000000000ULL, 0x4000},	/* extended 3.0 */
333ebdd119Saurel32   { 0x8000000000000000ULL, 0x4001},	/* extended 4.0 */
343ebdd119Saurel32   { 0xa000000000000000ULL, 0x4001},	/* extended 5.0 */
353ebdd119Saurel32   { 0x8000000000000000ULL, 0x3ffe},	/* extended 0.5 */
363ebdd119Saurel32   { 0xa000000000000000ULL, 0x4002}	/* extended 10.0 */
373ebdd119Saurel32 };
383ebdd119Saurel32 
393ebdd119Saurel32 const float64 float64Constant[] = {
403ebdd119Saurel32   0x0000000000000000ULL,		/* double 0.0 */
413ebdd119Saurel32   0x3ff0000000000000ULL,		/* double 1.0 */
423ebdd119Saurel32   0x4000000000000000ULL,		/* double 2.0 */
433ebdd119Saurel32   0x4008000000000000ULL,		/* double 3.0 */
443ebdd119Saurel32   0x4010000000000000ULL,		/* double 4.0 */
453ebdd119Saurel32   0x4014000000000000ULL,		/* double 5.0 */
463ebdd119Saurel32   0x3fe0000000000000ULL,		/* double 0.5 */
473ebdd119Saurel32   0x4024000000000000ULL			/* double 10.0 */
483ebdd119Saurel32 };
493ebdd119Saurel32 
503ebdd119Saurel32 const float32 float32Constant[] = {
513ebdd119Saurel32   0x00000000,				/* single 0.0 */
523ebdd119Saurel32   0x3f800000,				/* single 1.0 */
533ebdd119Saurel32   0x40000000,				/* single 2.0 */
543ebdd119Saurel32   0x40400000,				/* single 3.0 */
553ebdd119Saurel32   0x40800000,				/* single 4.0 */
563ebdd119Saurel32   0x40a00000,				/* single 5.0 */
573ebdd119Saurel32   0x3f000000,				/* single 0.5 */
583ebdd119Saurel32   0x41200000				/* single 10.0 */
593ebdd119Saurel32 };
603ebdd119Saurel32 
613ebdd119Saurel32 unsigned int getRegisterCount(const unsigned int opcode)
623ebdd119Saurel32 {
633ebdd119Saurel32   unsigned int nRc;
643ebdd119Saurel32 
653ebdd119Saurel32   switch (opcode & MASK_REGISTER_COUNT)
663ebdd119Saurel32   {
673ebdd119Saurel32     case 0x00000000: nRc = 4; break;
683ebdd119Saurel32     case 0x00008000: nRc = 1; break;
693ebdd119Saurel32     case 0x00400000: nRc = 2; break;
703ebdd119Saurel32     case 0x00408000: nRc = 3; break;
713ebdd119Saurel32     default: nRc = 0;
723ebdd119Saurel32   }
733ebdd119Saurel32 
743ebdd119Saurel32   return(nRc);
753ebdd119Saurel32 }
763ebdd119Saurel32 
773ebdd119Saurel32 unsigned int getDestinationSize(const unsigned int opcode)
783ebdd119Saurel32 {
793ebdd119Saurel32   unsigned int nRc;
803ebdd119Saurel32 
813ebdd119Saurel32   switch (opcode & MASK_DESTINATION_SIZE)
823ebdd119Saurel32   {
833ebdd119Saurel32     case 0x00000000: nRc = typeSingle; break;
843ebdd119Saurel32     case 0x00000080: nRc = typeDouble; break;
853ebdd119Saurel32     case 0x00080000: nRc = typeExtended; break;
863ebdd119Saurel32     default: nRc = typeNone;
873ebdd119Saurel32   }
883ebdd119Saurel32 
893ebdd119Saurel32   return(nRc);
903ebdd119Saurel32 }
913ebdd119Saurel32 
923ebdd119Saurel32 /* condition code lookup table
933ebdd119Saurel32  index into the table is test code: EQ, NE, ... LT, GT, AL, NV
943ebdd119Saurel32  bit position in short is condition code: NZCV */
953ebdd119Saurel32 static const unsigned short aCC[16] = {
963ebdd119Saurel32     0xF0F0, // EQ == Z set
973ebdd119Saurel32     0x0F0F, // NE
983ebdd119Saurel32     0xCCCC, // CS == C set
993ebdd119Saurel32     0x3333, // CC
1003ebdd119Saurel32     0xFF00, // MI == N set
1013ebdd119Saurel32     0x00FF, // PL
1023ebdd119Saurel32     0xAAAA, // VS == V set
1033ebdd119Saurel32     0x5555, // VC
1043ebdd119Saurel32     0x0C0C, // HI == C set && Z clear
1053ebdd119Saurel32     0xF3F3, // LS == C clear || Z set
1063ebdd119Saurel32     0xAA55, // GE == (N==V)
1073ebdd119Saurel32     0x55AA, // LT == (N!=V)
1083ebdd119Saurel32     0x0A05, // GT == (!Z && (N==V))
1093ebdd119Saurel32     0xF5FA, // LE == (Z || (N!=V))
1103ebdd119Saurel32     0xFFFF, // AL always
1113ebdd119Saurel32     0 // NV
1123ebdd119Saurel32 };
113