Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
Всего: 73
+168
Функция Антимата
<?php
//Маты записываёте в antmat.dat
function antimat($msg) {
if (file_exists("antimat.dat")) {
$mat = file_get_contents("antimat.dat");
$arr_mat = explode("|",$mat);
foreach($arr_mat as $value) {
if($value != "") {
$msg = preg_replace("|$value|iu","***",$msg);
}}}
return $msg;
}
?>
И заходишь на любой форум про похапе
@
И копируешь на говнокод всю тему "полезные функции"
7ion,
30 Августа 2011
+154
<?php
function crypt_apr1_md5($plainpasswd) {
$salt = substr(str_shuffle("abcdefghijklmnopqrstuvwxyz0123456789"), 0, 8);
$len = strlen($plainpasswd);
$text = $plainpasswd.'$apr1$'.$salt;
$bin = pack("H32", md5($plainpasswd.$salt.$plainpasswd));
for($i = $len; $i > 0; $i -= 16) { $text .= substr($bin, 0, min(16, $i)); }
for($i = $len; $i > 0; $i >>= 1) { $text .= ($i & 1) ? chr(0) : $plainpasswd{0}; }
$bin = pack("H32", md5($text));
for($i = 0; $i < 1000; $i++) {
$new = ($i & 1) ? $plainpasswd : $bin;
if ($i % 3) $new .= $salt;
if ($i % 7) $new .= $plainpasswd;
$new .= ($i & 1) ? $bin : $plainpasswd;
$bin = pack("H32", md5($new));
}
for ($i = 0; $i < 5; $i++) {
$k = $i + 6;
$j = $i + 12;
if ($j == 16) $j = 5;
$tmp = $bin[$i].$bin[$k].$bin[$j].$tmp;
}
$tmp = chr(0).chr(0).$bin[11].$tmp;
$tmp = strtr(strrev(substr(base64_encode($tmp), 2)),
"ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/",
"./0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz");
return "$"."apr1"."$".$salt."$".$tmp;
}
?>Кручу-верчу, запутать хочу!
7ion,
30 Августа 2011
+161
<?php
header('content-type: application/x-javascript; charset=windows-1251');
function utf8win1251($s){
$out=""; $c1=""; $byte2=false;
for ($c=0;$c<strlen($s);$c++){
$i=ord($s[$c]); if ($i<=127) $out.=$s[$c];
if ($byte2) { $new_c2=($c1&3)*64+($i&63); $new_c1=($c1>>2)&5;
$new_i=$new_c1*256+$new_c2;
if ($new_i==1025) $out_i=168; else
if ($new_i==1105) $out_i=184; else $out_i=$new_i-848;
$out.=chr($out_i); $byte2=false; }
if (($i>>5)==6) {$c1=$i;$byte2=true; } }
return $out; }
$src = file_get_contents("http://letopisi.ru/index.php/%D0%A8%D0%B0%D0%B1%D0%BB%D0%BE%D0%BD:%D0%97%D0%BD%D0%B0%D0%B5%D1%82%D0%B5_%D0%BB%D0%B8_%D0%B2%D1%8B");
$tmp = preg_replace('/.*<ul><li>(.*)<\/ul>.*<div class="printfooter">.*/s', '$1', $src);
$tmp = trim(preg_replace('/href="/', 'href="http://letopisi.ru', $tmp));
$matches = explode('</li>', $tmp);
if (sizeof($matches) > 1) {
$trans = Array("\x0D" => "", "\x0A" => " ");
do {
$quote = trim($matches[rand(0, sizeof($matches)-2)]);
} while (empty($quote));
$quote = str_replace('<li>', '', utf8win1251(strtr($quote, $trans)));
$quote = preg_replace('/<div class="thumb.*<\/div>/', '', $quote);
$quote = str_replace('"', '\"', $quote);
print 'document.write("' . $quote . '");';
}
?>
Аа, блин, надо было сразу все кидать.
Нужна возможность удалять свои коды в течение 10 минут.
7ion,
25 Августа 2011
+163
<?php
header('content-type: application/x-javascript; charset=windows-1251');
// Здесь сам скрипт
print 'document.write("' . $quote . '");';
?>
А вот до такого еще додуматься надо.
http://letopisi.ru/index.php/Знаете-ли-что%3F_скрипт
7ion,
25 Августа 2011
+157
function utf8win1251($s){
$out=""; $c1=""; $byte2=false;
for ($c=0;$c<strlen($s);$c++){
$i=ord($s[$c]); if ($i<=127) $out.=$s[$c];
if ($byte2) { $new_c2=($c1&3)*64+($i&63); $new_c1=($c1>>2)&5;
$new_i=$new_c1*256+$new_c2;
if ($new_i==1025) $out_i=168; else
if ($new_i==1105) $out_i=184; else $out_i=$new_i-848;
$out.=chr($out_i); $byte2=false; }
if (($i>>5)==6) {$c1=$i;$byte2=true; } }
return $out; }
Я ничо не понял, но это круто.
http://letopisi.ru/index.php/Знаете-ли-что%3F_скрипт
7ion,
25 Августа 2011
−179
#count pages
my $counter; my $pagescount = 0; my $pagesstr;
for (my $i = 0; $i <= $count; $i++)
{
if ($counter == POSTS_PER_PAGE)
{
my $a,$b; if ($pagescount == $pagenum) { $a = "["; $b = "]"; } else { $a = ""; $b = ""; }
$pagesstr = $pagesstr."$a<a href=\"wakaba.pl?task=mpanel&admin=$admin&page=$pagescount\">".($pagescount +1)."</a>$b" if ($pagescount == 0);
$pagesstr = $pagesstr.", $a<a href=\"wakaba.pl?task=mpanel&admin=$admin&page=$pagescount\">".($pagescount +1)."</a>$b" if ($pagescount != 0);
$pagescount++; $counter = 0;
} else { $counter++; }
}Вот такой веселый код пишут программисты дватиреча и на этом этот самый имиджборд и работает.
7ion,
05 Августа 2011
+151
elseif (array_key_exists(pathinfo($_SERVER['HTTP_HOST'], PATHINFO_EXTENSION), $lang_array)) {
$language = pathinfo($_SERVER['HTTP_HOST'], PATHINFO_EXTENSION);
}
else
$language = 'en';
Из того же проекта, где зародился шаблонизатор.
Минималистичный файл-хостинг, который все решает за хозяина.
Конфиг - только папка хранения файлов и макс. объем.
А язык он определяет сам. По доменному имени. Каждый раз при обращении к странице.
7ion,
23 Июня 2011
+155
// Функция подключения файлов шаблонов -----------------------------------------------------------------
function tpl_include($filepath, $title = '', $content = '') {
global $lang, $lang_array;
$tpl_body = str_replace("\n", '', file_get_contents($filepath));
$tpl_body = preg_replace('#\{loop (.*?)\}(.*?)\{\/loop\}#i', "\nEOL;\nforeach (\\1 as \$var=>\$val) echo <<<EOL\n\\2\nEOL;\necho <<<EOL\n", $tpl_body);
$tpl_body = preg_replace('#\{const (.*?)\}#i', "\nEOL;\necho \\1;\necho <<<EOL\n", $tpl_body);
$to_eval = "echo <<<EOL\n".$tpl_body."\nEOL;\n";
eval($to_eval);
}
// -----------------------------------------------------------------------------------------------------
По следам http://govnokod.ru/5658.
Шаблонизатор этот жив и кочует из проекта в проект.
Можно ссылаться на переменные из массива $lang, где хранится локализация и на $title и $content. Вот так - {$title}.
Можно ссылаться на любые константы. Например, {const ROOT_PATH}.
Можно делать цикл {loop $array}{/loop}, где внутри доступны переменные {$var} и {$val}.
Полностью избавляет от шорт-тегов, которые скоро уже и уберут из похапе.
Работает лишь чуть медленнее include с шорт-тегами (0.8 против 1.2 на 10к прогонов) и, разумеется, быстрее Смарти.
При необходимости в каком-то проекте в чем-то еще - можно легко добавить.
В общем - изящное вонючее решение.
7ion,
23 Июня 2011
+176
/**
* получить перечень экзаменов на указанную дату
* @global GathererDB $db
* @param string $examdate must be $db->qstr()'ed
* @return array
*/
function examsOnDate($examdate)
{
global $db;
ob_start();
?>
select distinct e.EXAMID from EXAMS e
inner join STATIONEXAMS se on se.EXAMFK=e.SYS_GUID
inner join PARTICIPANTSEXAMS pe on pe.EXAMFK=e.SYS_GUID
where e.EXAMDATE=<?php print $examdate; ?>
<?php
$sql = ob_get_clean();
$exams = $db->getcol($sql);
return $exams;
}
Из скрипта для обслуживания сайта ЕГЭ.
Изумительное применение буфера.
7ion,
18 Июня 2011
+136
<html>
<head><meta http-equiv="Content-type" content="text/html; charset=UTF-8"></head>
<script type="text/javascript" encoding="UTF-8">
top.location.href = 'http://rghost.ru/10160511';
</script>
</html>
Вот так на ргхосте юзера перекидывают к загруженному файлу.
ЖС отключен? Заголовок Location? Не, не знаем.
7ion,
09 Июня 2011
Follow us!