- 1
- 2
- 3
const long long_value = PyInt_AsLong(value);
const int int_value = (int)long_value;
if (PyErr_Occurred() || long_value != int_value) { /* Overflow */
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+132
const long long_value = PyInt_AsLong(value);
const int int_value = (int)long_value;
if (PyErr_Occurred() || long_value != int_value) { /* Overflow */
PyMongo...
+145
function Redirect($url) {
print "<html><head>\n";
print "<meta http-equiv='Refresh' content='0; url=$url'>\n";
print "</head></html>\n";
exit();
}
Во как делают переадресацию нереальные пацаны!
+158
<?php
define("LOGIN", "login");
define("PASSWORD", "password");
define("BASE", "base");
define("HOST", "IP");
$table = "table";
$err_name = "Вы не написали свое имя! <br />";
$err_text = "Вы не написали текст! <br />";
$err_email = "Вы не указали свой email! <br />";
$conn = mysql_connect(HOST, LOGIN, PASSWORD) or die ('соединение с БД установить не удалось!');
$db = mysql_select_db(BASE, $conn) or die ('проверьте наличие БД!');
$stop = 0;
if (isset($_POST['save'])) {
if ((strlen($_POST['name']) !=0) && (strlen($_POST['text']) !=0) && (strlen($_POST['email']) !=0)) {
$name = $_POST['name'];
$text = $_POST['text'];
$email = $_POST['email'];
if (strlen($_POST['url']) !=0) {
$url = $_POST['url'];
$create = mysql_query("INSERT INTO $table VALUES (NULL, '$name', '$text', '$email', '$url')", $conn) or die ('запрос в БД не выполнен!');
$stop = 1 ;
}
if ($stop != 1) {
$create = mysql_query("INSERT INTO $table VALUES (NULL, '$name', '$text', '$email', NULL)", $conn) or die ('запрос в БД не выполнен!');
}
}
}
if (error('name')) {
echo $err_name;
}
if (error('text')) {
echo $err_text;
}
if (error('email')) {
echo $err_email;
}
function error($err) {
return (isset($_POST['save']) && strlen($_POST[$err]) == 0);
}
$result = mysql_query("SELECT * FROM $table", $conn) or die ('Выбранная таблица не существует!');
$stroki = mysql_num_rows($result);
$stolb = mysql_num_fields($result);
for ($i=0; $i<$stroki; $i++) {
$s = mysql_fetch_row($result);
for ($j=0; $j<$stolb; $j++) {
$massiv[$i][$j] = $s[$j];
}
}
for ($i=0; $i<$stroki; $i++) {
for ($j=0; $j<$stolb; $j++) {
echo $massiv[$stroki-$i-1][$j] . " ";
}
echo "<br />";
}
if (isset($_POST['clear'])) {
$delete = mysql_query("TRUNCATE TABLE $table", $conn) or die ('запрос на удаление выполнить не удалось!');
echo "<br />" . "<hr />" . "Все данные стерты!" . "<hr />" . "<br />";
}
mysql_close($conn);
echo "<form method=\"POST\">\n";
echo "<table border=\"1\" cellpadding=\"5\" cellspacing=\"5\">\n";
echo "<tr><td>Ваше имя</td><td><input type=\"text\" name=\"name\" /></td></tr>\n";
echo "<tr><td>Ваш email</td><td><input type=\"text\" name=\"email\" /></td></tr>\n";
echo "<tr><td>Ваша домашняя страница (URL)</td><td><input type=\"text\" name=\"url\" /></td></tr>\n";
echo "<tr><td>Текст сообщения</td><td><textarea name=\"text\"></textarea></td></tr>\n";
echo "<tr><td colspna=\"2\"><input type=\"submit\" name=\"save\" value=\"Отослать\"/></td></tr>\n";
echo "<tr><td colspna=\"2\"><input type=\"submit\" name=\"clear\" value=\"Очистить\"/></td></tr>\n";
?>
гостевая книга (php +mysql)
+159
<?php
//debug($item[$modelname]);
if($item[$modelname]['has_rooms_furniture']){
__('has_rooms_furniture');
} else {
echo 'без ';
__('has_rooms_furniture');
}
echo'<br>';
if($item[$modelname]['has_kitchen_furniture']){
__('has_kitchen_furniture');
}
else {
echo 'без ';
__('has_kitchen_furniture');
}
echo'<br>';
if($item[$modelname]['has_phone']){
__('has_phone');
}else {
echo 'без ';
__('has_phone');
}
echo'<br>';
if($item[$modelname]['has_tv']){
__('has_tv');
echo'<br>';
}
if($item[$modelname]['has_fridge']){
__('has_fridge');
echo'<br>';
}
if($item[$modelname]['has_washer']){
__('has_washer');
echo'<br>';
}
if($item[$modelname]['has_balcon']){
__('has_washer');
echo'<br>';
}
if($item[$modelname]['may_children']){
__('may_children');
echo'<br>';
}
if($item[$modelname]['may_animals']){
__('may_animals');
echo'<br>';
}
echo " ";
?>
Код из проекта на CakePHP
__() - функция для локализации термина
+156
# Записываем в БД новый хеш авторизации и IP
$query=mysql_query("UPDATE user SET hash='".$hash."'".$insip." WHERE id='".$data['id']."'");
$result = mysql_query($query)
or die ("<p>Нельзя выполнить запрос ".mysql_error());
+164
# Обрабатываем встроенные теги
$msg = str_replace("[u]", "<u>", $msg);
$msg = str_replace("[U]", "<u>", $msg);
$msg = str_replace("[i]", "<i>", $msg);
$msg = str_replace("[I]", "<i>", $msg);
$msg = str_replace("[b]", "<b>", $msg);
$msg = str_replace("[B]", "<b>", $msg);
$msg = str_replace("[sub]", "<sub>", $msg);
$msg = str_replace("[SUB]", "<SUB>", $msg);
$msg = str_replace("[sup]", "<sup>", $msg);
$msg = str_replace("[SUP]", "<sup>", $msg);
$msg = str_replace("[/u]", "</u>", $msg);
$msg = str_replace("[/U]", "</u>", $msg);
$msg = str_replace("[/i]", "</i>", $msg);
$msg = str_replace("[/I]", "</i>", $msg);
$msg = str_replace("[/b]", "</b>", $msg);
$msg = str_replace("[/B]", "</b>", $msg);
$msg = str_replace("[/SUB]", "<sub>", $msg);
$msg = str_replace("[/sub]", "</sub>", $msg);
$msg = str_replace("[/SUP]", "</sup>", $msg);
$msg = str_replace("[/sup]", "</sup>", $msg);
Года 4 назад пришлось лазить и исправлять код чужой гостевухи,
вот такое встретилось, и это ещё не хит ;-)
+145
#define ISODD( i ) ( (((i) % 2) == 0) ? 0 : 1 )
Особо выдающимся китайцам платят не построчно, а посимвольно.
−120
t = SQLEXEC(cc,"INSERT INTO CARDS (N, NAME1, NAME2, NAME3, PDEPARTMENT, PPOST, DCREATE, DMODIFY, PFIRM, PGROUP);
VALUES( '"+ALLTRIM('65905')+"', '"+UPPER('Ивасик')+"', '"+UPPER('Иван')+"', '"+UPPER('Андреевич')+"',;
'"+ALLTRIM('565')+"', '"+ALLTRIM('2184800')+"', '"+ALLTRIM('24/06/2009')+"', '"+ALLTRIM('07/07/2009')+"',;
'"+ALLTRIM('5')+"','"+ALLTRIM('5')+"')")
Пример залива данных в базу на Visual FoxPro
+95
function TForm1.beta(i:integer) : integer;
var bt:integer;
begin
bt:=0;
curI:=i;
if (alf=1) and (cad=0) then
begin
if i<=26 then bt:=2;
if (i<=36) and (i>=27) then bt:=3;
if (i<=48) and (i>=37) then begin bt:=1; addortolexlist(cT); end;
if i=49 then bt:=4;
if i=50 then bt:=5;
if i=51 then bt:=6;
if i=52 then bt:=7;
end;
if (alf=2) and (cad=0) then
begin
if i<=26 then bt:=2;
if (i<=36) and (i>=27) then bt:=2;
end;
if (alf=3) and (cad=0) then
begin
if (i<=36) and (i>=27) then bt:=3;
end;
if (alf=4) and (cad=0) then
begin
if i=50 then
begin
Tl[lexnow].n:=jj;
Tl[lexnow].subst:='<>';
Tl[lexnow].lexcod:=21;
Tl[lexnow].index:=0;
bt:=1;
inc(lexnow);
ii:=ii+1;
end;
if i=51 then
begin
Tl[lexnow].n:=jj;
Tl[lexnow].subst:='<=';
Tl[lexnow].lexcod:=24;
Tl[lexnow].index:=0;
bt:=1;
ii:=ii+1;
inc(lexnow);
end;
Кусок кода из лабораторной работы по трансляторам. Как сказал парень - "Я не умею пользоваться функциями, поэтому я все пишу на массивах" О_о
Дальше в коде заполнение массивов размерностью в сотню элементов вручную!
Главное, что всё работает...
+108
TCalc = Class
Public
Order : 1..2;
BMouseDown : Boolean;
TSS : TPoint;
mas : array[1..8,1..8] of Byte;
Constructor Create;
Procedure MouseDown (Stroka, Stolb : Byte; Var Bool : Boolean);
Procedure FiguresCount (Var White, Black : Byte);
Procedure Messages (i : Byte);
Procedure Proverka (T : TPoint; Stroka, Stolb : Byte;
Var Bool, Double : Boolean; Var Dbl : TPoint);
Procedure ReloadMas (Str, Stolb : Byte; Point : TPoint; Double : Boolean; DblP : TPoint);
Procedure BoardHelp (Stroka, Stolb : Byte);
Procedure NoChangeOrder (Stroka, Stolb : Byte; Var NoChangeOrder : Boolean);
Procedure Proverka_GoTo (Str, Stolb : Byte; Var masBool : ArrBool;
Var masCoord : ArrCoord);
Procedure Scanner (Var kol : Byte; Var ScanMas : ArrCoord);
Procedure PlaySound (Wave : TLMDWaveComp; ind : Byte);
Procedure FigureTrue (Str, Stolb : Byte);
Procedure Damka_Go (Fig : TPoint; Str, Stolb : Byte;
Var Bool, Double : Boolean; Var Dbl : TPoint);
Procedure IsDamka_Fight (X, Y : Byte; Var Bool : Boolean; Var Coord : TPoint);
end;
Объявление класса, отвечающего за логику в игре шашки.
Объектный подход :)