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

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

В номинации:

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

За время:

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

+6.1

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23

do {
XLoop: 
    XNextEvent(dpy,&event);
    switch(event.type) {
      case ResizeRequest:
        if (event.xresizerequest.window!=win_main)
          goto XLoop;
resize_main:
        xswa.event_mask&= ~ResizeRedirectMask;
        XChangeWindowAttributes(dpy,win_main,CWEventMask, &xswa);
        XSync(dpy,0); /* very important, otherwise we loop endlessly ! */
        XResizeWindow(dpy, win_main,event.xresizerequest.width,event.xresizerequest.height);
        XSync(dpy,0); /* very important, otherwise we loop endlessly ! */
        xswa.event_mask|= ResizeRedirectMask;
        XChangeWindowAttributes(dpy,win_main,CWEventMask, &xswa);
        resize=1;
        XSync(dpy,0); /* another one, just in case... */
        goto redisplay;

      case Expose:
	if (event.xexpose.count|moving_button1|vmoving_button)
	  goto XLoop;
.....// и дальше такой же хрени типа нарисовать и goto XLoop; :)

Однако под X11 пишут и так:

guest, 13 Декабря 2008

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

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

+16.6

1
2
3
4
5
6
7
8
9

$temp69 = new dbQuery($sql69, $conn->connId) or die(mysql_error()); 
$i=""; while($i<=5) { $res69=$temp69->getArray(); $i++; } 
$sql69="select * from dj_config";
$temp69= new dbQuery($sql69, $conn->connId) or die(mysql_error());
$i="";
while($i<=5){
	$res69=$temp69->getArray();
	$i++;
}

оригинал: http://blog.sjinks.org.ua/humour/76-programmers-russian-indian-chinese-canadian/

guest, 13 Декабря 2008

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

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

−11.9

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

void safecpy(char *str1, char *str2)
{
	strncpy(str1, str2, strlen(str1));
	str1[strlen[str1]] = 0;
}

...

void safecpy(char *str1, char *str2)
{
	strncpy(str1, str2, sizeof(str1));
	str1[sizeof(str1)] = 0;
}

Две примера функций \"безопасного\" копирования строк :-)

guest, 12 Декабря 2008

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

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

−58.5

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

//Вознашу хвалу тебе, о великий индуский бог программинга! Как ни странно, работает, но надо переписать на досуге.
	       
$city_xml = $CityArray->GetXml("CityList");
	foreach($city_xml as $tmp_array){
		if(!is_string($tmp_array) && $tmp_array[0] != "" && $tmp_array[0] != "Success" ){
			foreach($tmp_array as $second_array){
				$ixml = new xml();
			    	$ixml->Insert($second_array);
			    	foreach($ixml as $country_array){
			    		if(!is_string($country_array) && $country_array[0] != "" && $country_array[0] != "Success" ){
						foreach($country_array as $rxml){
							if(!is_string($rxml)){
								foreach($rxml as $axml){
									if(!is_string($axml) && $axml[0] && $axml[0] != "Position"){
										foreach($axml as $bxml){
											foreach($bxml as $cxml){
												if(!is_string($cxml) && is_array($cxml) && $cxml["Name"]){
													$cities[] = $cxml;
												}
											}
										}	
									}
								}
							}
						}
				    	}
				    }
				}
			}
		}
return $cities;

Парсинг xml

guest, 11 Декабря 2008

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

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

−62.7

1
2
3
4
5
6

if ( strchr ( $_POST["ship$i"], "+") || strchr($_POST["ship$i"], " ") || strchr($_POST["ship$i"], ",") || strchr($_POST["ship$i"], ".") || strchr($_POST["ship$i"], "-") || strchr($_POST["ship$i"], "_") || strchr($_POST["ship$i"], ";") || strchr($_POST["ship$i"], ":") ) { 
message("You got owned by >>The_Revenge Anticheat Systems<<", "Anticheat");
}
if ( !strchr ( $_POST["ship$i"], "+") && !strchr($_POST["ship$i"], " ") && !strchr($_POST["ship$i"], ",") && !strchr($_POST["ship$i"], ".") && !strchr($_POST["ship$i"], "-") && !strchr($_POST["ship$i"], "_") && !strchr($_POST["ship$i"], ";") && !strchr($_POST["ship$i"], ":")) {
// код
}

Немец предложил такое решение для проверки, что в строке ship$i именно положительное целое число и ни что иное.
В другом месте попадается аналогичный момент, только там после каждого strchr для каждого спецсимвола идет 10 строк одного и того же кода с двумя запросами к БД и выдачей бана юзеру...
Проект XNova (ogame-like)

guest, 11 Декабря 2008

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

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

−32.7

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

public void updateAmountValues(List<TransactionResultItem> transactionResultItems) {
        for (TransactionResultItem transaction : transactionResultItems) {
            Account account = getAccountById(transaction.getAccountId());
            if ((transaction.getMainTransaction()
                    && ! transaction.getTransactionTypeId().equals(4)
                    && ! transaction.getTransactionTypeId().equals(5)
                    && ! transaction.getTransactionTypeId().equals(6))
                    ||
                    (! transaction.getMainTransaction() &&
                            (transaction.getTransactionTypeId().equals(5) &&
                                    ((account.getAccountTypeId().equals(AccountType.INCOME_TYPE_ID) ||
                                            account.getAccountTypeId().equals(AccountType.OTHER_INCOME_TYPE_ID)) &&
                                            transaction.getAmount() > 0)
                                    || (transaction.getAccountId().equals(getSalesTaxPayableAccountId()) && transaction.getAmount() > 0)
                                    || ((account.getAccountTypeId().equals(AccountType.EXPENSE_TYPE_ID) ||
                                    account.getAccountTypeId().equals(AccountType.OTHER_EXPENSE_TYPE_ID)) && transaction.getAmount() < 0))
                            || (transaction.getTransactionTypeId().equals(1) &&
                            (account.getAccountTypeId().equals(AccountType.INCOME_TYPE_ID) ||
                                    account.getAccountTypeId().equals(AccountType.OTHER_INCOME_TYPE_ID)) &&
                            transaction.getAmount() < 0)
                            || (transaction.getTransactionTypeId().equals(2) &&
                            (account.getAccountTypeId().equals(AccountType.INCOME_TYPE_ID) ||
                                    account.getAccountTypeId().equals(AccountType.OTHER_INCOME_TYPE_ID)) &&
                            transaction.getAmount() > 0)
                    )) {
                Double amount = transaction.getAmount();
                transaction.setAmount(-amount);
            }
        }
    }

Потрясающий по понятности код. Вызывался несколько раз в одном и том же методе.

guest, 08 Декабря 2008

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

Haskell / Говнокод #29143

0

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

(defparameter *workers* 200)

(defun rn-virt-dfns (data &optional (turn-on t))
  (defconstant +workers+ *workers*)
  `(declare (type (array (member ,(let* ((i '())) (do* ((y 0 (+ y 1))) ((= y 9) 'nil) (push y i)))) (3)) data))
  (sb-alien:define-alien-type address-pointer (sb-alien:system-area-pointer))
  (progn (macrolet ((>> (x s) `,(ash x s)) (<< (x -s) `(ash ,x ,(- -s))) (~ (x) `(lognot ,x)) (& (x) `(sb-kernel:get-lisp-obj-address ,x)))
    (let ((truedata (eval `(mapcar #'(lambda (x) (coerce x 'list)) (coerce ,data 'list)))))
      (labels ((get-pointer (addr)
                 (sb-sys:sap-ref-8 (sb-sys:int-sap addr) 0))
               (proc-dfns-simd (pntrx mmr pntry orgdt)
                 (declare (type integer pntrx pntry)
                          (type (array integer (*)))
                          (type list orgdt))
                 (loop for it in `(,@orgdt)
                       do (let ((dif (the integer (- pntry `,(& it)))))
                            (when (= `,(abs dif) (+ #XA #X1))
                              (do ((it 0 (+ it (if `(plusp ,dif) 1 -1)))) ((= it (if `(plusp ,dif) 16 -16)) nil)
                                (ignore-errors
                                  (let ((lazy `(setf (& (get-pointer (- ,dif ,it))) #b0))
                                        (lazy-2 `(setf (~ (& (get-pointer (- ,dif ,it))) #b1))))
                                    (when turn-on (eval lazy) (eval lazy-2))))))
                            (when (/= (abs dif) 8)
                              (if `(plusp ,dif)
                                (dotimes (i 8)
                                  (ignore-errors
                                    (let ((lazy `(setf (>> (& (get-pointer (- ,dif ,i))) #x1) #b1)))
                                      (when turn-on (eval lazy)))))
                                (loop for i from 0 downto -8 by 1
                                      do (ignore-errors
                                           (let ((lazy `(setf (<< (& (get-pointer (- ,dif ,i))) #x1) #b1)))
                                              (when turn-on (eval lazy)))))))))))

        (handler-case
            (loop repeat +workers+ do (bt:make-thread #'(lambda () (proc-dfns-simd `,(& data) `,data `,(& truedata) `,truedata))))
          (error (e)
            (declare (ignore e)))))))))


(rn-virt-dfns #(#(1) #(2)))

lisp-worst-code, 08 Июня 2025

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

Go / Говнокод #29116

0

1
2
3
4

koko.
  Add(1). 
  Add(2). 
  Add(3)

Такое трансоформатирование в стандартном линтере.

3_dar, 03 Апреля 2025

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

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

0

01
02
03
04
05
06
07
08
09
10

//Правила для КД2 дял перехода с УТ10.3 на УТ 11

Если Источник.Ссылка.Владелец.ВидНоменклатуры.ТипНоменклатуры <> Перечисления.ТипыНоменклатуры.Товар
   И Источник.Ссылка.Владелец.ВидНоменклатуры.ТипНоменклатуры <> Перечисления.ТипыНоменклатуры.Услуга Тогда
	Отказ = Истина;
КонецЕсли;

Если Источник.Ссылка.Владелец.ЕдиницаХраненияОстатков = Источник.Ссылка И Источник.Ссылка.Владелец.ЕдиницаХраненияОстатков.Коэффициент = 1 Тогда
	Отказ = Истина;
КонецЕсли;

Что может пойти не так?

k-yurii, 27 Марта 2025

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

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

+1

1

Почему при таком обилии языков программирования ассемблер не уходит в туман?

К нему возвращаются опять и опять, и, что удивительно, тем чаще, чем язык высокоуровневей.

Напоминает попытки быдла бросить курить.

KPblCA, 08 Марта 2025

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

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