| 0,0 → 1,276 |
|---|
| ; Programa Mostra memoria |
| ; Projeto: Clovis Bombardelli e Felipe Gustavo Bombardelli |
| ; Usar Fasm Assembler |
| ; Dez/2007 |
| |
| |
| ; Infos: |
| ; keys: w - add 0x200 to current memory address |
| ; s - sub 0x200 |
| ; e - add 0x10 |
| ; d - sub 0x10 |
| ; |
| |
| use32 |
| |
| org 0x0 |
| |
| STACK_SIZE=1024 |
| |
| db 'MENUET01' ; 8 byte id |
| dd 0x01 ; header version |
| dd START ; start of code |
| dd I_END ; size of image |
| dd I_END+STACK_SIZE ; memory for app |
| dd I_END+STACK_SIZE ; esp |
| dd 0x0 , 0x0 ; I_Param , I_Icon |
| |
| |
| |
| |
| |
| START: |
| |
| |
| main: |
| |
| call monta_quadro |
| |
| .a: mov eax, 11 ; espera por evento |
| int 0x40 ; 0= -> redraw |
| or al,al |
| jz .h |
| cmp al, 2 ; 1= -> REDRAW |
| jb main ; 2= -> tecla pressionada |
| jz .c ; 3= -> botão pressionado |
| |
| ; botão |
| mov eax,17 ; |
| int 0x40 ; OBSERVAÇÕES |
| cmp ah,1 ; se o botão apertado for fechar, minimizar, maximizar...todos devem ser do sistema |
| jnz .b ; mover...etc |
| or eax,-1 ; saida do aplicativo **************************deve ser do sistema |
| int 0x40 ; nunca do aplicativo |
| |
| .b: jmp .a ; loop para novo evento |
| |
| |
| ; tecla |
| .c: mov eax,2 ; getkey |
| int 0x40 |
| ;cmp al, 1 |
| ;jnz .a |
| cmp ah, 'w' |
| jne .a1 |
| add [end_base], 0x200 |
| jmp main ; |
| .a1: cmp ah, 's' |
| jne .a2 |
| cmp [end_base], dword 0x80000000 |
| jbe .a2 |
| sub [end_base], 0x200 |
| jmp main ; |
| .a2: cmp ah, 'e' |
| jne .a3 |
| add [end_base], 0x10 |
| jmp main ; |
| .a3: cmp ah, 'd' |
| jne .b1 |
| cmp [end_base], dword 0x80000000 |
| jbe .b1 |
| sub [end_base], 0x10 |
| .b1: jmp main |
| |
| |
| ; atualiza apenas o codigo hex / ascii |
| .h: |
| call hex_loop |
| ; inc [contador] ; usado apenas para testar a dinamica |
| jmp .a ; retorna para buscar novo evento |
| |
| |
| monta_quadro: |
| |
| ; posição inicial, subfunção 1 |
| |
| mov eax,12 |
| mov ebx,1 |
| int 0x40 |
| |
| ; Desenha o quadro |
| |
| mov eax,0 ; função 0 : define e monta o quadro |
| mov ebx,100*65536+480 ; [x pos] *65536 + [x lar] |
| mov ecx,100*65536+440 ; [y pos] *65536 + [y alt] |
| mov edx,[cor_janela] ; cor area RRGGBB |
| mov edi,titulo ; Titulo |
| int 0x40 |
| |
| ; escreve texto no quadro (barra superior) |
| |
| mov edi,[cor_janela] |
| mov eax,4 |
| mov ecx, [cor_texto] |
| mov ebx,8*65536+8 |
| mov edx,teste |
| int 0x40 |
| |
| add ebx,11 ; adiciona espaço na coord y |
| |
| mov eax,4 |
| mov ecx, [cor_texto] |
| mov edx,barra1 |
| int 0x40 |
| |
| call hex_loop |
| |
| ; posição final, subfunção 2 |
| |
| .d: mov eax,12 |
| mov ebx,2 |
| int 0x40 |
| |
| ret |
| |
| ; buscar conteudo da memoria para mostrar |
| |
| hex_loop: |
| xor eax, eax |
| mov ebx, [end_base] ; endereço base |
| |
| ; imprime o endereço |
| |
| mov edx, 8*65536+40 ; posição inicial hex |
| mov [pos_ascii], edx |
| add [pos_ascii], 360*65536 ; posição inicial ascii |
| mov word [pos_x], 0 |
| mov al, [quant_linhas] |
| mov edi,[cor_janela] |
| |
| .c: push eax ; |
| push edx ; |
| |
| push ebx ; salva endereço base |
| mov al, 47 |
| mov ecx, ebx ; imprime o endereço |
| mov ebx, 0x00080100 |
| mov esi, [cor_endereco] |
| int 0x40 |
| pop ebx ; |
| |
| add edx, 60*65536 ; pula 8 espaços mais alguma coisa |
| |
| ; busca hexcode |
| |
| mov esi, [cor_hexcode] |
| mov al, 4 |
| |
| .b: push eax ; ----------------------------------------------------------ok |
| |
| mov al, 72 ; ebx= endereço de leitura (nao funcionou...) change this service to another |
| int 0x40 ; retorna ecx= dword da posição ebx |
| |
| push ebx ; ----------------------------------------------------------ok |
| mov ebx, 0x00020100 ; 2 digitos, modo hex |
| mov al, 4 |
| |
| .a: push eax ; controle -------------------------------------------------ok |
| push ecx ; codigo |
| push edx ; posição |
| and ecx, 0xff |
| mov al, 47 |
| int 0x40 |
| call imprime_car$ |
| pop edx ; |
| pop ecx ; |
| shr ecx, 8 |
| add edx, (18)*65536 |
| pop eax ; ----------------------------------------------------------ok |
| dec al |
| jnz .a |
| |
| pop ebx ; ----------------------------------------------------------ok |
| add ebx, 4 ; soma 4 ao endereço base |
| pop eax ; ----------------------------------------------------------ok |
| dec al ; imprimir mais 4 vezes incrementando ebx em 4 |
| jnz .b |
| |
| pop edx ; |
| add edx, 10 ; |
| |
| ; imprime a string ascii |
| |
| push ebx |
| push edx |
| mov al, 4 |
| mov ebx, [pos_ascii] ; endereço na tela |
| mov edx, ascii_string ; endereço da string |
| or ecx, [cor_ascii] ; cor |
| int 0x40 |
| mov [ascii_x], byte 0 |
| add [pos_ascii], 10 |
| pop edx |
| pop ebx |
| |
| pop eax ; |
| dec al |
| jnz .c |
| ret |
| |
| imprime_car$: ; ecx tem o caractere a imprimir |
| |
| push ebx |
| xor ebx, ebx |
| mov bl, [ascii_x] |
| or cl, cl |
| jnz .c |
| mov cl, 0x20 |
| .c: mov [ebx+ascii_string], cl |
| inc [ascii_x] |
| pop ebx |
| ret |
| |
| |
| ; para acessar a memoria do sistema: |
| ; |
| ; acessar a base das tabelas de paginaçao |
| ; com o endereço buscar o descritor de pagina |
| ; ler o endereço físico ndo descritor |
| ; ou buscar a pagina do sistema e ler nele o endereço fisico |
| |
| ; DATA AREA |
| align 0x10 |
| ;contador dd 0 ; para testar a dinamica |
| cor_janela dd 0x346f72c3 ; atrib, tipo, corRGB |
| cor_texto dd 0xc0fffffe ; fonte variavel, cor branca |
| cor_endereco dd 0xc0fffffc |
| cor_hexcode dd 0xc0fffffd |
| cor_ascii dd 0xc0fffffa |
| pos_x db 0 |
| pos_y db 0 |
| quant_linhas db 0x20 |
| ascii_x db 0 |
| end_base dd 0x80000000 ; ok |
| pos_ascii dd 0 |
| ascii_string rb 0x11 |
| reservado rb 3 |
| |
| |
| titulo db 'Mostra a memoria do sistema operacional',0 |
| |
| teste db '-------- ------------------ Hex Code ------------------- -- A S C I I --',0 |
| barra1 db 'Address: 00 01 02 03 04 05 06 07 08 09 0a 0b 0c 0d 0e 0f 0123456789abcdef',0 |
| |
| |
| align 0x10 |
| I_END: |
| |
| |
| ; service 72 from system calls |
| ; |
| ; must contain: |
| ; mov eax, [eax] |
| ; mov [esp+32], eax |
| ; ret |
| |
| |