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

• Все
• Лучший
• Сток
• Глупый поиск
• Наговнокодить!
• Oтзывы

Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!

1. PHP (5703)
2. C++ (2738)
3. Куча (2336)
4. JavaScript (2030)
5. C# (1929)
6. Java (1503)
7. Си (1102)
8. Pascal (649)
9. Python (585)
10. 1C (536)
11. SQL (434)
12. ActionScript (294)
13. Objective C (204)
14. bash (200)
15. Perl (196)
16. Assembler (148)
17. Ruby (144)
18. VisualBasic (140)
19. Lua (51)
20. Go (31)
21. Swift (29)
22. Haskell (28)
23. Kotlin (15)

1. PHP / Говнокод #1184

   +44.7

   1. 01
   2. 02
   3. 03
   4. 04
   5. 05
   6. 06
   7. 07
   8. 08
   9. 09
   10. 10
   11. 11

   $mktime=mktime(0,0,0,$month,$i,$year);
   $day_of_week=date("D",$mktime);
   switch($day_of_week){
   	case "Sun": $blank = 0; break;
   	case "Mon": $blank = 1; break;
   	case "Tue": $blank = 2; break;
   	case "Wed": $blank = 3; break;
   	case "Thu": $blank = 4; break;
   	case "Fri": $blank = 5; break;
   	case "Sat": $blank = 6; break;
   }

   guest, 11 Июня 2009

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

2. PHP / Говнокод #1183

   +141.9

   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

   $month=$_POST["month"];
   $year=$_POST["year"];
   $week=$_POST["week"];
   $month_c=$month;
   switch($month_c){
   	case 1:
   	case 3:
   	case 5:
   	case 7:
   	case 8:
   	case 10:
   	case 12:
   		$c=31;
   		break;
   	case 2:
   		if (checkdate(2, 29,$year)) {
   			$c=29;
   		}else{
   			$c=28;}
   		break;
   	case 4:
   	case 6:
   	case 9:
   	case 11:
   	       $c=30;
   	       break;
   } // switch

   guest, 11 Июня 2009

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

3. Ruby / Говнокод #1182

   −298.7

   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

   require "rubygems"
   require 'net/ssh'
   class << Net::SSH
     def butforse(passwordarr)
               begin
                 puts "Try password #{passwordarr}"
                 Net::SSH.start('localhost', 'root', :password => "#{passwordarr}")
                 puts "!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!"
                 exit
               rescue Net::SSH::AuthenticationFailed
               end
     end
   end
   arrays = Array("a".."zz")
   arr1 = arrays[0, (arrays.size-1) / 2]
   arr2 = arrays[(arrays.size - 1) / 2, arrays.size - 1]
   threadsz = []
   threadsz2 = []
   threadsz << Thread.new(arr1) { |items|
     for item in items
       Net::SSH.butforse(item)
     end
   }
   threadsz2 << Thread.new(arr2) { |items|
     for item in items
       Net::SSH.butforse(item)
     end
   }
   threadsz.each {|i| i.join}
   threadsz2.each {|i| i.join}

   И я решил что лудше сразу создать оптимальное количество нитий,

   guest, 11 Июня 2009

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

4. Ruby / Говнокод #1181

   −310.4

   1. 01
   2. 02
   3. 03
   4. 04
   5. 05
   6. 06
   7. 07
   8. 08
   9. 09
   10. 10
   11. 11

   for page in pages
     threads << Thread.new(page) { |myPage|
       begin
         puts "Try password #{passwordarr}"
         Net::SSH.start('localhost', 'root', :password => "#{passwordarr}")
         puts "!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!"
         exit
        rescue Net::SSH::AuthenticationFailed
        end
     }
   end

   "взялся я ту периберать пароли от моего ssh..."

   guest, 11 Июня 2009

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

5. PHP / Говнокод #1180

   +154

   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

   Html:
   <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html>
    <head>
     <title>I LOVE ZEND FRAMEWORK!</title>  <meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />  <link href="/zend/public/design/css/style.css" media="screen" rel="stylesheet" type="text/css" />  <link href="/zend/public/design/css/style.css" media="screen" rel="stylesheet" type="text/css" />
   <link href="/zend/public/design/css/teststyle.css" media="screen" rel="stylesheet" type="text/css" /></head>
   <body>
   
   PHP:
   
   <?php echo $this->doctype(Zend_View_Helper_Doctype::XHTML1_TRANSITIONAL); ?>
   <html>
    <head>
     <?php echo $this->headTitle('I LOVE ZEND FRAMEWORK!'); ?>
     <?php echo $this->headMeta()->appendHttpEquiv('Content-Type', 'text/html; charset=UTF-8'); ?>
     <?php echo $this->headLink()->appendStylesheet($this->baseUrl . 'design/css/style.css'); ?>
     <?php echo $this->headLink()->appendStylesheet($this->baseUrl . 'design/css/teststyle.css'); ?>
   </head>

   guest, 11 Июня 2009

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

