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

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

В номинации:

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

За время:

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

−334

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

DECLARE FUNCTION ping$ (host$)
TYPE HostData
  ip AS STRING * 15
  nm AS STRING * 15
  mac AS STRING * 16
END TYPE
DIM host(255) AS HostData

CLS

FOR i = 1 TO 255
 k$ = INKEY$: IF k$ = CHR$(27) THEN EXIT FOR
 s$ = "192.168.54." + MID$(STR$(i), 2)
 CLS
 SHELL "ping " + s$ + " -n 1 -w 300"
 IF SCREEN(4, 1) = ASC("О") THEN k = k + 1: host(k).ip = s$
NEXT i
FOR i = 1 TO k
 CLS
 SHELL "nbtstat -A " + host(i).ip
 s$ = ""
 FOR n = 5 TO 19
  s$ = s$ + CHR$(SCREEN(9, n))
 NEXT n
  FOR n = 9 TO 20
  IF SCREEN(n, 5) = 32 THEN mcol% = n + 1: EXIT FOR
  NEXT n
 s$ = LTRIM$(s$)
 host(i).nm = s$
 s$ = ""
  FOR n = 19 TO 35
   s$ = s$ + CHR$(SCREEN(mcol%, n))
  NEXT n
 s$ = LTRIM$(s$)
 host(i).mac = s$
NEXT i
OPEN "d:\ipreport.txt" FOR OUTPUT AS #1
 FOR i = 1 TO k
  PRINT #1, host(i).ip, host(i).nm, host(i).mac
 NEXT i
CLOSE #1

FUNCTION ping$ (host$)
flag% = 0
CLS
IF ln% = 0 THEN ln% = 300
SHELL "ping 192.168.0." + host$ + " -n 1 -w " + STR$(ln%)
FOR i = 1 TO 10
t$ = CHR$(SCREEN(4, 42 + i))
IF t$ = "м" OR t$ = " " THEN EXIT FOR
sum$ = sum$ + t$
NEXT i
IF i > 1 THEN flag% = 1
ping$ = sum$
END FUNCTION

Фрагмент говнокода 10-летней давности, написанного мною на QuickBasic 4.5

Тулза должна доставать информацию о компах из сетки и класть в файл отчета. Делается это при помощи вызовов SHELL и последующем считывании результатов с экрана! Воистинну говноспособ, но какая изобретательность! Сам себе удивляюсь

Форматирование сохранено.

guest, 16 Марта 2009

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

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

+163.9

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

$max_Id_sql = mysql_query ( "SELECT max(obj_id) FROM objs" );	//obj_id в БД примерно такие: 1, 2, ..., 70, 80, 124, 4101, 4162, 4931
$row = mysql_fetch_row ( $max_Id_sql );
for($i = 0; $i <= $row [0]; $i ++) {			//здесь получаем 4932 прохода, из них нам нужны не более 80 штук
	if (array_key_exists ( $i, $sizes )) {		//массив sizes содержит от 1 до 80 элементов 
		if ($sizes [$i]) {			//видимо, автор не знал про foreach
			...
			$result = mysql_query ( "SELECT obj_name,obj_size,obj_parent FROM objs WHERE obj_id='$i'" );
			//Для каждого $i выполняется отдельный SQL-запрос. Хорошо хоть, что он не 4932 раза выполняется в этом цикле
			$objArray = mysql_fetch_array ( $result );
			...
		}
	}
}

Комментарии мои.
Код - неизвестного программиста, работавшего до меня.

guest, 15 Марта 2009

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

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

+130.3

1
2
3

void View1(){
     SaveResult1();	
}

guest, 13 Марта 2009

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

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

+167.2

1
2
3
4

if (!!Flag === true)
{
 ...
}

guest, 13 Марта 2009

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

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

−305.9

1
2
3
4
5

