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

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

+110

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

unit HRTimer;
 
interface
 
uses Windows;
 
type
  // --------------------- Класс - высокоточный таймер -------------------------
  THRTimer = class(TObject)
    constructor Create;
    function StartTimer: Boolean; // Обнуление таймера
    function ReadTimer: Double;   // Чтение значения таймера в миллисекундах
  private
    StartTime: Double;
    ClockRate: Double;
  public
    Exists: Boolean;    // Флаг успешного создания таймера
  end;
 
var
  Timer: THRTimer; // Глобальая переменная. Создаётся при запуске программы
 
{ Фукнция высокоточной задержки.
 Delphi:
   Синтаксис: function HRDelay(const Milliseconds: Double): Double;
   Milliseconds: Double - задержка в миллисекундах (может быть дробной)
   Результат функции - фактически произошедшая задержка с погрешностью.
   Пример вызова функции: X:= HRDelay(100.0); или HRDelay(100.0);
 
 C++Builder:
   Синтаксис: double HRDelay(const double Milliseconds);
   Double Milliseconds - задержка в миллисекундах (может быть дробной)
   Результат функции - фактически произошедшая задержка с погрешностью.
   Пример вызова функции: double X = HRDelay(100.0); или HRDelay(100.0);}
function HRDelay(const Milliseconds: Double): Double;
 
implementation
 
function HRDelay(const Milliseconds: Double): Double;
begin
  Timer.StartTimer();
  repeat
    Result:= Timer.ReadTimer();
  until Result >= Milliseconds;
end;
 
{ THRTimer }
 
constructor THRTimer.Create;
var
  QW: LARGE_INTEGER;
begin
  inherited Create;
  Exists := QueryPerformanceFrequency(Int64(QW));
  ClockRate := QW.QuadPart;
end;
 
function THRTimer.StartTimer: Boolean;
var
  QW: LARGE_INTEGER;
begin
  Result := QueryPerformanceCounter(Int64(QW));
  StartTime := QW.QuadPart;
end;
 
function THRTimer.ReadTimer: Double;
var
  ET: LARGE_INTEGER;
begin
  QueryPerformanceCounter(Int64(ET));
  Result := 1000.0 * (ET.QuadPart - StartTime) / ClockRate;
end;
 
initialization
  Timer:= THRTimer.Create();
 
finalization
  Timer.Free();
 
end.

классический шайзберг посреди майских роз (ну почти розы)

bugmenot, 29 Июня 2011

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

bash / Говнокод #7100

−144

1
2
3
4
5
6
7
8

#! /bin/sh

# some code

daemon1="/usr/home/daemon1.sh"
daemon2="/home/daemon2.sh"

# some code with variables

Скрипт на BSD. Хомяк находится в /usr/home, а /home симлинк на него

Elvenfighter, 29 Июня 2011

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

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)

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

+181

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

#include "iostream"
using namespace std;

enum {MaxFucktorial=13};
static int fucks[MaxFucktorial+1];

template<const int ValuePosition, const int Value>
struct initFuckedValue
{
	enum {CurrentValue=Value*ValuePosition};
	static void fuckUp(void)
	{
		fucks[ValuePosition]=CurrentValue;
		initFuckedValue<ValuePosition+1, CurrentValue>::fuckUp();
	};
};
template<const int Value>
struct initFuckedValue<MaxFucktorial, Value>
{
	static void fuckUp(void){};
};
void InitFucks(void)
{
	fucks[0]=1;
	initFuckedValue<1,1>::fuckUp();
};

int _tmain(int argc, _TCHAR* argv[])
{
	cout<<"Введите аргумент факториала: "<<endl;
	InitFucks();
	int fuckArg=0;
	cin>>fuckArg;
	cout<<"Начинаем считать факториал..."<<endl
	<<"Подсчёт факториала успешно завершён. ОК."<<endl
	<<"Результат: "<<fucks[fuckArg]<<endl;
	cin>>fuckArg;
	return 0;
}

Решил запостить всё. Жемчужена.

Мой знакомый, молодой преподаватель-аспирант из института пришёл однажды расстроенный. Спрашиваю у него: "Что случилось?"
-- "Один мой первокурсник, когда я дал ему задание посчитать факториал через рекурсию принёс мне какую-то непонятную компилирующуюся галиматью. И считает она уж слишком быстро... Это какая-то программа обманка. Вообщем я ему поставил 2."

Да, это лаба. ^_^

Говногость, 28 Июня 2011

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

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

+159

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

$get = dbcom('SELECT * FROM downloads ORDER BY views DESC;');
			$i = 1;
			while($row = mysql_fetch_array($get))
			{
				if($i == 1)
				{
					$p['v'] = $row['views'];
				}
				if($row['reports'] != 0)
				{
					$t['rep']++;
				}
				$t['dl'] += $row['views'];
				$i = 0;
			}

DDLCMS is a COMMERCIAL grade content management system for DDL site owners.
при 400к записях в downloads немножно все в ОЗУ не помещалось.

peinguin, 28 Июня 2011

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

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

+89

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

// qsort.inc:
procedure SortRow(var A: array of T);

  procedure sort(l,r: integer);
  var
    i,j: integer;
    x,y: T;
  begin
    i := l;
    j := r;
    x := a[random(r-l+1)+l];
    repeat
      while LESS(a[i],x) do inc(i);
      while LESS(x,a[j]) do dec(j);
      if i<=j then begin
        y    := a[i];
        a[i] := a[j];
        a[j] := y;
        inc(i);
        dec(j);
      end;
    until i>=j;
    if l<j then sort(l,j);
    if i<r then sort(i,r);
  end;

begin
  Sort(Low(A), High(A));
end;

// unit1.pas
  T = TPoint;
  function LESS(const a,b: T): boolean;
  begin
    result := a.x<b.x;
  end;
  {$I qsort.inc}

var 
  a: array of TPoint;
begin  
  ...
  SortRow(a);
  ...
end;

Я использую шаблоны в Дельфи-7 ололо.

TarasB, 28 Июня 2011

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

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

+153

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

function read($fields = null, $id = null) {
	$this->validationErrors = array();

	if ($id != null) {
		$this->id = $id;
	}

	$id = $this->id;

	if (is_array($this->id)) {
		$id = $this->id[0];
	}

	if ($id !== null && $id !== false) {
		$this->data = $this->find(array($this->alias.'.'.$this->primaryKey => $id), $fields);
		return $this->data;
	} else {
		return false;
	}
}

И ещё cakePHP (самый-самый фреймворк, даже в говнокоде впереди планеты всей).

zabuhailo, 28 Июня 2011

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

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

+147

1
2
3

if ($this->alias === null) {
			$this->alias = (isset($alias) ? $alias : $this->name);
		}

Это cakePHP. Вот так вот в нём модель узнаёт свой alias.

zabuhailo, 28 Июня 2011

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

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

+147

1
2
3
4
5
6
7

Если вам нужно запустить скрипт написанный на jQuery по окончанию загрузки страницы

$(document).ready( function(){
  // ну и тут ваш код
});

Преимущество это метода, в том, что он исполняет скрипт по окончанию загрузки кода страницы, НЕ включая флеш баннеры и видео.

Увидел на одном сайте, который "учит" jQuery

substr, 28 Июня 2011

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

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

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

bash / Говнокод #7100

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

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

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

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

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

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

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

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