По колено в коде — Говнокод.ру

Assembler / Говнокод #3194

+225

1
2

fstp qword [tmp]
fild qword [tmp]

суровое округление через память

3.14159265, 11 Мая 2010

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

Си / Говнокод #3193

+136

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35

int check_process(pid_t pid, char *search) {
  char file[1024], buf[1024];
  FILE *FH=NULL;
  int rc, ret=0;

  snprintf(file, 1024, "/proc/%d/cmdline", pid);
  rc = check_file(file);
  if (!rc) {
    // cmdline exists
    ret = 1;
    if (search) {
      // check if cmdline contains 'search'
      FH = fopen(file, "r");
      if (FH) {
	bzero(buf, 1024);
	while(fgets(buf, 1024, FH)) {
	  char *p;
	  while((p = memchr(buf, '\0', 1024))) {
	    *p = 'X';
	  }
	  buf[1023] = '\0';
	  if (strstr(buf, search)) {
	    ret = 0;
	  }
	}
	fclose(FH);
      }
    } else {
      ret = 0;
    }
  } else {
    ret = 1;
  }
  return(ret);
}

Суровые калифорнийские студенты суровы.

raorn, 11 Мая 2010

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

Java / Говнокод #3192

+75

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27

private void changeName() throws Exception {
    File inFile = new File(torrentFilePath);
    File outFile = new File(torrentFilePath + Hashes.getRandom(6));
    BufferedInputStream inStream = new BufferedInputStream(new FileInputStream(inFile));
    BufferedOutputStream outStream = new BufferedOutputStream(new FileOutputStream(outFile));

    int bytesRead;
    int totalBytesRead = 0;
    byte[] bytes = new byte[1024];
    String inString = "";

    while((bytesRead = inStream.read(bytes)) > 0) {
        inString += new String(bytes, 0, bytesRead);
        totalBytesRead += bytesRead;
    }
    inStream.close();
    int len = inString.length();
    int idx = inString.indexOf(NAME_TAG);
    int lastidx = inString.indexOf(objectName) + objectName.length();

    outStream.write(bytes, 0, idx + NAME_TAG.length());
    outStream.write(new String(objectKey.length() + ":" + objectKey).getBytes());
    outStream.write(bytes, lastidx, totalBytesRead - lastidx);

    outStream.close();
    outFile.renameTo(inFile);
}

Горячий привет из солнечной Калифорнии. Таким образом студенты из Университета Санта-Барбары меняют имя файла в торренте.

raorn, 11 Мая 2010

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

C++ / Говнокод #3190

+144

1
2
3
4

string buf;
...
char c_buf[MAX_LEN];
strncpy(c_buf, buf.c_str(), MAX_LEN);

в чём ошибка?

skor4ik, 10 Мая 2010

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

C# / Говнокод #3189

+103

1
2
3
4

private ListBoxItem FindItem(string guid)
{
        return _userlist.Items.Cast<ListBoxItem>().FirstOrDefault(item => ((TextBlock) ((StackPanel) item.Content).Children[1]).Text == guid);
}

Функция поиска элемента в ListBox по значению Guid в одну строку. Наговнокодил ReSharper.

botinko, 09 Мая 2010

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

C++ / Говнокод #3188

+116

01
02
03
04
05
06
07
08
09
10
11
12
13

struct Epica
{
public:
	signed int Value;
};

//...

Epica* ValEp[10][17]; 

//...

ValEp[i][jj][0].Value;

Угадайте, что с автором?

Говногость, 09 Мая 2010

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

Perl / Говнокод #3187

−122

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16

sub PrintToFile {
	
	my ($filename, @file) = @_;
	
	@file = sort {$a <=> $b} @file;
	
	open BK, ">backup.txt";
	foreach $line(@file) {
		print BK "$line";
	}
	close BK;
	
	rename "backup.txt", "$filename";
	unlink "backup.txt";
	
}

А вот так мы записываем в файл. И нас не интересует многопоточность или проверка имени файла (в вызывающей функции тоже нет). А не записать ли нам ../index.html?

Прошу не кидаться калом. Первый раз вижу перл. Может быть так и надо? Волшебник-интерприатор все поправит, и не даст сучиться ужасному?

ps взято с разломанного недображелателем хостинга, для того, чтобы "поправить все как следует".

da4ever, 09 Мая 2010

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

PHP / Говнокод #3186

+167

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27

abstract class DataBaseConnection {
  static public  $user   = "root";
  static private $pass   = "";
  static private $host   = "localhost";
  static private $dbName = "example";

