/* * linux/include/linux/math_emu.h * * (C) 1991 Linus Torvalds */ #ifndef _LINUX_MATH_EMU_H #define _LINUX_MATH_EMU_H #include struct info { long ___orig_eip; long ___ret_from_system_call; long ___ebx; long ___ecx; long ___edx; long ___esi; long ___edi; long ___ebp; long ___eax; long ___ds; long ___es; long ___fs; long ___gs; long ___orig_eax; long ___eip; long ___cs; long ___eflags; long ___esp; long ___ss; }; #define EAX (info->___eax) #define EBX (info->___ebx) #define ECX (info->___ecx) #define EDX (info->___edx) #define ESI (info->___esi) #define EDI (info->___edi) #define EBP (info->___ebp) #define ESP (info->___esp) #define EIP (info->___eip) #define ORIG_EIP (info->___orig_eip) #define EFLAGS (info->___eflags) #define DS (*(unsigned short *) &(info->___ds)) #define ES (*(unsigned short *) &(info->___es)) #define FS (*(unsigned short *) &(info->___fs)) #define CS (*(unsigned short *) &(info->___cs)) #define SS (*(unsigned short *) &(info->___ss)) void __math_abort(struct info *, unsigned int); #define math_abort(x,y) \ (((volatile void (*)(struct info *,unsigned int)) __math_abort)((x),(y))) /* * Gcc forces this stupid alignment problem: I want to use only two longs * for the temporary real 64-bit mantissa, but then gcc aligns out the * structure to 12 bytes which breaks things in math_emulate.c. Shit. I * want some kind of "no-alignt" pragma or something. */ typedef struct { long a,b; short exponent; } temp_real; typedef struct { short m0,m1,m2,m3; short exponent; } temp_real_unaligned; #define real_to_real(a,b) \ ((*(long long *) (b) = *(long long *) (a)),((b)->exponent = (a)->exponent)) typedef struct { long a,b; } long_real; typedef long short_real; typedef struct { long a,b; short sign; } temp_int; struct swd { int ie:1; int de:1; int ze:1; int oe:1; int ue:1; int pe:1; int sf:1; int ir:1; int c0:1; int c1:1; int c2:1; int top:3; int c3:1; int b:1; }; #define I387 (current->tss.i387) #define SWD (*(struct swd *) &I387.swd) #define ROUNDING ((I387.cwd >> 10) & 3) #define PRECISION ((I387.cwd >> 8) & 3) #define BITS24 0 #define BITS53 2 #define BITS64 3 #define ROUND_NEAREST 0 #define ROUND_DOWN 1 #define ROUND_UP 2 #define ROUND_0 3 #define CONSTZ (temp_real_unaligned) {0x0000,0x0000,0x0000,0x0000,0x0000} #define CONST1 (temp_real_unaligned) {0x0000,0x0000,0x0000,0x8000,0x3FFF} #define CONSTPI (temp_real_unaligned) {0xC235,0x2168,0xDAA2,0xC90F,0x4000} #define CONSTLN2 (temp_real_unaligned) {0x79AC,0xD1CF,0x17F7,0xB172,0x3FFE} #define CONSTLG2 (temp_real_unaligned) {0xF799,0xFBCF,0x9A84,0x9A20,0x3FFD} #define CONSTL2E (temp_real_unaligned) {0xF0BC,0x5C17,0x3B29,0xB8AA,0x3FFF} #define CONSTL2T (temp_real_unaligned) {0x8AFE,0xCD1B,0x784B,0xD49A,0x4000} #define set_IE() (I387.swd |= 1) #define set_DE() (I387.swd |= 2) #define set_ZE() (I387.swd |= 4) #define set_OE() (I387.swd |= 8) #define set_UE() (I387.swd |= 16) #define set_PE() (I387.swd |= 32) #define set_C0() (I387.swd |= 0x0100) #define set_C1() (I387.swd |= 0x0200) #define set_C2() (I387.swd |= 0x0400) #define set_C3() (I387.swd |= 0x4000) /* ea.c */ char * ea(struct info * __info, unsigned short __code); /* convert.c */ void frndint(const temp_real * __a, temp_real * __b); void short_to_temp(const short_real * __a, temp_real * __b); void long_to_temp(const long_real * __a, temp_real * __b); void temp_to_short(const temp_real * __a, short_real * __b); void temp_to_long(const temp_real * __a, long_real * __b); void real_to_int(const temp_real * __a, temp_int * __b); void int_to_real(const temp_int * __a, temp_real * __b); /* get_put.c */ void get_short_real(temp_real *, struct info *, unsigned short); void get_long_real(temp_real *, struct info *, unsigned short); void get_temp_real(temp_real *, struct info *, unsigned short); void get_short_int(temp_real *, struct info *, unsigned short); void get_long_int(temp_real *, struct info *, unsigned short); void get_longlong_int(temp_real *, struct info *, unsigned short); void get_BCD(temp_real *, struct info *, unsigned short); void put_short_real(const temp_real *, struct info *, unsigned short); void put_long_real(const temp_real *, struct info *, unsigned short); void put_temp_real(const temp_real *, struct info *, unsigned short); void put_short_int(const temp_real *, struct info *, unsigned short); void put_long_int(const temp_real *, struct info *, unsigned short); void put_longlong_int(const temp_real *, struct info *, unsigned short); void put_BCD(const temp_real *, struct info *, unsigned short); /* add.c */ void fadd(const temp_real *, const temp_real *, temp_real *); /* mul.c */ void fmul(const temp_real *, const temp_real *, temp_real *); /* div.c */ void fdiv(const temp_real *, const temp_real *, temp_real *); /* compare.c */ void fcom(const temp_real *, const temp_real *); void fucom(const temp_real *, const temp_real *); void ftst(const temp_real *); #endif
