Assembler — Говнокод.ру

Assembler / Говнокод #15790

+143

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68

entry start 

include 'C:\Program Files\Casm\win32a.inc' ; Include file win32a.inc 

section '.text' code readable executable 

  start: 

        invoke  GetModuleHandle,0 
        invoke  DialogBoxParam,eax,37,HWND_DESKTOP,DialogProc,0 
        or      eax,eax 
        jz      exit 
  exit: 
        invoke  ExitProcess,0 

proc DialogProc hwnddlg,msg,wparam,lparam 
        push    ebx esi edi 
        cmp     [msg],WM_INITDIALOG 
        je      .wminitdialog 
        cmp     [msg],WM_CLOSE 
        je      .wmclose 
        xor     eax,eax 
        jmp     .finish 
  .wminitdialog: 
        jmp     .processed 
  .wmclose: 
        invoke  EndDialog,[hwnddlg],0 
  .processed: 
        mov     eax,1 
  .finish: 
        pop     edi esi ebx 
        ret 
endp 

section '.bss' readable writeable 

  flags dd ? 
  caption rb 40h 
  message rb 100h 

section '.idata' import data readable writeable 

  library kernel,'KERNEL32.DLL',\ 
          user,'USER32.DLL' 

  import kernel,\ 
         GetModuleHandle,'GetModuleHandleA',\ 
         ExitProcess,'ExitProcess' 

  import user,\ 
         DialogBoxParam,'DialogBoxParamA',\ 
         EndDialog,'EndDialog' 

section '.rsrc' resource data readable 

  directory RT_DIALOG,dialogs 

  resource dialogs,\ 
           37,LANG_ENGLISH+SUBLANG_DEFAULT,demonstration 

  dialog demonstration,'TestProgram',170,170,105,75,WS_CAPTION+WS_POPUP+WS_SYSMENU+DS_MODALFRAME 
  dialogitem 'STATIC','Compile',-1,10,10,70,29,WS_VISIBLE 
  dialogitem 'STATIC','WITH...',-1,10,20,70,8,WS_VISIBLE 
  dialogitem 'STATIC','C',-1,10,30,70,8,WS_VISIBLE 
  dialogitem 'STATIC','A',-1,10,40,70,8,WS_VISIBLE 
  dialogitem 'STATIC','S',-1,10,50,70,8,WS_VISIBLE 
  dialogitem 'STATIC','M',-1,10,60,70,8,WS_VISIBLE 
  enddialog

Окно на Fasm M.P.E.

Mobac, 19 Апреля 2014

Комментарии (1)

Assembler / Говнокод #15608

+137

001
002
003
004
005
006
007
008
009
010
011
012
013
014
015
016
017
018
019
020
021
022
023
024
025
026
027
028
029
030
031
032
033
034
035
036
037
038
039
040
041
042
043
044
045
046
047
048
049
050
051
052
053
054
055
056
057
058
059
060
061
062
063
064
065
066
067
068
069
070
071
072
073
074
075
076
077
078
079
080
081
082
083
084
085
086
087
088
089
090
091
092
093
094
095
096
097
098
099
100

ascdec proc near
mov di,0
mov si,0
xor dx,dx
mov bx,offset buf
add bx,10
mov cx,11
lo0:
dec bx
dec cx
jcxz ex0
mov al,[bx]
cmp al,255
je lo0
lo1:
sub al,30h 
push bx
push cx
mov bx,offset deci
xor dx,dx
mov cx,word ptr[bx+2]
mov bx,word ptr[bx]
mov ah,0
call mult32 
add di,ax
adc si,dx
mov bx,offset deci
mov ax,[bx]
mov dx,[bx+2]
call multen
mov bx,offset deci
mov [bx],ax
mov [bx+2],dx
pop cx
pop bx
dec bx
dec cx
jcxz ex0
mov al,[bx]
jmp lo1
ex0:
mov ax,di
mov dx,si
test dx,8000h
jz enda
jmp error
enda:
cmp minus,2dh
jne pl1
call ccc
pl1:
ret
ascdec endp
multen proc near
push bx
push cx
mov bx,10
mov cx,0
call mult32
pop cx
pop bx
ret
multen endp
mult32 proc near 
push si
push di
push dx
push ax
test dx,8000h 
jz ml
call ucc
push dx
push ax
ml:
mov dx,cx
mov ax,bx
test dx,8000h  
jz ml0
call ucc 
mov bx,ax
mov cx,dx
ml0:
pop ax
pop dx
mov si,0
mov di,0
mul bx ;AX*BX
mov di,ax
mov si,dx
pop ax
mul cx ;AX*CX
add si,ax
pop dx
ucc proc near
dec ax
sbb dx,0
not ax
not dx
ret
ucc endp

