#----------------------------------------------------------------------------- $Result = $Link->Query(SPrintF("SELECT SUM(`bonus`) as `Balance` FROM `partner` WHERE `userid` = %u", $dUser['ID'])); if (Is_Error($Result)) { return $Link->GetError(); } #----------------------------------------------------------------------------- $dBonuses = MySQL::Result($Result); if (Is_Error($dBonuses)) { return ERROR | @Trigger_Error(500); } #----------------------------------------------------------------------------- $dBonuse = Current($dBonuses); #----------------------------------------------------------------------------- $Contract->AddChild(new Tag('Balance', Round($Result['Balance'] * $Course))); #----------------------------------------------------------------------------- $Contracts->AddChild($Contract); #----------------------------------------------------------------------------- $User->AddChild($Contracts); #----------------------------------------------------------------------------- $Users->AddChild($User); } #------------------------------------------------------------------------------- $Dump = $Users->ToXMLString(); #------------------------------------------------------------------------------- $IsWrite = IO_Write('/work/ClientExec.xml.gz', GzEncode($Dump), TRUE); if (Is_Error($IsWrite)) { return ERROR | @Trigger_Error(500); } #------------------------------------------------------------------------------- return 'Ok'; #-------------------------------------------------------------------------------
case 'array': $Result = JSON_Encode($Result); case 'string': #--------------------------------------------------------------------------- if (!Headers_Sent()) { #------------------------------------------------------------------------- list($Micro, $Seconds) = Explode(' ', MicroTime()); #------------------------------------------------------------------------- Header(SPrintF('Waiting-Time: %01.2f sec', (double) $Micro + (double) $Seconds - START_TIME)); #------------------------------------------------------------------------- $Size = MB_StrLen($Result, 'ASCII'); #------------------------------------------------------------------------- if ($Size > 30720 && Preg_Match('/gzip/', (string) @$_SERVER['HTTP_ACCEPT_ENCODING'])) { #----------------------------------------------------------------------- Header(SPrintF('Real-Content-Length: %u', $Size)); #----------------------------------------------------------------------- $Result = GzEncode($Result); #----------------------------------------------------------------------- Header('Content-Encoding: gzip'); Header(SPrintF('Content-Length: %u', MB_StrLen($Result, 'ASCII'))); } } #--------------------------------------------------------------------------- echo $Result; break; default: # No more... } #------------------------------------------------------------------------------- return TRUE; #-------------------------------------------------------------------------------
$Ticket->AddChild($Messages); #--------------------------------------------------------------------------- $Tickets->AddChild($Ticket); } #----------------------------------------------------------------------------- $User->AddChild($Tickets); #----------------------------------------------------------------------------- $Users->AddChild($User); } #------------------------------------------------------------------------------- $Dump = $Users->ToXMLString(); #------------------------------------------------------------------------------- $Tmp = System_Element('tmp'); if (Is_Error($Tmp)) { return ERROR | @Trigger_Error(500); } #------------------------------------------------------------------------------- $File = SPrintF('Bpanel[%s%s].xml.gz', Md5($_SERVER['REMOTE_ADDR']), Date('d.m.Y')); #------------------------------------------------------------------------------- $IsWrite = IO_Write(SPrintF('%s/files/%s', $Tmp, $File), GzEncode($Dump), TRUE); if (Is_Error($IsWrite)) { return ERROR | @Trigger_Error(500); } #------------------------------------------------------------------------------- echo SPrintF('<A href="/GetTemp?File=%s&Name=Bpanel.xml.gz&Mime=application/gzip">[Сохранить файл базы данных]</A>', $File); #------------------------------------------------------------------------------- echo <<<EOD </BODY> </HTML> EOD; #-------------------------------------------------------------------------------