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

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

В номинации:

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

За время:

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

+98

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

case ColorChunkStart of  
   0 : result := RGB(255,   
                     (255 div ColorChunk) * ColorChunkIndex,   
                     0);   
   1 : result := RGB(255 - (255 div ColorChunk) * ColorChunkIndex,   
                     255,   
                     0);   
   2 : result := RGB(0, 255, (255 div ColorChunk) * ColorChunkIndex);   
   3 : result := RGB(0,   
                     255 - (255 div ColorChunk) * ColorChunkIndex,   
                     255);   
   4 : result := RGB((255 div ColorChunk) * ColorChunkIndex,   
                     0,   
                     255);   
   5 : result := RGB(255,   
                     0,   
                     255 - (255 div ColorChunk) * ColorChunkIndex);   
  else  
    if WrapToRed <> false then  
      result := RGB(255, 0, 0) else  
      result := RGB(255, 0, 255);   
end;{Case}

Говно?

Fai, 02 Августа 2011

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

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

+132

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
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82

open System.Net
open System.Text.RegularExpressions
open System.Text
open System

type userInfo = 
    { User : string;
      Rating : double;}

let  mutable Users  = []

(* Заполняем списки юзверей *)
let getUsersInfo s = 
    let mutable  m = Regex.Match(s, @">(?<user>[^<]+)</a></td>\s+<td class=""strength"">[^<]+</td>\s+<td class=""rating""><strong>(?<rating>[^<]+)") //+ Оптимизировать регулярку. (Page 2)
    while(m.Success) do
        let info = {User = m.Groups.["user"].Value;  Rating =  m.Groups.["rating"].Value |> double}
        Users <- Users @ [info]
        m <- m.NextMatch()
    
(* скачивание страницы по индексу *)
let getSourceForUsers p = 
    let url = "http://freehabr.ru/people/good/page" + string(p)
    let wc = new WebClient();
    let s = wc.DownloadString(url);
    printfn "Разобрана %i страница" p
    getUsersInfo s

(* получить индекс последней страницы *)    
let getLastPage =  
    let wc = new WebClient()
    wc.Encoding <- Encoding.UTF8
    let s = wc.DownloadString "http://freehabr.ru/people/"
    Regex.Match(s,@"(?<=e)\d+(?=/"">п)").Value |> int

let lastPage = getLastPage

let printList a =
    a |> List.iter (fun x -> printfn "%s рейтинг - %.2f" x.User x.Rating)
    Console.ReadKey() |> ignore
 
[<EntryPoint>]
let main(args:string[]) =
  printfn "Парсер юзерей с положительным (или нулевым) рейтингом"
  printfn "%i -- Количество страниц" lastPage
  printfn "scan --XX - __ Cбор списка пользователей от первой страницы до XX"
  printfn "scan --YY --XX __ Сбор списка пользователей от YY страницы до XX. \nXX не может быть больше, чем максимальное количество страниц в списках юзеров с положительной кармой"

  let userInput = Console.ReadLine();
  match userInput with
  | _ when userInput.StartsWith "scan --" -> let a = Regex.Split(userInput,"--")
                                             let dig = a.[1] |> int
                                             if a.Length = 2 then  // для первого варианта                                               
                                                [1 .. dig] 
                                                |> List.iter getSourceForUsers
                                             else // для второго
                                                [ dig .. a.[2] |> int ] 
                                                |> List.iter getSourceForUsers
                                             printfn "~~~\nЮзеры посчитаны"
                                                
                                          
  | _ -> printfn "Завершение приложения"
         exit(1) 
  
  printfn "~~~~\nОбработка списка\n~~~~"
  printfn "usersGreaterRate --XX __ Показать пользователей,\nу которых рейтинг больше или равен XX"
  printfn "usersLessRate --XX __ Показать пользователей,\nу которых рейтинг меньше или равен XX"
  printfn "usersWithNamesBegins --String __ Показать пользователей,\nу которых имя начинается со строки String"
  let usersOper = Console.ReadLine()
  let param = Regex.Split(usersOper," --").[1] 
  match usersOper with
  | _ when usersOper.StartsWith "usersGreaterRate --" -> Users 
                                                         |> List.filter (fun x -> x.Rating > (param |> double))
                                                         |> printList
  | _ when usersOper.StartsWith "usersLessRate --" -> Users
                                                      |> List.filter (fun x -> x.Rating < (param |> double))
                                                      |> printList
  | _ when usersOper.StartsWith "usersWithNamesBegins --" -> Users
                                                                |> List.filter (fun x -> x.User.StartsWith param)
                                                                |> printList
  | _ -> printfn "Завершение приложения"
         exit(1) 
  0

qbasic, 12 Июля 2011

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

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

+147

1
2
3
4
5
6
7

private function _fileExists($file)
{
    if(file_exists(self::FILE_PATH . $file)) {
        return true;
    }
    return false;
}

Нашел в одном из проектов.

cartman, 28 Июня 2011

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

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

