SOCKS 4 сервер + клиентский компонент Delphi 2007
Суть в том, чтобы сделать удаленный вызов функций без постоянного соединения с сервером по протоколу SOCKS4.
Клиент - это компонент, класс, который реализует определенный интерфейс. Т.е. это не приложение, это компонент - программный модуль ( или несколько модулей ). Компонент этот невизуальный, бросается на TDataModule.
Также в клиентской программе имеется модуль, в котором определен только лишь интерфейс. Его определяет программист клиентского приложения. Например,
....
type
MyInterface = interface(IInvokable)
function Func1(P1: byte; P2: WideString; P3: Boolean): Boolean;
....
Далее, если в клиентской программе надо вызвать какую-то функцию, то компонент просто преобразовывается к данному интерфейсу.
Выглядит это примерно вот так:
...
var
MySOCKSClient1: TMySOCKSClient;
...
begin
(MySOCKSClient1 as MyInterface).Func1(P1, P2, P3);
...
Вся реализация доступа к серверу, обработки исключений находится внутри класса TMySOCKSClient.
Теперь про сервер.
Сервер - это приложение, оформленное в виде службы под Windows (главным образом под 2003), которое слушает порт.
Сервер состоит как бы из двух частей. Первая часть - это вся его внутренняя реализация. А вторая часть - такой же модуль интерфейса, как и в клиенте + модуль реализации функций, где уже программист пишет свою обработку функции. Что получается? Получается не что иное, как удаленный вызов процедур. Пользователь вызывает функцию в клиентской программе, а бизнес-логика реализуется на сервере, в модуле реализации:
...
type
TMyType = class(TInvokableClass, MyInterface)
function Func1(P1: byte; P2: WideString; P3: Boolean): Boolean;
...
implementation
function Func1(P1: byte; P2: WideString; P3: Boolean): Boolean;
begin
// Код обработки данных
Result := True;
end;
Кто работал с THTTPRIO и SOAP, тот легко поймет о чем идет речь.
Помимо этого, основным требованием к серверу является эффективное управление потоками с использованием пула потоков. Это означает, что в пуле потоки создаются предварительно и используются повторно. Они создаются до использования и хранятся неактивными в пуле. Когда требуется поток, то он берется из пула и активируется. Если требуется больше потоков, чем есть в пуле, то создаются дополнительные потоки. Когда поток больше не требуется, то вместо его разрушения он деактивируется и возвращается в пул.
Также необходимо обеспечить сжатие и шифрование передаваемых данных. Шифрование можно сделать по SSL, можно другое, более быстрое.
Ещё один нюанс - аргументы функций всегда являются простыми типами: числа, строки (WideString), логический тип.
Т.е. сложные типы данных передавать не придется.
Основными критериями качества выступают скорость, низкий объем передаваемых данных, защита информации, с сохранением способности работать через прокси-сервера по SOCKS4.
По поводу реализации. Задача не из простых, так как придется программировать сокеты, программистам без сокетного опыта лучше не браться во избежание мороки с глюками. В принципе, можно использовать и WinSocks и Indy 10, или что-то ещё, с чем вы хорошо дружите.
Выходными артефактми являются исходные коды двух проектов - клиентского компонента и сервера.
Проекты должны компилироваться в Delphi 2007. Проекты не должны использовать платных компонент сторонних разработчиков.
Пожалуйста, предлагайте свои варианты - стоимость, сроки, как будете делать.