Edit File by line

<?php

[0] Fix | Delete

[1] Fix | Delete

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

[2] Fix | Delete

return;

[3] Fix | Delete

}

[4] Fix | Delete

[5] Fix | Delete

/**

[6] Fix | Delete

* Class ParagonIE_SodiumCompat_Core_SipHash

[7] Fix | Delete

[8] Fix | Delete

* Only uses 32-bit arithmetic, while the original SipHash used 64-bit integers

[9] Fix | Delete

[10] Fix | Delete

class ParagonIE_Sodium_Core_SipHash extends ParagonIE_Sodium_Core_Util

[11] Fix | Delete

{

[12] Fix | Delete

/**

[13] Fix | Delete

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

[14] Fix | Delete

[15] Fix | Delete

* @param int[] $v

[16] Fix | Delete

* @return int[]

[17] Fix | Delete

[18] Fix | Delete

[19] Fix | Delete

public static function sipRound(array $v)

[20] Fix | Delete

{

[21] Fix | Delete

# v0 += v1;

[22] Fix | Delete

list($v[0], $v[1]) = self::add(

[23] Fix | Delete

array($v[0], $v[1]),

[24] Fix | Delete

array($v[2], $v[3])

[25] Fix | Delete

);

[26] Fix | Delete

[27] Fix | Delete

# v1=ROTL(v1,13);

[28] Fix | Delete

list($v[2], $v[3]) = self::rotl_64((int) $v[2], (int) $v[3], 13);

[29] Fix | Delete

[30] Fix | Delete

# v1 ^= v0;

[31] Fix | Delete

$v[2] = (int) $v[2] ^ (int) $v[0];

[32] Fix | Delete

$v[3] = (int) $v[3] ^ (int) $v[1];

[33] Fix | Delete

[34] Fix | Delete

# v0=ROTL(v0,32);

[35] Fix | Delete

list($v[0], $v[1]) = self::rotl_64((int) $v[0], (int) $v[1], 32);

[36] Fix | Delete

[37] Fix | Delete

# v2 += v3;

[38] Fix | Delete

list($v[4], $v[5]) = self::add(

[39] Fix | Delete

array((int) $v[4], (int) $v[5]),

[40] Fix | Delete

array((int) $v[6], (int) $v[7])

[41] Fix | Delete

);

[42] Fix | Delete

[43] Fix | Delete

# v3=ROTL(v3,16);

[44] Fix | Delete

list($v[6], $v[7]) = self::rotl_64((int) $v[6], (int) $v[7], 16);

[45] Fix | Delete

[46] Fix | Delete

# v3 ^= v2;

[47] Fix | Delete

$v[6] = (int) $v[6] ^ (int) $v[4];

[48] Fix | Delete

$v[7] = (int) $v[7] ^ (int) $v[5];

[49] Fix | Delete

[50] Fix | Delete

# v0 += v3;

[51] Fix | Delete

list($v[0], $v[1]) = self::add(

[52] Fix | Delete

array((int) $v[0], (int) $v[1]),

[53] Fix | Delete

array((int) $v[6], (int) $v[7])

[54] Fix | Delete

);

[55] Fix | Delete

[56] Fix | Delete

# v3=ROTL(v3,21);

[57] Fix | Delete

list($v[6], $v[7]) = self::rotl_64((int) $v[6], (int) $v[7], 21);

[58] Fix | Delete

[59] Fix | Delete

# v3 ^= v0;

[60] Fix | Delete

$v[6] = (int) $v[6] ^ (int) $v[0];

[61] Fix | Delete

$v[7] = (int) $v[7] ^ (int) $v[1];

[62] Fix | Delete

[63] Fix | Delete

# v2 += v1;

[64] Fix | Delete

list($v[4], $v[5]) = self::add(

[65] Fix | Delete

array((int) $v[4], (int) $v[5]),

[66] Fix | Delete

array((int) $v[2], (int) $v[3])

[67] Fix | Delete

);

[68] Fix | Delete

[69] Fix | Delete

# v1=ROTL(v1,17);

[70] Fix | Delete

list($v[2], $v[3]) = self::rotl_64((int) $v[2], (int) $v[3], 17);

[71] Fix | Delete

[72] Fix | Delete

# v1 ^= v2;;

[73] Fix | Delete

$v[2] = (int) $v[2] ^ (int) $v[4];

[74] Fix | Delete

$v[3] = (int) $v[3] ^ (int) $v[5];

[75] Fix | Delete

[76] Fix | Delete

# v2=ROTL(v2,32)

[77] Fix | Delete

list($v[4], $v[5]) = self::rotl_64((int) $v[4], (int) $v[5], 32);

[78] Fix | Delete

[79] Fix | Delete

return $v;

[80] Fix | Delete

}

[81] Fix | Delete

[82] Fix | Delete

/**

[83] Fix | Delete

* Add two 32 bit integers representing a 64-bit integer.

[84] Fix | Delete

[85] Fix | Delete

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

[86] Fix | Delete

[87] Fix | Delete

* @param int[] $a

[88] Fix | Delete

* @param int[] $b

[89] Fix | Delete

* @return array<int, mixed>

[90] Fix | Delete

[91] Fix | Delete

public static function add(array $a, array $b)

[92] Fix | Delete

{

[93] Fix | Delete

/** @var int $x1 */