  //this method creates connection to server and selects data base    
  static public function dbConnect () {
        //initialize connection variables 
        $host   = self :: $host;
        $dbName = self :: $dbName;
        $pass   = self :: $pass;
        $user   = self :: $user;
        // connect to server
        $connection = mysql_connect ( $host, $user, $pass, TRUE ) or die ("DATA BASE CONNECTION FAIL : " . mysql_error());
        // select database
        mysql_select_db ( $dbName, $connection ) or die ("DATA BASE HAS NOT BEEN SELECT");
        //set query encoding
        mysql_query("set names utf8") or die("set names utf8 failed") ;  
        
        return $connection;
  }
}

DataBaseConnection :: $user = "root";
 
$connection = DataBaseConnection :: dbConnect ();

kkkoi8r, 08 Мая 2010

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

VisualBasic / Говнокод #3185

−103

001
002
003
004
005
006
007
008
009
010
011
012
013
014
015
016
017
018
019
020
021
022
023
024
025
026
027
028
029
030
031
032
033
034
035
036
037
038
039
040
041
042
043
044
045
046
047
048
049
050
051
052
053
054
055
056
057
058
059
060
061
062
063
064
065
066
067
068
069
070
071
072
073
074
075
076
077
078
079
080
081
082
083
084
085
086
087
088
089
090
091
092
093
094
095
096
097
098
099
100

Function preview()
On Error GoTo stp
Image2.Visible = False
Image3.Visible = False
Image4.Visible = False
Image5.Visible = False
Image6.Visible = False
Image7.Visible = False
Image8.Visible = False
Image9.Visible = False
Image10.Visible = False
Image11.Visible = False
Image12.Visible = False
Image13.Visible = False
Image14.Visible = False
Image15.Visible = False
Image16.Visible = False
Image17.Visible = False

File1.ListIndex = 0
temp = File1.path & "\" & File1.FileName
Image2.Picture = LoadPicture(temp)
Image2.ToolTipText = File1.FileName
Image2.Visible = True

File1.ListIndex = 1
temp = File1.path & "\" & File1.FileName
Image3.Picture = LoadPicture(temp)
Image3.ToolTipText = File1.FileName
Image3.Visible = True

File1.ListIndex = 2
temp = File1.path & "\" & File1.FileName
Image4.Picture = LoadPicture(temp)
Image4.ToolTipText = File1.FileName
Image4.Visible = True

File1.ListIndex = 3
temp = File1.path & "\" & File1.FileName
Image5.Picture = LoadPicture(temp)
Image5.ToolTipText = File1.FileName
Image5.Visible = True

File1.ListIndex = 4
temp = File1.path & "\" & File1.FileName
Image6.Picture = LoadPicture(temp)
Image6.ToolTipText = File1.FileName
Image6.Visible = True

File1.ListIndex = 5
temp = File1.path & "\" & File1.FileName
Image7.Picture = LoadPicture(temp)
Image7.ToolTipText = File1.FileName
Image7.Visible = True

File1.ListIndex = 6
temp = File1.path & "\" & File1.FileName
Image8.Picture = LoadPicture(temp)
Image8.ToolTipText = File1.FileName
Image8.Visible = True

File1.ListIndex = 7
temp = File1.path & "\" & File1.FileName
Image9.Picture = LoadPicture(temp)
Image9.ToolTipText = File1.FileName
Image9.Visible = True

File1.ListIndex = 8
temp = File1.path & "\" & File1.FileName
Image10.Picture = LoadPicture(temp)
Image10.ToolTipText = File1.FileName
Image10.Visible = True

File1.ListIndex = 9
temp = File1.path & "\" & File1.FileName
Image11.Picture = LoadPicture(temp)
Image11.ToolTipText = File1.FileName
Image11.Visible = True

File1.ListIndex = 10
temp = File1.path & "\" & File1.FileName
Image12.Picture = LoadPicture(temp)
Image12.ToolTipText = File1.FileName
Image12.Visible = True

File1.ListIndex = 11
temp = File1.path & "\" & File1.FileName
Image13.Picture = LoadPicture(temp)
Image13.ToolTipText = File1.FileName
Image13.Visible = True

File1.ListIndex = 12
temp = File1.path & "\" & File1.FileName
Image14.Picture = LoadPicture(temp)
Image14.ToolTipText = File1.FileName
Image14.Visible = True

File1.ListIndex = 13
temp = File1.path & "\" & File1.FileName
Image15.Picture = LoadPicture(temp)

Это код функции для реализации предосмотра изображений в папке.
Да, массивы, однако, лучший вариант чем этот :)

ecco, 08 Мая 2010

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

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