File: testgenid.php

package info (click to toggle)
libphp-adodb 5.15-1%2Bdeb8u1
  • links: PTS, VCS
  • area: main
  • in suites: jessie
  • size: 3,440 kB
  • ctags: 10,457
  • sloc: php: 34,120; xml: 117; makefile: 34; sql: 32; sh: 22
file content (36 lines) | stat: -rw-r--r-- 766 bytes parent folder | download | duplicates (12)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
<?php
/*
	V4.50 6 July 2004 
	
	Run multiple copies of this php script at the same time
	to test unique generation of id's in multiuser mode
*/
include_once('../adodb.inc.php');
$testaccess = true;
include_once('testdatabases.inc.php');

function testdb(&$db,$createtab="create table ADOXYZ (id int, firstname char(24), lastname char(24), created date)")
{
	$table = 'adodbseq';
	
	$db->Execute("drop table $table");
	//$db->debug=true;
	
	$ctr = 5000;
	$lastnum = 0;
	
	while (--$ctr >= 0) {
		$num = $db->GenID($table);
		if ($num === false) {	
			print "GenID returned false";
			break;
		}
		if ($lastnum + 1 == $num) print " $num ";
		else {
			print " <font color=red>$num</font> ";
			flush();
		}
		$lastnum = $num;
	}
}
?>