Edit File by line

<?php

[0] Fix | Delete

[1] Fix | Delete

if (class_exists('ParagonIE_Sodium_Core_X25519', false)) {

[2] Fix | Delete

return;

[3] Fix | Delete

}

[4] Fix | Delete

[5] Fix | Delete

/**

[6] Fix | Delete

* Class ParagonIE_Sodium_Core_X25519

[7] Fix | Delete

[8] Fix | Delete

abstract class ParagonIE_Sodium_Core_X25519 extends ParagonIE_Sodium_Core_Curve25519

[9] Fix | Delete

{

[10] Fix | Delete

/**

[11] Fix | Delete

* Alters the objects passed to this method in place.

[12] Fix | Delete

[13] Fix | Delete

* @internal You should not use this directly from another application

[14] Fix | Delete

[15] Fix | Delete

* @param ParagonIE_Sodium_Core_Curve25519_Fe $f

[16] Fix | Delete

* @param ParagonIE_Sodium_Core_Curve25519_Fe $g

[17] Fix | Delete

* @param int $b

[18] Fix | Delete

* @return void

[19] Fix | Delete

* @psalm-suppress MixedAssignment

[20] Fix | Delete

[21] Fix | Delete

public static function fe_cswap(

[22] Fix | Delete

ParagonIE_Sodium_Core_Curve25519_Fe $f,

[23] Fix | Delete

ParagonIE_Sodium_Core_Curve25519_Fe $g,

[24] Fix | Delete

$b = 0

[25] Fix | Delete

) {

[26] Fix | Delete

$f0 = (int) $f[0];

[27] Fix | Delete

$f1 = (int) $f[1];

[28] Fix | Delete

$f2 = (int) $f[2];

[29] Fix | Delete

$f3 = (int) $f[3];

[30] Fix | Delete

$f4 = (int) $f[4];

[31] Fix | Delete

$f5 = (int) $f[5];

[32] Fix | Delete

$f6 = (int) $f[6];

[33] Fix | Delete

$f7 = (int) $f[7];

[34] Fix | Delete

$f8 = (int) $f[8];

[35] Fix | Delete

$f9 = (int) $f[9];

[36] Fix | Delete

$g0 = (int) $g[0];

[37] Fix | Delete

$g1 = (int) $g[1];

[38] Fix | Delete

$g2 = (int) $g[2];

[39] Fix | Delete

$g3 = (int) $g[3];

[40] Fix | Delete

$g4 = (int) $g[4];

[41] Fix | Delete

$g5 = (int) $g[5];

[42] Fix | Delete

$g6 = (int) $g[6];

[43] Fix | Delete

$g7 = (int) $g[7];

[44] Fix | Delete

$g8 = (int) $g[8];

[45] Fix | Delete

$g9 = (int) $g[9];

[46] Fix | Delete

$b = -$b;

[47] Fix | Delete

$x0 = ($f0 ^ $g0) & $b;

[48] Fix | Delete

$x1 = ($f1 ^ $g1) & $b;

[49] Fix | Delete

$x2 = ($f2 ^ $g2) & $b;

[50] Fix | Delete

$x3 = ($f3 ^ $g3) & $b;

[51] Fix | Delete

$x4 = ($f4 ^ $g4) & $b;

[52] Fix | Delete

$x5 = ($f5 ^ $g5) & $b;

[53] Fix | Delete

$x6 = ($f6 ^ $g6) & $b;

[54] Fix | Delete

$x7 = ($f7 ^ $g7) & $b;

[55] Fix | Delete

$x8 = ($f8 ^ $g8) & $b;

[56] Fix | Delete

$x9 = ($f9 ^ $g9) & $b;

[57] Fix | Delete

$f[0] = $f0 ^ $x0;

[58] Fix | Delete

$f[1] = $f1 ^ $x1;

[59] Fix | Delete

$f[2] = $f2 ^ $x2;

[60] Fix | Delete

$f[3] = $f3 ^ $x3;

[61] Fix | Delete

$f[4] = $f4 ^ $x4;

[62] Fix | Delete

$f[5] = $f5 ^ $x5;

[63] Fix | Delete

$f[6] = $f6 ^ $x6;

[64] Fix | Delete

$f[7] = $f7 ^ $x7;

[65] Fix | Delete

$f[8] = $f8 ^ $x8;

[66] Fix | Delete

$f[9] = $f9 ^ $x9;

[67] Fix | Delete

$g[0] = $g0 ^ $x0;

[68] Fix | Delete

$g[1] = $g1 ^ $x1;

[69] Fix | Delete

$g[2] = $g2 ^ $x2;

[70] Fix | Delete

$g[3] = $g3 ^ $x3;

[71] Fix | Delete

$g[4] = $g4 ^ $x4;

[72] Fix | Delete

$g[5] = $g5 ^ $x5;

[73] Fix | Delete

$g[6] = $g6 ^ $x6;

[74] Fix | Delete

$g[7] = $g7 ^ $x7;

[75] Fix | Delete

$g[8] = $g8 ^ $x8;

[76] Fix | Delete

$g[9] = $g9 ^ $x9;

[77] Fix | Delete

}

[78] Fix | Delete

[79] Fix | Delete

/**

[80] Fix | Delete

* @internal You should not use this directly from another application

[81] Fix | Delete

[82] Fix | Delete

* @param ParagonIE_Sodium_Core_Curve25519_Fe $f

[83] Fix | Delete

* @return ParagonIE_Sodium_Core_Curve25519_Fe

[84] Fix | Delete

[85] Fix | Delete

public static function fe_mul121666(ParagonIE_Sodium_Core_Curve25519_Fe $f)

[86] Fix | Delete

{

[87] Fix | Delete

$h = array(

[88] Fix | Delete

self::mul((int) $f[0], 121666, 17),

[89] Fix | Delete

self::mul((int) $f[1], 121666, 17),

[90] Fix | Delete

self::mul((int) $f[2], 121666, 17),

[91] Fix | Delete

self::mul((int) $f[3], 121666, 17),

[92] Fix | Delete

self::mul((int) $f[4], 121666, 17),

[93] Fix | Delete

self::mul((int) $f[5], 121666, 17),

[94] Fix | Delete

self::mul((int) $f[6], 121666, 17),

[95] Fix | Delete

self::mul((int) $f[7], 121666, 17),

[96] Fix | Delete

self::mul((int) $f[8], 121666, 17),

[97] Fix | Delete

self::mul((int) $f[9], 121666, 17)

[98] Fix | Delete

);

[99] Fix | Delete

[100] Fix | Delete

/** @var int $carry9 */

