-rw-r--r-- 2079 **lib25519-20221222/crypto_mGnP/ed25519/amd64-51/fe25519_pack.c** raw

// linker define fe25519_pack
// linker use fe25519_freeze
#include "fe25519.h"
/* Assumes input x being reduced below 2^255 */
void fe25519_pack(unsigned char r[32], const fe25519 *x)
{
fe25519 t;
t = *x;
fe25519_freeze(&t);
r[0] = (unsigned char) ( t.v[0] & 0xff);
r[1] = (unsigned char) ((t.v[0] >> 8) & 0xff);
r[2] = (unsigned char) ((t.v[0] >> 16) & 0xff);
r[3] = (unsigned char) ((t.v[0] >> 24) & 0xff);
r[4] = (unsigned char) ((t.v[0] >> 32) & 0xff);
r[5] = (unsigned char) ((t.v[0] >> 40) & 0xff);
r[6] = (unsigned char) ((t.v[0] >> 48));
r[6] ^= (unsigned char) ((t.v[1] << 3) & 0xf8);
r[7] = (unsigned char) ((t.v[1] >> 5) & 0xff);
r[8] = (unsigned char) ((t.v[1] >> 13) & 0xff);
r[9] = (unsigned char) ((t.v[1] >> 21) & 0xff);
r[10] = (unsigned char) ((t.v[1] >> 29) & 0xff);
r[11] = (unsigned char) ((t.v[1] >> 37) & 0xff);
r[12] = (unsigned char) ((t.v[1] >> 45));
r[12] ^= (unsigned char) ((t.v[2] << 6) & 0xc0);
r[13] = (unsigned char) ((t.v[2] >> 2) & 0xff);
r[14] = (unsigned char) ((t.v[2] >> 10) & 0xff);
r[15] = (unsigned char) ((t.v[2] >> 18) & 0xff);
r[16] = (unsigned char) ((t.v[2] >> 26) & 0xff);
r[17] = (unsigned char) ((t.v[2] >> 34) & 0xff);
r[18] = (unsigned char) ((t.v[2] >> 42) & 0xff);
r[19] = (unsigned char) ((t.v[2] >> 50));
r[19] ^= (unsigned char) ((t.v[3] << 1) & 0xfe);
r[20] = (unsigned char) ((t.v[3] >> 7) & 0xff);
r[21] = (unsigned char) ((t.v[3] >> 15) & 0xff);
r[22] = (unsigned char) ((t.v[3] >> 23) & 0xff);
r[23] = (unsigned char) ((t.v[3] >> 31) & 0xff);
r[24] = (unsigned char) ((t.v[3] >> 39) & 0xff);
r[25] = (unsigned char) ((t.v[3] >> 47));
r[25] ^= (unsigned char) ((t.v[4] << 4) & 0xf0);
r[26] = (unsigned char) ((t.v[4] >> 4) & 0xff);
r[27] = (unsigned char) ((t.v[4] >> 12) & 0xff);
r[28] = (unsigned char) ((t.v[4] >> 20) & 0xff);
r[29] = (unsigned char) ((t.v[4] >> 28) & 0xff);
r[30] = (unsigned char) ((t.v[4] >> 36) & 0xff);
r[31] = (unsigned char) ((t.v[4] >> 44));
}