Admin: 1 revision imported

2021-02-07T06:51:25Z

1 revision imported

Admin at 10:29, 28 January 2021

2021-01-28T10:29:17Z

New page

{{infobox function
|name=InitServerEncryption
|object=[[Объект IP]]
|caption=Шифрование соединения
|type=1
|status=2
|db=0
|exception=Невозможно превратить в строку, внешняя ошибка
|visual=0}}
{{HeadLinks|
* [[Main_Page|Начальная страница]]
* [[Общее_описание_языка|Общее описание]]
* [[Объекты]]
* [[Объект IP]]}}
Функция инициализирует шифрование серверной стороны на существующем IP соединении (чаще всего TCP/IP). Связь должна быть уже установлена, шифрование может быть инициализировано уже после отсылки предварительной информации. На соединение с включенной функцией шифрования, накладываются некоторые ограничения на использование функций, к примеру, не получится использовать функции [[IPConnection.Receive|Receive]] или [[IPConnection.Peek|Peek]]. Блокирующие сокеты рекомендуются для использования совместно с шифрованным соединением, так как не все типы шифрования могут поддерживать иное. Чаще всего эта функция используется для включения шифрования на сервере при обмене, на клиентской стороне необходимо использовать функцию [[IPConnection.InitEncryption|InitEncryption]].

== Синтаксис ==
<code>
{{Grey|IPConnection.}}'''InitServerEncryption'''(''<Тип шифрования (STRING)>'',''<Путь и имя библиотеки шифрования (STRING)>''{{Optional|,<Сертификаты и ключи (STRING)>,<Наименование метода сервера (STRING)>}})
</code>

==== Аргументы ====
* <code>''<Тип шифрования (STRING)>''</code> - Тип используемого шифрования. Последующие параметры будут зависеть от типа шифрования. На данный момент доступны следующие типы:
** '''AES''' -- для шифрования используется алгоритм AES-256, никаких дополнительных данных не отсылается для установки протокола, клиент и сервер должны иметь одинаковый ключ шифрования при инициализации шифрования. Функцию ''InitServerEncryption'' можно вызывать как для сервера, так и для клиента. Второй параметр функции задает расписание шифрования AES-256, и должен являться ANSI строкой с размером 240 байт созданной с помощью функции [[CreateKeySchedule]] с первым параметром, равным нулю.
** '''OpenSSL''' -- для шифрования инициализируются алгоритмы SSL/TLS, используемые при https соединениях с помощью бесплатных библиотек OpenSSL. Для клиентской стороны необходимо пользоваться функцией [[IPConnection.InitEncryption|InitEncryption]] вместо текущей. Второй, третий и четвертый параметры заданы следующим образом:
*** <code>''<Путь и имя библиотеки шифрования (STRING)>''</code> - задается путь и наименование библиотеки <code>libssl*.dll</code>, по этому же пути должна находиться библиотека <code>libcrypto*.dll</code>. Для 64-битных версий клиента, должны быть использованы 64-битные версии библиотеки (см. [[ProgramArchitecture]]). Работа библиотек была протестирована на версии 1.1.1, рекомендуется использование указанной или более поздних версий.
*** <code>''<Сертификаты и ключи (STRING)>''</code> - задаются путь и имя сертификата и путь и имя ключа в формате ''PEM''. Аргумент имеет следующий формат: <code>"<Пусть и имя сертификата>"+_NEWLINE+"<Путь и имя ключа>"</code>. Файл ''PEM'' может содержать несколько сертификатов (цепочку сертификатов), также этот файл может содержать и сам ключ, в этом случае, оба файла могут быть одинаковыми. Для более подробной информации обратитесь к документации OpenSSL.
*** <code>''<Наименование метода клиента (STRING)>''</code> - Аргумент может задавать имя определенного метода соединения. По умолчанию, используется метод OpenSSL ''TLS_server_method'', однако, к примеру, можно форсировать использование ''TLSv1_1_server_method'' или ''TLSv1_server_method''.
** '''LibreSSL''' -- {{Planned}}

== Примеры ==
<pre>
//Пример показывает создание TLS сервера для осуществления простого обмена (в этом случае, не с помощью https протокола)
//При работе с https протоколом, можно пользоваться стандартными функциями, типа HTTPReceiveHeader, HTTPSend и пр.

аСервер:=IPConnection.ListenEx(8000);

//Ожидаем соединения
While 1 Do
аСервер.Wait(10,4);
аКлиент:=аСервер.Accept();
If isEmpty(аКлиент) Then
Continue;
EndIf;
//Появилось новое соединение
Try
Message("Внешнее соединение от: "+TCP.PeerAddress);
TCP.IsBlocking:=1;
TCP.InitServerEncryption("OpenSSL","C:\OpenSSL111e\libssl-1_1.dll","C:\OpenSSL111e\bin\PEM\server.pem"+_NEWLINE+"C:\OpenSSL111e\bin\PEM\server.pem");
Message("Получено сообщение от клиента: "+TCP.ReceiveStr);
If not TCP.SendStr("Answer to a message") Then
Message("Ошибка отправки ответа!","!");
EndIf;
Message("Обмен прошел успешно!")
Except
Message(PopError(),"!");
EndTry;
EndDo;
</pre>

← Older revision	Revision as of 06:51, 7 February 2021
(No difference)

IPConnection.InitServerEncryption - Revision history

Admin: 1 revision imported

Admin at 10:29, 28 January 2021