[101] Fix | Delete

$carry9 = ($h[9] + (1 << 24)) >> 25;

[102] Fix | Delete

$h[0] += self::mul($carry9, 19, 5);

[103] Fix | Delete

$h[9] -= $carry9 << 25;

[104] Fix | Delete

/** @var int $carry1 */

[105] Fix | Delete

$carry1 = ($h[1] + (1 << 24)) >> 25;

[106] Fix | Delete

$h[2] += $carry1;

[107] Fix | Delete

$h[1] -= $carry1 << 25;

[108] Fix | Delete

/** @var int $carry3 */

[109] Fix | Delete

$carry3 = ($h[3] + (1 << 24)) >> 25;

[110] Fix | Delete

$h[4] += $carry3;

[111] Fix | Delete

$h[3] -= $carry3 << 25;

[112] Fix | Delete

/** @var int $carry5 */

[113] Fix | Delete

$carry5 = ($h[5] + (1 << 24)) >> 25;

[114] Fix | Delete

$h[6] += $carry5;

[115] Fix | Delete

$h[5] -= $carry5 << 25;

[116] Fix | Delete

/** @var int $carry7 */

[117] Fix | Delete

$carry7 = ($h[7] + (1 << 24)) >> 25;

[118] Fix | Delete

$h[8] += $carry7;

[119] Fix | Delete

$h[7] -= $carry7 << 25;

[120] Fix | Delete

[121] Fix | Delete

/** @var int $carry0 */

[122] Fix | Delete

