fwolf / fwlib

func/uuid.php

<?php
/**
 * UUID generator
 *
 * Using method nodkz at mail dot ru post on <http://us.php.net/uniqid>,
 * but format changed.
 *
 * <code>
 * UUID format:
 * [time_low]-[time_mid]-[custom_1]-[custom_2](part1/2)
 * 	-[custom_2](part2/2)[random_1][random_2]
 * time_low:	8 chars, seconds in microtime, hex format.
 * time_mid:	4 chars, micro-second in microtime, plus 10000, hex format.
 * custom_1:	4 chars, user defined, '0000' if empty, hex format suggested.
 * custom_2:	8 chars, user defined, hex of user ip if empty,
 * 					and random hex string if user ip cannot get, hex format too.
 * random_1:	4 chars, random string, hex format.
 * random_2:	4 chars, random string, hex format.
 * </code>
 * @package		fwolflib
 * @subpackage	func
 * @copyright	Copyright 2008-2010, Fwolf
 * @author		Fwolf <fwolf.aide+fwolflib.func@gmail.com>
 * @since		2008-05-08
 */


require_once(dirname(__FILE__) . '/../fwolflib.php');
require_once(FWOLFLIB . 'func/ecl.php');
require_once(FWOLFLIB . 'func/client.php');


/**
 * Get a uuid
 *
 * User can combine cus and cus2 to sort uuid.
 *
 * @deprecated      Use Fwlib\Util\Uuid::gen()
 * @param	string	$s_cus	Custom part in uuid, 4 chars long,
 * 							positioned in 3rd section,
 *							default fill by '0'.
 * @param	string	$s_cus2	Custom part2 in uuid, 8 chars long,
 *							Positioned in 4 section and start of 5 section,
 * 							If empty given, user client user ip(hex) to fill,
 *							and random string if can't get ip.
 * 							If given and length <> 8, will fill to 8 with random chars after it.
 * @return	string
 * @link	http://us.php.net/uniqid
 */
function Uuid($s_cus = '0000', $s_cus2 = '') {
    $ar = explode(" ", microtime());

    // Prepare custom string 2
    if (empty($s_cus2))
    	$s_cus2 = ClientIpToHex();

The function ClientIpToHex() has been deprecated with message: Use Fwlib\Util\Ip::toHex()

    if (8 != strlen($s_cus2))

This code seems to be duplicated across your project.

    	$s_cus2 = substr($s_cus2 .
			sprintf('%04x%04x', mt_rand(0, 0xffff), mt_rand(0, 0xffff)), 0, 8);
    //if (empty($s_cus2) || (8 != strlen($s_cus2)))
    //	$s_cus2 = sprintf('%04x%04x', mt_rand(0, 0xffff), mt_rand(0, 0xffff));

    return sprintf('%08s-%04s-%04s-%04s-%04s%04x%04x',
    	// Unixtime, 8 chars from right-side end
    	// 2030-12-31 = 1924876800(dec) = 72bb4a00(hex)
    	substr(str_repeat('0', 8) . base_convert($ar[1], 10, 16), -8),
    	// Microtime, 4chars from left-side start
    	// to exceed 65534(length 4) limit, * 100000 and div by 2(max 50000)
    	substr(base_convert(round($ar[0] * 100000 / 2), 10, 16), 0, 4),
    	// Custom part 1, default 4 chars
    	$s_cus,
    	// Custom part2-part1, length: 4
		substr($s_cus2, 0, 4),
    	// Custom part2-part2, length: 4, used in 5th section
    	substr($s_cus2, -4),
    	// Random string, length: 4
    	mt_rand(0, 0xffff),
    	// Random string, length: 4
    	mt_rand(0, 0xffff)
    	);
    /*
    return sprintf( '%04x-%08s-%08s-%04s-%04x%04x',
        $serverID,
        clientIPToHex(),
        substr("00000000".dechex($t[1]),-8),   // get 8HEX of unixtime
        substr("0000".dechex(round($t[0]*65536)),-4), // get 4HEX of microtime
        mt_rand(0,0xffff), mt_rand(0,0xffff));
	*/
} // end of func Uuid


/**
 * Parse uuid, see what it means
 *
 * @deprecated      Use Fwlib\Util\Uuid::parse()
 * @param	string	$uuid
 * @return	array
 * @link	http://us.php.net/uniqid
 */
function UuidParse($uuid) {
	$ar = array();
	$u = explode('-', $uuid);
	if (is_array($u) && (5 == count($u))) {
		$ar = array(
			'time_low'	=> hexdec($u[0]),
			'time_mid'	=> hexdec($u[1]),
			'custom_1'	=> $u[2],
			'custom_2'	=> $u[3] . substr($u[4], 0, 4),
			'ip'		=> ClientIpFromHex($u[3] . substr($u[4], 0, 4)),

The function ClientIpFromHex() has been deprecated with message: Use Fwlib\Util\Ip::fromHex()

			'random_1'	=> substr($u[4], 4, 4),
			'random_2'	=> substr($u[4], 8)
			);
	}
	return $ar;
	/*
  $rez=Array();
    $u=explode("-",$uuid);cd50
    if(is_array($u)&&count($u)==5) {
        $rez=Array(
            'serverID'=>$u[0],
            'ip'=>clientIPFromHex($u[1]),
            'unixtime'=>hexdec($u[2]),
            'micro'=>(hexdec($u[3])/65536)
        );
    }
    return $rez;
	*/
} // end of func UuidParse


/**
 * Test how many uuid can this program generate per second
 *
 * @param	long	$num	Number of uuid generated in test, the more the result more currect.
 * @param	string	$file	If assigned, result will be write to this file, 1 uuid per line.
 */
function UuidSpeedTest($num = 100, $file = '') {
	if (!is_numeric($num))
		return '';
	else
		$num = round($num);
	// Start time
	$t_start = microtime(true);
	$i = 0;
	$s = '';
	while ($num > $i) {
		$s .= Uuid() . "\n";

The function Uuid() has been deprecated with message: Use Fwlib\Util\Uuid::gen()

		$i ++;
	}
	// End time
	$t_end = microtime(true);
	// Compute
	$t_used = round($t_end - $t_start, 4);
	$speed = round($num / $t_used);
	// Outputis_numeric
	ecl("$num UUID generated, cost $t_used second(s), average $speed/s.");

The function Ecl() has been deprecated with message: Use Fwlib\Util\Env::ecl()

	// Write to file ?
	if (!empty($file))
		file_put_contents($file, $s);
} // end of function UuidSpeedTest

?>

It is not recommended to use PHP's closing tag ?> in files other than templates.