6. SQL / Говнокод #1179

   −128.7

   1. 1
   2. 2

   if(mysql_query('DROP TABLE table_name'))
     echo "таблица существовала ;(";

   Проверка таблицы на существование.
   Взято самизнаетеоткуда
   
   ЗЫ SQL+PHP

   guest, 11 Июня 2009

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

7. Java / Говнокод #1178

   +77.5

   1. 1
   2. 2
   3. 3
   4. 4

   /**
    * Этот класс содержит сакральные знания, полученные годами отладки предыдущей версии.
    * Рационально понять этот код невозможно, поэтому менять с осторожностью!
    */

   В одном из классов нашел вот такой вот комментарий.

   guest, 11 Июня 2009

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

8. Куча / Говнокод #1177

   +129.6

   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

   TYPE
      Numbers=RECORD
        a:ARRAY 1000 OF INTEGER;
        N:INTEGER;
      END;
   
   ........
   
   PROCEDURE Summ(OUT res:Numbers;IN a,b:Numbers); (*Проверена*)
    VAR
      max,i,sum:INTEGER;
   BEGIN (*Суммирование*)
     IF a.N>b.N THEN 
      max:=a.N;
     ELSE
      max:=b.N;
     END;
     i:=0;
     sum:=0;
     WHILE i<=max DO
      IF i<=a.N THEN
        sum:=sum+a.a[i];
      END;
      IF i<=b.N THEN
        sum:=sum+b.a[i];
      END;
      res.a[i]:=sum MOD 10;
      sum:=sum DIV 10;
      i:=i+1;
     END;
     IF sum>0 THEN
       res.N:=max+1;
       res.a[max+1]:=sum;
     ELSE
       res.N:=max;
     END;
   END Summ;

   Кусок из написанной одним энтузиастом-программером реализации длинной арифметики (комментарии сохранены)
   4 байта под каждую десятичную цифру. Много? Зато все понятно, как в школе ;)
   шесть + семь = три, единица на ум пошла...
   
   P.S. язык оберон - наследник паскаля

   guest, 10 Июня 2009

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

9. Куча / Говнокод #1176

   +152

   1. 1
   2. 2
   3. 3

   <xsl:variable name="regexp">
   	<xsl:text disable-output-escaping="yes">^(?:(?:(?:0?[13578]|1[02])(\/|-|\.)31)\1|(?:(?:0?[13-9]|1[0-2])(\/|-|\.)(?:29|30)\2))(?:19\d\d|20\d\d|\*\*\*\*)$|^(?:0?2(\/|-|\.)29\3(?:(?:(?:19|20)?(?:0[48]|[2468][048]|[13579][26])|(?:(?:19|[2468][048]|[3579][26])00))))$|^(?:(?:0?[1-9])|(?:1[0-2]))(\/|-|\.)(?:0?[1-9]|1\d|2[0-8])\4(?:19\d\d|20\d\d|\*\*\*\*)$</xsl:text>
   </xsl:variable>

   В XSLT - регулярное выражение то ли для показа, то ли для валидации дня рождения.

   guest, 10 Июня 2009

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