[94] Fix | Delete

$x1 = $a[1] + $b[1];

[95] Fix | Delete

/** @var int $c */

[96] Fix | Delete

$c = $x1 >> 32; // Carry if ($a + $b) > 0xffffffff

[97] Fix | Delete

/** @var int $x0 */

[98] Fix | Delete

$x0 = $a[0] + $b[0] + $c;

[99] Fix | Delete

return array(

[100] Fix | Delete

$x0 & 0xffffffff,

[101] Fix | Delete

$x1 & 0xffffffff

[102] Fix | Delete

);

[103] Fix | Delete

}

[104] Fix | Delete

[105] Fix | Delete

/**

[106] Fix | Delete

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

[107] Fix | Delete

[108] Fix | Delete

* @param int $int0

[109] Fix | Delete

* @param int $int1

[110] Fix | Delete

* @param int $c

[111] Fix | Delete

* @return array<int, mixed>

[112] Fix | Delete

[113] Fix | Delete

public static function rotl_64($int0, $int1, $c)

[114] Fix | Delete

{

[115] Fix | Delete

$int0 &= 0xffffffff;

[116] Fix | Delete

$int1 &= 0xffffffff;

[117] Fix | Delete

$c &= 63;

[118] Fix | Delete

if ($c === 32) {

[119] Fix | Delete

return array($int1, $int0);

[120] Fix | Delete

}

[121] Fix | Delete

if ($c > 31) {

[122] Fix | Delete

$tmp = $int1;

[123] Fix | Delete

$int1 = $int0;

[124] Fix | Delete

$int0 = $tmp;

[125] Fix | Delete

$c &= 31;

[126] Fix | Delete

}

[127] Fix | Delete

if ($c === 0) {

[128] Fix | Delete

return array($int0, $int1);

[129] Fix | Delete

}

[130] Fix | Delete

return array(

[131] Fix | Delete

0xffffffff & (

[132] Fix | Delete

($int0 << $c)

[133] Fix | Delete

[134] Fix | Delete

($int1 >> (32 - $c))

[135] Fix | Delete

[136] Fix | Delete

0xffffffff & (

[137] Fix | Delete

($int1 << $c)

[138] Fix | Delete

[139] Fix | Delete

($int0 >> (32 - $c))

[140] Fix | Delete

[141] Fix | Delete

);

[142] Fix | Delete

}

[143] Fix | Delete

[144] Fix | Delete

/**

[145] Fix | Delete

* Implements Siphash-2-4 using only 32-bit numbers.

[146] Fix | Delete

[147] Fix | Delete

* When we split an int into two, the higher bits go to the lower index.

[148] Fix | Delete

* e.g. 0xDEADBEEFAB10C92D becomes [

[149] Fix | Delete

* 0 => 0xDEADBEEF,

[150] Fix | Delete

* 1 => 0xAB10C92D

[151] Fix | Delete

* ].

[152] Fix | Delete

[153] Fix | Delete

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

[154] Fix | Delete

[155] Fix | Delete

* @param string $in

[156] Fix | Delete

* @param string $key

[157] Fix | Delete

* @return string

[158] Fix | Delete

* @throws SodiumException

[159] Fix | Delete

* @throws TypeError

[160] Fix | Delete

[161] Fix | Delete

public static function sipHash24($in, $key)

[162] Fix | Delete

{

[163] Fix | Delete

$inlen = self::strlen($in);

[164] Fix | Delete

[165] Fix | Delete

# /* "somepseudorandomlygeneratedbytes" */

