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

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

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

1. PHP (5703)
2. C++ (2740)
3. Куча (2339)
4. JavaScript (2030)
5. C# (1930)
6. Java (1503)
7. Си (1103)
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 (32)
21. Swift (29)
22. Haskell (28)
23. Kotlin (15)

1. JavaScript / Говнокод #846

   +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

   // Test whether the input is numeric
   function IsNumeric(sText)
   {
     var ValidChars = "0123456789.";
     var IsNumber=true;
     var Char;
   
     for (i = 0; i < sText.length && IsNumber == true; i++)
     {
       Char = sText.charAt(i);
       if (ValidChars.indexOf(Char) == -1)
       {
         IsNumber = false;
       }
     }
     return IsNumber; 
   }

   Nokia WenRuntime Developer guide
   Инструментарий для разработчика, там типа пример как правильно кодить под их платформу. Когда увидел в коде это.. дальше читать не стал.. :)

   guest, 10 Апреля 2009

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

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

   +153.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
   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

   function win2utf ($string)  {
   $string = ereg_replace("?","а",$string);
   $string = ereg_replace("?","б",$string);
   $string = ereg_replace("?","в",$string);
   $string = ereg_replace("?","г",$string);
   $string = ereg_replace("?","д",$string);
   $string = ereg_replace("?","е",$string);
   $string = ereg_replace("?","ё",$string);
   $string = ereg_replace("?","ж",$string);
   $string = ereg_replace("?","з",$string);
   $string = ereg_replace("?","и",$string);
   $string = ereg_replace("?","й",$string);
   $string = ereg_replace("?","к",$string);
   $string = ereg_replace("?","л",$string);
   $string = ereg_replace("?","м",$string);
   $string = ereg_replace("?","н",$string);
   $string = ereg_replace("?","о",$string);
   $string = ereg_replace("?","п",$string);
   $string = ereg_replace("?","р",$string);
   $string = ereg_replace("?","с",$string);
   $string = ereg_replace("?","т",$string);
   $string = ereg_replace("?","у",$string);
   $string = ereg_replace("?","ф",$string);
   $string = ereg_replace("?","х",$string);
   $string = ereg_replace("?","ц",$string);
   $string = ereg_replace("?","ш",$string);
   $string = ereg_replace("?","щ",$string);
   $string = ereg_replace("?","ъ",$string);
   $string = ereg_replace("?","ь",$string);
   $string = ereg_replace("?","э",$string);
   $string = ereg_replace("?","ю",$string);
   $string = ereg_replace("?","я",$string);
   $string = ereg_replace("?","ч",$string);
   $string = ereg_replace("?","ы",$string);
   $string = ereg_replace("?","А",$string);
   $string = ereg_replace("?","Б",$string);
   $string = ereg_replace("?","В",$string);
   $string = ereg_replace("?","Г",$string);
   $string = ereg_replace("?","Д",$string);
   $string = ereg_replace("?","Е",$string);
   $string = ereg_replace("?","A",$string);
   $string = ereg_replace("?","Ж",$string);
   $string = ereg_replace("?","З",$string);
   $string = ereg_replace("?","И",$string);
   $string = ereg_replace("?","Й",$string);
   $string = ereg_replace("?","К",$string);
   $string = ereg_replace("?","Л",$string);
   $string = ereg_replace("?","М",$string);
   $string = ereg_replace("?","Н",$string);
   $string = ereg_replace("?","О",$string);
   $string = ereg_replace("?","П",$string);
   $string = ereg_replace("?","Р",$string);
   $string = ereg_replace("?","С",$string);
   $string = ereg_replace("?","Т",$string);
   $string = ereg_replace("?","У",$string);
   $string = ereg_replace("?","Ф",$string);
   $string = ereg_replace("?","Х",$string);
   $string = ereg_replace("?","Ц",$string);
   $string = ereg_replace("?","Ш",$string);
   $string = ereg_replace("?","Щ",$string);
   $string = ereg_replace("?","Ъ",$string);
   $string = ereg_replace("?","Ь",$string);
   $string = ereg_replace("?","Э",$string);
   $string = ereg_replace("?","Ю",$string);
   $string = ereg_replace("?","Я",$string);
   $string = ereg_replace("?","Ч",$string);
   $string = ereg_replace("?","Ы",$string);
   return $string;
   }

   из копрроротивных сорцов.
   русланчик - хуйло

   guest, 09 Апреля 2009

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

3. PHP / Говнокод #844

   +152.1

   1. 1
   2. 2
   3. 3
   4. 4
   5. 5
   6. 6
   7. 7
   8. 8
   9. 9

   $q = "SELECT COUNT(ID) AS num FROM articles WHERE ID = '$id'";
   
     $res = $this->myconect($q);
     $row = mysql_fetch_array($res);
   
     if($row[num]>0)
         $this->artID = $id;
     else
         $this->artID = $id;

   guest, 09 Апреля 2009

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

4. Си / Говнокод #843

   +154

   1. 1
   2. 2
   3. 3
   4. 4
   5. 5
   6. 6
   7. 7
   8. 8

   for (j = 0; j < MAX_NAME; j++) {
   		i = name[j];
   		if (i >= 'a' && i <= 'z')
   			i &= 0x5F;
   		mash->host_name[j] = i;
   		if (i == 0)
   			break;
   	}

   Перевод строки в верхний регистр в самопальном сетевом протоколе

   guest, 09 Апреля 2009

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

5. C++ / Говнокод #842

   +179.1

   1. 1

   #define ItIsNotRecommendedToLookToInvalids_OlderPersonsAndPeopleWithWeakNerves int main

   Мало ли...

   guest, 09 Апреля 2009

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

