math-emu.h (6897B)
1/* SPDX-License-Identifier: GPL-2.0 */ 2#ifndef _ASM_M68K_SETUP_H 3#define _ASM_M68K_SETUP_H 4 5#include <asm/setup.h> 6#include <linux/linkage.h> 7 8/* Status Register bits */ 9 10/* accrued exception bits */ 11#define FPSR_AEXC_INEX 3 12#define FPSR_AEXC_DZ 4 13#define FPSR_AEXC_UNFL 5 14#define FPSR_AEXC_OVFL 6 15#define FPSR_AEXC_IOP 7 16 17/* exception status bits */ 18#define FPSR_EXC_INEX1 8 19#define FPSR_EXC_INEX2 9 20#define FPSR_EXC_DZ 10 21#define FPSR_EXC_UNFL 11 22#define FPSR_EXC_OVFL 12 23#define FPSR_EXC_OPERR 13 24#define FPSR_EXC_SNAN 14 25#define FPSR_EXC_BSUN 15 26 27/* quotient byte, assumes big-endian, of course */ 28#define FPSR_QUOTIENT(fpsr) (*((signed char *) &(fpsr) + 1)) 29 30/* condition code bits */ 31#define FPSR_CC_NAN 24 32#define FPSR_CC_INF 25 33#define FPSR_CC_Z 26 34#define FPSR_CC_NEG 27 35 36 37/* Control register bits */ 38 39/* rounding mode */ 40#define FPCR_ROUND_RN 0 /* round to nearest/even */ 41#define FPCR_ROUND_RZ 1 /* round to zero */ 42#define FPCR_ROUND_RM 2 /* minus infinity */ 43#define FPCR_ROUND_RP 3 /* plus infinity */ 44 45/* rounding precision */ 46#define FPCR_PRECISION_X 0 /* long double */ 47#define FPCR_PRECISION_S 1 /* double */ 48#define FPCR_PRECISION_D 2 /* float */ 49 50 51/* Flags to select the debugging output */ 52#define PDECODE 0 53#define PEXECUTE 1 54#define PCONV 2 55#define PNORM 3 56#define PREGISTER 4 57#define PINSTR 5 58#define PUNIMPL 6 59#define PMOVEM 7 60 61#define PMDECODE (1<<PDECODE) 62#define PMEXECUTE (1<<PEXECUTE) 63#define PMCONV (1<<PCONV) 64#define PMNORM (1<<PNORM) 65#define PMREGISTER (1<<PREGISTER) 66#define PMINSTR (1<<PINSTR) 67#define PMUNIMPL (1<<PUNIMPL) 68#define PMMOVEM (1<<PMOVEM) 69 70#ifndef __ASSEMBLY__ 71 72#include <linux/kernel.h> 73#include <linux/sched.h> 74 75union fp_mant64 { 76 unsigned long long m64; 77 unsigned long m32[2]; 78}; 79 80union fp_mant128 { 81 unsigned long long m64[2]; 82 unsigned long m32[4]; 83}; 84 85/* internal representation of extended fp numbers */ 86struct fp_ext { 87 unsigned char lowmant; 88 unsigned char sign; 89 unsigned short exp; 90 union fp_mant64 mant; 91}; 92 93/* C representation of FPU registers */ 94/* NOTE: if you change this, you have to change the assembler offsets 95 below and the size in <asm/fpu.h>, too */ 96struct fp_data { 97 struct fp_ext fpreg[8]; 98 unsigned int fpcr; 99 unsigned int fpsr; 100 unsigned int fpiar; 101 unsigned short prec; 102 unsigned short rnd; 103 struct fp_ext temp[2]; 104}; 105 106#ifdef FPU_EMU_DEBUG 107extern unsigned int fp_debugprint; 108 109#define dprint(bit, fmt, ...) ({ \ 110 if (fp_debugprint & (1 << (bit))) \ 111 pr_info(fmt, ##__VA_ARGS__); \ 112}) 113#else 114#define dprint(bit, fmt, ...) no_printk(fmt, ##__VA_ARGS__) 115#endif 116 117#define uprint(str) ({ \ 118 static int __count = 3; \ 119 \ 120 if (__count > 0) { \ 121 pr_err("You just hit an unimplemented " \ 122 "fpu instruction (%s)\n", str); \ 123 pr_err("Please report this to ....\n"); \ 124 __count--; \ 125 } \ 126}) 127 128#define FPDATA ((struct fp_data *)current->thread.fp) 129 130#else /* __ASSEMBLY__ */ 131 132#define FPDATA %a2 133 134/* offsets from the base register to the floating point data in the task struct */ 135#define FPD_FPREG (TASK_THREAD+THREAD_FPREG+0) 136#define FPD_FPCR (TASK_THREAD+THREAD_FPREG+96) 137#define FPD_FPSR (TASK_THREAD+THREAD_FPREG+100) 138#define FPD_FPIAR (TASK_THREAD+THREAD_FPREG+104) 139#define FPD_PREC (TASK_THREAD+THREAD_FPREG+108) 140#define FPD_RND (TASK_THREAD+THREAD_FPREG+110) 141#define FPD_TEMPFP1 (TASK_THREAD+THREAD_FPREG+112) 142#define FPD_TEMPFP2 (TASK_THREAD+THREAD_FPREG+124) 143#define FPD_SIZEOF (TASK_THREAD+THREAD_FPREG+136) 144 145/* offsets on the stack to access saved registers, 146 * these are only used during instruction decoding 147 * where we always know how deep we're on the stack. 148 */ 149#define FPS_DO (PT_OFF_D0) 150#define FPS_D1 (PT_OFF_D1) 151#define FPS_D2 (PT_OFF_D2) 152#define FPS_A0 (PT_OFF_A0) 153#define FPS_A1 (PT_OFF_A1) 154#define FPS_A2 (PT_OFF_A2) 155#define FPS_SR (PT_OFF_SR) 156#define FPS_PC (PT_OFF_PC) 157#define FPS_EA (PT_OFF_PC+6) 158#define FPS_PC2 (PT_OFF_PC+10) 159 160.macro fp_get_fp_reg 161 lea (FPD_FPREG,FPDATA,%d0.w*4),%a0 162 lea (%a0,%d0.w*8),%a0 163.endm 164 165/* Macros used to get/put the current program counter. 166 * 020/030 use a different stack frame then 040/060, for the 167 * 040/060 the return pc points already to the next location, 168 * so this only needs to be modified for jump instructions. 169 */ 170.macro fp_get_pc dest 171 move.l (FPS_PC+4,%sp),\dest 172.endm 173 174.macro fp_put_pc src,jump=0 175 move.l \src,(FPS_PC+4,%sp) 176.endm 177 178.macro fp_get_instr_data f,s,dest,label 179 getuser \f,%sp@(FPS_PC+4)@(0),\dest,\label,%sp@(FPS_PC+4) 180 addq.l #\s,%sp@(FPS_PC+4) 181.endm 182 183.macro fp_get_instr_word dest,label,addr 184 fp_get_instr_data w,2,\dest,\label,\addr 185.endm 186 187.macro fp_get_instr_long dest,label,addr 188 fp_get_instr_data l,4,\dest,\label,\addr 189.endm 190 191/* These macros are used to read from/write to user space 192 * on error we jump to the fixup section, load the fault 193 * address into %a0 and jump to the exit. 194 * (derived from <asm/uaccess.h>) 195 */ 196.macro getuser size,src,dest,label,addr 197| printf ,"[\size<%08x]",1,\addr 198.Lu1\@: moves\size \src,\dest 199 200 .section .fixup,"ax" 201 .even 202.Lu2\@: move.l \addr,%a0 203 jra \label 204 .previous 205 206 .section __ex_table,"a" 207 .align 4 208 .long .Lu1\@,.Lu2\@ 209 .previous 210.endm 211 212.macro putuser size,src,dest,label,addr 213| printf ,"[\size>%08x]",1,\addr 214.Lu1\@: moves\size \src,\dest 215.Lu2\@: 216 217 .section .fixup,"ax" 218 .even 219.Lu3\@: move.l \addr,%a0 220 jra \label 221 .previous 222 223 .section __ex_table,"a" 224 .align 4 225 .long .Lu1\@,.Lu3\@ 226 .long .Lu2\@,.Lu3\@ 227 .previous 228.endm 229 230/* work around binutils idiocy */ 231old_gas=-1 232.irp gas_ident.x .x 233old_gas=old_gas+1 234.endr 235.if !old_gas 236.irp m b,w,l 237.macro getuser.\m src,dest,label,addr 238 getuser .\m,\src,\dest,\label,\addr 239.endm 240.macro putuser.\m src,dest,label,addr 241 putuser .\m,\src,\dest,\label,\addr 242.endm 243.endr 244.endif 245 246.macro movestack nr,arg1,arg2,arg3,arg4,arg5 247 .if \nr 248 movestack (\nr-1),\arg2,\arg3,\arg4,\arg5 249 move.l \arg1,-(%sp) 250 .endif 251.endm 252 253.macro printf bit=-1,string,nr=0,arg1,arg2,arg3,arg4,arg5 254#ifdef FPU_EMU_DEBUG 255 .data 256.Lpdata\@: 257 .string "\string" 258 .previous 259 260 movem.l %d0/%d1/%a0/%a1,-(%sp) 261 .if \bit+1 262#if 0 263 moveq #\bit,%d0 264 andw #7,%d0 265 btst %d0,fp_debugprint+((31-\bit)/8) 266#else 267 btst #\bit,fp_debugprint+((31-\bit)/8) 268#endif 269 jeq .Lpskip\@ 270 .endif 271 movestack \nr,\arg1,\arg2,\arg3,\arg4,\arg5 272 pea .Lpdata\@ 273 jsr printk 274 lea ((\nr+1)*4,%sp),%sp 275.Lpskip\@: 276 movem.l (%sp)+,%d0/%d1/%a0/%a1 277#endif 278.endm 279 280.macro printx bit,fp 281#ifdef FPU_EMU_DEBUG 282 movem.l %d0/%a0,-(%sp) 283 lea \fp,%a0 284#if 0 285 moveq #'+',%d0 286 tst.w (%a0) 287 jeq .Lx1\@ 288 moveq #'-',%d0 289.Lx1\@: printf \bit," %c",1,%d0 290 move.l (4,%a0),%d0 291 bclr #31,%d0 292 jne .Lx2\@ 293 printf \bit,"0." 294 jra .Lx3\@ 295.Lx2\@: printf \bit,"1." 296.Lx3\@: printf \bit,"%08x%08x",2,%d0,%a0@(8) 297 move.w (2,%a0),%d0 298 ext.l %d0 299 printf \bit,"E%04x",1,%d0 300#else 301 printf \bit," %08x%08x%08x",3,%a0@,%a0@(4),%a0@(8) 302#endif 303 movem.l (%sp)+,%d0/%a0 304#endif 305.endm 306 307.macro debug instr,args 308#ifdef FPU_EMU_DEBUG 309 \instr \args 310#endif 311.endm 312 313 314#endif /* __ASSEMBLY__ */ 315 316#endif /* _ASM_M68K_SETUP_H */