bachir/materio-base-legacy
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

updated webform localization and phone, uuid, term_merge, spambot, performance

Browse Source
This commit is contained in:
Bachir Soussi Chiadmi
2016-11-05 17:14:57 +01:00
parent fdefc824d8
commit 0521608bb7
57 changed files with 3592 additions and 1629 deletions
Download Patch File Download Diff File Expand all files Collapse all files

141
sites/all/modules/contrib/admin/uuid/uuid.inc
View File

@@ -8,7 +8,7 @@
/**
* Pattern for detecting a valid UUID.
*/
define('UUID_PATTERN', '[0-9a-f]{8}-([0-9a-f]{4}-){3}[0-9a-f]{12}');
define('UUID_PATTERN', '[0-9a-fA-F]{8}-[0-9a-fA-F]{4}-[1-5][0-9a-fA-F]{3}-[89abAB][0-9a-fA-F]{3}-[0-9a-fA-F]{12}');
/**
* Generates an universally unique identifier.
@@ -17,7 +17,7 @@ define('UUID_PATTERN', '[0-9a-f]{8}-([0-9a-f]{4}-){3}[0-9a-f]{12}');
* universally unique identifiers. If that doesn't exist, then it falls back on
* PHP for generating that.
*
* @return
* @return string
* An UUID, made up of 32 hex digits and 4 hyphens.
*/
function uuid_generate() {
@@ -37,6 +37,61 @@ function uuid_generate() {
return $callback();
}
/**
* Generates a version 5 compliant UUID.
*
* @param string $namespace
* Namespace UUID as a hex encoded string.
* @param string $name
* The name for the generating the UUID.
*
* @return string
* UUID as a hex encoded string.
*
* @link http://www.php.net/manual/en/function.uniqid.php#94959 Code lifted from
* PHP manual comment by Andrew Moore. @endlink
*/
function uuid_generate_v5($namespace, $name) {
if (!uuid_is_valid($namespace)) {
return FALSE;
}
// Get hexadecimal components of namespace.
$nhex = str_replace(array('-', '{', '}'), '', $namespace);
// Binary Value.
$nstr = '';
// Convert Namespace UUID to bits.
for ($i = 0; $i < strlen($nhex); $i += 2) {
$nstr .= chr(hexdec($nhex[$i] . $nhex[$i + 1]));
}
// Calculate hash value.
$hash = sha1($nstr . $name);
return sprintf('%08s-%04s-%04x-%04x-%12s',
// 32 bits for "time_low".
substr($hash, 0, 8),
// 16 bits for "time_mid".
substr($hash, 8, 4),
// 16 bits for "time_hi_and_version",
// four most significant bits holds version number 5.
(hexdec(substr($hash, 12, 4)) & 0x0fff) | 0x5000,
// 16 bits, 8 bits for "clk_seq_hi_res",
// 8 bits for "clk_seq_low",
// two most significant bits holds zero and one for variant DCE1.1.
(hexdec(substr($hash, 16, 4)) & 0x3fff) | 0x8000,
// 48 bits for "node".
substr($hash, 20, 12)
);
}
/**
* Generate all missing UUIDs.
*/
@@ -53,7 +108,7 @@ function uuid_sync_all() {
* The type of entity being used.
*
* @return string
* The generated UUID URI or normal URI if entity doesn't support UUIDs.
* The generated UUID URI or normal URI if entity doesn't support UUIDs.
*/
function uuid_entity_uuid_uri($entity, $entity_type) {
$entity_info = entity_get_info($entity_type);
@@ -73,13 +128,13 @@ function uuid_entity_uuid_uri($entity, $entity_type) {
/**
* Converts an ID URI string to an entity data array.
*
* @see uuid_id_uri_array_to_data()
*
* @param string $uri
* The URI to convert.
* The URI to convert.
*
* @return array
* The entity data.
* The entity data.
*
* @see uuid_id_uri_array_to_data()
*/
function uuid_id_uri_to_data($uri) {
$parts = explode('/', $uri);
@@ -90,10 +145,10 @@ function uuid_id_uri_to_data($uri) {
* Converts a URI array to entity data array.
*
* @param array $uri
* The URI parts, often taken from arg().
* The URI parts, often taken from arg().
*
* @return array
* The entity data.
* The entity data.
*/
function uuid_id_uri_array_to_data($uri) {
$data = array(
@@ -110,13 +165,13 @@ function uuid_id_uri_array_to_data($uri) {
/**
* Converts a UUID URI string to an entity data array.
*
* @see uuid_uri_array_to_data()
*
* @param string $uri
* The URI to convert.
* The URI to convert.
*
* @return array
* The entity data.
* The entity data.
*
* @see uuid_uri_array_to_data()
*/
function uuid_uri_to_data($uri, $strip_uuid = TRUE) {
return uuid_uri_array_to_data(explode('/', $uri));
@@ -126,10 +181,10 @@ function uuid_uri_to_data($uri, $strip_uuid = TRUE) {
* Converts a URI array to entity data array.
*
* @param array $uri
* The URI parts, often taken from arg().
* The URI parts, often taken from arg().
*
* @return array
* The entity data.
* The entity data.
*/
function uuid_uri_array_to_data($uri, $strip_uuid = TRUE) {
if ($strip_uuid) {
@@ -138,8 +193,8 @@ function uuid_uri_array_to_data($uri, $strip_uuid = TRUE) {
$data = array(
'request' => $uri,
'entity_type' => $uri[0],
'uuid' => $uri[1],
'entity_type' => isset($uri[0]) ? $uri[0] : NULL,
'uuid' => isset($uri[1]) ? $uri[1] : NULL,
);
drupal_alter('uuid_uri_data', $data);
@@ -165,40 +220,56 @@ function _uuid_generate_pecl() {
}
/**
* Generates a UUID v4 using PHP code.
* Generates a UUID v4 (RFC 4122 section 4.4) using PHP code.
*
* Based on code from http://php.net/uniqid#65879, but corrected.
* @see http://www.rfc-editor.org/rfc/rfc4122.txt
*
* The UUID layout and fields are defined in section 4.1.2.
*
* Note that there are inconsistencies in the RFC with respect to
* bit numbering. Network Order is correct, so the most significant bit
* always appears first (in left-to-right sequence). See errata 3546:
* http://www.rfc-editor.org/errata_search.php?rfc=4122&eid=3546
*
* Based on code from http://php.net/uniqid
*/
function _uuid_generate_php() {
// The field names refer to RFC 4122 section 4.1.2.
// We limit each generated number to 16 bits (maximum value 0xffff)
// because mt_rand() returns a *signed* integer, and hence a 32-bit
// value can only have a 31-bit magnitude. Constructing a 32-bit
// number from two 16-bit random numbers guarantees that all 32 bits
// are random.
return sprintf('%04x%04x-%04x-4%03x-%04x-%04x%04x%04x',
// 32 bits for "time_low".
mt_rand(0, 65535), mt_rand(0, 65535),
mt_rand(0, 0xffff), mt_rand(0, 0xffff),
// 16 bits for "time_mid".
mt_rand(0, 65535),
// 12 bits after the 0100 of (version) 4 for "time_hi_and_version".
mt_rand(0, 4095),
bindec(substr_replace(sprintf('%016b', mt_rand(0, 65535)), '10', 0, 2)),
// 8 bits, the last two of which (positions 6 and 7) are 01, for "clk_seq_hi_res"
// (hence, the 2nd hex digit after the 3rd hyphen can only be 1, 5, 9 or d)
// 8 bits for "clk_seq_low" 48 bits for "node".
mt_rand(0, 65535), mt_rand(0, 65535), mt_rand(0, 65535)
mt_rand(0, 0xffff),
// 12 bits after the initial 0100 (version 4) for "time_hi_and_version".
mt_rand(0, 0x0fff),
// 16 bits in total for "clk_seq_hi_res" and "clk_seq_low", with the
// most significant 2 bits of clk_seq_hi_res set to '10'. We do a
// bitwise OR of a random 14-bit value (maximum 0x3fff) with 0x8000
// (a 16-bit integer with only the most significant bit set).
mt_rand(0, 0x3fff) | 0x8000,
// 48 bits for "node".
mt_rand(0, 0xffff), mt_rand(0, 0xffff), mt_rand(0, 0xffff)
);
}
// This is wrapped in an if block to avoid conflicts with PECL's uuid_is_valid().
// The if block avoids conflicts with PECL's uuid_is_valid().
if (!function_exists('uuid_is_valid')) {
/**
* Check that a string appears to be in the format of a UUID.
*
* @param $uuid
* The string to test.
* @param string $uuid
* The string to test.
*
* @return
* TRUE if the string is well formed.
* @return bool
* TRUE if the string is well formed.
*/
function uuid_is_valid($uuid) {
return preg_match('/^' . UUID_PATTERN . '$/', $uuid);
}
}