viernes, 23 de enero de 2009

Server - Pequeño ejemplo de server conexion inversa "Messaageboxea" todos lo recivido [ASM]

;!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
;!Autor: Krackwar !
;!Lenguaje: ASM !
;!Descripcion: Pequeño ejemplo de un server !
;! en este ejempplo todos los datos recividos!
;! son mostrados en un mensaje. !
;!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
include 'win32ax.inc'
.data
Rev dd ?
Socket dd ?
.code
start:
invoke GlobalAlloc,GPTR,1024h
mov ebx,eax
invoke WSAStartup,200,eax
invoke socket,AF_INET,SOCK_STREAM,0 ;Creamos el socket
mov [Socket],eax ;Guardamos el handle en [Socket]
mov word[ebx],2
invoke htons,1234 ;El puerto
mov word[ebx],2
mov word[ebx+2], AX
invoke gethostbyname,'127.0.0.1' ;La ip
add eax,32
invoke inet_addr,eax
mov dword[ebx+4],eax

.BucleConectar: ;Bucle para conectarse
invoke connect,[Socket],ebx,16
cmp eax, 0xFFFFFFFF
JE .BucleConectar

.BucleRecivir: ;Bucle para recivir
invoke GlobalAlloc,GPTR,1024h
push eax
invoke recv,[Socket],eax,1023h,0
mov [Rev],eax
pop eax
cmp [Rev], 0
jng revisar

invoke MessageBox,0,eax,0,0
revisar:
cmp [Rev], 0
jne start.BucleRecivir

.reiniciar:
stdcall dword[closesocket],[Socket]
stdcall dword[WSACleanup]
jmp start
.end start

0 comentarios:

Publicar un comentario