1. Список говнокодов пользователя Lure Of Chaos

    Всего: 161

  2. VisualBasic / Говнокод #5205

    −166

    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
    Public Sub DBOpen(Optional sFullPath As String = "")
    If sFullPath = "" Then sFullPath = sPath
    Dim f As Integer
    Dim l As Integer
    Dim tmp As String
    Dim sName As String
    Dim sSurname As String
    Dim sSex As String
    Dim dBirthdate As Date
    Dim sCity As String
    Dim sStreet As String
    l = 0
    f = FreeFile
    Open sFullPath For Input As #f
        While Not EOF(f)
            Line Input #f, tmp
            l = l + 1
        Wend
    Close #f
    If l > 0 Then
        ReDim asDB(0 To l - 1) As clsCitizen
        l = 0
        f = FreeFile
        Open sFullPath For Input As #f
            While Not EOF(f)
                Input #f, sName, sSurname, sSex, dBirthdate, sCity, sStreet
                Set asDB(l) = New clsCitizen
                asDB(l).sName = sName
                asDB(l).sSurname = sSurname
                asDB(l).sSex = sSex
                asDB(l).dBirthdate = dBirthdate
                asDB(l).sCity = sCity
                asDB(l).sStreet = sStreet
                l = l + 1
            Wend
        Close #f
    End If
    sPath = sFullPath
