diff options
Diffstat (limited to 'vendor/adodb/adodb-php/tests/testgenid.php')
-rw-r--r-- | vendor/adodb/adodb-php/tests/testgenid.php | 35 |
1 files changed, 35 insertions, 0 deletions
diff --git a/vendor/adodb/adodb-php/tests/testgenid.php b/vendor/adodb/adodb-php/tests/testgenid.php new file mode 100644 index 0000000..3310734 --- /dev/null +++ b/vendor/adodb/adodb-php/tests/testgenid.php @@ -0,0 +1,35 @@ +<?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; + } +} |