[166] Fix | Delete

# u64 v0 = 0x736f6d6570736575ULL;

[167] Fix | Delete

# u64 v1 = 0x646f72616e646f6dULL;

[168] Fix | Delete

# u64 v2 = 0x6c7967656e657261ULL;

[169] Fix | Delete

# u64 v3 = 0x7465646279746573ULL;

[170] Fix | Delete

$v = array(

[171] Fix | Delete

0x736f6d65, // 0

[172] Fix | Delete

0x70736575, // 1

[173] Fix | Delete

0x646f7261, // 2

[174] Fix | Delete

0x6e646f6d, // 3

[175] Fix | Delete

0x6c796765, // 4

[176] Fix | Delete

0x6e657261, // 5

[177] Fix | Delete

0x74656462, // 6

[178] Fix | Delete

0x79746573 // 7

[179] Fix | Delete

);

[180] Fix | Delete

// v0 => $v[0], $v[1]

[181] Fix | Delete

// v1 => $v[2], $v[3]

[182] Fix | Delete

// v2 => $v[4], $v[5]

[183] Fix | Delete

// v3 => $v[6], $v[7]

[184] Fix | Delete

[185] Fix | Delete

# u64 k0 = LOAD64_LE( k );

[186] Fix | Delete

# u64 k1 = LOAD64_LE( k + 8 );

[187] Fix | Delete

$k = array(

[188] Fix | Delete

self::load_4(self::substr($key, 4, 4)),

[189] Fix | Delete

self::load_4(self::substr($key, 0, 4)),

[190] Fix | Delete

self::load_4(self::substr($key, 12, 4)),

[191] Fix | Delete

self::load_4(self::substr($key, 8, 4))

[192] Fix | Delete

);

[193] Fix | Delete

// k0 => $k[0], $k[1]

[194] Fix | Delete

// k1 => $k[2], $k[3]

[195] Fix | Delete

[196] Fix | Delete

# b = ( ( u64 )inlen ) << 56;

[197] Fix | Delete

$b = array(

[198] Fix | Delete

$inlen << 24,

[199] Fix | Delete

[200] Fix | Delete

);

[201] Fix | Delete

// See docblock for why the 0th index gets the higher bits.

[202] Fix | Delete

[203] Fix | Delete

# v3 ^= k1;

[204] Fix | Delete

$v[6] ^= $k[2];

[205] Fix | Delete

$v[7] ^= $k[3];

[206] Fix | Delete

# v2 ^= k0;

[207] Fix | Delete

$v[4] ^= $k[0];

[208] Fix | Delete

$v[5] ^= $k[1];

[209] Fix | Delete

# v1 ^= k1;

[210] Fix | Delete

$v[2] ^= $k[2];

[211] Fix | Delete

$v[3] ^= $k[3];

[212] Fix | Delete

# v0 ^= k0;

[213] Fix | Delete

$v[0] ^= $k[0];

[214] Fix | Delete

$v[1] ^= $k[1];

[215] Fix | Delete

[216] Fix | Delete

$left = $inlen;

[217] Fix | Delete

# for ( ; in != end; in += 8 )

[218] Fix | Delete

while ($left >= 8) {

[219] Fix | Delete

# m = LOAD64_LE( in );

[220] Fix | Delete

$m = array(

[221] Fix | Delete

self::load_4(self::substr($in, 4, 4)),

[222] Fix | Delete

self::load_4(self::substr($in, 0, 4))

[223] Fix | Delete

);

[224] Fix | Delete

[225] Fix | Delete

# v3 ^= m;

[226] Fix | Delete

$v[6] ^= $m[0];

[227] Fix | Delete

$v[7] ^= $m[1];

[228] Fix | Delete

[229] Fix | Delete

# SIPROUND;

[230] Fix | Delete

# SIPROUND;

[231] Fix | Delete

$v = self::sipRound($v);

[232] Fix | Delete

$v = self::sipRound($v);

[233] Fix | Delete

[234] Fix | Delete

# v0 ^= m;

[235] Fix | Delete

$v[0] ^= $m[0];

[236] Fix | Delete

$v[1] ^= $m[1];

[237] Fix | Delete

[238] Fix | Delete

$in = self::substr($in, 8);

[239] Fix | Delete

$left -= 8;

[240] Fix | Delete

}

