172 lines
6.4 KiB
C
172 lines
6.4 KiB
C
|
/* $NetBSD: lbn80386.h,v 1.1.1.1 2001/01/27 08:08:30 itojun Exp $ */
|
|||
|
|
|||
|
/*
|
|||
|
* Cylink Corporation <EFBFBD> 1998
|
|||
|
*
|
|||
|
* This software is licensed by Cylink to the Internet Software Consortium to
|
|||
|
* promote implementation of royalty free public key cryptography within IETF
|
|||
|
* standards. Cylink wishes to expressly thank the contributions of Dr.
|
|||
|
* Martin Hellman, Whitfield Diffie, Ralph Merkle and Stanford University for
|
|||
|
* their contributions to Internet Security. In accordance with the terms of
|
|||
|
* this license, ISC is authorized to distribute and sublicense this software
|
|||
|
* for the practice of IETF standards.
|
|||
|
*
|
|||
|
* The software includes BigNum, written by Colin Plumb and licensed by Philip
|
|||
|
* R. Zimmermann for royalty free use and distribution with Cylink's
|
|||
|
* software. Use of BigNum as a stand alone product or component is
|
|||
|
* specifically prohibited.
|
|||
|
*
|
|||
|
* Disclaimer of All Warranties. THIS SOFTWARE IS BEING PROVIDED "AS IS",
|
|||
|
* WITHOUT ANY EXPRESSED OR IMPLIED WARRANTY OF ANY KIND WHATSOEVER. IN
|
|||
|
* PARTICULAR, WITHOUT LIMITATION ON THE GENERALITY OF THE FOREGOING, CYLINK
|
|||
|
* MAKES NO REPRESENTATION OF THIS SOFTWARE OR ITS FITNESS FOR ANY PARTICULAR
|
|||
|
* PURPOSE.
|
|||
|
*
|
|||
|
* Cylink or its representatives shall not be liable for tort, indirect,
|
|||
|
* special or consequential damages such as loss of profits or loss of
|
|||
|
* goodwill from the use or inability to use the software for any purpose or
|
|||
|
* for any reason whatsoever.
|
|||
|
*
|
|||
|
* EXPORT LAW: Export of the Foundations Suite may be subject to compliance
|
|||
|
* with the rules and regulations promulgated from time to time by the Bureau
|
|||
|
* of Export Administration, United States Department of Commerce, which
|
|||
|
* restrict the export and re-export of certain products and technical data.
|
|||
|
* If the export of the Foundations Suite is controlled under such rules and
|
|||
|
* regulations, then the Foundations Suite shall not be exported or
|
|||
|
* re-exported, directly or indirectly, (a) without all export or re-export
|
|||
|
* licenses and governmental approvals required by any applicable laws, or (b)
|
|||
|
* in violation of any applicable prohibition against the export or re-export
|
|||
|
* of any part of the Foundations Suite. All export licenses for software
|
|||
|
* containing the Foundations Suite are the sole responsibility of the licensee.
|
|||
|
*/
|
|||
|
|
|||
|
/*
|
|||
|
* lbn80386.h - This file defines the interfaces to the 80386
|
|||
|
* assembly primitives. It is intended to be included in "lbn.h"
|
|||
|
* via the "#include BNINCLUDE" mechanism.
|
|||
|
*/
|
|||
|
|
|||
|
#define BN_LITTLE_ENDIAN 1
|
|||
|
|
|||
|
typedef unsigned long bnword32;
|
|||
|
#define BNWORD32 bnword32
|
|||
|
|
|||
|
/* MS-DOS needs the calling convention described to it. */
|
|||
|
#ifndef MSDOS
|
|||
|
#ifdef __MSDOS__
|
|||
|
#define MSDOS 1
|
|||
|
#endif
|
|||
|
#endif
|
|||
|
|
|||
|
#ifdef MSDOS
|
|||
|
#define CDECL __cdecl
|
|||
|
#else
|
|||
|
#define CDECL /*nothing*/
|
|||
|
#endif
|
|||
|
|
|||
|
#ifdef __cplusplus
|
|||
|
/* These assembly-language primitives use C names */
|
|||
|
extern "C" {
|
|||
|
#endif
|
|||
|
|
|||
|
/* Function prototypes for the asm routines */
|
|||
|
void CDECL
|
|||
|
lbnMulN1_32(bnword32 *out, bnword32 const *in, unsigned len, bnword32 k);
|
|||
|
#define lbnMulN1_32 lbnMulN1_32
|
|||
|
|
|||
|
bnword32 CDECL
|
|||
|
lbnMulAdd1_32(bnword32 *out, bnword32 const *in, unsigned len, bnword32 k);
|
|||
|
#define lbnMulAdd1_32 lbnMulAdd1_32
|
|||
|
|
|||
|
bnword32 CDECL
|
|||
|
lbnMulSub1_32(bnword32 *out, bnword32 const *in, unsigned len, bnword32 k);
|
|||
|
#define lbnMulSub1_32 lbnMulSub1_32
|
|||
|
|
|||
|
bnword32 CDECL
|
|||
|
lbnDiv21_32(bnword32 *q, bnword32 nh, bnword32 nl, bnword32 d);
|
|||
|
#define lbnDiv21_32 lbnDiv21_32
|
|||
|
|
|||
|
unsigned CDECL
|
|||
|
lbnModQ_32(bnword32 const *n, unsigned len, bnword32 d);
|
|||
|
#define lbnModQ_32 lbnModQ_32
|
|||
|
|
|||
|
#ifdef __cplusplus
|
|||
|
}
|
|||
|
#endif
|
|||
|
|
|||
|
|
|||
|
#if __GNUC__
|
|||
|
/*
|
|||
|
* Use the (massively cool) GNU inline-assembler extension to define
|
|||
|
* inline expansions for various operations.
|
|||
|
*
|
|||
|
* The massively cool part is that the assembler can have inputs
|
|||
|
* and outputs, and you specify the operands and which effective
|
|||
|
* addresses are legal and they get substituted into the code.
|
|||
|
* (For example, some of the code requires a zero. Rather than
|
|||
|
* specify an immediate constant, the expansion specifies an operand
|
|||
|
* of zero which can be in various places. This lets GCC use an
|
|||
|
* immediate zero, or a register which contains zero if it's available.)
|
|||
|
*
|
|||
|
* The syntax is asm("asm_code" : outputs : inputs : trashed)
|
|||
|
* %0, %1 and so on in the asm code are substituted by the operands
|
|||
|
* in left-to-right order (outputs, then inputs).
|
|||
|
* The operands contain constraint strings and values to use.
|
|||
|
* Outputs must be lvalues, inputs may be rvalues. In the constraints:
|
|||
|
* "a" means that the operand must be in eax.
|
|||
|
* "d" means that the operand must be in edx.
|
|||
|
* "g" means that the operand may be any effective address.
|
|||
|
* "=" means that the operand is assigned to.
|
|||
|
* "%" means that this operand and the following one may be
|
|||
|
* interchanged if desirable.
|
|||
|
* "bcDSmn" means that the operand must be in ebx, ecx, esi, edi, memory,
|
|||
|
* or an immediate constant. (This is almost the same as "g"
|
|||
|
* but allowing it in eax wouldn't help because x is already
|
|||
|
* assigned there, and it must not be in edx, since edx is
|
|||
|
* overwritten by the multiply before a and b are read.)
|
|||
|
*
|
|||
|
* Note that GCC uses AT&T assembler syntax, which is rather
|
|||
|
* different from Intel syntax. The length (b, w or l) of the
|
|||
|
* operation is appended to the opcode, and the *second* operand
|
|||
|
* is the destination, not the first. Finally, the register names
|
|||
|
* are all preceded with "%". (Doubled here because % is a
|
|||
|
* magic character.)
|
|||
|
*/
|
|||
|
|
|||
|
/* (ph<<32) + pl = x*y */
|
|||
|
#define mul32_ppmm(ph,pl,x,y) \
|
|||
|
__asm__("mull %3" : "=d"(ph), "=a"(pl) : "%a"(x), "g"(y))
|
|||
|
|
|||
|
/* (ph<<32) + pl = x*y + a */
|
|||
|
#define mul32_ppmma(ph,pl,x,y,a) \
|
|||
|
__asm__("mull %3\n\t" \
|
|||
|
"addl %4,%%eax\n\t" \
|
|||
|
"adcl %5,%%edx" \
|
|||
|
: "=&d"(ph), "=a"(pl) \
|
|||
|
: "%a"(x), "g"(y), "bcDSmn"(a), "bcDSmn"(0))
|
|||
|
|
|||
|
/* (ph<<32) + pl = x*y + a + b */
|
|||
|
#define mul32_ppmmaa(ph,pl,x,y,a,b) \
|
|||
|
__asm__("mull %3\n\t" \
|
|||
|
"addl %4,%%eax\n\t" \
|
|||
|
"adcl %6,%%edx\n\t" \
|
|||
|
"addl %5,%%eax\n\t" \
|
|||
|
"adcl %6,%%edx" \
|
|||
|
: "=&d"(ph), "=a"(pl) \
|
|||
|
: "%a"(x), "g"(y), "%bcDSmn"(a), "bcDSmn"(b), "bcDSmn"(0))
|
|||
|
|
|||
|
/* q = ((nh<<32) + nl) / d, return remainder. nh guaranteed < d. */
|
|||
|
#undef lbnDiv21_32
|
|||
|
#define lbnDiv21_32(q,nh,nl,d) \
|
|||
|
({unsigned _; \
|
|||
|
__asm__("divl %4" : "=d"(_), "=a"(*q) : "d"(nh), "a"(nl), "g"(d)); \
|
|||
|
_;})
|
|||
|
|
|||
|
/* No quotient, just return remainder ((nh<<32) + nl) % d */
|
|||
|
#define lbnMod21_32(nh,nl,d) \
|
|||
|
({unsigned _; \
|
|||
|
__asm__("divl %3" : "=d"(_) : "d"(nh), "a"(nl), "g"(d) : "ax"); \
|
|||
|
_;})
|
|||
|
|
|||
|
#endif /* __GNUC__ */
|