- 1
@filemtime($cache_f) < time()-(600+((integer)rand(-100,100)))
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+151
@filemtime($cache_f) < time()-(600+((integer)rand(-100,100)))
плавающий кеш? о_О
+151
//клас для отправления писем через smtp
//способ приминения
//функция хеадерс(ящик куда отправлять,ящик откуда отправляется,почтовик(пример @yandex.ru), тема письма)
//$headers = $post->headers($users[$i]."@yandex.ru",$users[$i]."@yandex.ru","@yandex.ru",$result['title']);
//функция отправка (текст письма, заголовок, ящик получателя, адрес отправителя,имя пользователя, пароль, домен почтовика(пример yandex.ru))
//$post->send($result_text,$headers,$users[$i]."@yandex.ru",$users[$i]."@yandex.ru",$users[$i],$pass[$i],"yandex.ru");
class mailer
{
function get_data($smtp_conn)
{
$data="";
while($str = fgets($smtp_conn,515))
{
$data .= $str;
if(substr($str,3,1) == " ") { break; }
}
return $data;
}
function headers($to,$from,$prefix,$zag)
{
$header="Date: ".date("D, j M Y G:i:s")." +0700\r\n";
$header.="From: <".$from.">\r\n";
$header.="X-Mailer: The Bat! (v3.99.3) Professional\r\n";
$header.="X-Priority: 3 (Normal)\r\n";
$header.="Message-ID: <172562218.".date("YmjHis").$prefix.">\r\n";
$header.="To: <".$to.">\r\n";
$header.="Subject: ".$zag."\r\n";
$header.="MIME-Version: 1.0\r\n";
$header.="Content-Type: text/html; charset=utf-8\r\n";
$header.="Content-Transfer-Encoding: 8bit\r\n";
return $header;
}
function send($text, $header, $to, $from, $login , $pass, $mailer)
{
$fin = new mailer;
$smtp_conn = fsockopen("smtp.".$mailer, 25,$errno, $errstr, 10);
$data = $fin->get_data($smtp_conn);
fputs($smtp_conn,"EHLO ".$mailer."\r\n");
$data = $fin->get_data($smtp_conn);
fputs($smtp_conn,"AUTH LOGIN\r\n");
$data = $fin->get_data($smtp_conn);
fputs($smtp_conn,base64_encode($login)."\r\n");
$data = $fin->get_data($smtp_conn);
fputs($smtp_conn,base64_encode($pass)."\r\n");
$data = $fin->get_data($smtp_conn);
fputs($smtp_conn,"MAIL FROM:".$from."\r\n");
$data = $fin->get_data($smtp_conn);
fputs($smtp_conn,"RCPT TO:".$to."\r\n");
$data = $fin->get_data($smtp_conn);
fputs($smtp_conn,"DATA\r\n");
$data = $fin->get_data($smtp_conn);
fputs($smtp_conn,$header."\r\n".$text."\r\n.\r\n");
$data = $fin->get_data($smtp_conn);
fputs($smtp_conn,"QUIT\r\n");
$data = $fin->get_data($smtp_conn);
}
}
клас для отправления писем через smtp
+151
public virtual Type GetFields() {
//Must be overridden!!!
return null;
}
public virtual Enum[] GetCompareFields() {
//Must be overridden!!!
return null;
}
Про абстракиные методы нам ещё не рассказывали :-D
+151
private function GetUnitType($unitType)
{
if($unitType)
if(!UnitType::Exist($unitType))
{
Debug::error("WebPartCommentsList:: UnitType не найден");
exit;
}
else
$this->UnitType = UnitType::GetUnitTypeId($this->UnitType);
}
проверка на существование сущности внутри класса, причём реально $unitType == $this->UnitType
писал ...
+151
foreach ($polzavateli as $polzavatel){
$i++;
echo $polzavatel[$i];
}
профессиональный обход массива :)
+151
// Защита от вставки HTML-кодов
function filter($string)
{
$string=stripslashes($string);
$string=ereg_replace("<","<",$string);
$string=ereg_replace(">",">",$string);
$string=ereg_replace('\\\"',""",$string);
$string=ereg_replace("!","!",$string);
$string=ereg_replace("\r","",$string);
$string=ereg_replace("\n","<BR>",$string);
$string=ereg_replace("%","%",$string);
$string=ereg_replace("^ +","",$string);
$string=ereg_replace(" +$","",$string);
$string=ereg_replace(" +"," ",$string);
$string=ereg_replace("\|"," ",$string);
return $string;
}
Из LS Guestbook (http://linesoft.org)
+151
<?php
$code = "<table> <tr><td>1</td></tr> <tr><td>2</td></tr> </table>";
$out_arr = array();
while($line = substr( ($code = substr($code, strpos($code, ($s = "<tr><td>")) + strlen($s))), 0,
($s = strpos($code, "</td></tr>"))) and $s and array_push($out_arr, $line) );
print_r($out_arr);
?>
лень было с регекспами заниматься ^_^
упрощеный вариант
+151
@$sel = $_POST["sel"]?$_POST["sel"]:$_GET["sel"];
из огромной кучи (продолжение следует)
+151
procedure TWorld.Update(dTime: Single);
var
i,j: integer;
temp: TVector2f;
begin
for i:=0 to Count-1 do
begin
if Bodyes[i]^.Static then break else
for j:=0 to Bodyes[i]^.Count-1 do
begin
Bodyes[i]^.AccumulateForces[j]:=Gravitation;
temp:=Bodyes[i]^.Position[j];
Bodyes[i]^.Position[j].x:=Bodyes[i]^.Position[j].x+
(Bodyes[i]^.Position[j].x-Bodyes[i]^.OldPosition[j].x)+
Bodyes[i]^.AccumulateForces[j].x*dTime*dTime;
Bodyes[i]^.Position[j].y:=Bodyes[i]^.Position[j].y+
(Bodyes[i]^.Position[j].y-Bodyes[i]^.OldPosition[j].y)+
Bodyes[i]^.AccumulateForces[j].y*dTime*dTime;
Bodyes[i]^.OldPosition[j]:=temp;
end;
end;
end;
Моделирование системы частиц через интегрирование Верлета
+151
Док = СоздатьОбъект("Документ.Документ1");
Док.ВыбратьДокументы(Дата1, Дата2);
Пока Док.ПолучитьДокумент()=1 Цикл
Док.ВыбратьСтроки();
Пока Док.ПолучитьСтроку() = 1 Цикл
Док2 = СоздатьОбъект("Документ.Документ2");
Док2.ВыбратьДокументы(Дата1,Дата2);
Сумма = 0;
Пока Док2.ПолучитьДокумент()=1 Цикл
Опер = СоздатьОбъект("Операция");
Если Опер.НайтиОперацию(Док2) = 1 Тогда
Опер.ВыбратьПроводки();
Пока Опер.ПолучитьПроводку() = 1 Цикл
Если (Опер.Кредит.Субконто(1) = Док.Контрагент) Тогда
Сумма = Сумма + Опер.Сумма;
КонецЕсли;
КонецЦикла;
КонецЕсли;
КонецЦикла;
КонецЦикла;
КонецЦикла;
Больше циклов по одним и тем же данным!