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

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

В номинации:

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

За время:

Java / Говнокод #8375

+80

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

@Deprecated
    private byte getLoByte(int i) {
        byte ret = 0x00;
        String hex = Integer.toHexString(i);
        int length = hex.length();
        if (length == 1) {
            ret = Integer.valueOf(hex.substring(length - 1), 16).byteValue();
        } else if (length >= 2) {
            ret = Integer.valueOf(hex.substring(length - 2), 16).byteValue();
        }
        return ret;
    }

    @Deprecated
    private byte getHiByte(int i) {
        String hex = Integer.toHexString(i);
        byte ret = 0x00;
        int length = hex.length();
        if (length > 3) {
            ret = Integer.valueOf(hex.substring(length - 4, length - 2), 16).byteValue();
        } else if (length == 3) {
            ret = Integer.valueOf(hex.substring(length - 3, length - 2), 16).byteValue();
        }
        return ret;
    }

Вытаскивание старшего и младшего байтов числа из последних одного или двух байтов

as1an, 01 Ноября 2011

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

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

+1000

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

int i = 0;

init1();
++i;
if (!isFailed1()) goto clean_up;

init2();
++i;
if (!isFailed2()) goto clean_up;

init3();
++i;
if (!isFailed3()) goto clean_up;

goto end:

clean_up:

switch(i) {
  case 3:
    cleunUp3();
  case 2:
    cleunUp2();
  case 1:
    cleunUp1();
}

end:

Он думает, что RAII не нужен.

AnimeGovno-_-, 22 Октября 2011

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

Куча / Говнокод #8258

+146

01
02
03
04
05
06
07
08
09
10

Вот (бывает) (посмотришь на то, какой бред пишут люди с серьезным лицом)
И понимаешь какой бардак у тебя в голове.
Если ты это не осознавал, то можешь забыть какой сегодня день.
А это неделя лиспа на говнокод.ру

Как известно, Лисп обратно-совместим с предприятийными системами (1С, Delphi)
А также Лисп предоставляет простейший тип - список (двусторонний стек)
Поэтому на лиспе рассмотрю решение моей задачи про забывчивый стек на лиспе.
Будут построены всевозможные решения данной задачи, причем с константной сложностью
Лисп. Стек.  Два.

А знаете ли вы, что лисп позаимствовал зубодробительную систему предикатов из пролога?

alexoy, 20 Октября 2011

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

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

+159

1
2
3
4
5

if (!empty($query['date_act_start']) && !empty($query['date_act_end'])) {
                if ($query['date_act_start'] && $query['date_act_end']) {
                    $sphinx->setFilterRange('startdate', $query['date_act_start'], $query['date_act_end']);
                }
            }

Вот такая проверка встретилась. Железная =)

shatzibitten, 20 Октября 2011

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

Куча / Говнокод #8240

+121

1
2
3
4
5

$ df -k /
/                      (/dev/vgroot/lvol3     ) :  2083856 total allocated Kb
                                                   1701112 free allocated Kb
                                                    382744 used allocated Kb
                                                        18 % allocation used

HP-UX. вывод df (disk free) тулзы. почти все тратят минут пять на чтение вывода, пытаясь понять смысл "free allocated" и ту тонкую разницу которая отличает это выражение от "used allocated".

Dummy00001, 19 Октября 2011

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

1C / Говнокод #8200

−155

1
2
3
4
5
6

Девушкой, которую я любил
Оказался педофил
Он на 1С все показал
И научил
Теперь я здесь настраиваю все
Прямо как во сне

Александр Сергеевич Пушкин-Блок

alexoy, 14 Октября 2011

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

Куча / Говнокод #8187

+136

01
02
03
04
05
06
07
08
09
10

(defparameter *pcl-files-map*
  '#(("introduction-why-lisp"
      "Введение: почему Lisp?" 
      "%D0%B2%D0%B2%D0%B5%D0%B4%D0%B5%D0%BD%D0%B8%D0%B5%D0%BF%D0%BE%D1%87%D0%B5%D0%BC%D1%83lisp") ; <- WTF???
    
     ("lather-rinse-repeat-a-tour-of-the-repl"
      "Намылить, смыть, повторить: знакомство с REPL"
      "%D1%82%D1%83%D1%80%D0%B2repl")   ; <- WTF???
      ;; ...
))

Practical Common Lisp такой Practical.
https://github.com/archimag/rulisp/blob/master/src/pcl.lisp

Матёрые лисперы просветите, если я что-то не понимаю: неужели хранение ссылок в исходном коде в таком виде чем-то обосновано?

roman-kashitsyn, 13 Октября 2011

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

VisualBasic / Говнокод #8157

−97

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

Private Sub CommandButton1_Click() 'необходимо
    For q = 2 To 500
    For w = 25 To 34
    For e = 3 To 13
        If Лист1.Cells(q, 4) = "Затрачено [...]" Or Лист1.Cells(q, 4) = "Затрачено на [...]" Then
        If Лист1.Cells(q, 7) = Лист11.Cells(w, 1) Then
        If Лист1.Cells(q, 6) = Лист11.Cells(3, e) Then
            Лист11.Cells(w, e) = Лист11.Cells(w, e) + Лист1.Cells(q, 5)
            Rem Лист1.Cells(q, 11) = 151
        End If
        End If
        End If
    Next
    Next
    Next
End Sub

...

TextBox4.Value = CLng(cdop1 * (TextBox15.Value * Лист5.Cells(10, 11)) + cdop2 * (TextBox15.Value * Лист5.Cells(10, 11))) + CLng(TextBox53.Value)

...

Лист1.Cells(a, 45) = TextBox32.Value ' отсрочка

If IsDate(TextBox58.Value) And IsDate(TextBox62.Value) Then
Лист1.Cells(a, 46) = CDate(TextBox62.Value) - CDate(TextBox58.Value) ' прошло дней
End If
Лист1.Cells(a, 47) = TextBox55.Value ' зарплата
Лист1.Cells(a, 48) = TextBox63.Value ' штраф

If CheckBox6.Value = True Then
Лист1.Cells(a, 49) = 1 ' комплект
Else
Лист1.Cells(a, 49) = 0
End If

Ну и так далее.

Беда, коль пироги начнёт печи сапожник, а макросы писать бухгалтер.

lucidfox, 11 Октября 2011

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

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