/* $XConsortium: assyntax.h,v 1.2 95/01/05 20:43:31 kaleb Exp $ */ /* $XFree86: xc/programs/Xserver/hw/xfree86/os-support/assyntax.h,v 3.4 1995/06/02 10:17:30 dawes Exp $ */ #ifndef __ASSYNTAX_H__ #define __ASSYNTAX_H__ /* * Copyright 1992 Vrije Universiteit, The Netherlands * * Permission to use, copy, modify, and distribute this software and its * documentation for any purpose and without fee is hereby granted, provided * that the above copyright notice appear in all copies and that both that * copyright notice and this permission notice appear in supporting * documentation, and that the name of the Vrije Universiteit not be used in * advertising or publicity pertaining to distribution of the software without * specific, written prior permission. The Vrije Universiteit makes no * representations about the suitability of this software for any purpose. * It is provided "as is" without express or implied warranty. * * The Vrije Universiteit DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO * EVENT SHALL The Vrije Universiteit BE LIABLE FOR ANY SPECIAL, INDIRECT OR * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR * PERFORMANCE OF THIS SOFTWARE. */ /* * assyntax.h * * Select the syntax appropriate to the 386 assembler being used * To add support for more assemblers add more columns to the CHOICE * macro. Note that register names must also have uppercase names * to avoid macro recursion. e.g., #define ah %ah recurses! * * NB 1. Some of the macros for certain assemblers imply that the code is to * run in protected mode!! Caveat emptor. * * NB 2. 486 specific instructions are not included. This is to discourage * their accidental use in code that is intended to run on 386 and 486 * systems. * * Supported assemblers: * * (a) AT&T SysVr4 as(1): default * (b) GNU Assembler gas: define USE_GAS or GNU_ASSEMBLER * (c) Amsterdam Compiler kit: define ACK_ASSEMBLER * * The following naming conventions have been used to identify the various * data types: * _SR = segment register version * Integer: * _Q = quadword = 64 bits * _L = long = 32 bits * _W = short = 16 bits * _B = byte = 8 bits * Floating-point: * _X = m80real = 80 bits * _D = double = 64 bits * _S = single = 32 bits * * Author: Gregory J. Sharp, Sept 1992 * Vrije Universiteit, Amsterdam, The Netherlands */ #if defined(USE_GAS) && !defined(GNU_ASSEMBLER) #define GNU_ASSEMBLER #endif #if (defined(__STDC__) && !defined(UNIXCPP)) || (defined (sun) && defined (i386) && defined (SVR4) && defined (__STDC__) && !defined (__GNUC__)) #define CONCAT(x, y) x ## y #else #define CONCAT(x, y) x/**/y #endif #ifdef ACK_ASSEMBLER /* Assume we write code for 32-bit protected mode! */ /* Redefine register names for GAS & AT&T assemblers */ #define AL al #define AH ah #define AX ax #define EAX ax #define BL bl #define BH bh #define BX bx #define EBX bx #define CL cl #define CH ch #define CX cx #define ECX cx #define DL dl #define DH dh #define DX dx #define EDX dx #define BP bp #define EBP bp #define SI si #define ESI si #define DI di #define EDI di #define SP sp #define ESP sp #define CS cs #define SS ss #define DS ds #define ES es #define FS fs #define GS gs /* Control Registers */ #define CR0 cr0 #define CR1 cr1 #define CR2 cr2 #define CR3 cr3 /* Debug Registers */ #define DR0 dr0 #define DR1 dr1 #define DR2 dr2 #define DR3 dr3 #define DR4 dr4 #define DR5 dr5 #define DR6 dr6 #define DR7 dr7 /* Floating-point Stack */ #define ST st #define AS_BEGIN .sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text #define _WTOG o16 /* word toggle for _W instructions */ #define _LTOG /* long toggle for _L instructions */ #define ADDR_TOGGLE a16 #define OPSZ_TOGGLE o16 #define USE16 .use16 #define USE32 .use32 #define CHOICE(a,b,c) c #else /* AT&T or GAS */ /* Redefine register names for GAS & AT&T assemblers */ #define AL %al #define AH %ah #define AX %ax #define EAX %eax #define BL %bl #define BH %bh #define BX %bx #define EBX %ebx #define CL %cl #define CH %ch #define CX %cx #define ECX %ecx #define DL %dl #define DH %dh #define DX %dx #define EDX %edx #define BP %bp #define EBP %ebp #define SI %si #define ESI %esi #define DI %di #define EDI %edi #define SP %sp #define ESP %esp #define CS %cs #define SS %ss #define DS %ds #define ES %es #define FS %fs #define GS %gs /* Control Registers */ #define CR0 %cr0 #define CR1 %cr1 #define CR2 %cr2 #define CR3 %cr3 /* Debug Registers */ #define DR0 %db0 #define DR1 %db1 #define DR2 %db2 #define DR3 %db3 #define DR4 %db4 #define DR5 %db5 #define DR6 %db6 #define DR7 %db7 /* Floating-point Stack */ #define ST %st #define AS_BEGIN #define USE16 #define USE32 #ifdef GNU_ASSEMBLER #define ADDR_TOGGLE aword #define OPSZ_TOGGLE word #define CHOICE(a,b,c) b #else /* * AT&T ASSEMBLER SYNTAX * ********************* */ #define CHOICE(a,b,c) a #define ADDR_TOGGLE addr16 #define OPSZ_TOGGLE data16 #endif /* GNU_ASSEMBLER */ #endif /* ACK_ASSEMBLER */ #if defined(Lynx) || (defined(SYSV) || defined(SVR4)) && !defined(ACK_ASSEMBLER) || defined(linux) && defined(__ELF__) #define GLNAME(a) a #else #define GLNAME(a) CONCAT(_,a) #endif /****************************************/ /* */ /* Select the various choices */ /* */ /****************************************/ /* Redefine assembler directives */ /*********************************/ #define GLOBL CHOICE(.globl, .globl, .extern) #define ALIGNTEXT4 CHOICE(.align 4, .align ARG2(2,0x90), .align 4) #define ALIGNTEXT2 CHOICE(.align 2, .align ARG2(1,0x90), .align 2) /* ALIGNTEXT4ifNOP is the same as ALIGNTEXT4, but only if the space is * guaranteed to be filled with NOPs. Otherwise it does nothing. */ #define ALIGNTEXT4ifNOP CHOICE(.align 4, .align ARG2(2,0x90), /*can't do it*/) #define ALIGNDATA4 CHOICE(.align 4, .align ARG2(2,0x0), .align 4) #define ALIGNDATA2 CHOICE(.align 2, .align ARG2(1,0x0), .align 2) #define FILE(s) CHOICE(.file s, .file s, .file s) #define STRING(s) CHOICE(.string s, .asciz s, .asciz s) #define D_LONG CHOICE(.long, .long, .data4) #define D_WORD CHOICE(.value, .short, .data2) #define D_BYTE CHOICE(.byte, .byte, .data1) #define SPACE CHOICE(.comm, .space, .space) #define COMM CHOICE(.comm, .comm, .comm) #define SEG_DATA CHOICE(.data, .data, .sect .data) #define SEG_TEXT CHOICE(.text, .text, .sect .text) #define SEG_BSS CHOICE(.bss, .bss, .sect .bss) #ifdef GNU_ASSEMBLER #define D_SPACE(n) . = . + n #else #define D_SPACE(n) .space n #endif /* Addressing Modes */ /* Immediate Mode */ #define ADDR(a) CHOICE(CONCAT($,a), CONCAT($,a), a) #define CONST(a) CHOICE(CONCAT($,a), CONCAT($,a), a) /* Indirect Mode */ #define CONTENT(a) CHOICE(a, a, (a)) /* take contents of variable */ #define REGIND(a) CHOICE((a), (a), (a)) /* Register a indirect */ /* Register b indirect plus displacement a */ #define REGOFF(a, b) CHOICE(a(b), a(b), a(b)) /* Reg indirect Base + Index + Displacement - this is mainly for 16-bit mode * which has no scaling */ #define REGBID(b,i,d) CHOICE(d(b,i), d(b,i), d(b)(i)) /* Reg indirect Base + (Index * Scale) + Displacement */ #define REGBISD(b,i,s,d) CHOICE(d(b,i,s), d(b,i,s), d(b)(i*s)) /* Displaced Scaled Index: */ #define REGDIS(d,i,s) CHOICE(d(,i,s), d(,i,s), d(i * s)) /* Indexed Base: */ #define REGBI(b,i) CHOICE((b,i), (b,i), (b)(i)) /* Displaced Base: */ #define REGDB(d,b) CHOICE(d(b), d(b), d(b)) /* Variable indirect: */ #define VARINDIRECT(var) CHOICE(*var, *var, (var)) /* Use register contents as jump/call target: */ #define CODEPTR(reg) CHOICE(*reg, *reg, reg) /* For expressions requiring bracketing * eg. (CRT0_PM | CRT_EM) */ #define EXPR(a) CHOICE([a], (a), [a]) #define ENOT(a) CHOICE(0!a, ~a, ~a) #define EMUL(a,b) CHOICE(a\*b, a*b, a*b) #define EDIV(a,b) CHOICE(a\/b, a/b, a/b) /* * We have to beat the problem of commas within arguments to choice. * eg. choice (add a,b, add b,a) will get argument mismatch. Luckily ANSI * and other known cpp definitions evaluate arguments before substitution * so the following works. */ #define ARG2(a, b) a,b #define ARG3(a,b,c) a,b,c /* Redefine assembler commands */ #define AAA CHOICE(aaa, aaa, aaa) #define AAD CHOICE(aad, aad, aad) #define AAM CHOICE(aam, aam, aam) #define AAS CHOICE(aas, aas, aas) #define ADC_L(a, b) CHOICE(adcl ARG2(a,b), adcl ARG2(a,b), _LTOG adc ARG2(b,a)) #define ADC_W(a, b) CHOICE(adcw ARG2(a,b), adcw ARG2(a,b), _WTOG adc ARG2(b,a)) #define ADC_B(a, b) CHOICE(adcb ARG2(a,b), adcb ARG2(a,b), adcb ARG2(b,a)) #define ADD_L(a, b) CHOICE(addl ARG2(a,b), addl ARG2(a,b), _LTOG add ARG2(b,a)) #define ADD_W(a, b) CHOICE(addw ARG2(a,b), addw ARG2(a,b), _WTOG add ARG2(b,a)) #define ADD_B(a, b) CHOICE(addb ARG2(a,b), addb ARG2(a,b), addb ARG2(b,a)) #define AND_L(a, b) CHOICE(andl ARG2(a,b), andl ARG2(a,b), _LTOG and ARG2(b,a)) #define AND_W(a, b) CHOICE(andw ARG2(a,b), andw ARG2(a,b), _WTOG and ARG2(b,a)) #define AND_B(a, b) CHOICE(andb ARG2(a,b), andb ARG2(a,b), andb ARG2(b,a)) #define ARPL(a,b) CHOICE(arpl ARG2(a,b), arpl ARG2(a,b), arpl ARG2(b,a)) #define BOUND_L(a, b) CHOICE(boundl ARG2(a,b), boundl ARG2(b,a), _LTOG bound ARG2(b,a)) #define BOUND_W(a, b) CHOICE(boundw ARG2(a,b), boundw ARG2(b,a), _WTOG bound ARG2(b,a)) #define BSF_L(a, b) CHOICE(bsfl ARG2(a,b), bsfl ARG2(a,b), _LTOG bsf ARG2(b,a)) #define BSF_W(a, b) CHOICE(bsfw ARG2(a,b), bsfw ARG2(a,b), _WTOG bsf ARG2(b,a)) #define BSR_L(a, b) CHOICE(bsrl ARG2(a,b), bsrl ARG2(a,b), _LTOG bsr ARG2(b,a)) #define BSR_W(a, b) CHOICE(bsrw ARG2(a,b), bsrw ARG2(a,b), _WTOG bsr ARG2(b,a)) #define BT_L(a, b) CHOICE(btl ARG2(a,b), btl ARG2(a,b), _LTOG bt ARG2(b,a)) #define BT_W(a, b) CHOICE(btw ARG2(a,b), btw ARG2(a,b), _WTOG bt ARG2(b,a)) #define BTC_L(a, b) CHOICE(btcl ARG2(a,b), btcl ARG2(a,b), _LTOG btc ARG2(b,a)) #define BTC_W(a, b) CHOICE(btcw ARG2(a,b), btcw ARG2(a,b), _WTOG btc ARG2(b,a)) #define BTR_L(a, b) CHOICE(btrl ARG2(a,b), btrl ARG2(a,b), _LTOG btr ARG2(b,a)) #define BTR_W(a, b) CHOICE(btrw ARG2(a,b), btrw ARG2(a,b), _WTOG btr ARG2(b,a)) #define BTS_L(a, b) CHOICE(btsl ARG2(a,b), btsl ARG2(a,b), _LTOG bts ARG2(b,a)) #define BTS_W(a, b) CHOICE(btsw ARG2(a,b), btsw ARG2(a,b), _WTOG bts ARG2(b,a)) #define CALL(a) CHOICE(call a, call a, call a) #define CALLF(s,a) CHOICE(lcall ARG2(s,a), lcall ARG2(s,a), callf s:a) #define CBW CHOICE(cbtw, cbw, cbw) #define CWDE CHOICE(cwtd, cwde, cwde) #define CLC CHOICE(clc, clc, clc) #define CLD CHOICE(cld, cld, cld) #define CLI CHOICE(cli, cli, cli) #define CLTS CHOICE(clts, clts, clts) #define CMC CHOICE(cmc, cmc, cmc) #define CMP_L(a, b) CHOICE(cmpl ARG2(a,b), cmpl ARG2(a,b), _LTOG cmp ARG2(b,a)) #define CMP_W(a, b) CHOICE(cmpw ARG2(a,b), cmpw ARG2(a,b), _WTOG cmp ARG2(b,a)) #define CMP_B(a, b) CHOICE(cmpb ARG2(a,b), cmpb ARG2(a,b), cmpb ARG2(b,a)) #define CMPS_L CHOICE(cmpsl, cmpsl, _LTOG cmps) #define CMPS_W CHOICE(cmpsw, cmpsw, _WTOG cmps) #define CMPS_B CHOICE(cmpsb, cmpsb, cmpsb) #define CWD CHOICE(cwtl, cwd, cwd) #define CDQ CHOICE(cltd, cdq, cdq) #define DAA CHOICE(daa, daa, daa) #define DAS CHOICE(das, das, das) #define DEC_L(a) CHOICE(decl a, decl a, _LTOG dec a) #define DEC_W(a) CHOICE(decw a, decw a, _WTOG dec a) #define DEC_B(a) CHOICE(decb a, decb a, decb a) #define DIV_L(a) CHOICE(divl a, divl a, div a) #define DIV_W(a) CHOICE(divw a, divw a, div a) #define DIV_B(a) CHOICE(divb a, divb a, divb a) #define ENTER(a,b) CHOICE(enter ARG2(a,b), enter ARG2(a,b), enter ARG2(b,a)) #define HLT CHOICE(hlt, hlt, hlt) #define IDIV_L(a) CHOICE(idivl a, idivl a, _LTOG idiv a) #define IDIV_W(a) CHOICE(idivw a, idivw a, _WTOG idiv a) #define IDIV_B(a) CHOICE(idivb a, idivb a, idivb a) /* More forms than this for imul!! */ #define IMUL_L(a, b) CHOICE(imull ARG2(a,b), imull ARG2(a,b), _LTOG imul ARG2(b,a)) #define IMUL_W(a, b) CHOICE(imulw ARG2(a,b), imulw ARG2(a,b), _WTOG imul ARG2(b,a)) #define IMUL_B(a) CHOICE(imulb a, imulb a, imulb a) #ifndef __EMX__ #define IN_L CHOICE(inl (DX), inl ARG2(DX,EAX), _LTOG in DX) #define IN_W CHOICE(inw (DX), inw ARG2(DX,AX), _WTOG in DX) #define IN_B CHOICE(inb (DX), inb ARG2(DX,AL), inb DX) #else /* EMX: Unfortunately, there is currently no other way than calling a routine */ #define IN_L call GLNAME(os2inl) #define IN_W call GLNAME(os2inw) #define IN_B call GLNAME(os2inb) #endif /* Please AS code writer: use the following ONLY, if you refer to ports<256 * directly, but not in IN1_W(DX), for instance, even if IN1_ looks nicer */ #if defined (sun) #define IN1_L(a) CHOICE(inl (a), inl ARG2(a,EAX), _LTOG in a) #define IN1_W(a) CHOICE(inw (a), inw ARG2(a,AX), _WTOG in a) #define IN1_B(a) CHOICE(inb (a), inb ARG2(a,AL), inb a) #else #ifndef __EMX__ #define IN1_L(a) CHOICE(inl a, inl ARG2(a,EAX), _LTOG in a) #define IN1_W(a) CHOICE(inw a, inw ARG2(a,AX), _WTOG in a) #define IN1_B(a) CHOICE(inb a, inb ARG2(a,AL), inb a) #else /* EMX: cannot handle this currently, need to check where this is used */ #define IN1_L(a) crash-boom 1 #define IN1_W(a) crash-boom 2 #define IN1_B(a) crash-boom 3 #endif #endif #define INC_L(a) CHOICE(incl a, incl a, _LTOG inc a) #define INC_W(a) CHOICE(incw a, incw a, _WTOG inc a) #define INC_B(a) CHOICE(incb a, incb a, incb a) #ifndef __EMX__ #define INS_L CHOICE(insl, insl, _LTOG ins) #define INS_W CHOICE(insw, insw, _WTOG ins) #define INS_B CHOICE(insb, insb, insb) #else #define INS_L call GLNAME(os2insl) #define INS_W call GLNAME(os2insw) #define INS_B call GLNAME(os2insb) #endif #define INT(a) CHOICE(int a, int a, int a) #define INT3 CHOICE(int CONST(3), int3, int CONST(3)) #define INTO CHOICE(into, into, into) #define IRET CHOICE(iret, iret, iret) #define IRETD CHOICE(iret, iret, iretd) #define JA(a) CHOICE(ja a, ja a, ja a) #define JAE(a) CHOICE(jae a, jae a, jae a) #define JB(a) CHOICE(jb a, jb a, jb a) #define JBE(a) CHOICE(jbe a, jbe a, jbe a) #define JC(a) CHOICE(jc a, jc a, jc a) #define JE(a) CHOICE(je a, je a, je a) #define JG(a) CHOICE(jg a, jg a, jg a) #define JGE(a) CHOICE(jge a, jge a, jge a) #define JL(a) CHOICE(jl a, jl a, jl a) #define JLE(a) CHOICE(jle a, jle a, jle a) #define JNA(a) CHOICE(jna a, jna a, jna a) #define JNAE(a) CHOICE(jnae a, jnae a, jnae a) #define JNB(a) CHOICE(jnb a, jnb a, jnb a) #define JNBE(a) CHOICE(jnbe a, jnbe a, jnbe a) #define JNC(a) CHOICE(jnc a, jnc a, jnc a) #define JNE(a) CHOICE(jne a, jne a, jne a) #define JNG(a) CHOICE(jng a, jng a, jng a) #define JNGE(a) CHOICE(jnge a, jnge a, jnge a) #define JNL(a) CHOICE(jnl a, jnl a, jnl a) #define JNLE(a) CHOICE(jnle a, jnle a, jnle a) #define JNO(a) CHOICE(jno a, jno a, jno a) #define JNP(a) CHOICE(jnp a, jnp a, jnp a) #define JNS(a) CHOICE(jns a, jns a, jns a) #define JNZ(a) CHOICE(jnz a, jnz a, jnz a) #define JO(a) CHOICE(jo a, jo a, jo a) #define JP(a) CHOICE(jp a, jp a, jp a) #define JPE(a) CHOICE(jpe a, jpe a, jpe a) #define JPO(a) CHOICE(jpo a, jpo a, jpo a) #define JS(a) CHOICE(js a, js a, js a) #define JZ(a) CHOICE(jz a, jz a, jz a) #define JMP(a) CHOICE(jmp a, jmp a, jmp a) #define JMPF(s,a) CHOICE(ljmp ARG2(s,a), ljmp ARG2(s,a), jmpf s:a) #define LAHF CHOICE(lahf, lahf, lahf) #if !defined(_REAL_MODE) && !defined(_V86_MODE) #define LAR(a, b) CHOICE(lar ARG2(a, b), lar ARG2(a, b), lar ARG2(b, a)) #endif #define LEA_L(a, b) CHOICE(leal ARG2(a,b), leal ARG2(a,b), _LTOG lea ARG2(b,a)) #define LEA_W(a, b) CHOICE(leaw ARG2(a,b), leaw ARG2(a,b), _WTOG lea ARG2(b,a)) #define LEAVE CHOICE(leave, leave, leave) #define LGDT(a) CHOICE(lgdt a, lgdt a, lgdt a) #define LIDT(a) CHOICE(lidt a, lidt a, lidt a) #define LDS(a, b) CHOICE(ldsl ARG2(a,b), lds ARG2(a,b), lds ARG2(b,a)) #define LES(a, b) CHOICE(lesl ARG2(a,b), les ARG2(a,b), les ARG2(b,a)) #define LFS(a, b) CHOICE(lfsl ARG2(a,b), lfs ARG2(a,b), lfs ARG2(b,a)) #define LGS(a, b) CHOICE(lgsl ARG2(a,b), lgs ARG2(a,b), lgs ARG2(b,a)) #define LSS(a, b) CHOICE(lssl ARG2(a,b), lss ARG2(a,b), lss ARG2(b,a)) #define LLDT(a) CHOICE(lldt a, lldt a, lldt a) #define LMSW(a) CHOICE(lmsw a, lmsw a, lmsw a) #define LOCK CHOICE(lock, lock, lock) #define LODS_L CHOICE(lodsl, lodsl, _LTOG lods) #define LODS_W CHOICE(lodsw, lodsw, _WTOG lods) #define LODS_B CHOICE(lodsb, lodsb, lodsb) #define LOOP(a) CHOICE(loop a, loop a, loop a) #define LOOPE(a) CHOICE(loope a, loope a, loope a) #define LOOPZ(a) CHOICE(loopz a, loopz a, loopz a) #define LOOPNE(a) CHOICE(loopne a, loopne a, loopne a) #define LOOPNZ(a) CHOICE(loopnz a, loopnz a, loopnz a) #if !defined(_REAL_MODE) && !defined(_V86_MODE) #define LSL(a, b) CHOICE(lsl ARG2(a,b), lsl ARG2(a,b), lsl ARG2(b,a)) #endif #define LTR(a) CHOICE(ltr a, ltr a, ltr a) #define MOV_SR(a, b) CHOICE(movw ARG2(a,b), mov ARG2(a,b), mov ARG2(b,a)) #define MOV_L(a, b) CHOICE(movl ARG2(a,b), movl ARG2(a,b), _LTOG mov ARG2(b,a)) #define MOV_W(a, b) CHOICE(movw ARG2(a,b), movw ARG2(a,b), _WTOG mov ARG2(b,a)) #define MOV_B(a, b) CHOICE(movb ARG2(a,b), movb ARG2(a,b), movb ARG2(b,a)) #define MOVS_L CHOICE(movsl, movsl, _LTOG movs) #define MOVS_W CHOICE(movsw, movsw, _WTOG movs) #define MOVS_B CHOICE(movsb, movsb, movsb) #define MOVSX_BL(a, b) CHOICE(movsbl ARG2(a,b), movsbl ARG2(a,b), movsx ARG2(b,a)) #define MOVSX_BW(a, b) CHOICE(movsbw ARG2(a,b), movsbw ARG2(a,b), movsx ARG2(b,a)) #define MOVSX_WL(a, b) CHOICE(movswl ARG2(a,b), movswl ARG2(a,b), movsx ARG2(b,a)) #define MOVZX_BL(a, b) CHOICE(movzbl ARG2(a,b), movzbl ARG2(a,b), movzx ARG2(b,a)) #define MOVZX_BW(a, b) CHOICE(movzbw ARG2(a,b), movzbw ARG2(a,b), movzx ARG2(b,a)) #define MOVZX_WL(a, b) CHOICE(movzwl ARG2(a,b), movzwl ARG2(a,b), movzx ARG2(b,a)) #define MUL_L(a) CHOICE(mull a, mull a, _LTOG mul a) #define MUL_W(a) CHOICE(mulw a, mulw a, _WTOG mul a) #define MUL_B(a) CHOICE(mulb a, mulb a, mulb a) #define NEG_L(a) CHOICE(negl a, negl a, _LTOG neg a) #define NEG_W(a) CHOICE(negw a, negw a, _WTOG neg a) #define NEG_B(a) CHOICE(negb a, negb a, negb a) #define NOP CHOICE(nop, nop, nop) #define NOT_L(a) CHOICE(notl a, notl a, _LTOG not a) #define NOT_W(a) CHOICE(notw a, notw a, _WTOG not a) #define NOT_B(a) CHOICE(notb a, notb a, notb a) #define OR_L(a,b) CHOICE(orl ARG2(a,b), orl ARG2(a,b), _LTOG or ARG2(b,a)) #define OR_W(a,b) CHOICE(orw ARG2(a,b), orw ARG2(a,b), _WTOG or ARG2(b,a)) #define OR_B(a,b) CHOICE(orb ARG2(a,b), orb ARG2(a,b), orb ARG2(b,a)) #ifndef __EMX__ #define OUT_L CHOICE(outl (DX), outl ARG2(EAX,DX), _LTOG out DX) #define OUT_W CHOICE(outw (DX), outw ARG2(AX,DX), _WTOG out DX) #define OUT_B CHOICE(outb (DX), outb ARG2(AL,DX), outb DX) /* Please AS code writer: use the following ONLY, if you refer to ports<256 * directly, but not in OUT1_W(DX), for instance, even if OUT1_ looks nicer */ #define OUT1_L(a) CHOICE(outl (a), outl ARG2(EAX,a), _LTOG out a) #define OUT1_W(a) CHOICE(outw (a), outw ARG2(AX,a), _WTOG out a) #define OUT1_B(a) CHOICE(outb (a), outb ARG2(AL,a), outb a) #define OUTS_L CHOICE(outsl, outsl, _LTOG outs) #define OUTS_W CHOICE(outsw, outsw, _WTOG outs) #define OUTS_B CHOICE(outsb, outsb, outsb) #else /* EMX unfortunately: routines for now */ #define OUT_L call GLNAME(os2outl) #define OUT_W call GLNAME(os2outw) #define OUT_B call GLNAME(os2outb) #define OUT1_L(a) crash-boom 4 /* need to check where this is used */ #define OUT1_W(a) crash-boom 5 #define OUT1_B(a) crash-boom 6 #define OUTS_L call GLNAME(os2outsl) #define OUTS_W call GLNAME(os2outsw) #define OUTS_B call GLNAME(os2outsb) #endif #define POP_SR(a) CHOICE(pop a, pop a, pop a) #define POP_L(a) CHOICE(popl a, popl a, _LTOG pop a) #define POP_W(a) CHOICE(popw a, popw a, _WTOG pop a) #define POPA_L CHOICE(popal, popal, _LTOG popa) #define POPA_W CHOICE(popaw, popaw, _WTOG popa) #define POPF_L CHOICE(popfl, popfl, _LTOG popf) #define POPF_W CHOICE(popfw, popfw, _WTOG popf) #define PUSH_SR(a) CHOICE(push a, push a, push a) #define PUSH_L(a) CHOICE(pushl a, pushl a, _LTOG push a) #define PUSH_W(a) CHOICE(pushw a, pushw a, _WTOG push a) #define PUSH_B(a) CHOICE(push a, pushb a, push a) #define PUSHA_L CHOICE(pushal, pushal, _LTOG pusha) #define PUSHA_W CHOICE(pushaw, pushaw, _WTOG pusha) #define PUSHF_L CHOICE(pushfl, pushfl, _LTOG pushf) #define PUSHF_W CHOICE(pushfw, pushfw, _WTOG pushf) #define RCL_L(a, b) CHOICE(rcll ARG2(a,b), rcll ARG2(a,b), _LTOG rcl ARG2(b,a)) #define RCL_W(a, b) CHOICE(rclw ARG2(a,b), rclw ARG2(a,b), _WTOG rcl ARG2(b,a)) #define RCL_B(a, b) CHOICE(rclb ARG2(a,b), rclb ARG2(a,b), rclb ARG2(b,a)) #define RCR_L(a, b) CHOICE(rcrl ARG2(a,b), rcrl ARG2(a,b), _LTOG rcr ARG2(b,a)) #define RCR_W(a, b) CHOICE(rcrw ARG2(a,b), rcrw ARG2(a,b), _WTOG rcr ARG2(b,a)) #define RCR_B(a, b) CHOICE(rcrb ARG2(a,b), rcrb ARG2(a,b), rcrb ARG2(b,a)) #define ROL_L(a, b) CHOICE(roll ARG2(a,b), roll ARG2(a,b), _LTOG rol ARG2(b,a)) #define ROL_W(a, b) CHOICE(rolw ARG2(a,b), rolw ARG2(a,b), _WTOG rol ARG2(b,a)) #define ROL_B(a, b) CHOICE(rolb ARG2(a,b), rolb ARG2(a,b), rolb ARG2(b,a)) #define ROR_L(a, b) CHOICE(rorl ARG2(a,b), rorl ARG2(a,b), _LTOG ror ARG2(b,a)) #define ROR_W(a, b) CHOICE(rorw ARG2(a,b), rorw ARG2(a,b), _WTOG ror ARG2(b,a)) #define ROR_B(a, b) CHOICE(rorb ARG2(a,b), rorb ARG2(a,b), rorb ARG2(b,a)) #define REP CHOICE(rep ;, rep ;, repe) #define REPE CHOICE(repz ;, repe ;, repe) #define REPNE CHOICE(repnz ;, repne ;, repne) #define REPNZ REPNE #define REPZ REPE #define RET CHOICE(ret, ret, ret) #define SAHF CHOICE(sahf, sahf, sahf) #define SAL_L(a, b) CHOICE(sall ARG2(a,b), sall ARG2(a,b), _LTOG sal ARG2(b,a)) #define SAL_W(a, b) CHOICE(salw ARG2(a,b), salw ARG2(a,b), _WTOG sal ARG2(b,a)) #define SAL_B(a, b) CHOICE(salb ARG2(a,b), salb ARG2(a,b), salb ARG2(b,a)) #define SAR_L(a, b) CHOICE(sarl ARG2(a,b), sarl ARG2(a,b), _LTOG sar ARG2(b,a)) #define SAR_W(a, b) CHOICE(sarw ARG2(a,b), sarw ARG2(a,b), _WTOG sar ARG2(b,a)) #define SAR_B(a, b) CHOICE(sarb ARG2(a,b), sarb ARG2(a,b), sarb ARG2(b,a)) #define SBB_L(a, b) CHOICE(sbbl ARG2(a,b), sbbl ARG2(a,b), _LTOG sbb ARG2(b,a)) #define SBB_W(a, b) CHOICE(sbbw ARG2(a,b), sbbw ARG2(a,b), _WTOG sbb ARG2(b,a)) #define SBB_B(a, b) CHOICE(sbbb ARG2(a,b), sbbb ARG2(a,b), sbbb ARG2(b,a)) #define SCAS_L CHOICE(scasl, scasl, _LTOG scas) #define SCAS_W CHOICE(scasw, scasw, _WTOG scas) #define SCAS_B CHOICE(scasb, scasb, scasb) #define SETA(a) CHOICE(seta a, seta a, seta a) #define SETAE(a) CHOICE(setae a, setae a, setae a) #define SETB(a) CHOICE(setb a, setb a, setb a) #define SETBE(a) CHOICE(setbe a, setbe a, setbe a) #define SETC(a) CHOICE(setc a, setb a, setb a) #define SETE(a) CHOICE(sete a, sete a, sete a) #define SETG(a) CHOICE(setg a, setg a, setg a) #define SETGE(a) CHOICE(setge a, setge a, setge a) #define SETL(a) CHOICE(setl a, setl a, setl a) #define SETLE(a) CHOICE(setle a, setle a, setle a) #define SETNA(a) CHOICE(setna a, setna a, setna a) #define SETNAE(a) CHOICE(setnae a, setnae a, setnae a) #define SETNB(a) CHOICE(setnb a, setnb a, setnb a) #define SETNBE(a) CHOICE(setnbe a, setnbe a, setnbe a) #define SETNC(a) CHOICE(setnc a, setnb a, setnb a) #define SETNE(a) CHOICE(setne a, setne a, setne a) #define SETNG(a) CHOICE(setng a, setng a, setng a) #define SETNGE(a) CHOICE(setnge a, setnge a, setnge a) #define SETNL(a) CHOICE(setnl a, setnl a, setnl a) #define SETNLE(a) CHOICE(setnle a, setnle a, setnle a) #define SETNO(a) CHOICE(setno a, setno a, setno a) #define SETNP(a) CHOICE(setnp a, setnp a, setnp a) #define SETNS(a) CHOICE(setns a, setns a, setna a) #define SETNZ(a) CHOICE(setnz a, setnz a, setnz a) #define SETO(a) CHOICE(seto a, seto a, seto a) #define SETP(a) CHOICE(setp a, setp a, setp a) #define SETPE(a) CHOICE(setpe a, setpe a, setpe a) #define SETPO(a) CHOICE(setpo a, setpo a, setpo a) #define SETS(a) CHOICE(sets a, sets a, seta a) #define SETZ(a) CHOICE(setz a, setz a, setz a) #define SGDT(a) CHOICE(sgdt a, sgdt a, sgdt a) #define SIDT(a) CHOICE(sidt a, sidt a, sidt a) #define SHL_L(a, b) CHOICE(shll ARG2(a,b), shll ARG2(a,b), _LTOG shl ARG2(b,a)) #define SHL_W(a, b) CHOICE(shlw ARG2(a,b), shlw ARG2(a,b), _WTOG shl ARG2(b,a)) #define SHL_B(a, b) CHOICE(shlb ARG2(a,b), shlb ARG2(a,b), shlb ARG2(b,a)) #define SHLD_L(a,b,c) CHOICE(shldl ARG3(a,b,c), shldl ARG3(a,b,c), _LTOG shld ARG3(c,b,a)) #define SHLD2_L(a,b) CHOICE(shldl ARG2(a,b), shldl ARG3(CL,a,b), _LTOG shld ARG3(b,a,CL)) #define SHLD_W(a,b,c) CHOICE(shldw ARG3(a,b,c), shldw ARG3(a,b,c), _WTOG shld ARG3(c,b,a)) #define SHLD2_W(a,b) CHOICE(shldw ARG2(a,b), shldw ARG3(CL,a,b), _WTOG shld ARG3(b,a,CL)) #define SHR_L(a, b) CHOICE(shrl ARG2(a,b), shrl ARG2(a,b), _LTOG shr ARG2(b,a)) #define SHR_W(a, b) CHOICE(shrw ARG2(a,b), shrw ARG2(a,b), _WTOG shr ARG2(b,a)) #define SHR_B(a, b) CHOICE(shrb ARG2(a,b), shrb ARG2(a,b), shrb ARG2(b,a)) #define SHRD_L(a,b,c) CHOICE(shrdl ARG3(a,b,c), shrdl ARG3(a,b,c), _LTOG shrd ARG3(c,b,a)) #define SHRD2_L(a,b) CHOICE(shrdl ARG2(a,b), shrdl ARG3(CL,a,b), _LTOG shrd ARG3(b,a,CL)) #define SHRD_W(a,b,c) CHOICE(shrdw ARG3(a,b,c), shrdw ARG3(a,b,c), _WTOG shrd ARG3(c,b,a)) #define SHRD2_W(a,b) CHOICE(shrdw ARG2(a,b), shrdw ARG3(CL,a,b), _WTOG shrd ARG3(b,a,CL)) #define SLDT(a) CHOICE(sldt a, sldt a, sldt a) #define SMSW(a) CHOICE(smsw a, smsw a, smsw a) #define STC CHOICE(stc, stc, stc) #define STD CHOICE(std, std, std) #define STI CHOICE(sti, sti, sti) #define STOS_L CHOICE(stosl, stosl, _LTOG stos) #define STOS_W CHOICE(stosw, stosw, _WTOG stos) #define STOS_B CHOICE(stosb, stosb, stosb) #define STR(a) CHOICE(str a, str a, str a) #define SUB_L(a, b) CHOICE(subl ARG2(a,b), subl ARG2(a,b), _LTOG sub ARG2(b,a)) #define SUB_W(a, b) CHOICE(subw ARG2(a,b), subw ARG2(a,b), _WTOG sub ARG2(b,a)) #define SUB_B(a, b) CHOICE(subb ARG2(a,b), subb ARG2(a,b), subb ARG2(b,a)) #define TEST_L(a, b) CHOICE(testl ARG2(a,b), testl ARG2(a,b), _LTOG test ARG2(b,a)) #define TEST_W(a, b) CHOICE(testw ARG2(a,b), testw ARG2(a,b), _WTOG test ARG2(b,a)) #define TEST_B(a, b) CHOICE(testb ARG2(a,b), testb ARG2(a,b), testb ARG2(b,a)) #define VERR(a) CHOICE(verr a, verr a, verr a) #define VERW(a) CHOICE(verw a, verw a, verw a) #define WAIT CHOICE(wait, wait, wait) #define XCHG_L(a, b) CHOICE(xchgl ARG2(a,b), xchgl ARG2(a,b), _LTOG xchg ARG2(b,a)) #define XCHG_W(a, b) CHOICE(xchgw ARG2(a,b), xchgw ARG2(a,b), _WTOG xchg ARG2(b,a)) #define XCHG_B(a, b) CHOICE(xchgb ARG2(a,b), xchgb ARG2(a,b), xchgb ARG2(b,a)) #define XLAT CHOICE(xlat, xlat, xlat) #define XOR_L(a, b) CHOICE(xorl ARG2(a,b), xorl ARG2(a,b), _LTOG xor ARG2(b,a)) #define XOR_W(a, b) CHOICE(xorw ARG2(a,b), xorw ARG2(a,b), _WTOG xor ARG2(b,a)) #define XOR_B(a, b) CHOICE(xorb ARG2(a,b), xorb ARG2(a,b), xorb ARG2(b,a)) /* Floating Point Instructions */ #define F2XM1 CHOICE(f2xm1, f2xm1, f2xm1) #define FABS CHOICE(fabs, fabs, fabs) #define FADD_D(a) CHOICE(faddl a, faddl a, faddd a) #define FADD_S(a) CHOICE(fadds a, fadds a, fadds a) #define FADD2(a, b) CHOICE(fadd ARG2(a,b), fadd ARG2(a,b), fadd ARG2(b,a)) #define FADDP(a, b) CHOICE(faddp ARG2(a,b), faddp ARG2(a,b), faddp ARG2(b,a)) #define FIADD_L(a) CHOICE(fiaddl a, fiaddl a, fiaddl a) #define FIADD_W(a) CHOICE(fiadd a, fiadds a, fiadds a) #define FBLD(a) CHOICE(fbld a, fbld a, fbld a) #define FBSTP(a) CHOICE(fbstp a, fbstp a, fbstp a) #define FCHS CHOICE(fchs, fchs, fchs) #define FCLEX CHOICE(fclex, wait; fnclex, wait; fclex) #define FNCLEX CHOICE(fnclex, fnclex, fclex) #define FCOM(a) CHOICE(fcom a, fcom a, fcom a) #define FCOM_D(a) CHOICE(fcoml a, fcoml a, fcomd a) #define FCOM_S(a) CHOICE(fcoms a, fcoms a, fcoms a) #define FCOMP(a) CHOICE(fcomp a, fcomp a, fcomp a) #define FCOMP_D(a) CHOICE(fcompl a, fcompl a, fcompd a) #define FCOMP_S(a) CHOICE(fcomps a, fcomps a, fcomps a) #define FCOMPP CHOICE(fcompp, fcompp, fcompp) #define FCOS CHOICE(fcos, fcos, fcos) #define FDECSTP CHOICE(fdecstp, fdecstp, fdecstp) #define FDIV_D(a) CHOICE(fdivl a, fdivl a, fdivd a) #define FDIV_S(a) CHOICE(fdivs a, fdivs a, fdivs a) #define FDIV2(a, b) CHOICE(fdiv ARG2(a,b), fdiv ARG2(a,b), fdiv ARG2(b,a)) #define FDIVP(a, b) CHOICE(fdivp ARG2(a,b), fdivp ARG2(a,b), fdivp ARG2(b,a)) #define FIDIV_L(a) CHOICE(fidivl a, fidivl a, fidivl a) #define FIDIV_W(a) CHOICE(fidiv a, fidivs a, fidivs a) #define FDIVR_D(a) CHOICE(fdivrl a, fdivrl a, fdivrd a) #define FDIVR_S(a) CHOICE(fdivrs a, fdivrs a, fdivrs a) #define FDIVR2(a, b) CHOICE(fdivr ARG2(a,b), fdivr ARG2(a,b), fdivr ARG2(b,a)) #define FDIVRP(a, b) CHOICE(fdivrp ARG2(a,b), fdivrp ARG2(a,b), fdivrp ARG2(b,a)) #define FIDIVR_L(a) CHOICE(fidivrl a, fidivrl a, fidivrl a) #define FIDIVR_W(a) CHOICE(fidivr a, fidivrs a, fidivrs a) #define FFREE(a) CHOICE(ffree a, ffree a, ffree a) #define FICOM_L(a) CHOICE(ficoml a, ficoml a, ficoml a) #define FICOM_W(a) CHOICE(ficom a, ficoms a, ficoms a) #define FICOMP_L(a) CHOICE(ficompl a, ficompl a, ficompl a) #define FICOMP_W(a) CHOICE(ficomp a, ficomps a, ficomps a) #define FILD_Q(a) CHOICE(fildll a, fildq a, fildq a) #define FILD_L(a) CHOICE(fildl a, fildl a, fildl a) #define FILD_W(a) CHOICE(fild a, filds a, filds a) #define FINCSTP CHOICE(fincstp, fincstp, fincstp) #define FINIT CHOICE(finit, wait; fninit, wait; finit) #define FNINIT CHOICE(fninit, fninit, finit) #define FIST_L(a) CHOICE(fistl a, fistl a, fistl a) #define FIST_W(a) CHOICE(fist a, fists a, fists a) #define FISTP_Q(a) CHOICE(fistpll a, fistpq a, fistpq a) #define FISTP_L(a) CHOICE(fistpl a, fistpl a, fistpl a) #define FISTP_W(a) CHOICE(fistp a, fistps a, fistps a) #define FLD_X(a) CHOICE(fldt a, fldt a, fldx a) /* 80 bit data type! */ #define FLD_D(a) CHOICE(fldl a, fldl a, fldd a) #define FLD_S(a) CHOICE(flds a, flds a, flds a) #define FLD1 CHOICE(fld1, fld1, fld1) #define FLDL2T CHOICE(fldl2t, fldl2t, fldl2t) #define FLDL2E CHOICE(fldl2e, fldl2e, fldl2e) #define FLDPI CHOICE(fldpi, fldpi, fldpi) #define FLDLG2 CHOICE(fldlg2, fldlg2, fldlg2) #define FLDLN2 CHOICE(fldln2, fldln2, fldln2) #define FLDZ CHOICE(fldz, fldz, fldz) #define FLDCW(a) CHOICE(fldcw a, fldcw a, fldcw a) #define FLDENV(a) CHOICE(fldenv a, fldenv a, fldenv a) #define FMUL_S(a) CHOICE(fmuls a, fmuls a, fmuls a) #define FMUL_D(a) CHOICE(fmull a, fmull a, fmuld a) #define FMUL2(a, b) CHOICE(fmul ARG2(a,b), fmul ARG2(a,b), fmul ARG2(b,a)) #define FMULP(a, b) CHOICE(fmulp ARG2(a,b), fmulp ARG2(a,b), fmulp ARG2(b,a)) #define FIMUL_L(a) CHOICE(fimull a, fimull a, fimull a) #define FIMUL_W(a) CHOICE(fimul a, fimuls a, fimuls a) #define FNOP CHOICE(fnop, fnop, fnop) #define FPATAN CHOICE(fpatan, fpatan, fpatan) #define FPREM CHOICE(fprem, fprem, fprem) #define FPREM1 CHOICE(fprem1, fprem1, fprem1) #define FPTAN CHOICE(fptan, fptan, fptan) #define FRNDINT CHOICE(frndint, frndint, frndint) #define FRSTOR(a) CHOICE(frstor a, frstor a, frstor a) #define FSAVE(a) CHOICE(fsave a, wait; fnsave a, wait; fsave a) #define FNSAVE(a) CHOICE(fnsave a, fnsave a, fsave a) #define FSCALE CHOICE(fscale, fscale, fscale) #define FSIN CHOICE(fsin, fsin, fsin) #define FSINCOS CHOICE(fsincos, fsincos, fsincos) #define FSQRT CHOICE(fsqrt, fsqrt, fsqrt) #define FST_D(a) CHOICE(fstl a, fstl a, fstd a) #define FST_S(a) CHOICE(fsts a, fsts a, fsts a) #define FSTP_X(a) CHOICE(fstpt a, fstpt a, fstpx a) #define FSTP_D(a) CHOICE(fstpl a, fstpl a, fstpd a) #define FSTP_S(a) CHOICE(fstps a, fstps a, fstps a) #define FSTCW(a) CHOICE(fstcw a, wait; fnstcw a, wait; fstcw a) #define FNSTCW(a) CHOICE(fnstcw a, fnstcw a, fstcw a) #define FSTENV(a) CHOICE(fstenv a, wait; fnstenv a, fstenv a) #define FNSTENV(a) CHOICE(fnstenv a, fnstenv a, fstenv a) #define FSTSW(a) CHOICE(fstsw a, wait; fnstsw a, wait; fstsw a) #define FNSTSW(a) CHOICE(fnstsw a, fnstsw a, fstsw a) #define FSUB_S(a) CHOICE(fsubs a, fsubs a, fsubs a) #define FSUB_D(a) CHOICE(fsubl a, fsubl a, fsubd a) #define FSUB2(a, b) CHOICE(fsub ARG2(a,b), fsub ARG2(a,b), fsub ARG2(b,a)) #define FSUBP(a, b) CHOICE(fsubp ARG2(a,b), fsubp ARG2(a,b), fsubp ARG2(b,a)) #define FISUB_L(a) CHOICE(fisubl a, fisubl a, fisubl a) #define FISUB_W(a) CHOICE(fisub a, fisubs a, fisubs a) #define FSUBR_S(a) CHOICE(fsubrs a, fsubrs a, fsubrs a) #define FSUBR_D(a) CHOICE(fsubrl a, fsubrl a, fsubrd a) #define FSUBR2(a, b) CHOICE(fsubr ARG2(a,b), fsubr ARG2(a,b), fsubr ARG2(b,a)) #define FSUBRP(a, b) CHOICE(fsubrp ARG2(a,b), fsubrp ARG2(a,b), fsubrp ARG2(b,a)) #define FISUBR_L(a) CHOICE(fisubrl a, fisubrl a, fisubrl a) #define FISUBR_W(a) CHOICE(fisubr a, fisubrs a, fisubrs a) #define FTST CHOICE(ftst, ftst, ftst) #define FUCOM(a) CHOICE(fucom a, fucom a, fucom a) #define FUCOMP(a) CHOICE(fucomp a, fucomp a, fucomp a) #define FUCOMPP CHOICE(fucompp, fucompp, fucompp) #define FWAIT CHOICE(wait, wait, wait) #define FXAM CHOICE(fxam, fxam, fxam) #define FXCH(a) CHOICE(fxch a, fxch a, fxch a) #define FXTRACT CHOICE(fxtract, fxtract, fxtract) #define FYL2X CHOICE(fyl2x, fyl2x, fyl2x) #define FYL2XP1 CHOICE(fyl2xp1, fyl2xp1, fyl2xp1) #endif /* __ASSYNTAX_H__ */