$carry0 = ($h[0] + (1 << 25)) >> 26;

[123] Fix | Delete

$h[1] += $carry0;

[124] Fix | Delete

$h[0] -= $carry0 << 26;

[125] Fix | Delete

/** @var int $carry2 */

[126] Fix | Delete

$carry2 = ($h[2] + (1 << 25)) >> 26;

[127] Fix | Delete

$h[3] += $carry2;

[128] Fix | Delete

$h[2] -= $carry2 << 26;

[129] Fix | Delete

/** @var int $carry4 */

[130] Fix | Delete

$carry4 = ($h[4] + (1 << 25)) >> 26;

[131] Fix | Delete

$h[5] += $carry4;

[132] Fix | Delete

$h[4] -= $carry4 << 26;

[133] Fix | Delete

/** @var int $carry6 */

[134] Fix | Delete

$carry6 = ($h[6] + (1 << 25)) >> 26;

[135] Fix | Delete

$h[7] += $carry6;

[136] Fix | Delete

$h[6] -= $carry6 << 26;

[137] Fix | Delete

/** @var int $carry8 */

[138] Fix | Delete

$carry8 = ($h[8] + (1 << 25)) >> 26;

[139] Fix | Delete

$h[9] += $carry8;

[140] Fix | Delete

$h[8] -= $carry8 << 26;

[141] Fix | Delete

[142] Fix | Delete

foreach ($h as $i => $value) {

[143] Fix | Delete

$h[$i] = (int) $value;

[144] Fix | Delete

}

[145] Fix | Delete

return ParagonIE_Sodium_Core_Curve25519_Fe::fromArray($h);

[146] Fix | Delete

}

[147] Fix | Delete

[148] Fix | Delete

/**

[149] Fix | Delete

* @internal You should not use this directly from another application

[150] Fix | Delete

[151] Fix | Delete

* Inline comments preceded by # are from libsodium's ref10 code.

[152] Fix | Delete

[153] Fix | Delete

* @param string $n

[154] Fix | Delete

* @param string $p

[155] Fix | Delete

* @return string

[156] Fix | Delete

* @throws SodiumException

[157] Fix | Delete

* @throws TypeError

[158] Fix | Delete

[159] Fix | Delete

public static function crypto_scalarmult_curve25519_ref10($n, $p)

[160] Fix | Delete

{

[161] Fix | Delete

# for (i = 0;i < 32;++i) e[i] = n[i];

[162] Fix | Delete

$e = '' . $n;

[163] Fix | Delete

# e[0] &= 248;

[164] Fix | Delete

$e[0] = self::intToChr(

[165] Fix | Delete

self::chrToInt($e[0]) & 248

[166] Fix | Delete

);

[167] Fix | Delete

# e[31] &= 127;

[168] Fix | Delete

# e[31] |= 64;

[169] Fix | Delete

$e[31] = self::intToChr(

[170] Fix | Delete

(self::chrToInt($e[31]) & 127) | 64

[171] Fix | Delete

);

[172] Fix | Delete

# fe_frombytes(x1,p);

[173] Fix | Delete

$x1 = self::fe_frombytes($p);

[174] Fix | Delete

# fe_1(x2);

[175] Fix | Delete

$x2 = self::fe_1();

[176] Fix | Delete

# fe_0(z2);

[177] Fix | Delete

$z2 = self::fe_0();

[178] Fix | Delete

# fe_copy(x3,x1);

[179] Fix | Delete

$x3 = self::fe_copy($x1);

[180] Fix | Delete

# fe_1(z3);

[181] Fix | Delete

$z3 = self::fe_1();

[182] Fix | Delete

[183] Fix | Delete

# swap = 0;

[184] Fix | Delete

/** @var int $swap */

[185] Fix | Delete

$swap = 0;

[186] Fix | Delete

[187] Fix | Delete

# for (pos = 254;pos >= 0;--pos) {

[188] Fix | Delete