my @idx = map{ (split(/\|/, $_))[0] || () }
	    map{ io($_)->chomp->slurp } 
		io($boardsdir)->filter(sub{ my $f = fileparse($_->name, qr/.txt/i);
					    $_->name =~ /\.txt$/i and grep{$_ eq $f} @board;
					})->all_files;

Так бывает, когда хочется одним предложением сказать все.

guest, 07 Марта 2009

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

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

+152

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

<?php
 mysql_connect  ($server, $username, $password);
//Данные на базу
$lnk = mysql_connect('localhost', 'mysql_user', 'mysql_password')
       or die ('Not connected : ' . mysql_error());
mysql_select_db('primecms_db', $lnk) or die ('Can\'t primecms_db foo : ' . mysql_error());


class insert{
	var $pid, $alias, $text, $position, $status, $create_time, $modify_time;
}

function con_in($pid, $alias, $text_en, $text_ru, $text_descr, $position, $status, $create_time, $modify_time){
	$res = new insert;
	$res->pid=$pid;
	$res->alias=addslashes($alias);
	$res->text='<p>'.addslashes($text_en).'</p>\r\n<p>'.addslashes($text_ru).'</p>\r\n<p>'.addslashes($text_descr).'</p>';
	$res->position=$position;
	$res->status=$status;
	$res->create_time=$create_time;
	$res->modify_time=$modify_time;
	return $res;
}

if ($_POST['send']){
	$con =  con_in($_POST['pid'],$_POST['alias'],$_POST['text_en'],$_POST['text_ru'],$_POST['text_descr'],$_POST['position'],$_POST['status'],$_POST['create_time'],$_POST['modify_time']);
	mysql_query("INSERT INTO e118_glossary_items (`id`, `pid`, `alias`, `text`, `position`, `status`, `create_time`, `modify_time`) VALUES (".$con->pid.",".$con->alias.",".$con->text.",".$con->position.",".$con->status.",".$con->create_time.",".$con->modify_time.")");
}
?>

<form name="" action="" method="post">
Pid<input name="pid" size=30 type="text" value=""><br />
Allias<input name="allias" size=30  type="text" value=""><br />
text_en<input name="text_en" size=30 type="text" value=""><br />
text_ru<input name="text_ru" size=30  type="text" value=""><br />
text decr<textarea name="text_descr" rows=7 cols=50 wrap="off"></textarea><br />
position<input name="position" size=30  type="text" value=""><br />
status<input name="status" size=30  type="text" value="">    <br />
create_time<input name="create_time" size=30  type="text" value=""><br />
modify_time<input name="modify_time" size=30  type="text" value=""><br />
<input type="submit" value="Send" name="send"><br />
</form>

для инсёрта
назови insert.php
подправь //Данные на базу

guest, 04 Марта 2009

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

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

+137.7

1
2
3
4

foreach ($_pp as $k => $v){
            if ($v['qty'] == $_pp[$i*count($groups)]['qty']){
                $qtys[$i][]=$v;
            }

За такое надо кромсать

guest, 27 Февраля 2009

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

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

+138.7

1
2
3
4
5
6
7

<?
// ....
$POST_MAX_SIZE = ini_get('post_max_size');
$mul = substr($POST_MAX_SIZE, -1);
$mul = ($mul == 'M' ? 1048576 : ($mul == 'K' ? 1024 : ($mul == 'G' ? 1073741824 : 1)));
// ....
?>

я ещё такой глубины условий не встречал в такой форме

guest, 23 Февраля 2009

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

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

+134

1
2
3
4
5

<?
for($i=0;$i<100;$i++){
 header("Location: govnokod");
}
?>

xek

guest, 23 Февраля 2009

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

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

+147

1
2
3
4
5
6
7
8
9

$Domain="asdasasdsad.ru";
$Lookup = "nslookup $Domain";
$Results = shell_exec(EscapeShellCmd($Lookup));
if (preg_match("/$Domain/",$Results)) {
	echo $Results;
	echo "Домен Существует!";
} else {
	echo "Домен не существует!";
}

php

guest, 21 Февраля 2009

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

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