6. C# / Говнокод #841

   +118.3

   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

   private string StrColor(decimal x)
   {
   	if (x.ToString().Contains("-"))
   	{
   		string adj = x.ToString();
   		adj = string.Concat("(", adj.Substring(1, adj.Length - 1), ")");
   		//adj = System.Drawing.Color.Red.ToString();
   		return adj;
   
   	}
   	else
   	{
   		return x.ToString();
   	}
   }

   Определение знака числа в строке 3

   guest, 09 Апреля 2009

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

7. C# / Говнокод #840

   +123.7

   1. 1

   7. MyColorStops[0].Color = System.Drawing.Color.FromArgb(((int)(((byte)(161)))), ((int)(((byte)(255)))), ((int)(((byte)(67)))));

   Лишние касты

   guest, 09 Апреля 2009

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

8. JavaScript / Говнокод #839

   +147

   1. 1
   2. 2
   3. 3

   function docWrite(line) {
       document.write(line);
   }

   Обнаружено в adobe scene7.

   guest, 09 Апреля 2009

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

9. JavaScript / Говнокод #838

   +154

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

   function check_finished_pending() {
   
   var v_wrt_id = document.getElementById('writer_id').value;
   
   if( 9 == 26 )
   {
   return confirm("Status 'finished pending' confirmation:\nAre you sure you made all needed operations on this order?");
   }
   else
   {    
   ..................................

   Старнное условие....
   
   Обратите внимание на 5 строчку....
   
   n3m0

   guest, 09 Апреля 2009

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

10. VisualBasic / Говнокод #837

    −276.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
    83. 83
    84. 84
    85. 85
    86. 86
    87. 87
    88. 88
    89. 89
    90. 90
    91. 91

    Function ShowAddressBook() As String
    On Error GoTo ErrorHandler
    
        Dim miTempItem As MailItem
        Dim inTempInspector As Inspector
        Dim Pomoechka As MAPIFolder
        Dim objNS As outlook.NameSpace
        
        
        ' Загружаем шаблон формы онового сообщения
        ' на нём есть нужная кнопка
        Dim Reg As New CReg
    10    Reg.m_MainKey = "Software\Content Manager\MS_OUTLOOK"
        
    20    Set miTempItem = Application.CreateItemFromTemplate(Reg.GetValue("path") & "\crutch.oft")
    30    Set inTempInspector = miTempItem.GetInspector
        
    32      miTempItem.UserProperties.Add("TempItemForAddressBook", olYesNo) = True
                 
        ' Убираем инспектор с глаз долой
    40    inTempInspector.Left = -20000
    50    inTempInspector.Top = -20000
    '51    inTempInspector.Width = 0
    '52    inTempInspector.Height = 0
        
        ' пока инспектор не покажеться адресбук из него не выдавишь
    60    inTempInspector.Activate
        ' если до вызова адресбука пользователь работал
        ' с развёрнутым на весь экран письмом - то хрен мы его куда свинем
        ' нужно, поэтому, вернуть нормальное состояние
    70    inTempInspector.WindowState = olNormalWindow
    
        ' правда, это в некоторых случаях моргает - но поставить olonormalWindow
        ' до того как инспектор показан - нельзя.
        ' рахзвёрнутость ил не развёрнутость задаёться в реестре по пути
        ' HKEY_CURRENT_USER\Software\Microsoft\Office\11.0\Outlook\Message\Frame
        ' там храниться REG_BINARY и внём меняетсья 0xB байт либо на 3 либо на 1
        
        ' подгрузили всё что надо - вызываем саму книгу
    'НОВАЯ ВЕРСИЯ
    80 inTempInspector.CommandBars.FindControl(Id:=353).Execute
        Dim strBuff As String
        ' Пока не сделаю сейв, поле TO через мапи будет не доступным
    90    miTempItem.save
        ' получаю поле ТО через MAPI
        ' если попытаться взять его на прямую - то аутлук будет ругатся
        ' своим ёбанным диалогом безопасности
        
    100    strBuff = GetToField(miTempItem)
        
        ' закрываем итемку
    110    miTempItem.Close olDiscard
        
        
        ' Теперь, из-за того что вызывали метод save итемка лежит в папке
        ' с черновиами, нахер она там не сдалась - нужно удалять
        ' если её просто удалить .delete то она передвиниться в папку
        ' с удалёнными письмами - тоже нафик не надо
        ' поэтому, сначала переносим её в эту папку самостоятельно
        ' и от туда вызываем .delete - письмо исчезает
        
        ' Получаем доступ к папке с удалёнными письмами
        
    120    Set objNS = Application.GetNamespace("MAPI")
        ' вот тут она лежит
    130    Set Pomoechka = objNS.GetDefaultFolder(olFolderDeletedItems)
    
        ' перемещаем туда письмецо
    140    miTempItem.Move Pomoechka ' хотя можно и просто     miTempItem.Delete
    
        ' теперь берём последнее письмо из помойки - это наше
        ' и удаляем его от туда
    150    Pomoechka.Items(Pomoechka.Items.Count).Delete
        ' Теперь письма нету
        
        
        ShowAddressBook = strBuff
    
    KillObjects:
        ' Всё подчистим
    160   Set miTempItem = Nothing
    170   Set inTempInspector = Nothing
    180   Set Pomoechka = Nothing
    190   Set objNS = Nothing
    200   Set Reg = Nothing
            Exit Function
    ErrorHandler:
            subGlobalErrorHandler Err.Description, Err.number, Erl, "ShowAddressBook"
            Resume KillObjects
        
    End Function

    EPIC FAIL
    
    Вызов диалога адресной книги аутлука, и получение выбранных в ней адресов.

    guest, 09 Апреля 2009

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

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

• 2104
• …
• 84
• 83
• 82
• 81
• 80
• 79
• 78
• 77
• 76
• …
• 1