Превращение строки в число.

Abbath, 27 Марта 2014

Комментарии (22)

Assembler / Говнокод #15575

+132

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42

format PE GUI
entry start

section '.text' code readable executable

  start:
        push    0
        push    0
        push    0x0102
        push    0xffff
        call    [PostMessageA]

        jmp start

        push    0
        call    [ExitProcess]

section '.data' data readable writeable

section '.idata' import data readable writeable

  dd 0,0,0,RVA kernel_name,RVA kernel_table
  dd 0,0,0,RVA user_name,RVA user_table
  dd 0,0,0,0,0

  kernel_table:
    ExitProcess dd RVA _ExitProcess
    dd 0
  user_table:
    PostMessageA dd RVA _PostMessageA
    dd 0

  kernel_name db 'KERNEL32.DLL',0
  user_name db 'USER32.DLL',0

  _ExitProcess dw 0
    db 'ExitProcess',0

  _PostMessageA dw 0
    db 'PostMessageA',0

section '.reloc' fixups data readable discardable       ; needed for Win32s

А вот таким нехитрым кодом на FASM'e мы намертво вешаем всю винду до перезагрузки или выхода из системы (по ctrl+alt+del). Ну и, опять-таки, кладем большой и толстый на UAC.

gost, 25 Марта 2014

Комментарии (29)

Assembler / Говнокод #15415

+145

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36

global _start

section .text

_start:

	mov	eax, 0b10010100101100110111110110111110
	;  эти битики будут выведены на печать
	
	mov	ecx, 0b00011000000110000001100000011000
	; Четыре недозаполненных ascii кодов символов '0' или '1', в который из флага переноса заталкивается битик 0 или 1

	%rep 8
	mov	ebx, ecx
	%rep    3
		shr	eax, 1 ; Захавываем битик в флаг переноса
		rcl	ebx, 1 ; Запихиваем из флага переноса в недозаполненные ascii коды
		rol	ebx, 7 ; Проматываем на следующий кусок
	%endrep
	shr	eax, 1
	rcl	ebx, 1 ; На последней стадии все то же самое, только проматывать уже не надо

	push ebx ; Теперь все битики всунуты, пихнем содержимое регистра в стек
	%endrep


    
	mov	eax, 04h ; write()
	mov	ebx, 01h ; stdout
	mov	ecx, esp ; распечатаем из стека
	mov	edx, 32  ; 32 символа
	int	80h
	
	mov	eax, 01h ; exit()
	xor	ebx, ebx ; errno
	int	80h

NASM Linux x86
Суть - вывести содержимое регистра в двоичной системе счисления
Можно было вместо этой мути использовать CMOVC ( Move if carry (CF=1) ) или еще что-нибудь такое придумать, есть же еще BT, BTS, глаза разбегаются
...вообще хрен его знает, какой-то упоротый этот x86 ассемблер, надо бы AVR осваивать, там регистров побольше

j123123, 10 Марта 2014

Комментарии (6)

Assembler / Говнокод #14225

+143

1
2

.686
.model tiny

Весьма специфичная ошибка при использовании masm32.

laMer007, 14 Декабря 2013

Комментарии (56)

Assembler / Говнокод #13931

+129

01
02
03
04
05
06
07
08
09
10
11
12
13
14

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);

}

Распознать умножение (imul) в этой рекурсивной хрени компилятор смог, но при этом как-то через жопу, нагенерировав при этом много лишнего говна.
gcc version 4.5.1

j123123, 12 Октября 2013

Комментарии (69)

Assembler / Говнокод #13242

+108

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49

; 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

Комментарии (10)

Assembler / Говнокод #12876

+123

1
2
3
4
5
6
7
8
9

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

Комментарии (7)

Assembler / Говнокод #12132

+109

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31

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

Комментарии (33)

Assembler / Говнокод #11531

+138

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38

.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

Комментарии (8)

Говнокод: по колено в коде.