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

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

В номинации:

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

За время:

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

+111

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
83
84
85
86
87
88
89
90
91
92
93
94
95
96

procedure TForm1.Timer1Timer(Sender: TObject);
function UpTime(sf:string):boolean;
var time:string;
 t:textfile;
begin
 if form1.MaskEdit5.Text<>'' then
 if Findmas_u(255,0,sf)<0 then
 begin UpTime:=false;exit;end;
 if not FileExists(sf) then
 begin UpTime:=false;exit;end;
 time:=DateUpdating_u(sf);
 if time<>'' then
 begin
 try
 assignfile(t,ExtractFilePath(form1.MaskEdit1.Text)+ChangeFileExt(ExtractFileName(sf),'.tim'));
 rewrite(t);
 writeln(t,time);
 closefile(t);
 except UpTime:=false;exit;end;
 end;
 UpTime:=true;
end;
var x,y,i1,i2,i3,xf,yf:integer;
 sf,id,ff:string;
 b:boolean;
begin
 form1.Timer1.Enabled:=not form1.Timer1.Enabled;
 try
 form1.ProgressBar1.Position:=0;
 application.ProcessMessages;
 masopt_u(254,x,y);
 if form1.MaskEdit1.Text='' then
 form1.BitBtn3.Click else
 if (DateUpdating_u(form1.MaskEdit1.Text)<>DateUpdatingMas_u(254))or(y>0) then
 begin
 if form1.MaskEdit3.Text<>'' then
 if form1.CheckBox1.Checked then
 sf:=TJ7PassAutentikR_u(form1.MaskEdit3.Text,form1.MaskEdit2.Text) else
 sf:=TJ7PassAutentik_u(form1.MaskEdit3.Text,form1.MaskEdit2.Text) else
 sf:=form1.MaskEdit2.Text;
 if not OpenOneNu_u(form1.MaskEdit1.Text,'read:PSQL-Srv'+booltostr(form1.RadioButton2.Checked),3) then
 begin
 DeleteFile(ChangeFileExt(form1.MaskEdit1.Text,'.tmp'));
 form1.RichEdit1.Lines.Add('('+datetostr(date)+' '+timetostr(time)+') Превышен интервал времени доступа.');
 OpenOneNu_u(form1.MaskEdit1.Text,'read:PSQL-Srv'+booltostr(form1.RadioButton2.Checked),3);
 end;
 i1:=TJ7ReadMas_u(254,form1.MaskEdit1.Text,sf);
 CloseOneNu_u(form1.MaskEdit1.Text,'read:PSQL-Srv'+booltostr(form1.RadioButton2.Checked));
 if (i1<>0)and(i1<>11) then
 begin
 form1.RichEdit1.Lines.Add('('+datetostr(date)+' '+timetostr(time)+') Ошибка чтения команд, код: '+inttostr(i1)+'.');
 closemas_u(254);
 initmas_u(254,2,0);
 TJ7CreateMas_u(254,form1.MaskEdit1.Text,sf,false,false,false,false,false);
 closemas_u(254);
 form1.Timer1.Enabled:=not form1.Timer1.Enabled;
 exit;
 end;
 masopt_u(254,x,y);id:='';
 if not form1.RadioButton1.Checked then
 begin
 for i1:=0 to y-1 do
 if (masr_u(254,1,i1)<>'') then
 if ((form1.RadioButton2.Checked)and(ord(masr_u(254,1,i1)[1])mod 2=0))or
 ((form1.RadioButton3.Checked)and(ord(masr_u(254,1,i1)[1])mod 2<>0))then
 begin id:=masr_u(254,1,i1);break;end;
 end else id:=masr_u(254,1,0);
 if (id='')or(y=0) then
 begin
 if RTime_u(strtodatetime(DateUpdatingMas_u(254)),date+time)<1200 then
 closemas_u(254);
 form1.Timer1.Enabled:=not form1.Timer1.Enabled;
 exit;
 end;
 if y>0 then form1.StaticText13.Caption:='в обработке';
 application.ProcessMessages;
 form1.RichEdit1.Lines.Add('('+datetostr(date)+' '+timetostr(time)+'/Старт):'+id);
 if form1.CheckBox3.Checked then
 begin
 masopt_u(255,xf,yf);
 ff:=ExtractFilePath(form1.MaskEdit1.Text)+id+'.tj7';
 masw_u(255,0,yf,ff);
 end;
 application.ProcessMessages;
 if form1.MaskEdit6.Text<>'' then
 PsevdoSQL_u(form1.MaskEdit6.Text);
 for i1:=0 to y-1 do
 if masr_u(254,1,i1)=id then
 begin
 if form1.CheckBox3.Checked then
 begin
 i2:=pos('TId',masr_u(254,0,i1));
 if i2>0 then
 masw_u(254,0,i1,copy(masr_u(254,0,i1),1,i2-1)+id+copy(masr_u(254,0,i1),i2+3,255));
 end;
