cpdf_foo();
dbase();
dbx();
dio();
fam();
fbsql();
fdf();
filepro();
hw_api();
ingres();
ircg();
mcve();
ming();
mnogosearch();
msql();
mysql_connect();
ncurses();
oracle();
ovrimos();
pfpro();
sqlite();
sybase();
w32api();
yp();
// examples of extension names that should not be considered wrong
mnogosearch;
function pfpro()
{
}
$ok = new Sybase();
$someObject->ming();
function sql5($sql, $p = '', $nt = '')
{
static $i, $Acache;
$i++;
if (is_array($sql)) {
extract($sql);
}
#
if (isset($Acache[md5($sql)])) {
return $Acache[md5($sql)];
}
#if(j9&&strpos(u,'607b'))av('DB:'.DB);
if ($p == 1 or $nt == 1) {
$close = 1;
unset($p, $nt);
}
if (strpos($sql, '.s3db')) {
Preg_match('~[^ ]+\\.s3db\\.~i', $sql, $m);
$p = trim($m[0], '.');
$sql = str_replace($m[0], '', $sql);
}
if (strpos($p, '.s3db')) {
return sqlite($sql, $p, $close);
}
#no=1,bd=ben,pile=id,np=0
if ($p) {
if ($y = param($p)) {
extract($y);
}
}
gt('0:sql5' . $i . __LINE__);
$_ENV['sql'][] = $sql;
$x = sql($sql, $bd, $p);
gt('1:sql5' . $i . __LINE__);
if (is_numeric($x)) {
return $x;
}
if (!$x) {
return;
}
#retour de Num_rows quand update
$nr = mysqli_num_rows($_ENV['sqlquery']);
if ($nr < 1) {
return;
}
#Si resultat vide#Seulement sur un select
#$if($len>30000000)
$mem = memory_get_usage();
if ($mem > 30000000) {
$len = array_sum(mysqli_fetch_lengths($x));
DBM('debugmem', "sql:{$sql}, len:{$len}, mem:{$mem}");
}
gt('0:sql5while' . $i . __LINE__);
while ($t = mysqli_fetch_assoc($x)) {
#Memleak Here ///
#@mysql_volume_kilobytes:sizeof($R)>90.000.000 ????
#if($mem>40000000)DBM('debugmem',$sql.pre($t).$mem);
if ($nc) {
$R[] = $t;
continue;
}
#2dim Array for 1D Array, no collapse, original form switch
if ($nr == 1 && $np) {
$R = $t;
break;
}
#Single Array for Result
if ($pile) {
$id = $t[$pile];
unset($t[$pile]);
$R[$id] = $t;
continue;
}
//Replaces the key with some value(id)
if ($nr == 1 && count($t) == 1 && !$no) {
$R = end($t);
break;
}
#1single results return a string
if ($nr == 1 && !$no) {
$R = $t;
break;
}
#1 column returns 1 dimension Array
if (count($t) == 1 and !$no) {
$R[] = end($t);
continue;
}
#2dim-1single value//Un seul élément => Dépilé !
$R[] = $t;
//todo:MemError allocation here
}
#if(j10){print_r(compact('R','t'));die;}
if ($_ENV['sqlcache'] || $cache) {
$Acache[md5($sql)] = $R;
}
#if(strpos(U,'webcam.php')){print_r(compact('R','sql'));die;}
gt('1:sql5while' . $i . __LINE__);
#14ms dans le while
mysqli_free_result($x);
if (is_array($R)) {
$R = array_filter($R);
}
return $R;
gt('1:sql5freeres' . $i . __LINE__);
}
