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

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

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

1. PHP (5706)
2. C++ (2739)
3. Куча (2363)
4. JavaScript (2030)
5. C# (1928)
6. Java (1502)
7. Си (1116)
8. Pascal (648)
9. Python (586)
10. 1C (538)
11. SQL (432)
12. ActionScript (292)
13. Objective C (202)
14. bash (198)
15. Perl (194)
16. Assembler (146)
17. Ruby (145)
18. VisualBasic (138)
19. Lua (49)
20. Go (31)
21. Swift (27)
22. Haskell (26)
23. Kotlin (14)

1. Куча / Говнокод #11979

   +175

   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

   with Ada.Integer_Text_Io, Ada.Text_Io;
   use Ada.Integer_Text_Io, Ada.Text_Io;
   
   procedure Test is
   v : Long_Float := 26.0;
   v1 : float := 26.0;
   begin
      while (v<27.0) loop
            Put_Line("Value = " & Long_Float'image(v));
           v:=v+0.2;
      end loop;
      while (v1<27.0) loop
            Put_Line("Value = " & float'image(v1));
           v1:=v1+0.2;
      end loop;
   
   end;

   ideone.com/pXIhvY
   Безопасный военный язык, да.

   3.14159265, 23 Октября 2012

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

2. Куча / Говнокод #11978

   +132

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

   main = do
           print [1 .. 9]
           print [1, 3 .. 9]
           print [1, 3 .. 10]
           print [26.0, 26.2 .. 27.0]
           print [25.5..30.0]
           print [25, 25 .. 25]

   В хаскеле сломан генератор списков. :(
   http://ideone.com/AvBSuz

   HaskellGovno, 22 Октября 2012

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

3. Java / Говнокод #11977

   +91

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

   public static 
   	String readFile(String file) {
   		return Read.file(  Reflection.getCallerClass(2), file,"\n");
   	}
   	public static 
   	String readFile(Class c, String file, final String lineBreaker) {
   		return Read.stream(c.getResourceAsStream(file),lineBreaker);
   	}

   Я уже как-то раз наступил на эту хрень.
   Но ничё - сегодня снова вот решил написать - удобно ведь.

   3.14159265, 22 Октября 2012

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

4. Haskell / Говнокод #11976

   −82

   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

   {-# LANGUAGE ExistentialQuantification,
                DeriveDataTypeable,
                PatternSignatures #-}
   
   import Data.Typeable
   import Control.Concurrent
   import Control.Concurrent.MVar
   import Control.Concurrent.Chan
   
   -- Core data types
   
   data Message = forall t . Typeable t => Message t | StopMessage
       deriving Typeable
   
   data Handler = forall t . Typeable t => Handler (t -> IO ())
   
   
   -- Worker thread
   
   data Worker = Worker (Chan Message) (MVar ())
   
   workerThread :: [Handler] -> Chan Message -> MVar () -> IO ()
   workerThread handlers chan finish = loop where
       loop = do
           message <- readChan chan
           case message of
               StopMessage -> putMVar finish ()
               Message val -> do
                   foldr (tryHandler val) (putStrLn "Unhandled message") handlers
                   loop
       tryHandler val (Handler h) rest = maybe rest h (cast val)
   
   startWorker :: [Handler] -> IO Worker
   startWorker handlers = do
       chan <- newChan
       finish <- newEmptyMVar
       forkIO (workerThread handlers chan finish)
       return $ Worker chan finish
   
   send :: Typeable m => Worker -> m -> IO ()
   send (Worker chan _) message = do
       writeChan chan $ Message message
   
   stopWorker :: Worker -> IO ()
   stopWorker (Worker chan finish) = do
       writeChan chan $ StopMessage
       takeMVar finish
   
   
   -- Some tests
   
   data Test = Test Bool String deriving Typeable
   
   intHandler :: Int -> IO ()
   intHandler val = putStrLn $ "Int: " ++ show (val * 2)
   
   strHandler :: String -> IO ()
   strHandler val = putStrLn $ "String: " ++ reverse val
   
   testHandler :: Test -> IO ()
   testHandler (Test b s) = putStrLn $ "Test: " ++ show b ++ " " ++ show s
   
   main = do
       w <- startWorker [
           Handler intHandler,
           Handler (\(val::Char) -> putStrLn $ "Char: " ++ show val),
           Handler strHandler,
           Handler testHandler]
       send w (5::Int)
       send w False
       send w 'a'
       send w "foo"
       send w (Test True "bar")
       stopWorker w
       putStrLn "Finished!"

   Вот такая вот портянка была написана под влиянием дискуссии с HaskellGovno http://govnokod.ru/11968, и недавней его просьбой рассказать об общении потоков в хаскеле.
   
   Код запускает тред, в который можно передавать различные сообщения (ограничение только одно - тип сообщения должен быть инстансом тайпкласса Typeable). В треде исполняются указанные хендлеры, каждый из которых ловит свой тип сообщений.
   
   P.S. Для неимеющих хаскеля, но желающих посмотреть на работу кода: http://ideone.com/OMVamc.

   bormand, 22 Октября 2012

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

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

   +25

   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

   template <typename T> struct Pool { static std::vector<T> data; };
   
   std::vector<tbphys::Body> Pool<tbphys::Body>::data;
   std::vector<Ball>         Pool<Ball>        ::data;
   std::vector<Wall>         Pool<Wall>        ::data;
   std::vector<Bat>          Pool<Bat>         ::data;
   std::vector<Brick>        Pool<Brick>       ::data;
   
   template <typename T, typename U> struct List
   {
   	typedef T Head;
   	typedef U Tail;
   };
   
   struct End {};
   
   typedef List<tbphys::Body, List<Brick, List<Bat, List<Ball, List<Wall, End> > > > > Components;
   typedef List<Brick, List<Bat, List<Ball, List<Wall, End> > > > DrawableComponents;
   typedef List<Brick, List<Ball, List<Bat, End> > > MovableComponents;
   
   const size_t badindex = size_t(-1);
   
   struct GameBody
   {
   	size_t self,body,bat,brick,wall,ball;
   
   	template <typename T> size_t& IndexOf ();
   	template <> size_t& IndexOf <tbphys::Body> () {return body;}
   	template <> size_t& IndexOf <Bat  >        () {return bat;}
   	template <> size_t& IndexOf <Brick>        () {return brick;}
   	template <> size_t& IndexOf <Wall >        () {return wall;}
   	template <> size_t& IndexOf <Ball >        () {return ball;}
   
   	template <typename T>
   	T& AddComponent ()
   	{
   		size_t index = Pool<T>::data.size();
   		Pool<T>::data.resize(index+1);
   		T& result = Pool<T>::data[index];
   
   		result.hostIndex = self;	
   		IndexOf<T>() = index;
   		return result;
   	}
   
   	template <typename T> void SetBadIndex ()
   	{
   		IndexOf<T::Head> () = badindex;
   		SetBadIndex<T::Tail> ();
   	}
   	template <> void SetBadIndex <End> () {}
   };

   Сколько тут говнопаттернов крестоблядского крестоязыка?

   TarasB, 22 Октября 2012

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

6. Ruby / Говнокод #11974

   −153

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

   class ProblemsController < ApplicationController
   
     MAX_TAGS_PER_PROBLEM = 5
   
     def self.MAX_TAGS_PER_PROBLEM
       MAX_TAGS_PER_PROBLEM
     end
   end

   antono, 22 Октября 2012

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

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

   +73

   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

   public String getText()
   {
           // don't ask me what these charset tricks mean :)
           String str = null;
           try
           {
               str = new String(doc.getText(0, doc.getLength()).getBytes("Cp1252"), "Cp1251");
           }
           catch(Exception e)
           {
               // Leave str as null
           }
           
           return str;
   }

   ...

   roman-kashitsyn, 22 Октября 2012

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

8. PHP / Говнокод #11972

   +59

   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

   "IBLOCK_TYPE" => $arParams["IBLOCK_TYPE"],
   "IBLOCK_ID" => $arParams["IBLOCK_ID"],
   "ELEMENT_SORT_FIELD" => $arParams["ELEMENT_SORT_FIELD"],
   "ELEMENT_SORT_ORDER" => $arParams["ELEMENT_SORT_ORDER"],
   "PROPERTY_CODE" => $arParams["LIST_PROPERTY_CODE"],
   "META_KEYWORDS" => $arParams["LIST_META_KEYWORDS"],
   "META_DESCRIPTION" => $arParams["LIST_META_DESCRIPTION"],
   "BROWSER_TITLE" => $arParams["LIST_BROWSER_TITLE"],
   "INCLUDE_SUBSECTIONS" => $arParams["INCLUDE_SUBSECTIONS"],
   "BASKET_URL" => $arParams["BASKET_URL"],
   "ACTION_VARIABLE" => $arParams["ACTION_VARIABLE"],
   "PRODUCT_ID_VARIABLE" => $arParams["PRODUCT_ID_VARIABLE"],
   "SECTION_ID_VARIABLE" => $arParams["SECTION_ID_VARIABLE"],
   "FILTER_NAME" => $arParams["FILTER_NAME"],
   "DISPLAY_PANEL" => $arParams["DISPLAY_PANEL"],
   "CACHE_TYPE" => $arParams["CACHE_TYPE"],
   "CACHE_TIME" => $arParams["CACHE_TIME"],
   "CACHE_FILTER" => $arParams["CACHE_FILTER"],
   "CACHE_GROUPS" => $arParams["CACHE_GROUPS"],
   "SET_TITLE" => $arParams["SET_TITLE"],
   "SET_STATUS_404" => $arParams["SET_STATUS_404"],
   "DISPLAY_COMPARE" => $arParams["USE_COMPARE"],
   "PAGE_ELEMENT_COUNT" => $arParams["PAGE_ELEMENT_COUNT"],
   "LINE_ELEMENT_COUNT" => $arParams["LINE_ELEMENT_COUNT"],
   "PRICE_CODE" => $arParams["PRICE_CODE"],
   "USE_PRICE_COUNT" => $arParams["USE_PRICE_COUNT"],
   "SHOW_PRICE_COUNT" => $arParams["SHOW_PRICE_COUNT"],

   Очень ценные данные. Сразу как-то подозрительно, когда видишь в cms такое. Ну это ж божественная суть битрикса...

   gorky, 22 Октября 2012

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

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

   +117

   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

   class traffic {
           function traffic() {
               global $mosConfig_live_site;
   
               $remhost = @$_SERVER['REMOTE_HOST'];
               if (strpos($remhost,".") != false) { $remhost = strtok($remhost,"."); }
               $remhost = strtoupper($remhost);
   
               $mb = @$_COOKIE['mb'];
               //if ($mb ==  -1 || $mb ==  0) { return; }
               if (isset($mb)) {
                   if ($mb < 300) { $colormb = "green"; }
               else { $colormb = "red"; }
                   $t =<<<TXT
                    <center><b> 
                   <font size="4" style="line-height: 40px"><font color="$colormb"><p>eto prosto tak</p> $mb </font> </font> 
                   <br><font size="2" color="blue" style="line-height: 20px">$remhost</font></br></b></center>
                   <font color="brown" size="1" style="line-height: 8px">* -01:00</font> 
   TXT;
                   echo $t ;
                   echo @$_SERVER['HTTP_USER_AGENT'];
                   return;
                }
               $headers = apache_request_headers(); //    
               if (!isset($headers['Authorization'])) {     //    
                 header('HTTP/1.0 401 Unauthorized');     //    
                 header('WWW-Authenticate: NTLM');      //    - NTLM
                 return; } //   
   
               //     
               if (substr($headers['Authorization'],0,5) == 'NTLM ') { // ,   NTLM-
                 $chain = base64_decode(substr($headers['Authorization'],5)); //   
                 switch (ord($chain{8})) { //     
                   case 3: //  5 -   type-3
                     foreach (array('LM_resp','NT_resp','domain','user','host') as $k=>$v) {
                       extract(unpack('vlength/voffset',substr($chain,$k*8+14,4)));
                       $val = substr($chain,$offset,$length);
                       //echo "$v: ".($k<2 ? hex_dump($val) : iconv('UTF-16LE','CP1251',$val))."<br>\r\n";
                       switch ($k) {
                            case 2:
                               $domain = iconv('UTF-16LE','CP1251',$val);
                             case 3:
                                 $username = iconv('UTF-16LE','CP1251',$val);
                             //case 4:
                             //    $hostname = iconv('UTF-16LE','CP1251',$val);
                             }
                     }
                     $sdlt = fopen("http://sdlt/sdlt.php?username=".$username."&domainname=".$domain."&key=4125896370","r");
                     $str = fscanf($sdlt,"%s");
                     fclose($sdlt);
                     list($mb) = $str;
                     if ($mb ==  -1) { return; }
                     setcookie("mb",$mb,time()+64800);
                     if ($mb < 300) { $colormb = "green"; }
                     else { $colormb = "red"; }
   $t =<<<TXT
                   <center><b> -<br>  :<br>
                   <font size="4" style="line-height: 40px"><font color="$colormb"><p>privet ilya!!!!!!!!!!!!!!!!!!!!!! </p> $mb </font><font color="brown">*</font></font><br>
                   <font style="line-height: 24px">  :</font><br>
                   <font size="1" color="blue" style="line-height: 20px">$remhost ($domain - $username)</font><br></b></center>
                   <font color="brown" size="1" style="line-height: 8px">* -  01:00</font>
   
   TXT;
                     echo $t;
                     
                     return;
                 case 1: //  3
                   //if (ord($chain{13}) == 0xB2 || ord($chain{13}) == 0x8201) { //   NTLM 0xb2   13   type-1:
                     $chain = "NTLMSSP\x00".// 
                                "\x02" /*   */ ."\x00\x00\x00\x00\x00\x00\x00".
                                "\x28\x00" /*    */ ."\x00\x00".
                                "\x01\xB2" /*  */ ."\x00\x00".
                                "\x00\x02\x02\x02\x00\x00\x00\x00". // nonce
                                "\x00\x00\x00\x00\x00\x00\x00\x00";
                     header('HTTP/1.0 401 Unauthorized');
                     header('WWW-Authenticate: NTLM '.base64_encode($chain)); //   type-2
                     return;// }
                   }
                 }
               }
           }
       }
   
   $traffic=new traffic();

   безжалостный и беспощадный ООП в php

   Vasiliy, 22 Октября 2012

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

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

    +53

    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

    <?php
    $banners = array(
    /*
    	array(
    		'file' => '/files/images/domofony/domofon.swf',
    		'w' => 295,
    		'h' => 40,
    		//'url' => ''
    	),
    */
        array(
            'file' => '/files/banners/mega-sale.swf',
            'w' => 600,
            'h' => 90,
            'url' => 'http://podryad.tv/mega-sale.html'
        )
    
    );
    
    $banners = array();
    
    if(sizeof($banners)) {
    
    $b = $banners[array_rand($banners)];
    
    $b_html = "<div style='position:relative; text-align:center; width: {$b['w']}px; height: {$b['h']}px; margin: 0 auto 10px auto; padding-top: 10px;'>";
    if($b['url']) $b_html .= "
        <a href='{$b['url']}' target=_blank style='display:block; width: 100%; height: 100%; position: absolute; top:0; left:0; z-index:5; background: url(\"/images/px.png\") top left repeat transparent;'></a>";
    $b_html .= "
        <object classid='clsid:d27cdb6e-ae6d-11cf-96b8-444553540000' codebase='http://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=8,0,0,0' width='{$b['w']}' height='{$b['h']}' align='middle'>
            <param name='allowScriptAccess' value='sameDomain' />
            <param name='allowFullScreen' value='false' />
            <param name='movie' value='{$b['file']}' />
            <param name='quality' value='high' />
            <param name='bgcolor' value='#ffffff' />
            <param name='wmode' value='opaque' />
            <embed src='{$b['file']}' quality='high' bgcolor='#ffffff' allowscriptaccess='sameDomain' allowfullscreen='false' wmode='opaque' width='{$b['w']}' height='{$b['h']}' align='middle' type='application/x-shockwave-flash' pluginspage='http://www.macromedia.com/go/getflashplayer' />
        </object>
    </div>";
    
    echo $b_html; unset($b_html);
    
    }
    unset($banners);
    ?>

    baner view. Уничтож меня, уничтож меня полностью...

    Razban_Guestov, 22 Октября 2012

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

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

• 2105
• …
• 1079
• 1078
• 1077
• 1076
• 1075
• 1074
• 1073
• 1072
• 1071
• …
• 1