1
|
|
|
<?php |
2
|
|
|
/* |
3
|
|
|
You may not change or alter any portion of this comment or credits |
4
|
|
|
of supporting developers from this source code or any supporting source code |
5
|
|
|
which is considered copyrighted (c) material of the original comment or credit authors. |
6
|
|
|
|
7
|
|
|
This program is distributed in the hope that it will be useful, |
8
|
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of |
9
|
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. |
10
|
|
|
*/ |
11
|
|
|
|
12
|
|
|
namespace Xmf; |
13
|
|
|
|
14
|
|
|
/** |
15
|
|
|
* Generate ULID |
16
|
|
|
* |
17
|
|
|
* @category Xmf\Ulid |
18
|
|
|
* @package Xmf |
19
|
|
|
* @author Michael Beck <[email protected]> |
20
|
|
|
* @copyright 2023 XOOPS Project (https://xoops.org) |
21
|
|
|
* @license GNU GPL 2 or later (https://www.gnu.org/licenses/gpl-2.0.html) |
22
|
|
|
*/ |
23
|
|
|
class Ulid |
24
|
|
|
{ |
25
|
|
|
const ENCODING_CHARS = '0123456789ABCDEFGHJKMNPQRSTVWXYZ'; |
26
|
|
|
const ENCODING_LENGTH = 32; |
27
|
|
|
|
28
|
|
|
/** |
29
|
|
|
* Generate a new ULID. |
30
|
|
|
* |
31
|
|
|
* @return string The generated ULID. |
32
|
|
|
*/ |
33
|
|
|
public static function generate(bool $upperCase = true): string |
34
|
|
|
{ |
35
|
|
|
$time = self::microtimeToUlidTime(\microtime(true)); |
|
|
|
|
36
|
|
|
$timeChars = self::encodeTime($time); |
37
|
|
|
$randChars = self::encodeRandomness(); |
38
|
|
|
$ulid = $timeChars . $randChars; |
39
|
|
|
|
40
|
|
|
$ulid = $upperCase ? \strtoupper($ulid) : \strtolower($ulid); |
41
|
|
|
|
42
|
|
|
return $ulid; |
43
|
|
|
} |
44
|
|
|
|
45
|
|
|
/** |
46
|
|
|
* @param int $time |
47
|
|
|
* |
48
|
|
|
* @return string |
49
|
|
|
*/ |
50
|
|
|
public static function encodeTime(int $time): string |
51
|
|
|
{ |
52
|
|
|
$encodingCharsArray = str_split(self::ENCODING_CHARS); |
53
|
|
|
$timeChars = ''; |
54
|
|
|
for ($i = 0; $i < 10; $i++) { |
55
|
|
|
$mod = \floor($time % self::ENCODING_LENGTH); |
56
|
|
|
$timeChars = $encodingCharsArray[$mod] . $timeChars; |
57
|
|
|
$time = (int)(($time - $mod) / self::ENCODING_LENGTH); |
58
|
|
|
} |
59
|
|
|
return $timeChars; |
60
|
|
|
} |
61
|
|
|
|
62
|
|
|
public static function encodeRandomness(): string |
63
|
|
|
{ |
64
|
|
|
$encodingCharsArray = str_split(self::ENCODING_CHARS); |
65
|
|
|
$randomBytes = \random_bytes(10); // 80 bits |
66
|
|
|
// Check if the random bytes were generated successfully. |
67
|
|
|
if (false === $randomBytes) { |
68
|
|
|
throw new \RuntimeException('Failed to generate random bytes'); |
69
|
|
|
} |
70
|
|
|
|
71
|
|
|
$randChars = ''; |
72
|
|
|
for ($i = 0; $i < 16; $i++) { |
73
|
|
|
$randValue = \ord($randomBytes[$i % 10]); |
74
|
|
|
if (0 === $i % 2) { |
75
|
|
|
$randValue >>= 3; // take the upper 5 bits |
76
|
|
|
} else { |
77
|
|
|
$randValue &= 31; // take the lower 5 bits |
78
|
|
|
} |
79
|
|
|
$randChars .= $encodingCharsArray[$randValue]; |
80
|
|
|
} |
81
|
|
|
return $randChars; |
82
|
|
|
} |
83
|
|
|
|
84
|
|
|
/** |
85
|
|
|
* @param string $ulid |
86
|
|
|
* |
87
|
|
|
* @return array |
88
|
|
|
*/ |
89
|
|
|
public static function decode(string $ulid): array |
90
|
|
|
{ |
91
|
|
|
if (!self::isValid($ulid)) { |
92
|
|
|
throw new \InvalidArgumentException('Invalid ULID string'); |
93
|
|
|
} |
94
|
|
|
|
95
|
|
|
$time = self::decodeTime($ulid); |
96
|
|
|
$rand = self::decodeRandomness($ulid); |
97
|
|
|
|
98
|
|
|
return [ |
99
|
|
|
'time' => $time, |
100
|
|
|
'rand' => $rand, |
101
|
|
|
]; |
102
|
|
|
} |
103
|
|
|
|
104
|
|
|
/** |
105
|
|
|
* @param string $ulid |
106
|
|
|
* |
107
|
|
|
* @return int |
108
|
|
|
*/ |
109
|
|
|
public static function decodeTime(string $ulid): int |
110
|
|
|
{ |
111
|
|
|
// $encodingCharsArray = str_split(self::ENCODING_CHARS); |
112
|
|
|
|
113
|
|
|
// Check if the ULID string is valid. |
114
|
|
|
if (!self::isValid($ulid)) { |
115
|
|
|
throw new \InvalidArgumentException('Invalid ULID string'); |
116
|
|
|
} |
117
|
|
|
|
118
|
|
|
$time = 0; |
119
|
|
|
for ($i = 0; $i < 10; $i++) { |
120
|
|
|
$char = $ulid[$i]; |
121
|
|
|
$value = \strpos(self::ENCODING_CHARS, $char); |
122
|
|
|
$exponent = 9 - $i; |
123
|
|
|
$time += $value * \bcpow((string)self::ENCODING_LENGTH, (string)$exponent); |
124
|
|
|
} |
125
|
|
|
|
126
|
|
|
return $time; |
127
|
|
|
} |
128
|
|
|
|
129
|
|
|
/** |
130
|
|
|
* @param string $ulid |
131
|
|
|
* |
132
|
|
|
* @return int |
133
|
|
|
*/ |
134
|
|
|
public static function decodeRandomness(string $ulid): int |
135
|
|
|
{ |
136
|
|
|
if (26 !== strlen($ulid)) { |
137
|
|
|
throw new \InvalidArgumentException('Invalid ULID length'); // Changed line |
138
|
|
|
} |
139
|
|
|
|
140
|
|
|
$rand = 0; |
141
|
|
|
for ($i = 10; $i < 26; $i++) { |
142
|
|
|
$char = $ulid[$i]; |
143
|
|
|
$value = \strpos(self::ENCODING_CHARS, $char); |
144
|
|
|
|
145
|
|
|
// Check if the random value is within the valid range. |
146
|
|
|
if ($value < 0 || $value >= self::ENCODING_LENGTH) { |
147
|
|
|
throw new \InvalidArgumentException('Invalid ULID random value'); |
148
|
|
|
} |
149
|
|
|
$exponent = 15 - $i; |
150
|
|
|
$rand += $value * \bcpow((string)self::ENCODING_LENGTH, (string)$exponent); |
151
|
|
|
} |
152
|
|
|
|
153
|
|
|
return $rand; |
154
|
|
|
} |
155
|
|
|
|
156
|
|
|
/** |
157
|
|
|
* @param string $ulid |
158
|
|
|
* |
159
|
|
|
* @return bool |
160
|
|
|
*/ |
161
|
|
|
public static function isValid(string $ulid): bool |
162
|
|
|
{ |
163
|
|
|
// Check the length of the ULID string before throwing an exception. |
164
|
|
|
if (26 !== strlen($ulid)) { |
165
|
|
|
return false; |
166
|
|
|
} |
167
|
|
|
|
168
|
|
|
// Throw an exception if the ULID is invalid. |
169
|
|
|
try { |
170
|
|
|
self::decodeRandomness($ulid); |
171
|
|
|
} catch (\InvalidArgumentException $e) { |
172
|
|
|
return false; |
173
|
|
|
} |
174
|
|
|
|
175
|
|
|
return true; |
176
|
|
|
} |
177
|
|
|
|
178
|
|
|
/** |
179
|
|
|
* @param float $microtime |
180
|
|
|
* |
181
|
|
|
* @return int |
182
|
|
|
*/ |
183
|
|
|
public static function microtimeToUlidTime(float $microtime): int |
184
|
|
|
{ |
185
|
|
|
$timestamp = $microtime * 1000000; |
186
|
|
|
$unixEpoch = 946684800000000; // Microseconds since the Unix epoch. |
187
|
|
|
|
188
|
|
|
return (int)($timestamp - $unixEpoch); |
189
|
|
|
} |
190
|
|
|
} |
191
|
|
|
|
192
|
|
|
|
193
|
|
|
|
194
|
|
|
|