Winsock через прокси

[Kepmann]

Перерыл весь форум и, видимо, большую часть инета, и не смог найти то, что надо.

Может быть, поможете?

Трабл в том, что приложение (допустим чат, в котором юзается винсок) должно работать через инет и устанавливать коннект с винсоком сервера.

Все бы ничего, но нужно пробиться через прокси-сервер. То есть, необходимо сделать так, как в аське, чтобы прога пробивалась по http-проксе и соединялась с сервером. Вот.

Для тестирования выдали проксю winrout.

Потенциально знаю, как сделать через сокс, но надо через примитивные прокси-сервера http.


Поскажите плиз...

[Sebas]

w3 org
Cмотри описание формата прокси

[CodeName33]

Ну всё тоже самое только коннектишься на адрес и порт прокси и передаёшь:

Для GET:
GET http://www.mysite.ru/index.htm:80 HTTP/1.1
Server: www.mysite.ru
и дальше остальные заголовки

Для POST:
POST http://www.mysite.ru/index.htm:80 HTTP/1.1
Server: www.mysite.ru
и дальше остальные заголовки и в конце POSTDATA

Как для CONNECT не знаю - не работал с ним никогда.

[Kepmann]

Дык нет сайта. Есть только удаленная машина, слушающая порт...

[GSerg]

Запрос:

GET http://www.mysite.ru/index.htm HTTP/1.1
Host: www.mysite.ru


Винсоком коннектиться к той самой удалённой машине, слать этот запрос. Удалённая машина разберётся.

[Kepmann]

Сработало... спасибо.

[Kepmann]

И еще вопросик.

Прокси рвет соединение после отправки пакета...

Как ему сказать, чтоб держал соединение?

[GSerg]

Connection: keep-alive

[Kepmann]

sckConnectServer.Connect txtIP.Text, 3128
strIP = txtIP.Text
DoEvents
sckConnectServer.SendData "POST http://10.0.66.92:1002/ HTTP/1.1" + vbCrLf
DoEvents
sckConnectServer.SendData "HOST: 10.0.66.92:1002" + vbCrLf
DoEvents
sckConnectServer.SendData "Content-length: " + CStr(DATA_TO_SEND) + vbCrLf + vbCrLf
DoEvents
sckConnectServer.SendData DATA_TO_SEND + vbCrLf
DoEvents


Необходимо, насколько понимаю, вставить вот это:


sckConnectServer.SendData "Proxy Connection: Keep-Alive" & vbCrLf & vbCrLf
DoEvents



Вот только куда?


Пробую - не работает

[alibek]

Мда... А кто тебе сказал, что этот код работает правильно?

[Kepmann]

Это не мой код...

Подскажите плз, как правильно.

txtIP - локальный адрес прокси-сервера
10.0.66.92:1002 адрес компа к которому надо законнектиться (IP взят от балды)

[alibek]

Смотри FAQ, там все написано.

[Kepmann]

В какой ФАК? Где правила пользования форумом написаны?

Блин.

[alibek]

http://bbs.vbstreets.ru/viewforum.php?f=24

[Kepmann]

Два раза прочитал все темы - подходящей нет. Мне нужно через проксю коннект установить, чтоб он проксей не рвался...

[alibek]

http://bbs.vbstreets.ru/viewtopic.php?t=7726

[Kepmann]

Жестоко торможу... Если ктонить может показать, как сделать то, что мне нужно, напишите пожалуйста. А то я зае...

Несколько часов в инете ковыряюсь - не могу найти конкретно то, что нужно.

[alibek]

Первое. Не надо разделять пакеты. Сформируй в одну строку (разделитель - vbCrLf, конец заголовка и начало данных - двойной vbCrLf).
Второе. Connection: keep-alive в любом месте заголовка. Например, после Host.
Третье. Content-length: <CStr(DATA_TO_SEND)> - неправильно. В Content-Length указывается длина пакета, а не сам пакет.

[Kepmann]

sckConnectServer.Close
sckConnectServer.Connect strIP, strPort
DoEvents
DATA_TO_SEND = "POST http://9.9.9.9:999/HTTP/1.1" & vbCrLf
DATA_TO_SEND = DATA_TO_SEND & "HOST: 9.9.9.9:999" & vbCrLf
DATA_TO_SEND = DATA_TO_SEND & "Connection: Keep-Alive" & vbCrLf
DATA_TO_SEND = DATA_TO_SEND & "Content-length: " & Str(Len(DATA_TO_SEND)) + vbCrLf + vbCrLf
DATA_TO_SEND = DATA_TO_SEND & "VHD" & txtName.Text & ":" & txtPassword.Text


9.9.9.9 - инетовский IP
999 - порт


Так?
Все равно связь рвется... 8(


Скажите, где у меня ошибки...

[Kepmann]

Дык мне нужно чтоб никогда не рвался коннект.

я так понимаю, keep-alive именно для этого...

[tyomitch]

Это работает пока ты весь пакет не пошлешь- те прокси будет ждать окончание пакета, А ПОТОМ ВСЕ РАВНО ОТРУБИТСЯ - ТК У ТЕБЯ ,как и у многих серверов, СТОИТ ДИКСОННЕКТ после PACKET_COMPLETE

FleX_2004, не путай людей. В HTTP нету пакетов. Один HTTP-запрос может разбиться на любое количество IP-пакетов. И ни один сервер не будет рвать связь после конца первого (второго, n-ого) пакета: они анализируют текст запроса, а не его разбивку по пакетам.

Именно из-за таких недопониманий потом и рождаются вопли "а вот у меня Винсок файл не целиком принимает, может мне его побить на полукилобайтные кусочки?"

[alibek]

Именно из-за таких недопониманий потом и рождаются вопли "а вот у меня Винсок файл не целиком принимает, может мне его побить на полукилобайтные кусочки?"

Но если нужно передавать файл с ограниченной скоростью, то именно так и приходится делать

[Kepmann]

Господа, есть конкретная проблема.

Допустим, речь идет о чате...
Клиент коннектится к серверу, отправляет имя и пароль, А от сервера ответ не успевает получить, ибо прокся рвет коннект после отправки данных.

Так как речь идет о чате, должно быть постоянное соединение с сервером...

хилп...

[GSerg]

А причём. в этом случае, вообще HTTP-прокся?

[Kepmann]

HTTP прокси потому, что прога должна работать чер5ез любые прокси, как аська, например, которая нормально работает через http. В принципе, через httpпроксю работает, вот тока обрыв связи идет.

Неужели никогда никто не пробовал сделать чат, работающий через http-прокси???

[alibek]

Kepmann, для начала почитай о прокси, как они работают, а потом будет задавать вопросы.
А сейчас ты не задаешь вопросы, а говоришь глупости.