The OpenNET Project / Index page

[ новости /+++ | форум | wiki | теги | ]

форумы  помощь  поиск  регистрация  майллист  вход/выход  слежка  RSS
"Как работать с сетью в TCL?"
Вариант для распечатки  
Пред. тема | След. тема 
Форум Программирование под UNIX (Tcl/Tk)
Изначальное сообщение [ Отслеживать ]

"Как работать с сетью в TCL?"  +/
Сообщение от Taras email(??) on 21-Янв-09, 22:40 
Как использовать сокеты или другие методы связи в локальной сети в TCL?
Ответить | Правка | Cообщить модератору

Оглавление

Сообщения по теме [Сортировка по времени | RSS]


1. "Как работать с сетью в TCL?"  +/
Сообщение от mikra on 23-Янв-09, 11:56 
>Как использовать сокеты или другие методы связи в локальной сети в TCL?

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

Ответить | Правка | ^ к родителю #0 | Наверх | Cообщить модератору

2. "Как работать с сетью в TCL?"  +/
Сообщение от Taras email(??) on 24-Янв-09, 20:35 
>Удивительно. А как ты так составил запрос в гугле, что не нашел
>в первой пятерке результатов документации и примеров?

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

Ответить | Правка | ^ к родителю #1 | Наверх | Cообщить модератору

3. "Как работать с сетью в TCL?"  +/
Сообщение от Andrey Mitrofanov on 25-Янв-09, 12:11 
google + tcl по-русски
~~~
http:/docs/RUS/tcltk/tcl.html#socket%20%F3%E9...
Ответить | Правка | ^ к родителю #2 | Наверх | Cообщить модератору

5. "Как работать с сетью в TCL?"  +/
Сообщение от Taras email(??) on 07-Фев-09, 14:15 
>http:/docs/RUS/tcltk/tcl.html#socket СИНТАКСИС

Спасибо за ссылку!

Ответить | Правка | ^ к родителю #3 | Наверх | Cообщить модератору

6. "Как работать с сетью в TCL?"  +/
Сообщение от Andrey Mitrofanov on 07-Фев-09, 14:51 
>Спасибо за ссылку!

Пожалуйста.

Это была "рыба", http://google.ru/search?q=%D0%B4%D0%B0&#... "удочка" была в первой строке. [Само]обучение не передаётся вербально или ссылками..

Ответить | Правка | ^ к родителю #5 | Наверх | Cообщить модератору

4. "Как работать с сетью в TCL?"  +/
Сообщение от mikra on 26-Янв-09, 11:42 
>>Удивительно. А как ты так составил запрос в гугле, что не нашел
>>в первой пятерке результатов документации и примеров?
>
>Я ни одной документации вообще не могу найти на русском. Я язык
>вообще не знаю, но получил задание - нужно осваивать...

Плохо дело. Русские версии все старые и местами неполные. Английские надо читать

Ответить | Правка | ^ к родителю #2 | Наверх | Cообщить модератору

7. "Как работать с сетью в TCL?"  +/
Сообщение от Taras email(??) on 08-Фев-09, 20:23 
>Как использовать сокеты или другие методы связи в локальной сети в TCL?
>

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

proc Cleanup {in out bytes {error {}}} {
global total
set total $bytes
close $in
сlose $out
if {[string length $error]!= 0} {
# error occurred during the copy
}
}

#### Открыть файл на чтение
set in [open f:/diplom/test.txt]
#### Открыть сетевое соединение
set out [socket 127.0.0.1 9920]
#### Скопировать, по окончании копирования вызвать Cleanup
fcopy $in $out -command [list Cleanup $in $out]
#### Ожидать завершения копирования
vwait total

Ответить | Правка | ^ к родителю #0 | Наверх | Cообщить модератору

8. "Как работать с сетью в TCL?"  +/
Сообщение от gaa (ok) on 09-Фев-09, 12:28 
>А вот если бы кто сказал теперь как по сети копировать файл,
>был бы оооочень благодарен.
>С сокетами разобрался, сервер-клиент работает. Нашел пример как отправить файл, но как
>принять - не знаю...

Мил человек, ну почитай наконец маны, а!
У команды socket есть аргумент -server:
       socket -server command ?options? port
...
SERVER SOCKETS
       If  the  -server option is specified then the new socket will be a server for the port given by port.  Tcl will automatically accept connections
       to the given port.  For each connection Tcl will create a new channel that may be used to communicate with the client.  Tcl then invokes command
       with  three  additional arguments: the name of the new channel, the address, in network address notation, of the client’s host, and the client’s
       port number.

Ответить | Правка | ^ к родителю #7 | Наверх | Cообщить модератору

9. "Как работать с сетью в TCL?"  +/
Сообщение от Taras email(??) on 09-Фев-09, 12:47 
>Мил человек, ну почитай наконец маны, а!
>У команды socket есть аргумент -server:
>       socket -server command ?options? port

Да, сообщения я понял как принять. А файл?

Ответить | Правка | ^ к родителю #8 | Наверх | Cообщить модератору

10. "Как работать с сетью в TCL?"  +/
Сообщение от gaa (ok) on 09-Фев-09, 17:26 
> Да, сообщения я понял как принять. А файл?

Принимай пока сокет не закроется. man 3tcl fileevent, http://wiki.tcl.tk/880.

Ответить | Правка | ^ к родителю #9 | Наверх | Cообщить модератору

11. "Как работать с сетью в TCL?"  +/
Сообщение от unit (ok) on 11-Июл-13, 19:58 
Всем здравствуйте!=) Вот такой вопрос по теме, как при сокетном соединении проследить(на стороне сервера) наличие подсоединения со стороны клиента.
Уже третий день ломаю голову, не могу найти.
.
.
.
set account [socket -server myproc $port]   // так создаю серверный сокет

proc myproc  {sock addr port} {
fconfigure $sock -buffering line
.
.
.
ну т.д.

Как сделать так что бы когда клиента долго нет сервер закрывал сокет???

Буду очень благодарен за любую помощь, хотя бы подсказку, куда копать?:)

Ответить | Правка | ^ к родителю #10 | Наверх | Cообщить модератору

12. "Как работать с сетью в TCL?"  +/
Сообщение от unit (ok) on 26-Авг-13, 12:43 
>[оверквотинг удален]
> set account [socket -server myproc $port]   // так создаю серверный
> сокет
> proc myproc  {sock addr port} {
> fconfigure $sock -buffering line
> .
> .
> .
> ну т.д.
> Как сделать так что бы когда клиента долго нет сервер закрывал сокет???
> Буду очень благодарен за любую помощь, хотя бы подсказку, куда копать?:)

Проблему решил, помогли глобальные переменные=)

Ответить | Правка | ^ к родителю #11 | Наверх | Cообщить модератору

Архив | Удалить

Рекомендовать для помещения в FAQ | Индекс форумов | Темы | Пред. тема | След. тема




Спонсоры:
Inferno Solutions
Hosting by Hoster.ru
Хостинг:

Закладки на сайте
Проследить за страницей
Created 1996-2021 by Maxim Chirkov
Добавить, Поддержать, Вебмастеру