+162

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

public function save() {
        try {
            try {
                $this->create();
            } catch (Exception $e) {
                //probably dulplicate
                $this->update();
            }
        } catch (Exception $e) {
            logger::error($e);
        }

    }

try-catch много не бывает

super, 15 Июня 2011

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

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

+158

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

//Отображеие меню
	$arr = get("select max(depth) as d from ".DP."docs");
	$to = $arr[0]['d'];

	$a = get("select * from ".DP."docs where depth='0' order by prior");
	$arr = $a;
	for($i=0;$i<=$to;$i++)
	{
		$a = get("select * from ".DP."docs where depth='".$i."' order by prior");
		if(is_array($a))
		foreach($a as $key=>$value)
		{
			$b = array();$af = array();$bf = array();
			$b = get("select * from ".DP."docs where pid='".$a[$key]['id']."' order by prior");
			if(!$b)$b = array();
			$before = true;
			//поиск в массиве
			foreach($arr as $key2=>$value2)
			{
				if($arr[$key2]['id'] != $a[$key]['id'] and $before) $bf[] = $arr[$key2];
				if($arr[$key2]['id'] == $a[$key]['id'] ){ $bf[] = $arr[$key2]; $before=false;}
				if($arr[$key2]['id'] != $a[$key]['id'] and !$before) $af[] = $arr[$key2];
			}
			$arr = array_merge($bf,$b,$af);
		}
	}

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

com1, 12 Июня 2011

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

C# / Говнокод #6929

+126

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

FileStream fsSource = new FileStream(fileName, FileMode.Open, FileAccess.Read);

byte[] b = new byte[8192];
int[] a = new int[4096];

fsSource.Read(b, 0, 8192);

int sum=0;
int elem;
for (int i = 0; i < 4096; i++)
{
elem = b[i * 2] * 256 + b[i*2+1];
a[i] = elem; //раз уж нам всё равно надо заполнять этот массив, то мы его заполним
sum += elem;
}

задача: считать 2-х байтные числа с бинарного файла и посчитать его сумму.

slirx, 12 Июня 2011

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

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

+171

1
2
3
4

function trim_and_screening(&$item, $key)
{
	$item = '`'.$item.'`';
}

_tL, 20 Мая 2011

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

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

+141

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

#include<iostream>
using namespace std;
#include<string.h>
int main()
{
int n;
int t;
char s[100];
cin>>n;
while(n!=0)
{
n--;
int TTT=0,TTH=0,THT=0,THH=0,HTT=0,HTH=0,HHT=0,HHH=0,H=0,T=0;
cin>>t;
cin>>s;
cout<<s<<"\n";
int f=0;
for(int i=0;i<strlen(s);i++)
{
if(s[i]=='T' && s[i+1]=='T' && s[i+2]=='T')
TTT+=1;
if(s[i]=='T' && s[i+1]=='T' && s[i+2]=='H')
TTH+=1;
if(s[i]=='T' && s[i+1]=='H' && s[i+2]=='T')
THT+=1;
if(s[i]=='T' && s[i+1]=='H' && s[i+2]=='H')
THH+=1;
if(s[i]=='H' && s[i+1]=='T' && s[i+2]=='T')
HTT+=1;
if(s[i]=='H' && s[i+1]=='T' && s[i+2]=='H')
HTH+=1;
if(s[i]=='H' && s[i+1]=='H' && s[i+2]=='T')
HHT+=1;
if(s[i]=='H' && s[i+1]=='H' && s[i+2]=='H')
TTT+=1;
if(s[i]=='H'){
H++;f=1;}
if(s[i]=='T'){
T++;f=1;}
}
cout<<TTT<<"\n";
if(H==40)
cout<<t<<" 0 0 0 0 0 0 0 38\n";
if(T==40)
cout<<t<<" 38 0 0 0 0 0 0 0\n";
if(f==0)
cout<<t<<" "<<TTT<<" "<<TTH<<" "<<THT<<" "<<THH<<" "<<HTT<<" "<<HTH<<" "<<HHT<<" "<<HHH<<"\n";
}
return 0;
}

Все и так понятно

pabloid, 17 Мая 2011

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

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

−187

01
02
03
04
05
06
07
08
09
10

p.name LIKE '0%'
OR p.name LIKE '1%'
OR p.name LIKE '2%'
OR p.name LIKE '3%'
OR p.name LIKE '4%'
OR p.name LIKE '5%'
OR p.name LIKE '6%'
OR p.name LIKE '7%'
OR p.name LIKE '8%'
OR p.name LIKE '9%'

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

NaCilnic, 05 Мая 2011

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

C# / Говнокод #6534

+129

1
2
3
4
5
6

public void UpdateSession()
        {
            this.RequestTypeId = this.RequestTypeId;
            this.ServiceId = this.ServiceId;
            this.Name = this.Name;
        }

"Обновление" сессии. Взято из реального проекта.

wader, 03 Мая 2011

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

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