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

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

    −115

    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
    #если делится на 3 без остатка, то приписываем 3 
    
    if (!($sn%3)){$sn.="3";}
    
    #если делится на 2 без остатка, то припысываем 2
    
    elsif (!($sn%2)){$sn.="2";}
    
    #если делится на 5 без остатка, то припысываем 5
    
    elsif (!($sn%5)){$sn.="5";}
    
    #втрой округ шифрования
    
    #если делится на 7 без остатка, то приписываем 8 
    
    if (!($sn%7)){$sn.="8";}
    
    #если делится на 3 без остатка, то припысываем 2
    
    elsif (!($sn%3)){$sn.="2";}
    
    #если делится на 5 без остатка, то припысываем 3
    
    elsif (!($sn%5)){$sn.="4";} 
    
    
    
    my $len = length($sn);
    
    if ($len ==6){$sn=~m/(\d)(\d)(\d)(\d)(\d)(\d)/;$itog=$6.$3.$1.$4.$5.$2;}
    
    elsif ($len ==5){$sn=~m/(\d)(\d)(\d)(\d)(\d)/;$itog=$2.$1.$5.$4.$3;}
    
    elsif ($len == 4){$sn=~m/(\d)(\d)(\d)(\d)/;$itog=$4.$1.$3.$2;}
    
    elsif ($len == 3){$sn=~m/(\d)(\d)(\d)/;$itog=$2.$1.$3;}
    
    elsif ($len == 2){$sn=~m/(\d)(\d)/;$itog=$2.$1;}
    
    elsif ($len == 1){$itog=$sn;}
    
    return $itog;
    
    }

    пример "крутого" кода с free-lance.ru

    mahatharata, 13 Августа 2010

    Комментарии (5)
  3. C++ / Говнокод #3927

    +163

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    foo(int objType)
    {
      std:string sObjType;
      char outStr[256];
      memset(outStr,NULL,256);
      sprintf(outStr,"0x%x",(unsigned int)objType);
      sObjType = outStr;
      //…
      std::ostringstream str;
      str << "Ready: list of objects, type " << sObjType;
      TRACE(str.str());
    }

    belca, 10 Августа 2010

    Комментарии (5)
  4. PHP / Говнокод #3907

    +157

    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
    # определяем общие настройки чата
    
    $set = mysql_fetch_assoc(mysql_query("SELECT * FROM `conf`")); 
    $title = $set['title'];
    $keywd = $set['keywd'];
    $descn = $set['descn'];
    $tpost = $set['tpost'];
    $robots = $set['bots'];
    $gzip = $set['gzip'];
    $home = $set['home'];
    $nnum = $set['nnum'];
    $email = $set['email'];
    $copy = $set['copy'];
    $home = $set['home'];
    $numk = $set['numk'];
    $tms = $set['tms'];
    $dps = $set['pps'];
    $z = $set['Z'];
    $r = $set['R'];
    
    
    
    # определяем настройки каптчи
    
    $setс = mysql_fetch_assoc(mysql_query("SELECT * FROM `cp`")); 
    $csay = $setс['csay'];
    $creg = $setс['creg'];
    $copen = $setс['copen'];
    $ckomm = $setс['ckomm'];
    
    // что интересно, в переменной $setc, c - русский символ.
    
    
    # gzip ли
    
    if($gzip == '1')
    
    {
    
    ob_start();
    
    #ob_start('ob_gzhandler');
    }
    
    else
    
    {
    
    ob_start();
    
    }

    мелкие говнокоды

    Morgan, 08 Августа 2010

    Комментарии (5)
  5. Perl / Говнокод #3895

    −123

    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
    sub Blog_MakeRSS {
    my @data = @_;
    my $selflink = "http://$ENV{'SERVER_NAME'}:666$ENV{'SCRIPT_NAME'}?$ENV{'QUERY_STRING'}";
    $selflink =~ s/&/&amp;/gi;
    
    my $out = "<?xml version=\"1.0\" encoding=\"$charset\"?>
    
    <rss version=\"2.0\" xmlns:atom=\"http://www.w3.org/2005/Atom\">
    
    <channel>
    <atom:link href=\"$selflink\" rel=\"self\" type=\"application/rss+xml\" />";
    
    $data[0][6] =~ s/MSD/\+0300/i;
    
    $out .= "<title>$rss_title</title>
    <link>http://$ENV{'SERVER_NAME'}:666$ENV{'SCRIPT_NAME'}?$rss_link</link>
    <description>$rss_descr</description>
    <language>ru</language>
    <copyright>$rss_copy</copyright>
    <lastBuildDate>$data[0][6]</lastBuildDate>
    <pubDate>$data[0][6]</pubDate>
    <webMaster>$rss_email</webMaster>
    <ttl>1</ttl>\n";
    
    foreach (@data) {
    my @row = @{ $_ };
    
    if ($blog_owner ne "") { $row[7] = $blog_owner; }
    
    my $link = "http://$ENV{'SERVER_NAME'}:666$ENV{'SCRIPT_NAME'}?blog=$row[7]&amp;post=$row[5]";
    $row[0] =~ s/\%cut\%.+?$/ \[\.\.\.\]/gis;
    $row[6] =~ s/MSD/\+0300/i;
    
    $out .= "<item>
    <title>$row[1]</title>
    <description><![CDATA[ $row[0] ]]></description>
    <guid isPermaLink=\"true\">$link</guid>
    <link>$link</link>
    <pubDate>$row[6]</pubDate>
    </item>\n";
    
    }
    
    $out .= '</channel>
    </rss>';
    
    print "Content-type:application/rss+xml;charset=$charset\n\n";
    print $out;
    }

    Был в несознанке, а XML::RSS плохо отзывался о кириллице...

    kainwinterheart, 07 Августа 2010

    Комментарии (5)
  6. Java / Говнокод #3877

    +71

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    if(time.compareTo(startCheckTime) < 0)
    	return time.compareTo(startCheckTime);
    else if(time.compareTo(endCheckTime) > 0)
        return time.compareTo(startCheckTime);
    time.compareTo(startCheckTime);
    	return 0;

    welvet, 04 Августа 2010

    Комментарии (5)
  7. Ruby / Говнокод #3843

    −105

    1. 1
    rhour=hour[0].to_s+hour[1].to_s+':'+hour[2].to_s+hour[3].to_s;

    нужна была сортировка по времени, я сначала поубивал : потом надо отобразить в норм виде.. получилось это

    homakov, 01 Августа 2010

    Комментарии (5)
  8. Python / Говнокод #3815

    −171

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    #param - строка
    if(param[0]=='"' and param[-1]=='"'):
                param = param.strip('"')
            else:
               param = param.strip("'")

    Приближенный алгоритм убирания кавычек. И ведь работает... как правило.

    Gukl, 29 Июля 2010

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

    +125

    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
    $string="привет мир";
    
    $string=encodeURI($string);
    
    echo($string);
    
    function encodeURI($string) {
       $result = "";
       for ($i = 0; $i < strlen($string); $i++) {
          $result .= encodeURIbycharacter(urlencode(iconv ( "windows-1251","utf-8" , $string[$i])));
       }
       return $result;
    }
    
    function encodeURIbycharacter($char) {
       if ($char == "+") { return "%20"; }
       if ($char == "%21") { return "!"; }
       if ($char == "%23") { return "#"; }
       if ($char == "%24") { return "$"; }
       if ($char == "%26") { return "&"; }
       if ($char == "%27") { return "\""; }
       if ($char == "%28") { return "("; }
       if ($char == "%29") { return ")"; }
       if ($char == "%2A") { return "*"; }
       if ($char == "%2B") { return "+"; }
       if ($char == "%2C") { return ","; }
       if ($char == "%2F") { return "/"; }
       if ($char == "%3A") { return ":"; }
      .... Очень много строк
       if ($char == "%9A") { return "%C5%A1"; }
       if ($char == "%9B") { return "%E2%80%BA"; }
       if ($char == "%9C") { return "%C5%93"; }
       if ($char == "%B1") { return "%C2%B1"; }
       if ($char == "%B2") { return "%C2%B2"; }
       if ($char == "%B3") { return "%C2%B3"; }
       if ($char == "%B4") { return "%C2%B4"; }
       if ($char == "%B5") { return "%C2%B5"; }
       if ($char == "%B6") { return "%C2%B6"; }
       if ($char == "%B7") { return "%C2%B7"; }
       if ($char == "%B8") { return "%C2%B8"; }
       if ($char == "%B9") { return "%C2%B9"; }
       if ($char == "%BA") { return "%C2%BA"; }
       if ($char == "%BB") { return "%C2%BB"; }
       if ($char == "%BC") { return "%C2%BC"; }
       if ($char == "%BD") { return "%C2%BD"; }
       if ($char == "%BE") { return "%C2%BE"; }
       if ($char == "%BF") { return "%C2%BF"; }
       if ($char == "%C0") { return "%C3%80"; }
       if ($char == "%C1") { return "%C3%81"; }
       if ($char == "%C2") { return "%C3%82"; }

    По моему школьникам на каникулах скучно они прожат. Вот что я нашел

    Vasiliy, 29 Июля 2010

    Комментарии (5)
  10. PHP / Говнокод #3789

    +119

    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
    <?php
    session_start();
    @include("config.php");
    //Необходимо подключиться к БД
    $link = mysql_connect($DBSERVER, $DBUSER, $DBPASS)
    or die("Не могу подключиться" );
    // сделать $DB текущей базой данных
    mysql_select_db($DB, $link) or die ('Не могу выбрать БД');
    echo "<h2>Страница активации</h2>";
    $uniq = $_GET['id'];
    if($_GET['id']='') { echo "Вы зашли на страницу без кода подтверждения"; }
    elseif ($_GET['id'] != '') {
    $log = mysql_query("SELECT * FROM users WHERE uniq_id='$uniq'");
    $idi = mysql_query("SELECT status FROM users WHERE uniq_id='$uniq'");
    if (empry($log)) { echo "Такой профиль не существует"; }
    elseif(isset($log) AND $idi = 1) {echo "Данный профиль уже активирован"; }
    elseif(isset($log) AND $idi = 0) {
    $r=@mysql_query("UPDATE users SET status=1 WHERE status=0 AND uniq_id='$uniq' ");
    echo '<h2>Ваша учетная запись активирована.</h2><br> Теперь вы можете <a href="index.php">войти на сайт</a> используя данные указанные при регистрации';
    }
    }
    ?>

    Vasiliy, 27 Июля 2010

    Комментарии (5)
  11. Ruby / Говнокод #3786

    −94

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    9. 9
    @timestart = MyModel.lastUpdateTime - 1.hour
    
    day = "#{@timestart.day}"
    day = "0#{day}" if day.size<2
    mon = "#{@timestart.mon}"
    mon = "0#{mon}" if mon.size<2
    
    start1 = "'#{@timestart.year}-#{mon}-#{day} #{@timestart.hour}:#{@timestart.min}:#{@timestart.sec}'"
    a = MyModel.find(:all, :conditions=>[ "`datetime` > #{start1}" ]

    без комментариев

    vlad-druzh, 27 Июля 2010

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