for ($pos = 254; $pos >= 0; --$pos) {

[189] Fix | Delete

# b = e[pos / 8] >> (pos & 7);

[190] Fix | Delete

/** @var int $b */

[191] Fix | Delete

$b = self::chrToInt(

[192] Fix | Delete

$e[(int) floor($pos / 8)]

[193] Fix | Delete

) >> ($pos & 7);

[194] Fix | Delete

# b &= 1;

[195] Fix | Delete

$b &= 1;

[196] Fix | Delete

# swap ^= b;

[197] Fix | Delete

$swap ^= $b;

[198] Fix | Delete

# fe_cswap(x2,x3,swap);

[199] Fix | Delete

self::fe_cswap($x2, $x3, $swap);

[200] Fix | Delete

# fe_cswap(z2,z3,swap);

[201] Fix | Delete

self::fe_cswap($z2, $z3, $swap);

[202] Fix | Delete

# swap = b;

[203] Fix | Delete

$swap = $b;

[204] Fix | Delete

# fe_sub(tmp0,x3,z3);

[205] Fix | Delete

$tmp0 = self::fe_sub($x3, $z3);

[206] Fix | Delete

# fe_sub(tmp1,x2,z2);

[207] Fix | Delete

$tmp1 = self::fe_sub($x2, $z2);

[208] Fix | Delete

[209] Fix | Delete

# fe_add(x2,x2,z2);

[210] Fix | Delete

$x2 = self::fe_add($x2, $z2);

[211] Fix | Delete

[212] Fix | Delete

# fe_add(z2,x3,z3);

[213] Fix | Delete

$z2 = self::fe_add($x3, $z3);

[214] Fix | Delete

[215] Fix | Delete

# fe_mul(z3,tmp0,x2);

[216] Fix | Delete

$z3 = self::fe_mul($tmp0, $x2);

[217] Fix | Delete

[218] Fix | Delete

# fe_mul(z2,z2,tmp1);

[219] Fix | Delete

$z2 = self::fe_mul($z2, $tmp1);

[220] Fix | Delete

[221] Fix | Delete

# fe_sq(tmp0,tmp1);

[222] Fix | Delete

$tmp0 = self::fe_sq($tmp1);

[223] Fix | Delete

[224] Fix | Delete

# fe_sq(tmp1,x2);

[225] Fix | Delete

$tmp1 = self::fe_sq($x2);

[226] Fix | Delete

[227] Fix | Delete

# fe_add(x3,z3,z2);

[228] Fix | Delete

$x3 = self::fe_add($z3, $z2);

[229] Fix | Delete

[230] Fix | Delete

# fe_sub(z2,z3,z2);

[231] Fix | Delete

$z2 = self::fe_sub($z3, $z2);

[232] Fix | Delete

[233] Fix | Delete

# fe_mul(x2,tmp1,tmp0);

[234] Fix | Delete

$x2 = self::fe_mul($tmp1, $tmp0);

[235] Fix | Delete

[236] Fix | Delete

# fe_sub(tmp1,tmp1,tmp0);

[237] Fix | Delete

$tmp1 = self::fe_sub($tmp1, $tmp0);

[238] Fix | Delete

[239] Fix | Delete

# fe_sq(z2,z2);

[240] Fix | Delete

$z2 = self::fe_sq($z2);

[241] Fix | Delete

[242] Fix | Delete

# fe_mul121666(z3,tmp1);

[243] Fix | Delete

$z3 = self::fe_mul121666($tmp1);

[244] Fix | Delete

[245] Fix | Delete

# fe_sq(x3,x3);

[246] Fix | Delete

$x3 = self::fe_sq($x3);

[247] Fix | Delete

[248] Fix | Delete

# fe_add(tmp0,tmp0,z3);

[249] Fix | Delete

$tmp0 = self::fe_add($tmp0, $z3);

[250] Fix | Delete

[251] Fix | Delete

# fe_mul(z3,x1,z2);

[252] Fix | Delete

$z3 = self::fe_mul($x1, $z2);

[253] Fix | Delete

[254] Fix | Delete

# fe_mul(z2,tmp1,tmp0);

[255] Fix | Delete

$z2 = self::fe_mul($tmp1, $tmp0);

[256] Fix | Delete

}

[257] Fix | Delete

