Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+129
product:
.LFB34:
.cfi_startproc
xor eax, eax
test esi, esi
je .L7
lea eax, [rsi-1]
mov edi, edi
add rax, 1
imul rax, rdi
.L7:
rep
ret
.cfi_endproc
Оптимизациия умножения через рекурсию. Сишный код:
inline unsigned long int product_0(const unsigned int a, const unsigned int b, const unsigned long int tmp)
{
if (b == 0) return tmp;
return product_0(a, b-1, tmp+a);
}
unsigned long int product(const unsigned int a, const unsigned int b)
{
return product_0(a, b, 0);
}
j123123,
12 Октября 2013
+108
; Assign standard procedure (PChar)
AssignFileC:
DB 0BAH ;MOV DX,immed
; Assign standard procedure (String)
AssignFile:
XOR DX,DX
MOV BX,SP
PUSH DS
LES DI,SS:[BX+8]
LDS SI,SS:[BX+4]
CLD
XOR AX,AX
STOSW
MOV AX,fmClosed
STOSW
XOR AX,AX
MOV CX,(fName-fBufSize)/2
REP STOSW
IF WindowsVersion
PUSH ES
PUSH DI
PUSH ES
PUSH DI
ENDIF
MOV CX,79
OR DX,DX
JNE @@1
LODSB
CMP CL,AL
JBE @@1
MOV CL,AL
JCXZ @@2
@@1: LODSB
OR AL,AL
JE @@2
STOSB
LOOP @@1
@@2: XOR AL,AL
STOSB
IF WindowsVersion
CALL AnsiToOem
ENDIF
POP DS
RETF 8Угадайте с первых строк автора и как выполнится инструкция DB 0BAH; XOR DX, DX.
inkanus-gray,
26 Июня 2013
+123
xorl %eax, %eax # cx - source, ebx - result
movw %cx, %ax
andw $0x8000, %ax
shrw $15, %ax
movl $0xFFFFFFFF, %ebx
addl %eax, %ebx
notl %ebx
andl $0xffff0000, %ebx
addw %cx, %bx
LispGovno,
10 Апреля 2013
+109
GLOBAL _start
SEGMENT .text
_start:
mov eax,4 ; N function=write
mov ebx,1 ; N handle=1 (stdout)
mov ecx, txt ; address of buf
mov edx,16 ; number of byte
int 80h
mov eax,3 ; N function=read
mov ebx,0 ; 0 handle=0 (stdin)
mov ecx, buf ; address of buf
mov edx,80 ; number of byte
int 80h
mov [len],eax ;save length buf
mov byte [buf+1],'!'
mov eax,4 ; N function=write
mov ebx,1 ; N handle=1 (stdout)
mov ecx, buf ; address of buf
mov edx,[len] ; number of byte
int 80h
mov eax,1 ; function=exit
int 80h
SEGMENT .data
buf times 80 db 0 ;
len dd 0
txt db 'Enter the text '
dos_,
15 Ноября 2012
+138
.text:00018584 EXPORT get_msg_sequence
.text:00018584 get_msg_sequence ; CODE XREF: IPC_send_singleIPC+6p
.text:00018584 ; __IPC_send_singleIPC+6p
.text:00018584 LDR R0, =0x7800C
.text:00018586 PUSH {R4,LR}
.text:00018588 ADD R0, PC
.text:0001858A LDR R0, [R0]
.text:0001858C LDRB R3, [R0]
.text:0001858E CBZ R3, loc_185A2
.text:00018590 LDR R1, =(aRil - 0x1859C)
.text:00018592 MOVS R0, #6
.text:00018594 LDR R2, =(aS_0 - 0x1859E)
.text:00018596 LDR R3, =(aGet_msg_sequen - 0x185A0)
.text:00018598 ADD R1, PC ; "RIL"
.text:0001859A ADD R2, PC ; "%s()"
.text:0001859C ADD R3, PC ; "get_msg_sequence"
.text:0001859E BLX __android_log_print
.text:000185A2
.text:000185A2 loc_185A2 ; CODE XREF: get_msg_sequence+Aj
.text:000185A2 LDR R3, =(unk_98E7E - 0x185A8)
.text:000185A4 ADD R3, PC
.text:000185A6 LDRB R2, [R3]
.text:000185A8 CMP R2, #0xFD
.text:000185AA BLS loc_185B0
.text:000185AC MOVS R2, #0
.text:000185AE B loc_185B2
.text:000185B0 ; ---------------------------------------------------------------------------
.text:000185B0
.text:000185B0 loc_185B0 ; CODE XREF: get_msg_sequence+26j
.text:000185B0 ADDS R2, #1
.text:000185B2
.text:000185B2 loc_185B2 ; CODE XREF: get_msg_sequence+2Aj
.text:000185B2 LDR R1, =(unk_98E7E - 0x185BA)
.text:000185B4 STRB R2, [R3]
.text:000185B6 ADD R1, PC
.text:000185B8 LDRB R0, [R1]
.text:000185BA POP {R4,PC}
.text:000185BA ; End of function get_msg_sequence
Потрясающе эффективный выхлоп GCC. Компилировалось, вероятно, все-таки с включенной оптимизацией.
Например, последовательность LDR R1/ADD R1,PC/LDRB R0, [R1] в конце вообще лишняя: достаточно было использовать R0 вместо R2.
Grindars,
04 Августа 2012
+146
huiX5uiPH5;;P5;@@5HH4XPPDXDPhuiX5fiTГ
Было запощено в 11315, но, мне кажется, что этот ГК заслуживает отдельного топика.
Когда-то давно пытался на ассемблере включить видеорежим 320x200x256 (13h) и порисовать. Но XP сменив режим потеряла управление. Помог только ребут. В тот день, матерясь на MS, я и решил написать эту строчку так, чтобы ее можно было вводить с помощью обычного блокнота на любой машине...
Системные требования: Windows XP
Текст набирается в кодировке CP1251. Файл должен иметь расширение COM.
bormand,
29 Июня 2012
+184
CD20первая программа на асм
nefedoff-96,
29 Июня 2012
+199
sum proc ; ax=ax+bx
push dx
m1: mov dx, ax
xor ax, bx
and bx, dx
shl bx, 01h
cmp bx, 00h
jnz m1
pop dx
ret
sum endpНавеяно http://govnokod.ru/11311
movaxbx,
28 Июня 2012
+184
__declspec (naked) INT16U getWordOfCPUFlags(void)
{
_asm
{
pushf;
xor eax, eax;
pop ax;
ret;
}
}
void setWordOfCPUFlags(const INT16U WordOfCPUFlag)
{
_asm
{
push WordOfCPUFlag;
popf;
}
}
bool getCPUTraceFlag(void)
{
return 0 != (getWordOfCPUFlags() & 0x100);
}
void setCPUTraceFlag(const bool CPUTraceFlag)
{
const INT16U MaskOfTraceFlag=((INT16U)CPUTraceFlag)<<8;
//setWordOfCPUFlags( (getWordOfCPUFlags() and ~MaskOfTraceFlag) ^ MaskOfTraceFlag);
if(CPUTraceFlag)
setWordOfCPUFlags( getWordOfCPUFlags() | MaskOfTraceFlag);
else
setWordOfCPUFlags( getWordOfCPUFlags() & ~MaskOfTraceFlag);
}Видимо автору кода строка 29 показалась слишком сложной.
HaskellGovno,
26 Июня 2012
+238
JMP $END
Copy-Paste,
04 Июня 2012
Follow us!