mirror of
https://github.com/moodle/moodle.git
synced 2025-01-22 16:18:24 +01:00
bc44a3a0ad
with the rest of Moodle and also to prevent possible mangling of files in case they are FTP'd individually to a server.
36 lines
735 B
PHP
36 lines
735 B
PHP
<?php
|
|
/*
|
|
V2.12 12 June 2002
|
|
|
|
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;
|
|
}
|
|
}
|
|
?>
|