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

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

+157

01
02
03
04
05
06
07
08
09
10
11

<?php
$str='евро@@4900';
$flag1=true;
$flag2=false;
$str1=$str2='';
for($i=1,$c=strlen($str);$i<$c;$i++){
if($str[$i]!='@' and $flag1) $str1.=$str[$i]; else{ $flag1=false; $flag2=true;}
if($str[$i]!='@' and $flag2) $str2.=$str[$i];
}
echo $str1.' '.$str2; 
?>

Выносим "евро" и "4900" в две строки

1_and_0, 24 Декабря 2010

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

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

+171

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

if (a == 0 && b == 0 && c == 0 && d == 0) n = 0;
    if (a == 0 && b == 0 && c == 0 && d != 0) n = 0;
    if (a == 0 && b == 0 && c != 0 && d == 0) n = 0;
    if (a == 0 && b != 0 && c == 0 && d == 0) n = 0;
    if (a != 0 && b == 0 && c == 0 && d == 0) n = 0;
    if (a == 0 && b == 0 && c != 0 && d != 0 && c == d) m += 1;
    if (a == 0 && b != 0 && c != 0 && d == 0 && b == c) m += 1;
    if (a == 0 && b != 0 && c == 0 && d != 0 && b == d) m += 1;
    if (a != 0 && b == 0 && c == 0 && d != 0 && a == d) m += 1;
    if (a != 0 && b == 0 && c != 0 && d != 0 && a == c) m += 1;
    if (a != 0 && b != 0 && c == 0 && d == 0 && a == b) m += 1;////
    if (a == 0 && b != 0 && c != 0 && d != 0 && b == c) m += 1;
    if (a == 0 && b != 0 && c != 0 && d != 0 && b == d) m += 1;
    if (a == 0 && b != 0 && c != 0 && d != 0 && c == d) m += 1;//
    if (a != 0 && b == 0 && c != 0 && d != 0 && a == c) m += 1;
    if (a != 0 && b == 0 && c != 0 && d != 0 && a == d) m += 1;
    if (a != 0 && b == 0 && c != 0 && d != 0 && d == c) m += 1;//
    if (a != 0 && b != 0 && c == 0 && d != 0 && a == b) m += 1;
    if (a != 0 && b != 0 && c == 0 && d != 0 && a == d) m += 1;
    if (a != 0 && b != 0 && c == 0 && d != 0 && b == d) m += 1;//
    if (a != 0 && b != 0 && c != 0 && d == 0 && a == b) m += 1;
    if (a != 0 && b != 0 && c != 0 && d == 0 && a == c) m += 1;
    if (a != 0 && b != 0 && c != 0 && d == 0 && c == b) m += 1;////
    m--;
    if (a != 0 && b != 0 && c != 0 && d != 0 && a == b) k += 1;
    if (a != 0 && b != 0 && c != 0 && d != 0 && a == c) k += 1;
    if (a != 0 && b != 0 && c != 0 && d != 0 && a == d) k += 1;
    if (a != 0 && b != 0 && c != 0 && d != 0 && b == c) k += 1;
    if (a != 0 && b != 0 && c != 0 && d != 0 && b == d) k += 1;
    if (a != 0 && b != 0 && c != 0 && d != 0 && c == d) k += 1;
    k -= 3;
    if (m <= 0) m = 0;
    if (k <= 0) k = 0;
    n = k + m;*/

Как на второй день после начала изучения С стал решать задачу "Сколько чисел повторяются"

slushkov, 24 Декабря 2010

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

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

−188

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

UPDATE 
	phplist_user_user 
SET 
	email = (
		SELECT 
			Email 
		FROM 
			User, phplist_usersubscribers 
		WHERE 
			phplist_usersubscribers.userid = User.Id 
			AND 
			phplist_usersubscribers.subscribersid = phplist_user_user.id 
			AND 
			NOT (Email IS NULL) 
			LIMIT 1
			) 
	WHERE 
		NOT (
			(SELECT 
				id 
			FROM 
				phplist_usersubscribers 
			WHERE 
				phplist_usersubscribers.subscribersid = phplist_user_user.id 
			LIMIT 1
			) IS NULL
			)

Вот на такой код наткнулся в корпоративном фреймворке. Стоит ли говорить, что весь запрос был написан в одну строку.

maghamed, 24 Декабря 2010

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

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

+97

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

var sum,x1,x2,y1,y2,i,k,l,m,n:longint;
a:array[1..1000,1..2] of longint;
b:array[1..100,1..100] of longint;

