Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+128
if ((((((X >= -7) && (X<= -6) & (Y!=2)) || (X<= -2) && (X>= -6) && (Y<=0) && (Y>= -1) && (Y== 0.25*X + 0.5) || (X+ -2)*(X+ -2) + (Y+2)*(Y+2)==4) && (X >= -2) && (X<=0) && (Y>=0) && (Y<=2)|| (((X*X)+(Y*Y)==4)) && ((X>=0) && (X<=2) && (Y>=0) && (Y<=2))) || ((Y==0.5*X-1) && (X>=2) && (Y<=3) & (Y!=0)))) Console.WriteLine("Принадлежит");
HIMen,
23 Декабря 2010
+153
template <class TList, template <class> class Unit>
class GenScatterHierarchy;
template <class T1, class T2, template <class> class Unit>
class GenScatterHierarchy<Typelist<T1, T2>, Unit>
: public GenScatterHierarchy<Private::ScatterHierarchyTag<T1, T2>, Unit>
, public GenScatterHierarchy<T2, Unit>
{
public:
typedef Typelist<T1, T2> TList;
typedef GenScatterHierarchy<Private::ScatterHierarchyTag<T1, T2>, Unit> LeftBase;
typedef GenScatterHierarchy<T2, Unit> RightBase;
template <typename T> struct Rebind
{
typedef Unit<T> Result;
};
};
Говногость,
21 Декабря 2010
−115
#!/usr/bin/ruby1.8
require 'mysql'
$KCODE = 'UTF8'
class Country
@@country = Array.new
@@insert_query = String.new
@@db = Mysql
def initialize(filename)
file = File.open(filename)
while !file.eof?
value, index = file.readline.split(/\s+/u)
@@country[index.to_i] = value.to_s
end
file.close
end
def database_connect
@@db = Mysql.new('localhost','username','userpass','userdatabase')
begin
@@db.query("SET NAMES utf8")
rescue
puts @@db.error
end
end
def create_query
begin
result = @@db.query("SELECT * FROM table")
rescue
puts @@db.error
end
result.each_hash do |field|
@@country.each_index do |index|
@@insert_query += "UPDATE table SET position = #{index} WHERE caption = '#{field['caption']}';" if @@country[index] == field['caption']
end
end
end
def execute_query
begin
@@insert_query.split(/;/u).each { |query| @@db.query(query) }
puts "result: #{@@db.errno}" if @@db.errno
rescue
puts @@db.error
end
end
def database_disconnect
@@db.close
end
end
cnt = Country.new('country.txt')
# connect to DB
cnt.database_connect
# construct query
cnt.create_query
# execute constructed query
cnt.execute_query
# close connect
cnt.database_disconnectНу можно же как-то сделать лучше?
avastor,
19 Декабря 2010
+109
procedure RemoveDir(path: string);
var
sr: TSearchRec;
begin
if FindFirst(path + '\*.*', faAnyFile, sr) = 0 then
begin
repeat
if sr.Attr and faDirectory = 0 then
DeleteFile(path + '\' + sr.name);
else
RemoveDir(path + '\' + sr.name);
until
FindNext(sr) <> 0;
end;
FindClose(sr);
RemoveDirectory(PChar(path));
end;
История такова, писал я как-то программу по курсовому. (Это было еще года два-три назад, когда я про юнит тесты и различные технологии проектирования и разработки ничего не знал.) По задумки программа распаковывала некие файлы во временный каталог рядом с приложением и по завершению работы с ними удаляла эту папку вот этим методом. Итак, запустил я эту подпрограмму на выполнение для проверки ее работоспособности и смотрю в файловом менеджере, что папка успешно удалилась и все ок. Но вдруг студия начала жаловаться что нет каких-то файлов, я смотрю в файловый менеджер и вижу что файлы проекта программы исчезают буквально на глазах! Естественно я резко убиваю программу и далее начинаю восстанавливать исходники. Благо, что делал бэкапы и эта подпрограмма проработала все ничего, а ведь последствия могли быть еще больше. А мораль такая, нужно быть предельно внимательным, когда работаешь с удалением какой-либо информации.
P.S. Нужно добавить проверку между 10 и 11 строкой:
if (sr.Name <> '..') and (sr.Name <> '.') then
vanished,
18 Декабря 2010
+157
$query = "SELECT * FROM records WHERE id_film='$id_film'";
$results = mysql_query($query);
$var1 = "<?xml version=\"1.0\" encoding=\"utf-8\"?>\n";
$var1 = $var1. "<playlist>\n";
while($line = mysql_fetch_assoc($results))
{
$tmp_us = $tmp_us.$line['id_user'];
$var1 = $var1."<vid src=\"http://homelinux.com:8080/sample1/content/audiorecord/"
. $line['id_user']
."/"
. $line["file_name"]
."_d.flv"
. "\" label=\""
. $line["file_name"]
."\""
." id_film=\""
. $line["id_film"]
."\""
." time_begin=\""
. $line["time_begin"]
."\""
." time_end=\""
. $line["time_end"]
."\""
." id_user=\""
. $line["id_user"]
."\""
." sh_val=\""
. $line["sh_val"]
."\""
." id_record=\""
. $line["id_record"]
."\""
."/>\n";
}
$var1 = $var1."</playlist>\n";
echo "var1=$var1";Вот так некоторые Flash-еры формируют xml пакеты
Agel_Nash,
16 Декабря 2010
+159
SetClipboardData(CF_TEXT, hMems);
SetClipboardData(RegisterClipboardData(CFSTR_SHELLURL), hMems);
Говногость,
15 Декабря 2010
+161
if ($_GET['sd']=='show' && $_GET['sv']=='' && $_GET['vks']=='' && $_GET['m']=='' && $_GET['bio']=='' && $_GET['ras']=='' && $_GET['tm']=='' && $_GET['ld']=='') {$zagol=$title[sd];} else {$zagol=$title[spec];};
if ($_GET['sv']=='show' && $_GET['sd']=='' && $_GET['vks']=='' && $_GET['m']=='' && $_GET['bio']=='' && $_GET['ras']=='' && $_GET['tm']=='' && $_GET['ld']=='') {$zagol=$title[sv];} else {$zagol=$title[spec];};
if ($_GET['vks']=='show' && $_GET['sv']=='' && $_GET['sd']=='' && $_GET['m']=='' && $_GET['bio']=='' && $_GET['ras']=='' && $_GET['tm']=='' && $_GET['ld']=='') {$zagol=$title[vks];} else {$zagol=$title[spec];};
if ($_GET['m']=='show' && $_GET['sv']=='' && $_GET['vks']=='' && $_GET['sd']=='' && $_GET['bio']=='' && $_GET['ras']=='' && $_GET['tm']=='' && $_GET['ld']=='') {$zagol=$title[m];} else {$zagol=$title[spec];};
if ($_GET['bio']=='show' && $_GET['sv']=='' && $_GET['vks']=='' && $_GET['m']=='' && $_GET['sd']=='' && $_GET['ras']=='' && $_GET['tm']=='' && $_GET['ld']=='') {$zagol=$title[bio];} else {$zagol=$title[spec];};
if ($_GET['ras']=='show' && $_GET['sv']=='' && $_GET['vks']=='' && $_GET['m']=='' && $_GET['bio']=='' && $_GET['sd']=='' && $_GET['tm']=='' && $_GET['ld']=='') {$zagol=$title[ras];} else {$zagol=$title[spec];};
if ($_GET['tm']=='show' && $_GET['sv']=='' && $_GET['vks']=='' && $_GET['m']=='' && $_GET['bio']=='' && $_GET['ras']=='' && $_GET['sd']=='' && $_GET['ld']=='') {$zagol=$title[tm];} else {$zagol=$title[spec];};
if ($_GET['ld']=='show' && $_GET['sv']=='' && $_GET['vks']=='' && $_GET['m']=='' && $_GET['bio']=='' && $_GET['ras']=='' && $_GET['tm']=='' && $_GET['sd']=='') {$zagol=$title[ld];} else {$zagol=$title[spec];};Первые попытки писать на PHP...
BOOMik,
22 Ноября 2010
+163
function utf8_win ($s){
$out="";
$c1="";
$byte2=false;
for ($c=0;$c<strlen($s);$c++){
$i=ord($s[$c]);
if ($i<=127) $out.=$s[$c];
if ($byte2){
$new_c2=($c1&3)*64+($i&63);
$new_c1=($c1>>2)&5;
$new_i=$new_c1*256+$new_c2;
if ($new_i==1025){
$out_i=168;
}else{
if ($new_i==1105){
$out_i=184;
}else {
$out_i=$new_i-848;
}
}
$out.=chr($out_i);
$byte2=false;
}
if (($i>>5)==6) {
$c1=$i;
$byte2=true;
}
}
return $out;
}
iconv не по мне..., я лучше с побитовыми операциями поработаю, зато сам!
Гораздо медленее правда, зато своё!
dwinner,
22 Ноября 2010
+109
/*
* The dump header describes the contents of a crash dump. Two headers
* are written out: one at the beginning of the dump, and the other at
* the very end of the dump device. The terminal header is at a known
* location (end of device) so we can always find it. The initial header
* is redundant, but helps savecore(1M) determine whether the dump has been
* overwritten by swap activity. See dumpadm(1M) for dump configuration.
*/
#define DUMP_MAGIC 0xdefec8edU /* dump magic number */вот такая сигнатура у крэшдампа соляриса
bugmenot,
02 Ноября 2010
+164
function CheckDBInsert($str)
{
$arr = array("INSERT","SELECT","UPDATE","DELETE","FLUSH","UNION","CONCAT","SET","GRANT","--",";","..","'","-","%","(",")");
foreach ($arr as $v) {
$pos = strpos($str, $v);
if ($pos === false) {
} else {
return "ОШИБКО";
die();
}
}код мой 3-летней давности....я плакалЬ(но он работал!)
Steel2010,
31 Октября 2010
Follow us!