@@ -1,7 +1,7 @@ discard block |
||
1 | 1 | <?php |
2 | 2 | |
3 | 3 | if (class_exists('ParagonIE_Sodium_Core_ChaCha20_IetfCtx', false)) { |
4 | - return; |
|
4 | + return; |
|
5 | 5 | } |
6 | 6 | |
7 | 7 | /** |
@@ -9,30 +9,30 @@ discard block |
||
9 | 9 | */ |
10 | 10 | class ParagonIE_Sodium_Core_ChaCha20_IetfCtx extends ParagonIE_Sodium_Core_ChaCha20_Ctx |
11 | 11 | { |
12 | - /** |
|
13 | - * ParagonIE_Sodium_Core_ChaCha20_IetfCtx constructor. |
|
14 | - * |
|
15 | - * @internal You should not use this directly from another application |
|
16 | - * |
|
17 | - * @param string $key ChaCha20 key. |
|
18 | - * @param string $iv Initialization Vector (a.k.a. nonce). |
|
19 | - * @param string $counter The initial counter value. |
|
20 | - * Defaults to 4 0x00 bytes. |
|
21 | - * @throws InvalidArgumentException |
|
22 | - * @throws TypeError |
|
23 | - */ |
|
24 | - public function __construct($key = '', $iv = '', $counter = '') |
|
25 | - { |
|
26 | - if (self::strlen($iv) !== 12) { |
|
27 | - throw new InvalidArgumentException('ChaCha20 expects a 96-bit nonce in IETF mode.'); |
|
28 | - } |
|
29 | - parent::__construct($key, self::substr($iv, 0, 8), $counter); |
|
12 | + /** |
|
13 | + * ParagonIE_Sodium_Core_ChaCha20_IetfCtx constructor. |
|
14 | + * |
|
15 | + * @internal You should not use this directly from another application |
|
16 | + * |
|
17 | + * @param string $key ChaCha20 key. |
|
18 | + * @param string $iv Initialization Vector (a.k.a. nonce). |
|
19 | + * @param string $counter The initial counter value. |
|
20 | + * Defaults to 4 0x00 bytes. |
|
21 | + * @throws InvalidArgumentException |
|
22 | + * @throws TypeError |
|
23 | + */ |
|
24 | + public function __construct($key = '', $iv = '', $counter = '') |
|
25 | + { |
|
26 | + if (self::strlen($iv) !== 12) { |
|
27 | + throw new InvalidArgumentException('ChaCha20 expects a 96-bit nonce in IETF mode.'); |
|
28 | + } |
|
29 | + parent::__construct($key, self::substr($iv, 0, 8), $counter); |
|
30 | 30 | |
31 | - if (!empty($counter)) { |
|
32 | - $this->container[12] = self::load_4(self::substr($counter, 0, 4)); |
|
33 | - } |
|
34 | - $this->container[13] = self::load_4(self::substr($iv, 0, 4)); |
|
35 | - $this->container[14] = self::load_4(self::substr($iv, 4, 4)); |
|
36 | - $this->container[15] = self::load_4(self::substr($iv, 8, 4)); |
|
37 | - } |
|
31 | + if (!empty($counter)) { |
|
32 | + $this->container[12] = self::load_4(self::substr($counter, 0, 4)); |
|
33 | + } |
|
34 | + $this->container[13] = self::load_4(self::substr($iv, 0, 4)); |
|
35 | + $this->container[14] = self::load_4(self::substr($iv, 4, 4)); |
|
36 | + $this->container[15] = self::load_4(self::substr($iv, 8, 4)); |
|
37 | + } |
|
38 | 38 | } |
@@ -1,11 +1,11 @@ |
||
1 | 1 | <?php |
2 | 2 | |
3 | 3 | if (!class_exists('SodiumException', false)) { |
4 | - /** |
|
5 | - * Class SodiumException |
|
6 | - */ |
|
7 | - class SodiumException extends Exception |
|
8 | - { |
|
4 | + /** |
|
5 | + * Class SodiumException |
|
6 | + */ |
|
7 | + class SodiumException extends Exception |
|
8 | + { |
|
9 | 9 | |
10 | - } |
|
10 | + } |
|
11 | 11 | } |
@@ -1,7 +1,7 @@ discard block |
||
1 | 1 | <?php |
2 | 2 | |
3 | 3 | if (class_exists('ParagonIE_Sodium_Core_BLAKE2b', false)) { |
4 | - return; |
|
4 | + return; |
|
5 | 5 | } |
6 | 6 | |
7 | 7 | /** |
@@ -11,709 +11,709 @@ discard block |
||
11 | 11 | */ |
12 | 12 | abstract class ParagonIE_Sodium_Core32_BLAKE2b extends ParagonIE_Sodium_Core_Util |
13 | 13 | { |
14 | - /** |
|
15 | - * @var SplFixedArray |
|
16 | - */ |
|
17 | - public static $iv; |
|
18 | - |
|
19 | - /** |
|
20 | - * @var array<int, array<int, int>> |
|
21 | - */ |
|
22 | - public static $sigma = array( |
|
23 | - array( 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15), |
|
24 | - array( 14, 10, 4, 8, 9, 15, 13, 6, 1, 12, 0, 2, 11, 7, 5, 3), |
|
25 | - array( 11, 8, 12, 0, 5, 2, 15, 13, 10, 14, 3, 6, 7, 1, 9, 4), |
|
26 | - array( 7, 9, 3, 1, 13, 12, 11, 14, 2, 6, 5, 10, 4, 0, 15, 8), |
|
27 | - array( 9, 0, 5, 7, 2, 4, 10, 15, 14, 1, 11, 12, 6, 8, 3, 13), |
|
28 | - array( 2, 12, 6, 10, 0, 11, 8, 3, 4, 13, 7, 5, 15, 14, 1, 9), |
|
29 | - array( 12, 5, 1, 15, 14, 13, 4, 10, 0, 7, 6, 3, 9, 2, 8, 11), |
|
30 | - array( 13, 11, 7, 14, 12, 1, 3, 9, 5, 0, 15, 4, 8, 6, 2, 10), |
|
31 | - array( 6, 15, 14, 9, 11, 3, 0, 8, 12, 2, 13, 7, 1, 4, 10, 5), |
|
32 | - array( 10, 2, 8, 4, 7, 6, 1, 5, 15, 11, 9, 14, 3, 12, 13 , 0), |
|
33 | - array( 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15), |
|
34 | - array( 14, 10, 4, 8, 9, 15, 13, 6, 1, 12, 0, 2, 11, 7, 5, 3) |
|
35 | - ); |
|
36 | - |
|
37 | - const BLOCKBYTES = 128; |
|
38 | - const OUTBYTES = 64; |
|
39 | - const KEYBYTES = 64; |
|
40 | - |
|
41 | - /** |
|
42 | - * Turn two 32-bit integers into a fixed array representing a 64-bit integer. |
|
43 | - * |
|
44 | - * @internal You should not use this directly from another application |
|
45 | - * |
|
46 | - * @param int $high |
|
47 | - * @param int $low |
|
48 | - * @return ParagonIE_Sodium_Core32_Int64 |
|
49 | - * @throws SodiumException |
|
50 | - * @throws TypeError |
|
51 | - */ |
|
52 | - public static function new64($high, $low) |
|
53 | - { |
|
54 | - return ParagonIE_Sodium_Core32_Int64::fromInts($low, $high); |
|
55 | - } |
|
56 | - |
|
57 | - /** |
|
58 | - * Convert an arbitrary number into an SplFixedArray of two 32-bit integers |
|
59 | - * that represents a 64-bit integer. |
|
60 | - * |
|
61 | - * @internal You should not use this directly from another application |
|
62 | - * |
|
63 | - * @param int $num |
|
64 | - * @return ParagonIE_Sodium_Core32_Int64 |
|
65 | - * @throws SodiumException |
|
66 | - * @throws TypeError |
|
67 | - */ |
|
68 | - protected static function to64($num) |
|
69 | - { |
|
70 | - list($hi, $lo) = self::numericTo64BitInteger($num); |
|
71 | - return self::new64($hi, $lo); |
|
72 | - } |
|
73 | - |
|
74 | - /** |
|
75 | - * Adds two 64-bit integers together, returning their sum as a SplFixedArray |
|
76 | - * containing two 32-bit integers (representing a 64-bit integer). |
|
77 | - * |
|
78 | - * @internal You should not use this directly from another application |
|
79 | - * |
|
80 | - * @param ParagonIE_Sodium_Core32_Int64 $x |
|
81 | - * @param ParagonIE_Sodium_Core32_Int64 $y |
|
82 | - * @return ParagonIE_Sodium_Core32_Int64 |
|
83 | - */ |
|
84 | - protected static function add64($x, $y) |
|
85 | - { |
|
86 | - return $x->addInt64($y); |
|
87 | - } |
|
88 | - |
|
89 | - /** |
|
90 | - * @internal You should not use this directly from another application |
|
91 | - * |
|
92 | - * @param ParagonIE_Sodium_Core32_Int64 $x |
|
93 | - * @param ParagonIE_Sodium_Core32_Int64 $y |
|
94 | - * @param ParagonIE_Sodium_Core32_Int64 $z |
|
95 | - * @return ParagonIE_Sodium_Core32_Int64 |
|
96 | - */ |
|
97 | - public static function add364($x, $y, $z) |
|
98 | - { |
|
99 | - return $x->addInt64($y)->addInt64($z); |
|
100 | - } |
|
101 | - |
|
102 | - /** |
|
103 | - * @internal You should not use this directly from another application |
|
104 | - * |
|
105 | - * @param ParagonIE_Sodium_Core32_Int64 $x |
|
106 | - * @param ParagonIE_Sodium_Core32_Int64 $y |
|
107 | - * @return ParagonIE_Sodium_Core32_Int64 |
|
108 | - * @throws TypeError |
|
109 | - */ |
|
110 | - public static function xor64(ParagonIE_Sodium_Core32_Int64 $x, ParagonIE_Sodium_Core32_Int64 $y) |
|
111 | - { |
|
112 | - return $x->xorInt64($y); |
|
113 | - } |
|
114 | - |
|
115 | - /** |
|
116 | - * @internal You should not use this directly from another application |
|
117 | - * |
|
118 | - * @param ParagonIE_Sodium_Core32_Int64 $x |
|
119 | - * @param int $c |
|
120 | - * @return ParagonIE_Sodium_Core32_Int64 |
|
121 | - * @throws SodiumException |
|
122 | - * @throws TypeError |
|
123 | - */ |
|
124 | - public static function rotr64(ParagonIE_Sodium_Core32_Int64 $x, $c) |
|
125 | - { |
|
126 | - return $x->rotateRight($c); |
|
127 | - } |
|
128 | - |
|
129 | - /** |
|
130 | - * @internal You should not use this directly from another application |
|
131 | - * |
|
132 | - * @param SplFixedArray $x |
|
133 | - * @param int $i |
|
134 | - * @return ParagonIE_Sodium_Core32_Int64 |
|
135 | - * @throws SodiumException |
|
136 | - * @throws TypeError |
|
137 | - */ |
|
138 | - public static function load64($x, $i) |
|
139 | - { |
|
140 | - /** @var int $l */ |
|
141 | - $l = (int) ($x[$i]) |
|
142 | - | ((int) ($x[$i+1]) << 8) |
|
143 | - | ((int) ($x[$i+2]) << 16) |
|
144 | - | ((int) ($x[$i+3]) << 24); |
|
145 | - /** @var int $h */ |
|
146 | - $h = (int) ($x[$i+4]) |
|
147 | - | ((int) ($x[$i+5]) << 8) |
|
148 | - | ((int) ($x[$i+6]) << 16) |
|
149 | - | ((int) ($x[$i+7]) << 24); |
|
150 | - return self::new64($h, $l); |
|
151 | - } |
|
152 | - |
|
153 | - /** |
|
154 | - * @internal You should not use this directly from another application |
|
155 | - * |
|
156 | - * @param SplFixedArray $x |
|
157 | - * @param int $i |
|
158 | - * @param ParagonIE_Sodium_Core32_Int64 $u |
|
159 | - * @return void |
|
160 | - * @throws TypeError |
|
161 | - * @psalm-suppress MixedArgument |
|
162 | - * @psalm-suppress MixedAssignment |
|
163 | - * @psalm-suppress MixedArrayAccess |
|
164 | - * @psalm-suppress MixedArrayAssignment |
|
165 | - * @psalm-suppress MixedArrayOffset |
|
166 | - */ |
|
167 | - public static function store64(SplFixedArray $x, $i, ParagonIE_Sodium_Core32_Int64 $u) |
|
168 | - { |
|
169 | - $v = clone $u; |
|
170 | - $maxLength = $x->getSize() - 1; |
|
171 | - for ($j = 0; $j < 8; ++$j) { |
|
172 | - $k = 3 - ($j >> 1); |
|
173 | - $x[$i] = $v->limbs[$k] & 0xff; |
|
174 | - if (++$i > $maxLength) { |
|
175 | - return; |
|
176 | - } |
|
177 | - $v->limbs[$k] >>= 8; |
|
178 | - } |
|
179 | - } |
|
180 | - |
|
181 | - /** |
|
182 | - * This just sets the $iv static variable. |
|
183 | - * |
|
184 | - * @internal You should not use this directly from another application |
|
185 | - * |
|
186 | - * @return void |
|
187 | - * @throws SodiumException |
|
188 | - * @throws TypeError |
|
189 | - */ |
|
190 | - public static function pseudoConstructor() |
|
191 | - { |
|
192 | - static $called = false; |
|
193 | - if ($called) { |
|
194 | - return; |
|
195 | - } |
|
196 | - self::$iv = new SplFixedArray(8); |
|
197 | - self::$iv[0] = self::new64(0x6a09e667, 0xf3bcc908); |
|
198 | - self::$iv[1] = self::new64(0xbb67ae85, 0x84caa73b); |
|
199 | - self::$iv[2] = self::new64(0x3c6ef372, 0xfe94f82b); |
|
200 | - self::$iv[3] = self::new64(0xa54ff53a, 0x5f1d36f1); |
|
201 | - self::$iv[4] = self::new64(0x510e527f, 0xade682d1); |
|
202 | - self::$iv[5] = self::new64(0x9b05688c, 0x2b3e6c1f); |
|
203 | - self::$iv[6] = self::new64(0x1f83d9ab, 0xfb41bd6b); |
|
204 | - self::$iv[7] = self::new64(0x5be0cd19, 0x137e2179); |
|
205 | - |
|
206 | - $called = true; |
|
207 | - } |
|
208 | - |
|
209 | - /** |
|
210 | - * Returns a fresh BLAKE2 context. |
|
211 | - * |
|
212 | - * @internal You should not use this directly from another application |
|
213 | - * |
|
214 | - * @return SplFixedArray |
|
215 | - * @throws TypeError |
|
216 | - * @psalm-suppress MixedArgument |
|
217 | - * @psalm-suppress MixedAssignment |
|
218 | - * @psalm-suppress MixedArrayAccess |
|
219 | - * @psalm-suppress MixedArrayAssignment |
|
220 | - * @psalm-suppress MixedArrayOffset |
|
221 | - * @throws SodiumException |
|
222 | - * @throws TypeError |
|
223 | - */ |
|
224 | - protected static function context() |
|
225 | - { |
|
226 | - $ctx = new SplFixedArray(6); |
|
227 | - $ctx[0] = new SplFixedArray(8); // h |
|
228 | - $ctx[1] = new SplFixedArray(2); // t |
|
229 | - $ctx[2] = new SplFixedArray(2); // f |
|
230 | - $ctx[3] = new SplFixedArray(256); // buf |
|
231 | - $ctx[4] = 0; // buflen |
|
232 | - $ctx[5] = 0; // last_node (uint8_t) |
|
233 | - |
|
234 | - for ($i = 8; $i--;) { |
|
235 | - $ctx[0][$i] = self::$iv[$i]; |
|
236 | - } |
|
237 | - for ($i = 256; $i--;) { |
|
238 | - $ctx[3][$i] = 0; |
|
239 | - } |
|
240 | - |
|
241 | - $zero = self::new64(0, 0); |
|
242 | - $ctx[1][0] = $zero; |
|
243 | - $ctx[1][1] = $zero; |
|
244 | - $ctx[2][0] = $zero; |
|
245 | - $ctx[2][1] = $zero; |
|
246 | - |
|
247 | - return $ctx; |
|
248 | - } |
|
249 | - |
|
250 | - /** |
|
251 | - * @internal You should not use this directly from another application |
|
252 | - * |
|
253 | - * @param SplFixedArray $ctx |
|
254 | - * @param SplFixedArray $buf |
|
255 | - * @return void |
|
256 | - * @throws SodiumException |
|
257 | - * @throws TypeError |
|
258 | - * @psalm-suppress MixedArgument |
|
259 | - * @psalm-suppress MixedArrayAccess |
|
260 | - * @psalm-suppress MixedArrayAssignment |
|
261 | - * @psalm-suppress MixedAssignment |
|
262 | - */ |
|
263 | - protected static function compress(SplFixedArray $ctx, SplFixedArray $buf) |
|
264 | - { |
|
265 | - $m = new SplFixedArray(16); |
|
266 | - $v = new SplFixedArray(16); |
|
267 | - |
|
268 | - for ($i = 16; $i--;) { |
|
269 | - $m[$i] = self::load64($buf, $i << 3); |
|
270 | - } |
|
271 | - |
|
272 | - for ($i = 8; $i--;) { |
|
273 | - $v[$i] = $ctx[0][$i]; |
|
274 | - } |
|
275 | - |
|
276 | - $v[ 8] = self::$iv[0]; |
|
277 | - $v[ 9] = self::$iv[1]; |
|
278 | - $v[10] = self::$iv[2]; |
|
279 | - $v[11] = self::$iv[3]; |
|
280 | - |
|
281 | - $v[12] = self::xor64($ctx[1][0], self::$iv[4]); |
|
282 | - $v[13] = self::xor64($ctx[1][1], self::$iv[5]); |
|
283 | - $v[14] = self::xor64($ctx[2][0], self::$iv[6]); |
|
284 | - $v[15] = self::xor64($ctx[2][1], self::$iv[7]); |
|
285 | - |
|
286 | - for ($r = 0; $r < 12; ++$r) { |
|
287 | - $v = self::G($r, 0, 0, 4, 8, 12, $v, $m); |
|
288 | - $v = self::G($r, 1, 1, 5, 9, 13, $v, $m); |
|
289 | - $v = self::G($r, 2, 2, 6, 10, 14, $v, $m); |
|
290 | - $v = self::G($r, 3, 3, 7, 11, 15, $v, $m); |
|
291 | - $v = self::G($r, 4, 0, 5, 10, 15, $v, $m); |
|
292 | - $v = self::G($r, 5, 1, 6, 11, 12, $v, $m); |
|
293 | - $v = self::G($r, 6, 2, 7, 8, 13, $v, $m); |
|
294 | - $v = self::G($r, 7, 3, 4, 9, 14, $v, $m); |
|
295 | - } |
|
296 | - |
|
297 | - for ($i = 8; $i--;) { |
|
298 | - $ctx[0][$i] = self::xor64( |
|
299 | - $ctx[0][$i], self::xor64($v[$i], $v[$i+8]) |
|
300 | - ); |
|
301 | - } |
|
302 | - } |
|
303 | - |
|
304 | - /** |
|
305 | - * @internal You should not use this directly from another application |
|
306 | - * |
|
307 | - * @param int $r |
|
308 | - * @param int $i |
|
309 | - * @param int $a |
|
310 | - * @param int $b |
|
311 | - * @param int $c |
|
312 | - * @param int $d |
|
313 | - * @param SplFixedArray $v |
|
314 | - * @param SplFixedArray $m |
|
315 | - * @return SplFixedArray |
|
316 | - * @throws SodiumException |
|
317 | - * @throws TypeError |
|
318 | - * @psalm-suppress MixedArgument |
|
319 | - * @psalm-suppress MixedArrayOffset |
|
320 | - */ |
|
321 | - public static function G($r, $i, $a, $b, $c, $d, SplFixedArray $v, SplFixedArray $m) |
|
322 | - { |
|
323 | - $v[$a] = self::add364($v[$a], $v[$b], $m[self::$sigma[$r][$i << 1]]); |
|
324 | - $v[$d] = self::rotr64(self::xor64($v[$d], $v[$a]), 32); |
|
325 | - $v[$c] = self::add64($v[$c], $v[$d]); |
|
326 | - $v[$b] = self::rotr64(self::xor64($v[$b], $v[$c]), 24); |
|
327 | - $v[$a] = self::add364($v[$a], $v[$b], $m[self::$sigma[$r][($i << 1) + 1]]); |
|
328 | - $v[$d] = self::rotr64(self::xor64($v[$d], $v[$a]), 16); |
|
329 | - $v[$c] = self::add64($v[$c], $v[$d]); |
|
330 | - $v[$b] = self::rotr64(self::xor64($v[$b], $v[$c]), 63); |
|
331 | - return $v; |
|
332 | - } |
|
333 | - |
|
334 | - /** |
|
335 | - * @internal You should not use this directly from another application |
|
336 | - * |
|
337 | - * @param SplFixedArray $ctx |
|
338 | - * @param int $inc |
|
339 | - * @return void |
|
340 | - * @throws SodiumException |
|
341 | - * @throws TypeError |
|
342 | - * @psalm-suppress MixedArgument |
|
343 | - * @psalm-suppress MixedArrayAccess |
|
344 | - * @psalm-suppress MixedArrayAssignment |
|
345 | - */ |
|
346 | - public static function increment_counter($ctx, $inc) |
|
347 | - { |
|
348 | - if ($inc < 0) { |
|
349 | - throw new SodiumException('Increasing by a negative number makes no sense.'); |
|
350 | - } |
|
351 | - $t = self::to64($inc); |
|
352 | - # S->t is $ctx[1] in our implementation |
|
353 | - |
|
354 | - # S->t[0] = ( uint64_t )( t >> 0 ); |
|
355 | - $ctx[1][0] = self::add64($ctx[1][0], $t); |
|
356 | - |
|
357 | - # S->t[1] += ( S->t[0] < inc ); |
|
358 | - if (!($ctx[1][0] instanceof ParagonIE_Sodium_Core32_Int64)) { |
|
359 | - throw new TypeError('Not an int64'); |
|
360 | - } |
|
361 | - /** @var ParagonIE_Sodium_Core32_Int64 $c*/ |
|
362 | - $c = $ctx[1][0]; |
|
363 | - if ($c->isLessThanInt($inc)) { |
|
364 | - $ctx[1][1] = self::add64($ctx[1][1], self::to64(1)); |
|
365 | - } |
|
366 | - } |
|
367 | - |
|
368 | - /** |
|
369 | - * @internal You should not use this directly from another application |
|
370 | - * |
|
371 | - * @param SplFixedArray $ctx |
|
372 | - * @param SplFixedArray $p |
|
373 | - * @param int $plen |
|
374 | - * @return void |
|
375 | - * @throws SodiumException |
|
376 | - * @throws TypeError |
|
377 | - * @psalm-suppress MixedArgument |
|
378 | - * @psalm-suppress MixedAssignment |
|
379 | - * @psalm-suppress MixedArrayAccess |
|
380 | - * @psalm-suppress MixedArrayAssignment |
|
381 | - * @psalm-suppress MixedArrayOffset |
|
382 | - * @psalm-suppress MixedMethodCall |
|
383 | - * @psalm-suppress MixedOperand |
|
384 | - */ |
|
385 | - public static function update(SplFixedArray $ctx, SplFixedArray $p, $plen) |
|
386 | - { |
|
387 | - self::pseudoConstructor(); |
|
388 | - |
|
389 | - $offset = 0; |
|
390 | - while ($plen > 0) { |
|
391 | - $left = $ctx[4]; |
|
392 | - $fill = 256 - $left; |
|
393 | - |
|
394 | - if ($plen > $fill) { |
|
395 | - # memcpy( S->buf + left, in, fill ); /* Fill buffer */ |
|
396 | - for ($i = $fill; $i--;) { |
|
397 | - $ctx[3][$i + $left] = $p[$i + $offset]; |
|
398 | - } |
|
399 | - |
|
400 | - # S->buflen += fill; |
|
401 | - $ctx[4] += $fill; |
|
402 | - |
|
403 | - # blake2b_increment_counter( S, BLAKE2B_BLOCKBYTES ); |
|
404 | - self::increment_counter($ctx, 128); |
|
405 | - |
|
406 | - # blake2b_compress( S, S->buf ); /* Compress */ |
|
407 | - self::compress($ctx, $ctx[3]); |
|
408 | - |
|
409 | - # memcpy( S->buf, S->buf + BLAKE2B_BLOCKBYTES, BLAKE2B_BLOCKBYTES ); /* Shift buffer left */ |
|
410 | - for ($i = 128; $i--;) { |
|
411 | - $ctx[3][$i] = $ctx[3][$i + 128]; |
|
412 | - } |
|
413 | - |
|
414 | - # S->buflen -= BLAKE2B_BLOCKBYTES; |
|
415 | - $ctx[4] -= 128; |
|
416 | - |
|
417 | - # in += fill; |
|
418 | - $offset += $fill; |
|
419 | - |
|
420 | - # inlen -= fill; |
|
421 | - $plen -= $fill; |
|
422 | - } else { |
|
423 | - for ($i = $plen; $i--;) { |
|
424 | - $ctx[3][$i + $left] = $p[$i + $offset]; |
|
425 | - } |
|
426 | - $ctx[4] += $plen; |
|
427 | - $offset += $plen; |
|
428 | - $plen -= $plen; |
|
429 | - } |
|
430 | - } |
|
431 | - } |
|
432 | - |
|
433 | - /** |
|
434 | - * @internal You should not use this directly from another application |
|
435 | - * |
|
436 | - * @param SplFixedArray $ctx |
|
437 | - * @param SplFixedArray $out |
|
438 | - * @return SplFixedArray |
|
439 | - * @throws SodiumException |
|
440 | - * @throws TypeError |
|
441 | - * @psalm-suppress MixedArgument |
|
442 | - * @psalm-suppress MixedAssignment |
|
443 | - * @psalm-suppress MixedArrayAccess |
|
444 | - * @psalm-suppress MixedArrayAssignment |
|
445 | - * @psalm-suppress MixedArrayOffset |
|
446 | - * @psalm-suppress MixedMethodCall |
|
447 | - * @psalm-suppress MixedOperand |
|
448 | - */ |
|
449 | - public static function finish(SplFixedArray $ctx, SplFixedArray $out) |
|
450 | - { |
|
451 | - self::pseudoConstructor(); |
|
452 | - if ($ctx[4] > 128) { |
|
453 | - self::increment_counter($ctx, 128); |
|
454 | - self::compress($ctx, $ctx[3]); |
|
455 | - $ctx[4] -= 128; |
|
456 | - if ($ctx[4] > 128) { |
|
457 | - throw new SodiumException('Failed to assert that buflen <= 128 bytes'); |
|
458 | - } |
|
459 | - for ($i = $ctx[4]; $i--;) { |
|
460 | - $ctx[3][$i] = $ctx[3][$i + 128]; |
|
461 | - } |
|
462 | - } |
|
463 | - |
|
464 | - self::increment_counter($ctx, $ctx[4]); |
|
465 | - $ctx[2][0] = self::new64(0xffffffff, 0xffffffff); |
|
466 | - |
|
467 | - for ($i = 256 - $ctx[4]; $i--;) { |
|
468 | - /** @var int $i */ |
|
469 | - $ctx[3][$i + $ctx[4]] = 0; |
|
470 | - } |
|
471 | - |
|
472 | - self::compress($ctx, $ctx[3]); |
|
473 | - |
|
474 | - $i = (int) (($out->getSize() - 1) / 8); |
|
475 | - for (; $i >= 0; --$i) { |
|
476 | - self::store64($out, $i << 3, $ctx[0][$i]); |
|
477 | - } |
|
478 | - return $out; |
|
479 | - } |
|
480 | - |
|
481 | - /** |
|
482 | - * @internal You should not use this directly from another application |
|
483 | - * |
|
484 | - * @param SplFixedArray|null $key |
|
485 | - * @param int $outlen |
|
486 | - * @param SplFixedArray|null $salt |
|
487 | - * @param SplFixedArray|null $personal |
|
488 | - * @return SplFixedArray |
|
489 | - * @throws SodiumException |
|
490 | - * @throws TypeError |
|
491 | - * @psalm-suppress MixedArgument |
|
492 | - * @psalm-suppress MixedAssignment |
|
493 | - * @psalm-suppress MixedArrayAccess |
|
494 | - * @psalm-suppress MixedArrayAssignment |
|
495 | - * @psalm-suppress MixedMethodCall |
|
496 | - */ |
|
497 | - public static function init( |
|
498 | - $key = null, |
|
499 | - $outlen = 64, |
|
500 | - $salt = null, |
|
501 | - $personal = null |
|
502 | - ) { |
|
503 | - self::pseudoConstructor(); |
|
504 | - $klen = 0; |
|
505 | - |
|
506 | - if ($key !== null) { |
|
507 | - if (count($key) > 64) { |
|
508 | - throw new SodiumException('Invalid key size'); |
|
509 | - } |
|
510 | - $klen = count($key); |
|
511 | - } |
|
512 | - |
|
513 | - if ($outlen > 64) { |
|
514 | - throw new SodiumException('Invalid output size'); |
|
515 | - } |
|
516 | - |
|
517 | - $ctx = self::context(); |
|
518 | - |
|
519 | - $p = new SplFixedArray(64); |
|
520 | - // Zero our param buffer... |
|
521 | - for ($i = 64; --$i;) { |
|
522 | - $p[$i] = 0; |
|
523 | - } |
|
524 | - |
|
525 | - $p[0] = $outlen; // digest_length |
|
526 | - $p[1] = $klen; // key_length |
|
527 | - $p[2] = 1; // fanout |
|
528 | - $p[3] = 1; // depth |
|
529 | - |
|
530 | - if ($salt instanceof SplFixedArray) { |
|
531 | - // salt: [32] through [47] |
|
532 | - for ($i = 0; $i < 16; ++$i) { |
|
533 | - $p[32 + $i] = (int) $salt[$i]; |
|
534 | - } |
|
535 | - } |
|
536 | - if ($personal instanceof SplFixedArray) { |
|
537 | - // personal: [48] through [63] |
|
538 | - for ($i = 0; $i < 16; ++$i) { |
|
539 | - $p[48 + $i] = (int) $personal[$i]; |
|
540 | - } |
|
541 | - } |
|
542 | - |
|
543 | - $ctx[0][0] = self::xor64( |
|
544 | - $ctx[0][0], |
|
545 | - self::load64($p, 0) |
|
546 | - ); |
|
547 | - |
|
548 | - if ($salt instanceof SplFixedArray || $personal instanceof SplFixedArray) { |
|
549 | - // We need to do what blake2b_init_param() does: |
|
550 | - for ($i = 1; $i < 8; ++$i) { |
|
551 | - $ctx[0][$i] = self::xor64( |
|
552 | - $ctx[0][$i], |
|
553 | - self::load64($p, $i << 3) |
|
554 | - ); |
|
555 | - } |
|
556 | - } |
|
557 | - |
|
558 | - if ($klen > 0 && $key instanceof SplFixedArray) { |
|
559 | - $block = new SplFixedArray(128); |
|
560 | - for ($i = 128; $i--;) { |
|
561 | - $block[$i] = 0; |
|
562 | - } |
|
563 | - for ($i = $klen; $i--;) { |
|
564 | - $block[$i] = $key[$i]; |
|
565 | - } |
|
566 | - self::update($ctx, $block, 128); |
|
567 | - $ctx[4] = 128; |
|
568 | - } |
|
569 | - |
|
570 | - return $ctx; |
|
571 | - } |
|
572 | - |
|
573 | - /** |
|
574 | - * Convert a string into an SplFixedArray of integers |
|
575 | - * |
|
576 | - * @internal You should not use this directly from another application |
|
577 | - * |
|
578 | - * @param string $str |
|
579 | - * @return SplFixedArray |
|
580 | - * @psalm-suppress MixedArgumentTypeCoercion |
|
581 | - */ |
|
582 | - public static function stringToSplFixedArray($str = '') |
|
583 | - { |
|
584 | - $values = unpack('C*', $str); |
|
585 | - return SplFixedArray::fromArray(array_values($values)); |
|
586 | - } |
|
587 | - |
|
588 | - /** |
|
589 | - * Convert an SplFixedArray of integers into a string |
|
590 | - * |
|
591 | - * @internal You should not use this directly from another application |
|
592 | - * |
|
593 | - * @param SplFixedArray $a |
|
594 | - * @return string |
|
595 | - */ |
|
596 | - public static function SplFixedArrayToString(SplFixedArray $a) |
|
597 | - { |
|
598 | - /** |
|
599 | - * @var array<int, string|int> |
|
600 | - */ |
|
601 | - $arr = $a->toArray(); |
|
602 | - $c = $a->count(); |
|
603 | - array_unshift($arr, str_repeat('C', $c)); |
|
604 | - return (string) (call_user_func_array('pack', $arr)); |
|
605 | - } |
|
606 | - |
|
607 | - /** |
|
608 | - * @internal You should not use this directly from another application |
|
609 | - * |
|
610 | - * @param SplFixedArray $ctx |
|
611 | - * @return string |
|
612 | - * @throws TypeError |
|
613 | - * @psalm-suppress MixedArgument |
|
614 | - * @psalm-suppress MixedArrayAccess |
|
615 | - * @psalm-suppress MixedArrayAssignment |
|
616 | - * @psalm-suppress MixedMethodCall |
|
617 | - */ |
|
618 | - public static function contextToString(SplFixedArray $ctx) |
|
619 | - { |
|
620 | - $str = ''; |
|
621 | - /** @var array<int, ParagonIE_Sodium_Core32_Int64> $ctxA */ |
|
622 | - $ctxA = $ctx[0]->toArray(); |
|
623 | - |
|
624 | - # uint64_t h[8]; |
|
625 | - for ($i = 0; $i < 8; ++$i) { |
|
626 | - if (!($ctxA[$i] instanceof ParagonIE_Sodium_Core32_Int64)) { |
|
627 | - throw new TypeError('Not an instance of Int64'); |
|
628 | - } |
|
629 | - /** @var ParagonIE_Sodium_Core32_Int64 $ctxAi */ |
|
630 | - $ctxAi = $ctxA[$i]; |
|
631 | - $str .= $ctxAi->toReverseString(); |
|
632 | - } |
|
633 | - |
|
634 | - # uint64_t t[2]; |
|
635 | - # uint64_t f[2]; |
|
636 | - for ($i = 1; $i < 3; ++$i) { |
|
637 | - /** @var array<int, ParagonIE_Sodium_Core32_Int64> $ctxA */ |
|
638 | - $ctxA = $ctx[$i]->toArray(); |
|
639 | - /** @var ParagonIE_Sodium_Core32_Int64 $ctxA1 */ |
|
640 | - $ctxA1 = $ctxA[0]; |
|
641 | - /** @var ParagonIE_Sodium_Core32_Int64 $ctxA2 */ |
|
642 | - $ctxA2 = $ctxA[1]; |
|
643 | - |
|
644 | - $str .= $ctxA1->toReverseString(); |
|
645 | - $str .= $ctxA2->toReverseString(); |
|
646 | - } |
|
647 | - |
|
648 | - # uint8_t buf[2 * 128]; |
|
649 | - $str .= self::SplFixedArrayToString($ctx[3]); |
|
650 | - |
|
651 | - /** @var int $ctx4 */ |
|
652 | - $ctx4 = $ctx[4]; |
|
653 | - |
|
654 | - # size_t buflen; |
|
655 | - $str .= implode('', array( |
|
656 | - self::intToChr($ctx4 & 0xff), |
|
657 | - self::intToChr(($ctx4 >> 8) & 0xff), |
|
658 | - self::intToChr(($ctx4 >> 16) & 0xff), |
|
659 | - self::intToChr(($ctx4 >> 24) & 0xff), |
|
660 | - "\x00\x00\x00\x00" |
|
661 | - /* |
|
14 | + /** |
|
15 | + * @var SplFixedArray |
|
16 | + */ |
|
17 | + public static $iv; |
|
18 | + |
|
19 | + /** |
|
20 | + * @var array<int, array<int, int>> |
|
21 | + */ |
|
22 | + public static $sigma = array( |
|
23 | + array( 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15), |
|
24 | + array( 14, 10, 4, 8, 9, 15, 13, 6, 1, 12, 0, 2, 11, 7, 5, 3), |
|
25 | + array( 11, 8, 12, 0, 5, 2, 15, 13, 10, 14, 3, 6, 7, 1, 9, 4), |
|
26 | + array( 7, 9, 3, 1, 13, 12, 11, 14, 2, 6, 5, 10, 4, 0, 15, 8), |
|
27 | + array( 9, 0, 5, 7, 2, 4, 10, 15, 14, 1, 11, 12, 6, 8, 3, 13), |
|
28 | + array( 2, 12, 6, 10, 0, 11, 8, 3, 4, 13, 7, 5, 15, 14, 1, 9), |
|
29 | + array( 12, 5, 1, 15, 14, 13, 4, 10, 0, 7, 6, 3, 9, 2, 8, 11), |
|
30 | + array( 13, 11, 7, 14, 12, 1, 3, 9, 5, 0, 15, 4, 8, 6, 2, 10), |
|
31 | + array( 6, 15, 14, 9, 11, 3, 0, 8, 12, 2, 13, 7, 1, 4, 10, 5), |
|
32 | + array( 10, 2, 8, 4, 7, 6, 1, 5, 15, 11, 9, 14, 3, 12, 13 , 0), |
|
33 | + array( 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15), |
|
34 | + array( 14, 10, 4, 8, 9, 15, 13, 6, 1, 12, 0, 2, 11, 7, 5, 3) |
|
35 | + ); |
|
36 | + |
|
37 | + const BLOCKBYTES = 128; |
|
38 | + const OUTBYTES = 64; |
|
39 | + const KEYBYTES = 64; |
|
40 | + |
|
41 | + /** |
|
42 | + * Turn two 32-bit integers into a fixed array representing a 64-bit integer. |
|
43 | + * |
|
44 | + * @internal You should not use this directly from another application |
|
45 | + * |
|
46 | + * @param int $high |
|
47 | + * @param int $low |
|
48 | + * @return ParagonIE_Sodium_Core32_Int64 |
|
49 | + * @throws SodiumException |
|
50 | + * @throws TypeError |
|
51 | + */ |
|
52 | + public static function new64($high, $low) |
|
53 | + { |
|
54 | + return ParagonIE_Sodium_Core32_Int64::fromInts($low, $high); |
|
55 | + } |
|
56 | + |
|
57 | + /** |
|
58 | + * Convert an arbitrary number into an SplFixedArray of two 32-bit integers |
|
59 | + * that represents a 64-bit integer. |
|
60 | + * |
|
61 | + * @internal You should not use this directly from another application |
|
62 | + * |
|
63 | + * @param int $num |
|
64 | + * @return ParagonIE_Sodium_Core32_Int64 |
|
65 | + * @throws SodiumException |
|
66 | + * @throws TypeError |
|
67 | + */ |
|
68 | + protected static function to64($num) |
|
69 | + { |
|
70 | + list($hi, $lo) = self::numericTo64BitInteger($num); |
|
71 | + return self::new64($hi, $lo); |
|
72 | + } |
|
73 | + |
|
74 | + /** |
|
75 | + * Adds two 64-bit integers together, returning their sum as a SplFixedArray |
|
76 | + * containing two 32-bit integers (representing a 64-bit integer). |
|
77 | + * |
|
78 | + * @internal You should not use this directly from another application |
|
79 | + * |
|
80 | + * @param ParagonIE_Sodium_Core32_Int64 $x |
|
81 | + * @param ParagonIE_Sodium_Core32_Int64 $y |
|
82 | + * @return ParagonIE_Sodium_Core32_Int64 |
|
83 | + */ |
|
84 | + protected static function add64($x, $y) |
|
85 | + { |
|
86 | + return $x->addInt64($y); |
|
87 | + } |
|
88 | + |
|
89 | + /** |
|
90 | + * @internal You should not use this directly from another application |
|
91 | + * |
|
92 | + * @param ParagonIE_Sodium_Core32_Int64 $x |
|
93 | + * @param ParagonIE_Sodium_Core32_Int64 $y |
|
94 | + * @param ParagonIE_Sodium_Core32_Int64 $z |
|
95 | + * @return ParagonIE_Sodium_Core32_Int64 |
|
96 | + */ |
|
97 | + public static function add364($x, $y, $z) |
|
98 | + { |
|
99 | + return $x->addInt64($y)->addInt64($z); |
|
100 | + } |
|
101 | + |
|
102 | + /** |
|
103 | + * @internal You should not use this directly from another application |
|
104 | + * |
|
105 | + * @param ParagonIE_Sodium_Core32_Int64 $x |
|
106 | + * @param ParagonIE_Sodium_Core32_Int64 $y |
|
107 | + * @return ParagonIE_Sodium_Core32_Int64 |
|
108 | + * @throws TypeError |
|
109 | + */ |
|
110 | + public static function xor64(ParagonIE_Sodium_Core32_Int64 $x, ParagonIE_Sodium_Core32_Int64 $y) |
|
111 | + { |
|
112 | + return $x->xorInt64($y); |
|
113 | + } |
|
114 | + |
|
115 | + /** |
|
116 | + * @internal You should not use this directly from another application |
|
117 | + * |
|
118 | + * @param ParagonIE_Sodium_Core32_Int64 $x |
|
119 | + * @param int $c |
|
120 | + * @return ParagonIE_Sodium_Core32_Int64 |
|
121 | + * @throws SodiumException |
|
122 | + * @throws TypeError |
|
123 | + */ |
|
124 | + public static function rotr64(ParagonIE_Sodium_Core32_Int64 $x, $c) |
|
125 | + { |
|
126 | + return $x->rotateRight($c); |
|
127 | + } |
|
128 | + |
|
129 | + /** |
|
130 | + * @internal You should not use this directly from another application |
|
131 | + * |
|
132 | + * @param SplFixedArray $x |
|
133 | + * @param int $i |
|
134 | + * @return ParagonIE_Sodium_Core32_Int64 |
|
135 | + * @throws SodiumException |
|
136 | + * @throws TypeError |
|
137 | + */ |
|
138 | + public static function load64($x, $i) |
|
139 | + { |
|
140 | + /** @var int $l */ |
|
141 | + $l = (int) ($x[$i]) |
|
142 | + | ((int) ($x[$i+1]) << 8) |
|
143 | + | ((int) ($x[$i+2]) << 16) |
|
144 | + | ((int) ($x[$i+3]) << 24); |
|
145 | + /** @var int $h */ |
|
146 | + $h = (int) ($x[$i+4]) |
|
147 | + | ((int) ($x[$i+5]) << 8) |
|
148 | + | ((int) ($x[$i+6]) << 16) |
|
149 | + | ((int) ($x[$i+7]) << 24); |
|
150 | + return self::new64($h, $l); |
|
151 | + } |
|
152 | + |
|
153 | + /** |
|
154 | + * @internal You should not use this directly from another application |
|
155 | + * |
|
156 | + * @param SplFixedArray $x |
|
157 | + * @param int $i |
|
158 | + * @param ParagonIE_Sodium_Core32_Int64 $u |
|
159 | + * @return void |
|
160 | + * @throws TypeError |
|
161 | + * @psalm-suppress MixedArgument |
|
162 | + * @psalm-suppress MixedAssignment |
|
163 | + * @psalm-suppress MixedArrayAccess |
|
164 | + * @psalm-suppress MixedArrayAssignment |
|
165 | + * @psalm-suppress MixedArrayOffset |
|
166 | + */ |
|
167 | + public static function store64(SplFixedArray $x, $i, ParagonIE_Sodium_Core32_Int64 $u) |
|
168 | + { |
|
169 | + $v = clone $u; |
|
170 | + $maxLength = $x->getSize() - 1; |
|
171 | + for ($j = 0; $j < 8; ++$j) { |
|
172 | + $k = 3 - ($j >> 1); |
|
173 | + $x[$i] = $v->limbs[$k] & 0xff; |
|
174 | + if (++$i > $maxLength) { |
|
175 | + return; |
|
176 | + } |
|
177 | + $v->limbs[$k] >>= 8; |
|
178 | + } |
|
179 | + } |
|
180 | + |
|
181 | + /** |
|
182 | + * This just sets the $iv static variable. |
|
183 | + * |
|
184 | + * @internal You should not use this directly from another application |
|
185 | + * |
|
186 | + * @return void |
|
187 | + * @throws SodiumException |
|
188 | + * @throws TypeError |
|
189 | + */ |
|
190 | + public static function pseudoConstructor() |
|
191 | + { |
|
192 | + static $called = false; |
|
193 | + if ($called) { |
|
194 | + return; |
|
195 | + } |
|
196 | + self::$iv = new SplFixedArray(8); |
|
197 | + self::$iv[0] = self::new64(0x6a09e667, 0xf3bcc908); |
|
198 | + self::$iv[1] = self::new64(0xbb67ae85, 0x84caa73b); |
|
199 | + self::$iv[2] = self::new64(0x3c6ef372, 0xfe94f82b); |
|
200 | + self::$iv[3] = self::new64(0xa54ff53a, 0x5f1d36f1); |
|
201 | + self::$iv[4] = self::new64(0x510e527f, 0xade682d1); |
|
202 | + self::$iv[5] = self::new64(0x9b05688c, 0x2b3e6c1f); |
|
203 | + self::$iv[6] = self::new64(0x1f83d9ab, 0xfb41bd6b); |
|
204 | + self::$iv[7] = self::new64(0x5be0cd19, 0x137e2179); |
|
205 | + |
|
206 | + $called = true; |
|
207 | + } |
|
208 | + |
|
209 | + /** |
|
210 | + * Returns a fresh BLAKE2 context. |
|
211 | + * |
|
212 | + * @internal You should not use this directly from another application |
|
213 | + * |
|
214 | + * @return SplFixedArray |
|
215 | + * @throws TypeError |
|
216 | + * @psalm-suppress MixedArgument |
|
217 | + * @psalm-suppress MixedAssignment |
|
218 | + * @psalm-suppress MixedArrayAccess |
|
219 | + * @psalm-suppress MixedArrayAssignment |
|
220 | + * @psalm-suppress MixedArrayOffset |
|
221 | + * @throws SodiumException |
|
222 | + * @throws TypeError |
|
223 | + */ |
|
224 | + protected static function context() |
|
225 | + { |
|
226 | + $ctx = new SplFixedArray(6); |
|
227 | + $ctx[0] = new SplFixedArray(8); // h |
|
228 | + $ctx[1] = new SplFixedArray(2); // t |
|
229 | + $ctx[2] = new SplFixedArray(2); // f |
|
230 | + $ctx[3] = new SplFixedArray(256); // buf |
|
231 | + $ctx[4] = 0; // buflen |
|
232 | + $ctx[5] = 0; // last_node (uint8_t) |
|
233 | + |
|
234 | + for ($i = 8; $i--;) { |
|
235 | + $ctx[0][$i] = self::$iv[$i]; |
|
236 | + } |
|
237 | + for ($i = 256; $i--;) { |
|
238 | + $ctx[3][$i] = 0; |
|
239 | + } |
|
240 | + |
|
241 | + $zero = self::new64(0, 0); |
|
242 | + $ctx[1][0] = $zero; |
|
243 | + $ctx[1][1] = $zero; |
|
244 | + $ctx[2][0] = $zero; |
|
245 | + $ctx[2][1] = $zero; |
|
246 | + |
|
247 | + return $ctx; |
|
248 | + } |
|
249 | + |
|
250 | + /** |
|
251 | + * @internal You should not use this directly from another application |
|
252 | + * |
|
253 | + * @param SplFixedArray $ctx |
|
254 | + * @param SplFixedArray $buf |
|
255 | + * @return void |
|
256 | + * @throws SodiumException |
|
257 | + * @throws TypeError |
|
258 | + * @psalm-suppress MixedArgument |
|
259 | + * @psalm-suppress MixedArrayAccess |
|
260 | + * @psalm-suppress MixedArrayAssignment |
|
261 | + * @psalm-suppress MixedAssignment |
|
262 | + */ |
|
263 | + protected static function compress(SplFixedArray $ctx, SplFixedArray $buf) |
|
264 | + { |
|
265 | + $m = new SplFixedArray(16); |
|
266 | + $v = new SplFixedArray(16); |
|
267 | + |
|
268 | + for ($i = 16; $i--;) { |
|
269 | + $m[$i] = self::load64($buf, $i << 3); |
|
270 | + } |
|
271 | + |
|
272 | + for ($i = 8; $i--;) { |
|
273 | + $v[$i] = $ctx[0][$i]; |
|
274 | + } |
|
275 | + |
|
276 | + $v[ 8] = self::$iv[0]; |
|
277 | + $v[ 9] = self::$iv[1]; |
|
278 | + $v[10] = self::$iv[2]; |
|
279 | + $v[11] = self::$iv[3]; |
|
280 | + |
|
281 | + $v[12] = self::xor64($ctx[1][0], self::$iv[4]); |
|
282 | + $v[13] = self::xor64($ctx[1][1], self::$iv[5]); |
|
283 | + $v[14] = self::xor64($ctx[2][0], self::$iv[6]); |
|
284 | + $v[15] = self::xor64($ctx[2][1], self::$iv[7]); |
|
285 | + |
|
286 | + for ($r = 0; $r < 12; ++$r) { |
|
287 | + $v = self::G($r, 0, 0, 4, 8, 12, $v, $m); |
|
288 | + $v = self::G($r, 1, 1, 5, 9, 13, $v, $m); |
|
289 | + $v = self::G($r, 2, 2, 6, 10, 14, $v, $m); |
|
290 | + $v = self::G($r, 3, 3, 7, 11, 15, $v, $m); |
|
291 | + $v = self::G($r, 4, 0, 5, 10, 15, $v, $m); |
|
292 | + $v = self::G($r, 5, 1, 6, 11, 12, $v, $m); |
|
293 | + $v = self::G($r, 6, 2, 7, 8, 13, $v, $m); |
|
294 | + $v = self::G($r, 7, 3, 4, 9, 14, $v, $m); |
|
295 | + } |
|
296 | + |
|
297 | + for ($i = 8; $i--;) { |
|
298 | + $ctx[0][$i] = self::xor64( |
|
299 | + $ctx[0][$i], self::xor64($v[$i], $v[$i+8]) |
|
300 | + ); |
|
301 | + } |
|
302 | + } |
|
303 | + |
|
304 | + /** |
|
305 | + * @internal You should not use this directly from another application |
|
306 | + * |
|
307 | + * @param int $r |
|
308 | + * @param int $i |
|
309 | + * @param int $a |
|
310 | + * @param int $b |
|
311 | + * @param int $c |
|
312 | + * @param int $d |
|
313 | + * @param SplFixedArray $v |
|
314 | + * @param SplFixedArray $m |
|
315 | + * @return SplFixedArray |
|
316 | + * @throws SodiumException |
|
317 | + * @throws TypeError |
|
318 | + * @psalm-suppress MixedArgument |
|
319 | + * @psalm-suppress MixedArrayOffset |
|
320 | + */ |
|
321 | + public static function G($r, $i, $a, $b, $c, $d, SplFixedArray $v, SplFixedArray $m) |
|
322 | + { |
|
323 | + $v[$a] = self::add364($v[$a], $v[$b], $m[self::$sigma[$r][$i << 1]]); |
|
324 | + $v[$d] = self::rotr64(self::xor64($v[$d], $v[$a]), 32); |
|
325 | + $v[$c] = self::add64($v[$c], $v[$d]); |
|
326 | + $v[$b] = self::rotr64(self::xor64($v[$b], $v[$c]), 24); |
|
327 | + $v[$a] = self::add364($v[$a], $v[$b], $m[self::$sigma[$r][($i << 1) + 1]]); |
|
328 | + $v[$d] = self::rotr64(self::xor64($v[$d], $v[$a]), 16); |
|
329 | + $v[$c] = self::add64($v[$c], $v[$d]); |
|
330 | + $v[$b] = self::rotr64(self::xor64($v[$b], $v[$c]), 63); |
|
331 | + return $v; |
|
332 | + } |
|
333 | + |
|
334 | + /** |
|
335 | + * @internal You should not use this directly from another application |
|
336 | + * |
|
337 | + * @param SplFixedArray $ctx |
|
338 | + * @param int $inc |
|
339 | + * @return void |
|
340 | + * @throws SodiumException |
|
341 | + * @throws TypeError |
|
342 | + * @psalm-suppress MixedArgument |
|
343 | + * @psalm-suppress MixedArrayAccess |
|
344 | + * @psalm-suppress MixedArrayAssignment |
|
345 | + */ |
|
346 | + public static function increment_counter($ctx, $inc) |
|
347 | + { |
|
348 | + if ($inc < 0) { |
|
349 | + throw new SodiumException('Increasing by a negative number makes no sense.'); |
|
350 | + } |
|
351 | + $t = self::to64($inc); |
|
352 | + # S->t is $ctx[1] in our implementation |
|
353 | + |
|
354 | + # S->t[0] = ( uint64_t )( t >> 0 ); |
|
355 | + $ctx[1][0] = self::add64($ctx[1][0], $t); |
|
356 | + |
|
357 | + # S->t[1] += ( S->t[0] < inc ); |
|
358 | + if (!($ctx[1][0] instanceof ParagonIE_Sodium_Core32_Int64)) { |
|
359 | + throw new TypeError('Not an int64'); |
|
360 | + } |
|
361 | + /** @var ParagonIE_Sodium_Core32_Int64 $c*/ |
|
362 | + $c = $ctx[1][0]; |
|
363 | + if ($c->isLessThanInt($inc)) { |
|
364 | + $ctx[1][1] = self::add64($ctx[1][1], self::to64(1)); |
|
365 | + } |
|
366 | + } |
|
367 | + |
|
368 | + /** |
|
369 | + * @internal You should not use this directly from another application |
|
370 | + * |
|
371 | + * @param SplFixedArray $ctx |
|
372 | + * @param SplFixedArray $p |
|
373 | + * @param int $plen |
|
374 | + * @return void |
|
375 | + * @throws SodiumException |
|
376 | + * @throws TypeError |
|
377 | + * @psalm-suppress MixedArgument |
|
378 | + * @psalm-suppress MixedAssignment |
|
379 | + * @psalm-suppress MixedArrayAccess |
|
380 | + * @psalm-suppress MixedArrayAssignment |
|
381 | + * @psalm-suppress MixedArrayOffset |
|
382 | + * @psalm-suppress MixedMethodCall |
|
383 | + * @psalm-suppress MixedOperand |
|
384 | + */ |
|
385 | + public static function update(SplFixedArray $ctx, SplFixedArray $p, $plen) |
|
386 | + { |
|
387 | + self::pseudoConstructor(); |
|
388 | + |
|
389 | + $offset = 0; |
|
390 | + while ($plen > 0) { |
|
391 | + $left = $ctx[4]; |
|
392 | + $fill = 256 - $left; |
|
393 | + |
|
394 | + if ($plen > $fill) { |
|
395 | + # memcpy( S->buf + left, in, fill ); /* Fill buffer */ |
|
396 | + for ($i = $fill; $i--;) { |
|
397 | + $ctx[3][$i + $left] = $p[$i + $offset]; |
|
398 | + } |
|
399 | + |
|
400 | + # S->buflen += fill; |
|
401 | + $ctx[4] += $fill; |
|
402 | + |
|
403 | + # blake2b_increment_counter( S, BLAKE2B_BLOCKBYTES ); |
|
404 | + self::increment_counter($ctx, 128); |
|
405 | + |
|
406 | + # blake2b_compress( S, S->buf ); /* Compress */ |
|
407 | + self::compress($ctx, $ctx[3]); |
|
408 | + |
|
409 | + # memcpy( S->buf, S->buf + BLAKE2B_BLOCKBYTES, BLAKE2B_BLOCKBYTES ); /* Shift buffer left */ |
|
410 | + for ($i = 128; $i--;) { |
|
411 | + $ctx[3][$i] = $ctx[3][$i + 128]; |
|
412 | + } |
|
413 | + |
|
414 | + # S->buflen -= BLAKE2B_BLOCKBYTES; |
|
415 | + $ctx[4] -= 128; |
|
416 | + |
|
417 | + # in += fill; |
|
418 | + $offset += $fill; |
|
419 | + |
|
420 | + # inlen -= fill; |
|
421 | + $plen -= $fill; |
|
422 | + } else { |
|
423 | + for ($i = $plen; $i--;) { |
|
424 | + $ctx[3][$i + $left] = $p[$i + $offset]; |
|
425 | + } |
|
426 | + $ctx[4] += $plen; |
|
427 | + $offset += $plen; |
|
428 | + $plen -= $plen; |
|
429 | + } |
|
430 | + } |
|
431 | + } |
|
432 | + |
|
433 | + /** |
|
434 | + * @internal You should not use this directly from another application |
|
435 | + * |
|
436 | + * @param SplFixedArray $ctx |
|
437 | + * @param SplFixedArray $out |
|
438 | + * @return SplFixedArray |
|
439 | + * @throws SodiumException |
|
440 | + * @throws TypeError |
|
441 | + * @psalm-suppress MixedArgument |
|
442 | + * @psalm-suppress MixedAssignment |
|
443 | + * @psalm-suppress MixedArrayAccess |
|
444 | + * @psalm-suppress MixedArrayAssignment |
|
445 | + * @psalm-suppress MixedArrayOffset |
|
446 | + * @psalm-suppress MixedMethodCall |
|
447 | + * @psalm-suppress MixedOperand |
|
448 | + */ |
|
449 | + public static function finish(SplFixedArray $ctx, SplFixedArray $out) |
|
450 | + { |
|
451 | + self::pseudoConstructor(); |
|
452 | + if ($ctx[4] > 128) { |
|
453 | + self::increment_counter($ctx, 128); |
|
454 | + self::compress($ctx, $ctx[3]); |
|
455 | + $ctx[4] -= 128; |
|
456 | + if ($ctx[4] > 128) { |
|
457 | + throw new SodiumException('Failed to assert that buflen <= 128 bytes'); |
|
458 | + } |
|
459 | + for ($i = $ctx[4]; $i--;) { |
|
460 | + $ctx[3][$i] = $ctx[3][$i + 128]; |
|
461 | + } |
|
462 | + } |
|
463 | + |
|
464 | + self::increment_counter($ctx, $ctx[4]); |
|
465 | + $ctx[2][0] = self::new64(0xffffffff, 0xffffffff); |
|
466 | + |
|
467 | + for ($i = 256 - $ctx[4]; $i--;) { |
|
468 | + /** @var int $i */ |
|
469 | + $ctx[3][$i + $ctx[4]] = 0; |
|
470 | + } |
|
471 | + |
|
472 | + self::compress($ctx, $ctx[3]); |
|
473 | + |
|
474 | + $i = (int) (($out->getSize() - 1) / 8); |
|
475 | + for (; $i >= 0; --$i) { |
|
476 | + self::store64($out, $i << 3, $ctx[0][$i]); |
|
477 | + } |
|
478 | + return $out; |
|
479 | + } |
|
480 | + |
|
481 | + /** |
|
482 | + * @internal You should not use this directly from another application |
|
483 | + * |
|
484 | + * @param SplFixedArray|null $key |
|
485 | + * @param int $outlen |
|
486 | + * @param SplFixedArray|null $salt |
|
487 | + * @param SplFixedArray|null $personal |
|
488 | + * @return SplFixedArray |
|
489 | + * @throws SodiumException |
|
490 | + * @throws TypeError |
|
491 | + * @psalm-suppress MixedArgument |
|
492 | + * @psalm-suppress MixedAssignment |
|
493 | + * @psalm-suppress MixedArrayAccess |
|
494 | + * @psalm-suppress MixedArrayAssignment |
|
495 | + * @psalm-suppress MixedMethodCall |
|
496 | + */ |
|
497 | + public static function init( |
|
498 | + $key = null, |
|
499 | + $outlen = 64, |
|
500 | + $salt = null, |
|
501 | + $personal = null |
|
502 | + ) { |
|
503 | + self::pseudoConstructor(); |
|
504 | + $klen = 0; |
|
505 | + |
|
506 | + if ($key !== null) { |
|
507 | + if (count($key) > 64) { |
|
508 | + throw new SodiumException('Invalid key size'); |
|
509 | + } |
|
510 | + $klen = count($key); |
|
511 | + } |
|
512 | + |
|
513 | + if ($outlen > 64) { |
|
514 | + throw new SodiumException('Invalid output size'); |
|
515 | + } |
|
516 | + |
|
517 | + $ctx = self::context(); |
|
518 | + |
|
519 | + $p = new SplFixedArray(64); |
|
520 | + // Zero our param buffer... |
|
521 | + for ($i = 64; --$i;) { |
|
522 | + $p[$i] = 0; |
|
523 | + } |
|
524 | + |
|
525 | + $p[0] = $outlen; // digest_length |
|
526 | + $p[1] = $klen; // key_length |
|
527 | + $p[2] = 1; // fanout |
|
528 | + $p[3] = 1; // depth |
|
529 | + |
|
530 | + if ($salt instanceof SplFixedArray) { |
|
531 | + // salt: [32] through [47] |
|
532 | + for ($i = 0; $i < 16; ++$i) { |
|
533 | + $p[32 + $i] = (int) $salt[$i]; |
|
534 | + } |
|
535 | + } |
|
536 | + if ($personal instanceof SplFixedArray) { |
|
537 | + // personal: [48] through [63] |
|
538 | + for ($i = 0; $i < 16; ++$i) { |
|
539 | + $p[48 + $i] = (int) $personal[$i]; |
|
540 | + } |
|
541 | + } |
|
542 | + |
|
543 | + $ctx[0][0] = self::xor64( |
|
544 | + $ctx[0][0], |
|
545 | + self::load64($p, 0) |
|
546 | + ); |
|
547 | + |
|
548 | + if ($salt instanceof SplFixedArray || $personal instanceof SplFixedArray) { |
|
549 | + // We need to do what blake2b_init_param() does: |
|
550 | + for ($i = 1; $i < 8; ++$i) { |
|
551 | + $ctx[0][$i] = self::xor64( |
|
552 | + $ctx[0][$i], |
|
553 | + self::load64($p, $i << 3) |
|
554 | + ); |
|
555 | + } |
|
556 | + } |
|
557 | + |
|
558 | + if ($klen > 0 && $key instanceof SplFixedArray) { |
|
559 | + $block = new SplFixedArray(128); |
|
560 | + for ($i = 128; $i--;) { |
|
561 | + $block[$i] = 0; |
|
562 | + } |
|
563 | + for ($i = $klen; $i--;) { |
|
564 | + $block[$i] = $key[$i]; |
|
565 | + } |
|
566 | + self::update($ctx, $block, 128); |
|
567 | + $ctx[4] = 128; |
|
568 | + } |
|
569 | + |
|
570 | + return $ctx; |
|
571 | + } |
|
572 | + |
|
573 | + /** |
|
574 | + * Convert a string into an SplFixedArray of integers |
|
575 | + * |
|
576 | + * @internal You should not use this directly from another application |
|
577 | + * |
|
578 | + * @param string $str |
|
579 | + * @return SplFixedArray |
|
580 | + * @psalm-suppress MixedArgumentTypeCoercion |
|
581 | + */ |
|
582 | + public static function stringToSplFixedArray($str = '') |
|
583 | + { |
|
584 | + $values = unpack('C*', $str); |
|
585 | + return SplFixedArray::fromArray(array_values($values)); |
|
586 | + } |
|
587 | + |
|
588 | + /** |
|
589 | + * Convert an SplFixedArray of integers into a string |
|
590 | + * |
|
591 | + * @internal You should not use this directly from another application |
|
592 | + * |
|
593 | + * @param SplFixedArray $a |
|
594 | + * @return string |
|
595 | + */ |
|
596 | + public static function SplFixedArrayToString(SplFixedArray $a) |
|
597 | + { |
|
598 | + /** |
|
599 | + * @var array<int, string|int> |
|
600 | + */ |
|
601 | + $arr = $a->toArray(); |
|
602 | + $c = $a->count(); |
|
603 | + array_unshift($arr, str_repeat('C', $c)); |
|
604 | + return (string) (call_user_func_array('pack', $arr)); |
|
605 | + } |
|
606 | + |
|
607 | + /** |
|
608 | + * @internal You should not use this directly from another application |
|
609 | + * |
|
610 | + * @param SplFixedArray $ctx |
|
611 | + * @return string |
|
612 | + * @throws TypeError |
|
613 | + * @psalm-suppress MixedArgument |
|
614 | + * @psalm-suppress MixedArrayAccess |
|
615 | + * @psalm-suppress MixedArrayAssignment |
|
616 | + * @psalm-suppress MixedMethodCall |
|
617 | + */ |
|
618 | + public static function contextToString(SplFixedArray $ctx) |
|
619 | + { |
|
620 | + $str = ''; |
|
621 | + /** @var array<int, ParagonIE_Sodium_Core32_Int64> $ctxA */ |
|
622 | + $ctxA = $ctx[0]->toArray(); |
|
623 | + |
|
624 | + # uint64_t h[8]; |
|
625 | + for ($i = 0; $i < 8; ++$i) { |
|
626 | + if (!($ctxA[$i] instanceof ParagonIE_Sodium_Core32_Int64)) { |
|
627 | + throw new TypeError('Not an instance of Int64'); |
|
628 | + } |
|
629 | + /** @var ParagonIE_Sodium_Core32_Int64 $ctxAi */ |
|
630 | + $ctxAi = $ctxA[$i]; |
|
631 | + $str .= $ctxAi->toReverseString(); |
|
632 | + } |
|
633 | + |
|
634 | + # uint64_t t[2]; |
|
635 | + # uint64_t f[2]; |
|
636 | + for ($i = 1; $i < 3; ++$i) { |
|
637 | + /** @var array<int, ParagonIE_Sodium_Core32_Int64> $ctxA */ |
|
638 | + $ctxA = $ctx[$i]->toArray(); |
|
639 | + /** @var ParagonIE_Sodium_Core32_Int64 $ctxA1 */ |
|
640 | + $ctxA1 = $ctxA[0]; |
|
641 | + /** @var ParagonIE_Sodium_Core32_Int64 $ctxA2 */ |
|
642 | + $ctxA2 = $ctxA[1]; |
|
643 | + |
|
644 | + $str .= $ctxA1->toReverseString(); |
|
645 | + $str .= $ctxA2->toReverseString(); |
|
646 | + } |
|
647 | + |
|
648 | + # uint8_t buf[2 * 128]; |
|
649 | + $str .= self::SplFixedArrayToString($ctx[3]); |
|
650 | + |
|
651 | + /** @var int $ctx4 */ |
|
652 | + $ctx4 = $ctx[4]; |
|
653 | + |
|
654 | + # size_t buflen; |
|
655 | + $str .= implode('', array( |
|
656 | + self::intToChr($ctx4 & 0xff), |
|
657 | + self::intToChr(($ctx4 >> 8) & 0xff), |
|
658 | + self::intToChr(($ctx4 >> 16) & 0xff), |
|
659 | + self::intToChr(($ctx4 >> 24) & 0xff), |
|
660 | + "\x00\x00\x00\x00" |
|
661 | + /* |
|
662 | 662 | self::intToChr(($ctx4 >> 32) & 0xff), |
663 | 663 | self::intToChr(($ctx4 >> 40) & 0xff), |
664 | 664 | self::intToChr(($ctx4 >> 48) & 0xff), |
665 | 665 | self::intToChr(($ctx4 >> 56) & 0xff) |
666 | 666 | */ |
667 | - )); |
|
668 | - # uint8_t last_node; |
|
669 | - return $str . self::intToChr($ctx[5]) . str_repeat("\x00", 23); |
|
670 | - } |
|
671 | - |
|
672 | - /** |
|
673 | - * Creates an SplFixedArray containing other SplFixedArray elements, from |
|
674 | - * a string (compatible with \Sodium\crypto_generichash_{init, update, final}) |
|
675 | - * |
|
676 | - * @internal You should not use this directly from another application |
|
677 | - * |
|
678 | - * @param string $string |
|
679 | - * @return SplFixedArray |
|
680 | - * @throws SodiumException |
|
681 | - * @throws TypeError |
|
682 | - * @psalm-suppress MixedArrayAccess |
|
683 | - * @psalm-suppress MixedArrayAssignment |
|
684 | - */ |
|
685 | - public static function stringToContext($string) |
|
686 | - { |
|
687 | - $ctx = self::context(); |
|
688 | - |
|
689 | - # uint64_t h[8]; |
|
690 | - for ($i = 0; $i < 8; ++$i) { |
|
691 | - $ctx[0][$i] = ParagonIE_Sodium_Core32_Int64::fromReverseString( |
|
692 | - self::substr($string, (($i << 3) + 0), 8) |
|
693 | - ); |
|
694 | - } |
|
695 | - |
|
696 | - # uint64_t t[2]; |
|
697 | - # uint64_t f[2]; |
|
698 | - for ($i = 1; $i < 3; ++$i) { |
|
699 | - $ctx[$i][1] = ParagonIE_Sodium_Core32_Int64::fromReverseString( |
|
700 | - self::substr($string, 72 + (($i - 1) << 4), 8) |
|
701 | - ); |
|
702 | - $ctx[$i][0] = ParagonIE_Sodium_Core32_Int64::fromReverseString( |
|
703 | - self::substr($string, 64 + (($i - 1) << 4), 8) |
|
704 | - ); |
|
705 | - } |
|
706 | - |
|
707 | - # uint8_t buf[2 * 128]; |
|
708 | - $ctx[3] = self::stringToSplFixedArray(self::substr($string, 96, 256)); |
|
709 | - |
|
710 | - # uint8_t buf[2 * 128]; |
|
711 | - $int = 0; |
|
712 | - for ($i = 0; $i < 8; ++$i) { |
|
713 | - $int |= self::chrToInt($string[352 + $i]) << ($i << 3); |
|
714 | - } |
|
715 | - $ctx[4] = $int; |
|
716 | - |
|
717 | - return $ctx; |
|
718 | - } |
|
667 | + )); |
|
668 | + # uint8_t last_node; |
|
669 | + return $str . self::intToChr($ctx[5]) . str_repeat("\x00", 23); |
|
670 | + } |
|
671 | + |
|
672 | + /** |
|
673 | + * Creates an SplFixedArray containing other SplFixedArray elements, from |
|
674 | + * a string (compatible with \Sodium\crypto_generichash_{init, update, final}) |
|
675 | + * |
|
676 | + * @internal You should not use this directly from another application |
|
677 | + * |
|
678 | + * @param string $string |
|
679 | + * @return SplFixedArray |
|
680 | + * @throws SodiumException |
|
681 | + * @throws TypeError |
|
682 | + * @psalm-suppress MixedArrayAccess |
|
683 | + * @psalm-suppress MixedArrayAssignment |
|
684 | + */ |
|
685 | + public static function stringToContext($string) |
|
686 | + { |
|
687 | + $ctx = self::context(); |
|
688 | + |
|
689 | + # uint64_t h[8]; |
|
690 | + for ($i = 0; $i < 8; ++$i) { |
|
691 | + $ctx[0][$i] = ParagonIE_Sodium_Core32_Int64::fromReverseString( |
|
692 | + self::substr($string, (($i << 3) + 0), 8) |
|
693 | + ); |
|
694 | + } |
|
695 | + |
|
696 | + # uint64_t t[2]; |
|
697 | + # uint64_t f[2]; |
|
698 | + for ($i = 1; $i < 3; ++$i) { |
|
699 | + $ctx[$i][1] = ParagonIE_Sodium_Core32_Int64::fromReverseString( |
|
700 | + self::substr($string, 72 + (($i - 1) << 4), 8) |
|
701 | + ); |
|
702 | + $ctx[$i][0] = ParagonIE_Sodium_Core32_Int64::fromReverseString( |
|
703 | + self::substr($string, 64 + (($i - 1) << 4), 8) |
|
704 | + ); |
|
705 | + } |
|
706 | + |
|
707 | + # uint8_t buf[2 * 128]; |
|
708 | + $ctx[3] = self::stringToSplFixedArray(self::substr($string, 96, 256)); |
|
709 | + |
|
710 | + # uint8_t buf[2 * 128]; |
|
711 | + $int = 0; |
|
712 | + for ($i = 0; $i < 8; ++$i) { |
|
713 | + $int |= self::chrToInt($string[352 + $i]) << ($i << 3); |
|
714 | + } |
|
715 | + $ctx[4] = $int; |
|
716 | + |
|
717 | + return $ctx; |
|
718 | + } |
|
719 | 719 | } |
@@ -1,7 +1,7 @@ discard block |
||
1 | 1 | <?php |
2 | 2 | |
3 | 3 | if (class_exists('ParagonIE_Sodium_Core32_Ed25519', false)) { |
4 | - return; |
|
4 | + return; |
|
5 | 5 | } |
6 | 6 | |
7 | 7 | /** |
@@ -9,474 +9,474 @@ discard block |
||
9 | 9 | */ |
10 | 10 | abstract class ParagonIE_Sodium_Core32_Ed25519 extends ParagonIE_Sodium_Core32_Curve25519 |
11 | 11 | { |
12 | - const KEYPAIR_BYTES = 96; |
|
13 | - const SEED_BYTES = 32; |
|
14 | - |
|
15 | - /** |
|
16 | - * @internal You should not use this directly from another application |
|
17 | - * |
|
18 | - * @return string (96 bytes) |
|
19 | - * @throws Exception |
|
20 | - * @throws SodiumException |
|
21 | - * @throws TypeError |
|
22 | - */ |
|
23 | - public static function keypair() |
|
24 | - { |
|
25 | - $seed = random_bytes(self::SEED_BYTES); |
|
26 | - $pk = ''; |
|
27 | - $sk = ''; |
|
28 | - self::seed_keypair($pk, $sk, $seed); |
|
29 | - return $sk . $pk; |
|
30 | - } |
|
31 | - |
|
32 | - /** |
|
33 | - * @internal You should not use this directly from another application |
|
34 | - * |
|
35 | - * @param string $pk |
|
36 | - * @param string $sk |
|
37 | - * @param string $seed |
|
38 | - * @return string |
|
39 | - * @throws SodiumException |
|
40 | - * @throws TypeError |
|
41 | - */ |
|
42 | - public static function seed_keypair(&$pk, &$sk, $seed) |
|
43 | - { |
|
44 | - if (self::strlen($seed) !== self::SEED_BYTES) { |
|
45 | - throw new RangeException('crypto_sign keypair seed must be 32 bytes long'); |
|
46 | - } |
|
47 | - |
|
48 | - /** @var string $pk */ |
|
49 | - $pk = self::publickey_from_secretkey($seed); |
|
50 | - $sk = $seed . $pk; |
|
51 | - return $sk; |
|
52 | - } |
|
53 | - |
|
54 | - /** |
|
55 | - * @internal You should not use this directly from another application |
|
56 | - * |
|
57 | - * @param string $keypair |
|
58 | - * @return string |
|
59 | - * @throws TypeError |
|
60 | - */ |
|
61 | - public static function secretkey($keypair) |
|
62 | - { |
|
63 | - if (self::strlen($keypair) !== self::KEYPAIR_BYTES) { |
|
64 | - throw new RangeException('crypto_sign keypair must be 96 bytes long'); |
|
65 | - } |
|
66 | - return self::substr($keypair, 0, 64); |
|
67 | - } |
|
68 | - |
|
69 | - /** |
|
70 | - * @internal You should not use this directly from another application |
|
71 | - * |
|
72 | - * @param string $keypair |
|
73 | - * @return string |
|
74 | - * @throws RangeException |
|
75 | - * @throws TypeError |
|
76 | - */ |
|
77 | - public static function publickey($keypair) |
|
78 | - { |
|
79 | - if (self::strlen($keypair) !== self::KEYPAIR_BYTES) { |
|
80 | - throw new RangeException('crypto_sign keypair must be 96 bytes long'); |
|
81 | - } |
|
82 | - return self::substr($keypair, 64, 32); |
|
83 | - } |
|
84 | - |
|
85 | - /** |
|
86 | - * @internal You should not use this directly from another application |
|
87 | - * |
|
88 | - * @param string $sk |
|
89 | - * @return string |
|
90 | - * @throws SodiumException |
|
91 | - * @throws TypeError |
|
92 | - */ |
|
93 | - public static function publickey_from_secretkey($sk) |
|
94 | - { |
|
95 | - /** @var string $sk */ |
|
96 | - $sk = hash('sha512', self::substr($sk, 0, 32), true); |
|
97 | - $sk[0] = self::intToChr( |
|
98 | - self::chrToInt($sk[0]) & 248 |
|
99 | - ); |
|
100 | - $sk[31] = self::intToChr( |
|
101 | - (self::chrToInt($sk[31]) & 63) | 64 |
|
102 | - ); |
|
103 | - return self::sk_to_pk($sk); |
|
104 | - } |
|
105 | - |
|
106 | - /** |
|
107 | - * @param string $pk |
|
108 | - * @return string |
|
109 | - * @throws SodiumException |
|
110 | - * @throws TypeError |
|
111 | - */ |
|
112 | - public static function pk_to_curve25519($pk) |
|
113 | - { |
|
114 | - if (self::small_order($pk)) { |
|
115 | - throw new SodiumException('Public key is on a small order'); |
|
116 | - } |
|
117 | - $A = self::ge_frombytes_negate_vartime($pk); |
|
118 | - $p1 = self::ge_mul_l($A); |
|
119 | - if (!self::fe_isnonzero($p1->X)) { |
|
120 | - throw new SodiumException('Unexpected zero result'); |
|
121 | - } |
|
122 | - |
|
123 | - # fe_1(one_minus_y); |
|
124 | - # fe_sub(one_minus_y, one_minus_y, A.Y); |
|
125 | - # fe_invert(one_minus_y, one_minus_y); |
|
126 | - $one_minux_y = self::fe_invert( |
|
127 | - self::fe_sub( |
|
128 | - self::fe_1(), |
|
129 | - $A->Y |
|
130 | - ) |
|
131 | - ); |
|
132 | - |
|
133 | - |
|
134 | - # fe_1(x); |
|
135 | - # fe_add(x, x, A.Y); |
|
136 | - # fe_mul(x, x, one_minus_y); |
|
137 | - $x = self::fe_mul( |
|
138 | - self::fe_add(self::fe_1(), $A->Y), |
|
139 | - $one_minux_y |
|
140 | - ); |
|
141 | - |
|
142 | - # fe_tobytes(curve25519_pk, x); |
|
143 | - return self::fe_tobytes($x); |
|
144 | - } |
|
145 | - |
|
146 | - /** |
|
147 | - * @internal You should not use this directly from another application |
|
148 | - * |
|
149 | - * @param string $sk |
|
150 | - * @return string |
|
151 | - * @throws SodiumException |
|
152 | - * @throws TypeError |
|
153 | - */ |
|
154 | - public static function sk_to_pk($sk) |
|
155 | - { |
|
156 | - return self::ge_p3_tobytes( |
|
157 | - self::ge_scalarmult_base( |
|
158 | - self::substr($sk, 0, 32) |
|
159 | - ) |
|
160 | - ); |
|
161 | - } |
|
162 | - |
|
163 | - /** |
|
164 | - * @internal You should not use this directly from another application |
|
165 | - * |
|
166 | - * @param string $message |
|
167 | - * @param string $sk |
|
168 | - * @return string |
|
169 | - * @throws SodiumException |
|
170 | - * @throws TypeError |
|
171 | - */ |
|
172 | - public static function sign($message, $sk) |
|
173 | - { |
|
174 | - /** @var string $signature */ |
|
175 | - $signature = self::sign_detached($message, $sk); |
|
176 | - return $signature . $message; |
|
177 | - } |
|
178 | - |
|
179 | - /** |
|
180 | - * @internal You should not use this directly from another application |
|
181 | - * |
|
182 | - * @param string $message A signed message |
|
183 | - * @param string $pk Public key |
|
184 | - * @return string Message (without signature) |
|
185 | - * @throws SodiumException |
|
186 | - * @throws TypeError |
|
187 | - */ |
|
188 | - public static function sign_open($message, $pk) |
|
189 | - { |
|
190 | - /** @var string $signature */ |
|
191 | - $signature = self::substr($message, 0, 64); |
|
192 | - |
|
193 | - /** @var string $message */ |
|
194 | - $message = self::substr($message, 64); |
|
195 | - |
|
196 | - if (self::verify_detached($signature, $message, $pk)) { |
|
197 | - return $message; |
|
198 | - } |
|
199 | - throw new SodiumException('Invalid signature'); |
|
200 | - } |
|
201 | - |
|
202 | - /** |
|
203 | - * @internal You should not use this directly from another application |
|
204 | - * |
|
205 | - * @param string $message |
|
206 | - * @param string $sk |
|
207 | - * @return string |
|
208 | - * @throws SodiumException |
|
209 | - * @throws TypeError |
|
210 | - * @psalm-suppress PossiblyInvalidArgument |
|
211 | - */ |
|
212 | - public static function sign_detached($message, $sk) |
|
213 | - { |
|
214 | - # crypto_hash_sha512(az, sk, 32); |
|
215 | - $az = hash('sha512', self::substr($sk, 0, 32), true); |
|
216 | - |
|
217 | - # az[0] &= 248; |
|
218 | - # az[31] &= 63; |
|
219 | - # az[31] |= 64; |
|
220 | - $az[0] = self::intToChr(self::chrToInt($az[0]) & 248); |
|
221 | - $az[31] = self::intToChr((self::chrToInt($az[31]) & 63) | 64); |
|
222 | - |
|
223 | - # crypto_hash_sha512_init(&hs); |
|
224 | - # crypto_hash_sha512_update(&hs, az + 32, 32); |
|
225 | - # crypto_hash_sha512_update(&hs, m, mlen); |
|
226 | - # crypto_hash_sha512_final(&hs, nonce); |
|
227 | - $hs = hash_init('sha512'); |
|
228 | - self::hash_update($hs, self::substr($az, 32, 32)); |
|
229 | - self::hash_update($hs, $message); |
|
230 | - $nonceHash = hash_final($hs, true); |
|
231 | - |
|
232 | - # memmove(sig + 32, sk + 32, 32); |
|
233 | - $pk = self::substr($sk, 32, 32); |
|
234 | - |
|
235 | - # sc_reduce(nonce); |
|
236 | - # ge_scalarmult_base(&R, nonce); |
|
237 | - # ge_p3_tobytes(sig, &R); |
|
238 | - $nonce = self::sc_reduce($nonceHash) . self::substr($nonceHash, 32); |
|
239 | - $sig = self::ge_p3_tobytes( |
|
240 | - self::ge_scalarmult_base($nonce) |
|
241 | - ); |
|
242 | - |
|
243 | - # crypto_hash_sha512_init(&hs); |
|
244 | - # crypto_hash_sha512_update(&hs, sig, 64); |
|
245 | - # crypto_hash_sha512_update(&hs, m, mlen); |
|
246 | - # crypto_hash_sha512_final(&hs, hram); |
|
247 | - $hs = hash_init('sha512'); |
|
248 | - self::hash_update($hs, self::substr($sig, 0, 32)); |
|
249 | - self::hash_update($hs, self::substr($pk, 0, 32)); |
|
250 | - self::hash_update($hs, $message); |
|
251 | - $hramHash = hash_final($hs, true); |
|
252 | - |
|
253 | - # sc_reduce(hram); |
|
254 | - # sc_muladd(sig + 32, hram, az, nonce); |
|
255 | - $hram = self::sc_reduce($hramHash); |
|
256 | - $sigAfter = self::sc_muladd($hram, $az, $nonce); |
|
257 | - $sig = self::substr($sig, 0, 32) . self::substr($sigAfter, 0, 32); |
|
258 | - |
|
259 | - try { |
|
260 | - ParagonIE_Sodium_Compat::memzero($az); |
|
261 | - } catch (SodiumException $ex) { |
|
262 | - $az = null; |
|
263 | - } |
|
264 | - return $sig; |
|
265 | - } |
|
266 | - |
|
267 | - /** |
|
268 | - * @internal You should not use this directly from another application |
|
269 | - * |
|
270 | - * @param string $sig |
|
271 | - * @param string $message |
|
272 | - * @param string $pk |
|
273 | - * @return bool |
|
274 | - * @throws SodiumException |
|
275 | - * @throws TypeError |
|
276 | - */ |
|
277 | - public static function verify_detached($sig, $message, $pk) |
|
278 | - { |
|
279 | - if (self::strlen($sig) < 64) { |
|
280 | - throw new SodiumException('Signature is too short'); |
|
281 | - } |
|
282 | - if ((self::chrToInt($sig[63]) & 240) && self::check_S_lt_L(self::substr($sig, 32, 32))) { |
|
283 | - throw new SodiumException('S < L - Invalid signature'); |
|
284 | - } |
|
285 | - if (self::small_order($sig)) { |
|
286 | - throw new SodiumException('Signature is on too small of an order'); |
|
287 | - } |
|
288 | - if ((self::chrToInt($sig[63]) & 224) !== 0) { |
|
289 | - throw new SodiumException('Invalid signature'); |
|
290 | - } |
|
291 | - $d = 0; |
|
292 | - for ($i = 0; $i < 32; ++$i) { |
|
293 | - $d |= self::chrToInt($pk[$i]); |
|
294 | - } |
|
295 | - if ($d === 0) { |
|
296 | - throw new SodiumException('All zero public key'); |
|
297 | - } |
|
298 | - |
|
299 | - /** @var bool The original value of ParagonIE_Sodium_Compat::$fastMult */ |
|
300 | - $orig = ParagonIE_Sodium_Compat::$fastMult; |
|
301 | - |
|
302 | - // Set ParagonIE_Sodium_Compat::$fastMult to true to speed up verification. |
|
303 | - ParagonIE_Sodium_Compat::$fastMult = true; |
|
304 | - |
|
305 | - /** @var ParagonIE_Sodium_Core32_Curve25519_Ge_P3 $A */ |
|
306 | - $A = self::ge_frombytes_negate_vartime($pk); |
|
307 | - |
|
308 | - /** @var string $hDigest */ |
|
309 | - $hDigest = hash( |
|
310 | - 'sha512', |
|
311 | - self::substr($sig, 0, 32) . |
|
312 | - self::substr($pk, 0, 32) . |
|
313 | - $message, |
|
314 | - true |
|
315 | - ); |
|
316 | - |
|
317 | - /** @var string $h */ |
|
318 | - $h = self::sc_reduce($hDigest) . self::substr($hDigest, 32); |
|
319 | - |
|
320 | - /** @var ParagonIE_Sodium_Core32_Curve25519_Ge_P2 $R */ |
|
321 | - $R = self::ge_double_scalarmult_vartime( |
|
322 | - $h, |
|
323 | - $A, |
|
324 | - self::substr($sig, 32) |
|
325 | - ); |
|
326 | - |
|
327 | - /** @var string $rcheck */ |
|
328 | - $rcheck = self::ge_tobytes($R); |
|
329 | - |
|
330 | - // Reset ParagonIE_Sodium_Compat::$fastMult to what it was before. |
|
331 | - ParagonIE_Sodium_Compat::$fastMult = $orig; |
|
332 | - |
|
333 | - return self::verify_32($rcheck, self::substr($sig, 0, 32)); |
|
334 | - } |
|
335 | - |
|
336 | - /** |
|
337 | - * @internal You should not use this directly from another application |
|
338 | - * |
|
339 | - * @param string $S |
|
340 | - * @return bool |
|
341 | - * @throws SodiumException |
|
342 | - * @throws TypeError |
|
343 | - */ |
|
344 | - public static function check_S_lt_L($S) |
|
345 | - { |
|
346 | - if (self::strlen($S) < 32) { |
|
347 | - throw new SodiumException('Signature must be 32 bytes'); |
|
348 | - } |
|
349 | - static $L = array( |
|
350 | - 0xed, 0xd3, 0xf5, 0x5c, 0x1a, 0x63, 0x12, 0x58, |
|
351 | - 0xd6, 0x9c, 0xf7, 0xa2, 0xde, 0xf9, 0xde, 0x14, |
|
352 | - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
|
353 | - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x10 |
|
354 | - ); |
|
355 | - /** @var array<int, int> $L */ |
|
356 | - $c = 0; |
|
357 | - $n = 1; |
|
358 | - $i = 32; |
|
359 | - |
|
360 | - do { |
|
361 | - --$i; |
|
362 | - $x = self::chrToInt($S[$i]); |
|
363 | - $c |= ( |
|
364 | - (($x - $L[$i]) >> 8) & $n |
|
365 | - ); |
|
366 | - $n &= ( |
|
367 | - (($x ^ $L[$i]) - 1) >> 8 |
|
368 | - ); |
|
369 | - } while ($i !== 0); |
|
370 | - |
|
371 | - return $c === 0; |
|
372 | - } |
|
373 | - |
|
374 | - /** |
|
375 | - * @param string $R |
|
376 | - * @return bool |
|
377 | - * @throws SodiumException |
|
378 | - * @throws TypeError |
|
379 | - */ |
|
380 | - public static function small_order($R) |
|
381 | - { |
|
382 | - static $blocklist = array( |
|
383 | - /* 0 (order 4) */ |
|
384 | - array( |
|
385 | - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
|
386 | - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
|
387 | - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
|
388 | - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 |
|
389 | - ), |
|
390 | - /* 1 (order 1) */ |
|
391 | - array( |
|
392 | - 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
|
393 | - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
|
394 | - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
|
395 | - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 |
|
396 | - ), |
|
397 | - /* 2707385501144840649318225287225658788936804267575313519463743609750303402022 (order 8) */ |
|
398 | - array( |
|
399 | - 0x26, 0xe8, 0x95, 0x8f, 0xc2, 0xb2, 0x27, 0xb0, |
|
400 | - 0x45, 0xc3, 0xf4, 0x89, 0xf2, 0xef, 0x98, 0xf0, |
|
401 | - 0xd5, 0xdf, 0xac, 0x05, 0xd3, 0xc6, 0x33, 0x39, |
|
402 | - 0xb1, 0x38, 0x02, 0x88, 0x6d, 0x53, 0xfc, 0x05 |
|
403 | - ), |
|
404 | - /* 55188659117513257062467267217118295137698188065244968500265048394206261417927 (order 8) */ |
|
405 | - array( |
|
406 | - 0xc7, 0x17, 0x6a, 0x70, 0x3d, 0x4d, 0xd8, 0x4f, |
|
407 | - 0xba, 0x3c, 0x0b, 0x76, 0x0d, 0x10, 0x67, 0x0f, |
|
408 | - 0x2a, 0x20, 0x53, 0xfa, 0x2c, 0x39, 0xcc, 0xc6, |
|
409 | - 0x4e, 0xc7, 0xfd, 0x77, 0x92, 0xac, 0x03, 0x7a |
|
410 | - ), |
|
411 | - /* p-1 (order 2) */ |
|
412 | - array( |
|
413 | - 0x13, 0xe8, 0x95, 0x8f, 0xc2, 0xb2, 0x27, 0xb0, |
|
414 | - 0x45, 0xc3, 0xf4, 0x89, 0xf2, 0xef, 0x98, 0xf0, |
|
415 | - 0xd5, 0xdf, 0xac, 0x05, 0xd3, 0xc6, 0x33, 0x39, |
|
416 | - 0xb1, 0x38, 0x02, 0x88, 0x6d, 0x53, 0xfc, 0x85 |
|
417 | - ), |
|
418 | - /* p (order 4) */ |
|
419 | - array( |
|
420 | - 0xb4, 0x17, 0x6a, 0x70, 0x3d, 0x4d, 0xd8, 0x4f, |
|
421 | - 0xba, 0x3c, 0x0b, 0x76, 0x0d, 0x10, 0x67, 0x0f, |
|
422 | - 0x2a, 0x20, 0x53, 0xfa, 0x2c, 0x39, 0xcc, 0xc6, |
|
423 | - 0x4e, 0xc7, 0xfd, 0x77, 0x92, 0xac, 0x03, 0xfa |
|
424 | - ), |
|
425 | - /* p+1 (order 1) */ |
|
426 | - array( |
|
427 | - 0xec, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
428 | - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
429 | - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
430 | - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x7f |
|
431 | - ), |
|
432 | - /* p+2707385501144840649318225287225658788936804267575313519463743609750303402022 (order 8) */ |
|
433 | - array( |
|
434 | - 0xed, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
435 | - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
436 | - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
437 | - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x7f |
|
438 | - ), |
|
439 | - /* p+55188659117513257062467267217118295137698188065244968500265048394206261417927 (order 8) */ |
|
440 | - array( |
|
441 | - 0xee, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
442 | - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
443 | - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
444 | - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x7f |
|
445 | - ), |
|
446 | - /* 2p-1 (order 2) */ |
|
447 | - array( |
|
448 | - 0xd9, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
449 | - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
450 | - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
451 | - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff |
|
452 | - ), |
|
453 | - /* 2p (order 4) */ |
|
454 | - array( |
|
455 | - 0xda, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
456 | - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
457 | - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
458 | - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff |
|
459 | - ), |
|
460 | - /* 2p+1 (order 1) */ |
|
461 | - array( |
|
462 | - 0xdb, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
463 | - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
464 | - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
465 | - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff |
|
466 | - ) |
|
467 | - ); |
|
468 | - /** @var array<int, array<int, int>> $blocklist */ |
|
469 | - $countBlocklist = count($blocklist); |
|
470 | - |
|
471 | - for ($i = 0; $i < $countBlocklist; ++$i) { |
|
472 | - $c = 0; |
|
473 | - for ($j = 0; $j < 32; ++$j) { |
|
474 | - $c |= self::chrToInt($R[$j]) ^ $blocklist[$i][$j]; |
|
475 | - } |
|
476 | - if ($c === 0) { |
|
477 | - return true; |
|
478 | - } |
|
479 | - } |
|
480 | - return false; |
|
481 | - } |
|
12 | + const KEYPAIR_BYTES = 96; |
|
13 | + const SEED_BYTES = 32; |
|
14 | + |
|
15 | + /** |
|
16 | + * @internal You should not use this directly from another application |
|
17 | + * |
|
18 | + * @return string (96 bytes) |
|
19 | + * @throws Exception |
|
20 | + * @throws SodiumException |
|
21 | + * @throws TypeError |
|
22 | + */ |
|
23 | + public static function keypair() |
|
24 | + { |
|
25 | + $seed = random_bytes(self::SEED_BYTES); |
|
26 | + $pk = ''; |
|
27 | + $sk = ''; |
|
28 | + self::seed_keypair($pk, $sk, $seed); |
|
29 | + return $sk . $pk; |
|
30 | + } |
|
31 | + |
|
32 | + /** |
|
33 | + * @internal You should not use this directly from another application |
|
34 | + * |
|
35 | + * @param string $pk |
|
36 | + * @param string $sk |
|
37 | + * @param string $seed |
|
38 | + * @return string |
|
39 | + * @throws SodiumException |
|
40 | + * @throws TypeError |
|
41 | + */ |
|
42 | + public static function seed_keypair(&$pk, &$sk, $seed) |
|
43 | + { |
|
44 | + if (self::strlen($seed) !== self::SEED_BYTES) { |
|
45 | + throw new RangeException('crypto_sign keypair seed must be 32 bytes long'); |
|
46 | + } |
|
47 | + |
|
48 | + /** @var string $pk */ |
|
49 | + $pk = self::publickey_from_secretkey($seed); |
|
50 | + $sk = $seed . $pk; |
|
51 | + return $sk; |
|
52 | + } |
|
53 | + |
|
54 | + /** |
|
55 | + * @internal You should not use this directly from another application |
|
56 | + * |
|
57 | + * @param string $keypair |
|
58 | + * @return string |
|
59 | + * @throws TypeError |
|
60 | + */ |
|
61 | + public static function secretkey($keypair) |
|
62 | + { |
|
63 | + if (self::strlen($keypair) !== self::KEYPAIR_BYTES) { |
|
64 | + throw new RangeException('crypto_sign keypair must be 96 bytes long'); |
|
65 | + } |
|
66 | + return self::substr($keypair, 0, 64); |
|
67 | + } |
|
68 | + |
|
69 | + /** |
|
70 | + * @internal You should not use this directly from another application |
|
71 | + * |
|
72 | + * @param string $keypair |
|
73 | + * @return string |
|
74 | + * @throws RangeException |
|
75 | + * @throws TypeError |
|
76 | + */ |
|
77 | + public static function publickey($keypair) |
|
78 | + { |
|
79 | + if (self::strlen($keypair) !== self::KEYPAIR_BYTES) { |
|
80 | + throw new RangeException('crypto_sign keypair must be 96 bytes long'); |
|
81 | + } |
|
82 | + return self::substr($keypair, 64, 32); |
|
83 | + } |
|
84 | + |
|
85 | + /** |
|
86 | + * @internal You should not use this directly from another application |
|
87 | + * |
|
88 | + * @param string $sk |
|
89 | + * @return string |
|
90 | + * @throws SodiumException |
|
91 | + * @throws TypeError |
|
92 | + */ |
|
93 | + public static function publickey_from_secretkey($sk) |
|
94 | + { |
|
95 | + /** @var string $sk */ |
|
96 | + $sk = hash('sha512', self::substr($sk, 0, 32), true); |
|
97 | + $sk[0] = self::intToChr( |
|
98 | + self::chrToInt($sk[0]) & 248 |
|
99 | + ); |
|
100 | + $sk[31] = self::intToChr( |
|
101 | + (self::chrToInt($sk[31]) & 63) | 64 |
|
102 | + ); |
|
103 | + return self::sk_to_pk($sk); |
|
104 | + } |
|
105 | + |
|
106 | + /** |
|
107 | + * @param string $pk |
|
108 | + * @return string |
|
109 | + * @throws SodiumException |
|
110 | + * @throws TypeError |
|
111 | + */ |
|
112 | + public static function pk_to_curve25519($pk) |
|
113 | + { |
|
114 | + if (self::small_order($pk)) { |
|
115 | + throw new SodiumException('Public key is on a small order'); |
|
116 | + } |
|
117 | + $A = self::ge_frombytes_negate_vartime($pk); |
|
118 | + $p1 = self::ge_mul_l($A); |
|
119 | + if (!self::fe_isnonzero($p1->X)) { |
|
120 | + throw new SodiumException('Unexpected zero result'); |
|
121 | + } |
|
122 | + |
|
123 | + # fe_1(one_minus_y); |
|
124 | + # fe_sub(one_minus_y, one_minus_y, A.Y); |
|
125 | + # fe_invert(one_minus_y, one_minus_y); |
|
126 | + $one_minux_y = self::fe_invert( |
|
127 | + self::fe_sub( |
|
128 | + self::fe_1(), |
|
129 | + $A->Y |
|
130 | + ) |
|
131 | + ); |
|
132 | + |
|
133 | + |
|
134 | + # fe_1(x); |
|
135 | + # fe_add(x, x, A.Y); |
|
136 | + # fe_mul(x, x, one_minus_y); |
|
137 | + $x = self::fe_mul( |
|
138 | + self::fe_add(self::fe_1(), $A->Y), |
|
139 | + $one_minux_y |
|
140 | + ); |
|
141 | + |
|
142 | + # fe_tobytes(curve25519_pk, x); |
|
143 | + return self::fe_tobytes($x); |
|
144 | + } |
|
145 | + |
|
146 | + /** |
|
147 | + * @internal You should not use this directly from another application |
|
148 | + * |
|
149 | + * @param string $sk |
|
150 | + * @return string |
|
151 | + * @throws SodiumException |
|
152 | + * @throws TypeError |
|
153 | + */ |
|
154 | + public static function sk_to_pk($sk) |
|
155 | + { |
|
156 | + return self::ge_p3_tobytes( |
|
157 | + self::ge_scalarmult_base( |
|
158 | + self::substr($sk, 0, 32) |
|
159 | + ) |
|
160 | + ); |
|
161 | + } |
|
162 | + |
|
163 | + /** |
|
164 | + * @internal You should not use this directly from another application |
|
165 | + * |
|
166 | + * @param string $message |
|
167 | + * @param string $sk |
|
168 | + * @return string |
|
169 | + * @throws SodiumException |
|
170 | + * @throws TypeError |
|
171 | + */ |
|
172 | + public static function sign($message, $sk) |
|
173 | + { |
|
174 | + /** @var string $signature */ |
|
175 | + $signature = self::sign_detached($message, $sk); |
|
176 | + return $signature . $message; |
|
177 | + } |
|
178 | + |
|
179 | + /** |
|
180 | + * @internal You should not use this directly from another application |
|
181 | + * |
|
182 | + * @param string $message A signed message |
|
183 | + * @param string $pk Public key |
|
184 | + * @return string Message (without signature) |
|
185 | + * @throws SodiumException |
|
186 | + * @throws TypeError |
|
187 | + */ |
|
188 | + public static function sign_open($message, $pk) |
|
189 | + { |
|
190 | + /** @var string $signature */ |
|
191 | + $signature = self::substr($message, 0, 64); |
|
192 | + |
|
193 | + /** @var string $message */ |
|
194 | + $message = self::substr($message, 64); |
|
195 | + |
|
196 | + if (self::verify_detached($signature, $message, $pk)) { |
|
197 | + return $message; |
|
198 | + } |
|
199 | + throw new SodiumException('Invalid signature'); |
|
200 | + } |
|
201 | + |
|
202 | + /** |
|
203 | + * @internal You should not use this directly from another application |
|
204 | + * |
|
205 | + * @param string $message |
|
206 | + * @param string $sk |
|
207 | + * @return string |
|
208 | + * @throws SodiumException |
|
209 | + * @throws TypeError |
|
210 | + * @psalm-suppress PossiblyInvalidArgument |
|
211 | + */ |
|
212 | + public static function sign_detached($message, $sk) |
|
213 | + { |
|
214 | + # crypto_hash_sha512(az, sk, 32); |
|
215 | + $az = hash('sha512', self::substr($sk, 0, 32), true); |
|
216 | + |
|
217 | + # az[0] &= 248; |
|
218 | + # az[31] &= 63; |
|
219 | + # az[31] |= 64; |
|
220 | + $az[0] = self::intToChr(self::chrToInt($az[0]) & 248); |
|
221 | + $az[31] = self::intToChr((self::chrToInt($az[31]) & 63) | 64); |
|
222 | + |
|
223 | + # crypto_hash_sha512_init(&hs); |
|
224 | + # crypto_hash_sha512_update(&hs, az + 32, 32); |
|
225 | + # crypto_hash_sha512_update(&hs, m, mlen); |
|
226 | + # crypto_hash_sha512_final(&hs, nonce); |
|
227 | + $hs = hash_init('sha512'); |
|
228 | + self::hash_update($hs, self::substr($az, 32, 32)); |
|
229 | + self::hash_update($hs, $message); |
|
230 | + $nonceHash = hash_final($hs, true); |
|
231 | + |
|
232 | + # memmove(sig + 32, sk + 32, 32); |
|
233 | + $pk = self::substr($sk, 32, 32); |
|
234 | + |
|
235 | + # sc_reduce(nonce); |
|
236 | + # ge_scalarmult_base(&R, nonce); |
|
237 | + # ge_p3_tobytes(sig, &R); |
|
238 | + $nonce = self::sc_reduce($nonceHash) . self::substr($nonceHash, 32); |
|
239 | + $sig = self::ge_p3_tobytes( |
|
240 | + self::ge_scalarmult_base($nonce) |
|
241 | + ); |
|
242 | + |
|
243 | + # crypto_hash_sha512_init(&hs); |
|
244 | + # crypto_hash_sha512_update(&hs, sig, 64); |
|
245 | + # crypto_hash_sha512_update(&hs, m, mlen); |
|
246 | + # crypto_hash_sha512_final(&hs, hram); |
|
247 | + $hs = hash_init('sha512'); |
|
248 | + self::hash_update($hs, self::substr($sig, 0, 32)); |
|
249 | + self::hash_update($hs, self::substr($pk, 0, 32)); |
|
250 | + self::hash_update($hs, $message); |
|
251 | + $hramHash = hash_final($hs, true); |
|
252 | + |
|
253 | + # sc_reduce(hram); |
|
254 | + # sc_muladd(sig + 32, hram, az, nonce); |
|
255 | + $hram = self::sc_reduce($hramHash); |
|
256 | + $sigAfter = self::sc_muladd($hram, $az, $nonce); |
|
257 | + $sig = self::substr($sig, 0, 32) . self::substr($sigAfter, 0, 32); |
|
258 | + |
|
259 | + try { |
|
260 | + ParagonIE_Sodium_Compat::memzero($az); |
|
261 | + } catch (SodiumException $ex) { |
|
262 | + $az = null; |
|
263 | + } |
|
264 | + return $sig; |
|
265 | + } |
|
266 | + |
|
267 | + /** |
|
268 | + * @internal You should not use this directly from another application |
|
269 | + * |
|
270 | + * @param string $sig |
|
271 | + * @param string $message |
|
272 | + * @param string $pk |
|
273 | + * @return bool |
|
274 | + * @throws SodiumException |
|
275 | + * @throws TypeError |
|
276 | + */ |
|
277 | + public static function verify_detached($sig, $message, $pk) |
|
278 | + { |
|
279 | + if (self::strlen($sig) < 64) { |
|
280 | + throw new SodiumException('Signature is too short'); |
|
281 | + } |
|
282 | + if ((self::chrToInt($sig[63]) & 240) && self::check_S_lt_L(self::substr($sig, 32, 32))) { |
|
283 | + throw new SodiumException('S < L - Invalid signature'); |
|
284 | + } |
|
285 | + if (self::small_order($sig)) { |
|
286 | + throw new SodiumException('Signature is on too small of an order'); |
|
287 | + } |
|
288 | + if ((self::chrToInt($sig[63]) & 224) !== 0) { |
|
289 | + throw new SodiumException('Invalid signature'); |
|
290 | + } |
|
291 | + $d = 0; |
|
292 | + for ($i = 0; $i < 32; ++$i) { |
|
293 | + $d |= self::chrToInt($pk[$i]); |
|
294 | + } |
|
295 | + if ($d === 0) { |
|
296 | + throw new SodiumException('All zero public key'); |
|
297 | + } |
|
298 | + |
|
299 | + /** @var bool The original value of ParagonIE_Sodium_Compat::$fastMult */ |
|
300 | + $orig = ParagonIE_Sodium_Compat::$fastMult; |
|
301 | + |
|
302 | + // Set ParagonIE_Sodium_Compat::$fastMult to true to speed up verification. |
|
303 | + ParagonIE_Sodium_Compat::$fastMult = true; |
|
304 | + |
|
305 | + /** @var ParagonIE_Sodium_Core32_Curve25519_Ge_P3 $A */ |
|
306 | + $A = self::ge_frombytes_negate_vartime($pk); |
|
307 | + |
|
308 | + /** @var string $hDigest */ |
|
309 | + $hDigest = hash( |
|
310 | + 'sha512', |
|
311 | + self::substr($sig, 0, 32) . |
|
312 | + self::substr($pk, 0, 32) . |
|
313 | + $message, |
|
314 | + true |
|
315 | + ); |
|
316 | + |
|
317 | + /** @var string $h */ |
|
318 | + $h = self::sc_reduce($hDigest) . self::substr($hDigest, 32); |
|
319 | + |
|
320 | + /** @var ParagonIE_Sodium_Core32_Curve25519_Ge_P2 $R */ |
|
321 | + $R = self::ge_double_scalarmult_vartime( |
|
322 | + $h, |
|
323 | + $A, |
|
324 | + self::substr($sig, 32) |
|
325 | + ); |
|
326 | + |
|
327 | + /** @var string $rcheck */ |
|
328 | + $rcheck = self::ge_tobytes($R); |
|
329 | + |
|
330 | + // Reset ParagonIE_Sodium_Compat::$fastMult to what it was before. |
|
331 | + ParagonIE_Sodium_Compat::$fastMult = $orig; |
|
332 | + |
|
333 | + return self::verify_32($rcheck, self::substr($sig, 0, 32)); |
|
334 | + } |
|
335 | + |
|
336 | + /** |
|
337 | + * @internal You should not use this directly from another application |
|
338 | + * |
|
339 | + * @param string $S |
|
340 | + * @return bool |
|
341 | + * @throws SodiumException |
|
342 | + * @throws TypeError |
|
343 | + */ |
|
344 | + public static function check_S_lt_L($S) |
|
345 | + { |
|
346 | + if (self::strlen($S) < 32) { |
|
347 | + throw new SodiumException('Signature must be 32 bytes'); |
|
348 | + } |
|
349 | + static $L = array( |
|
350 | + 0xed, 0xd3, 0xf5, 0x5c, 0x1a, 0x63, 0x12, 0x58, |
|
351 | + 0xd6, 0x9c, 0xf7, 0xa2, 0xde, 0xf9, 0xde, 0x14, |
|
352 | + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
|
353 | + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x10 |
|
354 | + ); |
|
355 | + /** @var array<int, int> $L */ |
|
356 | + $c = 0; |
|
357 | + $n = 1; |
|
358 | + $i = 32; |
|
359 | + |
|
360 | + do { |
|
361 | + --$i; |
|
362 | + $x = self::chrToInt($S[$i]); |
|
363 | + $c |= ( |
|
364 | + (($x - $L[$i]) >> 8) & $n |
|
365 | + ); |
|
366 | + $n &= ( |
|
367 | + (($x ^ $L[$i]) - 1) >> 8 |
|
368 | + ); |
|
369 | + } while ($i !== 0); |
|
370 | + |
|
371 | + return $c === 0; |
|
372 | + } |
|
373 | + |
|
374 | + /** |
|
375 | + * @param string $R |
|
376 | + * @return bool |
|
377 | + * @throws SodiumException |
|
378 | + * @throws TypeError |
|
379 | + */ |
|
380 | + public static function small_order($R) |
|
381 | + { |
|
382 | + static $blocklist = array( |
|
383 | + /* 0 (order 4) */ |
|
384 | + array( |
|
385 | + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
|
386 | + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
|
387 | + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
|
388 | + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 |
|
389 | + ), |
|
390 | + /* 1 (order 1) */ |
|
391 | + array( |
|
392 | + 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
|
393 | + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
|
394 | + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
|
395 | + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 |
|
396 | + ), |
|
397 | + /* 2707385501144840649318225287225658788936804267575313519463743609750303402022 (order 8) */ |
|
398 | + array( |
|
399 | + 0x26, 0xe8, 0x95, 0x8f, 0xc2, 0xb2, 0x27, 0xb0, |
|
400 | + 0x45, 0xc3, 0xf4, 0x89, 0xf2, 0xef, 0x98, 0xf0, |
|
401 | + 0xd5, 0xdf, 0xac, 0x05, 0xd3, 0xc6, 0x33, 0x39, |
|
402 | + 0xb1, 0x38, 0x02, 0x88, 0x6d, 0x53, 0xfc, 0x05 |
|
403 | + ), |
|
404 | + /* 55188659117513257062467267217118295137698188065244968500265048394206261417927 (order 8) */ |
|
405 | + array( |
|
406 | + 0xc7, 0x17, 0x6a, 0x70, 0x3d, 0x4d, 0xd8, 0x4f, |
|
407 | + 0xba, 0x3c, 0x0b, 0x76, 0x0d, 0x10, 0x67, 0x0f, |
|
408 | + 0x2a, 0x20, 0x53, 0xfa, 0x2c, 0x39, 0xcc, 0xc6, |
|
409 | + 0x4e, 0xc7, 0xfd, 0x77, 0x92, 0xac, 0x03, 0x7a |
|
410 | + ), |
|
411 | + /* p-1 (order 2) */ |
|
412 | + array( |
|
413 | + 0x13, 0xe8, 0x95, 0x8f, 0xc2, 0xb2, 0x27, 0xb0, |
|
414 | + 0x45, 0xc3, 0xf4, 0x89, 0xf2, 0xef, 0x98, 0xf0, |
|
415 | + 0xd5, 0xdf, 0xac, 0x05, 0xd3, 0xc6, 0x33, 0x39, |
|
416 | + 0xb1, 0x38, 0x02, 0x88, 0x6d, 0x53, 0xfc, 0x85 |
|
417 | + ), |
|
418 | + /* p (order 4) */ |
|
419 | + array( |
|
420 | + 0xb4, 0x17, 0x6a, 0x70, 0x3d, 0x4d, 0xd8, 0x4f, |
|
421 | + 0xba, 0x3c, 0x0b, 0x76, 0x0d, 0x10, 0x67, 0x0f, |
|
422 | + 0x2a, 0x20, 0x53, 0xfa, 0x2c, 0x39, 0xcc, 0xc6, |
|
423 | + 0x4e, 0xc7, 0xfd, 0x77, 0x92, 0xac, 0x03, 0xfa |
|
424 | + ), |
|
425 | + /* p+1 (order 1) */ |
|
426 | + array( |
|
427 | + 0xec, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
428 | + 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
429 | + 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
430 | + 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x7f |
|
431 | + ), |
|
432 | + /* p+2707385501144840649318225287225658788936804267575313519463743609750303402022 (order 8) */ |
|
433 | + array( |
|
434 | + 0xed, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
435 | + 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
436 | + 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
437 | + 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x7f |
|
438 | + ), |
|
439 | + /* p+55188659117513257062467267217118295137698188065244968500265048394206261417927 (order 8) */ |
|
440 | + array( |
|
441 | + 0xee, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
442 | + 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
443 | + 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
444 | + 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x7f |
|
445 | + ), |
|
446 | + /* 2p-1 (order 2) */ |
|
447 | + array( |
|
448 | + 0xd9, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
449 | + 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
450 | + 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
451 | + 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff |
|
452 | + ), |
|
453 | + /* 2p (order 4) */ |
|
454 | + array( |
|
455 | + 0xda, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
456 | + 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
457 | + 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
458 | + 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff |
|
459 | + ), |
|
460 | + /* 2p+1 (order 1) */ |
|
461 | + array( |
|
462 | + 0xdb, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
463 | + 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
464 | + 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
|
465 | + 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff |
|
466 | + ) |
|
467 | + ); |
|
468 | + /** @var array<int, array<int, int>> $blocklist */ |
|
469 | + $countBlocklist = count($blocklist); |
|
470 | + |
|
471 | + for ($i = 0; $i < $countBlocklist; ++$i) { |
|
472 | + $c = 0; |
|
473 | + for ($j = 0; $j < 32; ++$j) { |
|
474 | + $c |= self::chrToInt($R[$j]) ^ $blocklist[$i][$j]; |
|
475 | + } |
|
476 | + if ($c === 0) { |
|
477 | + return true; |
|
478 | + } |
|
479 | + } |
|
480 | + return false; |
|
481 | + } |
|
482 | 482 | } |
@@ -1,7 +1,7 @@ |
||
1 | 1 | <?php |
2 | 2 | |
3 | 3 | if (class_exists('ParagonIE_Sodium_Core32_Util', false)) { |
4 | - return; |
|
4 | + return; |
|
5 | 5 | } |
6 | 6 | |
7 | 7 | /** |
@@ -1,7 +1,7 @@ discard block |
||
1 | 1 | <?php |
2 | 2 | |
3 | 3 | if (class_exists('ParagonIE_Sodium_Core32_SipHash', false)) { |
4 | - return; |
|
4 | + return; |
|
5 | 5 | } |
6 | 6 | |
7 | 7 | /** |
@@ -11,228 +11,228 @@ discard block |
||
11 | 11 | */ |
12 | 12 | class ParagonIE_Sodium_Core32_SipHash extends ParagonIE_Sodium_Core32_Util |
13 | 13 | { |
14 | - /** |
|
15 | - * @internal You should not use this directly from another application |
|
16 | - * |
|
17 | - * @param array<int, ParagonIE_Sodium_Core32_Int64> $v |
|
18 | - * @return array<int, ParagonIE_Sodium_Core32_Int64> |
|
19 | - */ |
|
20 | - public static function sipRound(array $v) |
|
21 | - { |
|
22 | - # v0 += v1; |
|
23 | - $v[0] = $v[0]->addInt64($v[1]); |
|
24 | - |
|
25 | - # v1 = ROTL(v1, 13); |
|
26 | - $v[1] = $v[1]->rotateLeft(13); |
|
27 | - |
|
28 | - # v1 ^= v0; |
|
29 | - $v[1] = $v[1]->xorInt64($v[0]); |
|
30 | - |
|
31 | - # v0=ROTL(v0,32); |
|
32 | - $v[0] = $v[0]->rotateLeft(32); |
|
33 | - |
|
34 | - # v2 += v3; |
|
35 | - $v[2] = $v[2]->addInt64($v[3]); |
|
36 | - |
|
37 | - # v3=ROTL(v3,16); |
|
38 | - $v[3] = $v[3]->rotateLeft(16); |
|
39 | - |
|
40 | - # v3 ^= v2; |
|
41 | - $v[3] = $v[3]->xorInt64($v[2]); |
|
42 | - |
|
43 | - # v0 += v3; |
|
44 | - $v[0] = $v[0]->addInt64($v[3]); |
|
45 | - |
|
46 | - # v3=ROTL(v3,21); |
|
47 | - $v[3] = $v[3]->rotateLeft(21); |
|
48 | - |
|
49 | - # v3 ^= v0; |
|
50 | - $v[3] = $v[3]->xorInt64($v[0]); |
|
51 | - |
|
52 | - # v2 += v1; |
|
53 | - $v[2] = $v[2]->addInt64($v[1]); |
|
54 | - |
|
55 | - # v1=ROTL(v1,17); |
|
56 | - $v[1] = $v[1]->rotateLeft(17); |
|
57 | - |
|
58 | - # v1 ^= v2; |
|
59 | - $v[1] = $v[1]->xorInt64($v[2]); |
|
60 | - |
|
61 | - # v2=ROTL(v2,32) |
|
62 | - $v[2] = $v[2]->rotateLeft(32); |
|
63 | - |
|
64 | - return $v; |
|
65 | - } |
|
66 | - |
|
67 | - /** |
|
68 | - * @internal You should not use this directly from another application |
|
69 | - * |
|
70 | - * @param string $in |
|
71 | - * @param string $key |
|
72 | - * @return string |
|
73 | - * @throws SodiumException |
|
74 | - * @throws TypeError |
|
75 | - */ |
|
76 | - public static function sipHash24($in, $key) |
|
77 | - { |
|
78 | - $inlen = self::strlen($in); |
|
79 | - |
|
80 | - # /* "somepseudorandomlygeneratedbytes" */ |
|
81 | - # u64 v0 = 0x736f6d6570736575ULL; |
|
82 | - # u64 v1 = 0x646f72616e646f6dULL; |
|
83 | - # u64 v2 = 0x6c7967656e657261ULL; |
|
84 | - # u64 v3 = 0x7465646279746573ULL; |
|
85 | - $v = array( |
|
86 | - new ParagonIE_Sodium_Core32_Int64( |
|
87 | - array(0x736f, 0x6d65, 0x7073, 0x6575) |
|
88 | - ), |
|
89 | - new ParagonIE_Sodium_Core32_Int64( |
|
90 | - array(0x646f, 0x7261, 0x6e64, 0x6f6d) |
|
91 | - ), |
|
92 | - new ParagonIE_Sodium_Core32_Int64( |
|
93 | - array(0x6c79, 0x6765, 0x6e65, 0x7261) |
|
94 | - ), |
|
95 | - new ParagonIE_Sodium_Core32_Int64( |
|
96 | - array(0x7465, 0x6462, 0x7974, 0x6573) |
|
97 | - ) |
|
98 | - ); |
|
99 | - |
|
100 | - # u64 k0 = LOAD64_LE( k ); |
|
101 | - # u64 k1 = LOAD64_LE( k + 8 ); |
|
102 | - $k = array( |
|
103 | - ParagonIE_Sodium_Core32_Int64::fromReverseString( |
|
104 | - self::substr($key, 0, 8) |
|
105 | - ), |
|
106 | - ParagonIE_Sodium_Core32_Int64::fromReverseString( |
|
107 | - self::substr($key, 8, 8) |
|
108 | - ) |
|
109 | - ); |
|
110 | - |
|
111 | - # b = ( ( u64 )inlen ) << 56; |
|
112 | - $b = new ParagonIE_Sodium_Core32_Int64( |
|
113 | - array(($inlen << 8) & 0xffff, 0, 0, 0) |
|
114 | - ); |
|
115 | - |
|
116 | - # v3 ^= k1; |
|
117 | - $v[3] = $v[3]->xorInt64($k[1]); |
|
118 | - # v2 ^= k0; |
|
119 | - $v[2] = $v[2]->xorInt64($k[0]); |
|
120 | - # v1 ^= k1; |
|
121 | - $v[1] = $v[1]->xorInt64($k[1]); |
|
122 | - # v0 ^= k0; |
|
123 | - $v[0] = $v[0]->xorInt64($k[0]); |
|
124 | - |
|
125 | - $left = $inlen; |
|
126 | - # for ( ; in != end; in += 8 ) |
|
127 | - while ($left >= 8) { |
|
128 | - # m = LOAD64_LE( in ); |
|
129 | - $m = ParagonIE_Sodium_Core32_Int64::fromReverseString( |
|
130 | - self::substr($in, 0, 8) |
|
131 | - ); |
|
132 | - |
|
133 | - # v3 ^= m; |
|
134 | - $v[3] = $v[3]->xorInt64($m); |
|
135 | - |
|
136 | - # SIPROUND; |
|
137 | - # SIPROUND; |
|
138 | - $v = self::sipRound($v); |
|
139 | - $v = self::sipRound($v); |
|
140 | - |
|
141 | - # v0 ^= m; |
|
142 | - $v[0] = $v[0]->xorInt64($m); |
|
143 | - |
|
144 | - $in = self::substr($in, 8); |
|
145 | - $left -= 8; |
|
146 | - } |
|
147 | - |
|
148 | - # switch( left ) |
|
149 | - # { |
|
150 | - # case 7: b |= ( ( u64 )in[ 6] ) << 48; |
|
151 | - # case 6: b |= ( ( u64 )in[ 5] ) << 40; |
|
152 | - # case 5: b |= ( ( u64 )in[ 4] ) << 32; |
|
153 | - # case 4: b |= ( ( u64 )in[ 3] ) << 24; |
|
154 | - # case 3: b |= ( ( u64 )in[ 2] ) << 16; |
|
155 | - # case 2: b |= ( ( u64 )in[ 1] ) << 8; |
|
156 | - # case 1: b |= ( ( u64 )in[ 0] ); break; |
|
157 | - # case 0: break; |
|
158 | - # } |
|
159 | - switch ($left) { |
|
160 | - case 7: |
|
161 | - $b = $b->orInt64( |
|
162 | - ParagonIE_Sodium_Core32_Int64::fromInts( |
|
163 | - 0, self::chrToInt($in[6]) << 16 |
|
164 | - ) |
|
165 | - ); |
|
166 | - case 6: |
|
167 | - $b = $b->orInt64( |
|
168 | - ParagonIE_Sodium_Core32_Int64::fromInts( |
|
169 | - 0, self::chrToInt($in[5]) << 8 |
|
170 | - ) |
|
171 | - ); |
|
172 | - case 5: |
|
173 | - $b = $b->orInt64( |
|
174 | - ParagonIE_Sodium_Core32_Int64::fromInts( |
|
175 | - 0, self::chrToInt($in[4]) |
|
176 | - ) |
|
177 | - ); |
|
178 | - case 4: |
|
179 | - $b = $b->orInt64( |
|
180 | - ParagonIE_Sodium_Core32_Int64::fromInts( |
|
181 | - self::chrToInt($in[3]) << 24, 0 |
|
182 | - ) |
|
183 | - ); |
|
184 | - case 3: |
|
185 | - $b = $b->orInt64( |
|
186 | - ParagonIE_Sodium_Core32_Int64::fromInts( |
|
187 | - self::chrToInt($in[2]) << 16, 0 |
|
188 | - ) |
|
189 | - ); |
|
190 | - case 2: |
|
191 | - $b = $b->orInt64( |
|
192 | - ParagonIE_Sodium_Core32_Int64::fromInts( |
|
193 | - self::chrToInt($in[1]) << 8, 0 |
|
194 | - ) |
|
195 | - ); |
|
196 | - case 1: |
|
197 | - $b = $b->orInt64( |
|
198 | - ParagonIE_Sodium_Core32_Int64::fromInts( |
|
199 | - self::chrToInt($in[0]), 0 |
|
200 | - ) |
|
201 | - ); |
|
202 | - case 0: |
|
203 | - break; |
|
204 | - } |
|
205 | - |
|
206 | - # v3 ^= b; |
|
207 | - $v[3] = $v[3]->xorInt64($b); |
|
208 | - |
|
209 | - # SIPROUND; |
|
210 | - # SIPROUND; |
|
211 | - $v = self::sipRound($v); |
|
212 | - $v = self::sipRound($v); |
|
213 | - |
|
214 | - # v0 ^= b; |
|
215 | - $v[0] = $v[0]->xorInt64($b); |
|
216 | - |
|
217 | - // Flip the lower 8 bits of v2 which is ($v[4], $v[5]) in our implementation |
|
218 | - # v2 ^= 0xff; |
|
219 | - $v[2]->limbs[3] ^= 0xff; |
|
220 | - |
|
221 | - # SIPROUND; |
|
222 | - # SIPROUND; |
|
223 | - # SIPROUND; |
|
224 | - # SIPROUND; |
|
225 | - $v = self::sipRound($v); |
|
226 | - $v = self::sipRound($v); |
|
227 | - $v = self::sipRound($v); |
|
228 | - $v = self::sipRound($v); |
|
229 | - |
|
230 | - # b = v0 ^ v1 ^ v2 ^ v3; |
|
231 | - # STORE64_LE( out, b ); |
|
232 | - return $v[0] |
|
233 | - ->xorInt64($v[1]) |
|
234 | - ->xorInt64($v[2]) |
|
235 | - ->xorInt64($v[3]) |
|
236 | - ->toReverseString(); |
|
237 | - } |
|
14 | + /** |
|
15 | + * @internal You should not use this directly from another application |
|
16 | + * |
|
17 | + * @param array<int, ParagonIE_Sodium_Core32_Int64> $v |
|
18 | + * @return array<int, ParagonIE_Sodium_Core32_Int64> |
|
19 | + */ |
|
20 | + public static function sipRound(array $v) |
|
21 | + { |
|
22 | + # v0 += v1; |
|
23 | + $v[0] = $v[0]->addInt64($v[1]); |
|
24 | + |
|
25 | + # v1 = ROTL(v1, 13); |
|
26 | + $v[1] = $v[1]->rotateLeft(13); |
|
27 | + |
|
28 | + # v1 ^= v0; |
|
29 | + $v[1] = $v[1]->xorInt64($v[0]); |
|
30 | + |
|
31 | + # v0=ROTL(v0,32); |
|
32 | + $v[0] = $v[0]->rotateLeft(32); |
|
33 | + |
|
34 | + # v2 += v3; |
|
35 | + $v[2] = $v[2]->addInt64($v[3]); |
|
36 | + |
|
37 | + # v3=ROTL(v3,16); |
|
38 | + $v[3] = $v[3]->rotateLeft(16); |
|
39 | + |
|
40 | + # v3 ^= v2; |
|
41 | + $v[3] = $v[3]->xorInt64($v[2]); |
|
42 | + |
|
43 | + # v0 += v3; |
|
44 | + $v[0] = $v[0]->addInt64($v[3]); |
|
45 | + |
|
46 | + # v3=ROTL(v3,21); |
|
47 | + $v[3] = $v[3]->rotateLeft(21); |
|
48 | + |
|
49 | + # v3 ^= v0; |
|
50 | + $v[3] = $v[3]->xorInt64($v[0]); |
|
51 | + |
|
52 | + # v2 += v1; |
|
53 | + $v[2] = $v[2]->addInt64($v[1]); |
|
54 | + |
|
55 | + # v1=ROTL(v1,17); |
|
56 | + $v[1] = $v[1]->rotateLeft(17); |
|
57 | + |
|
58 | + # v1 ^= v2; |
|
59 | + $v[1] = $v[1]->xorInt64($v[2]); |
|
60 | + |
|
61 | + # v2=ROTL(v2,32) |
|
62 | + $v[2] = $v[2]->rotateLeft(32); |
|
63 | + |
|
64 | + return $v; |
|
65 | + } |
|
66 | + |
|
67 | + /** |
|
68 | + * @internal You should not use this directly from another application |
|
69 | + * |
|
70 | + * @param string $in |
|
71 | + * @param string $key |
|
72 | + * @return string |
|
73 | + * @throws SodiumException |
|
74 | + * @throws TypeError |
|
75 | + */ |
|
76 | + public static function sipHash24($in, $key) |
|
77 | + { |
|
78 | + $inlen = self::strlen($in); |
|
79 | + |
|
80 | + # /* "somepseudorandomlygeneratedbytes" */ |
|
81 | + # u64 v0 = 0x736f6d6570736575ULL; |
|
82 | + # u64 v1 = 0x646f72616e646f6dULL; |
|
83 | + # u64 v2 = 0x6c7967656e657261ULL; |
|
84 | + # u64 v3 = 0x7465646279746573ULL; |
|
85 | + $v = array( |
|
86 | + new ParagonIE_Sodium_Core32_Int64( |
|
87 | + array(0x736f, 0x6d65, 0x7073, 0x6575) |
|
88 | + ), |
|
89 | + new ParagonIE_Sodium_Core32_Int64( |
|
90 | + array(0x646f, 0x7261, 0x6e64, 0x6f6d) |
|
91 | + ), |
|
92 | + new ParagonIE_Sodium_Core32_Int64( |
|
93 | + array(0x6c79, 0x6765, 0x6e65, 0x7261) |
|
94 | + ), |
|
95 | + new ParagonIE_Sodium_Core32_Int64( |
|
96 | + array(0x7465, 0x6462, 0x7974, 0x6573) |
|
97 | + ) |
|
98 | + ); |
|
99 | + |
|
100 | + # u64 k0 = LOAD64_LE( k ); |
|
101 | + # u64 k1 = LOAD64_LE( k + 8 ); |
|
102 | + $k = array( |
|
103 | + ParagonIE_Sodium_Core32_Int64::fromReverseString( |
|
104 | + self::substr($key, 0, 8) |
|
105 | + ), |
|
106 | + ParagonIE_Sodium_Core32_Int64::fromReverseString( |
|
107 | + self::substr($key, 8, 8) |
|
108 | + ) |
|
109 | + ); |
|
110 | + |
|
111 | + # b = ( ( u64 )inlen ) << 56; |
|
112 | + $b = new ParagonIE_Sodium_Core32_Int64( |
|
113 | + array(($inlen << 8) & 0xffff, 0, 0, 0) |
|
114 | + ); |
|
115 | + |
|
116 | + # v3 ^= k1; |
|
117 | + $v[3] = $v[3]->xorInt64($k[1]); |
|
118 | + # v2 ^= k0; |
|
119 | + $v[2] = $v[2]->xorInt64($k[0]); |
|
120 | + # v1 ^= k1; |
|
121 | + $v[1] = $v[1]->xorInt64($k[1]); |
|
122 | + # v0 ^= k0; |
|
123 | + $v[0] = $v[0]->xorInt64($k[0]); |
|
124 | + |
|
125 | + $left = $inlen; |
|
126 | + # for ( ; in != end; in += 8 ) |
|
127 | + while ($left >= 8) { |
|
128 | + # m = LOAD64_LE( in ); |
|
129 | + $m = ParagonIE_Sodium_Core32_Int64::fromReverseString( |
|
130 | + self::substr($in, 0, 8) |
|
131 | + ); |
|
132 | + |
|
133 | + # v3 ^= m; |
|
134 | + $v[3] = $v[3]->xorInt64($m); |
|
135 | + |
|
136 | + # SIPROUND; |
|
137 | + # SIPROUND; |
|
138 | + $v = self::sipRound($v); |
|
139 | + $v = self::sipRound($v); |
|
140 | + |
|
141 | + # v0 ^= m; |
|
142 | + $v[0] = $v[0]->xorInt64($m); |
|
143 | + |
|
144 | + $in = self::substr($in, 8); |
|
145 | + $left -= 8; |
|
146 | + } |
|
147 | + |
|
148 | + # switch( left ) |
|
149 | + # { |
|
150 | + # case 7: b |= ( ( u64 )in[ 6] ) << 48; |
|
151 | + # case 6: b |= ( ( u64 )in[ 5] ) << 40; |
|
152 | + # case 5: b |= ( ( u64 )in[ 4] ) << 32; |
|
153 | + # case 4: b |= ( ( u64 )in[ 3] ) << 24; |
|
154 | + # case 3: b |= ( ( u64 )in[ 2] ) << 16; |
|
155 | + # case 2: b |= ( ( u64 )in[ 1] ) << 8; |
|
156 | + # case 1: b |= ( ( u64 )in[ 0] ); break; |
|
157 | + # case 0: break; |
|
158 | + # } |
|
159 | + switch ($left) { |
|
160 | + case 7: |
|
161 | + $b = $b->orInt64( |
|
162 | + ParagonIE_Sodium_Core32_Int64::fromInts( |
|
163 | + 0, self::chrToInt($in[6]) << 16 |
|
164 | + ) |
|
165 | + ); |
|
166 | + case 6: |
|
167 | + $b = $b->orInt64( |
|
168 | + ParagonIE_Sodium_Core32_Int64::fromInts( |
|
169 | + 0, self::chrToInt($in[5]) << 8 |
|
170 | + ) |
|
171 | + ); |
|
172 | + case 5: |
|
173 | + $b = $b->orInt64( |
|
174 | + ParagonIE_Sodium_Core32_Int64::fromInts( |
|
175 | + 0, self::chrToInt($in[4]) |
|
176 | + ) |
|
177 | + ); |
|
178 | + case 4: |
|
179 | + $b = $b->orInt64( |
|
180 | + ParagonIE_Sodium_Core32_Int64::fromInts( |
|
181 | + self::chrToInt($in[3]) << 24, 0 |
|
182 | + ) |
|
183 | + ); |
|
184 | + case 3: |
|
185 | + $b = $b->orInt64( |
|
186 | + ParagonIE_Sodium_Core32_Int64::fromInts( |
|
187 | + self::chrToInt($in[2]) << 16, 0 |
|
188 | + ) |
|
189 | + ); |
|
190 | + case 2: |
|
191 | + $b = $b->orInt64( |
|
192 | + ParagonIE_Sodium_Core32_Int64::fromInts( |
|
193 | + self::chrToInt($in[1]) << 8, 0 |
|
194 | + ) |
|
195 | + ); |
|
196 | + case 1: |
|
197 | + $b = $b->orInt64( |
|
198 | + ParagonIE_Sodium_Core32_Int64::fromInts( |
|
199 | + self::chrToInt($in[0]), 0 |
|
200 | + ) |
|
201 | + ); |
|
202 | + case 0: |
|
203 | + break; |
|
204 | + } |
|
205 | + |
|
206 | + # v3 ^= b; |
|
207 | + $v[3] = $v[3]->xorInt64($b); |
|
208 | + |
|
209 | + # SIPROUND; |
|
210 | + # SIPROUND; |
|
211 | + $v = self::sipRound($v); |
|
212 | + $v = self::sipRound($v); |
|
213 | + |
|
214 | + # v0 ^= b; |
|
215 | + $v[0] = $v[0]->xorInt64($b); |
|
216 | + |
|
217 | + // Flip the lower 8 bits of v2 which is ($v[4], $v[5]) in our implementation |
|
218 | + # v2 ^= 0xff; |
|
219 | + $v[2]->limbs[3] ^= 0xff; |
|
220 | + |
|
221 | + # SIPROUND; |
|
222 | + # SIPROUND; |
|
223 | + # SIPROUND; |
|
224 | + # SIPROUND; |
|
225 | + $v = self::sipRound($v); |
|
226 | + $v = self::sipRound($v); |
|
227 | + $v = self::sipRound($v); |
|
228 | + $v = self::sipRound($v); |
|
229 | + |
|
230 | + # b = v0 ^ v1 ^ v2 ^ v3; |
|
231 | + # STORE64_LE( out, b ); |
|
232 | + return $v[0] |
|
233 | + ->xorInt64($v[1]) |
|
234 | + ->xorInt64($v[2]) |
|
235 | + ->xorInt64($v[3]) |
|
236 | + ->toReverseString(); |
|
237 | + } |
|
238 | 238 | } |
@@ -1,7 +1,7 @@ discard block |
||
1 | 1 | <?php |
2 | 2 | |
3 | 3 | if (class_exists('ParagonIE_Sodium_Core32_XChaCha20', false)) { |
4 | - return; |
|
4 | + return; |
|
5 | 5 | } |
6 | 6 | |
7 | 7 | /** |
@@ -9,56 +9,56 @@ discard block |
||
9 | 9 | */ |
10 | 10 | class ParagonIE_Sodium_Core32_XChaCha20 extends ParagonIE_Sodium_Core32_HChaCha20 |
11 | 11 | { |
12 | - /** |
|
13 | - * @internal You should not use this directly from another application |
|
14 | - * |
|
15 | - * @param int $len |
|
16 | - * @param string $nonce |
|
17 | - * @param string $key |
|
18 | - * @return string |
|
19 | - * @throws SodiumException |
|
20 | - * @throws TypeError |
|
21 | - */ |
|
22 | - public static function stream($len = 64, $nonce = '', $key = '') |
|
23 | - { |
|
24 | - if (self::strlen($nonce) !== 24) { |
|
25 | - throw new SodiumException('Nonce must be 24 bytes long'); |
|
26 | - } |
|
27 | - return self::encryptBytes( |
|
28 | - new ParagonIE_Sodium_Core32_ChaCha20_Ctx( |
|
29 | - self::hChaCha20( |
|
30 | - self::substr($nonce, 0, 16), |
|
31 | - $key |
|
32 | - ), |
|
33 | - self::substr($nonce, 16, 8) |
|
34 | - ), |
|
35 | - str_repeat("\x00", $len) |
|
36 | - ); |
|
37 | - } |
|
12 | + /** |
|
13 | + * @internal You should not use this directly from another application |
|
14 | + * |
|
15 | + * @param int $len |
|
16 | + * @param string $nonce |
|
17 | + * @param string $key |
|
18 | + * @return string |
|
19 | + * @throws SodiumException |
|
20 | + * @throws TypeError |
|
21 | + */ |
|
22 | + public static function stream($len = 64, $nonce = '', $key = '') |
|
23 | + { |
|
24 | + if (self::strlen($nonce) !== 24) { |
|
25 | + throw new SodiumException('Nonce must be 24 bytes long'); |
|
26 | + } |
|
27 | + return self::encryptBytes( |
|
28 | + new ParagonIE_Sodium_Core32_ChaCha20_Ctx( |
|
29 | + self::hChaCha20( |
|
30 | + self::substr($nonce, 0, 16), |
|
31 | + $key |
|
32 | + ), |
|
33 | + self::substr($nonce, 16, 8) |
|
34 | + ), |
|
35 | + str_repeat("\x00", $len) |
|
36 | + ); |
|
37 | + } |
|
38 | 38 | |
39 | - /** |
|
40 | - * @internal You should not use this directly from another application |
|
41 | - * |
|
42 | - * @param string $message |
|
43 | - * @param string $nonce |
|
44 | - * @param string $key |
|
45 | - * @param string $ic |
|
46 | - * @return string |
|
47 | - * @throws SodiumException |
|
48 | - * @throws TypeError |
|
49 | - */ |
|
50 | - public static function streamXorIc($message, $nonce = '', $key = '', $ic = '') |
|
51 | - { |
|
52 | - if (self::strlen($nonce) !== 24) { |
|
53 | - throw new SodiumException('Nonce must be 24 bytes long'); |
|
54 | - } |
|
55 | - return self::encryptBytes( |
|
56 | - new ParagonIE_Sodium_Core32_ChaCha20_Ctx( |
|
57 | - self::hChaCha20(self::substr($nonce, 0, 16), $key), |
|
58 | - self::substr($nonce, 16, 8), |
|
59 | - $ic |
|
60 | - ), |
|
61 | - $message |
|
62 | - ); |
|
63 | - } |
|
39 | + /** |
|
40 | + * @internal You should not use this directly from another application |
|
41 | + * |
|
42 | + * @param string $message |
|
43 | + * @param string $nonce |
|
44 | + * @param string $key |
|
45 | + * @param string $ic |
|
46 | + * @return string |
|
47 | + * @throws SodiumException |
|
48 | + * @throws TypeError |
|
49 | + */ |
|
50 | + public static function streamXorIc($message, $nonce = '', $key = '', $ic = '') |
|
51 | + { |
|
52 | + if (self::strlen($nonce) !== 24) { |
|
53 | + throw new SodiumException('Nonce must be 24 bytes long'); |
|
54 | + } |
|
55 | + return self::encryptBytes( |
|
56 | + new ParagonIE_Sodium_Core32_ChaCha20_Ctx( |
|
57 | + self::hChaCha20(self::substr($nonce, 0, 16), $key), |
|
58 | + self::substr($nonce, 16, 8), |
|
59 | + $ic |
|
60 | + ), |
|
61 | + $message |
|
62 | + ); |
|
63 | + } |
|
64 | 64 | } |
@@ -1,7 +1,7 @@ discard block |
||
1 | 1 | <?php |
2 | 2 | |
3 | 3 | if (class_exists('ParagonIE_Sodium_Core32_X25519', false)) { |
4 | - return; |
|
4 | + return; |
|
5 | 5 | } |
6 | 6 | |
7 | 7 | /** |
@@ -9,337 +9,337 @@ discard block |
||
9 | 9 | */ |
10 | 10 | abstract class ParagonIE_Sodium_Core32_X25519 extends ParagonIE_Sodium_Core32_Curve25519 |
11 | 11 | { |
12 | - /** |
|
13 | - * Alters the objects passed to this method in place. |
|
14 | - * |
|
15 | - * @internal You should not use this directly from another application |
|
16 | - * |
|
17 | - * @param ParagonIE_Sodium_Core32_Curve25519_Fe $f |
|
18 | - * @param ParagonIE_Sodium_Core32_Curve25519_Fe $g |
|
19 | - * @param int $b |
|
20 | - * @return void |
|
21 | - * @throws SodiumException |
|
22 | - * @throws TypeError |
|
23 | - * @psalm-suppress MixedMethodCall |
|
24 | - */ |
|
25 | - public static function fe_cswap( |
|
26 | - ParagonIE_Sodium_Core32_Curve25519_Fe $f, |
|
27 | - ParagonIE_Sodium_Core32_Curve25519_Fe $g, |
|
28 | - $b = 0 |
|
29 | - ) { |
|
30 | - $f0 = (int) $f[0]->toInt(); |
|
31 | - $f1 = (int) $f[1]->toInt(); |
|
32 | - $f2 = (int) $f[2]->toInt(); |
|
33 | - $f3 = (int) $f[3]->toInt(); |
|
34 | - $f4 = (int) $f[4]->toInt(); |
|
35 | - $f5 = (int) $f[5]->toInt(); |
|
36 | - $f6 = (int) $f[6]->toInt(); |
|
37 | - $f7 = (int) $f[7]->toInt(); |
|
38 | - $f8 = (int) $f[8]->toInt(); |
|
39 | - $f9 = (int) $f[9]->toInt(); |
|
40 | - $g0 = (int) $g[0]->toInt(); |
|
41 | - $g1 = (int) $g[1]->toInt(); |
|
42 | - $g2 = (int) $g[2]->toInt(); |
|
43 | - $g3 = (int) $g[3]->toInt(); |
|
44 | - $g4 = (int) $g[4]->toInt(); |
|
45 | - $g5 = (int) $g[5]->toInt(); |
|
46 | - $g6 = (int) $g[6]->toInt(); |
|
47 | - $g7 = (int) $g[7]->toInt(); |
|
48 | - $g8 = (int) $g[8]->toInt(); |
|
49 | - $g9 = (int) $g[9]->toInt(); |
|
50 | - $b = -$b; |
|
51 | - /** @var int $x0 */ |
|
52 | - $x0 = ($f0 ^ $g0) & $b; |
|
53 | - /** @var int $x1 */ |
|
54 | - $x1 = ($f1 ^ $g1) & $b; |
|
55 | - /** @var int $x2 */ |
|
56 | - $x2 = ($f2 ^ $g2) & $b; |
|
57 | - /** @var int $x3 */ |
|
58 | - $x3 = ($f3 ^ $g3) & $b; |
|
59 | - /** @var int $x4 */ |
|
60 | - $x4 = ($f4 ^ $g4) & $b; |
|
61 | - /** @var int $x5 */ |
|
62 | - $x5 = ($f5 ^ $g5) & $b; |
|
63 | - /** @var int $x6 */ |
|
64 | - $x6 = ($f6 ^ $g6) & $b; |
|
65 | - /** @var int $x7 */ |
|
66 | - $x7 = ($f7 ^ $g7) & $b; |
|
67 | - /** @var int $x8 */ |
|
68 | - $x8 = ($f8 ^ $g8) & $b; |
|
69 | - /** @var int $x9 */ |
|
70 | - $x9 = ($f9 ^ $g9) & $b; |
|
71 | - $f[0] = ParagonIE_Sodium_Core32_Int32::fromInt($f0 ^ $x0); |
|
72 | - $f[1] = ParagonIE_Sodium_Core32_Int32::fromInt($f1 ^ $x1); |
|
73 | - $f[2] = ParagonIE_Sodium_Core32_Int32::fromInt($f2 ^ $x2); |
|
74 | - $f[3] = ParagonIE_Sodium_Core32_Int32::fromInt($f3 ^ $x3); |
|
75 | - $f[4] = ParagonIE_Sodium_Core32_Int32::fromInt($f4 ^ $x4); |
|
76 | - $f[5] = ParagonIE_Sodium_Core32_Int32::fromInt($f5 ^ $x5); |
|
77 | - $f[6] = ParagonIE_Sodium_Core32_Int32::fromInt($f6 ^ $x6); |
|
78 | - $f[7] = ParagonIE_Sodium_Core32_Int32::fromInt($f7 ^ $x7); |
|
79 | - $f[8] = ParagonIE_Sodium_Core32_Int32::fromInt($f8 ^ $x8); |
|
80 | - $f[9] = ParagonIE_Sodium_Core32_Int32::fromInt($f9 ^ $x9); |
|
81 | - $g[0] = ParagonIE_Sodium_Core32_Int32::fromInt($g0 ^ $x0); |
|
82 | - $g[1] = ParagonIE_Sodium_Core32_Int32::fromInt($g1 ^ $x1); |
|
83 | - $g[2] = ParagonIE_Sodium_Core32_Int32::fromInt($g2 ^ $x2); |
|
84 | - $g[3] = ParagonIE_Sodium_Core32_Int32::fromInt($g3 ^ $x3); |
|
85 | - $g[4] = ParagonIE_Sodium_Core32_Int32::fromInt($g4 ^ $x4); |
|
86 | - $g[5] = ParagonIE_Sodium_Core32_Int32::fromInt($g5 ^ $x5); |
|
87 | - $g[6] = ParagonIE_Sodium_Core32_Int32::fromInt($g6 ^ $x6); |
|
88 | - $g[7] = ParagonIE_Sodium_Core32_Int32::fromInt($g7 ^ $x7); |
|
89 | - $g[8] = ParagonIE_Sodium_Core32_Int32::fromInt($g8 ^ $x8); |
|
90 | - $g[9] = ParagonIE_Sodium_Core32_Int32::fromInt($g9 ^ $x9); |
|
91 | - } |
|
92 | - |
|
93 | - /** |
|
94 | - * @internal You should not use this directly from another application |
|
95 | - * |
|
96 | - * @param ParagonIE_Sodium_Core32_Curve25519_Fe $f |
|
97 | - * @return ParagonIE_Sodium_Core32_Curve25519_Fe |
|
98 | - * @throws SodiumException |
|
99 | - * @throws TypeError |
|
100 | - * @psalm-suppress MixedAssignment |
|
101 | - * @psalm-suppress MixedMethodCall |
|
102 | - */ |
|
103 | - public static function fe_mul121666(ParagonIE_Sodium_Core32_Curve25519_Fe $f) |
|
104 | - { |
|
105 | - /** @var array<int, ParagonIE_Sodium_Core32_Int64> $h */ |
|
106 | - $h = array(); |
|
107 | - for ($i = 0; $i < 10; ++$i) { |
|
108 | - $h[$i] = $f[$i]->toInt64()->mulInt(121666, 17); |
|
109 | - } |
|
110 | - |
|
111 | - $carry9 = $h[9]->addInt(1 << 24)->shiftRight(25); |
|
112 | - $h[0] = $h[0]->addInt64($carry9->mulInt(19, 5)); |
|
113 | - $h[9] = $h[9]->subInt64($carry9->shiftLeft(25)); |
|
114 | - |
|
115 | - $carry1 = $h[1]->addInt(1 << 24)->shiftRight(25); |
|
116 | - $h[2] = $h[2]->addInt64($carry1); |
|
117 | - $h[1] = $h[1]->subInt64($carry1->shiftLeft(25)); |
|
118 | - |
|
119 | - $carry3 = $h[3]->addInt(1 << 24)->shiftRight(25); |
|
120 | - $h[4] = $h[4]->addInt64($carry3); |
|
121 | - $h[3] = $h[3]->subInt64($carry3->shiftLeft(25)); |
|
122 | - |
|
123 | - $carry5 = $h[5]->addInt(1 << 24)->shiftRight(25); |
|
124 | - $h[6] = $h[6]->addInt64($carry5); |
|
125 | - $h[5] = $h[5]->subInt64($carry5->shiftLeft(25)); |
|
126 | - |
|
127 | - $carry7 = $h[7]->addInt(1 << 24)->shiftRight(25); |
|
128 | - $h[8] = $h[8]->addInt64($carry7); |
|
129 | - $h[7] = $h[7]->subInt64($carry7->shiftLeft(25)); |
|
130 | - |
|
131 | - $carry0 = $h[0]->addInt(1 << 25)->shiftRight(26); |
|
132 | - $h[1] = $h[1]->addInt64($carry0); |
|
133 | - $h[0] = $h[0]->subInt64($carry0->shiftLeft(26)); |
|
134 | - |
|
135 | - $carry2 = $h[2]->addInt(1 << 25)->shiftRight(26); |
|
136 | - $h[3] = $h[3]->addInt64($carry2); |
|
137 | - $h[2] = $h[2]->subInt64($carry2->shiftLeft(26)); |
|
138 | - |
|
139 | - $carry4 = $h[4]->addInt(1 << 25)->shiftRight(26); |
|
140 | - $h[5] = $h[5]->addInt64($carry4); |
|
141 | - $h[4] = $h[4]->subInt64($carry4->shiftLeft(26)); |
|
142 | - |
|
143 | - $carry6 = $h[6]->addInt(1 << 25)->shiftRight(26); |
|
144 | - $h[7] = $h[7]->addInt64($carry6); |
|
145 | - $h[6] = $h[6]->subInt64($carry6->shiftLeft(26)); |
|
146 | - |
|
147 | - $carry8 = $h[8]->addInt(1 << 25)->shiftRight(26); |
|
148 | - $h[9] = $h[9]->addInt64($carry8); |
|
149 | - $h[8] = $h[8]->subInt64($carry8->shiftLeft(26)); |
|
150 | - |
|
151 | - for ($i = 0; $i < 10; ++$i) { |
|
152 | - $h[$i] = $h[$i]->toInt32(); |
|
153 | - } |
|
154 | - /** @var array<int, ParagonIE_Sodium_Core32_Int32> $h2 */ |
|
155 | - $h2 = $h; |
|
156 | - return ParagonIE_Sodium_Core32_Curve25519_Fe::fromArray($h2); |
|
157 | - } |
|
158 | - |
|
159 | - /** |
|
160 | - * @internal You should not use this directly from another application |
|
161 | - * |
|
162 | - * Inline comments preceded by # are from libsodium's ref10 code. |
|
163 | - * |
|
164 | - * @param string $n |
|
165 | - * @param string $p |
|
166 | - * @return string |
|
167 | - * @throws SodiumException |
|
168 | - * @throws TypeError |
|
169 | - */ |
|
170 | - public static function crypto_scalarmult_curve25519_ref10($n, $p) |
|
171 | - { |
|
172 | - # for (i = 0;i < 32;++i) e[i] = n[i]; |
|
173 | - $e = '' . $n; |
|
174 | - # e[0] &= 248; |
|
175 | - $e[0] = self::intToChr( |
|
176 | - self::chrToInt($e[0]) & 248 |
|
177 | - ); |
|
178 | - # e[31] &= 127; |
|
179 | - # e[31] |= 64; |
|
180 | - $e[31] = self::intToChr( |
|
181 | - (self::chrToInt($e[31]) & 127) | 64 |
|
182 | - ); |
|
183 | - # fe_frombytes(x1,p); |
|
184 | - $x1 = self::fe_frombytes($p); |
|
185 | - # fe_1(x2); |
|
186 | - $x2 = self::fe_1(); |
|
187 | - # fe_0(z2); |
|
188 | - $z2 = self::fe_0(); |
|
189 | - # fe_copy(x3,x1); |
|
190 | - $x3 = self::fe_copy($x1); |
|
191 | - # fe_1(z3); |
|
192 | - $z3 = self::fe_1(); |
|
193 | - |
|
194 | - # swap = 0; |
|
195 | - /** @var int $swap */ |
|
196 | - $swap = 0; |
|
197 | - |
|
198 | - # for (pos = 254;pos >= 0;--pos) { |
|
199 | - for ($pos = 254; $pos >= 0; --$pos) { |
|
200 | - # b = e[pos / 8] >> (pos & 7); |
|
201 | - /** @var int $b */ |
|
202 | - $b = self::chrToInt( |
|
203 | - $e[(int) floor($pos / 8)] |
|
204 | - ) >> ($pos & 7); |
|
205 | - # b &= 1; |
|
206 | - $b &= 1; |
|
207 | - |
|
208 | - # swap ^= b; |
|
209 | - $swap ^= $b; |
|
210 | - |
|
211 | - # fe_cswap(x2,x3,swap); |
|
212 | - self::fe_cswap($x2, $x3, $swap); |
|
213 | - |
|
214 | - # fe_cswap(z2,z3,swap); |
|
215 | - self::fe_cswap($z2, $z3, $swap); |
|
216 | - |
|
217 | - # swap = b; |
|
218 | - /** @var int $swap */ |
|
219 | - $swap = $b; |
|
220 | - |
|
221 | - # fe_sub(tmp0,x3,z3); |
|
222 | - $tmp0 = self::fe_sub($x3, $z3); |
|
223 | - |
|
224 | - # fe_sub(tmp1,x2,z2); |
|
225 | - $tmp1 = self::fe_sub($x2, $z2); |
|
226 | - |
|
227 | - # fe_add(x2,x2,z2); |
|
228 | - $x2 = self::fe_add($x2, $z2); |
|
229 | - |
|
230 | - # fe_add(z2,x3,z3); |
|
231 | - $z2 = self::fe_add($x3, $z3); |
|
232 | - |
|
233 | - # fe_mul(z3,tmp0,x2); |
|
234 | - $z3 = self::fe_mul($tmp0, $x2); |
|
235 | - |
|
236 | - # fe_mul(z2,z2,tmp1); |
|
237 | - $z2 = self::fe_mul($z2, $tmp1); |
|
238 | - |
|
239 | - # fe_sq(tmp0,tmp1); |
|
240 | - $tmp0 = self::fe_sq($tmp1); |
|
241 | - |
|
242 | - # fe_sq(tmp1,x2); |
|
243 | - $tmp1 = self::fe_sq($x2); |
|
244 | - |
|
245 | - # fe_add(x3,z3,z2); |
|
246 | - $x3 = self::fe_add($z3, $z2); |
|
247 | - |
|
248 | - # fe_sub(z2,z3,z2); |
|
249 | - $z2 = self::fe_sub($z3, $z2); |
|
250 | - |
|
251 | - # fe_mul(x2,tmp1,tmp0); |
|
252 | - $x2 = self::fe_mul($tmp1, $tmp0); |
|
253 | - |
|
254 | - # fe_sub(tmp1,tmp1,tmp0); |
|
255 | - $tmp1 = self::fe_sub($tmp1, $tmp0); |
|
256 | - |
|
257 | - # fe_sq(z2,z2); |
|
258 | - $z2 = self::fe_sq($z2); |
|
259 | - |
|
260 | - # fe_mul121666(z3,tmp1); |
|
261 | - $z3 = self::fe_mul121666($tmp1); |
|
262 | - |
|
263 | - # fe_sq(x3,x3); |
|
264 | - $x3 = self::fe_sq($x3); |
|
265 | - |
|
266 | - # fe_add(tmp0,tmp0,z3); |
|
267 | - $tmp0 = self::fe_add($tmp0, $z3); |
|
268 | - |
|
269 | - # fe_mul(z3,x1,z2); |
|
270 | - $z3 = self::fe_mul($x1, $z2); |
|
271 | - |
|
272 | - # fe_mul(z2,tmp1,tmp0); |
|
273 | - $z2 = self::fe_mul($tmp1, $tmp0); |
|
274 | - } |
|
275 | - |
|
276 | - # fe_cswap(x2,x3,swap); |
|
277 | - self::fe_cswap($x2, $x3, $swap); |
|
278 | - |
|
279 | - # fe_cswap(z2,z3,swap); |
|
280 | - self::fe_cswap($z2, $z3, $swap); |
|
281 | - |
|
282 | - # fe_invert(z2,z2); |
|
283 | - $z2 = self::fe_invert($z2); |
|
284 | - |
|
285 | - # fe_mul(x2,x2,z2); |
|
286 | - $x2 = self::fe_mul($x2, $z2); |
|
287 | - # fe_tobytes(q,x2); |
|
288 | - return (string) self::fe_tobytes($x2); |
|
289 | - } |
|
290 | - |
|
291 | - /** |
|
292 | - * @internal You should not use this directly from another application |
|
293 | - * |
|
294 | - * @param ParagonIE_Sodium_Core32_Curve25519_Fe $edwardsY |
|
295 | - * @param ParagonIE_Sodium_Core32_Curve25519_Fe $edwardsZ |
|
296 | - * @return ParagonIE_Sodium_Core32_Curve25519_Fe |
|
297 | - * @throws SodiumException |
|
298 | - * @throws TypeError |
|
299 | - */ |
|
300 | - public static function edwards_to_montgomery( |
|
301 | - ParagonIE_Sodium_Core32_Curve25519_Fe $edwardsY, |
|
302 | - ParagonIE_Sodium_Core32_Curve25519_Fe $edwardsZ |
|
303 | - ) { |
|
304 | - $tempX = self::fe_add($edwardsZ, $edwardsY); |
|
305 | - $tempZ = self::fe_sub($edwardsZ, $edwardsY); |
|
306 | - $tempZ = self::fe_invert($tempZ); |
|
307 | - return self::fe_mul($tempX, $tempZ); |
|
308 | - } |
|
309 | - |
|
310 | - /** |
|
311 | - * @internal You should not use this directly from another application |
|
312 | - * |
|
313 | - * @param string $n |
|
314 | - * @return string |
|
315 | - * @throws SodiumException |
|
316 | - * @throws TypeError |
|
317 | - */ |
|
318 | - public static function crypto_scalarmult_curve25519_ref10_base($n) |
|
319 | - { |
|
320 | - # for (i = 0;i < 32;++i) e[i] = n[i]; |
|
321 | - $e = '' . $n; |
|
322 | - |
|
323 | - # e[0] &= 248; |
|
324 | - $e[0] = self::intToChr( |
|
325 | - self::chrToInt($e[0]) & 248 |
|
326 | - ); |
|
327 | - |
|
328 | - # e[31] &= 127; |
|
329 | - # e[31] |= 64; |
|
330 | - $e[31] = self::intToChr( |
|
331 | - (self::chrToInt($e[31]) & 127) | 64 |
|
332 | - ); |
|
333 | - |
|
334 | - $A = self::ge_scalarmult_base($e); |
|
335 | - if ( |
|
336 | - !($A->Y instanceof ParagonIE_Sodium_Core32_Curve25519_Fe) |
|
337 | - || |
|
338 | - !($A->Z instanceof ParagonIE_Sodium_Core32_Curve25519_Fe) |
|
339 | - ) { |
|
340 | - throw new TypeError('Null points encountered'); |
|
341 | - } |
|
342 | - $pk = self::edwards_to_montgomery($A->Y, $A->Z); |
|
343 | - return self::fe_tobytes($pk); |
|
344 | - } |
|
12 | + /** |
|
13 | + * Alters the objects passed to this method in place. |
|
14 | + * |
|
15 | + * @internal You should not use this directly from another application |
|
16 | + * |
|
17 | + * @param ParagonIE_Sodium_Core32_Curve25519_Fe $f |
|
18 | + * @param ParagonIE_Sodium_Core32_Curve25519_Fe $g |
|
19 | + * @param int $b |
|
20 | + * @return void |
|
21 | + * @throws SodiumException |
|
22 | + * @throws TypeError |
|
23 | + * @psalm-suppress MixedMethodCall |
|
24 | + */ |
|
25 | + public static function fe_cswap( |
|
26 | + ParagonIE_Sodium_Core32_Curve25519_Fe $f, |
|
27 | + ParagonIE_Sodium_Core32_Curve25519_Fe $g, |
|
28 | + $b = 0 |
|
29 | + ) { |
|
30 | + $f0 = (int) $f[0]->toInt(); |
|
31 | + $f1 = (int) $f[1]->toInt(); |
|
32 | + $f2 = (int) $f[2]->toInt(); |
|
33 | + $f3 = (int) $f[3]->toInt(); |
|
34 | + $f4 = (int) $f[4]->toInt(); |
|
35 | + $f5 = (int) $f[5]->toInt(); |
|
36 | + $f6 = (int) $f[6]->toInt(); |
|
37 | + $f7 = (int) $f[7]->toInt(); |
|
38 | + $f8 = (int) $f[8]->toInt(); |
|
39 | + $f9 = (int) $f[9]->toInt(); |
|
40 | + $g0 = (int) $g[0]->toInt(); |
|
41 | + $g1 = (int) $g[1]->toInt(); |
|
42 | + $g2 = (int) $g[2]->toInt(); |
|
43 | + $g3 = (int) $g[3]->toInt(); |
|
44 | + $g4 = (int) $g[4]->toInt(); |
|
45 | + $g5 = (int) $g[5]->toInt(); |
|
46 | + $g6 = (int) $g[6]->toInt(); |
|
47 | + $g7 = (int) $g[7]->toInt(); |
|
48 | + $g8 = (int) $g[8]->toInt(); |
|
49 | + $g9 = (int) $g[9]->toInt(); |
|
50 | + $b = -$b; |
|
51 | + /** @var int $x0 */ |
|
52 | + $x0 = ($f0 ^ $g0) & $b; |
|
53 | + /** @var int $x1 */ |
|
54 | + $x1 = ($f1 ^ $g1) & $b; |
|
55 | + /** @var int $x2 */ |
|
56 | + $x2 = ($f2 ^ $g2) & $b; |
|
57 | + /** @var int $x3 */ |
|
58 | + $x3 = ($f3 ^ $g3) & $b; |
|
59 | + /** @var int $x4 */ |
|
60 | + $x4 = ($f4 ^ $g4) & $b; |
|
61 | + /** @var int $x5 */ |
|
62 | + $x5 = ($f5 ^ $g5) & $b; |
|
63 | + /** @var int $x6 */ |
|
64 | + $x6 = ($f6 ^ $g6) & $b; |
|
65 | + /** @var int $x7 */ |
|
66 | + $x7 = ($f7 ^ $g7) & $b; |
|
67 | + /** @var int $x8 */ |
|
68 | + $x8 = ($f8 ^ $g8) & $b; |
|
69 | + /** @var int $x9 */ |
|
70 | + $x9 = ($f9 ^ $g9) & $b; |
|
71 | + $f[0] = ParagonIE_Sodium_Core32_Int32::fromInt($f0 ^ $x0); |
|
72 | + $f[1] = ParagonIE_Sodium_Core32_Int32::fromInt($f1 ^ $x1); |
|
73 | + $f[2] = ParagonIE_Sodium_Core32_Int32::fromInt($f2 ^ $x2); |
|
74 | + $f[3] = ParagonIE_Sodium_Core32_Int32::fromInt($f3 ^ $x3); |
|
75 | + $f[4] = ParagonIE_Sodium_Core32_Int32::fromInt($f4 ^ $x4); |
|
76 | + $f[5] = ParagonIE_Sodium_Core32_Int32::fromInt($f5 ^ $x5); |
|
77 | + $f[6] = ParagonIE_Sodium_Core32_Int32::fromInt($f6 ^ $x6); |
|
78 | + $f[7] = ParagonIE_Sodium_Core32_Int32::fromInt($f7 ^ $x7); |
|
79 | + $f[8] = ParagonIE_Sodium_Core32_Int32::fromInt($f8 ^ $x8); |
|
80 | + $f[9] = ParagonIE_Sodium_Core32_Int32::fromInt($f9 ^ $x9); |
|
81 | + $g[0] = ParagonIE_Sodium_Core32_Int32::fromInt($g0 ^ $x0); |
|
82 | + $g[1] = ParagonIE_Sodium_Core32_Int32::fromInt($g1 ^ $x1); |
|
83 | + $g[2] = ParagonIE_Sodium_Core32_Int32::fromInt($g2 ^ $x2); |
|
84 | + $g[3] = ParagonIE_Sodium_Core32_Int32::fromInt($g3 ^ $x3); |
|
85 | + $g[4] = ParagonIE_Sodium_Core32_Int32::fromInt($g4 ^ $x4); |
|
86 | + $g[5] = ParagonIE_Sodium_Core32_Int32::fromInt($g5 ^ $x5); |
|
87 | + $g[6] = ParagonIE_Sodium_Core32_Int32::fromInt($g6 ^ $x6); |
|
88 | + $g[7] = ParagonIE_Sodium_Core32_Int32::fromInt($g7 ^ $x7); |
|
89 | + $g[8] = ParagonIE_Sodium_Core32_Int32::fromInt($g8 ^ $x8); |
|
90 | + $g[9] = ParagonIE_Sodium_Core32_Int32::fromInt($g9 ^ $x9); |
|
91 | + } |
|
92 | + |
|
93 | + /** |
|
94 | + * @internal You should not use this directly from another application |
|
95 | + * |
|
96 | + * @param ParagonIE_Sodium_Core32_Curve25519_Fe $f |
|
97 | + * @return ParagonIE_Sodium_Core32_Curve25519_Fe |
|
98 | + * @throws SodiumException |
|
99 | + * @throws TypeError |
|
100 | + * @psalm-suppress MixedAssignment |
|
101 | + * @psalm-suppress MixedMethodCall |
|
102 | + */ |
|
103 | + public static function fe_mul121666(ParagonIE_Sodium_Core32_Curve25519_Fe $f) |
|
104 | + { |
|
105 | + /** @var array<int, ParagonIE_Sodium_Core32_Int64> $h */ |
|
106 | + $h = array(); |
|
107 | + for ($i = 0; $i < 10; ++$i) { |
|
108 | + $h[$i] = $f[$i]->toInt64()->mulInt(121666, 17); |
|
109 | + } |
|
110 | + |
|
111 | + $carry9 = $h[9]->addInt(1 << 24)->shiftRight(25); |
|
112 | + $h[0] = $h[0]->addInt64($carry9->mulInt(19, 5)); |
|
113 | + $h[9] = $h[9]->subInt64($carry9->shiftLeft(25)); |
|
114 | + |
|
115 | + $carry1 = $h[1]->addInt(1 << 24)->shiftRight(25); |
|
116 | + $h[2] = $h[2]->addInt64($carry1); |
|
117 | + $h[1] = $h[1]->subInt64($carry1->shiftLeft(25)); |
|
118 | + |
|
119 | + $carry3 = $h[3]->addInt(1 << 24)->shiftRight(25); |
|
120 | + $h[4] = $h[4]->addInt64($carry3); |
|
121 | + $h[3] = $h[3]->subInt64($carry3->shiftLeft(25)); |
|
122 | + |
|
123 | + $carry5 = $h[5]->addInt(1 << 24)->shiftRight(25); |
|
124 | + $h[6] = $h[6]->addInt64($carry5); |
|
125 | + $h[5] = $h[5]->subInt64($carry5->shiftLeft(25)); |
|
126 | + |
|
127 | + $carry7 = $h[7]->addInt(1 << 24)->shiftRight(25); |
|
128 | + $h[8] = $h[8]->addInt64($carry7); |
|
129 | + $h[7] = $h[7]->subInt64($carry7->shiftLeft(25)); |
|
130 | + |
|
131 | + $carry0 = $h[0]->addInt(1 << 25)->shiftRight(26); |
|
132 | + $h[1] = $h[1]->addInt64($carry0); |
|
133 | + $h[0] = $h[0]->subInt64($carry0->shiftLeft(26)); |
|
134 | + |
|
135 | + $carry2 = $h[2]->addInt(1 << 25)->shiftRight(26); |
|
136 | + $h[3] = $h[3]->addInt64($carry2); |
|
137 | + $h[2] = $h[2]->subInt64($carry2->shiftLeft(26)); |
|
138 | + |
|
139 | + $carry4 = $h[4]->addInt(1 << 25)->shiftRight(26); |
|
140 | + $h[5] = $h[5]->addInt64($carry4); |
|
141 | + $h[4] = $h[4]->subInt64($carry4->shiftLeft(26)); |
|
142 | + |
|
143 | + $carry6 = $h[6]->addInt(1 << 25)->shiftRight(26); |
|
144 | + $h[7] = $h[7]->addInt64($carry6); |
|
145 | + $h[6] = $h[6]->subInt64($carry6->shiftLeft(26)); |
|
146 | + |
|
147 | + $carry8 = $h[8]->addInt(1 << 25)->shiftRight(26); |
|
148 | + $h[9] = $h[9]->addInt64($carry8); |
|
149 | + $h[8] = $h[8]->subInt64($carry8->shiftLeft(26)); |
|
150 | + |
|
151 | + for ($i = 0; $i < 10; ++$i) { |
|
152 | + $h[$i] = $h[$i]->toInt32(); |
|
153 | + } |
|
154 | + /** @var array<int, ParagonIE_Sodium_Core32_Int32> $h2 */ |
|
155 | + $h2 = $h; |
|
156 | + return ParagonIE_Sodium_Core32_Curve25519_Fe::fromArray($h2); |
|
157 | + } |
|
158 | + |
|
159 | + /** |
|
160 | + * @internal You should not use this directly from another application |
|
161 | + * |
|
162 | + * Inline comments preceded by # are from libsodium's ref10 code. |
|
163 | + * |
|
164 | + * @param string $n |
|
165 | + * @param string $p |
|
166 | + * @return string |
|
167 | + * @throws SodiumException |
|
168 | + * @throws TypeError |
|
169 | + */ |
|
170 | + public static function crypto_scalarmult_curve25519_ref10($n, $p) |
|
171 | + { |
|
172 | + # for (i = 0;i < 32;++i) e[i] = n[i]; |
|
173 | + $e = '' . $n; |
|
174 | + # e[0] &= 248; |
|
175 | + $e[0] = self::intToChr( |
|
176 | + self::chrToInt($e[0]) & 248 |
|
177 | + ); |
|
178 | + # e[31] &= 127; |
|
179 | + # e[31] |= 64; |
|
180 | + $e[31] = self::intToChr( |
|
181 | + (self::chrToInt($e[31]) & 127) | 64 |
|
182 | + ); |
|
183 | + # fe_frombytes(x1,p); |
|
184 | + $x1 = self::fe_frombytes($p); |
|
185 | + # fe_1(x2); |
|
186 | + $x2 = self::fe_1(); |
|
187 | + # fe_0(z2); |
|
188 | + $z2 = self::fe_0(); |
|
189 | + # fe_copy(x3,x1); |
|
190 | + $x3 = self::fe_copy($x1); |
|
191 | + # fe_1(z3); |
|
192 | + $z3 = self::fe_1(); |
|
193 | + |
|
194 | + # swap = 0; |
|
195 | + /** @var int $swap */ |
|
196 | + $swap = 0; |
|
197 | + |
|
198 | + # for (pos = 254;pos >= 0;--pos) { |
|
199 | + for ($pos = 254; $pos >= 0; --$pos) { |
|
200 | + # b = e[pos / 8] >> (pos & 7); |
|
201 | + /** @var int $b */ |
|
202 | + $b = self::chrToInt( |
|
203 | + $e[(int) floor($pos / 8)] |
|
204 | + ) >> ($pos & 7); |
|
205 | + # b &= 1; |
|
206 | + $b &= 1; |
|
207 | + |
|
208 | + # swap ^= b; |
|
209 | + $swap ^= $b; |
|
210 | + |
|
211 | + # fe_cswap(x2,x3,swap); |
|
212 | + self::fe_cswap($x2, $x3, $swap); |
|
213 | + |
|
214 | + # fe_cswap(z2,z3,swap); |
|
215 | + self::fe_cswap($z2, $z3, $swap); |
|
216 | + |
|
217 | + # swap = b; |
|
218 | + /** @var int $swap */ |
|
219 | + $swap = $b; |
|
220 | + |
|
221 | + # fe_sub(tmp0,x3,z3); |
|
222 | + $tmp0 = self::fe_sub($x3, $z3); |
|
223 | + |
|
224 | + # fe_sub(tmp1,x2,z2); |
|
225 | + $tmp1 = self::fe_sub($x2, $z2); |
|
226 | + |
|
227 | + # fe_add(x2,x2,z2); |
|
228 | + $x2 = self::fe_add($x2, $z2); |
|
229 | + |
|
230 | + # fe_add(z2,x3,z3); |
|
231 | + $z2 = self::fe_add($x3, $z3); |
|
232 | + |
|
233 | + # fe_mul(z3,tmp0,x2); |
|
234 | + $z3 = self::fe_mul($tmp0, $x2); |
|
235 | + |
|
236 | + # fe_mul(z2,z2,tmp1); |
|
237 | + $z2 = self::fe_mul($z2, $tmp1); |
|
238 | + |
|
239 | + # fe_sq(tmp0,tmp1); |
|
240 | + $tmp0 = self::fe_sq($tmp1); |
|
241 | + |
|
242 | + # fe_sq(tmp1,x2); |
|
243 | + $tmp1 = self::fe_sq($x2); |
|
244 | + |
|
245 | + # fe_add(x3,z3,z2); |
|
246 | + $x3 = self::fe_add($z3, $z2); |
|
247 | + |
|
248 | + # fe_sub(z2,z3,z2); |
|
249 | + $z2 = self::fe_sub($z3, $z2); |
|
250 | + |
|
251 | + # fe_mul(x2,tmp1,tmp0); |
|
252 | + $x2 = self::fe_mul($tmp1, $tmp0); |
|
253 | + |
|
254 | + # fe_sub(tmp1,tmp1,tmp0); |
|
255 | + $tmp1 = self::fe_sub($tmp1, $tmp0); |
|
256 | + |
|
257 | + # fe_sq(z2,z2); |
|
258 | + $z2 = self::fe_sq($z2); |
|
259 | + |
|
260 | + # fe_mul121666(z3,tmp1); |
|
261 | + $z3 = self::fe_mul121666($tmp1); |
|
262 | + |
|
263 | + # fe_sq(x3,x3); |
|
264 | + $x3 = self::fe_sq($x3); |
|
265 | + |
|
266 | + # fe_add(tmp0,tmp0,z3); |
|
267 | + $tmp0 = self::fe_add($tmp0, $z3); |
|
268 | + |
|
269 | + # fe_mul(z3,x1,z2); |
|
270 | + $z3 = self::fe_mul($x1, $z2); |
|
271 | + |
|
272 | + # fe_mul(z2,tmp1,tmp0); |
|
273 | + $z2 = self::fe_mul($tmp1, $tmp0); |
|
274 | + } |
|
275 | + |
|
276 | + # fe_cswap(x2,x3,swap); |
|
277 | + self::fe_cswap($x2, $x3, $swap); |
|
278 | + |
|
279 | + # fe_cswap(z2,z3,swap); |
|
280 | + self::fe_cswap($z2, $z3, $swap); |
|
281 | + |
|
282 | + # fe_invert(z2,z2); |
|
283 | + $z2 = self::fe_invert($z2); |
|
284 | + |
|
285 | + # fe_mul(x2,x2,z2); |
|
286 | + $x2 = self::fe_mul($x2, $z2); |
|
287 | + # fe_tobytes(q,x2); |
|
288 | + return (string) self::fe_tobytes($x2); |
|
289 | + } |
|
290 | + |
|
291 | + /** |
|
292 | + * @internal You should not use this directly from another application |
|
293 | + * |
|
294 | + * @param ParagonIE_Sodium_Core32_Curve25519_Fe $edwardsY |
|
295 | + * @param ParagonIE_Sodium_Core32_Curve25519_Fe $edwardsZ |
|
296 | + * @return ParagonIE_Sodium_Core32_Curve25519_Fe |
|
297 | + * @throws SodiumException |
|
298 | + * @throws TypeError |
|
299 | + */ |
|
300 | + public static function edwards_to_montgomery( |
|
301 | + ParagonIE_Sodium_Core32_Curve25519_Fe $edwardsY, |
|
302 | + ParagonIE_Sodium_Core32_Curve25519_Fe $edwardsZ |
|
303 | + ) { |
|
304 | + $tempX = self::fe_add($edwardsZ, $edwardsY); |
|
305 | + $tempZ = self::fe_sub($edwardsZ, $edwardsY); |
|
306 | + $tempZ = self::fe_invert($tempZ); |
|
307 | + return self::fe_mul($tempX, $tempZ); |
|
308 | + } |
|
309 | + |
|
310 | + /** |
|
311 | + * @internal You should not use this directly from another application |
|
312 | + * |
|
313 | + * @param string $n |
|
314 | + * @return string |
|
315 | + * @throws SodiumException |
|
316 | + * @throws TypeError |
|
317 | + */ |
|
318 | + public static function crypto_scalarmult_curve25519_ref10_base($n) |
|
319 | + { |
|
320 | + # for (i = 0;i < 32;++i) e[i] = n[i]; |
|
321 | + $e = '' . $n; |
|
322 | + |
|
323 | + # e[0] &= 248; |
|
324 | + $e[0] = self::intToChr( |
|
325 | + self::chrToInt($e[0]) & 248 |
|
326 | + ); |
|
327 | + |
|
328 | + # e[31] &= 127; |
|
329 | + # e[31] |= 64; |
|
330 | + $e[31] = self::intToChr( |
|
331 | + (self::chrToInt($e[31]) & 127) | 64 |
|
332 | + ); |
|
333 | + |
|
334 | + $A = self::ge_scalarmult_base($e); |
|
335 | + if ( |
|
336 | + !($A->Y instanceof ParagonIE_Sodium_Core32_Curve25519_Fe) |
|
337 | + || |
|
338 | + !($A->Z instanceof ParagonIE_Sodium_Core32_Curve25519_Fe) |
|
339 | + ) { |
|
340 | + throw new TypeError('Null points encountered'); |
|
341 | + } |
|
342 | + $pk = self::edwards_to_montgomery($A->Y, $A->Z); |
|
343 | + return self::fe_tobytes($pk); |
|
344 | + } |
|
345 | 345 | } |
@@ -9,863 +9,863 @@ |
||
9 | 9 | */ |
10 | 10 | class ParagonIE_Sodium_Core32_Int32 |
11 | 11 | { |
12 | - /** |
|
13 | - * @var array<int, int> - two 16-bit integers |
|
14 | - * |
|
15 | - * 0 is the higher 16 bits |
|
16 | - * 1 is the lower 16 bits |
|
17 | - */ |
|
18 | - public $limbs = array(0, 0); |
|
19 | - |
|
20 | - /** |
|
21 | - * @var int |
|
22 | - */ |
|
23 | - public $overflow = 0; |
|
24 | - |
|
25 | - /** |
|
26 | - * @var bool |
|
27 | - */ |
|
28 | - public $unsignedInt = false; |
|
29 | - |
|
30 | - /** |
|
31 | - * ParagonIE_Sodium_Core32_Int32 constructor. |
|
32 | - * @param array $array |
|
33 | - * @param bool $unsignedInt |
|
34 | - */ |
|
35 | - public function __construct($array = array(0, 0), $unsignedInt = false) |
|
36 | - { |
|
37 | - $this->limbs = array( |
|
38 | - (int) $array[0], |
|
39 | - (int) $array[1] |
|
40 | - ); |
|
41 | - $this->overflow = 0; |
|
42 | - $this->unsignedInt = $unsignedInt; |
|
43 | - } |
|
44 | - |
|
45 | - /** |
|
46 | - * Adds two int32 objects |
|
47 | - * |
|
48 | - * @param ParagonIE_Sodium_Core32_Int32 $addend |
|
49 | - * @return ParagonIE_Sodium_Core32_Int32 |
|
50 | - */ |
|
51 | - public function addInt32(ParagonIE_Sodium_Core32_Int32 $addend) |
|
52 | - { |
|
53 | - $i0 = $this->limbs[0]; |
|
54 | - $i1 = $this->limbs[1]; |
|
55 | - $j0 = $addend->limbs[0]; |
|
56 | - $j1 = $addend->limbs[1]; |
|
57 | - |
|
58 | - $r1 = $i1 + ($j1 & 0xffff); |
|
59 | - $carry = $r1 >> 16; |
|
60 | - |
|
61 | - $r0 = $i0 + ($j0 & 0xffff) + $carry; |
|
62 | - $carry = $r0 >> 16; |
|
63 | - |
|
64 | - $r0 &= 0xffff; |
|
65 | - $r1 &= 0xffff; |
|
66 | - |
|
67 | - $return = new ParagonIE_Sodium_Core32_Int32( |
|
68 | - array($r0, $r1) |
|
69 | - ); |
|
70 | - $return->overflow = $carry; |
|
71 | - $return->unsignedInt = $this->unsignedInt; |
|
72 | - return $return; |
|
73 | - } |
|
74 | - |
|
75 | - /** |
|
76 | - * Adds a normal integer to an int32 object |
|
77 | - * |
|
78 | - * @param int $int |
|
79 | - * @return ParagonIE_Sodium_Core32_Int32 |
|
80 | - * @throws SodiumException |
|
81 | - * @throws TypeError |
|
82 | - */ |
|
83 | - public function addInt($int) |
|
84 | - { |
|
85 | - ParagonIE_Sodium_Core32_Util::declareScalarType($int, 'int', 1); |
|
86 | - /** @var int $int */ |
|
87 | - $int = (int) $int; |
|
88 | - |
|
89 | - $int = (int) $int; |
|
90 | - |
|
91 | - $i0 = $this->limbs[0]; |
|
92 | - $i1 = $this->limbs[1]; |
|
93 | - |
|
94 | - $r1 = $i1 + ($int & 0xffff); |
|
95 | - $carry = $r1 >> 16; |
|
96 | - |
|
97 | - $r0 = $i0 + (($int >> 16) & 0xffff) + $carry; |
|
98 | - $carry = $r0 >> 16; |
|
99 | - $r0 &= 0xffff; |
|
100 | - $r1 &= 0xffff; |
|
101 | - $return = new ParagonIE_Sodium_Core32_Int32( |
|
102 | - array($r0, $r1) |
|
103 | - ); |
|
104 | - $return->overflow = $carry; |
|
105 | - $return->unsignedInt = $this->unsignedInt; |
|
106 | - return $return; |
|
107 | - } |
|
108 | - |
|
109 | - /** |
|
110 | - * @param int $b |
|
111 | - * @return int |
|
112 | - */ |
|
113 | - public function compareInt($b = 0) |
|
114 | - { |
|
115 | - $gt = 0; |
|
116 | - $eq = 1; |
|
117 | - |
|
118 | - $i = 2; |
|
119 | - $j = 0; |
|
120 | - while ($i > 0) { |
|
121 | - --$i; |
|
122 | - /** @var int $x1 */ |
|
123 | - $x1 = $this->limbs[$i]; |
|
124 | - /** @var int $x2 */ |
|
125 | - $x2 = ($b >> ($j << 4)) & 0xffff; |
|
126 | - /** @var int $gt */ |
|
127 | - $gt |= (($x2 - $x1) >> 8) & $eq; |
|
128 | - /** @var int $eq */ |
|
129 | - $eq &= (($x2 ^ $x1) - 1) >> 8; |
|
130 | - } |
|
131 | - return ($gt + $gt - $eq) + 1; |
|
132 | - } |
|
133 | - |
|
134 | - /** |
|
135 | - * @param int $m |
|
136 | - * @return ParagonIE_Sodium_Core32_Int32 |
|
137 | - */ |
|
138 | - public function mask($m = 0) |
|
139 | - { |
|
140 | - /** @var int $hi */ |
|
141 | - $hi = ($m >> 16) & 0xffff; |
|
142 | - /** @var int $lo */ |
|
143 | - $lo = ($m & 0xffff); |
|
144 | - return new ParagonIE_Sodium_Core32_Int32( |
|
145 | - array( |
|
146 | - (int) ($this->limbs[0] & $hi), |
|
147 | - (int) ($this->limbs[1] & $lo) |
|
148 | - ), |
|
149 | - $this->unsignedInt |
|
150 | - ); |
|
151 | - } |
|
152 | - |
|
153 | - /** |
|
154 | - * @param array<int, int> $a |
|
155 | - * @param array<int, int> $b |
|
156 | - * @param int $baseLog2 |
|
157 | - * @return array<int, int> |
|
158 | - */ |
|
159 | - public function multiplyLong(array $a, array $b, $baseLog2 = 16) |
|
160 | - { |
|
161 | - $a_l = count($a); |
|
162 | - $b_l = count($b); |
|
163 | - /** @var array<int, int> $r */ |
|
164 | - $r = array_fill(0, $a_l + $b_l + 1, 0); |
|
165 | - $base = 1 << $baseLog2; |
|
166 | - for ($i = 0; $i < $a_l; ++$i) { |
|
167 | - $a_i = $a[$i]; |
|
168 | - for ($j = 0; $j < $a_l; ++$j) { |
|
169 | - $b_j = $b[$j]; |
|
170 | - $product = ($a_i * $b_j) + $r[$i + $j]; |
|
171 | - $carry = ($product >> $baseLog2 & 0xffff); |
|
172 | - $r[$i + $j] = ($product - (int) ($carry * $base)) & 0xffff; |
|
173 | - $r[$i + $j + 1] += $carry; |
|
174 | - } |
|
175 | - } |
|
176 | - return array_slice($r, 0, 5); |
|
177 | - } |
|
178 | - |
|
179 | - /** |
|
180 | - * @param int $int |
|
181 | - * @return ParagonIE_Sodium_Core32_Int32 |
|
182 | - */ |
|
183 | - public function mulIntFast($int) |
|
184 | - { |
|
185 | - // Handle negative numbers |
|
186 | - $aNeg = ($this->limbs[0] >> 15) & 1; |
|
187 | - $bNeg = ($int >> 31) & 1; |
|
188 | - $a = array_reverse($this->limbs); |
|
189 | - $b = array( |
|
190 | - $int & 0xffff, |
|
191 | - ($int >> 16) & 0xffff |
|
192 | - ); |
|
193 | - if ($aNeg) { |
|
194 | - for ($i = 0; $i < 2; ++$i) { |
|
195 | - $a[$i] = ($a[$i] ^ 0xffff) & 0xffff; |
|
196 | - } |
|
197 | - ++$a[0]; |
|
198 | - } |
|
199 | - if ($bNeg) { |
|
200 | - for ($i = 0; $i < 2; ++$i) { |
|
201 | - $b[$i] = ($b[$i] ^ 0xffff) & 0xffff; |
|
202 | - } |
|
203 | - ++$b[0]; |
|
204 | - } |
|
205 | - // Multiply |
|
206 | - $res = $this->multiplyLong($a, $b); |
|
207 | - |
|
208 | - // Re-apply negation to results |
|
209 | - if ($aNeg !== $bNeg) { |
|
210 | - for ($i = 0; $i < 2; ++$i) { |
|
211 | - $res[$i] = (0xffff ^ $res[$i]) & 0xffff; |
|
212 | - } |
|
213 | - // Handle integer overflow |
|
214 | - $c = 1; |
|
215 | - for ($i = 0; $i < 2; ++$i) { |
|
216 | - $res[$i] += $c; |
|
217 | - $c = $res[$i] >> 16; |
|
218 | - $res[$i] &= 0xffff; |
|
219 | - } |
|
220 | - } |
|
221 | - |
|
222 | - // Return our values |
|
223 | - $return = new ParagonIE_Sodium_Core32_Int32(); |
|
224 | - $return->limbs = array( |
|
225 | - $res[1] & 0xffff, |
|
226 | - $res[0] & 0xffff |
|
227 | - ); |
|
228 | - if (count($res) > 2) { |
|
229 | - $return->overflow = $res[2] & 0xffff; |
|
230 | - } |
|
231 | - $return->unsignedInt = $this->unsignedInt; |
|
232 | - return $return; |
|
233 | - } |
|
234 | - |
|
235 | - /** |
|
236 | - * @param ParagonIE_Sodium_Core32_Int32 $right |
|
237 | - * @return ParagonIE_Sodium_Core32_Int32 |
|
238 | - */ |
|
239 | - public function mulInt32Fast(ParagonIE_Sodium_Core32_Int32 $right) |
|
240 | - { |
|
241 | - $aNeg = ($this->limbs[0] >> 15) & 1; |
|
242 | - $bNeg = ($right->limbs[0] >> 15) & 1; |
|
243 | - |
|
244 | - $a = array_reverse($this->limbs); |
|
245 | - $b = array_reverse($right->limbs); |
|
246 | - if ($aNeg) { |
|
247 | - for ($i = 0; $i < 2; ++$i) { |
|
248 | - $a[$i] = ($a[$i] ^ 0xffff) & 0xffff; |
|
249 | - } |
|
250 | - ++$a[0]; |
|
251 | - } |
|
252 | - if ($bNeg) { |
|
253 | - for ($i = 0; $i < 2; ++$i) { |
|
254 | - $b[$i] = ($b[$i] ^ 0xffff) & 0xffff; |
|
255 | - } |
|
256 | - ++$b[0]; |
|
257 | - } |
|
258 | - $res = $this->multiplyLong($a, $b); |
|
259 | - if ($aNeg !== $bNeg) { |
|
260 | - if ($aNeg !== $bNeg) { |
|
261 | - for ($i = 0; $i < 2; ++$i) { |
|
262 | - $res[$i] = ($res[$i] ^ 0xffff) & 0xffff; |
|
263 | - } |
|
264 | - $c = 1; |
|
265 | - for ($i = 0; $i < 2; ++$i) { |
|
266 | - $res[$i] += $c; |
|
267 | - $c = $res[$i] >> 16; |
|
268 | - $res[$i] &= 0xffff; |
|
269 | - } |
|
270 | - } |
|
271 | - } |
|
272 | - $return = new ParagonIE_Sodium_Core32_Int32(); |
|
273 | - $return->limbs = array( |
|
274 | - $res[1] & 0xffff, |
|
275 | - $res[0] & 0xffff |
|
276 | - ); |
|
277 | - if (count($res) > 2) { |
|
278 | - $return->overflow = $res[2]; |
|
279 | - } |
|
280 | - return $return; |
|
281 | - } |
|
282 | - |
|
283 | - /** |
|
284 | - * @param int $int |
|
285 | - * @param int $size |
|
286 | - * @return ParagonIE_Sodium_Core32_Int32 |
|
287 | - * @throws SodiumException |
|
288 | - * @throws TypeError |
|
289 | - */ |
|
290 | - public function mulInt($int = 0, $size = 0) |
|
291 | - { |
|
292 | - ParagonIE_Sodium_Core32_Util::declareScalarType($int, 'int', 1); |
|
293 | - ParagonIE_Sodium_Core32_Util::declareScalarType($size, 'int', 2); |
|
294 | - if (ParagonIE_Sodium_Compat::$fastMult) { |
|
295 | - return $this->mulIntFast((int) $int); |
|
296 | - } |
|
297 | - /** @var int $int */ |
|
298 | - $int = (int) $int; |
|
299 | - /** @var int $size */ |
|
300 | - $size = (int) $size; |
|
301 | - |
|
302 | - if (!$size) { |
|
303 | - $size = 31; |
|
304 | - } |
|
305 | - /** @var int $size */ |
|
306 | - |
|
307 | - $a = clone $this; |
|
308 | - $return = new ParagonIE_Sodium_Core32_Int32(); |
|
309 | - $return->unsignedInt = $this->unsignedInt; |
|
310 | - |
|
311 | - // Initialize: |
|
312 | - $ret0 = 0; |
|
313 | - $ret1 = 0; |
|
314 | - $a0 = $a->limbs[0]; |
|
315 | - $a1 = $a->limbs[1]; |
|
316 | - |
|
317 | - /** @var int $size */ |
|
318 | - /** @var int $i */ |
|
319 | - for ($i = $size; $i >= 0; --$i) { |
|
320 | - $m = (int) (-($int & 1)); |
|
321 | - $x0 = $a0 & $m; |
|
322 | - $x1 = $a1 & $m; |
|
323 | - |
|
324 | - $ret1 += $x1; |
|
325 | - $c = $ret1 >> 16; |
|
326 | - |
|
327 | - $ret0 += $x0 + $c; |
|
328 | - |
|
329 | - $ret0 &= 0xffff; |
|
330 | - $ret1 &= 0xffff; |
|
331 | - |
|
332 | - $a1 = ($a1 << 1); |
|
333 | - $x1 = $a1 >> 16; |
|
334 | - $a0 = ($a0 << 1) | $x1; |
|
335 | - $a0 &= 0xffff; |
|
336 | - $a1 &= 0xffff; |
|
337 | - $int >>= 1; |
|
338 | - } |
|
339 | - $return->limbs[0] = $ret0; |
|
340 | - $return->limbs[1] = $ret1; |
|
341 | - return $return; |
|
342 | - } |
|
343 | - |
|
344 | - /** |
|
345 | - * @param ParagonIE_Sodium_Core32_Int32 $int |
|
346 | - * @param int $size |
|
347 | - * @return ParagonIE_Sodium_Core32_Int32 |
|
348 | - * @throws SodiumException |
|
349 | - * @throws TypeError |
|
350 | - */ |
|
351 | - public function mulInt32(ParagonIE_Sodium_Core32_Int32 $int, $size = 0) |
|
352 | - { |
|
353 | - ParagonIE_Sodium_Core32_Util::declareScalarType($size, 'int', 2); |
|
354 | - if (ParagonIE_Sodium_Compat::$fastMult) { |
|
355 | - return $this->mulInt32Fast($int); |
|
356 | - } |
|
357 | - if (!$size) { |
|
358 | - $size = 31; |
|
359 | - } |
|
360 | - /** @var int $size */ |
|
361 | - |
|
362 | - $a = clone $this; |
|
363 | - $b = clone $int; |
|
364 | - $return = new ParagonIE_Sodium_Core32_Int32(); |
|
365 | - $return->unsignedInt = $this->unsignedInt; |
|
366 | - |
|
367 | - // Initialize: |
|
368 | - $ret0 = 0; |
|
369 | - $ret1 = 0; |
|
370 | - $a0 = $a->limbs[0]; |
|
371 | - $a1 = $a->limbs[1]; |
|
372 | - $b0 = $b->limbs[0]; |
|
373 | - $b1 = $b->limbs[1]; |
|
374 | - |
|
375 | - /** @var int $size */ |
|
376 | - /** @var int $i */ |
|
377 | - for ($i = $size; $i >= 0; --$i) { |
|
378 | - $m = (int) (-($b1 & 1)); |
|
379 | - $x0 = $a0 & $m; |
|
380 | - $x1 = $a1 & $m; |
|
381 | - |
|
382 | - $ret1 += $x1; |
|
383 | - $c = $ret1 >> 16; |
|
384 | - |
|
385 | - $ret0 += $x0 + $c; |
|
386 | - |
|
387 | - $ret0 &= 0xffff; |
|
388 | - $ret1 &= 0xffff; |
|
389 | - |
|
390 | - $a1 = ($a1 << 1); |
|
391 | - $x1 = $a1 >> 16; |
|
392 | - $a0 = ($a0 << 1) | $x1; |
|
393 | - $a0 &= 0xffff; |
|
394 | - $a1 &= 0xffff; |
|
395 | - |
|
396 | - $x0 = ($b0 & 1) << 16; |
|
397 | - $b0 = ($b0 >> 1); |
|
398 | - $b1 = (($b1 | $x0) >> 1); |
|
399 | - |
|
400 | - $b0 &= 0xffff; |
|
401 | - $b1 &= 0xffff; |
|
402 | - |
|
403 | - } |
|
404 | - $return->limbs[0] = $ret0; |
|
405 | - $return->limbs[1] = $ret1; |
|
406 | - |
|
407 | - return $return; |
|
408 | - } |
|
409 | - |
|
410 | - /** |
|
411 | - * OR this 32-bit integer with another. |
|
412 | - * |
|
413 | - * @param ParagonIE_Sodium_Core32_Int32 $b |
|
414 | - * @return ParagonIE_Sodium_Core32_Int32 |
|
415 | - */ |
|
416 | - public function orInt32(ParagonIE_Sodium_Core32_Int32 $b) |
|
417 | - { |
|
418 | - $return = new ParagonIE_Sodium_Core32_Int32(); |
|
419 | - $return->unsignedInt = $this->unsignedInt; |
|
420 | - $return->limbs = array( |
|
421 | - (int) ($this->limbs[0] | $b->limbs[0]), |
|
422 | - (int) ($this->limbs[1] | $b->limbs[1]) |
|
423 | - ); |
|
424 | - /** @var int overflow */ |
|
425 | - $return->overflow = $this->overflow | $b->overflow; |
|
426 | - return $return; |
|
427 | - } |
|
428 | - |
|
429 | - /** |
|
430 | - * @param int $b |
|
431 | - * @return bool |
|
432 | - */ |
|
433 | - public function isGreaterThan($b = 0) |
|
434 | - { |
|
435 | - return $this->compareInt($b) > 0; |
|
436 | - } |
|
437 | - |
|
438 | - /** |
|
439 | - * @param int $b |
|
440 | - * @return bool |
|
441 | - */ |
|
442 | - public function isLessThanInt($b = 0) |
|
443 | - { |
|
444 | - return $this->compareInt($b) < 0; |
|
445 | - } |
|
446 | - |
|
447 | - /** |
|
448 | - * @param int $c |
|
449 | - * @return ParagonIE_Sodium_Core32_Int32 |
|
450 | - * @throws SodiumException |
|
451 | - * @throws TypeError |
|
452 | - * @psalm-suppress MixedArrayAccess |
|
453 | - */ |
|
454 | - public function rotateLeft($c = 0) |
|
455 | - { |
|
456 | - ParagonIE_Sodium_Core32_Util::declareScalarType($c, 'int', 1); |
|
457 | - /** @var int $c */ |
|
458 | - $c = (int) $c; |
|
459 | - |
|
460 | - $return = new ParagonIE_Sodium_Core32_Int32(); |
|
461 | - $return->unsignedInt = $this->unsignedInt; |
|
462 | - $c &= 31; |
|
463 | - if ($c === 0) { |
|
464 | - // NOP, but we want a copy. |
|
465 | - $return->limbs = $this->limbs; |
|
466 | - } else { |
|
467 | - /** @var int $c */ |
|
468 | - |
|
469 | - /** @var int $idx_shift */ |
|
470 | - $idx_shift = ($c >> 4) & 1; |
|
471 | - |
|
472 | - /** @var int $sub_shift */ |
|
473 | - $sub_shift = $c & 15; |
|
474 | - |
|
475 | - /** @var array<int, int> $limbs */ |
|
476 | - $limbs =& $return->limbs; |
|
477 | - |
|
478 | - /** @var array<int, int> $myLimbs */ |
|
479 | - $myLimbs =& $this->limbs; |
|
480 | - |
|
481 | - for ($i = 1; $i >= 0; --$i) { |
|
482 | - /** @var int $j */ |
|
483 | - $j = ($i + $idx_shift) & 1; |
|
484 | - /** @var int $k */ |
|
485 | - $k = ($i + $idx_shift + 1) & 1; |
|
486 | - $limbs[$i] = (int) ( |
|
487 | - ( |
|
488 | - ((int) ($myLimbs[$j]) << $sub_shift) |
|
489 | - | |
|
490 | - ((int) ($myLimbs[$k]) >> (16 - $sub_shift)) |
|
491 | - ) & 0xffff |
|
492 | - ); |
|
493 | - } |
|
494 | - } |
|
495 | - return $return; |
|
496 | - } |
|
497 | - |
|
498 | - /** |
|
499 | - * Rotate to the right |
|
500 | - * |
|
501 | - * @param int $c |
|
502 | - * @return ParagonIE_Sodium_Core32_Int32 |
|
503 | - * @throws SodiumException |
|
504 | - * @throws TypeError |
|
505 | - * @psalm-suppress MixedArrayAccess |
|
506 | - */ |
|
507 | - public function rotateRight($c = 0) |
|
508 | - { |
|
509 | - ParagonIE_Sodium_Core32_Util::declareScalarType($c, 'int', 1); |
|
510 | - /** @var int $c */ |
|
511 | - $c = (int) $c; |
|
512 | - |
|
513 | - $return = new ParagonIE_Sodium_Core32_Int32(); |
|
514 | - $return->unsignedInt = $this->unsignedInt; |
|
515 | - $c &= 31; |
|
516 | - /** @var int $c */ |
|
517 | - if ($c === 0) { |
|
518 | - // NOP, but we want a copy. |
|
519 | - $return->limbs = $this->limbs; |
|
520 | - } else { |
|
521 | - /** @var int $c */ |
|
522 | - |
|
523 | - /** @var int $idx_shift */ |
|
524 | - $idx_shift = ($c >> 4) & 1; |
|
525 | - |
|
526 | - /** @var int $sub_shift */ |
|
527 | - $sub_shift = $c & 15; |
|
528 | - |
|
529 | - /** @var array<int, int> $limbs */ |
|
530 | - $limbs =& $return->limbs; |
|
531 | - |
|
532 | - /** @var array<int, int> $myLimbs */ |
|
533 | - $myLimbs =& $this->limbs; |
|
534 | - |
|
535 | - for ($i = 1; $i >= 0; --$i) { |
|
536 | - /** @var int $j */ |
|
537 | - $j = ($i - $idx_shift) & 1; |
|
538 | - /** @var int $k */ |
|
539 | - $k = ($i - $idx_shift - 1) & 1; |
|
540 | - $limbs[$i] = (int) ( |
|
541 | - ( |
|
542 | - ((int) ($myLimbs[$j]) >> (int) ($sub_shift)) |
|
543 | - | |
|
544 | - ((int) ($myLimbs[$k]) << (16 - (int) ($sub_shift))) |
|
545 | - ) & 0xffff |
|
546 | - ); |
|
547 | - } |
|
548 | - } |
|
549 | - return $return; |
|
550 | - } |
|
551 | - |
|
552 | - /** |
|
553 | - * @param bool $bool |
|
554 | - * @return self |
|
555 | - */ |
|
556 | - public function setUnsignedInt($bool = false) |
|
557 | - { |
|
558 | - $this->unsignedInt = !empty($bool); |
|
559 | - return $this; |
|
560 | - } |
|
561 | - |
|
562 | - /** |
|
563 | - * @param int $c |
|
564 | - * @return ParagonIE_Sodium_Core32_Int32 |
|
565 | - * @throws SodiumException |
|
566 | - * @throws TypeError |
|
567 | - */ |
|
568 | - public function shiftLeft($c = 0) |
|
569 | - { |
|
570 | - ParagonIE_Sodium_Core32_Util::declareScalarType($c, 'int', 1); |
|
571 | - /** @var int $c */ |
|
572 | - $c = (int) $c; |
|
573 | - |
|
574 | - $return = new ParagonIE_Sodium_Core32_Int32(); |
|
575 | - $return->unsignedInt = $this->unsignedInt; |
|
576 | - $c &= 63; |
|
577 | - /** @var int $c */ |
|
578 | - if ($c === 0) { |
|
579 | - $return->limbs = $this->limbs; |
|
580 | - } elseif ($c < 0) { |
|
581 | - /** @var int $c */ |
|
582 | - return $this->shiftRight(-$c); |
|
583 | - } else { |
|
584 | - /** @var int $c */ |
|
585 | - /** @var int $tmp */ |
|
586 | - $tmp = $this->limbs[1] << $c; |
|
587 | - $return->limbs[1] = (int)($tmp & 0xffff); |
|
588 | - /** @var int $carry */ |
|
589 | - $carry = $tmp >> 16; |
|
590 | - |
|
591 | - /** @var int $tmp */ |
|
592 | - $tmp = ($this->limbs[0] << $c) | ($carry & 0xffff); |
|
593 | - $return->limbs[0] = (int) ($tmp & 0xffff); |
|
594 | - } |
|
595 | - return $return; |
|
596 | - } |
|
597 | - |
|
598 | - /** |
|
599 | - * @param int $c |
|
600 | - * @return ParagonIE_Sodium_Core32_Int32 |
|
601 | - * @throws SodiumException |
|
602 | - * @throws TypeError |
|
603 | - * @psalm-suppress MixedAssignment |
|
604 | - * @psalm-suppress MixedOperand |
|
605 | - */ |
|
606 | - public function shiftRight($c = 0) |
|
607 | - { |
|
608 | - ParagonIE_Sodium_Core32_Util::declareScalarType($c, 'int', 1); |
|
609 | - /** @var int $c */ |
|
610 | - $c = (int) $c; |
|
611 | - |
|
612 | - $return = new ParagonIE_Sodium_Core32_Int32(); |
|
613 | - $return->unsignedInt = $this->unsignedInt; |
|
614 | - $c &= 63; |
|
615 | - /** @var int $c */ |
|
616 | - if ($c >= 16) { |
|
617 | - $return->limbs = array( |
|
618 | - (int) ($this->overflow & 0xffff), |
|
619 | - (int) ($this->limbs[0]) |
|
620 | - ); |
|
621 | - $return->overflow = $this->overflow >> 16; |
|
622 | - return $return->shiftRight($c & 15); |
|
623 | - } |
|
624 | - if ($c === 0) { |
|
625 | - $return->limbs = $this->limbs; |
|
626 | - } elseif ($c < 0) { |
|
627 | - /** @var int $c */ |
|
628 | - return $this->shiftLeft(-$c); |
|
629 | - } else { |
|
630 | - if (!is_int($c)) { |
|
631 | - throw new TypeError(); |
|
632 | - } |
|
633 | - /** @var int $c */ |
|
634 | - // $return->limbs[0] = (int) (($this->limbs[0] >> $c) & 0xffff); |
|
635 | - $carryLeft = (int) ($this->overflow & ((1 << ($c + 1)) - 1)); |
|
636 | - $return->limbs[0] = (int) ((($this->limbs[0] >> $c) | ($carryLeft << (16 - $c))) & 0xffff); |
|
637 | - $carryRight = (int) ($this->limbs[0] & ((1 << ($c + 1)) - 1)); |
|
638 | - $return->limbs[1] = (int) ((($this->limbs[1] >> $c) | ($carryRight << (16 - $c))) & 0xffff); |
|
639 | - $return->overflow >>= $c; |
|
640 | - } |
|
641 | - return $return; |
|
642 | - } |
|
643 | - |
|
644 | - /** |
|
645 | - * Subtract a normal integer from an int32 object. |
|
646 | - * |
|
647 | - * @param int $int |
|
648 | - * @return ParagonIE_Sodium_Core32_Int32 |
|
649 | - * @throws SodiumException |
|
650 | - * @throws TypeError |
|
651 | - */ |
|
652 | - public function subInt($int) |
|
653 | - { |
|
654 | - ParagonIE_Sodium_Core32_Util::declareScalarType($int, 'int', 1); |
|
655 | - /** @var int $int */ |
|
656 | - $int = (int) $int; |
|
657 | - |
|
658 | - $return = new ParagonIE_Sodium_Core32_Int32(); |
|
659 | - $return->unsignedInt = $this->unsignedInt; |
|
660 | - |
|
661 | - /** @var int $tmp */ |
|
662 | - $tmp = $this->limbs[1] - ($int & 0xffff); |
|
663 | - /** @var int $carry */ |
|
664 | - $carry = $tmp >> 16; |
|
665 | - $return->limbs[1] = (int) ($tmp & 0xffff); |
|
666 | - |
|
667 | - /** @var int $tmp */ |
|
668 | - $tmp = $this->limbs[0] - (($int >> 16) & 0xffff) + $carry; |
|
669 | - $return->limbs[0] = (int) ($tmp & 0xffff); |
|
670 | - return $return; |
|
671 | - } |
|
672 | - |
|
673 | - /** |
|
674 | - * Subtract two int32 objects from each other |
|
675 | - * |
|
676 | - * @param ParagonIE_Sodium_Core32_Int32 $b |
|
677 | - * @return ParagonIE_Sodium_Core32_Int32 |
|
678 | - */ |
|
679 | - public function subInt32(ParagonIE_Sodium_Core32_Int32 $b) |
|
680 | - { |
|
681 | - $return = new ParagonIE_Sodium_Core32_Int32(); |
|
682 | - $return->unsignedInt = $this->unsignedInt; |
|
683 | - |
|
684 | - /** @var int $tmp */ |
|
685 | - $tmp = $this->limbs[1] - ($b->limbs[1] & 0xffff); |
|
686 | - /** @var int $carry */ |
|
687 | - $carry = $tmp >> 16; |
|
688 | - $return->limbs[1] = (int) ($tmp & 0xffff); |
|
689 | - |
|
690 | - /** @var int $tmp */ |
|
691 | - $tmp = $this->limbs[0] - ($b->limbs[0] & 0xffff) + $carry; |
|
692 | - $return->limbs[0] = (int) ($tmp & 0xffff); |
|
693 | - return $return; |
|
694 | - } |
|
695 | - |
|
696 | - /** |
|
697 | - * XOR this 32-bit integer with another. |
|
698 | - * |
|
699 | - * @param ParagonIE_Sodium_Core32_Int32 $b |
|
700 | - * @return ParagonIE_Sodium_Core32_Int32 |
|
701 | - */ |
|
702 | - public function xorInt32(ParagonIE_Sodium_Core32_Int32 $b) |
|
703 | - { |
|
704 | - $return = new ParagonIE_Sodium_Core32_Int32(); |
|
705 | - $return->unsignedInt = $this->unsignedInt; |
|
706 | - $return->limbs = array( |
|
707 | - (int) ($this->limbs[0] ^ $b->limbs[0]), |
|
708 | - (int) ($this->limbs[1] ^ $b->limbs[1]) |
|
709 | - ); |
|
710 | - return $return; |
|
711 | - } |
|
712 | - |
|
713 | - /** |
|
714 | - * @param int $signed |
|
715 | - * @return self |
|
716 | - * @throws SodiumException |
|
717 | - * @throws TypeError |
|
718 | - */ |
|
719 | - public static function fromInt($signed) |
|
720 | - { |
|
721 | - ParagonIE_Sodium_Core32_Util::declareScalarType($signed, 'int', 1);; |
|
722 | - /** @var int $signed */ |
|
723 | - $signed = (int) $signed; |
|
724 | - |
|
725 | - return new ParagonIE_Sodium_Core32_Int32( |
|
726 | - array( |
|
727 | - (int) (($signed >> 16) & 0xffff), |
|
728 | - (int) ($signed & 0xffff) |
|
729 | - ) |
|
730 | - ); |
|
731 | - } |
|
732 | - |
|
733 | - /** |
|
734 | - * @param string $string |
|
735 | - * @return self |
|
736 | - * @throws SodiumException |
|
737 | - * @throws TypeError |
|
738 | - */ |
|
739 | - public static function fromString($string) |
|
740 | - { |
|
741 | - ParagonIE_Sodium_Core32_Util::declareScalarType($string, 'string', 1); |
|
742 | - $string = (string) $string; |
|
743 | - if (ParagonIE_Sodium_Core32_Util::strlen($string) !== 4) { |
|
744 | - throw new RangeException( |
|
745 | - 'String must be 4 bytes; ' . ParagonIE_Sodium_Core32_Util::strlen($string) . ' given.' |
|
746 | - ); |
|
747 | - } |
|
748 | - $return = new ParagonIE_Sodium_Core32_Int32(); |
|
749 | - |
|
750 | - $return->limbs[0] = (int) ((ParagonIE_Sodium_Core32_Util::chrToInt($string[0]) & 0xff) << 8); |
|
751 | - $return->limbs[0] |= (ParagonIE_Sodium_Core32_Util::chrToInt($string[1]) & 0xff); |
|
752 | - $return->limbs[1] = (int) ((ParagonIE_Sodium_Core32_Util::chrToInt($string[2]) & 0xff) << 8); |
|
753 | - $return->limbs[1] |= (ParagonIE_Sodium_Core32_Util::chrToInt($string[3]) & 0xff); |
|
754 | - return $return; |
|
755 | - } |
|
756 | - |
|
757 | - /** |
|
758 | - * @param string $string |
|
759 | - * @return self |
|
760 | - * @throws SodiumException |
|
761 | - * @throws TypeError |
|
762 | - */ |
|
763 | - public static function fromReverseString($string) |
|
764 | - { |
|
765 | - ParagonIE_Sodium_Core32_Util::declareScalarType($string, 'string', 1); |
|
766 | - $string = (string) $string; |
|
767 | - if (ParagonIE_Sodium_Core32_Util::strlen($string) !== 4) { |
|
768 | - throw new RangeException( |
|
769 | - 'String must be 4 bytes; ' . ParagonIE_Sodium_Core32_Util::strlen($string) . ' given.' |
|
770 | - ); |
|
771 | - } |
|
772 | - $return = new ParagonIE_Sodium_Core32_Int32(); |
|
773 | - |
|
774 | - $return->limbs[0] = (int) ((ParagonIE_Sodium_Core32_Util::chrToInt($string[3]) & 0xff) << 8); |
|
775 | - $return->limbs[0] |= (ParagonIE_Sodium_Core32_Util::chrToInt($string[2]) & 0xff); |
|
776 | - $return->limbs[1] = (int) ((ParagonIE_Sodium_Core32_Util::chrToInt($string[1]) & 0xff) << 8); |
|
777 | - $return->limbs[1] |= (ParagonIE_Sodium_Core32_Util::chrToInt($string[0]) & 0xff); |
|
778 | - return $return; |
|
779 | - } |
|
780 | - |
|
781 | - /** |
|
782 | - * @return array<int, int> |
|
783 | - */ |
|
784 | - public function toArray() |
|
785 | - { |
|
786 | - return array((int) ($this->limbs[0] << 16 | $this->limbs[1])); |
|
787 | - } |
|
788 | - |
|
789 | - /** |
|
790 | - * @return string |
|
791 | - * @throws TypeError |
|
792 | - */ |
|
793 | - public function toString() |
|
794 | - { |
|
795 | - return |
|
796 | - ParagonIE_Sodium_Core32_Util::intToChr(($this->limbs[0] >> 8) & 0xff) . |
|
797 | - ParagonIE_Sodium_Core32_Util::intToChr($this->limbs[0] & 0xff) . |
|
798 | - ParagonIE_Sodium_Core32_Util::intToChr(($this->limbs[1] >> 8) & 0xff) . |
|
799 | - ParagonIE_Sodium_Core32_Util::intToChr($this->limbs[1] & 0xff); |
|
800 | - } |
|
801 | - |
|
802 | - /** |
|
803 | - * @return int |
|
804 | - */ |
|
805 | - public function toInt() |
|
806 | - { |
|
807 | - return (int) ( |
|
808 | - (($this->limbs[0] & 0xffff) << 16) |
|
809 | - | |
|
810 | - ($this->limbs[1] & 0xffff) |
|
811 | - ); |
|
812 | - } |
|
813 | - |
|
814 | - /** |
|
815 | - * @return ParagonIE_Sodium_Core32_Int32 |
|
816 | - */ |
|
817 | - public function toInt32() |
|
818 | - { |
|
819 | - $return = new ParagonIE_Sodium_Core32_Int32(); |
|
820 | - $return->limbs[0] = (int) ($this->limbs[0] & 0xffff); |
|
821 | - $return->limbs[1] = (int) ($this->limbs[1] & 0xffff); |
|
822 | - $return->unsignedInt = $this->unsignedInt; |
|
823 | - $return->overflow = (int) ($this->overflow & 0x7fffffff); |
|
824 | - return $return; |
|
825 | - } |
|
826 | - |
|
827 | - /** |
|
828 | - * @return ParagonIE_Sodium_Core32_Int64 |
|
829 | - */ |
|
830 | - public function toInt64() |
|
831 | - { |
|
832 | - $return = new ParagonIE_Sodium_Core32_Int64(); |
|
833 | - $return->unsignedInt = $this->unsignedInt; |
|
834 | - if ($this->unsignedInt) { |
|
835 | - $return->limbs[0] += (($this->overflow >> 16) & 0xffff); |
|
836 | - $return->limbs[1] += (($this->overflow) & 0xffff); |
|
837 | - } else { |
|
838 | - $neg = -(($this->limbs[0] >> 15) & 1); |
|
839 | - $return->limbs[0] = (int)($neg & 0xffff); |
|
840 | - $return->limbs[1] = (int)($neg & 0xffff); |
|
841 | - } |
|
842 | - $return->limbs[2] = (int) ($this->limbs[0] & 0xffff); |
|
843 | - $return->limbs[3] = (int) ($this->limbs[1] & 0xffff); |
|
844 | - return $return; |
|
845 | - } |
|
846 | - |
|
847 | - /** |
|
848 | - * @return string |
|
849 | - * @throws TypeError |
|
850 | - */ |
|
851 | - public function toReverseString() |
|
852 | - { |
|
853 | - return ParagonIE_Sodium_Core32_Util::intToChr($this->limbs[1] & 0xff) . |
|
854 | - ParagonIE_Sodium_Core32_Util::intToChr(($this->limbs[1] >> 8) & 0xff) . |
|
855 | - ParagonIE_Sodium_Core32_Util::intToChr($this->limbs[0] & 0xff) . |
|
856 | - ParagonIE_Sodium_Core32_Util::intToChr(($this->limbs[0] >> 8) & 0xff); |
|
857 | - } |
|
858 | - |
|
859 | - /** |
|
860 | - * @return string |
|
861 | - */ |
|
862 | - public function __toString() |
|
863 | - { |
|
864 | - try { |
|
865 | - return $this->toString(); |
|
866 | - } catch (TypeError $ex) { |
|
867 | - // PHP engine can't handle exceptions from __toString() |
|
868 | - return ''; |
|
869 | - } |
|
870 | - } |
|
12 | + /** |
|
13 | + * @var array<int, int> - two 16-bit integers |
|
14 | + * |
|
15 | + * 0 is the higher 16 bits |
|
16 | + * 1 is the lower 16 bits |
|
17 | + */ |
|
18 | + public $limbs = array(0, 0); |
|
19 | + |
|
20 | + /** |
|
21 | + * @var int |
|
22 | + */ |
|
23 | + public $overflow = 0; |
|
24 | + |
|
25 | + /** |
|
26 | + * @var bool |
|
27 | + */ |
|
28 | + public $unsignedInt = false; |
|
29 | + |
|
30 | + /** |
|
31 | + * ParagonIE_Sodium_Core32_Int32 constructor. |
|
32 | + * @param array $array |
|
33 | + * @param bool $unsignedInt |
|
34 | + */ |
|
35 | + public function __construct($array = array(0, 0), $unsignedInt = false) |
|
36 | + { |
|
37 | + $this->limbs = array( |
|
38 | + (int) $array[0], |
|
39 | + (int) $array[1] |
|
40 | + ); |
|
41 | + $this->overflow = 0; |
|
42 | + $this->unsignedInt = $unsignedInt; |
|
43 | + } |
|
44 | + |
|
45 | + /** |
|
46 | + * Adds two int32 objects |
|
47 | + * |
|
48 | + * @param ParagonIE_Sodium_Core32_Int32 $addend |
|
49 | + * @return ParagonIE_Sodium_Core32_Int32 |
|
50 | + */ |
|
51 | + public function addInt32(ParagonIE_Sodium_Core32_Int32 $addend) |
|
52 | + { |
|
53 | + $i0 = $this->limbs[0]; |
|
54 | + $i1 = $this->limbs[1]; |
|
55 | + $j0 = $addend->limbs[0]; |
|
56 | + $j1 = $addend->limbs[1]; |
|
57 | + |
|
58 | + $r1 = $i1 + ($j1 & 0xffff); |
|
59 | + $carry = $r1 >> 16; |
|
60 | + |
|
61 | + $r0 = $i0 + ($j0 & 0xffff) + $carry; |
|
62 | + $carry = $r0 >> 16; |
|
63 | + |
|
64 | + $r0 &= 0xffff; |
|
65 | + $r1 &= 0xffff; |
|
66 | + |
|
67 | + $return = new ParagonIE_Sodium_Core32_Int32( |
|
68 | + array($r0, $r1) |
|
69 | + ); |
|
70 | + $return->overflow = $carry; |
|
71 | + $return->unsignedInt = $this->unsignedInt; |
|
72 | + return $return; |
|
73 | + } |
|
74 | + |
|
75 | + /** |
|
76 | + * Adds a normal integer to an int32 object |
|
77 | + * |
|
78 | + * @param int $int |
|
79 | + * @return ParagonIE_Sodium_Core32_Int32 |
|
80 | + * @throws SodiumException |
|
81 | + * @throws TypeError |
|
82 | + */ |
|
83 | + public function addInt($int) |
|
84 | + { |
|
85 | + ParagonIE_Sodium_Core32_Util::declareScalarType($int, 'int', 1); |
|
86 | + /** @var int $int */ |
|
87 | + $int = (int) $int; |
|
88 | + |
|
89 | + $int = (int) $int; |
|
90 | + |
|
91 | + $i0 = $this->limbs[0]; |
|
92 | + $i1 = $this->limbs[1]; |
|
93 | + |
|
94 | + $r1 = $i1 + ($int & 0xffff); |
|
95 | + $carry = $r1 >> 16; |
|
96 | + |
|
97 | + $r0 = $i0 + (($int >> 16) & 0xffff) + $carry; |
|
98 | + $carry = $r0 >> 16; |
|
99 | + $r0 &= 0xffff; |
|
100 | + $r1 &= 0xffff; |
|
101 | + $return = new ParagonIE_Sodium_Core32_Int32( |
|
102 | + array($r0, $r1) |
|
103 | + ); |
|
104 | + $return->overflow = $carry; |
|
105 | + $return->unsignedInt = $this->unsignedInt; |
|
106 | + return $return; |
|
107 | + } |
|
108 | + |
|
109 | + /** |
|
110 | + * @param int $b |
|
111 | + * @return int |
|
112 | + */ |
|
113 | + public function compareInt($b = 0) |
|
114 | + { |
|
115 | + $gt = 0; |
|
116 | + $eq = 1; |
|
117 | + |
|
118 | + $i = 2; |
|
119 | + $j = 0; |
|
120 | + while ($i > 0) { |
|
121 | + --$i; |
|
122 | + /** @var int $x1 */ |
|
123 | + $x1 = $this->limbs[$i]; |
|
124 | + /** @var int $x2 */ |
|
125 | + $x2 = ($b >> ($j << 4)) & 0xffff; |
|
126 | + /** @var int $gt */ |
|
127 | + $gt |= (($x2 - $x1) >> 8) & $eq; |
|
128 | + /** @var int $eq */ |
|
129 | + $eq &= (($x2 ^ $x1) - 1) >> 8; |
|
130 | + } |
|
131 | + return ($gt + $gt - $eq) + 1; |
|
132 | + } |
|
133 | + |
|
134 | + /** |
|
135 | + * @param int $m |
|
136 | + * @return ParagonIE_Sodium_Core32_Int32 |
|
137 | + */ |
|
138 | + public function mask($m = 0) |
|
139 | + { |
|
140 | + /** @var int $hi */ |
|
141 | + $hi = ($m >> 16) & 0xffff; |
|
142 | + /** @var int $lo */ |
|
143 | + $lo = ($m & 0xffff); |
|
144 | + return new ParagonIE_Sodium_Core32_Int32( |
|
145 | + array( |
|
146 | + (int) ($this->limbs[0] & $hi), |
|
147 | + (int) ($this->limbs[1] & $lo) |
|
148 | + ), |
|
149 | + $this->unsignedInt |
|
150 | + ); |
|
151 | + } |
|
152 | + |
|
153 | + /** |
|
154 | + * @param array<int, int> $a |
|
155 | + * @param array<int, int> $b |
|
156 | + * @param int $baseLog2 |
|
157 | + * @return array<int, int> |
|
158 | + */ |
|
159 | + public function multiplyLong(array $a, array $b, $baseLog2 = 16) |
|
160 | + { |
|
161 | + $a_l = count($a); |
|
162 | + $b_l = count($b); |
|
163 | + /** @var array<int, int> $r */ |
|
164 | + $r = array_fill(0, $a_l + $b_l + 1, 0); |
|
165 | + $base = 1 << $baseLog2; |
|
166 | + for ($i = 0; $i < $a_l; ++$i) { |
|
167 | + $a_i = $a[$i]; |
|
168 | + for ($j = 0; $j < $a_l; ++$j) { |
|
169 | + $b_j = $b[$j]; |
|
170 | + $product = ($a_i * $b_j) + $r[$i + $j]; |
|
171 | + $carry = ($product >> $baseLog2 & 0xffff); |
|
172 | + $r[$i + $j] = ($product - (int) ($carry * $base)) & 0xffff; |
|
173 | + $r[$i + $j + 1] += $carry; |
|
174 | + } |
|
175 | + } |
|
176 | + return array_slice($r, 0, 5); |
|
177 | + } |
|
178 | + |
|
179 | + /** |
|
180 | + * @param int $int |
|
181 | + * @return ParagonIE_Sodium_Core32_Int32 |
|
182 | + */ |
|
183 | + public function mulIntFast($int) |
|
184 | + { |
|
185 | + // Handle negative numbers |
|
186 | + $aNeg = ($this->limbs[0] >> 15) & 1; |
|
187 | + $bNeg = ($int >> 31) & 1; |
|
188 | + $a = array_reverse($this->limbs); |
|
189 | + $b = array( |
|
190 | + $int & 0xffff, |
|
191 | + ($int >> 16) & 0xffff |
|
192 | + ); |
|
193 | + if ($aNeg) { |
|
194 | + for ($i = 0; $i < 2; ++$i) { |
|
195 | + $a[$i] = ($a[$i] ^ 0xffff) & 0xffff; |
|
196 | + } |
|
197 | + ++$a[0]; |
|
198 | + } |
|
199 | + if ($bNeg) { |
|
200 | + for ($i = 0; $i < 2; ++$i) { |
|
201 | + $b[$i] = ($b[$i] ^ 0xffff) & 0xffff; |
|
202 | + } |
|
203 | + ++$b[0]; |
|
204 | + } |
|
205 | + // Multiply |
|
206 | + $res = $this->multiplyLong($a, $b); |
|
207 | + |
|
208 | + // Re-apply negation to results |
|
209 | + if ($aNeg !== $bNeg) { |
|
210 | + for ($i = 0; $i < 2; ++$i) { |
|
211 | + $res[$i] = (0xffff ^ $res[$i]) & 0xffff; |
|
212 | + } |
|
213 | + // Handle integer overflow |
|
214 | + $c = 1; |
|
215 | + for ($i = 0; $i < 2; ++$i) { |
|
216 | + $res[$i] += $c; |
|
217 | + $c = $res[$i] >> 16; |
|
218 | + $res[$i] &= 0xffff; |
|
219 | + } |
|
220 | + } |
|
221 | + |
|
222 | + // Return our values |
|
223 | + $return = new ParagonIE_Sodium_Core32_Int32(); |
|
224 | + $return->limbs = array( |
|
225 | + $res[1] & 0xffff, |
|
226 | + $res[0] & 0xffff |
|
227 | + ); |
|
228 | + if (count($res) > 2) { |
|
229 | + $return->overflow = $res[2] & 0xffff; |
|
230 | + } |
|
231 | + $return->unsignedInt = $this->unsignedInt; |
|
232 | + return $return; |
|
233 | + } |
|
234 | + |
|
235 | + /** |
|
236 | + * @param ParagonIE_Sodium_Core32_Int32 $right |
|
237 | + * @return ParagonIE_Sodium_Core32_Int32 |
|
238 | + */ |
|
239 | + public function mulInt32Fast(ParagonIE_Sodium_Core32_Int32 $right) |
|
240 | + { |
|
241 | + $aNeg = ($this->limbs[0] >> 15) & 1; |
|
242 | + $bNeg = ($right->limbs[0] >> 15) & 1; |
|
243 | + |
|
244 | + $a = array_reverse($this->limbs); |
|
245 | + $b = array_reverse($right->limbs); |
|
246 | + if ($aNeg) { |
|
247 | + for ($i = 0; $i < 2; ++$i) { |
|
248 | + $a[$i] = ($a[$i] ^ 0xffff) & 0xffff; |
|
249 | + } |
|
250 | + ++$a[0]; |
|
251 | + } |
|
252 | + if ($bNeg) { |
|
253 | + for ($i = 0; $i < 2; ++$i) { |
|
254 | + $b[$i] = ($b[$i] ^ 0xffff) & 0xffff; |
|
255 | + } |
|
256 | + ++$b[0]; |
|
257 | + } |
|
258 | + $res = $this->multiplyLong($a, $b); |
|
259 | + if ($aNeg !== $bNeg) { |
|
260 | + if ($aNeg !== $bNeg) { |
|
261 | + for ($i = 0; $i < 2; ++$i) { |
|
262 | + $res[$i] = ($res[$i] ^ 0xffff) & 0xffff; |
|
263 | + } |
|
264 | + $c = 1; |
|
265 | + for ($i = 0; $i < 2; ++$i) { |
|
266 | + $res[$i] += $c; |
|
267 | + $c = $res[$i] >> 16; |
|
268 | + $res[$i] &= 0xffff; |
|
269 | + } |
|
270 | + } |
|
271 | + } |
|
272 | + $return = new ParagonIE_Sodium_Core32_Int32(); |
|
273 | + $return->limbs = array( |
|
274 | + $res[1] & 0xffff, |
|
275 | + $res[0] & 0xffff |
|
276 | + ); |
|
277 | + if (count($res) > 2) { |
|
278 | + $return->overflow = $res[2]; |
|
279 | + } |
|
280 | + return $return; |
|
281 | + } |
|
282 | + |
|
283 | + /** |
|
284 | + * @param int $int |
|
285 | + * @param int $size |
|
286 | + * @return ParagonIE_Sodium_Core32_Int32 |
|
287 | + * @throws SodiumException |
|
288 | + * @throws TypeError |
|
289 | + */ |
|
290 | + public function mulInt($int = 0, $size = 0) |
|
291 | + { |
|
292 | + ParagonIE_Sodium_Core32_Util::declareScalarType($int, 'int', 1); |
|
293 | + ParagonIE_Sodium_Core32_Util::declareScalarType($size, 'int', 2); |
|
294 | + if (ParagonIE_Sodium_Compat::$fastMult) { |
|
295 | + return $this->mulIntFast((int) $int); |
|
296 | + } |
|
297 | + /** @var int $int */ |
|
298 | + $int = (int) $int; |
|
299 | + /** @var int $size */ |
|
300 | + $size = (int) $size; |
|
301 | + |
|
302 | + if (!$size) { |
|
303 | + $size = 31; |
|
304 | + } |
|
305 | + /** @var int $size */ |
|
306 | + |
|
307 | + $a = clone $this; |
|
308 | + $return = new ParagonIE_Sodium_Core32_Int32(); |
|
309 | + $return->unsignedInt = $this->unsignedInt; |
|
310 | + |
|
311 | + // Initialize: |
|
312 | + $ret0 = 0; |
|
313 | + $ret1 = 0; |
|
314 | + $a0 = $a->limbs[0]; |
|
315 | + $a1 = $a->limbs[1]; |
|
316 | + |
|
317 | + /** @var int $size */ |
|
318 | + /** @var int $i */ |
|
319 | + for ($i = $size; $i >= 0; --$i) { |
|
320 | + $m = (int) (-($int & 1)); |
|
321 | + $x0 = $a0 & $m; |
|
322 | + $x1 = $a1 & $m; |
|
323 | + |
|
324 | + $ret1 += $x1; |
|
325 | + $c = $ret1 >> 16; |
|
326 | + |
|
327 | + $ret0 += $x0 + $c; |
|
328 | + |
|
329 | + $ret0 &= 0xffff; |
|
330 | + $ret1 &= 0xffff; |
|
331 | + |
|
332 | + $a1 = ($a1 << 1); |
|
333 | + $x1 = $a1 >> 16; |
|
334 | + $a0 = ($a0 << 1) | $x1; |
|
335 | + $a0 &= 0xffff; |
|
336 | + $a1 &= 0xffff; |
|
337 | + $int >>= 1; |
|
338 | + } |
|
339 | + $return->limbs[0] = $ret0; |
|
340 | + $return->limbs[1] = $ret1; |
|
341 | + return $return; |
|
342 | + } |
|
343 | + |
|
344 | + /** |
|
345 | + * @param ParagonIE_Sodium_Core32_Int32 $int |
|
346 | + * @param int $size |
|
347 | + * @return ParagonIE_Sodium_Core32_Int32 |
|
348 | + * @throws SodiumException |
|
349 | + * @throws TypeError |
|
350 | + */ |
|
351 | + public function mulInt32(ParagonIE_Sodium_Core32_Int32 $int, $size = 0) |
|
352 | + { |
|
353 | + ParagonIE_Sodium_Core32_Util::declareScalarType($size, 'int', 2); |
|
354 | + if (ParagonIE_Sodium_Compat::$fastMult) { |
|
355 | + return $this->mulInt32Fast($int); |
|
356 | + } |
|
357 | + if (!$size) { |
|
358 | + $size = 31; |
|
359 | + } |
|
360 | + /** @var int $size */ |
|
361 | + |
|
362 | + $a = clone $this; |
|
363 | + $b = clone $int; |
|
364 | + $return = new ParagonIE_Sodium_Core32_Int32(); |
|
365 | + $return->unsignedInt = $this->unsignedInt; |
|
366 | + |
|
367 | + // Initialize: |
|
368 | + $ret0 = 0; |
|
369 | + $ret1 = 0; |
|
370 | + $a0 = $a->limbs[0]; |
|
371 | + $a1 = $a->limbs[1]; |
|
372 | + $b0 = $b->limbs[0]; |
|
373 | + $b1 = $b->limbs[1]; |
|
374 | + |
|
375 | + /** @var int $size */ |
|
376 | + /** @var int $i */ |
|
377 | + for ($i = $size; $i >= 0; --$i) { |
|
378 | + $m = (int) (-($b1 & 1)); |
|
379 | + $x0 = $a0 & $m; |
|
380 | + $x1 = $a1 & $m; |
|
381 | + |
|
382 | + $ret1 += $x1; |
|
383 | + $c = $ret1 >> 16; |
|
384 | + |
|
385 | + $ret0 += $x0 + $c; |
|
386 | + |
|
387 | + $ret0 &= 0xffff; |
|
388 | + $ret1 &= 0xffff; |
|
389 | + |
|
390 | + $a1 = ($a1 << 1); |
|
391 | + $x1 = $a1 >> 16; |
|
392 | + $a0 = ($a0 << 1) | $x1; |
|
393 | + $a0 &= 0xffff; |
|
394 | + $a1 &= 0xffff; |
|
395 | + |
|
396 | + $x0 = ($b0 & 1) << 16; |
|
397 | + $b0 = ($b0 >> 1); |
|
398 | + $b1 = (($b1 | $x0) >> 1); |
|
399 | + |
|
400 | + $b0 &= 0xffff; |
|
401 | + $b1 &= 0xffff; |
|
402 | + |
|
403 | + } |
|
404 | + $return->limbs[0] = $ret0; |
|
405 | + $return->limbs[1] = $ret1; |
|
406 | + |
|
407 | + return $return; |
|
408 | + } |
|
409 | + |
|
410 | + /** |
|
411 | + * OR this 32-bit integer with another. |
|
412 | + * |
|
413 | + * @param ParagonIE_Sodium_Core32_Int32 $b |
|
414 | + * @return ParagonIE_Sodium_Core32_Int32 |
|
415 | + */ |
|
416 | + public function orInt32(ParagonIE_Sodium_Core32_Int32 $b) |
|
417 | + { |
|
418 | + $return = new ParagonIE_Sodium_Core32_Int32(); |
|
419 | + $return->unsignedInt = $this->unsignedInt; |
|
420 | + $return->limbs = array( |
|
421 | + (int) ($this->limbs[0] | $b->limbs[0]), |
|
422 | + (int) ($this->limbs[1] | $b->limbs[1]) |
|
423 | + ); |
|
424 | + /** @var int overflow */ |
|
425 | + $return->overflow = $this->overflow | $b->overflow; |
|
426 | + return $return; |
|
427 | + } |
|
428 | + |
|
429 | + /** |
|
430 | + * @param int $b |
|
431 | + * @return bool |
|
432 | + */ |
|
433 | + public function isGreaterThan($b = 0) |
|
434 | + { |
|
435 | + return $this->compareInt($b) > 0; |
|
436 | + } |
|
437 | + |
|
438 | + /** |
|
439 | + * @param int $b |
|
440 | + * @return bool |
|
441 | + */ |
|
442 | + public function isLessThanInt($b = 0) |
|
443 | + { |
|
444 | + return $this->compareInt($b) < 0; |
|
445 | + } |
|
446 | + |
|
447 | + /** |
|
448 | + * @param int $c |
|
449 | + * @return ParagonIE_Sodium_Core32_Int32 |
|
450 | + * @throws SodiumException |
|
451 | + * @throws TypeError |
|
452 | + * @psalm-suppress MixedArrayAccess |
|
453 | + */ |
|
454 | + public function rotateLeft($c = 0) |
|
455 | + { |
|
456 | + ParagonIE_Sodium_Core32_Util::declareScalarType($c, 'int', 1); |
|
457 | + /** @var int $c */ |
|
458 | + $c = (int) $c; |
|
459 | + |
|
460 | + $return = new ParagonIE_Sodium_Core32_Int32(); |
|
461 | + $return->unsignedInt = $this->unsignedInt; |
|
462 | + $c &= 31; |
|
463 | + if ($c === 0) { |
|
464 | + // NOP, but we want a copy. |
|
465 | + $return->limbs = $this->limbs; |
|
466 | + } else { |
|
467 | + /** @var int $c */ |
|
468 | + |
|
469 | + /** @var int $idx_shift */ |
|
470 | + $idx_shift = ($c >> 4) & 1; |
|
471 | + |
|
472 | + /** @var int $sub_shift */ |
|
473 | + $sub_shift = $c & 15; |
|
474 | + |
|
475 | + /** @var array<int, int> $limbs */ |
|
476 | + $limbs =& $return->limbs; |
|
477 | + |
|
478 | + /** @var array<int, int> $myLimbs */ |
|
479 | + $myLimbs =& $this->limbs; |
|
480 | + |
|
481 | + for ($i = 1; $i >= 0; --$i) { |
|
482 | + /** @var int $j */ |
|
483 | + $j = ($i + $idx_shift) & 1; |
|
484 | + /** @var int $k */ |
|
485 | + $k = ($i + $idx_shift + 1) & 1; |
|
486 | + $limbs[$i] = (int) ( |
|
487 | + ( |
|
488 | + ((int) ($myLimbs[$j]) << $sub_shift) |
|
489 | + | |
|
490 | + ((int) ($myLimbs[$k]) >> (16 - $sub_shift)) |
|
491 | + ) & 0xffff |
|
492 | + ); |
|
493 | + } |
|
494 | + } |
|
495 | + return $return; |
|
496 | + } |
|
497 | + |
|
498 | + /** |
|
499 | + * Rotate to the right |
|
500 | + * |
|
501 | + * @param int $c |
|
502 | + * @return ParagonIE_Sodium_Core32_Int32 |
|
503 | + * @throws SodiumException |
|
504 | + * @throws TypeError |
|
505 | + * @psalm-suppress MixedArrayAccess |
|
506 | + */ |
|
507 | + public function rotateRight($c = 0) |
|
508 | + { |
|
509 | + ParagonIE_Sodium_Core32_Util::declareScalarType($c, 'int', 1); |
|
510 | + /** @var int $c */ |
|
511 | + $c = (int) $c; |
|
512 | + |
|
513 | + $return = new ParagonIE_Sodium_Core32_Int32(); |
|
514 | + $return->unsignedInt = $this->unsignedInt; |
|
515 | + $c &= 31; |
|
516 | + /** @var int $c */ |
|
517 | + if ($c === 0) { |
|
518 | + // NOP, but we want a copy. |
|
519 | + $return->limbs = $this->limbs; |
|
520 | + } else { |
|
521 | + /** @var int $c */ |
|
522 | + |
|
523 | + /** @var int $idx_shift */ |
|
524 | + $idx_shift = ($c >> 4) & 1; |
|
525 | + |
|
526 | + /** @var int $sub_shift */ |
|
527 | + $sub_shift = $c & 15; |
|
528 | + |
|
529 | + /** @var array<int, int> $limbs */ |
|
530 | + $limbs =& $return->limbs; |
|
531 | + |
|
532 | + /** @var array<int, int> $myLimbs */ |
|
533 | + $myLimbs =& $this->limbs; |
|
534 | + |
|
535 | + for ($i = 1; $i >= 0; --$i) { |
|
536 | + /** @var int $j */ |
|
537 | + $j = ($i - $idx_shift) & 1; |
|
538 | + /** @var int $k */ |
|
539 | + $k = ($i - $idx_shift - 1) & 1; |
|
540 | + $limbs[$i] = (int) ( |
|
541 | + ( |
|
542 | + ((int) ($myLimbs[$j]) >> (int) ($sub_shift)) |
|
543 | + | |
|
544 | + ((int) ($myLimbs[$k]) << (16 - (int) ($sub_shift))) |
|
545 | + ) & 0xffff |
|
546 | + ); |
|
547 | + } |
|
548 | + } |
|
549 | + return $return; |
|
550 | + } |
|
551 | + |
|
552 | + /** |
|
553 | + * @param bool $bool |
|
554 | + * @return self |
|
555 | + */ |
|
556 | + public function setUnsignedInt($bool = false) |
|
557 | + { |
|
558 | + $this->unsignedInt = !empty($bool); |
|
559 | + return $this; |
|
560 | + } |
|
561 | + |
|
562 | + /** |
|
563 | + * @param int $c |
|
564 | + * @return ParagonIE_Sodium_Core32_Int32 |
|
565 | + * @throws SodiumException |
|
566 | + * @throws TypeError |
|
567 | + */ |
|
568 | + public function shiftLeft($c = 0) |
|
569 | + { |
|
570 | + ParagonIE_Sodium_Core32_Util::declareScalarType($c, 'int', 1); |
|
571 | + /** @var int $c */ |
|
572 | + $c = (int) $c; |
|
573 | + |
|
574 | + $return = new ParagonIE_Sodium_Core32_Int32(); |
|
575 | + $return->unsignedInt = $this->unsignedInt; |
|
576 | + $c &= 63; |
|
577 | + /** @var int $c */ |
|
578 | + if ($c === 0) { |
|
579 | + $return->limbs = $this->limbs; |
|
580 | + } elseif ($c < 0) { |
|
581 | + /** @var int $c */ |
|
582 | + return $this->shiftRight(-$c); |
|
583 | + } else { |
|
584 | + /** @var int $c */ |
|
585 | + /** @var int $tmp */ |
|
586 | + $tmp = $this->limbs[1] << $c; |
|
587 | + $return->limbs[1] = (int)($tmp & 0xffff); |
|
588 | + /** @var int $carry */ |
|
589 | + $carry = $tmp >> 16; |
|
590 | + |
|
591 | + /** @var int $tmp */ |
|
592 | + $tmp = ($this->limbs[0] << $c) | ($carry & 0xffff); |
|
593 | + $return->limbs[0] = (int) ($tmp & 0xffff); |
|
594 | + } |
|
595 | + return $return; |
|
596 | + } |
|
597 | + |
|
598 | + /** |
|
599 | + * @param int $c |
|
600 | + * @return ParagonIE_Sodium_Core32_Int32 |
|
601 | + * @throws SodiumException |
|
602 | + * @throws TypeError |
|
603 | + * @psalm-suppress MixedAssignment |
|
604 | + * @psalm-suppress MixedOperand |
|
605 | + */ |
|
606 | + public function shiftRight($c = 0) |
|
607 | + { |
|
608 | + ParagonIE_Sodium_Core32_Util::declareScalarType($c, 'int', 1); |
|
609 | + /** @var int $c */ |
|
610 | + $c = (int) $c; |
|
611 | + |
|
612 | + $return = new ParagonIE_Sodium_Core32_Int32(); |
|
613 | + $return->unsignedInt = $this->unsignedInt; |
|
614 | + $c &= 63; |
|
615 | + /** @var int $c */ |
|
616 | + if ($c >= 16) { |
|
617 | + $return->limbs = array( |
|
618 | + (int) ($this->overflow & 0xffff), |
|
619 | + (int) ($this->limbs[0]) |
|
620 | + ); |
|
621 | + $return->overflow = $this->overflow >> 16; |
|
622 | + return $return->shiftRight($c & 15); |
|
623 | + } |
|
624 | + if ($c === 0) { |
|
625 | + $return->limbs = $this->limbs; |
|
626 | + } elseif ($c < 0) { |
|
627 | + /** @var int $c */ |
|
628 | + return $this->shiftLeft(-$c); |
|
629 | + } else { |
|
630 | + if (!is_int($c)) { |
|
631 | + throw new TypeError(); |
|
632 | + } |
|
633 | + /** @var int $c */ |
|
634 | + // $return->limbs[0] = (int) (($this->limbs[0] >> $c) & 0xffff); |
|
635 | + $carryLeft = (int) ($this->overflow & ((1 << ($c + 1)) - 1)); |
|
636 | + $return->limbs[0] = (int) ((($this->limbs[0] >> $c) | ($carryLeft << (16 - $c))) & 0xffff); |
|
637 | + $carryRight = (int) ($this->limbs[0] & ((1 << ($c + 1)) - 1)); |
|
638 | + $return->limbs[1] = (int) ((($this->limbs[1] >> $c) | ($carryRight << (16 - $c))) & 0xffff); |
|
639 | + $return->overflow >>= $c; |
|
640 | + } |
|
641 | + return $return; |
|
642 | + } |
|
643 | + |
|
644 | + /** |
|
645 | + * Subtract a normal integer from an int32 object. |
|
646 | + * |
|
647 | + * @param int $int |
|
648 | + * @return ParagonIE_Sodium_Core32_Int32 |
|
649 | + * @throws SodiumException |
|
650 | + * @throws TypeError |
|
651 | + */ |
|
652 | + public function subInt($int) |
|
653 | + { |
|
654 | + ParagonIE_Sodium_Core32_Util::declareScalarType($int, 'int', 1); |
|
655 | + /** @var int $int */ |
|
656 | + $int = (int) $int; |
|
657 | + |
|
658 | + $return = new ParagonIE_Sodium_Core32_Int32(); |
|
659 | + $return->unsignedInt = $this->unsignedInt; |
|
660 | + |
|
661 | + /** @var int $tmp */ |
|
662 | + $tmp = $this->limbs[1] - ($int & 0xffff); |
|
663 | + /** @var int $carry */ |
|
664 | + $carry = $tmp >> 16; |
|
665 | + $return->limbs[1] = (int) ($tmp & 0xffff); |
|
666 | + |
|
667 | + /** @var int $tmp */ |
|
668 | + $tmp = $this->limbs[0] - (($int >> 16) & 0xffff) + $carry; |
|
669 | + $return->limbs[0] = (int) ($tmp & 0xffff); |
|
670 | + return $return; |
|
671 | + } |
|
672 | + |
|
673 | + /** |
|
674 | + * Subtract two int32 objects from each other |
|
675 | + * |
|
676 | + * @param ParagonIE_Sodium_Core32_Int32 $b |
|
677 | + * @return ParagonIE_Sodium_Core32_Int32 |
|
678 | + */ |
|
679 | + public function subInt32(ParagonIE_Sodium_Core32_Int32 $b) |
|
680 | + { |
|
681 | + $return = new ParagonIE_Sodium_Core32_Int32(); |
|
682 | + $return->unsignedInt = $this->unsignedInt; |
|
683 | + |
|
684 | + /** @var int $tmp */ |
|
685 | + $tmp = $this->limbs[1] - ($b->limbs[1] & 0xffff); |
|
686 | + /** @var int $carry */ |
|
687 | + $carry = $tmp >> 16; |
|
688 | + $return->limbs[1] = (int) ($tmp & 0xffff); |
|
689 | + |
|
690 | + /** @var int $tmp */ |
|
691 | + $tmp = $this->limbs[0] - ($b->limbs[0] & 0xffff) + $carry; |
|
692 | + $return->limbs[0] = (int) ($tmp & 0xffff); |
|
693 | + return $return; |
|
694 | + } |
|
695 | + |
|
696 | + /** |
|
697 | + * XOR this 32-bit integer with another. |
|
698 | + * |
|
699 | + * @param ParagonIE_Sodium_Core32_Int32 $b |
|
700 | + * @return ParagonIE_Sodium_Core32_Int32 |
|
701 | + */ |
|
702 | + public function xorInt32(ParagonIE_Sodium_Core32_Int32 $b) |
|
703 | + { |
|
704 | + $return = new ParagonIE_Sodium_Core32_Int32(); |
|
705 | + $return->unsignedInt = $this->unsignedInt; |
|
706 | + $return->limbs = array( |
|
707 | + (int) ($this->limbs[0] ^ $b->limbs[0]), |
|
708 | + (int) ($this->limbs[1] ^ $b->limbs[1]) |
|
709 | + ); |
|
710 | + return $return; |
|
711 | + } |
|
712 | + |
|
713 | + /** |
|
714 | + * @param int $signed |
|
715 | + * @return self |
|
716 | + * @throws SodiumException |
|
717 | + * @throws TypeError |
|
718 | + */ |
|
719 | + public static function fromInt($signed) |
|
720 | + { |
|
721 | + ParagonIE_Sodium_Core32_Util::declareScalarType($signed, 'int', 1);; |
|
722 | + /** @var int $signed */ |
|
723 | + $signed = (int) $signed; |
|
724 | + |
|
725 | + return new ParagonIE_Sodium_Core32_Int32( |
|
726 | + array( |
|
727 | + (int) (($signed >> 16) & 0xffff), |
|
728 | + (int) ($signed & 0xffff) |
|
729 | + ) |
|
730 | + ); |
|
731 | + } |
|
732 | + |
|
733 | + /** |
|
734 | + * @param string $string |
|
735 | + * @return self |
|
736 | + * @throws SodiumException |
|
737 | + * @throws TypeError |
|
738 | + */ |
|
739 | + public static function fromString($string) |
|
740 | + { |
|
741 | + ParagonIE_Sodium_Core32_Util::declareScalarType($string, 'string', 1); |
|
742 | + $string = (string) $string; |
|
743 | + if (ParagonIE_Sodium_Core32_Util::strlen($string) !== 4) { |
|
744 | + throw new RangeException( |
|
745 | + 'String must be 4 bytes; ' . ParagonIE_Sodium_Core32_Util::strlen($string) . ' given.' |
|
746 | + ); |
|
747 | + } |
|
748 | + $return = new ParagonIE_Sodium_Core32_Int32(); |
|
749 | + |
|
750 | + $return->limbs[0] = (int) ((ParagonIE_Sodium_Core32_Util::chrToInt($string[0]) & 0xff) << 8); |
|
751 | + $return->limbs[0] |= (ParagonIE_Sodium_Core32_Util::chrToInt($string[1]) & 0xff); |
|
752 | + $return->limbs[1] = (int) ((ParagonIE_Sodium_Core32_Util::chrToInt($string[2]) & 0xff) << 8); |
|
753 | + $return->limbs[1] |= (ParagonIE_Sodium_Core32_Util::chrToInt($string[3]) & 0xff); |
|
754 | + return $return; |
|
755 | + } |
|
756 | + |
|
757 | + /** |
|
758 | + * @param string $string |
|
759 | + * @return self |
|
760 | + * @throws SodiumException |
|
761 | + * @throws TypeError |
|
762 | + */ |
|
763 | + public static function fromReverseString($string) |
|
764 | + { |
|
765 | + ParagonIE_Sodium_Core32_Util::declareScalarType($string, 'string', 1); |
|
766 | + $string = (string) $string; |
|
767 | + if (ParagonIE_Sodium_Core32_Util::strlen($string) !== 4) { |
|
768 | + throw new RangeException( |
|
769 | + 'String must be 4 bytes; ' . ParagonIE_Sodium_Core32_Util::strlen($string) . ' given.' |
|
770 | + ); |
|
771 | + } |
|
772 | + $return = new ParagonIE_Sodium_Core32_Int32(); |
|
773 | + |
|
774 | + $return->limbs[0] = (int) ((ParagonIE_Sodium_Core32_Util::chrToInt($string[3]) & 0xff) << 8); |
|
775 | + $return->limbs[0] |= (ParagonIE_Sodium_Core32_Util::chrToInt($string[2]) & 0xff); |
|
776 | + $return->limbs[1] = (int) ((ParagonIE_Sodium_Core32_Util::chrToInt($string[1]) & 0xff) << 8); |
|
777 | + $return->limbs[1] |= (ParagonIE_Sodium_Core32_Util::chrToInt($string[0]) & 0xff); |
|
778 | + return $return; |
|
779 | + } |
|
780 | + |
|
781 | + /** |
|
782 | + * @return array<int, int> |
|
783 | + */ |
|
784 | + public function toArray() |
|
785 | + { |
|
786 | + return array((int) ($this->limbs[0] << 16 | $this->limbs[1])); |
|
787 | + } |
|
788 | + |
|
789 | + /** |
|
790 | + * @return string |
|
791 | + * @throws TypeError |
|
792 | + */ |
|
793 | + public function toString() |
|
794 | + { |
|
795 | + return |
|
796 | + ParagonIE_Sodium_Core32_Util::intToChr(($this->limbs[0] >> 8) & 0xff) . |
|
797 | + ParagonIE_Sodium_Core32_Util::intToChr($this->limbs[0] & 0xff) . |
|
798 | + ParagonIE_Sodium_Core32_Util::intToChr(($this->limbs[1] >> 8) & 0xff) . |
|
799 | + ParagonIE_Sodium_Core32_Util::intToChr($this->limbs[1] & 0xff); |
|
800 | + } |
|
801 | + |
|
802 | + /** |
|
803 | + * @return int |
|
804 | + */ |
|
805 | + public function toInt() |
|
806 | + { |
|
807 | + return (int) ( |
|
808 | + (($this->limbs[0] & 0xffff) << 16) |
|
809 | + | |
|
810 | + ($this->limbs[1] & 0xffff) |
|
811 | + ); |
|
812 | + } |
|
813 | + |
|
814 | + /** |
|
815 | + * @return ParagonIE_Sodium_Core32_Int32 |
|
816 | + */ |
|
817 | + public function toInt32() |
|
818 | + { |
|
819 | + $return = new ParagonIE_Sodium_Core32_Int32(); |
|
820 | + $return->limbs[0] = (int) ($this->limbs[0] & 0xffff); |
|
821 | + $return->limbs[1] = (int) ($this->limbs[1] & 0xffff); |
|
822 | + $return->unsignedInt = $this->unsignedInt; |
|
823 | + $return->overflow = (int) ($this->overflow & 0x7fffffff); |
|
824 | + return $return; |
|
825 | + } |
|
826 | + |
|
827 | + /** |
|
828 | + * @return ParagonIE_Sodium_Core32_Int64 |
|
829 | + */ |
|
830 | + public function toInt64() |
|
831 | + { |
|
832 | + $return = new ParagonIE_Sodium_Core32_Int64(); |
|
833 | + $return->unsignedInt = $this->unsignedInt; |
|
834 | + if ($this->unsignedInt) { |
|
835 | + $return->limbs[0] += (($this->overflow >> 16) & 0xffff); |
|
836 | + $return->limbs[1] += (($this->overflow) & 0xffff); |
|
837 | + } else { |
|
838 | + $neg = -(($this->limbs[0] >> 15) & 1); |
|
839 | + $return->limbs[0] = (int)($neg & 0xffff); |
|
840 | + $return->limbs[1] = (int)($neg & 0xffff); |
|
841 | + } |
|
842 | + $return->limbs[2] = (int) ($this->limbs[0] & 0xffff); |
|
843 | + $return->limbs[3] = (int) ($this->limbs[1] & 0xffff); |
|
844 | + return $return; |
|
845 | + } |
|
846 | + |
|
847 | + /** |
|
848 | + * @return string |
|
849 | + * @throws TypeError |
|
850 | + */ |
|
851 | + public function toReverseString() |
|
852 | + { |
|
853 | + return ParagonIE_Sodium_Core32_Util::intToChr($this->limbs[1] & 0xff) . |
|
854 | + ParagonIE_Sodium_Core32_Util::intToChr(($this->limbs[1] >> 8) & 0xff) . |
|
855 | + ParagonIE_Sodium_Core32_Util::intToChr($this->limbs[0] & 0xff) . |
|
856 | + ParagonIE_Sodium_Core32_Util::intToChr(($this->limbs[0] >> 8) & 0xff); |
|
857 | + } |
|
858 | + |
|
859 | + /** |
|
860 | + * @return string |
|
861 | + */ |
|
862 | + public function __toString() |
|
863 | + { |
|
864 | + try { |
|
865 | + return $this->toString(); |
|
866 | + } catch (TypeError $ex) { |
|
867 | + // PHP engine can't handle exceptions from __toString() |
|
868 | + return ''; |
|
869 | + } |
|
870 | + } |
|
871 | 871 | } |