// *** И дальше в том же духе

Автор сего поделия, кусок которого приведён выше (привёл бы полностью, но там 160 строк), называет ЭТО "сервером распределённых вычислений" и "самой прогрессивной СУБД в мире, которая лучше всех этих ваших ораклов. При этом автор вроде как и не школьник...

Vinny_the_POOH, 17 Сентября 2010

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

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

+111

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

string filename = "pasker_ltd.xls";
                     string ConnectionString = String.Format("Provider=Microsoft.Jet.OLEDB.4.0; Data Source={0}; Extended Properties=Excel 8.0;", filename);
            DataSet ds = new DataSet("EXCEL");
            OleDbConnection cn = new OleDbConnection(ConnectionString);
            cn.Open();
            DataTable schemaTable =cn.GetOleDbSchemaTable(OleDbSchemaGuid.Tables,new object[] { null, null, null, "TABLE" });
            string sheet1 = (string)schemaTable.Rows[0].ItemArray[2];
            string select = String.Format("SELECT * FROM [{0}]", sheet1);
            OleDbDataAdapter ad = new OleDbDataAdapter(select, cn);
            ad.Fill(ds);
            DataTable tb = ds.Tables[0];
            dataGridView1.DataSource = tb;

Ebaw, 10 Августа 2010

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

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

+111

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

/// <summary>
        /// Получает IPAdress к которому нужно подключиться
        /// </summary>
        private int Get_IPAdress_Server()
        {
            string Buf = "";
            for (int i = 0; i < Server_IP.Servers_IP.Length; i++ )
            {
                try
                {
                    TcpClient tc = new TcpClient(Server_IP.Servers_IP[i], Server_IP.Servers_Port[i]);
                    byte[] buffer = new byte[19];
                    NetworkStream nss = tc.GetStream();
                    nss.Read(buffer, 0, 19);
                    Buf = Encoding.ASCII.GetString(buffer).Trim();
                    Server_IPAdress = Buf.Substring(0, Buf.IndexOf(":"));
                    Server_Port = int.Parse(Buf.Substring(Buf.IndexOf(":") + 1, Buf.Length - Buf.IndexOf(":") - 1));
                    return 0;
                }
                catch (SocketException)
                {
                }
            }
            return -1;
        }

Получаем индекс в коллекции где хранятся список серверов Первый доступный!

Nigma143, 06 Августа 2010

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

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

+111

1
2
3
4
5

public static byte[] Length_Hex(long _Length)
        {
            byte[] Buf = { (byte)(_Length >> 0), (byte)(_Length >> 8), (byte)(_Length >> 16), (byte)(_Length >> 24) };
            return Buf;
        }

Кривой велик

Nigma143, 06 Августа 2010

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

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

+111

1
2
3
4
5
6
7
8
9

/// ----------------------------------------------------------------------------- 
/// <summary> 
/// Page_Load runs when the control is loaded 
/// </summary> 
/// ----------------------------------------------------------------------------- 
protected void Page_Load(object sender, System.EventArgs e)
{
   ...
}

да ну!! серьезно что-ли???

Coffeeholic, 04 Августа 2010

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

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

+111

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