[241] Fix | Delete

[242] Fix | Delete

# switch( left )

[243] Fix | Delete

# {

[244] Fix | Delete

# case 7: b |= ( ( u64 )in[ 6] ) << 48;

[245] Fix | Delete

# case 6: b |= ( ( u64 )in[ 5] ) << 40;

[246] Fix | Delete

# case 5: b |= ( ( u64 )in[ 4] ) << 32;

[247] Fix | Delete

# case 4: b |= ( ( u64 )in[ 3] ) << 24;

[248] Fix | Delete

# case 3: b |= ( ( u64 )in[ 2] ) << 16;

[249] Fix | Delete

# case 2: b |= ( ( u64 )in[ 1] ) << 8;

[250] Fix | Delete

# case 1: b |= ( ( u64 )in[ 0] ); break;

[251] Fix | Delete

# case 0: break;

[252] Fix | Delete

# }

[253] Fix | Delete

switch ($left) {

[254] Fix | Delete

case 7:

[255] Fix | Delete

$b[0] |= self::chrToInt($in[6]) << 16;

[256] Fix | Delete

case 6:

[257] Fix | Delete

$b[0] |= self::chrToInt($in[5]) << 8;

[258] Fix | Delete

case 5:

[259] Fix | Delete

$b[0] |= self::chrToInt($in[4]);

[260] Fix | Delete

case 4:

[261] Fix | Delete

$b[1] |= self::chrToInt($in[3]) << 24;

[262] Fix | Delete

case 3:

[263] Fix | Delete

$b[1] |= self::chrToInt($in[2]) << 16;

[264] Fix | Delete

case 2:

[265] Fix | Delete

$b[1] |= self::chrToInt($in[1]) << 8;

[266] Fix | Delete

case 1:

[267] Fix | Delete

$b[1] |= self::chrToInt($in[0]);

[268] Fix | Delete

case 0:

[269] Fix | Delete

break;

[270] Fix | Delete

}

[271] Fix | Delete

// See docblock for why the 0th index gets the higher bits.

[272] Fix | Delete

[273] Fix | Delete

# v3 ^= b;

[274] Fix | Delete

$v[6] ^= $b[0];

[275] Fix | Delete

$v[7] ^= $b[1];

[276] Fix | Delete

[277] Fix | Delete

# SIPROUND;

[278] Fix | Delete

# SIPROUND;

[279] Fix | Delete

$v = self::sipRound($v);

[280] Fix | Delete

$v = self::sipRound($v);

[281] Fix | Delete

[282] Fix | Delete

# v0 ^= b;

[283] Fix | Delete

$v[0] ^= $b[0];

[284] Fix | Delete

$v[1] ^= $b[1];

[285] Fix | Delete

[286] Fix | Delete

// Flip the lower 8 bits of v2 which is ($v[4], $v[5]) in our implementation

[287] Fix | Delete

# v2 ^= 0xff;

[288] Fix | Delete

$v[5] ^= 0xff;

[289] Fix | Delete

[290] Fix | Delete

# SIPROUND;

[291] Fix | Delete

# SIPROUND;

[292] Fix | Delete

# SIPROUND;

[293] Fix | Delete

# SIPROUND;

[294] Fix | Delete

$v = self::sipRound($v);

[295] Fix | Delete

$v = self::sipRound($v);

[296] Fix | Delete

$v = self::sipRound($v);

[297] Fix | Delete

$v = self::sipRound($v);

[298] Fix | Delete

[299] Fix | Delete

# b = v0 ^ v1 ^ v2 ^ v3;

[300] Fix | Delete

# STORE64_LE( out, b );

[301] Fix | Delete

return self::store32_le($v[1] ^ $v[3] ^ $v[5] ^ $v[7]) .

[302] Fix | Delete

self::store32_le($v[0] ^ $v[2] ^ $v[4] ^ $v[6]);

[303] Fix | Delete

}

[304] Fix | Delete

}

[305] Fix | Delete

[306] Fix | Delete