10. Perl / Говнокод #1175

    −207.6

    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
    49. 49
    50. 50
    51. 51
    52. 52
    53. 53
    54. 54
    55. 55
    56. 56
    57. 57
    58. 58
    59. 59
    60. 60
    61. 61
    62. 62
    63. 63
    64. 64
    65. 65
    66. 66
    67. 67
    68. 68
    69. 69
    70. 70
    71. 71
    72. 72
    73. 73
    74. 74
    75. 75
    76. 76
    77. 77
    78. 78
    79. 79
    80. 80
    81. 81
    82. 82

    #sub load_midi_positions_random {
    ##
    ## Вот понапишут такого кода, а потом системные администраторы виноваты что сервер тормозит ;-) ....
    ## У Вас есть  враги ? Подарите им этот уникальный код !
    ##.
    #
    #    my $dbh = get_pg_connect();
    #    my $sql = "SELECT count(id) FROM midi_data where name<>'Unsorted'";
    #    my $sth = $dbh->prepare($sql) or die $DBI::errstr;
    #    $sth->execute or die $DBI::errstr;
    #    my $i=$sth->fetchrow();
    #    $sth->finish or die $DBI::errstr;
    #....
    #my    $PIC_COUNT=$i;
    #my    $pic1 = int (rand($i));
    #my    $pic2 = int (rand($i));
    #my $count=0;
    #    while ($pic1 == $pic2 && $count < 20){
    #        $pic2 = int (rand($PIC_COUNT));
    #        $count++;
    #    }
    #    my $pic3 = int (rand($PIC_COUNT));
    #    $count = 0;
    #    while (($pic1 == $pic3 || $pic2 == $pic3 || $pic2 == $pic1) && $count < 20){
    #        $pic3 = int (rand($PIC_COUNT));
    #        $count++;
    #    }
    #    my $pic4 = int (rand($PIC_COUNT));
    #    $count = 0;
    #    while (($pic1 == $pic2 || $pic1 == $pic3 || $pic1 == $pic4  || $pic2 == $pic3 || $pic2 == $pic4  || $pic3 == $pic4) && $count < 20){
    #        $pic4 = int (rand($PIC_COUNT));
    #        $count++;
    #    }
    #    my $pic5 = int (rand($PIC_COUNT));
    #    $count = 0;
    #    while (($pic1 == $pic2 || $pic1 == $pic3 || $pic1 == $pic4  || $pic2 == $pic3 || $pic2 == $pic4  || $pic3 == $pic4 || $pic1 == $pic5 || $pic2 == $pic5
    #    || $pic3 == $pic5 || $pic4 == $pic5) && $count < 20){
    #        $pic5 = int (rand($PIC_COUNT));
    #        $count++;
    #    }
    #    my $pic6 = int (rand($PIC_COUNT));
    #    $count = 0;
    #    while (($pic1 == $pic2 || $pic1 == $pic3 || $pic1 == $pic4  || $pic2 == $pic3 || $pic2 == $pic4  || $pic3 == $pic4 || $pic1 == $pic5 || $pic2 == $pic5
    #    || $pic3 == $pic5 || $pic4 == $pic5
    #    || $pic1 == $pic6 || $pic2 == $pic6 || $pic3 == $pic6 || $pic4 == $pic6 || $pic5 == $pic6  ) && $count < 20){
    #        $pic6 = int (rand($PIC_COUNT));
    #        $count++;
    #    }
    #    my $pic7 = int (rand($PIC_COUNT));
    #    $count = 0;
    #    while (($pic1 == $pic2 || $pic1 == $pic3 || $pic1 == $pic4  || $pic2 == $pic3 || $pic2 == $pic4  || $pic3 == $pic4 || $pic1 == $pic5 || $pic2 == $pic5
    #    || $pic3 == $pic5 || $pic4 == $pic5
    #    || $pic1 == $pic6 || $pic2 == $pic6 || $pic3 == $pic6 || $pic4 == $pic6 || $pic5 == $pic6..
    #    || $pic1 == $pic7 || $pic2 == $pic7 || $pic3 == $pic7 || $pic4 == $pic7 || $pic5 == $pic7  || $pic6 == $pic7) && $count < 20
    #
    #    ){
    #        $pic6 = int (rand($PIC_COUNT));
    #        $count++;
    #    }
    #
    #    $sql = "SELECT * FROM midi_data where name<>'Unsorted' order by id";
    #    $sth = $dbh->prepare($sql) or die $DBI::errstr;
    #    $sth->execute or die $DBI::errstr;
    #    my @result;
    #    while(my @row = $sth->fetchrow){
    #        my $tmp = split_midi_position(@row);
    #    	$tmp->{POSITION_NAME}=~ s/(\d{4})//;
    #	$tmp->{POSITION_YEAR}=$1;
    #        push @result, $tmp;....
    #    }
    #my @new=();
    #$new[0]=$result[$pic1];
    #$new[1]=$result[$pic2];
    #$new[2]=$result[$pic3];
    #$new[3]=$result[$pic4];
    #$new[4]=$result[$pic5];
    #$new[5]=$result[$pic6];
    #$new[6]=$result[$pic7];
    #$sth->finish or die $DBI::errstr;
    #    return @new;
    #}
    ###

    Таблица midi_data > 15000 записей.
    Этот код вызывался несколько раз в секунду...

    guest, 10 Июня 2009

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

• ← влево
• вправо →

• 2103
• …
• 116
• 115
• 114
• 113
• 112
• 111
• 110
• 109
• 108
• …
• 1