|
1 <?php |
|
2 |
|
3 if (class_exists('ParagonIE_Sodium_Core32_HSalsa20', false)) { |
|
4 return; |
|
5 } |
|
6 |
|
7 /** |
|
8 * Class ParagonIE_Sodium_Core32_HSalsa20 |
|
9 */ |
|
10 abstract class ParagonIE_Sodium_Core32_HSalsa20 extends ParagonIE_Sodium_Core32_Salsa20 |
|
11 { |
|
12 /** |
|
13 * Calculate an hsalsa20 hash of a single block |
|
14 * |
|
15 * HSalsa20 doesn't have a counter and will never be used for more than |
|
16 * one block (used to derive a subkey for xsalsa20). |
|
17 * |
|
18 * @internal You should not use this directly from another application |
|
19 * |
|
20 * @param string $in |
|
21 * @param string $k |
|
22 * @param string|null $c |
|
23 * @return string |
|
24 * @throws SodiumException |
|
25 * @throws TypeError |
|
26 */ |
|
27 public static function hsalsa20($in, $k, $c = null) |
|
28 { |
|
29 /** |
|
30 * @var ParagonIE_Sodium_Core32_Int32 $x0 |
|
31 * @var ParagonIE_Sodium_Core32_Int32 $x1 |
|
32 * @var ParagonIE_Sodium_Core32_Int32 $x2 |
|
33 * @var ParagonIE_Sodium_Core32_Int32 $x3 |
|
34 * @var ParagonIE_Sodium_Core32_Int32 $x4 |
|
35 * @var ParagonIE_Sodium_Core32_Int32 $x5 |
|
36 * @var ParagonIE_Sodium_Core32_Int32 $x6 |
|
37 * @var ParagonIE_Sodium_Core32_Int32 $x7 |
|
38 * @var ParagonIE_Sodium_Core32_Int32 $x8 |
|
39 * @var ParagonIE_Sodium_Core32_Int32 $x9 |
|
40 * @var ParagonIE_Sodium_Core32_Int32 $x10 |
|
41 * @var ParagonIE_Sodium_Core32_Int32 $x11 |
|
42 * @var ParagonIE_Sodium_Core32_Int32 $x12 |
|
43 * @var ParagonIE_Sodium_Core32_Int32 $x13 |
|
44 * @var ParagonIE_Sodium_Core32_Int32 $x14 |
|
45 * @var ParagonIE_Sodium_Core32_Int32 $x15 |
|
46 * @var ParagonIE_Sodium_Core32_Int32 $j0 |
|
47 * @var ParagonIE_Sodium_Core32_Int32 $j1 |
|
48 * @var ParagonIE_Sodium_Core32_Int32 $j2 |
|
49 * @var ParagonIE_Sodium_Core32_Int32 $j3 |
|
50 * @var ParagonIE_Sodium_Core32_Int32 $j4 |
|
51 * @var ParagonIE_Sodium_Core32_Int32 $j5 |
|
52 * @var ParagonIE_Sodium_Core32_Int32 $j6 |
|
53 * @var ParagonIE_Sodium_Core32_Int32 $j7 |
|
54 * @var ParagonIE_Sodium_Core32_Int32 $j8 |
|
55 * @var ParagonIE_Sodium_Core32_Int32 $j9 |
|
56 * @var ParagonIE_Sodium_Core32_Int32 $j10 |
|
57 * @var ParagonIE_Sodium_Core32_Int32 $j11 |
|
58 * @var ParagonIE_Sodium_Core32_Int32 $j12 |
|
59 * @var ParagonIE_Sodium_Core32_Int32 $j13 |
|
60 * @var ParagonIE_Sodium_Core32_Int32 $j14 |
|
61 * @var ParagonIE_Sodium_Core32_Int32 $j15 |
|
62 */ |
|
63 if (self::strlen($k) < 32) { |
|
64 throw new RangeException('Key must be 32 bytes long'); |
|
65 } |
|
66 if ($c === null) { |
|
67 $x0 = new ParagonIE_Sodium_Core32_Int32(array(0x6170, 0x7865)); |
|
68 $x5 = new ParagonIE_Sodium_Core32_Int32(array(0x3320, 0x646e)); |
|
69 $x10 = new ParagonIE_Sodium_Core32_Int32(array(0x7962, 0x2d32)); |
|
70 $x15 = new ParagonIE_Sodium_Core32_Int32(array(0x6b20, 0x6574)); |
|
71 } else { |
|
72 $x0 = ParagonIE_Sodium_Core32_Int32::fromReverseString(self::substr($c, 0, 4)); |
|
73 $x5 = ParagonIE_Sodium_Core32_Int32::fromReverseString(self::substr($c, 4, 4)); |
|
74 $x10 = ParagonIE_Sodium_Core32_Int32::fromReverseString(self::substr($c, 8, 4)); |
|
75 $x15 = ParagonIE_Sodium_Core32_Int32::fromReverseString(self::substr($c, 12, 4)); |
|
76 } |
|
77 $x1 = ParagonIE_Sodium_Core32_Int32::fromReverseString(self::substr($k, 0, 4)); |
|
78 $x2 = ParagonIE_Sodium_Core32_Int32::fromReverseString(self::substr($k, 4, 4)); |
|
79 $x3 = ParagonIE_Sodium_Core32_Int32::fromReverseString(self::substr($k, 8, 4)); |
|
80 $x4 = ParagonIE_Sodium_Core32_Int32::fromReverseString(self::substr($k, 12, 4)); |
|
81 $x6 = ParagonIE_Sodium_Core32_Int32::fromReverseString(self::substr($in, 0, 4)); |
|
82 $x7 = ParagonIE_Sodium_Core32_Int32::fromReverseString(self::substr($in, 4, 4)); |
|
83 $x8 = ParagonIE_Sodium_Core32_Int32::fromReverseString(self::substr($in, 8, 4)); |
|
84 $x9 = ParagonIE_Sodium_Core32_Int32::fromReverseString(self::substr($in, 12, 4)); |
|
85 $x11 = ParagonIE_Sodium_Core32_Int32::fromReverseString(self::substr($k, 16, 4)); |
|
86 $x12 = ParagonIE_Sodium_Core32_Int32::fromReverseString(self::substr($k, 20, 4)); |
|
87 $x13 = ParagonIE_Sodium_Core32_Int32::fromReverseString(self::substr($k, 24, 4)); |
|
88 $x14 = ParagonIE_Sodium_Core32_Int32::fromReverseString(self::substr($k, 28, 4)); |
|
89 |
|
90 for ($i = self::ROUNDS; $i > 0; $i -= 2) { |
|
91 $x4 = $x4->xorInt32($x0->addInt32($x12)->rotateLeft(7)); |
|
92 $x8 = $x8->xorInt32($x4->addInt32($x0)->rotateLeft(9)); |
|
93 $x12 = $x12->xorInt32($x8->addInt32($x4)->rotateLeft(13)); |
|
94 $x0 = $x0->xorInt32($x12->addInt32($x8)->rotateLeft(18)); |
|
95 |
|
96 $x9 = $x9->xorInt32($x5->addInt32($x1)->rotateLeft(7)); |
|
97 $x13 = $x13->xorInt32($x9->addInt32($x5)->rotateLeft(9)); |
|
98 $x1 = $x1->xorInt32($x13->addInt32($x9)->rotateLeft(13)); |
|
99 $x5 = $x5->xorInt32($x1->addInt32($x13)->rotateLeft(18)); |
|
100 |
|
101 $x14 = $x14->xorInt32($x10->addInt32($x6)->rotateLeft(7)); |
|
102 $x2 = $x2->xorInt32($x14->addInt32($x10)->rotateLeft(9)); |
|
103 $x6 = $x6->xorInt32($x2->addInt32($x14)->rotateLeft(13)); |
|
104 $x10 = $x10->xorInt32($x6->addInt32($x2)->rotateLeft(18)); |
|
105 |
|
106 $x3 = $x3->xorInt32($x15->addInt32($x11)->rotateLeft(7)); |
|
107 $x7 = $x7->xorInt32($x3->addInt32($x15)->rotateLeft(9)); |
|
108 $x11 = $x11->xorInt32($x7->addInt32($x3)->rotateLeft(13)); |
|
109 $x15 = $x15->xorInt32($x11->addInt32($x7)->rotateLeft(18)); |
|
110 |
|
111 $x1 = $x1->xorInt32($x0->addInt32($x3)->rotateLeft(7)); |
|
112 $x2 = $x2->xorInt32($x1->addInt32($x0)->rotateLeft(9)); |
|
113 $x3 = $x3->xorInt32($x2->addInt32($x1)->rotateLeft(13)); |
|
114 $x0 = $x0->xorInt32($x3->addInt32($x2)->rotateLeft(18)); |
|
115 |
|
116 $x6 = $x6->xorInt32($x5->addInt32($x4)->rotateLeft(7)); |
|
117 $x7 = $x7->xorInt32($x6->addInt32($x5)->rotateLeft(9)); |
|
118 $x4 = $x4->xorInt32($x7->addInt32($x6)->rotateLeft(13)); |
|
119 $x5 = $x5->xorInt32($x4->addInt32($x7)->rotateLeft(18)); |
|
120 |
|
121 $x11 = $x11->xorInt32($x10->addInt32($x9)->rotateLeft(7)); |
|
122 $x8 = $x8->xorInt32($x11->addInt32($x10)->rotateLeft(9)); |
|
123 $x9 = $x9->xorInt32($x8->addInt32($x11)->rotateLeft(13)); |
|
124 $x10 = $x10->xorInt32($x9->addInt32($x8)->rotateLeft(18)); |
|
125 |
|
126 $x12 = $x12->xorInt32($x15->addInt32($x14)->rotateLeft(7)); |
|
127 $x13 = $x13->xorInt32($x12->addInt32($x15)->rotateLeft(9)); |
|
128 $x14 = $x14->xorInt32($x13->addInt32($x12)->rotateLeft(13)); |
|
129 $x15 = $x15->xorInt32($x14->addInt32($x13)->rotateLeft(18)); |
|
130 } |
|
131 |
|
132 return $x0->toReverseString() . |
|
133 $x5->toReverseString() . |
|
134 $x10->toReverseString() . |
|
135 $x15->toReverseString() . |
|
136 $x6->toReverseString() . |
|
137 $x7->toReverseString() . |
|
138 $x8->toReverseString() . |
|
139 $x9->toReverseString(); |
|
140 } |
|
141 } |