14 lines
309 B
C
14 lines
309 B
C
|
#include "fe25519.h"
|
||
|
#include "sc25519.h"
|
||
|
#include "ge25519.h"
|
||
|
|
||
|
void ge25519_pack(unsigned char r[32], const ge25519_p3 *p)
|
||
|
{
|
||
|
fe25519 tx, ty, zi;
|
||
|
fe25519_invert(&zi, &p->z);
|
||
|
fe25519_mul(&tx, &p->x, &zi);
|
||
|
fe25519_mul(&ty, &p->y, &zi);
|
||
|
fe25519_pack(r, &ty);
|
||
|
r[31] ^= fe25519_getparity(&tx) << 7;
|
||
|
}
|