- 1
- 2
- 3
- 4
<?php $o_ids = array();
foreach ($orders_num as $thiso){array_push($o_ids, $thiso->id);}
echo implode(", ", $o_ids);
?>
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
0
<?php $o_ids = array();
foreach ($orders_num as $thiso){array_push($o_ids, $thiso->id);}
echo implode(", ", $o_ids);
?>
Найдено в дебрях легаси
+157
//
// JS-protected mailto: link
//
function s2_js_mailto($name, $email)
{
$parts = explode('@', $email);
if (count($parts) != 2)
return $name;
return '<script type="text/javascript">var mailto="'.$parts[0].'"+"%40"+"'.$parts[1].'";'.
'document.write(\'<a href="mailto:\'+mailto+\'">'.str_replace('\'', '\\\'', $name).'</a>\');</script>'.
'<noscript>'.$name.', <small>['.$parts[0].' at '.$parts[1].']</small></noscript>';
}
И вот таким образом, S2 CMS защищает почтовые адреса через PHP/JS. Оригинально.
+117
final class HackFormFlowPanel extends FormPanel {
...
@Override
public void reset() {
GWT.log("Upload form reset suppressed");
// Overridden to do nothing.
}
public void reallyReset() {
super.reset();
}
}
После успешного аплоада файла gwtupload говорит reset форме с элементом выбора файла. И никак не отключается. А нужно, чтобы файл оставался выбранным.
Пришлось нагородить вот такой костыль.
+19
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <iostream>
}
void main (){
int prog=0,n;
printf ("Which programm? ");
scanf ("%d",&prog);
if (prog==1){
int glas=0,sogl=0,j=0,k=0;
char *s,*l,*m;
s=(char*)calloc(20,sizeof(char));
l=(char*)calloc(20,sizeof(char));
m=(char*)calloc(20,sizeof(char));
flushall();
printf ("\nEnter text: ");
gets(s);
n=strlen(s);
/*Разбиваем на два массива исходную строку*/
for (int i=0;i<n;i++){
if(s[i]=='a'||s[i]=='q'||s[i]=='e'||s[i]=='y'||s[i]=='u'||s[i]=='i'||s[i]=='o'||s[i]=='j'){ l[j]=s[i]; glas++;j++;}
if(s[i]=='g'||s[i]=='f'||s[i]=='d'||s[i]=='s'||s[i]=='p'||s[i]=='t'||s[i]=='r'||s[i]=='w'||s[i]=='h'||s[i]=='k'||s[i]=='l'||s[i]=='z'||s[i]=='x'||s[i]=='c'||s[i]=='v'||s[i]=='b'||s[i]=='b'||s[i]=='n'||s[i]=='m'){ m[k]=s[i];sogl++;k++;}
}
printf ("\nDivided:\n");
puts(l);puts(m);
/*Сортируем каждый массив*/
char c=51,d=11;
for(j=0;j<sogl;j++) {for (int i=0;i<sogl;i++){if (m[i]>m[i+1] && (i+1)<sogl){d=m[i+1]; m[i+1]=l[i]; m[i]=d;}}}
for(j=0;j<glas;j++){ for (int i=0;i<glas;i++){if (l[i]>l[i+1] && (i+1)<glas){c=l[i+1]; l[i+1]=l[i]; l[i]=c;}}}
printf ("\nFinal:\n");
puts(l);
flushall();
puts(m);
}
Источник: http://otvety.google.ru/otvety/thread?tid=78a81d7ac11a8804&table=/otvety/topics?clk=lftpn&tab=wtmtosb
Цитата: "Задача: Написать программу для обработки строки следующим образом: вначале должны идти гласные буквы, упорядоченные по возрастанию (aaeeiioo), затем согласные, упорядоченные по убыванию.
Написал программу, она нормально сортирует гласные, но когда переходит к согласным - совершенно не работает."
+2
(* https://coq.inria.fr/library/Coq.Init.Datatypes.html *)
(* Basic boolean operators *)
Definition andb (b1 b2:bool) : bool := if b1 then b2 else false.
Definition orb (b1 b2:bool) : bool := if b1 then true else b2.
Definition implb (b1 b2:bool) : bool := if b1 then b2 else true.
Definition xorb (b1 b2:bool) : bool :=
match b1, b2 with
| true, true => false
| true, false => true
| false, true => true
| false, false => false
end.
Definition negb (b:bool) := if b then false else true.
Infix "||" := orb : bool_scope.
Infix "&&" := andb : bool_scope.
На первый взгляд этот ваш Coq (питух) выглядит как очередной ML-язычок.
−1
def _run(self):
L.debug('CommentsMonitor started.')
with requests.Session() as sess:
bormand = Bormand(sess)
while True:
comments = bormand.get_comments()
if comments is not None:
for comment_json in comments:
comment = Comment(comment_json)
if comment.id not in self.replied_cache and comment.user_id not in self.users_blacklist:
task = parse_comment(comment)
if task is not None:
L.debug('Replying to: ' + str(comment))
self.replied_cache.add(comment.id)
self.tasks_queue.put(task)
else: # comments is None
L.warning('Failed to load comments')
if self._stop_ev.wait(timeout=self.pause_time):
break
L.debug('CommentsMonitor stopped.')
Какой уровень вложенности )))
+3
: ENUM> ( -- ) ;
: <ENUM ( xt n -- )
BEGIN
BEGIN
>IN @ BL WORD DUP C@ 0=
WHILE
2DROP REFILL 0= IF EXIT THEN
REPEAT
FIND SWAP ['] ENUM> = AND IF DROP 2DROP EXIT THEN
>IN !
2DUP SWAP EXECUTE
1+
AGAIN
;
WORDLIST CONSTANT ASSEMBLER
GET-ORDER ASSEMBLER SWAP 1+ SET-ORDER DEFINITIONS
HEX
VARIABLE 'BYTES
: B, ( c -- ) C, 1 'BYTES @ +! ;
: W, ( u -- ) DUP B, 8 RSHIFT B, ;
: DB" ( "ccc<quote>" -- c-addr u )
[CHAR] " PARSE SWAP OVER HERE >R HERE SWAP DUP ALLOT CMOVE
R> SWAP DUP 'BYTES @ +!
;
: W! ( u addr -- ) 2DUP C! SWAP 8 RSHIFT SWAP 1+ C! ;
' CONSTANT 0 <ENUM AX CX DX BX SP BP SI DI ENUM>
' CONSTANT 0 <ENUM AL CL DL BL AH CH DH BH ENUM>
: MEM ( u "<spaces>name" -- ) DUP 18 AND 3 RSHIFT >R 7 AND R> 2CONSTANT ;
' MEM 0 <ENUM
[BX+SI] [BX+DI] [BP+SI] [BP+DI] [SI] [DI] [W] [BX]
[BX+SI]+B [BX+DI]+B [BP+SI]+B [BP+DI]+B [SI]+B [DI]+B [BP]+B [BX]+B
[BX+SI]+W [BX+DI]+W [BP+SI]+W [BP+DI]+W [SI]+W [DI]+W [BP]+W [BX]+W
ENUM>
:NONAME ( reg1 reg2 -- ) 3 LSHIFT OR B, ;
:NONAME ( reg off u -- ) ROT 3 LSHIFT OR B, W, ;
:NONAME ( reg off u -- ) ROT 3 LSHIFT OR B, B, ;
:NONAME ( reg off 6 | reg u -- )
DUP 6 = IF
ROT 3 LSHIFT OR B, W,
ELSE
SWAP 3 LSHIFT OR B,
THEN
;
CREATE MOD , , , ,
3 CONSTANT REG
: -- ( opcode "<spaces>name" -- ) CREATE C, DOES> C@ B, CELLS MOD + @ EXECUTE ;
' -- 0 <ENUM ADD<B ADD<W ADD>B ADD>W ENUM>
' -- 8 <ENUM OR<B OR<W OR>B OR>W ENUM>
' -- 10 <ENUM ADC<B ADC<W ADC>B ADC>W ENUM>
' -- 18 <ENUM SBB<B SBB<W SBB>B SBB>W ENUM>
' -- 20 <ENUM AND<B AND<W AND>B AND>W ENUM>
' -- 28 <ENUM SUB<B SUB<W SUB>B SUB>W ENUM>
' -- 30 <ENUM XOR<B XOR<W XOR>B XOR>W ENUM>
' -- 38 <ENUM CMP<B CMP<W CMP>B CMP>W ENUM>
' -- 85 <ENUM TESTB TESTW XCHGB XCHGW
MOV<B MOV<W MOV>B MOV>W ENUM>
8D -- LEA 0C4 -- LES 0C5 -- LDS
: -- ( opcode "<spaces>name" -- ) CREATE C, DOES> C@ B, B, ;
4 -- AL-ADD 0C -- AL-OR 14 -- AL-ADC 1C -- AL-SBB
24 -- AL-AND 2C -- AL-SUB 34 -- AL-XOR 3C -- AL-CMP
6B -- PUSHB 0A8 -- AL-TEST 0CD -- INT 0EB -- JMP-SHORT
' -- 70 <ENUM JO JNO JB JAE JZ JNZ JBE JA JS JNS JP JNP ENUM>
' -- 0B0 <ENUM AL-MOV CL-MOV DL-MOV BL-MOV
AH-MOV CH-MOV DH-MOV BH-MOV ENUM>
' -- 0E0 <ENUM LOOPNZ LOOPZ LOOP JCXZ
INB INW OUTB OUTW ENUM>
: -- ( opcode "<spaces>name" -- ) CREATE C, DOES> C@ B, W, ;
5 -- AX-ADD 0D -- AX-OR 15 -- AX-ADC 1D -- AX-SBB
25 -- AX-AND 2D -- AX-SUB 35 -- AX-XOR 3D -- AX-CMP
68 -- PUSHW 0A0 -- MEM>AL 0A1 -- MEM>AX 0A2 -- AL>MEM
0A3 -- AX>MEM 0A9 -- AX-TEST 0C2 -- RETW 0CA -- RETW-FAR
0E8 -- CALL 0E9 -- JMP
' -- 0B8 <ENUM AX-MOV CX-MOV DX-MOV BX-MOV
SP-MOV BP-MOV SI-MOV DI-MOV ENUM>
: -- ( opcode "<spaces>name" -- ) CREATE C, DOES> C@ B, ;
6 -- ES-PUSH 7 -- ES-POP 0E -- CS-PUSH 16 -- SS-PUSH
17 -- SS-POP 1E -- DS-PUSH 1F -- DS-POP 26 -- ES:
26 -- DAA 2E -- CS: 2F -- DAS 36 -- SS:
37 -- AAA 3E -- DS: 3F -- AAS 60 -- PUSHA
61 -- POPA 64 -- FS: 65 -- GS: 66 -- CHANGE-OP-SIZE
67 -- CHANGE-ADDR-SIZE 0C3 -- RET 0C9 -- LEAVE 0CB -- RET-FAR
0CC -- INT3 0CE -- INTO 0CF -- IRET 0F0 -- LOCK
' -- 40 <ENUM AX-INC CX-INC DX-INC BX-INC SP-INC BP-INC SI-INC DI-INC
AX-DEC CX-DEC DX-DEC BX-DEC SP-DEC BP-DEC SI-DEC DI-DEC
AX-PUSH CX-PUSH DX-PUSH BX-PUSH SP-PUSH BP-PUSH SI-PUSH DI-PUSH
AX-POP CX-POP DX-POP BX-POP SP-POP BP-POP SI-POP DI-POP
ENUM>
' -- 6C <ENUM INSB INSW OUTSB OUTSW ENUM>
' -- 80 <ENUM NOP CX-AX-XCHG DX-AX-XCHG BX-AX-XCHG
SP-AX-XCHG BP-AX-XCHG SI-AX-XCHG DI-AX-XCHG
CBW CWD ENUM>
' -- 9B <ENUM WAIT PUSHF POPF SAHF LAHF ENUM>
' -- 0A4 <ENUM MOVSB MOVSW CMPSB CMPSW ENUM>
' -- 0AA <ENUM STOSB STOSW LODSB LODSW SCASB SCASW ENUM>
' -- 0D4 <ENUM AAM AAD SALC XLAT ENUM>
' -- 0EC <ENUM DX-AL-IN DX-AX-IN AL-DX-OUT AX-DX-OUT ENUM>
' -- 0F2 <ENUM REPNZ REPZ HLT CMC ENUM>
' -- 0F8 <ENUM CLC STC CLI STI CLD STD ENUM>
Я вчера упоролся подумал, хуля я как лох пешу форт на асме, ТруЪ фротеры пишут форт на ыорте. И начал я с этого —– я представляю вам единственный и неповторимый говно-фрот-асамблец за авторством моего меня.
Примерим:
VARIABLE BYTES
BYTES 'BYTES !
CREATE PROG
9 AH-MOV
0 DX-MOV HERE 2 -
21 INT
4C00 AX-MOV
21 INT
DB" Hello, Forth-ASSembler!$" DROP PROG - 100 + SWAP W!
PROG BYTES @ DUMP
+51
int table[4];
bool exists_in_table(int v)
{
for (int i = 0; i <= 4; i++) {
if (table[i] == v) return true;
}
return false;
}
C хабра. Возвращает true для любых чисел. http://ideone.com/bL2vGQ
Я конечно знаю что такое UB, но этот пример повеселил.
+163
} else { ?>
<?=$profile[0]->info_height; ?>
<? } ?></dd>
<? /*РОСТ ВЕС*/ ?>
<?
//Если профиль девушки, то написать про титьки...
Знакомый программист очень любит открывать и закрывать php код ;)
+170
struct Obect: public AbsractPrimitiv
{
float X,Y;
Obect(float x, float y)
{
X=x;
Y=x;
};
Obect(void)
{
new(this) Obect(0,0);
};
//...
//...
//...
private://Требование конвенции. Блок private обязан быть в каждом классе.
};
Не вру. Вот вам крест! Написано именно так.