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

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

+138

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

function StripLeadingComma(str)
  str = Ltrim(str)
  if len(str) > 0 then
    if Left(str,1) = "," then  str = Mid(str,2)
  end if
  if len(str) > 0 then
    if Left(str,1) = "," then  str = Mid(str,2)
  end if
  if len(str) > 0 then
    if Left(str,1) = "," then  str = Mid(str,2)
  end if
  if len(str) > 0 then
    if Left(str,1) = "," then  str = Mid(str,2)
  end if
  StripLeadingComma = str
end function

function StripTrailingComma(str)
  str = rtrim(str)
  if len(str) > 0 then
    if Right(str,1) = "," then  str = Left(str,len(str)-1)
  end if
  if len(str) > 0 then
    if Right(str,1) = "," then  str = Left(str,len(str)-1)
  end if
  if len(str) > 0 then
    if Right(str,1) = "," then  str = Left(str,len(str)-1)
  end if
  if len(str) > 0 then
    if Right(str,1) = "," then  str = Left(str,len(str)-1)
  end if
  if len(str) > 0 then
    if Right(str,1) = "," then  str = Left(str,len(str)-1)
  end if
  if len(str) > 0 then
    if Right(str,1) = "," then  str = Left(str,len(str)-1)
  end if
  StripTrailingComma = str
end function

Классика жанра на production. ASP, VBScript.

Seth, 08 Ноября 2010

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

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

+146

1
2
3
4

logit("e", "%s No Menu! Wait 5 minutes and try again.\n", whoami);
for(j=0;j<60;j++) {
    sleep_ew( 5000 );       /* wait around */
}

sgram из earthworm

ftptrash, 08 Ноября 2010

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

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

+166

1
2
3
4
5

function document_write($text)
{
	document.write($text);
	return false;
}

говнокод от diary.ru

desu, 08 Ноября 2010

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

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

+106

1
2
3

FilterKey = 'Software'+'\'+CompanyName+'\'+ApplName+'\'+ApplVersion+'\'+SettingsKey+'\'+'FilterDD';
OrderKey = 'Software'+'\'+CompanyName+'\'+ApplName+'\'+ApplVersion+'\'+SettingsKey+'\'+'OrderDD';
NotepadKey = 'Software'+'\'+CompanyName+'\'+ApplName+'\'+ApplVersion+'\'+SettingsKey+'\'+'Notepad';

повторение - мать учения

gorsash, 08 Ноября 2010

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

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

+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
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49

function cp1251_to_utf8 ($txt)  {
   $in_arr = array (
       chr(208), chr(192), chr(193), chr(194),
       chr(195), chr(196), chr(197), chr(168),
       chr(198), chr(199), chr(200), chr(201),
       chr(202), chr(203), chr(204), chr(205),
       chr(206), chr(207), chr(209), chr(210),
       chr(211), chr(212), chr(213), chr(214),
       chr(215), chr(216), chr(217), chr(218),
       chr(219), chr(220), chr(221), chr(222),
       chr(223), chr(224), chr(225), chr(226),
       chr(227), chr(228), chr(229), chr(184),
       chr(230), chr(231), chr(232), chr(233),
       chr(234), chr(235), chr(236), chr(237),
       chr(238), chr(239), chr(240), chr(241),
       chr(242), chr(243), chr(244), chr(245),
       chr(246), chr(247), chr(248), chr(249),
       chr(250), chr(251), chr(252), chr(253),
       chr(254), chr(255)
   );

   $out_arr = array (
       chr(208).chr(160), chr(208).chr(144), chr(208).chr(145),
       chr(208).chr(146), chr(208).chr(147), chr(208).chr(148),
       chr(208).chr(149), chr(208).chr(129), chr(208).chr(150),
       chr(208).chr(151), chr(208).chr(152), chr(208).chr(153),
       chr(208).chr(154), chr(208).chr(155), chr(208).chr(156),
       chr(208).chr(157), chr(208).chr(158), chr(208).chr(159),
       chr(208).chr(161), chr(208).chr(162), chr(208).chr(163),
       chr(208).chr(164), chr(208).chr(165), chr(208).chr(166),
       chr(208).chr(167), chr(208).chr(168), chr(208).chr(169),
       chr(208).chr(170), chr(208).chr(171), chr(208).chr(172),
       chr(208).chr(173), chr(208).chr(174), chr(208).chr(175),
       chr(208).chr(176), chr(208).chr(177), chr(208).chr(178),
       chr(208).chr(179), chr(208).chr(180), chr(208).chr(181),
       chr(209).chr(145), chr(208).chr(182), chr(208).chr(183),
       chr(208).chr(184), chr(208).chr(185), chr(208).chr(186),
       chr(208).chr(187), chr(208).chr(188), chr(208).chr(189),
       chr(208).chr(190), chr(208).chr(191), chr(209).chr(128),
       chr(209).chr(129), chr(209).chr(130), chr(209).chr(131),
       chr(209).chr(132), chr(209).chr(133), chr(209).chr(134),
       chr(209).chr(135), chr(209).chr(136), chr(209).chr(137),
       chr(209).chr(138), chr(209).chr(139), chr(209).chr(140),
       chr(209).chr(141), chr(209).chr(142), chr(209).chr(143)
   );

   $txt = str_replace($in_arr,$out_arr,$txt);
   return $txt;
}

iconv - для лохов!!!111
Все тотже программист с опытом 12 лет.