End Sub

    за что я ненавижу VB6

    а ведь по-другому никак = (

    Lure Of Chaos, 10 Января 2011

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

  3. VisualBasic / Говнокод #5204

    −166

    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
    Private Sub btnNew_Click()
    Dim i As Integer
    Dim asCopy() As clsCitizen
    ReDim asCopy(LBound(modCitizen.asDB) To UBound(modCitizen.asDB)) As clsCitizen
    For i = LBound(modCitizen.asDB) To UBound(modCitizen.asDB)
        Set asCopy(i) = modCitizen.asDB(i)
    Next i
    ReDim modCitizen.asDB(UBound(modCitizen.asDB) + 1) As clsCitizen
    For i = LBound(asCopy) To UBound(asCopy)
        Set modCitizen.asDB(i) = asCopy(i)
    Next i
    Set modCitizen.asDB(UBound(modCitizen.asDB)) = New clsCitizen
    modCitizen.asDB(UBound(modCitizen.asDB)).bNew = True
    iRecNum = UBound(modCitizen.asDB)
    RecordRead
    UpdateControls
    LockMe True
End Sub

    вот через какое место мучительно вспоминал давно забытый, старый добрый VB6

    процедура дополняет массив новым элементом

    Lure Of Chaos, 10 Января 2011

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

  4. Java / Говнокод #5154

    +145

    1. 1
    bit = bit == 0 ? 0 : 1;

    бит или не бит?

    Lure Of Chaos, 05 Января 2011

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

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

    +145

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    9. 9
    private static $from=array('Ä','ä','Æ','æ','Ǽ','ǽ','Å','å','Ǻ','ǻ','À','Á','Â','Ã','à','á','â','ã','Ā','ā','Ă','ă','Ą','ą','Ǎ','ǎ','Ạ','Ạ','ạ','Ả','ả','Ấ','ấ','Ầ','ầ','Ẩ','ẩ','Ẫ','ẫ','Ậ','ậ','Ắ','ắ','Ằ','ằ','Ẳ','ẳ','Ẵ','ẵ','Ặ','ặ',					'Ç','ç','Ć','ć','Ĉ','ĉ','Ċ','ċ','Č','č',					'Ð','ð','Ď','ď','Đ','đ',					'È','É','Ê','Ë','è','é','ê','ë','Ē','ē','Ĕ','ĕ','Ė','ė','Ę','ę','Ě','ě','Ẹ','ẹ','Ẻ','ẻ','Ẽ','Ế','ế','Ề','ề','Ể','ể','ễ','Ệ','ệ','Ə','ə',					'ſ','ſ',					'Ĝ','ĝ','Ğ','ğ','Ġ','ġ','Ģ','ģ',					'Ĥ','ĥ','Ħ','ħ',					'Ì','Í','Î','Ï','ì','í','î','ï','Ĩ','ĩ','Ī','ī','Ĭ','ĭ','Į','į','İ','ı','Ǐ','ǐ','Ỉ','ỉ','Ị','ị',					'IJ','ij',					'fi','fl',					'Ĵ','ĵ',					'Ķ','ķ','ĸ',					'Ĺ','ĺ','Ļ','ļ','Ľ','ľ','Ŀ','ŀ','Ł','ł',					'Ñ','ñ','Ń','ń','Ņ','Ň','ň','ʼn','Ŋ','ŋ',					'Ö','ö','Ø','ø','Ǿ','ǿ','Ò','Ó','Ô','Õ','ò','ó','ô','õ','Ō','ō','Ŏ','ŏ','Ő','ő','Ǒ','ǒ','Ọ','ọ','Ỏ','ỏ','Ố','ố','Ồ','ồ','Ổ','ổ','Ỗ','ỗ','Ộ','ộ','Ớ','ớ','Ờ','ờ','Ở','ở','Ỡ','ỡ','Ợ','ợ','Ơ','ơ',					'Œ','œ',					'Ŕ','ŕ','Ŗ','ŗ','Ř','ř',					'Ś','ś','Ŝ','Ş','ş','Š','š',					'Ţ','ţ','Ť','ť','Ŧ','ŧ',					'Ü','ü','Ù','Ú','Û','ù','ú','û','Ụ','ụ','Ủ','ủ','Ứ','ứ','Ừ','ừ','Ữ','ữ','Ự','ự','Ũ','ũ','Ū','ū','Ŭ','ŭ','Ů','ů','Ű','ű','Ų','ų','Ǔ','ǔ','ǖ','ǘ','Ǚ','ǚ','Ǜ','ǜ','Ư','ư',					'Ŵ','ŵ','Ẁ','ẁ','Ẃ','ẃ','Ẅ','ẅ',					'Ý','ý','ÿ','Ŷ','ŷ','Ÿ','Ỳ','ỳ','Ỵ','ỵ','Ỷ','ỷ','Ỹ','ỹ',					'Þ','þ','ß',					'Ź','ź','Ż','ż','Ž','ž','А','Б','В','Г','Д','Е','Ё','Ж','З','И','Й','К','Л','М','Н','О','П','Р','С','Т','У','Ф','Х','Ц','Ч','Ш','Щ','Ъ','Ы','Ь','Э','Ю','Я','а','б','в','г','д','е','ё','ж','з','и','й','к','л','м','н','о','п','р','с','т','у','ф','х','ц','ч','ш','щ','ъ','ы','ь','э','ю','я');
 private static $to=array('ae','ae','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a','a',					'c','c','c','c','c','c','c','c','c','c',					'd','d','d','d','d','d',					'e','e','e','e','e','e','e','e','e','e','e','e','e','e','e','e','e','e','e','e','e','e','e','e','e','e','e','e','e','e','e','e','e','e',					'f','f',					'g','g','g','g','g','g','g','g',					'h','h','h','h',					'i','i','i','i','i','i','i','i','i','i','i','i','i','i','i','i','i','i','i','i','i','i','i','i',					'ij','ij',					'fi','fl',					'j','j',					'k','k','k',					'l','l','l','l','l','l','l','l','l','l',					'n','n','n','n','n','n','n','n','n','n',					'oe','oe','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o','o',					'oe','oe',					'r','r','r','r','r','r',					's','s','s','s','s','s','s',					't','t','t','t','t','t',					'ue','ue','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u','u',					'w','w','w','w','w','w','w','w',					'y','y','y','y','y','y','y','y','y','y','y','y','y','y',					'th','th','ss',					'z','z','z','z','z','z','a','b','v','g','d','e','e','zh','z','i','j','k','l','m','n','o','p','r','s','t','u','f','h','ts','ch','sh','sch','','y','','e','yu','ya','a','b','v','g','d','e','e','zh','z','i','j','k','l','m','n','o','p','r','s','t','u','f','h','ts','ch','sh','sch','','y','','e','yu','ya');
 public static function translit($s,$tolower=false) {
  $s=str_replace(self::$from,self::$to,$s);
  if($tolower)	$s=strtolower($s);
  $s=preg_replace('/[^a-z0-9-_]+/i','-',$s);
  $s=trim($s,'-');
  return $s;
 }

    избавляемся от умляутов и проч.

    Lure Of Chaos, 05 Января 2011

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

  6. Java / Говнокод #5140

    +145

    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
    private static List<Writer> getWriters(final String className, final Severity severity) {
    final List<Writer> writers = new ArrayList<Writer>();
    if ((className != null) && (severity != null)) {
      final Writer writer = Log.writers.get(className + severity);
      if ((writer != null) && !writers.contains(writer)) {
        writers.add(writer);
      }
    }
    if ((className != null)) {
      final Writer writer = Log.writers.get(className);
      if ((writer != null) && !writers.contains(writer)) {
        writers.add(writer);
      }
    }
    if ((severity != null)) {
      final Writer writer = Log.writers.get(severity.name());
      if ((writer != null) && !writers.contains(writer)) {
        writers.add(writer);
      }
    }
    {
      final Writer writer = Log.writers.get(null);
      if ((writer != null) && !writers.contains(writer)) {
        writers.add(writer);
      }
    }
    return writers;
  }


  public static void setWriter(final String className, final Severity severity, final Writer writer) {
    final Writer w = writer == null ? new OutputStreamWriter(System.err) : writer;
    if ((className != null) && (severity != null)) {
      Log.writers.put(className + severity, w);
      if (Log.writers.get(className) == null) {
        Log.writers.put(className, w);
      }
      if (Log.writers.get(severity.name()) == null) {
        Log.writers.put(className, w);
      }
    } else if (className != null) {
      Log.writers.put(className, w);
    } else if (severity != null) {
      Log.writers.put(severity.name(), w);
    } else {
      Log.writers.put(null, w);
    }
  }

    изобретаю велосипед

    Lure Of Chaos, 04 Января 2011

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

  7. PHP / Говнокод #5117

    +145

    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
    <?php
class Pwd {
    private static $pc='bcdfghjklmnprstvwxyz'; 
    private static $pv='aeiou';
    private static $pd='0123456789';
    private static $ps='!@#$%^&*_-+=';
    
    private static function randsub($s) {
    	$c=$s[rand(0, strlen($s)-1)];
    	return rand(0, 1)?strtoupper($c):strtolower($c);
    }
    
	public static function password($min=4,$max=10) {
		$p='';
		for($i=0;$i<$max;$i++) {
			switch (rand(0, 7)) {
				case 0:
				$p.=self::randsub(self::$pc);
				break;
				case 1:
				$p.=self::randsub(self::$pv);
				break;
				case 2:
				$p.=self::randsub(self::$pd);
				break;
				case 3:
				$p.=self::randsub(self::$pc).self::randsub(self::$pv);
				break;
				case 4:
				$p.=self::randsub(self::$pv).self::randsub(self::$pc);
				break;
				case 5:
				$p.=self::randsub(self::$pc).self::randsub(self::$pv).self::randsub(self::$pc);
				break;
				case 6:
				$p.=self::randsub(self::$pv).self::randsub(self::$pc).self::randsub(self::$pv);
				break;
				case 7:
				$p.=self::randsub(self::$ps);
				break;
			}
		}
		return substr($p, 0,rand($min, $max));
	}
	
}

    хитровыебанный лисапедрильный пассвордоген.

    и PHP тут не причем, лень - это зло = )

    Lure Of Chaos, 30 Декабря 2010

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

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

    +145

    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
    <?php 
