Files
MP-SPDZ/Math/gf2nlong.h
Marcel Keller 0f656fa7b7 ARM support.
2021-04-19 21:28:22 +10:00

335 lines
9.6 KiB
C++

/*
* gf2nlong.h
*
*/
#ifndef MATH_GF2NLONG_H_
#define MATH_GF2NLONG_H_
#include <stdlib.h>
#include <string.h>
#include <iostream>
using namespace std;
#include "Tools/random.h"
#include "Tools/intrinsics.h"
#include "Math/field_types.h"
#include "Math/bigint.h"
class int128
{
public:
__m128i a;
int128() : a(_mm_setzero_si128()) { }
int128(const __m128i& a) : a(a) { }
int128(const word& a) : a(_mm_cvtsi64_si128(a)) { }
int128(const word& upper, const word& lower) : a(_mm_set_epi64x(upper, lower)) { }
word get_lower() const { return (word)_mm_cvtsi128_si64(a); }
word get_upper() const { return _mm_cvtsi128_si64(_mm_unpackhi_epi64(a, a)); }
word get_half(bool upper) const { return upper ? get_upper() : get_lower(); }
#ifdef __SSE41__
bool operator==(const int128& other) const { return _mm_test_all_zeros(a ^ other.a, a ^ other.a); }
#else
bool operator==(const int128& other) const { return get_lower() == other.get_lower() and get_upper() == other.get_upper(); }
#endif
bool operator!=(const int128& other) const { return !(*this == other); }
int128 operator<<(const int& other) const;
int128 operator>>(const int& other) const;
int128 operator^(const int128& other) const { return a ^ other.a; }
int128 operator|(const int128& other) const { return a | other.a; }
int128 operator&(const int128& other) const { return a & other.a; }
int128 operator~() const { return ~a; }
int128& operator<<=(const int& other) { return *this = *this << other; }
int128& operator>>=(const int& other) { return *this = *this >> other; }
int128& operator^=(const int128& other) { a ^= other.a; return *this; }
int128& operator|=(const int128& other) { a |= other.a; return *this; }
int128& operator&=(const int128& other) { a &= other.a; return *this; }
friend ostream& operator<<(ostream& s, const int128& a);
bool get_bit(int i) const;
};
template<class T> class Input;
template<class T> class PrivateOutput;
template<class T> class SPDZ;
template<class T> class Share;
template<class T> class Square;
namespace GC
{
class NoValue;
}
/* This interface compatible with the gfp interface
* which then allows us to template the Share
* data type.
*/
/*
Arithmetic in Gf_{2^n} with n<=128
*/
class gf2n_long : public ValueInterface
{
int128 a;
static int n,t1,t2,t3,nterms;
static int l0,l1,l2,l3;
static int128 mask,lowermask,uppermask;
/* Assign x[0..2*nwords] to a and reduce it... */
void reduce_trinomial(int128 xh,int128 xl);
void reduce_pentanomial(int128 xh,int128 xl);
public:
typedef gf2n_long value_type;
typedef int128 internal_type;
typedef gf2n_long next;
typedef ::Square<gf2n_long> Square;
const static int MAX_N_BITS = 128;
const static int N_BYTES = sizeof(a);
typedef gf2n_long Scalar;
void reduce(int128 xh,int128 xl)
{
if (nterms==3)
{ reduce_pentanomial(xh,xl); }
else
{ reduce_trinomial(xh,xl); }
}
static void init_field(int nn);
static int degree() { return n; }
static int length() { return n; }
static int default_degree() { return 128; }
static int get_nterms() { return nterms; }
static int get_t(int i)
{ if (i==0) { return t1; }
else if (i==1) { return t2; }
else if (i==2) { return t3; }
return -1;
}
static DataFieldType field_type() { return DATA_GF2N; }
static char type_char() { return '2'; }
static string type_short() { return "2"; }
static string type_string() { return "gf2n_long"; }
static int size() { return sizeof(a); }
static int size_in_bits() { return sizeof(a) * 8; }
static bool allows(Dtype type) { (void) type; return true; }
static const true_type invertible;
static const true_type characteristic_two;
static gf2n_long cut(int128 x) { return x; }
static gf2n_long Mul(gf2n_long a, gf2n_long b) { return a * b; }
int128 get() const { return a; }
word get_word() const { return _mm_cvtsi128_si64(a.a); }
const void* get_ptr() const { return &a.a; }
void assign_zero() { a=_mm_setzero_si128(); }
void assign_one() { a=int128(0,1); }
void assign_x() { a=int128(0,2); }
void assign(const void* buffer) { a = _mm_loadu_si128((__m128i*)buffer); }
int get_bit(int i) const
{ return ((a>>i)&1).get_lower(); }
gf2n_long() { assign_zero(); }
gf2n_long(const int128& g) : a(g & mask) {}
gf2n_long(int g) : gf2n_long(int128(unsigned(g))) {}
template<class T>
gf2n_long(IntBase<T> g) : a(g.get()) {}
int is_zero() const { return a==int128(0); }
int is_one() const { return a==int128(1); }
int equal(const gf2n_long& y) const { return (a==y.a); }
bool operator==(const gf2n_long& y) const { return a==y.a; }
bool operator!=(const gf2n_long& y) const { return a!=y.a; }
// x+y
void add(const gf2n_long& x,const gf2n_long& y)
{ a=x.a^y.a; }
void add(octet* x)
{ a^=int128(_mm_loadu_si128((__m128i*)x)); }
void add(octetStream& os)
{ add(os.consume(size())); }
void sub(const gf2n_long& x,const gf2n_long& y)
{ a=x.a^y.a; }
// = x * y
gf2n_long& mul(const gf2n_long& x,const gf2n_long& y);
// x * y when one of x,y is a bit
void mul_by_bit(const gf2n_long& x, const gf2n_long& y) { a = x.a.a * y.a.a; }
gf2n_long lazy_add(const gf2n_long& x) const { return *this + x; }
gf2n_long lazy_mul(const gf2n_long& x) const { return *this * x; }
gf2n_long operator+(const gf2n_long& x) const { gf2n_long res; res.add(*this, x); return res; }
gf2n_long operator*(const gf2n_long& x) const { gf2n_long res; res.mul(*this, x); return res; }
gf2n_long& operator+=(const gf2n_long& x) { add(*this, x); return *this; }
gf2n_long& operator*=(const gf2n_long& x) { mul(*this, x); return *this; }
gf2n_long operator-(const gf2n_long& x) const { gf2n_long res; res.add(*this, x); return res; }
gf2n_long& operator-=(const gf2n_long& x) { sub(*this, x); return *this; }
gf2n_long operator/(const gf2n_long& x) const { return *this * x.invert(); }
gf2n_long invert() const;
void negate() { return; }
/* Bitwise Ops */
gf2n_long operator&(const gf2n_long& x) const { return a & x.a; }
gf2n_long operator^(const gf2n_long& x) const { return a ^ x.a; }
gf2n_long operator|(const gf2n_long& x) const { return a | x.a; }
gf2n_long operator~() const { return ~a; }
gf2n_long operator<<(int i) const { return a << i; }
gf2n_long operator>>(int i) const { return a >> i; }
gf2n_long& operator&=(const gf2n_long& x) { *this = *this & x; return *this; }
gf2n_long& operator^=(const gf2n_long& x) { *this = *this ^ x; return *this; }
gf2n_long& operator>>=(int i) { *this = *this >> i; return *this; }
gf2n_long& operator<<=(int i) { *this = *this << i; return *this; }
/* Crap RNG */
void randomize(PRNG& G, int n = -1);
// compatibility with gfp
void almost_randomize(PRNG& G) { randomize(G); }
void force_to_bit() { a &= 1; }
void output(ostream& s,bool human) const;
void input(istream& s,bool human);
friend ostream& operator<<(ostream& s,const gf2n_long& x)
{ s << hex << x.a << dec;
return s;
}
friend istream& operator>>(istream& s,gf2n_long& x)
{ bigint tmp;
s >> hex >> tmp >> dec;
x.a = 0;
auto size = tmp.get_mpz_t()->_mp_size;
assert(size >= 0);
assert(size <= 2);
mpn_copyi((mp_limb_t*)&x.a.a, tmp.get_mpz_t()->_mp_d, size);
return s;
}
// Pack and unpack in native format
// i.e. Dont care about conversion to human readable form
void pack(octetStream& o, int n = -1) const
{ (void) n; o.append((octet*) &a,sizeof(__m128i)); }
void unpack(octetStream& o, int n = -1)
{ (void) n; o.consume((octet*) &a,sizeof(__m128i)); }
};
inline int128 int128::operator<<(const int& other) const
{
int128 res(_mm_slli_epi64(a, other));
__m128i mask;
if (other < 64)
mask = _mm_srli_epi64(a, 64 - other);
else
mask = _mm_slli_epi64(a, other - 64);
res.a ^= _mm_slli_si128(mask, 8);
return res;
}
inline int128 int128::operator>>(const int& other) const
{
int128 res(_mm_srli_epi64(a, other));
__m128i mask;
if (other < 64)
mask = _mm_slli_epi64(a, 64 - other);
else
mask = _mm_srli_epi64(a, other - 64);
res.a ^= _mm_srli_si128(mask, 8);
return res;
}
void mul64(word x, word y, word& lo, word& hi);
inline __m128i software_clmul(__m128i a, __m128i b, int choice)
{
word lo, hi;
mul64(int128(a).get_half(choice & 1),
int128(b).get_half((choice & 0x10) >> 4), lo, hi);
return int128(hi, lo).a;
}
template<int choice>
inline __m128i clmul(__m128i a, __m128i b)
{
#if defined(__PCLMUL__) || !defined(__x86_64__)
if (cpu_has_pclmul())
{
return _mm_clmulepi64_si128(a, b, choice);
}
else
#endif
return software_clmul(a, b, choice);
}
inline void mul128(__m128i a, __m128i b, __m128i *res1, __m128i *res2)
{
__m128i tmp3, tmp4, tmp5, tmp6;
tmp3 = clmul<0x00>(a, b);
tmp4 = clmul<0x10>(a, b);
tmp5 = clmul<0x01>(a, b);
tmp6 = clmul<0x11>(a, b);
tmp4 = _mm_xor_si128(tmp4, tmp5);
tmp5 = _mm_slli_si128(tmp4, 8);
tmp4 = _mm_srli_si128(tmp4, 8);
tmp3 = _mm_xor_si128(tmp3, tmp5);
tmp6 = _mm_xor_si128(tmp6, tmp4);
// initial mul now in tmp3, tmp6
*res1 = tmp3;
*res2 = tmp6;
}
inline bool int128::get_bit(int i) const
{
if (i < 64)
return (get_lower() >> i) & 1;
else
return (get_upper() >> (i - 64)) & 1;
}
inline gf2n_long& gf2n_long::mul(const gf2n_long& x,const gf2n_long& y)
{
__m128i res[2];
memset(res,0,sizeof(res));
mul128(x.a.a,y.a.a,res,res+1);
reduce(res[1],res[0]);
return *this;
}
#endif /* MATH_GF2NLONG_H_ */