All pastes #179162 Raw Edit

AndyD

public text v1 · immutable
#179162 ·published 2006-09-22 00:00 UTC
rendered paste body
.386
.model flat,stdcall
option casemap:none

;include \masm32\include\windows.inc
;include \masm32\include\kernel32.inc
;include \masm32\include\wsock32.inc
;include \masm32\include\user32.inc
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;includelib \masm32\lib\kernel32.lib
;includelib \masm32\lib\user32.lib
;includelib \masm32\lib\WS2_32.lib


include windows.inc
include user32.inc
include ws2_32.inc
include wsock32.inc
include kernel32.inc
include user32.inc
includelib kernel32.lib
includelib user32.lib
includelib ws2_32.lib



.data
IPAddress db "194.159.164.195",0 
MsgBoxCaption  db "s was pressed",0
MsgBoxText       db "s was pressed",0
MsgBoxSucess db "Winsock Setup" , 0
MsgBoxFailed db "Winsock Failed", 0
SocketFailed db "Socket Failed",0
SocketSetup db "Socket Setup",0
Connected db "Connected",0
FailedToConnect db "Failed to Connect" , 0
File db "file.exe",0
wsadata WSADATA <>
sock dd ?
hwnd dd ?
Dir db " ",0
SOCKET socket
ssin sockaddr_in <>
PE32 PROCESSENTRY32 <>
Port dd 6667
.code


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
start:
invoke WSAStartup, 200h,addr wsadata 
.IF EAX ==NULL ; if the value isnt 1 in eax , post a message saying failed to start
invoke MessageBox, NULL, addr MsgBoxFailed, addr MsgBoxFailed, MB_OK
.ELSE 
invoke MessageBox, NULL, addr MsgBoxSucess, addr MsgBoxSucess, MB_OK
.endif

;SETUP THE SOCKET
invoke socket,AF_INET,SOCK_STREAM,0     ; Create a stream socket for internet use 
.IF EAX == NULL 
invoke MessageBox, NULL, addr SocketFailed, addr SocketFailed, MB_OK
.ELSE
invoke MessageBox, NULL, addr SocketSetup, addr SocketSetup, MB_OK
.ENDIF

mov ssin.sin_family, AF_INET 
invoke htons, Port 
mov ssin.sin_port,ax  
invoke inet_addr, addr IPAddress
;mov ssin_addr , eax 
invoke connect,socket,addr ssin,sizeof ssin 
.IF eax==SOCKET_ERROR 
invoke MessageBox, NULL, addr FailedToConnect , addr FailedToConnect , MB_OK
.ELSE
invoke MessageBox, NULL, addr Connected, addr Connected, MB_OK
.ENDIF


ret
end start