В этой главе мы рассмотрим некоторые сетевые возможности, предоставляемые средой
Kylix на примере работы с сокетами.
Сокеты - это специальные компоненты, позволяющие вашему приложению соединяться
с другими компьютерами, использующими сетевой протокол TCP/IP. Кроме того, сокеты
дают возможность работать и с другими сетевыми протоколами, такими как XNS (Xerox
Network System), DECnet и Novell IPX/SPX.
Используя сокеты, вы можете читать или посылать данные на другие компьютеры,
не беспокоясь об установленном на компьютерах сетевом программном обеспечении.
То есть сокеты предоставляют интерфейс между приложением-клиентом или приложением-сервером
и сетевым программным обеспечением, установленным на данном компьютере.
Таким образом, сокеты позволяют создавать приложения как для клиентов, так и
для серверов сети. Эти приложения могут предоставлять один из двух сервисов:
Hypertext Transfer Protocol (HTTP) или File Transfer Protocol (FTP).
Перед написанием приложения клиента или сервера сети вы должны знать. какие
услуги будет предоставлять ваше приложение, если это приложение-сервер, или
какие услуги будет получать приложение-клиент. Если вы используете стандартные
протоколы, такие как HTTP или FTP, то вопрос о предоставляемых услугах обычно
не возникает.
Большинство стандартных услуг протоколов ассоциированы, по соглашению, с определенными
номерами портов. Для получения конкретной услуги вы должны указать номер порта
и цифровой код услуги. Если вы используете стандартные услуги, предоставляемые
компонентом-сокетом TTCPClient, то он самостоятельно определит номер порта для
нужной услуги. Если вы создаете собственные услуги, вы должны указать ассоциированный
с ней номер порта в файле /etc/services. Данный файл представляет собой ASCII-файл,
содержащий список сетевых услуг, включая их имя, номер порта и тип протокола
передачи данных (листинг 11.1).
Лстинг 11.1. Список сетевых услуг, содержащийся в файле services
# /etc/services:
#$Id: services,v 1.4 2000/05/15 15:54:48 chmouel Exp $
#
#Сетевые услуги Интернет
#
#номера портов как для TCP, так и для UDP; большинство портов используют
#оба эти протокола.
#Обновлено RFC 1700, "Ассоциированные номера'' (Октябрь 1994).
#Не все порты включены в список, только наиболее используемые.
tcpmux 1/tcp
echo 7/tcp
echo 7/udp
discard 9/tcp sink null
discard 9/udp sink null
systat 11/tcp users
daytime 13/tcp
daytime 13/udp
nettstat 15/tcp
gotd 17/tcp quote
msp 18/tcp # протокол отправки сообщений
msp 18/udp # протокол отправки сообщений
chargen 19/tcp ttytst source
chargen 19/udp ttytst source
ftp-data 20/tcp
ftp 21/tcp
21/udp fspd
ssh 22/tcp # SSH удаленный протокол авторизации
ssh 22/udp # SSH удаленный протокол авторизации
felnet 23/tcp
#24 - для частного использования
smtp 25/tcp mail
# 26 - не назначен
time 37/tcp timserver
time 37/udp timserver
rlp 39/udp resource # расположение ресурсов
nameserver 42/tcp name # IEN 116
whois 43/tcp nicname
re-mail-ck 50/tcp # Удаленный протокол проверки почты
re-mail-ck 50/udp # Удаленный протокол проверки почты
domain 53/tcp nameserver # имя сервера домена
domain 53/udp nameserver
mtp 57/tcp
bootps 67/tcp # ВООТР-сервер
bootps 67/udp
bootpc 68/tcp # ВООТР-клиент
bootpc 68/udp
tftp 69/udp
gopher 70/tcp # Internet Gopher
gopher 70/udp
rje 77/tcp netrjs
finger 79/tcp
www 80/tcp http # WorldWideWeb HTTP
www 80/udp # HyperText Transfer Protocol
link 87/tcp ttylink
kerberos 88/tcp kerberosS krbS # Kerberos v5
kerberos 88/udp kerberosS krbS # Kerberos v5
supdup 95/tcp
# 100 - reserved
hostnames 101/tcp hostname
iso-tsap 102/tcp tsap # часть ISODE.
csnet-ns 105/tcp cso-ns
csnet-ns 105/udp cso-ns
# poppassd (Eudora) использует порты, которые уже были ассоциированы
# с другими услугами. Ниже приведен список poppassd.
# Это позволяет программам запрашивать данные услуги.
rtelnet 107/tcp # удаленный Telnet
rtelnet 107/udp
pop2 109/tcp pop-2 postoffice # POP версии 2
pop2 109/udp pop-2
рорЗ 110/tcp pop-3 # POP версии 3
рорЗ 110/udp pop-3
sunrpc 111/tcp portmapper # RFC 4.0 portmapper TCP
sunrpc 111/udp portmapper t RPC 4.0 portmapper UDP
auth 113/tcp authentication tap ident
sftp 115/tcp
Как только соединение между клиентом и сервером устанавливается, сервер и клиент
получают одинаковые возможности и реагируют на одинаковые типы событий. Рассмотрим
по порядку эти типы соединений.
Соединение-клиент подключает сокет-клиент локального компьютера к соке-ту-серверу
на удаленном компьютере. Соединение создает сокет-клиент. Сначала сокет-клиент
должен определить сокет-сервер, с которым необходимо соединиться. После чего
происходит поиск этого сокета и, если сокет найден, сокет-клиент посылает серверу
запрос на соединение. Сокет-сервер может не установить соединение сразу же после
получения запроса. Сервер юминает запрос и отвечает на него, как только появляется
возможность, только сокет-сервер устанавливает соединение, он отсылает сокету-шенту
свое полное описание, после чего клиент завершает соединение.
Соединение-сервер прослушивает запросы сокетов на установление соедине-шя. В
случае, если сокет-клиент запрашивает от сокета-сервера соединеие, сокет-сервер
отсылает клиенту свое полное описание.
Соединение-слушатель - это пассивное соединение сервера, которое принципиально
отличается от двух других типов соединений и является односто-энним. В этом
случае соединение с сокетами-клиентами не устанавливает, а происходит прослушивание
и запись запросов на соединение, отправляемых сокетами-клиентами.
Каждый сокет может рассматриваться как конечная точка сетевого соединения. Все
сокеты имеют собственные адреса, которые определяют:
систему, под которой запущен данный сокет;
тип интерфейсов, которые понимает данный сокет;
номер порта, используемый сокетом для соединения.
Компоненты для создания сокетов располагаются на вкладке Internet палитры компонентов
KyliX. это компоненты TCPClient и TCPServer.
Компонент TCPClient позволяет превратить ваше приложение в TCP/IP-чиент. Сокет-клиент
позволяет вам указать сокет-сервер, с которым будет производиться соединение
с помощью свойства RemoteHost. Данное свойство может содержать как сетевое имя
компьютера, так и его IP-адрес. В дополнение к данному свойству компонент TCPClient
имеет свойство RemotePort, которое определяет номер порта сервера, к которому
будет производиться подключение. Вы можете указать номер порта либо имя услуги.
После установки этих двух свойств вы можете активизировать ваше соединение с
помощью вызова метода open компонента TCPClient. Данный метод вызывается во
время выполнения приложения. Если вы хотите, чтобы соединение устанавливалось
автоматически после запуска приложения, установите свойство Active компонента
TCPClient в true во время разработки приложения.
Как только соединение установлено, ваше приложение может отправлять или принимать
данные. Передача данных может осуществляться двумя способами: блоками и асинхронно.
Асинхронная передача данных - передача данных, не разбитых на отдельные блоки.
Для такой передачи данных установите свойства BiockMode сокета-клиента и сокета-сервера
в bmNonBlocking.
Передача данных блоками осуществляется быстрее, чем асинхронная. Данный способ
передачи данных применяется в тех случаях, когда необходимо продолжать выполнение
приложения во время передачи данных. Таким образом, приложение создает дополнительный
поток для чтения или передачи данных (о процессах и потоках см. главу 14). Для
установки блочного режима передачи данных установите свойства BiockMode клиента
и сервера bmBlocking.
Для завершения соединения достаточно произвести вызов метода close для компонента
TCPClient. Кроме того, соединение может быть завершено и со стороны сервера.
Если это происходит, то генерируется событие OnDisconnect.
Компонент TCPServer позволяет превратить приложение в ТСР/1Р-сервер. Перед тем
как сокет-сервер сможет прослушивать запросы клиентов, вы должны указать номер
порта, который будет прослушивать сервер. Это можно сделать с помощью свойства
LocaiPort. Для начала прослушивания запросов клиентов нужно вызвать метод Open
компонента TCPServer. Для автоматического включения прослушивания во время запуска
приложения установите свойство Active компонента TCPServer в true. Если вы хотите,
чтобы сокет-сервер автоматически устанавливал соединение с клиентом при получении
от него запроса, установите свойство AutoAccept компонента TCPServer в True.
Для завершения текущего соединения можно вызвать метод Close ИЛИ установить
СВОЙСТВО Active компонента TCPServer В false.
Если отключение произведено клиентом, то на сервере произойдет событие OnDisconnect.
Для передачи данных используйте функцию SendBuf. Данная функция описана следующим
образом:
При вызове этой функции приложение отсылает буфер данных через сокет. Переменная
buf - это переменная, содержащая отсылаемые данные, а bufsize - размер буфера
данных.
Для приема данных используется функция ReceiveBuf:
Знаете ли Вы, что cогласно релятивистской мифологии "гравитационное линзирование - это физическое явление, связанное с отклонением лучей света в поле тяжести. Гравитационные линзы обясняют образование кратных изображений одного и того же астрономического объекта (квазаров, галактик), когда на луч зрения от источника к наблюдателю попадает другая галактика или скопление галактик (собственно линза). В некоторых изображениях происходит усиление яркости оригинального источника." (Релятивисты приводят примеры искажения изображений галактик в качестве подтверждения ОТО - воздействия гравитации на свет) При этом они забывают, что поле действия эффекта ОТО - это малые углы вблизи поверхности звезд, где на самом деле этот эффект не наблюдается (затменные двойные). Разница в шкалах явлений реального искажения изображений галактик и мифического отклонения вблизи звезд - 1011 раз. Приведу аналогию. Можно говорить о воздействии поверхностного натяжения на форму капель, но нельзя серьезно говорить о силе поверхностного натяжения, как о причине океанских приливов. Эфирная физика находит ответ на наблюдаемое явление искажения изображений галактик. Это результат нагрева эфира вблизи галактик, изменения его плотности и, следовательно, изменения скорости света на галактических расстояниях вследствие преломления света в эфире различной плотности. Подтверждением термической природы искажения изображений галактик является прямая связь этого искажения с радиоизлучением пространства, то есть эфира в этом месте, смещение спектра CMB (космическое микроволновое излучение) в данном направлении в высокочастотную область. Подробнее читайте в FAQ по эфирной физике.