if (isset($_GET['offset'])) { 
    $minutes = $_GET['offset']; 
    echo "GMT offset (in minutes, from the browser): ". $minutes ."<br />\n"; 
    echo "GMT: ". gmdate("Y-m-d H:i:s") ."<br />\n"; 
     
    $local = gmmktime(gmdate("H"),gmdate("i")-$minutes); // adjust GMT by client's offset 
     
    echo "Calculated client's date/time: ". gmdate("Y-m-d h:i:s a",$local) ."<br />\n"; 
} else { 
    echo "<script language='javascript'>\n"; 
    echo "var d = new Date();\n"; 
    echo "location.href=\"${_SERVER['SCRIPT_NAME']}?offset=\" + d.getTimezoneOffset();\n"; 
    echo "</script>\n"; 
    exit(); 
} 
?>

    где здесь пхп, кажется, понятно )

    Lure Of Chaos, 30 Декабря 2010

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

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

    +145

    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
    function getTimezoneName() {
tmSummer = new Date(Date.UTC(2005, 6, 30, 0, 0, 0, 0));
so = -1 * tmSummer.getTimezoneOffset();
tmWinter = new Date(Date.UTC(2005, 12, 30, 0, 0, 0, 0));
wo = -1 * tmWinter.getTimezoneOffset();

if (-660 == so && -660 == wo) return 'Pacific/Midway';
if (-600 == so && -600 == wo) return 'Pacific/Tahiti';
if (-570 == so && -570 == wo) return 'Pacific/Marquesas';
if (-540 == so && -600 == wo) return 'America/Adak';
if (-540 == so && -540 == wo) return 'Pacific/Gambier';
if (-480 == so && -540 == wo) return 'US/Alaska';
if (-480 == so && -480 == wo) return 'Pacific/Pitcairn';
if (-420 == so && -480 == wo) return 'US/Pacific';
if (-420 == so && -420 == wo) return 'US/Arizona';
if (-360 == so && -420 == wo) return 'US/Mountain';
if (-360 == so && -360 == wo) return 'America/Guatemala';
if (-360 == so && -300 == wo) return 'Pacific/Easter';
if (-300 == so && -360 == wo) return 'US/Central';
if (-300 == so && -300 == wo) return 'America/Bogota';
if (-240 == so && -300 == wo) return 'US/Eastern';
if (-240 == so && -240 == wo) return 'America/Caracas';
if (-240 == so && -180 == wo) return 'America/Santiago';
if (-180 == so && -240 == wo) return 'Canada/Atlantic';
if (-180 == so && -180 == wo) return 'America/Montevideo';
if (-180 == so && -120 == wo) return 'America/Sao_Paulo';
if (-150 == so && -210 == wo) return 'America/St_Johns';
if (-120 == so && -180 == wo) return 'America/Godthab';
if (-120 == so && -120 == wo) return 'America/Noronha';
if (-60 == so && -60 == wo) return 'Atlantic/Cape_Verde';
if (0 == so && -60 == wo) return 'Atlantic/Azores';
if (0 == so && 0 == wo) return 'Africa/Casablanca';
if (60 == so && 0 == wo) return 'Europe/London';
if (60 == so && 60 == wo) return 'Africa/Algiers';
if (60 == so && 120 == wo) return 'Africa/Windhoek';
if (120 == so && 60 == wo) return 'Europe/Amsterdam';
if (120 == so && 120 == wo) return 'Africa/Harare';
if (180 == so && 120 == wo) return 'Europe/Athens';
if (180 == so && 180 == wo) return 'Africa/Nairobi';
if (240 == so && 180 == wo) return 'Europe/Moscow';
if (240 == so && 240 == wo) return 'Asia/Dubai';
if (270 == so && 210 == wo) return 'Asia/Tehran';
if (270 == so && 270 == wo) return 'Asia/Kabul';
if (300 == so && 240 == wo) return 'Asia/Baku';
if (300 == so && 300 == wo) return 'Asia/Karachi';
if (330 == so && 330 == wo) return 'Asia/Calcutta';
if (345 == so && 345 == wo) return 'Asia/Katmandu';
if (360 == so && 300 == wo) return 'Asia/Yekaterinburg';
if (360 == so && 360 == wo) return 'Asia/Colombo';
if (390 == so && 390 == wo) return 'Asia/Rangoon';
if (420 == so && 360 == wo) return 'Asia/Almaty';
if (420 == so && 420 == wo) return 'Asia/Bangkok';
if (480 == so && 420 == wo) return 'Asia/Krasnoyarsk';
if (480 == so && 480 == wo) return 'Australia/Perth';
if (540 == so && 480 == wo) return 'Asia/Irkutsk';
if (540 == so && 540 == wo) return 'Asia/Tokyo';
if (570 == so && 570 == wo) return 'Australia/Darwin';
if (570 == so && 630 == wo) return 'Australia/Adelaide';
if (600 == so && 540 == wo) return 'Asia/Yakutsk';
if (600 == so && 600 == wo) return 'Australia/Brisbane';
if (600 == so && 660 == wo) return 'Australia/Sydney';
if (630 == so && 660 == wo) return 'Australia/Lord_Howe';
if (660 == so && 600 == wo) return 'Asia/Vladivostok';
if (660 == so && 660 == wo) return 'Pacific/Guadalcanal';
if (690 == so && 690 == wo) return 'Pacific/Norfolk';
if (720 == so && 660 == wo) return 'Asia/Magadan';
if (720 == so && 720 == wo) return 'Pacific/Fiji';
if (720 == so && 780 == wo) return 'Pacific/Auckland';
if (765 == so && 825 == wo) return 'Pacific/Chatham';
if (780 == so && 780 == wo) return 'Pacific/Enderbury'
if (840 == so && 840 == wo) return 'Pacific/Kiritimati';
return 'US/Pacific';
}

