WinSock в asm

[_PROGRAMM_]

Добрый день. Пытаюсь сделать клиент-сервер на ассемблере. При вызове функция connect возвращает -1. Хочу подключиться к серверу Яндекса. Знаю, что "Система оповещения", то бишь MessageBox сделаны криво, но получить нужную информацию с них удается, хотя сначала показывается положительное сообщение, а за ним - отрицательное. Основной вопрос: почему

invoke connect,[handlesock],socketaddr,sizeof.sockaddr_in

возвращает -1(ошибку). Думал, что вся проблема в sizeof.sockaddr_in, но нет. Размер структуры 16 и замена sizeof на константу ничего не меняет.
Заранее благодарю.

ADD(забыл код)

include '%fasminc%/win32ax.inc'
.data
struc   SOCKADDR
{
        .sin_family      dw      0               ; âñåãäà AF_INET
        .sin_port        dw      0               ; ïîpò
        .sin_addr        dd      0               ; àäpåñ ñåpâåpà
        .sin_zero        db      8 dup(0)        ; íå èñïîëüçóåòñÿ
}
cWritten          dd 0
wsadata           WSADATA
socketaddr        SOCKADDR
handlesock        dd 0
ifmt              db '%d',0
buf               db 15 dup(0)
Caption           db 'Внимание',0
Erro              db 'Сокеты не инициализированы',0
ok                db 'Сокеты инициализированы',0
PORT              dw 80d
SERVER            db 'yandex.ru',0
.code
start:
        invoke WSAStartup, 0101h,wsadata
        cmp eax,0
;        invoke wsprintf,buf,ifmt,eax
;        invoke MessageBox,0,buf,Caption,MB_OK
        jnz erM
        invoke MessageBox,0,ok,Caption,MB_OK
        jmp NoEr
erM:    invoke MessageBox,0,Erro,Caption,MB_OK
        jmp endpr

NoEr:   invoke socket,02h,01h,0 ;invoke socket, AF_INET(2h),SOCK_STREAM(1h),PCL_NONE(0)
        cmp eax,-1
        jz erM
        mov [handlesock],eax
        invoke htons,PORT
        mov [socketaddr.sin_port],ax
        invoke gethostbyname, SERVER
        cmp eax,0
        jz erM
        mov eax,DWORD[eax+10h]
        mov eax,eax
        mov DWORD[socketaddr.sin_addr],eax
        invoke connect,[handlesock],socketaddr,sizeof.sockaddr_in
        cmp eax, -1
        jz erM
endpr:  invoke ExitProcess,0
.end start

[litrovith]

PORT              equ 80d
invoke htons,PORT

        invoke gethostbyname, SERVER
        cmp eax,0
        jz erM
        mov eax, [eax+0Ch]

mov socketaddr.sin_family, AF_INET

и т.п.

[_PROGRAMM_]

Спасибо Вам огромное.

mov eax, [eax+0Ch]

Не помню, почему же я не так написал.

mov socketaddr.sin_family, AF_INET

