mirror of
https://github.com/adulau/aha.git
synced 2024-12-30 20:56:23 +00:00
38135614dd
Recent as(1) doesn't think that . terminates a macro name, so getuser.l is _not_ treated as invoking getuser with .l as the first argument. arch/m68k/math-emu relies on old behaviour, so it gets a lot of undefined macros with more or less current binutils. Note that this behaviour remains in all recent versions and is unrelated to another binutils problems we used to have for a while (having (%a0)+ parsed as two arguments). This one is there to stay; it's an intentional and documented change. .irp <identifier> <words> [text] .endr expands to a copy of text per each word, with \<identifier> replaced with corresponding word. Again, what happens depends on whether gas_ident.x is treated as one or as two tokens; in the former case we'll get old_gas incremented once, in the latter - twice. The rest is obvious. Unlike .macro argument list _anything_ is explicitly allowed after .irp <identifier>; here we are on very safe ground. And yes, it does work with all gas variants I've got here (including vanilla 2.15, 2.16, 2.16.1 and 2.17, plus debian and FC binutils). Signed-off-by: Al Viro <viro@zeniv.linux.org.uk> Cc: Roman Zippel <zippel@linux-m68k.org> Cc: Geert Uytterhoeven <geert@linux-m68k.org> Signed-off-by: Andrew Morton <akpm@linux-foundation.org> Signed-off-by: Linus Torvalds <torvalds@linux-foundation.org>
315 lines
6.6 KiB
C
315 lines
6.6 KiB
C
#ifndef _ASM_M68K_SETUP_H
|
|
#define _ASM_M68K_SETUP_H
|
|
|
|
#include <asm/setup.h>
|
|
#include <linux/linkage.h>
|
|
|
|
/* Status Register bits */
|
|
|
|
/* accrued exception bits */
|
|
#define FPSR_AEXC_INEX 3
|
|
#define FPSR_AEXC_DZ 4
|
|
#define FPSR_AEXC_UNFL 5
|
|
#define FPSR_AEXC_OVFL 6
|
|
#define FPSR_AEXC_IOP 7
|
|
|
|
/* exception status bits */
|
|
#define FPSR_EXC_INEX1 8
|
|
#define FPSR_EXC_INEX2 9
|
|
#define FPSR_EXC_DZ 10
|
|
#define FPSR_EXC_UNFL 11
|
|
#define FPSR_EXC_OVFL 12
|
|
#define FPSR_EXC_OPERR 13
|
|
#define FPSR_EXC_SNAN 14
|
|
#define FPSR_EXC_BSUN 15
|
|
|
|
/* quotient byte, assumes big-endian, of course */
|
|
#define FPSR_QUOTIENT(fpsr) (*((signed char *) &(fpsr) + 1))
|
|
|
|
/* condition code bits */
|
|
#define FPSR_CC_NAN 24
|
|
#define FPSR_CC_INF 25
|
|
#define FPSR_CC_Z 26
|
|
#define FPSR_CC_NEG 27
|
|
|
|
|
|
/* Control register bits */
|
|
|
|
/* rounding mode */
|
|
#define FPCR_ROUND_RN 0 /* round to nearest/even */
|
|
#define FPCR_ROUND_RZ 1 /* round to zero */
|
|
#define FPCR_ROUND_RM 2 /* minus infinity */
|
|
#define FPCR_ROUND_RP 3 /* plus infinity */
|
|
|
|
/* rounding precision */
|
|
#define FPCR_PRECISION_X 0 /* long double */
|
|
#define FPCR_PRECISION_S 1 /* double */
|
|
#define FPCR_PRECISION_D 2 /* float */
|
|
|
|
|
|
/* Flags to select the debugging output */
|
|
#define PDECODE 0
|
|
#define PEXECUTE 1
|
|
#define PCONV 2
|
|
#define PNORM 3
|
|
#define PREGISTER 4
|
|
#define PINSTR 5
|
|
#define PUNIMPL 6
|
|
#define PMOVEM 7
|
|
|
|
#define PMDECODE (1<<PDECODE)
|
|
#define PMEXECUTE (1<<PEXECUTE)
|
|
#define PMCONV (1<<PCONV)
|
|
#define PMNORM (1<<PNORM)
|
|
#define PMREGISTER (1<<PREGISTER)
|
|
#define PMINSTR (1<<PINSTR)
|
|
#define PMUNIMPL (1<<PUNIMPL)
|
|
#define PMMOVEM (1<<PMOVEM)
|
|
|
|
#ifndef __ASSEMBLY__
|
|
|
|
#include <linux/kernel.h>
|
|
#include <linux/sched.h>
|
|
|
|
union fp_mant64 {
|
|
unsigned long long m64;
|
|
unsigned long m32[2];
|
|
};
|
|
|
|
union fp_mant128 {
|
|
unsigned long long m64[2];
|
|
unsigned long m32[4];
|
|
};
|
|
|
|
/* internal representation of extended fp numbers */
|
|
struct fp_ext {
|
|
unsigned char lowmant;
|
|
unsigned char sign;
|
|
unsigned short exp;
|
|
union fp_mant64 mant;
|
|
};
|
|
|
|
/* C representation of FPU registers */
|
|
/* NOTE: if you change this, you have to change the assembler offsets
|
|
below and the size in <asm/fpu.h>, too */
|
|
struct fp_data {
|
|
struct fp_ext fpreg[8];
|
|
unsigned int fpcr;
|
|
unsigned int fpsr;
|
|
unsigned int fpiar;
|
|
unsigned short prec;
|
|
unsigned short rnd;
|
|
struct fp_ext temp[2];
|
|
};
|
|
|
|
#ifdef FPU_EMU_DEBUG
|
|
extern unsigned int fp_debugprint;
|
|
|
|
#define dprint(bit, fmt, args...) ({ \
|
|
if (fp_debugprint & (1 << (bit))) \
|
|
printk(fmt, ## args); \
|
|
})
|
|
#else
|
|
#define dprint(bit, fmt, args...)
|
|
#endif
|
|
|
|
#define uprint(str) ({ \
|
|
static int __count = 3; \
|
|
\
|
|
if (__count > 0) { \
|
|
printk("You just hit an unimplemented " \
|
|
"fpu instruction (%s)\n", str); \
|
|
printk("Please report this to ....\n"); \
|
|
__count--; \
|
|
} \
|
|
})
|
|
|
|
#define FPDATA ((struct fp_data *)current->thread.fp)
|
|
|
|
#else /* __ASSEMBLY__ */
|
|
|
|
#define FPDATA %a2
|
|
|
|
/* offsets from the base register to the floating point data in the task struct */
|
|
#define FPD_FPREG (TASK_THREAD+THREAD_FPREG+0)
|
|
#define FPD_FPCR (TASK_THREAD+THREAD_FPREG+96)
|
|
#define FPD_FPSR (TASK_THREAD+THREAD_FPREG+100)
|
|
#define FPD_FPIAR (TASK_THREAD+THREAD_FPREG+104)
|
|
#define FPD_PREC (TASK_THREAD+THREAD_FPREG+108)
|
|
#define FPD_RND (TASK_THREAD+THREAD_FPREG+110)
|
|
#define FPD_TEMPFP1 (TASK_THREAD+THREAD_FPREG+112)
|
|
#define FPD_TEMPFP2 (TASK_THREAD+THREAD_FPREG+124)
|
|
#define FPD_SIZEOF (TASK_THREAD+THREAD_FPREG+136)
|
|
|
|
/* offsets on the stack to access saved registers,
|
|
* these are only used during instruction decoding
|
|
* where we always know how deep we're on the stack.
|
|
*/
|
|
#define FPS_DO (PT_D0)
|
|
#define FPS_D1 (PT_D1)
|
|
#define FPS_D2 (PT_D2)
|
|
#define FPS_A0 (PT_A0)
|
|
#define FPS_A1 (PT_A1)
|
|
#define FPS_A2 (PT_A2)
|
|
#define FPS_SR (PT_SR)
|
|
#define FPS_PC (PT_PC)
|
|
#define FPS_EA (PT_PC+6)
|
|
#define FPS_PC2 (PT_PC+10)
|
|
|
|
.macro fp_get_fp_reg
|
|
lea (FPD_FPREG,FPDATA,%d0.w*4),%a0
|
|
lea (%a0,%d0.w*8),%a0
|
|
.endm
|
|
|
|
/* Macros used to get/put the current program counter.
|
|
* 020/030 use a different stack frame then 040/060, for the
|
|
* 040/060 the return pc points already to the next location,
|
|
* so this only needs to be modified for jump instructions.
|
|
*/
|
|
.macro fp_get_pc dest
|
|
move.l (FPS_PC+4,%sp),\dest
|
|
.endm
|
|
|
|
.macro fp_put_pc src,jump=0
|
|
move.l \src,(FPS_PC+4,%sp)
|
|
.endm
|
|
|
|
.macro fp_get_instr_data f,s,dest,label
|
|
getuser \f,%sp@(FPS_PC+4)@(0),\dest,\label,%sp@(FPS_PC+4)
|
|
addq.l #\s,%sp@(FPS_PC+4)
|
|
.endm
|
|
|
|
.macro fp_get_instr_word dest,label,addr
|
|
fp_get_instr_data w,2,\dest,\label,\addr
|
|
.endm
|
|
|
|
.macro fp_get_instr_long dest,label,addr
|
|
fp_get_instr_data l,4,\dest,\label,\addr
|
|
.endm
|
|
|
|
/* These macros are used to read from/write to user space
|
|
* on error we jump to the fixup section, load the fault
|
|
* address into %a0 and jump to the exit.
|
|
* (derived from <asm/uaccess.h>)
|
|
*/
|
|
.macro getuser size,src,dest,label,addr
|
|
| printf ,"[\size<%08x]",1,\addr
|
|
.Lu1\@: moves\size \src,\dest
|
|
|
|
.section .fixup,"ax"
|
|
.even
|
|
.Lu2\@: move.l \addr,%a0
|
|
jra \label
|
|
.previous
|
|
|
|
.section __ex_table,"a"
|
|
.align 4
|
|
.long .Lu1\@,.Lu2\@
|
|
.previous
|
|
.endm
|
|
|
|
.macro putuser size,src,dest,label,addr
|
|
| printf ,"[\size>%08x]",1,\addr
|
|
.Lu1\@: moves\size \src,\dest
|
|
.Lu2\@:
|
|
|
|
.section .fixup,"ax"
|
|
.even
|
|
.Lu3\@: move.l \addr,%a0
|
|
jra \label
|
|
.previous
|
|
|
|
.section __ex_table,"a"
|
|
.align 4
|
|
.long .Lu1\@,.Lu3\@
|
|
.long .Lu2\@,.Lu3\@
|
|
.previous
|
|
.endm
|
|
|
|
/* work around binutils idiocy */
|
|
old_gas=-1
|
|
.irp gas_ident.x .x
|
|
old_gas=old_gas+1
|
|
.endr
|
|
.if !old_gas
|
|
.irp m b,w,l
|
|
.macro getuser.\m src,dest,label,addr
|
|
getuser .\m,\src,\dest,\label,\addr
|
|
.endm
|
|
.macro putuser.\m src,dest,label,addr
|
|
putuser .\m,\src,\dest,\label,\addr
|
|
.endm
|
|
.endr
|
|
.endif
|
|
|
|
.macro movestack nr,arg1,arg2,arg3,arg4,arg5
|
|
.if \nr
|
|
movestack (\nr-1),\arg2,\arg3,\arg4,\arg5
|
|
move.l \arg1,-(%sp)
|
|
.endif
|
|
.endm
|
|
|
|
.macro printf bit=-1,string,nr=0,arg1,arg2,arg3,arg4,arg5
|
|
#ifdef FPU_EMU_DEBUG
|
|
.data
|
|
.Lpdata\@:
|
|
.string "\string"
|
|
.previous
|
|
|
|
movem.l %d0/%d1/%a0/%a1,-(%sp)
|
|
.if \bit+1
|
|
#if 0
|
|
moveq #\bit,%d0
|
|
andw #7,%d0
|
|
btst %d0,fp_debugprint+((31-\bit)/8)
|
|
#else
|
|
btst #\bit,fp_debugprint+((31-\bit)/8)
|
|
#endif
|
|
jeq .Lpskip\@
|
|
.endif
|
|
movestack \nr,\arg1,\arg2,\arg3,\arg4,\arg5
|
|
pea .Lpdata\@
|
|
jsr printk
|
|
lea ((\nr+1)*4,%sp),%sp
|
|
.Lpskip\@:
|
|
movem.l (%sp)+,%d0/%d1/%a0/%a1
|
|
#endif
|
|
.endm
|
|
|
|
.macro printx bit,fp
|
|
#ifdef FPU_EMU_DEBUG
|
|
movem.l %d0/%a0,-(%sp)
|
|
lea \fp,%a0
|
|
#if 0
|
|
moveq #'+',%d0
|
|
tst.w (%a0)
|
|
jeq .Lx1\@
|
|
moveq #'-',%d0
|
|
.Lx1\@: printf \bit," %c",1,%d0
|
|
move.l (4,%a0),%d0
|
|
bclr #31,%d0
|
|
jne .Lx2\@
|
|
printf \bit,"0."
|
|
jra .Lx3\@
|
|
.Lx2\@: printf \bit,"1."
|
|
.Lx3\@: printf \bit,"%08x%08x",2,%d0,%a0@(8)
|
|
move.w (2,%a0),%d0
|
|
ext.l %d0
|
|
printf \bit,"E%04x",1,%d0
|
|
#else
|
|
printf \bit," %08x%08x%08x",3,%a0@,%a0@(4),%a0@(8)
|
|
#endif
|
|
movem.l (%sp)+,%d0/%a0
|
|
#endif
|
|
.endm
|
|
|
|
.macro debug instr,args
|
|
#ifdef FPU_EMU_DEBUG
|
|
\instr \args
|
|
#endif
|
|
.endm
|
|
|
|
|
|
#endif /* __ASSEMBLY__ */
|
|
|
|
#endif /* _ASM_M68K_SETUP_H */
|