function SelectWQ(){
$errh = 'DBAL::SelectWQ';
$this->mlog($errh,ML_DEBUG_CALL);
if (!$this->IsConnected()){
$this->mlog("$errh: No connection");
return false;
}
$argv = func_get_args();
if (count($argv) < 1){
$this->mlog("$errh: Arguments requered");
return false;
}
$this->DropStatement();
$format = array_shift($argv);
$qtext = sprintf($format,?????????????????);
$this->mlog("$errh: $qtext",ML_DEBUG_VARS);
if (!($this->_DBAL_STH = mysql_query($qtext))){
$this->mlog("$errh: Query failed: ".mysql_error());
return false;
}
return true;
}
Да? А вот это что такое?В PHP отсутствую типизизирующие префиксы.
(int), (integer) - cast to integer
(bool), (boolean) - cast to boolean
(float), (double), (real) - cast to float
(string) - cast to string
(array) - cast to array
(object) - cast to object

$qtext = sprintf("SELECT %s,%s FROM %s WHERE %s='%s' ORDER BY %s",
$this->Quote($this->_vc_config['FID']),
$this->Quote($this->_vc_config['FFLG']),
$this->Quote($this->_vc_config['TABLE']),
$this->Quote($this->_vc_config['FOWN']),
$this->Quote($gid),
$this->Quote($this->_vc_config['FID']));
if (!$db->Select($qtext)){ return false; }
if (!$this->SelectWQ("SELECT %s,%s FROM %s WHERE %s='%s' ORDER BY %s",
$this->_vc_config['FID'],$this->_vc_config['FFLG'],
$this->_vc_config['TABLE'],$this->_vc_config['FOWN'],
$gid,$this->_vc_config['FID']))
{
return false;
}
Меня возмутил сам факт утверждения об отсутствии таких префиксов в PHP.Хоть бы пробовали...

$format = array_shift($argv);
$argv = array_map('mysql_escape_string',$argv);
array_unshift($argv,$format);
$qtext = call_user_func_array('sprintf',$argv);
return $this->Select($qtext);

# Perl examples
($a,$b,$c,$d) = @_;
@array = ($a,$b,$c,$d);
@array = (localtime)[1,2,3,4];
@array = (@my_array,$a,$b,@your_array,$c,$d);
map { $self->Quote($_) } @argv;
# etc...
function QueryWQ(){
$argv = func_get_args();
$format = array_shift($argv);
$argv = array_map('mysql_escape_string',$argv);
array_unshift($argv,$format);
return $this->Query(call_user_func_array('sprintf',$argv));
}
sub QueryWQ{
($self,$format,@argv) = @_;
return $self->Query(sprintf($format,map { $self->Quote($_) } @argv));
}