<?
	class newPage
	{
		
		public $bigMainImage;
		
		public $smallMainImage;
	
		protected $id;
		
		//Фамилия и имя
		protected $surname;
		protected $name;
		
		//город
		protected $city;

		//конструктор
		public __construct($id,
					$surname,
					$name,
					$city)
		{
			$this->id = htmlspecialchars($id);
			$this->surname = htmlspecialchars($surname);
			$this->name = htmlspecialchars($name);
			$this->city = htmlspecialchars($city);

			//копируем большое и маленькое изображение 
			copy("photos/$id/1.jpg","photos/$id/Main.jpg");
			copy("photos/$id/small/1.jpg","photos/$id/small/Main.jpg");
			$this->bigMainImage = "photos/$id/Main.jpg";
			$this->smallMainImage = "photos/$id/small/Main.jpg";
		}
		
		//вывод страницы на экран
		public get_html()
		{
			echo"<title>$this->name $this->surname</title>";
			echo "
					<table>
						<tr>
							<td>
								<img src=\"$this->bigMainImage\"><br>Рейтинг:
							</td>
							<td>
								<b>$this->name $this->surname</b>,<br>
								$this->city								
							</td>
						</tr>
					</table>";
		}
		public newFile($id)
		{
			$intPage = fopen("page/".$id.".php",w);
		}
					
	}
?>

Ржу не магу.

Vasiliy, 28 Июля 2010

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

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

+111

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

[WebMethod]
public PackageHoldResult RegisterHold(
    string login,
    string password,
    PackageHoldRequest holdRequest)
{
    PackageHoldResult result = new PackageHoldResult();
    result.ResultCode = 0;

    try
    {
        // ...
    }
    catch
    {
        result.ResultCode = (int) PackageHoldRequestResultCode.InternalError;
    }

    return result;
}

Логирование?... что это?

svkandroid, 23 Июля 2010

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

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

+111

1
2
3
4
5
6
7

if (!empty($_POST['fupload'])) //проверяем, отправил ли пользователь изображение
{
$fupload=$_POST['fupload']; $fupload = trim($fupload);
  if ($fupload =='' or empty($fupload)) {
                     unset($fupload);// если переменная $fupload пуста, то удаляем ее
					 }
}

Кусочек из видео уроков Попова

Vasiliy, 06 Июля 2010

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

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

+111

1
2
3
4
5

double f_x (double x, double y, int nom)
{
  double f_x[]={x+y, x*y, x*y, sqrt(x*x + y*y), cos(x)/sin(y)};
  return f_x[nom];
}

Нужна одна из функций :-)

Goga, 01 Июля 2010

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

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

+111

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

try
            {
                Int16 y = 0, m = 0, d = 0, hh = 0, mm = 0, ss = 0, ms = 0, zn = 0;
                if (Value.IndexOf("T") > 0)
                {
                    Int16.TryParse(Value.Substring(0, 4), out y);
                    Int16.TryParse(Value.Substring(4, 2), out m);
                    Int16.TryParse(Value.Substring(6, 2), out d);
                    Int16.TryParse(Value.Substring(9, 2), out hh);
                    Int16.TryParse(Value.Substring(11, 2), out mm);
                    Int16.TryParse(Value.Substring(13, 2), out ss);
                    Int16.TryParse(Value.Substring(16, 2), out ms);
                    Int16.TryParse(Value.Substring(18, 3), out zn);
                    dt = new DateTime(y, m, d, hh, mm, ss, ms, DateTimeKind.Utc);
                }
                if (Value.IndexOf("T") == 0)
                {
                    Int16.TryParse(Value.Substring(0, 2), out hh);
                    Int16.TryParse(Value.Substring(2, 2), out mm);
                    Int16.TryParse(Value.Substring(4, 2), out ss);
                    Int16.TryParse(Value.Substring(7, 2), out ms);
                    dt = dt.AddHours(hh).AddMinutes(mm).AddSeconds(ss).AddMilliseconds(ms);
                }

                dt.AddHours(-zn);

            catch (Exception ex)
            {
                Console.Write(this.Value + "\r\n" + ex.ToString());
            }

          return dt;

Разбор модифицированного iso 8601 формата даты и времени (без "-").
не учитавается наличие/отсуствие даты или времени, длинная тайм зона, то что если нет T то это не время а дата. Естественно все обернуто в try/catch что бы никто не догадался.

Так сказать особой утонченности придает строка dt.AddHours(-zn);
(сколько уйдет у кого секунд что бы понять что с ней не так?)

eval_2009, 10 Июня 2010

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

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