Лучший говнокод за всё время

Лучший говнокод

В номинации:

Лучший рейтинг
Самый комментируемый

За время:

PHP / Говнокод #463

+163.2

01
02
03
04
05
06
07
08
09
10

<html> 
<head> 
 <title>403 Forbidden</title> 
</head> 
<body> 
 
<p>Directory access is forbidden.</p> 
 
</body> 
</htm

Новый уникальный метод защиты директорий на сервере от сторонних посягательств... Использование .htacces, как видимо, уже не в моде..
В каждой "ЗАЩИЩЕННОЙ" папке лежит index.html файл с таким кодом....

guest, 27 Января 2009

Комментарии (11)

PHP / Говнокод #355

+28.6

1
2
3
4
5
6

function is_utf($str){
if(iconv("UTF-8","UTF-8",$str)==$str)
return true;
else
return false;
}

utf-8 или нет? :)

guest, 10 Января 2009

Комментарии (11)

Си / Говнокод #320

+20.2

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18

year = ORIGINYEAR; /* = 1980 */

while (days > 365)
{
    if (IsLeapYear(year))
    {
        if (days > 366)
        {
            days -= 366;
            year += 1;
        }
    }
    else
    {
        days -= 365;
        year += 1;
    }
}

Код часов в M$ Zune 30GB.

guest, 01 Января 2009

Комментарии (11)

Assembler / Говнокод #306

−232

1
2
3
4
5

push esp
push $00000101
mov eax,[$0044ee50]
mov eax,[eax] ;eax = 0
call eax

Вызывал функцию WSAStartup в дельфе, но забыл из какого она юнита. Хелп показал 2 пункта WSAStartup, не подумал тупо скопировал IdWinsock (вместо Winsock). Запускаю - access violation. В дебагере ctrl+c. Дельфя скомпилила так, что в любом случае вылетает аксес :)

guest, 29 Декабря 2008

Комментарии (11)

C# / Говнокод #298

+887.2

1
2
3
4
5
6
7
8

if (current_switch == true)
{
//вырезано
}
else if (current_switch == false)
{
//вырезано
}

Данный говнокод взят из журнала "ХАКЕР". Вот ссылка, http://www.xakep.ru/magazine/xs/071/076/1.asp

хакеры пля...=\

guest, 28 Декабря 2008

Комментарии (11)

C++ / Говнокод #247

−46.6

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39

switch (*p)
         {
            case '0': id += 0; break;
            case '1': id += 1; break;
            case '2': id += 2; break;
            case '3': id += 3; break;
            case '4': id += 4; break;
            case '5': id += 5; break;
            case '6': id += 6; break;
            case '7': id += 7; break;
            case '8': id += 8; break;
            case '9': id += 9; break;
            case 'a': case 'A': id += 10; break;
            case 'b': case 'B': id += 11; break;
            case 'c': case 'C': id += 12; break;
            case 'd': case 'D': id += 13; break;
            case 'e': case 'E': id += 14; break;
            case 'f': case 'F': id += 15; break;
            case 'g': case 'G': id += 16; break;
            case 'h': case 'H': id += 17; break;
            case 'i': case 'I': id += 18; break;
            case 'j': case 'J': id += 19; break;
            case 'k': case 'K': id += 20; break;
            case 'l': case 'L': id += 21; break;
            case 'm': case 'M': id += 22; break;
            case 'n': case 'N': id += 23; break;
            case 'o': case 'O': id += 24; break;
            case 'p': case 'P': id += 25; break;
            case 'q': case 'Q': id += 26; break;
            case 'r': case 'R': id += 27; break;
            case 's': case 'S': id += 28; break;
            case 't': case 'T': id += 29; break;
            case 'u': case 'U': id += 30; break;
            case 'v': case 'V': id += 31; break;
            case 'w': case 'W': id += 32; break;
            case 'x': case 'X': id += 33; break;
            case 'y': case 'Y': id += 34; break;
            case 'z': case 'Z': id += 35; break;
         }

считаем нечто типа хэша. захотим изменить алгоритм, сделав вместо сложения - ксор, будем фаница реплейсом.
источник http://www.winsim.com/diskid32/diskid32.cpp
там же красивые переменные int ijk = 0;

guest, 23 Декабря 2008

Комментарии (11)

Perl / Говнокод #138

−379.3

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27

sub pfexec { args "pfexec", @_ unless $1.$2 eq "pfexec";
  local ( $_, $lp, @rep ) = @_; $lp ||= 1;
  die 'Command string must not contain $$ sequences' if m/\$\$/o;
  1 while s/\(([^()]*)\)/'$$'.push(@rep,$1)/eo;
# print $_,"REP:\n","=>",join( "\n=>", @rep),"\n";
  unshift @rep, ""; s/\s+/ /g;

LOOP: while ( $lp-- ) {
        foreach ( split ";" ){
          my @cmd = split " "; $_ = shift @cmd; last unless m/^(\w{2})(\w+)/o;
CMD:  foreach (@cmd){
                1 while s/\$\$(\d+)/'('.$rep[$1].')'/eo; s/^\(\s*(.*?)\s*\)$/$1/so;
                s/^\%(\d+)->(\w+)=//    and ${$HASH[$1]} ->{$2} = $_ and next;
                /^\%(\d+)->(\w+)/               and $_ = ${$HASH[$1]} ->{$2} and redo CMD;

                /^%%(\d+)/      and $_ = $HASH[$1] || ( $HASH[$1] = \{} ) and next;
                /^\%(\d+)/      and $_ = ${$HASH[$1]} and next;
                /^\#\#(\d+)/ and $_ = $CHAN[$1] || ( $CHAN[$1] = \{} ) and next;
                /^\#(\d+)/      and $_ = ${$CHAN[$1]} and next;
          }
          $_ = $::control{$1} && $::control{$1}{$2};
          s/\^(\d+)/$cmd[$1-1]/geo and print "Expanded to: $_\n"
                and pfexec( $_ ) if !ref;
          args $1.$2, @cmd and eval { $_->(@cmd) } if "CODE" eq ref;
          last LOOP if $@;
        }
  }

Так пишет мой коллега

guest, 12 Декабря 2008

Комментарии (11)

C# / Говнокод #117

+27

1
2
3
4
5
6
7
8

if (Monitor.TryEnter(this))
            {
                ...
            }
            else
            {
                // do not do anything
            }

guest, 12 Декабря 2008

Комментарии (11)

PHP / Говнокод #107

−37.4

1

<?php }}}}}}} ?>

Самое яркое впечатление от кода...

guest, 11 Декабря 2008

Комментарии (11)

Говнокод: по колено в коде.