bitmapcensura.asm

.686
.model flat, stdcall
option casemap :none

include \masm32\include\windows.inc
include \masm32\include\masm32.inc
include \masm32\include\kernel32.inc
include \masm32\include\msvcrt.inc
include \masm32\include\user32.inc
includelib \masm32\lib\msvcrt.lib
includelib \masm32\lib\kernel32.lib
includelib \masm32\lib\user32.lib
includelib \masm32\lib\masm32.lib

 
.data
    ; --- output message arrays
    msg0 db "Digite o nome do arquivo de entrada:", 0ah, 0h
    msg1 db "Digite a coordenada X:", 0ah, 0h
    msg2 db "Digite a coordenada Y:", 0ah, 0h
    msg3 db "Digite a largura:", 0ah, 0h
    msg4 db "Digite a altura:", 0ah, 0h
    msg5 db "Digite o nome do arquivo de saida:", 0ah, 0h
    newline db 0ah, 0h

    ; --- input arrays
    entrada db 5 dup(0)
    arqent db 40 dup(0)
    arqsaid db 40 dup(0)
    
    ; --- read file arrays
    fileBuffer db 1024 dup(0) ; para o cabecalho
    linhaBuffer db 6480 dup(0) ; para a linha

    ; --- file and console handles
    fInHandle dd 0
    fOutHandle dd 0
    inputHandle dd 0
    outputHandle dd 0

    count dd 0
    count2 dd 0
    larg dd 4 dup(0)
    alt dd 4 dup(0)
    
    contador dd 0 ; counting written characters
 
.data?
    linha DWORD ?
    iniCens DWORD ?
    fimCens DWORD ?
    valorx DWORD ?
    valory DWORD ?
    larguraCensura DWORD ?
    alturaCensura DWORD ?
 
; ------------------------------= BITMAP COPY AND CENSOR  =------------------------------
 
.code

start:
 
    invoke GetStdHandle, STD_OUTPUT_HANDLE
    mov outputHandle, eax
 
    invoke GetStdHandle, STD_INPUT_HANDLE
    mov inputHandle, eax
     
    ; --- input file
    
    invoke WriteConsole, outputHandle, addr msg0, sizeof msg0, addr contador, NULL
    invoke ReadConsole, inputHandle, addr arqent, sizeof arqent, addr contador, NULL
    push offset arqent
    call trataString
     
    ; --- input entries of dword variables
    
    invoke WriteConsole, outputHandle, addr msg1, sizeof msg1, addr contador, NULL
    invoke ReadConsole, inputHandle, addr entrada, sizeof entrada, addr contador, NULL
    push offset entrada 
    call trataString
    invoke atodw, addr entrada
    mov valorx, eax
 
    invoke WriteConsole, outputHandle, addr msg2, sizeof msg2, addr contador, NULL
    invoke ReadConsole, inputHandle, addr entrada, sizeof entrada, addr contador, NULL
    push offset entrada 
    call trataString
    invoke atodw, addr entrada
    mov valory, eax
     
    invoke WriteConsole, outputHandle, addr msg3, sizeof msg3, addr contador, NULL
    invoke ReadConsole, inputHandle, addr entrada, sizeof entrada, addr contador, NULL
    push offset entrada 
    call trataString
    invoke atodw, addr entrada
    mov larguraCensura, eax
    
    invoke WriteConsole, outputHandle, addr msg4, sizeof msg4, addr contador, NULL
    invoke ReadConsole, inputHandle, addr entrada, sizeof entrada, addr contador, NULL
    push offset entrada 
    call trataString
    invoke atodw, addr entrada
    mov alturaCensura, eax

    ; --- output file name
    
    invoke WriteConsole, outputHandle, addr msg5, sizeof msg5, addr contador, NULL
    invoke ReadConsole, inputHandle, addr arqsaid, sizeof arqsaid, addr contador, NULL
    push offset arqsaid
    call trataString
 
    invoke WriteConsole, outputHandle, addr newline, sizeof newline, addr contador, NULL

    ; --- reading and writing file functions
    
    invoke CreateFile, addr arqent, GENERIC_READ, 0, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL
    mov fInHandle, eax

    invoke CreateFile, addr arqsaid, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL          
    mov fOutHandle, eax

    ; --- reading and writing bmp header

    invoke ReadFile, fInHandle, addr fileBuffer, 18, addr contador, NULL
    invoke WriteFile, fOutHandle, addr fileBuffer, 18, addr contador, NULL

    invoke ReadFile, fInHandle, addr fileBuffer, 4, addr contador, NULL
    mov eax, DWORD PTR [fileBuffer]
    imul eax, 3
    mov larg, eax ; largura dada no cabecalho
    invoke WriteFile, fOutHandle, addr fileBuffer, 4, addr contador, NULL
    
    invoke ReadFile, fInHandle, addr fileBuffer, 4, addr contador, NULL
    mov eax, DWORD PTR [fileBuffer]
    mov alt, eax  ; altura dada no cabecalho
    invoke WriteFile, fOutHandle, addr fileBuffer, 4, addr contador, NULL

    invoke ReadFile, fInHandle, addr fileBuffer, 28, addr contador, NULL
    invoke WriteFile, fOutHandle, addr fileBuffer, 28, addr contador, NULL
    mov eax, 0

    jmp defVariaveis

    ; --- variables