Я думаю, что не обязательна это строка. У меня конкретно в структуре 0 присваивается.
Еще раз спасибо.
---
Вот опять. Хочу разложить все по полочкам.
Немного модернизировал код. Теперь все подключается, отправляет сообщение, но на функции recv зависает(проверял MessageBox'ами)

include '%fasminc%/win32ax.inc'
.data
struc   SOCKADDR
{
        .sin_family      dw      0               ; âñåãäà AF_INET
        .sin_port        dw      0               ; ïîpò
        .sin_addr        dd      0               ; àäpåñ ñåpâåpà
        .sin_zero        db      8 dup(0)        ; íå èñïîëüçóåòñÿ
}
cWritten          dd 0
wsadata           WSADATA
socketaddr        SOCKADDR
handlesock        dd 0
size              dd 0
ifmt              db '%d',0
buf               db 256 dup(0)
Caption           db 'Âíèìàíèå',0
Erro              db 'Îøèáêà! Ñîêåòû íåèíèöèàëèçèðîâàííû',0
ok                db 'Ñîêåòû èíèöèàëèçèðîâàííû',0
snd               db 'GET /index.php HTTP/1.1',13,10,'User-Agent: MyClient',13,10,'Host: www.yandex.ru',13,10
PORT              equ 80
SERVER            db 'yandex.ru',0
.code
start:
        invoke WSAStartup, 0101h,wsadata
        cmp eax,0
;        invoke wsprintf,buf,ifmt,eax
;        invoke MessageBox,0,buf,Caption,MB_OK
        jnz erM
        invoke MessageBox,0,ok,Caption,MB_OK
        jmp NoEr
erM:    invoke MessageBox,0,Erro,Caption,MB_OK
        jmp endpr

NoEr:   invoke socket,02h,01h,0 ;invoke socket, AF_INET(2h),SOCK_STREAM(1h),PCL_NONE(0)
        mov [handlesock],eax
        cmp eax,-1
        jz erM
        invoke htons,PORT
        mov [socketaddr.sin_port],ax
        invoke gethostbyname, SERVER
        cmp eax,0
        jz erM
        mov eax,DWORD[eax+0Ch]
        mov eax,eax
        mov DWORD[socketaddr.sin_addr],eax
       ; mov [socketaddr.sin_family], AF_INET
        invoke connect,[handlesock],socketaddr,sizeof.sockaddr_in
        cmp eax, -1
        jz erM
        invoke lstrlen,snd
        mov [size],eax
        invoke send,[handlesock],snd,[size],0
rv:
        invoke  recv,[handlesock],buf,256,0
        cmp eax, -1
        jz erM
        invoke MessageBox,0,buf,Caption,MB_OK
        jmp rv
endpr:  invoke ExitProcess,0
.end start

Что не так?

[litrovith]

Сообщение от _PROGRAMM_

Я думаю, что не обязательна это строка. У меня конкретно в структуре 0 присваивается.

А должно быть 2.

        mov eax,DWORD[eax+0Ch]
        mov eax,eax                                               ; ЧТО ЭТО?
        mov DWORD[socketaddr.sin_addr],eax

и т.п.

[_PROGRAMM_]

Как ни крути, все равно на recv зависает

include '%fasminc%/win32ax.inc'
.data
struc   SOCKADDR
{
        .sin_family      dw      2               ; всегда AF_INET
        .sin_port        dw      0               ; поpт
        .sin_addr        dd      0               ; адpес сеpвеpа
        .sin_zero        db      8 dup(0)        ; не используется
}
cWritten          dd 0
wsadata           WSADATA
socketaddr        SOCKADDR
handlesock        dd 0
size              dd 0
ifmt              db '%d',0
buf               db 256 dup(0)
Caption           db 'Внимание',0
Erro              db 'Ошибка! Сокеты неинициализированны',0
ok                db 'Сокеты инициализированны',0
snd               db 'GET /index.php HTTP/1.1',13,10,'User-Agent: MyClient',13,10,'Host: www.yandex.ru',13,10
PORT              equ 80
SERVER            db 'yandex.ru',0
.code
start:
        invoke WSAStartup, 0101h,wsadata
        cmp eax,0
;        invoke wsprintf,buf,ifmt,eax
;        invoke MessageBox,0,buf,Caption,MB_OK
        jnz erM
        invoke MessageBox,0,ok,Caption,MB_OK
        jmp NoEr
erM:    invoke MessageBox,0,Erro,Caption,MB_OK
        jmp endpr

NoEr:   invoke socket,02h,01h,0 ;invoke socket, AF_INET(2h),SOCK_STREAM(1h),PCL_NONE(0)
        mov [handlesock],eax
        cmp eax,-1
        jz erM
        invoke htons,PORT
        mov [socketaddr.sin_port],ax
        invoke gethostbyname, SERVER
        cmp eax,0
        jz erM
        mov eax,DWORD[eax+0Ch]
        mov DWORD[socketaddr.sin_addr],eax
       ; mov [socketaddr.sin_family], AF_INET
        invoke connect,[handlesock],socketaddr,sizeof.sockaddr_in
        cmp eax, -1
        jz erM
        invoke lstrlen,snd
        mov [size],eax
        invoke send,[handlesock],snd,[size],0
rv:
        invoke  recv,[handlesock],buf,1,0
        cmp eax, -1
        jz erM
        cmp eax, 0
        jz erM
        invoke MessageBox,0,buf,Caption,MB_OK
        jmp rv
endpr:  invoke ExitProcess,0
.end start

[Ulex]

До recv у вас дело не доходит. Зависает на коннект.
Во первых - ip адрес получен неверный, точнее он вообще не получен.
Во вторых - запрос клиента должен заканчиваться пустой строкой.
В третьих - функция lstrlen работает с zero termination строками, поэтому вам она неправильный результат выдаст.

Вот для примера, можете поразбираться - это масм:

[_PROGRAMM_]

Вот для примера, можете поразбираться - это масм:

Спасибо огромное. То, что нужно. Извините, не было времени отписаться.

[_PROGRAMM_]

Ну вот. Уделил время сокетам. Исправил, надеюсь, ошибки и все равно... Теперь точно зависает на recv. Если написать неправильный запрос, (переменная snd), то яндекс возвращает bad request, а если тот который используется в коде - зависает, и только через время(по-моему так как и положено, через 30 секунд) выбивает ошибку.

include '%fasminc%/win32ax.inc'
.data
struc   SOCKADDR
{
        .sin_family      dw      0
        .sin_port        dw      0
        .sin_addr        dd      0
        .sin_zero        db      8 dup(0)
}
cWritten          dd 0
wsadata           WSADATA
socketaddr        SOCKADDR
handlesock        dd 0
size              dd 0
ifmt              db '%d',0
buf               db 256 dup(0)
Caption           db 'Âíèìàíèå',0
Erro              db 'Ñîêåòû íå èíèöèàëèçèðîâàíû',0
ok                db 'Ñîêåòû èíèöèàëèçèðîâàíû',0
snd               db 'GET / HTTP/1.0',13,10,'Host: www.yandex.ru',13,10,'User-Agent: Browser',13,10,'Accept: text/html',13,10,'Connection: close',13,10,0
PORT              equ 80
SERVER            db 'www.yandex.ru',0
.code
start:
          invoke WSAStartup, 0101h,wsadata
          cmp eax,0
;         invoke wsprintf,buf,ifmt,eax
;         invoke MessageBox,0,buf,Caption,MB_OK
          jnz erM
          invoke MessageBox,0,ok,Caption,MB_OK
          jmp NoEr
erM:      invoke MessageBox,0,Erro,Caption,MB_OK
          jmp endpr

NoEr:     invoke htons,PORT
          mov [socketaddr.sin_port],ax
          invoke gethostbyname, SERVER
          cmp eax,0
          jz erM
          mov ebx,DWORD[eax+0Ch]
          mov edx,[ebx]
          mov edx,[edx]
          mov DWORD[socketaddr.sin_addr],edx
          mov [socketaddr.sin_family], AF_INET

          invoke socket,02h,01h,0 ;invoke socket, AF_INET(2h),SOCK_STREAM(1h),PCL_NONE(0)
          cmp eax,-1
          jz erM
          mov [handlesock],eax

          invoke connect,[handlesock],socketaddr,sizeof.sockaddr_in
          cmp eax, -1
          jz erM

          invoke lstrlen,snd
          invoke send,[handlesock],snd,eax,0
rv:
            invoke  recv,[handlesock],buf,256,0
            cmp eax, -1
            jz erM
            invoke MessageBox,0,buf,Caption,0
            jmp rv
endpr:  invoke ExitProcess,0
.end start

Что неверно? Запрос, код, или все сразу?

[Ulex]

всё сразу.

[_PROGRAMM_]

всё сразу.

Ну а конкретнее? Хочу сделать минимальный сокет. В чем же ошибка? Разбираться начинал по этой статье. Там вообще все просто. Но даже это просто не получается. Ведь Яндекс,как я уже писал, при неправильном запросе отвечает!
Заранее благодарен.