procedure ws(x,y,c:longint);
var k:longint;
begin
  if (not((x-2<1)or(y-1<1)or(x-2>n)or(y-1>N))and(b[x-2,y-1]=0)) then begin inc(m);a[m,1]:=x-2;a[m,2]:=y-1;b[x-2,y-1]:=b[x,y]+1;end;
  if (not((x+2<1)or(y-1<1)or(x+2>n)or(y-1>N))and(b[x+2,y-1]=0)) then begin inc(m);a[m,1]:=x+2;a[m,2]:=y-1;b[x+2,y-1]:=b[x,y]+1;end;
  if (not((x-1<1)or(y-2<1)or(x-1>n)or(y-2>N))and(b[x-1,y-2]=0)) then begin inc(m);a[m,1]:=x-1;a[m,2]:=y-2;b[x-1,y-2]:=b[x,y]+1;end;
  if (not((x+1<1)or(y-2<1)or(x+1>n)or(y-1>N))and(b[x+1,y-2]=0)) then begin inc(m);a[m,1]:=x+1;a[m,2]:=y-2;b[x+1,y-2]:=b[x,y]+1;end;
  if (not((x-2<1)or(y+1<1)or(x-2>n)or(y+1>N))and(b[x-2,y+1]=0)) then begin inc(m);a[m,1]:=x-2;a[m,2]:=y+1;b[x-2,y+1]:=b[x,y]+1;end;
  if (not((x+2<1)or(y+1<1)or(x+2>n)or(y+1>N))and(b[x+2,y+1]=0)) then begin inc(m);a[m,1]:=x+2;a[m,2]:=y+1;b[x+2,y+1]:=b[x,y]+1;end;
  if (not((x-1<1)or(y+2<1)or(x-1>n)or(y+2>N))and(b[x-1,y+2]=0)) then begin inc(m);a[m,1]:=x-1;a[m,2]:=y+2;b[x-1,y+2]:=b[x,y]+1;end;
  if (not((x+1<1)or(y+2<1)or(x+1>n)or(y+2>N))and(b[x+1,y+2]=0)) then begin inc(m);a[m,1]:=x+1;a[m,2]:=y+2;b[x+1,y+2]:=b[x,y]+1;end;
end;

begin
reset(input,'input.txt');
rewrite(output,'output.txt');
read(n);
read(x1,y1);
read(x2,y2);
b[1,1]:=0;
a[1,1]:=x1;a[1,2]:=y1;
i:=0;m:=1;l:=1;
while i<=m do begin inc(i);
  ws(a[i,1],a[i,2],i);
end;
write(b[x2,y2]);
close(input);
close(output);
end.

вот он, венец человеческого ума - рабочий поиск в ширину без использования рекурсии, написал сам, меня очень просили запостить тут))

faraon124, 24 Декабря 2010

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

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

+162

1
2
3
4

$e=mysql_fetch_assoc(mysql_query(" select * from conf_news where razdel='{$_GET["kind"]}' AND pub='yes' order by `date` desc limit 1 ")) ;
$max_year=substr($e["date"],0,4);
$e=mysql_fetch_assoc(mysql_query(" select * from conf_news where razdel='{$_GET["kind"]}' AND pub='yes' order by `date` limit 1 ")) ;
$min_year=substr($e["date"],0,4);

Как определить минимальную и максимальную дату в списке новостей? А вот как!
Да, кстати, $_GET нигде не проверяется на SQL-инъекцию.

(с) разработка под названием "CMS9"

may_cat, 24 Декабря 2010

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

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

+168

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

function getAlphabetList($list = null)
{   
    $alphabet = split(' ', 'A B C D E F G H I J K L M N O P Q R S T U V W X Y Z');

    foreach($alphabet as $letter)
    {
        $has_letter = false;
        if(is_array($list))
        {
            foreach ($list as $value) 
            {
                    if(substr(strtoupper($value),0,1) == strpos($letter,$value,1))
                    {
                        $has_letter = true;
                    }                   
            }
        }
        
        if($has_letter)
        {               
            $output .= '<a href="?letter='.$letter.'">'.$letter.'</a> ';
        } else {
            $output .= $letter.' ';
        }
    }
    return $output;
}

Шерстим список записей, определяем, на какие буквы они начинаются, и для имеющихся букв генерируем гиперссылки. Мужика попросили разобраться, почему каталог на 126000 записей тормозит при отображении, и он увидел в коде это.
http://thedailywtf.com/Articles/Thorough-Letter-Checking.aspx

telnet, 24 Декабря 2010

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

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

+144

01
02
03
04
05
06
07
08
09
10
11

<?php

error_reporting(E_ALL);
if (isset($_GET["src"])) {
if (stripos($_GET["src"], "http://") !== false || stripos($_GET["src"], "https://") !== false) { 
die("Анонимус, пошёл на /*
вырезано
*/
if($ext == "jpg" or $ext == "jpeg"){
    $img = imagecreatefromjpeg($src);
}

защита от инклудов по HTTP от нашего любимого анального клоуна lstem aka komprenda

Анонимус, 24 Декабря 2010

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

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

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