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

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

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

1. PHP (5709)
2. C++ (2740)
3. Куча (2390)
4. JavaScript (2034)
5. C# (1930)
6. Java (1503)
7. Си (1118)
8. Pascal (648)
9. Python (591)
10. 1C (539)
11. SQL (432)
12. ActionScript (292)
13. Objective C (202)
14. bash (200)
15. Perl (194)
16. Assembler (148)
17. Ruby (145)
18. VisualBasic (138)
19. Lua (49)
20. Haskell (40)
21. Go (31)
22. Swift (27)
23. Kotlin (14)

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

   +34

   1. 1
   2. 2

   foreach($keys as $key) 
        $settings[$type][$fieldname][$key] =  (isset($fl[$type] [$fieldname] ['widget'] [$key] ) ) ? $fl[$type] [$fieldname] ['widget'] [$key] : '';

   вобля

   brainstorm, 08 Января 2011

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

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

   +161

   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

   <?php 
    error_reporting(E_ALL | E_STRICT); 
    ini_set("display_errors", "1"); 
     
    setlocale(LC_ALL, 'ru_RU.CP1251', 'rus_RUS.CP1251', 'Russian_Russia.1251'); 
    
     
    $text='[email protected] , [email protected]';
   
    
    $poisk='/([^,]+@.+?\.(?:com|ru|de|en))/si';
    
    
    preg_match_all($poisk,$text,$match);
    
    foreach ($match[1] as $value)
   
   {
   echo $value;
   echo '<br>';
    
   }
    
    
     
    ?>

   Тема: Регулярка для почты.
   
   http://www.php.ru/forum/viewtopic.php?p=256681#256681

   Devzirom, 07 Января 2011

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

3. C# / Говнокод #5177

   +116

   1. 1
   2. 2
   3. 3
   4. 4
   5. 5
   6. 6

   private void pictureBox1_MouseMove(object sender, MouseEventArgs e)
           {
               label5.Text = Convert.ToInt32(e.X.ToString()).ToString();
               label6.Text = Convert.ToInt32(e.Y.ToString()).ToString();
               label1.Location = new Point(e.X, e.Y);
           }

   Не знаю лаба это или нет, но взято это с www.cyberforum.ru

   psina-from-ua, 07 Января 2011

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

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

   +134

   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

   void epilog()
   {  
   	fprintf(fvih,"\tINCLUDE\tstd.asm\n");
   	fprintf(fvih,"_KOM\tENDS\n");
   	fprintf(fvih,"_STEK\tSEGMENT USE16\tSTACK\n");
   	fprintf(fvih,"\tDW\t100 DUP (?)\n");
   	fprintf(fvih,"_DNOST\tDW\t?\n");
   	fprintf(fvih,"_STEK\tENDS\n");
   	if (kolglb > 0) {  
   		fprintf(fvih,"_DAN\tSEGMENT USE16\n");
   		for (i = 1; i <= kolglb; i++)
   			if (tabim[i].vidob == 1)      /* пеpеменная */
   				if (tabim[i].typ == int_t)
   					fprintf(fvih,"%s\tDW\t?\n",tabim[i].imja);
   				else
   					fprintf(fvih,"%s\tDD\t?\n",tabim[i].imja);
   		fprintf(fvih,"_DAN\tENDS\n");
   	}
   	if (est6_main)
   		fprintf(fvih,"\tEND\t_main\n");
   	else fprintf(fvih,"\tEND\n");
   	fprintf(fvih,";Компилятоp С0 от 9/10/92:\n;колич. ошибок %d\n",kolosh);	
   	printf("Компилятоp С0 от 9/10/92:\nколич. ошибок %d\n",kolosh);
   }
   
        /**********************************************/
        /*             Основная пpогpамма             */
        /**********************************************/
   int main(int agrc, char *argv[])
   {  
   	int i;
   	for (i=0; i<=255; i++) leksim[i]=osh;
   	leksim['+']=plus;  leksim['-']=minus;  leksim['*']=umn;
   	leksim['/']=del;   leksim['%']=ost;    leksim['=']=prisv;
   	leksim['<']=men;   leksim['>']=bol;    leksim['(']=lskob;
   	leksim[')']=pskob; leksim['{']=flskob; leksim['}']=fpskob;
   	leksim[',']=zpt;   leksim[';']=tchzpt; 
   
       /* множество начальных лексем выpажения */
   	nvir = st2[ident] | st2[chislo] | st2[minus] | st2[lskob];
   
   	/* мн-во нач-х лексем оп-pа */
   	noper = st2[flskob] | st2[ifsl] | st2[whilesl] | st2[retsl] | st2[tchzpt] | st2[dosl] | nvir; 
   	vhstr[0]=' '; 
   	vhstr[1]='\0'; 
   	usim = vhstr;kolglb =kolim =ef =	tipop =est6_main =kolosh =kmet =0;
   	is_leave_old = false;
   	fvh=fopen("C://p.c0","r");
   	//fvh=fopen(argv[1],"r");            /* откpыть входной файл  */
   	fvih=fopen("C://p.asm","w"); 
   	//fvih=fopen(argv[2],"w");          /* откpыть выходной файл */
   	if ((fvh == NULL) || (fvih == NULL))
   		oshibka(8);                      /*  файлы не откpылись */
   	else {
   		prolog();
   		while (!ef) {
   			chleks();
   			if (leksema == intsl) {              /* слово int        */
   				opisper(0); 
   				kolglb=kolim; 
   			}/*описание глоб-х пер-х*/
   			else if (leksema == longsl) {              /* слово int        */
   				opisper_long(0); 
   				kolglb=kolim; 
   			}/*описание глоб-х пер-х*/
   			else if (leksema == ident)      /* имя                 */
   				oprfun();                  /* опpеделение функции */
   			else if (!ef)    /* тpебуется опис-е пеp-х или ф-ции */
   				test(st2[intsl] | st2[ident],st2[pskob] | st2[tchzpt],3);
   		}
   		epilog();
   		fclose(fvh);
   	    fclose(fvih);
   	}
   	return 0;
   }

   qbasic, 07 Января 2011

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

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

   +164

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

   $data_array = file('./dir/file.txt'); //Прочитали файл в массив
   $count = count($data_array); //Подсчитали количество элементов массива
   $chislo = rand(0,$count-1); //Так как элементы массива имеют ключи с 0 до $count-1
   echo $data_array[$chislo]; //Вот вам и произвольная строка из файла

   Основная говнистость в том, что это статья, т.е. человек этому учит других, ни в чём не повинных людей.

   DeaDrash, 07 Января 2011

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