defVariaveis:
    ; --- censor start y height minus y
    mov ebx, alt
    sub ebx, valory
    sub ebx, 1
    mov iniCens, ebx
    ; --- censoring ends
    sub ebx, alturaCensura
    mov fimCens, ebx
    ; --- censoring end lenght in bytes
    mov ebx, larguraCensura
    ;add ebx, valorx
    imul ebx, 3
    mov larguraCensura, ebx
    ; --- censoring start x axis in bytes
    mov ebx, valorx
    imul ebx, 3
    mov valorx, ebx
    
    mov ebx, 0
    jmp lerPixels
    
lerPixels:
    invoke ReadFile, fInHandle, addr linhaBuffer, larg, addr contador, NULL
    cmp contador, 0
    je fimLerPixels 

    ; --- current line
    mov ebx, alt

    ; --- before or after the censored part, copy read lines
    cmp iniCens, ebx
    jle copyPixels
    cmp fimCens, ebx
    jge copyPixels

    ; --- calls function in censoring part
    push offset linhaBuffer
    push valorx
    push larguraCensura
    call censurar

    ; --- copy censored line
    jmp copyPixels


copyPixels:
    invoke WriteFile, fOutHandle, addr linhaBuffer, larg, addr contador, NULL
    sub ebx, 1
    mov alt, ebx
    jmp lerPixels

fimLerPixels:
          
    invoke CloseHandle, fInHandle
    invoke CloseHandle, fOutHandle
 
    invoke ExitProcess, 0

; --- String treatment
    
trataString:
    pop ebx ; return
    pop esi ; string adress
tratamento:
    mov al, [esi] 
    inc esi 
    cmp al, 13
    jne tratamento 
    dec esi 
    xor al, al 
    mov [esi], al 
    jmp ebx 

; --- Censoring function
censurar:    
    push ebp
    push ebx
    mov ebp, esp

    mov edi, [ebp+20]           ; linhaBuffer
    mov esi, DWORD PTR [ebp+16]  ; valorx
    mov ebx, DWORD PTR [ebp+12]  ; larguraCensura
    ; adds to the line pointer
    add edi, valorx
    mov eax, count2

censurarLoop:
    cmp count2, ebx
    jge censurarFim

    mov eax, count2

    ; rewrites bytes in black
    mov byte ptr [edi], 0
    add edi, 1
    add count2, 1
    
    jmp censurarLoop

censurarFim:
    mov count2, 0
    pop ebx
    pop ebp
    ret 
   
  
end start