- 1
- 2
- 3
<?php
echo "preved";
?>
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+132
<?php
echo "preved";
?>
+132
/**
* "КАК БЫ сделал и ВРОДЕ БЫ работает."
*
**/
Типичный отчёт говнокодера.
+131.9
np_char=`awk '{
for(i=1;i<=length($0);i+=1){
symb=substr($0,i,1);
if (symb < " ")
{
print symb;
exit 9;
}
}}' $1`
hex_code=`echo "$np_char" | hexdump -n 1 -e '1/1 "%X" "\n"'`
Поиск и вывод непечатных символов в файле...
Это я еще молчу об этической стороне hexdump.
+131.8
def ad30 // Все понятно из названия, да?
vgl start_naht 3
baw gr
spg ad40
aktuelle_naht = 3 ;
lad vsp 53 aktuelle_naht ;
spg up setze_npk_abs ;
vgl start_naht 3
baw gl
PPZ # R100 Z1 z1_start Z2 P8 Z3 P9 ;
z1_start = -1590
z1_ziel = -2985
vgl tisch_nr 2
baw gl
spg ad31
z1_start = z1_start + tisch_abstand ;
z1_ziel = z1_ziel + tisch_abstand ;
def ad31
z1_soll = z1_start
lad r1 R65
lad r2 R66
R1.C = c3_soll ;
R2.C = c3_soll ;
R1.B = 0;
R2.B = 0;
spg up verschiebe_nahtanfang ;
spg up fahre_z1 ;
PPZ # A1 -12.13 A2 -15.73 A3 114.05 A4 24 A5 40 A6 -208 Z1 z1_start Z2 P8 Z3 P9
pnd_amp = pnd_amp_laengs ;
pnd_len = pnd_amp * 0.8
dx = -delta_x_npk
ges_schweiss = ges_schweiss_orig * 0.85
npk 4 rel x dx y 0 z delta_z_npk a 0 b 0 c 0
spg up laengsnaht_ohne_messen ;
; ------- Veraenderte Punkte speichern
vgl za_soll 90
baw kl
spg ad35
; ------- Oberseite -----------------------
lad r605 r1
lad r606 r2
spg ad36
; ------- Unterseite ----------------------
def ad35
lad r625 r1
lad r626 r2
def ad36
lad p1 pos
spg up freifahren
spg up anfahr_ges ;
p2 = p2 - ( z1_start - z1_ziel )
liz x p1 y p2 z p3 a p4 b p5 c p6 z1 z1_start z2 p8 z3 p9
spg up grundstellung
spg up brenner_reinigen ;
; --------------------------------------------------------------
; Schweissnaht 4 (Roboterseite)
; --------------------------------------------------------------
def ad40
vgl start_naht 4
baw gr
spg ad50
aktuelle_naht = 4 ;
lad vsp 53 aktuelle_naht ;
spg up brenner_reinigen ;
z1_start = -1590
z1_ziel = -2985
vgl tisch_nr 2
baw gl
spg ad41
z1_start = z1_start + tisch_abstand ;
z1_ziel = z1_ziel + tisch_abstand ;
def ad41
z1_soll = z1_start ;
lad r1 R67
lad r2 R68
Это язык SRCL, используется на некоторых роботах, зовется высокоуровневым. Однако не умеет даже передавать параметры в функции.
Особенно умиляют команды типа PPZ и LIZ и названия типа aktuelle_naht - писал немец :)
В конце концов, чтобы запрограммировать этого робота пришлось писать свой конструктор программ, который выдавал эту лажу мегатоннами (а в чем еще измерять разрушительную силу этой хрени??).
+131.8
public string EncodeParameter_1251(string param) {
var result = new StringBuilder();
foreach (var bt in Encoding.GetEncoding("windows-1251").GetBytes(param)) result.AppendFormat("%{0}", bt.ToString("X02"));
return result.ToString();
}
метод кодирующий значение параметра запроса в "windows-1251" в формате URL (%FF%FF%FF...).
у проекта кодировка запросов в "UTF-8", но у остальных проектов - "windows-1251", и в другой кодировке они некорректно обрабатывают кириллицу в строке запроса. знаю, наговнокодил, ну а шо поделаеш...
+131.8
class Par_host_port
{
private:
std::string vdata;
public:
//...
char* get () { return (char*)vdata.c_str (); }
};
char const* превращается... Превращается char const*... В char*!
+131.6
<div style="width:100%; text-align:center; height:95%; position: absolute ; left:0; top:0; text-align:center; " >
<table id="TableHead" cellpadding="0" cellspacing="0" style="text-align:center;width: 400px; margin-top:-150px; margin-left:-200px; position:absolute; top: 50%; " align="center">
...
</div>
ну не красотень
+131.6
#!/bin/bash
function get_group()
{
rm ./group
gnc=`cat /etc/group | wc -l`
cn=1
while let "cn<=gnc"
do
gn=`cat /etc/group | head -n $cn | tail -n 1 | tr ':' '\n' | head -n 1 | grep [A-Za-z0-9].*`
gnl=`cat /etc/group | head -n $cn | tail -n 1`
echo $gnl
echo "Do you want add your to group "$gn
read as
if [ "$as" == "yes" ]; then
echo "yes"
c=`echo $gnl | wc -c`
let c--
ct=":"
echo $c
cn2=`echo $gnl | cut -c$c`
echo "cn2 "$cn2
if [ "$cn2" != ":" ]
then
echo no
gnl=$gnl","
gnl=$gnl"$1"
echo $gnl >> ./group
else
gnl=$gnl""$1
echo $gnl >> ./group
fi
echo $gnl
else
echo $gnl >> ./group
fi
let cn++
done
cp ./group /etc/group
}
if [ $# -lt 1 ]; then
echo -n "Enter username:"
read username
uid=1
puid=0
while :
do
uid=`echo ${RANDOM:0:3}`
puid=`cat /etc/passwd | tr ':' '\n' | grep ^[0-9].*$ | grep $uid`
if [ "$puid" == "" ];then
echo "uid = $uid"
echo "puid = $puid"
echo $username
groupadd $username
gid=`cat /etc/group | grep $username | tr ':' '\n' | grep ^[0-9].*$ | head -n 1 | tail -n 1`
echo "gid "$gid
echo -n "Enter shell:"
read ushell
echo -n "Enter your name:"
read rname
echo $username:x:$uid:$gid:$rname:/home/$username:$ushell >> /etc/passwd
echo $username:Jkirh5i3e/GqU:14318:0:99999:7:7:: >> /etc/shadow
echo "Your password www.yandex.ru"
mkdir /home/$username
chmod u+r+w+x /home/$username
chmod g+r+w+x /home/$username
chmod o+r+w+x /home/$username
get_group $username
exit 0
else
uid=`echo ${RANDOM:0:3}`
echo $uid
echo "puid "$puid
fi
done
fi
echo -n "script havnt command line arguments"
exit 0
Регистрирует пользователя в системе
+131.5
private void set_mode(bool mod)
{
if(mod==true)
{
label1.Enabled=true;
button1.Enabled=true;
button2.Enabled=true;
button3.Enabled=false;
button4.Enabled=false;
}
else
{
label1.Enabled=false;
button1.Enabled=false;
button2.Enabled=false;
button3.Enabled=true;
button4.Enabled=true;
}
}
Типа настройка интерфейса..(тихий ужас)
+131.4
internal static System.Drawing.Font ToWindowsFont(Microsoft.Office.Interop.PowerPoint.Font ppFont)
{
FontStyle style = ToGdiFontStyle(ppFont.Style);
System.Drawing.Font gdiFont = new System.Drawing.Font(ppFont.Name, ppFont.Size, style);
// из-за следующей строчки проект не скомпилируется под .NET 2.0, требуя ещё и один из более новых SP
if ( windowsFont.Name != windowsFont.OriginalFontName )
{
windowsFont = new System.Drawing.Font(TextConverter.DefaultUnicodeSubstituteFont, ppFont.Size, style);
}
return windowsFont;
}
Баг был случайно найден на виртуалке с чистой Windows XP и MS Visual Studio 2005, поскольку мы по собственной глупости упустили тот факт, что на хост-машинах давно стоит .NET 3.5. Строчка "if ( windowsFont.Name != ppFont.Name )" решает проблему совместимости. Вот как иногда из-за маленькой, не бросающейся в глаза, ошибки можно завалить весь проект. Каюсь, этот код - мой. ))