warider, 08 Ноября 2010

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

Python / Говнокод #4556

−99

01
02
03
04
05
06
07
08
09
10

def __init__(self, pth = None):
		self._tag = None
		self._valid = False
		self._pthtofile = pth
		if pth != None:
			try:
				self._tag = tagpy.FileRef(pth).tag()
				self._valid = True
			except ValueError:
				pass

Конструктор класса.
Дальше приходится всё время дёргать объект проверяя его на валидность.
Как переписать не так говнисто?

KoirN, 07 Ноября 2010

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

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

+145

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

/**
     * Получаем права на объект.
     *
     * @param  string $fullHref
     * @param  string $method
     * @param  string $params
     * @param  string $type
     * @return object $this
     * @access public
     */

    public function getPermsHref( $object, $method = '*', $params = false, $type = 'module', $url = false )
    {
       $registr = URegistry::getInstance();
       $sql     = $registr->SQuery->getAcl();

       if ( $type == 'url' && $url )
         {
           $sql['where'] = "`o`.`type` = 'url' and `o`.`href` = '".$url."'";
           $ac_type      = 'url';
         }
       elseif ( $type == 'module' )
         {
            $sql['where'] = "(`o`.`type` = 'module') and `o`.`name` = '".$object."'";
            if ( $method != '*' )
                $sql['where'] .= ' or `o`.`href` = "'.$object.'/'.$method.'"';

            $ac_type = 'module';
         }
       else
         {
            //TODO:wtf?
         }

        $registr->db->build_query($sql)->safe_sql($ac_type, $this->gid)->exec();
        $perms = $registr->db->fetch_object();

        if ( !$perms || !$perms->permission || !$perms->groupid )
            throw new NotFoundObject();

        $this->perms       = $perms->permission;
        $this->groupObject = explode(',', $perms->groupid);
        $this->priv_lengh  = strlen($perms->permission);

        return $this;
    }

    /**
     * Проверка прав на объект
     *
     * @param  mixed $priv
     * @return array
     * @access public
     */

    public function checkPremsObject( $priv = false )
    {
        $pruf = array();
        $priv = empty($priv) ? $this->perms : $priv;

        if ( $this->priv_lengh <= 0 or !in_array($this->gid, $this->groupObject) )
            return false;

        for ( $gi = 0; $gi < $this->priv_lengh; $gi++ )
        {
            if ( in_array($priv[$gi], $this->privileges['read']) )   $pruf['read'] = true;
            if ( in_array($priv[$gi], $this->privileges['write']) )  $pruf['write'] = true;
            if ( in_array($priv[$gi], $this->privileges['delete']) ) $pruf['delete'] = true;
        }

        return $pruf;
    }

Проверка прав.
Что скажите?

ololo, 07 Ноября 2010

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

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

+145

01
02
03
04
05
06
07
08
09
10
11

{
float y,a,b;
int x;
a=StrToFloat(Edit1->Text);
b=StrToFloat(Edit2->Text);
for (x=1;x<=10;x+=2);
{
y=x*x/(a+b);
Memo1->Lines->Add("x="+FloatToStr(x)+"\ty="+FloatToStr(y));
}
}

программа вычисления функции , при изменении Х от 1 до 10 .

samvel13, 07 Ноября 2010

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

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

+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

if Z = 'Pr'
    then
      case N of
      1: Series1.Assign(Series33);
      2: Series2.Assign(Series33);
      3: Series3.Assign(Series33);
      4: Series4.Assign(Series33);
      5: Series5.Assign(Series33);
      end
    else
      if Z = 'ST'
        then
          case N of
          1: case Kolvo_Issledovanii of
            1: Series6.Assign(Series33);
            2: Series34.Assign(Series33);
            3: Series59.Assign(Series33);
            end;
//пропущено 15 строк 
          5: case Kolvo_Issledovanii of
            1: Series10.Assign(Series33);
            2: Series38.Assign(Series33);
            3: Series63.Assign(Series33);
            end;
          end
        else
          if Z = 'TT'
            then
              case N of
              1:
                case Kolvo_Issledovanii of
                1: Series11.Assign(Series33);
                2: Series39.Assign(Series33);
                3: Series64.Assign(Series33);
                end;
//в том же духе, ещё 150 строк
//вообще-то, в том же духе - весь код, около 5000 строк
//...

//в другом месте:
  Series1.Clear;
  Series2.Clear;
  Series3.Clear;
  Series4.Clear;
//пропущено 75 строк
  Series80.Clear;
  Series81.Clear;
  Series82.Clear;
  Series83.Clear;
//...

  Series1.Active:=false;
  Series2.Active:=false;
  Series3.Active:=false;
  Series4.Active:=false;
//пропущено 75 строк
  Series80.Active:=false;
  Series81.Active:=false;
  Series82.Active:=false;
  Series83.Active:=false;

Фтопку ООП!
Такой вот диплом был сдан кем-то в прошлом году.

maniac, 07 Ноября 2010

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

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

+145

01
02
03
04
05
06
07
08
09
10
11

switch ($_GET['otdel']) {
	case null:
		echo "Название отдела №1";
		$_GET['otdel'] = 1;
	break;
	case 1:
		echo "Название отдела №1";
	break;

	case 11:
// и так далее

Отдел по умолчанию.
Вариантов написать толково - тьма. Попробуем?

AndryG, 07 Ноября 2010

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

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

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

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

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

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

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

Python / Говнокод #4556

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

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

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

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