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

    В номинации:
    За время:
  2. Pascal / Говнокод #7095

    +89

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    41. 41
    42. 42
    43. 43
    44. 44
    45. 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)
  3. PHP / Говнокод #6811

    +154

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    $dbh = $this->initDbh('master');
    $srv = $dbh->getServer();
    if ($srv->isSlave())
    {
           $this->triggerError('Trying write on slave');
           return false;
    }

    Перестархуй

    travka, 01 Июня 2011

    Комментарии (27)
  4. Pascal / Говнокод #6803

    +110

    1. 1
    2. 2
    3. 3
    DataModule1.QueryPlayers.Close; 
    DataModule1.QueryPlayers.SQL.Text:='select fp_id, fp_familiya, fp_imya, fp_otchestvo, FP_DATE_ZAKLUCHENIYA_CONTRAKTA, FP_DATE_OKONCHANIYA_CONTRAKTA,FP_OKLAD,fp_amplua,amp_nazvanie from football_player f,amplua a where f.fp_amplua=a.amp_id and f.fp_familiya like "'+ str+'%"'; 
    DataModule1.QueryPlayers.Open;

    Девушка, работа с базой.

    bloodye, 31 Мая 2011

    Комментарии (27)
  5. 1C / Говнокод #6763

    −128

    1. 1
    2. 2
    тПодр	= Справочники.СотрудникиОрганизаций.НайтиПоКоду(Физлицо.Код).ПолучитьОбъект().ТекущееПодразделениеОрганизации;
    тДолжн	= Справочники.СотрудникиОрганизаций.НайтиПоКоду(Физлицо.Код).ПолучитьОбъект().ТекущаяДолжность;

    а может, только так и надо?

    -ggorky, 26 Мая 2011

    Комментарии (27)
  6. Objective C / Говнокод #6740

    −110

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    if (starsCounter == 1) 
    	{
    		[DCObjects drawSpriteFromBatch:bg name:@"star-little.png" point:ccp(250, 190) z:1 tag:1];	
    	}
    	else if (starsCounter == 2) 
    	{
    		[DCObjects drawSpriteFromBatch:bg name:@"star-little.png" point:ccp(250, 190) z:1 tag:1];
    		[DCObjects drawSpriteFromBatch:bg name:@"star-little.png" point:ccp(260, 190) z:1 tag:1];
    	}
    	else if (starsCounter == 3) 
    	{
    		[DCObjects drawSpriteFromBatch:bg name:@"star-little.png" point:ccp(250, 190) z:1 tag:1];
    		[DCObjects drawSpriteFromBatch:bg name:@"star-little.png" point:ccp(260, 190) z:1 tag:1];
    		[DCObjects drawSpriteFromBatch:bg name:@"star-little.png" point:ccp(270, 190) z:1 tag:1];
    	}
    	else if (starsCounter == 4) 
    	{
    		[DCObjects drawSpriteFromBatch:bg name:@"star-little.png" point:ccp(250, 190) z:1 tag:1];
    		[DCObjects drawSpriteFromBatch:bg name:@"star-little.png" point:ccp(260, 190) z:1 tag:1];
    		[DCObjects drawSpriteFromBatch:bg name:@"star-little.png" point:ccp(270, 190) z:1 tag:1];
    		[DCObjects drawSpriteFromBatch:bg name:@"star-little.png" point:ccp(280, 190) z:1 tag:1];
    	}
    	else if (starsCounter == 5) 
    	{
    		[DCObjects drawSpriteFromBatch:bg name:@"star-little.png" point:ccp(250, 190) z:1 tag:1];
    		[DCObjects drawSpriteFromBatch:bg name:@"star-little.png" point:ccp(260, 190) z:1 tag:1];
    		[DCObjects drawSpriteFromBatch:bg name:@"star-little.png" point:ccp(270, 190) z:1 tag:1];
    		[DCObjects drawSpriteFromBatch:bg name:@"star-little.png" point:ccp(280, 190) z:1 tag:1];
    		[DCObjects drawSpriteFromBatch:bg name:@"star-little.png" point:ccp(290, 190) z:1 tag:1];
    	}

    Chippman, 24 Мая 2011

    Комментарии (27)
  7. PHP / Говнокод #6730

    +170

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    static public function break_value($value)
             {  
                       
              $value=str_ireplace("echo","_", "$value");
              $value=str_ireplace("==","_", "$value");
              //$value=str_ireplace("$","_", "$value");
              $value=str_ireplace("GET","_", "$value");
              $value=str_ireplace("POST","_", "$value");
              $value=str_ireplace("function","_", "$value");
              $value=str_ireplace("if(","_", "$value");
              $value=str_ireplace("else","_", "$value");
              $value=str_ireplace("query","_", "$value");
              $value=str_ireplace("\'","\"", "$value");
              $value=str_ireplace("document.","_", "$value");
              $value=str_ireplace("window.","_", "$value");
              $value=str_ireplace("{","(", "$value");
              $value=str_ireplace("}",")", "$value");
              $value=str_ireplace("getElementByID","_", "$value");
              $value=str_ireplace("script","_", "$value");
              $value=str_ireplace("exit","_", "$value");
              $value=str_ireplace("break","_", "$value");
              $value=str_ireplace("include","_", "$value");
              $value=str_ireplace("session","_", "$value");
              $value=str_ireplace("header","_", "$value");
              $value=str_ireplace("alert","_", "$value");
              $value=str_ireplace("хуй","_", "$value");
              $value=str_ireplace("блять","_", "$value");
              $value=str_ireplace("блядь","_", "$value");
              $value=str_ireplace("педераст","_", "$value");
              $value=str_ireplace("пидарас","_", "$value");
              $value=str_ireplace("сука","_", "$value");
              $value=str_ireplace("ебан","_", "$value");
              $value=str_ireplace("еблан","_", "$value");
              $value=str_ireplace("мудак","_", "$value");
              $value=str_ireplace("скотин","_", "$value");
              $value=str_ireplace("ублюдок","_", "$value");
              $value=str_ireplace("мразь","_", "$value");
            
              return $value;
             }

    Попросили поучаствовать в проекте. это кусок класса protection, который был создан для того чтобы фильтровать переменные в GET и POST :D

    nolka4, 22 Мая 2011

    Комментарии (27)
  8. PHP / Говнокод #6697

    +173

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    41. 41
    42. 42
    43. 43
    44. 44
    45. 45
    46. 46
    47. 47
    48. 48
    //Такую штуку можно встретить на большинстве страниц раз по 5
    $lrow = mysql_query("select title,sendn,sende,notifs,
              nmails,nmails1,nmails2,nmails3,nmails4,nmails5,nmails6,nmails7,nmails8,nmails9,nmails10,
              nmails11,nmails12,nmails13,nmails14,nmails15,nmails16,nmails17,nmails18,nmails19,nmails20,
              nmails21,nmails22,nmails23,nmails24,nmails25,nmails26,nmails27,nmails28,nmails29,nmails30,
              nmails31,nmails32,nmails33,nmails34,nmails35,nmails36,nmails37,nmails38,nmails39,nmails40,
              cont,cont1,cont2,cont3,cont4,cont5,cont6,cont7,cont8,cont9,cont10,
              cont11,cont12,cont13,cont14,cont15,cont16,cont17,cont18,cont19,cont20,
              cont21,cont22,cont23,cont24,cont25,cont26,cont27,cont28,cont29,cont30,
              cont31,cont32,cont33,cont34,cont35,cont36,cont37,cont38,cont39,cont40,
              texts,texts1,texts2,texts3,texts4,texts5,texts6,texts7,texts8,texts9,texts10,
              texts11,texts12,texts13,texts14,texts15,texts16,texts17,texts18,texts19,texts20,
              texts21,texts22,texts23,texts24,texts25,texts26,texts27,texts28,texts29,texts30,
              texts31,texts32,texts33,texts34,texts35,texts36,texts37,texts38,texts39,texts40 from $ltable where listnum = '$ulist'",$link) or die('admin-37-'.mysql_error());
      list($ltitle,$sendn,$sende,$notifs,
              $nmails,$nmails1,$nmails2,$nmails3,$nmails4,$nmails5,$nmails6,$nmails7,$nmails8,$nmails9,$nmails10,
              $nmails11,$nmails12,$nmails13,$nmails14,$nmails15,$nmails16,$nmails17,$nmails18,$nmails19,$nmails20,
              $nmails21,$nmails22,$nmails23,$nmails24,$nmails25,$nmails26,$nmails27,$nmails28,$nmails29,$nmails30,
              $nmails31,$nmails32,$nmails33,$nmails34,$nmails35,$nmails36,$nmails37,$nmails38,$nmails39,$nmails40,
              $cont,$cont1,$cont2,$cont3,$cont4,$cont5,$cont6,$cont7,$cont8,$cont9,$cont10,
              $cont11,$cont12,$cont13,$cont14,$cont15,$cont16,$cont17,$cont18,$cont19,$cont20,
              $cont21,$cont22,$cont23,$cont24,$cont25,$cont26,$cont27,$cont28,$cont29,$cont30,
              $cont31,$cont32,$cont33,$cont34,$cont35,$cont36,$cont37,$cont38,$cont39,$cont40,
              $texts,$texts1,$texts2,$texts3,$texts4,$texts5,$texts6,$texts7,$texts8,$texts9,$texts10,
              $texts11,$texts12,$texts13,$texts14,$texts15,$texts16,$texts17,$texts18,$texts19,$texts20,
              $texts21,$texts22,$texts23,$texts24,$texts25,$texts26,$texts27,$texts28,$texts29,$texts30,
              $texts31,$texts32,$texts33,$texts34,$texts35,$texts36,$texts37,$texts38,$texts39,$texts40)=mysql_fetch_row($lrow);
    
    // Это вывод строк, полученных выше
    echo "
    <br>
     <input type=text class=xbox name=tnmails1 value=\"".htmlspecialchars($nmails1)."\" size=61 style=\"width: 150px\">";
    
     $res1 = mysql_query ("SELECT subject,content FROM lm_saved");
     $myrow1 = mysql_fetch_array ($res1);
     echo "<select name=tncont1 style='width:150px'>";
     if($tncont1){
     	echo "<option selected>$tncont1</option>";
    	$rrr1 = mysql_query("SELECT content from lm_saved where subject='$tncont1'");
    	$rrrrow1 = mysql_fetch_array ($rrr1);
    	mysql_query ("UPDATE lm_lists SET texts1='$rrrrow1[content]' WHERE listnum='$list'"); }
    		else {echo "<option selected>".htmlspecialchars($cont1)."</option>";}
    		do { echo "<option value='$myrow1[subject]'>$myrow1[subject]</option>";}
    		while ($myrow1 = mysql_fetch_array ($res1));
    		echo "</select>";
    getUserFieldsList($ltable,$list, 2);
     
    // И так еще раз 39 ...

    Дали задание "добавить еще 20 полей в программе". Похоже автор сеиго не подозревал об fetch_assoc и циклах. Каждая страница этой "программы" включает в себя css + html + js. Самое обидное, что сделать как надо - потратить пару месяцев, посему приходиться делать тоже самое тупым копипастом. Впервые в жизни меня реально тошнило от правки кода.

    index0h, 17 Мая 2011

    Комментарии (27)
  9. PHP / Говнокод #6572

    +165

    1. 1
    2. 2
    3. 3
    4. 4
    function do_it()
    {
    	return false;
    }

    _tL, 06 Мая 2011

    Комментарии (27)
  10. Pascal / Говнокод #6305

    +110

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    DirName:=OpenDialog1.FileName;
        i:=Length(Dirname);
        While (i>0) and(Dirname[i]<>'\') do
        begin
          i:=i-1;
        end;
        If Dirname[i]='\' then Dirname:=Copy(Dirname,1,i-1);
        Edit1.Text:=DirName;

    Для определения директории, выбирается в ней файл, абсолютный путь к которому вырезается до первого найденного слеша

    replay, 10 Апреля 2011

    Комментарии (27)
  11. JavaScript / Говнокод #6079

    +171

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    inExp = function (dig, exp) {
    02.if (exp == 1) return alert(dig);
    03.if (exp == 2) return alert(dig*dig);
    04.if (exp == 3) return alert(dig*dig*dig);
    05.if (exp == 4) return alert(dig*dig*dig*dig);
    06.if (exp == 5) return alert(dig*dig*dig*dig*dig);
    07.if (exp == 6) return alert(dig*dig*dig*dig*dig*dig);
    08.if (exp == 7) return alert(dig*dig*dig*dig*dig*dig*dig);
    09.if (exp == 8 ) return alert(dig*dig*dig*dig*dig*dig*dig*dig);
    10.if (exp == 9) return alert(dig*dig*dig*dig*dig*dig*dig*dig*dig);
    11.if (exp == 10) return alert(dig*dig*dig*dig*dig*dig*dig*dig*dig*dig);
    12.if (exp == 11) return alert(dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig);
    13.if (exp == 12) return alert(dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig);
    14.if (exp == 13) return alert(dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig);
    15.if (exp == 14) return alert(dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig);
    16.if (exp == 15) return alert(dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig);
    17.if (exp == 16) return alert(dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig);
    18.if (exp == 17) return alert(dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig);
    19.if (exp == 18) return alert(dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig);
    20.if (exp == 19) return alert(dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig);
    21.if (exp == 20) return alert(dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig);
    22.if (exp == 21) return alert(dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig);
    23.if (exp == 22) return alert(dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig);
    24.if (exp == 23) return alert(dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig);
    25.if (exp == 24) return alert(dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig);
    26.if (exp == 25) return alert(dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig);
    27.if (exp == 26) return alert(dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig);
    28.if (exp == 27) return alert(dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig);
    29.if (exp == 28) return alert(dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig);
    30.if (exp == 29) return alert(dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig);
    31.if (exp == 30) return alert(dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig*dig);
    32.}

    Боян не? попалось на глаза в блоге каком-то случайно

    vitaly, 24 Марта 2011

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