[258] Fix | Delete

# fe_cswap(x2,x3,swap);

[259] Fix | Delete

self::fe_cswap($x2, $x3, $swap);

[260] Fix | Delete

[261] Fix | Delete

# fe_cswap(z2,z3,swap);

[262] Fix | Delete

self::fe_cswap($z2, $z3, $swap);

[263] Fix | Delete

[264] Fix | Delete

# fe_invert(z2,z2);

[265] Fix | Delete

$z2 = self::fe_invert($z2);

[266] Fix | Delete

[267] Fix | Delete

# fe_mul(x2,x2,z2);

[268] Fix | Delete

$x2 = self::fe_mul($x2, $z2);

[269] Fix | Delete

# fe_tobytes(q,x2);

[270] Fix | Delete

return self::fe_tobytes($x2);

[271] Fix | Delete

}

[272] Fix | Delete

[273] Fix | Delete

/**

[274] Fix | Delete

* @internal You should not use this directly from another application

[275] Fix | Delete

[276] Fix | Delete

* @param ParagonIE_Sodium_Core_Curve25519_Fe $edwardsY

[277] Fix | Delete

* @param ParagonIE_Sodium_Core_Curve25519_Fe $edwardsZ

[278] Fix | Delete

* @return ParagonIE_Sodium_Core_Curve25519_Fe

[279] Fix | Delete

[280] Fix | Delete

public static function edwards_to_montgomery(

[281] Fix | Delete

ParagonIE_Sodium_Core_Curve25519_Fe $edwardsY,

[282] Fix | Delete

ParagonIE_Sodium_Core_Curve25519_Fe $edwardsZ

[283] Fix | Delete

) {

[284] Fix | Delete

$tempX = self::fe_add($edwardsZ, $edwardsY);

[285] Fix | Delete

$tempZ = self::fe_sub($edwardsZ, $edwardsY);

[286] Fix | Delete

$tempZ = self::fe_invert($tempZ);

[287] Fix | Delete

return self::fe_mul($tempX, $tempZ);

[288] Fix | Delete

}

[289] Fix | Delete

[290] Fix | Delete

/**

[291] Fix | Delete

* @internal You should not use this directly from another application

[292] Fix | Delete

[293] Fix | Delete

* @param string $n

[294] Fix | Delete

* @return string

[295] Fix | Delete

* @throws SodiumException

[296] Fix | Delete

* @throws TypeError

[297] Fix | Delete

[298] Fix | Delete

public static function crypto_scalarmult_curve25519_ref10_base($n)

[299] Fix | Delete

{

[300] Fix | Delete

# for (i = 0;i < 32;++i) e[i] = n[i];

[301] Fix | Delete

$e = '' . $n;

[302] Fix | Delete

[303] Fix | Delete

# e[0] &= 248;

[304] Fix | Delete

$e[0] = self::intToChr(

[305] Fix | Delete

self::chrToInt($e[0]) & 248

[306] Fix | Delete

);

[307] Fix | Delete

[308] Fix | Delete

# e[31] &= 127;

[309] Fix | Delete

# e[31] |= 64;

[310] Fix | Delete

$e[31] = self::intToChr(

[311] Fix | Delete

(self::chrToInt($e[31]) & 127) | 64

[312] Fix | Delete

);

[313] Fix | Delete

[314] Fix | Delete

$A = self::ge_scalarmult_base($e);

[315] Fix | Delete

if (

[316] Fix | Delete

!($A->Y instanceof ParagonIE_Sodium_Core_Curve25519_Fe)

[317] Fix | Delete

[318] Fix | Delete

!($A->Z instanceof ParagonIE_Sodium_Core_Curve25519_Fe)

[319] Fix | Delete

) {

[320] Fix | Delete

throw new TypeError('Null points encountered');

[321] Fix | Delete

}

[322] Fix | Delete

$pk = self::edwards_to_montgomery($A->Y, $A->Z);

[323] Fix | Delete

return self::fe_tobytes($pk);

[324] Fix | Delete

}

[325] Fix | Delete

}

[326] Fix | Delete

[327] Fix | Delete