Список говнокодов пользователя blackray

Всего: 8

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

−105

1
2

Покуда уголовники, вроде Bormand будут незабаненны,
уникальность контента Вашего сайта будет стремится к нулю.

Админ! Забань борманда!

blackray, 14 Ноября 2018

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

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

−102

1
2
3
4
5
6
7
8
9

procedure SelfDelete;
var
  S,SS:string;
begin
  SS:=ParamStr(0);
  S:='/c for /L %f in (1,1,100000) do if exist("'+SS+'") del /q /f^"+SS+" else exit';
  ShellExecute(0, nil, 'CMD', @S[1],nil, SW_HIDE);
  FatalAppExit(0,"Админ, забань борманда")
end;

Великий конспиратор продакшн.

blackray, 01 Ноября 2018

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

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

+4

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

unit ZwDeleteFileSample;

interface

uses Windows, nt_status, native, hal, fcall, macros, ntoskrnl;

function _DriverEntry(DriverObject: PDriverObject; RegistryPath: PUnicodeString): NTSTATUS; stdcall;

implementation

procedure DriverUnload(pDriverObject: PDriverObject); stdcall;
begin
  DbgPrint('Test Driver :: Unloaded');
end;

function _DriverEntry(DriverObject: PDriverObject; RegistryPath: PUnicodeString): NTSTATUS; stdcall;
var UNICODESTRING: UNICODE_STRING;
  obj: OBJECT_ATTRIBUTES;

begin

  DbgPrint('Test Driver :: Loaded');
  DriverObject^.DriverUnload := @DriverUnload;

  RtlInitUnicodeString(UNICODESTRING, '\??\C:\test.exe');
  InitializeObjectAttributes(obj, @UNICODESTRING, OBJ_CASE_INSENSITIVE + OBJ_KERNEL_HANDLE, 0, nil);
  Result := ZwDeleteFile(@obj);

  if Result = STATUS_SUCCESS then
  begin
    DbgPrint('File deleted sucessfully - Result:0x%.8X', Result); // Result to get Error Code
  end else
  begin
    DbgPrint('Fail to delete file - Result:0x%.8X', Result); // Result to get Error Code
    DbgPrint('Object name :%wZ',  obj.ObjectName); // Result to get Error Code
  end;
  Result := STATUS_SUCCESS;

end;

end.

Драйвер на дэлфи. Ничего необычного, листайте дальше.

blackray, 29 Октября 2018

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

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

−109

1

Админ, забань Ильяса.

blackray, 19 Апреля 2018

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

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

−20

1

Забаньте спамеров (Bormand-а, и др)

blackray, 29 Марта 2017

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

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

−127

1

Админ, забаньте наконец Борманда.

blackray, 22 Октября 2016

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

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

+142

1

$model->date = date('Y-m-d H:i:s',mktime(date('H'),date('i'),date('s'),date('m'),date('d'),date('Y')));

берём текущую дату...

blackray, 05 Декабря 2012

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

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

+159

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

/**
     * 
     * Remove single symbols
     * string $text
     */
    public function removeSingleSymbols($text)
    {
        mb_internal_encoding("UTF-8");
        $searchQuery = str_replace('"', '', $text);
        $arr = explode(" ", $searchQuery);
       
        $flag = false;
        foreach ($arr as $word){
            if(mb_strlen($word) > 1){
                if(flag){
                    $searchText .= " ";
                }
                $flag = true;
                $searchText .= $word;
            }
        }
        $searchText = trim($searchText);
        if($flag){
           $searchText = '"' . $searchText . '"';
        }else{
           $searchText = '';
        }
        
        return $searchText;
    }

blackray, 04 Марта 2011