HOME FORUMS MEMBERS RECENT POSTS LOG IN  
× Авторизация
Имя пользователя:
Пароль:
Нет аккаунта? Регистрация
Баннер 1   Баннер 2
НОВЫЕ ТОРГОВАЯ НОВОСТИ ЧАТ
loading...
Скрыть
Вернуться   Форум АНТИЧАТ > ПРОГРАММИРОВАНИЕ > С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby
   
 
 
Опции темы Поиск в этой теме Опции просмотра

  #11  
Старый 23.08.2009, 12:22
slesh
Познавший АНТИЧАТ
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме:
3288241

Репутация: 3349


По умолчанию

вот рабочий код.
Я тут внес некоторую оптимизацию )
Теперь размер 1024 байта после компила )

Код:
format PE GUI 4.0
entry main

include 'win32a.inc'

section '.text' data readable writeable executable import
;--------------- IMPORT -------------------
        library kernel32, 'kernel32.dll',\
                wsock32, 'wsock32.dll'
        include 'api\kernel32.inc'
        include 'api\wsock32.inc'
;--------------- CODE -------------------
  main:
        invoke  WSAStartup, 0101h, wdata
        invoke  socket, AF_INET, SOCK_STREAM, 6
        mov     [sock], eax
        mov     [saddr.sin_family], AF_INET
        invoke  htons, 80
        mov     [saddr.sin_port], ax
        invoke  inet_addr, ip
        mov     [saddr.sin_addr], eax
        invoke  connect, [sock], saddr, sizeof.sockaddr_in
        invoke  lstrlen, hello
        invoke  send, [sock], hello, eax, 0
        invoke  closesocket, [sock]
        invoke  ExitProcess, 0
;--------------- DATA -------------------
        ip      db '127.0.0.1', 0
        hello   db 'GET http://localhost/hello.php HTTP/1.0', 13, 10
                db 'Host: localhost', 13, 10, 13, 10, 0
        wdata   WSADATA
        saddr   sockaddr_in
        sock    dd ?

Последний раз редактировалось slesh; 23.08.2009 в 12:25..
 
Ответить с цитированием
 



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Вопросы для новичков! (faq) PEPSICOLA С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby 92 14.05.2010 17:59
ОС с нуля z01b С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby 36 03.07.2008 15:30



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT ™ © 2001- Antichat Kft.