var tz = getTimezoneName();

    уныло, но чем-то умиляет. Наверное, проделанным рассчетом

    Lure Of Chaos, 30 Декабря 2010

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

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

    +145

    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
    protected function cmp ( $array )
    {
        $i=0;
   
        if ( !is_array ( $array ) ) return;
       
        foreach ( $array as $key => $val )
        {
            if ( is_array ( $val ) )
            {
                foreach ( $val as $k => $v )
                {
                    if ( is_array ( $v ) )
                    {
                        foreach ( $v as $a => $b )
                        {
                            if ( is_array ( $b ) )
                            {
                                foreach ( $b as $z => $y )
                                {
                                    if ( $newK != $k ) $i=0;
                                       
                                    $arr[$key][$k][$i][$z] = $y;
                                    $newK = $k;
                                }
                            $i++;
                            }
                        }
                    }
                }
            }
        }
        return $arr;
}

    суровый Comparator на PHP

    Lure Of Chaos, 30 Декабря 2010

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

  11. Куча / Говнокод #5054

    +145

    1. 1
    2. 2
    3. 3
    //вместо эпиграфа:
обезьяна и очки - это полбеды.
обезьяна с гранатой - это хуже

    Обращаюсь к дорогому тов. Страйко,

    с вопросом, почему же на говнокоде нет никакой элементарной защиты от дураков?
    хрен с ним с флеймом, переживем
    а тот же флуд - это ж можно напилить, шобы от одного хрена не больше комментария в 3 минуты, причем похожий комментарий считается тем же и не проходит (саундекс или левенштейн)

    Lure Of Chaos, 25 Декабря 2010

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