6. 1C / Говнокод #5174

   −127

   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

   Запрос = Новый Запрос(
   	"ВЫБРАТЬ
   	|    РегШК.Владелец                   КАК Владелец,
   	|    РегШК.ЕдиницаИзмерения           КАК ЕдиницаИзмерения,
   	|    РегШК.ХарактеристикаНоменклатуры КАК ХарактеристикаНоменклатуры
   	|ИЗ
   	|    РегистрСведений.Штрихкоды        КАК РегШК
   	|ГДЕ
   	|    РегШК.Штрихкод = &Штрихкод");
   	
   	Запрос.УстановитьПараметр("Штрихкод", Штрихкод);
   	РезультатЗапроса = Запрос.Выполнить();
   	
   	//Николай
   	Если РезультатЗапроса.Пустой() Тогда
   		Штрихкод=Сред(Штрихкод,7,6);
   		Запрос = Новый Запрос(
   		"ВЫБРАТЬ
   		|    РегШК.Владелец                   КАК Владелец,
   		|    РегШК.ЕдиницаИзмерения           КАК ЕдиницаИзмерения,
   		|    РегШК.ХарактеристикаНоменклатуры КАК ХарактеристикаНоменклатуры
   		|ИЗ
   		|    РегистрСведений.Штрихкоды        КАК РегШК
   		|ГДЕ
   		|    РегШК.Штрихкод = &Штрихкод");
   		
   		Запрос.УстановитьПараметр("Штрихкод", Штрихкод);
   		РезультатЗапроса = Запрос.Выполнить();
       КонецЕсли;
   	
   	//Николай

   Вот как надо выполнять тот же запрос, но с другим параметром!

   alex-makhnev, 07 Января 2011

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

7. Perl / Говнокод #5173

   −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
   50. 50

   # Обработка нажатия клавиш
   # Если нажата кнопка СОХРАНИТЬ
   if(CGI::param('sub_data_save'))
   {
     if(CGI::param('content')){ $content=CGI::param('content'); }
   	
     $content=~s/'/\\'/g;	
     $dbh->do("update public.m_content set content='$content' where id=70");
                                                                                                                                
     # Зафиксировали изменения
     $dbh->commit;
                                                                                                                                
     # формируем страницу
     md::tools->create_page($www{'main_template'},"<#CONTENT#>",$content,$www{'path'},'/turfirm.php');
   
     # подгонка остальных страниц
     # новости
     $sql = "select content from public.m_content where \"id\"=20";
     $sth=$dbh->prepare($sql);
     $sth->execute;
     ($content0)=$sth->fetchrow_array;
     md::tools->create_page($www{'main_template'},"<#CONTENT#>",$content0,$www{'path'},'/news.php');
     # Корпаративным клиентам
     $sql = "select content from public.m_content where \"id\"=60";
     $sth=$dbh->prepare($sql);
     $sth->execute;
     ($content0)=$sth->fetchrow_array;
     md::tools->create_page($www{'main_template'},"<#CONTENT#>",$content0,$www{'path'},'/cor_clients.php');
     # Главная
     $sql = "select content from public.m_content where \"id\"=10";
     $sth=$dbh->prepare($sql);
     $sth->execute;
     ($content0)=$sth->fetchrow_array;
     md::tools->create_page($www{'main_template'},"<#CONTENT#>",$content0,$www{'path'},'/index.php');
     # Контакты
     $sql = "select content from public.m_content where \"id\"=30";
     $sth=$dbh->prepare($sql);
     $sth->execute;
     ($content0)=$sth->fetchrow_array;
     md::tools->create_page($www{'main_template'},"<#CONTENT#>",$content0,$www{'path'},'/contact.php');
     # Базы
     $sql = "select content from public.m_content where \"id\"=40";
     $sth=$dbh->prepare($sql);
     $sth->execute;
     ($content0)=$sth->fetchrow_array;
     md::tools->create_page($www{'main_template'},"<#CONTENT#>",$content0,$www{'path'},'/centre.php');
     # Бронирование
     $content0="<iframe width=100% scrolling='auto' height=100% frameborder=0 src='/cgi-bin/res.cgi' ></iframe>";
     md::tools->create_page($www{'main_template'},"<#CONTENT#>",$content0,$www{'path'},'/reservation.php'); 
   }

   Из админки одного сайта
   (админка - один сплошной перл)

   happy_me, 07 Января 2011

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

8. Pascal / Говнокод #5172

   +109

   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

   procedure TfmLab3.mmVesClick(Sender: TObject);
   var
     sngVes, sngFlag: single;
     intFlag: integer;
   begin
     try
       sngVes:=StrToFloat(InputBox('Ввод исходных данных','Введите вес от 40 до 170',''));
       sngFlag:=sqrt(sngVes-40);
       if sngVes>170 then
         begin
           sngFlag:=1/intFlag;
           //ShowMessage(FloatToStr(sngFlag));
         end;
       edWeight.Text:=FloatToStr(sngVes);
     except
       on EConvertError do ShowMessage('Вводить можно только действительные числа!');
       on EInvalidOp do ShowMessage('Минимальный вес 40кг');
       on EZeroDivide do ShowMessage('Максимальный вес 170кг');
     end;
    
   end;

   Брутальненькая лаба с венгеркой и исключениями.

   bugmenot, 07 Января 2011

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

9. PHP / Говнокод #5171

   +161

   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

   foreach ($links as $key => $url) {
         $urlp=parse_url($url);
         $ch=1;
         if (substr($url,-1)!='/') {unset($links[$key]); $ch=0;};      
         if (strpos($url, '#')||$url==$begin_url||$url==substr($begin_url,0,-1)) {unset($links[$key]); $ch=0;};
         if ($ch){
           if ($urlp['host']!=$begin_host) {unset($links[$key]); $ch=0;};
         }
         if ($ch){
           foreach ($exurl as $k => $ext) { 
             if ((strpos($urlp['path'], $ext))) unset($links[$key]);
           }
         }
       }

   Говнокод?

   happy_me, 06 Января 2011

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

10. PHP / Говнокод #5170

    +162

    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

    <?
    // blah blah blah ...
    
    static public function parseCleanValue( $val, $postParse=true )
    {
        if ( $val == "" )
        {
        	return "";
        }
    
        // blah blah blah ...
    }
    
    // blah blah blah ...
    
    ?>

    IP.Board 3.0.4
    
    /admin/sources/base/core.php:4139
    
    IPB, такой IPB

    miraage, 06 Января 2011

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

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

• 2112
• …
• 512
• 511
• 510
• 509
• 508
• 507
• 506
• 505
• 504
• …
• 1