SHH

← →
Damaty (2006-06-07 18:10) [0]

мне нужен компнонент, функиция, прример работы с шелом SSH. именно надо логиница с сервером, послать пару команд...

← →
Dmitrij_K (2006-06-07 20:07) [1]

http://www.eldos.com/sbb/delphi-sftp.php
оно?

← →
sound81 © (2006-06-27 14:34) [2]

была у меня такая хрень, мне помог plink.exe из пакета putty и юниксовая прога sudo (запуск юзерских скриптов от рута)

← →
Slym © (2006-06-28 12:14) [3]

TidTelnet + TidSSL....

← →
diMAN © (2006-10-03 11:03) [4]

Slym, не могли бы Вы привести работающий фрагмент кода. Перепробовал все варианты, но так и не удалось заставить работать эту связку.

← →
Орион © (2006-10-03 11:13) [5]

> [4] diMAN © (03.10.06 11:03)

> Перепробовал все варианты, но так и не удалось заставить
> работать эту связку.

Например?

← →
diMAN © (2006-10-03 15:31) [6]

У меня Delphi 2006. Бросаю на форму компоненты IdTelnet1 и IdSSLIOHandlerSocketOpenSSL1, указываю в IdTelnet1 Host и Port. На все события устанавливаю брекпоинты, вызываю IdTelnet1.Connect и дальше этого оператора не проходит, на нём виснет. При этом срабатывают только IdSSLIOHandlerSocketOpenSSL1Status и IdSSLIOHandlerSocketOpenSSL1StatusInfo. Совершенно непонятно как нужно работать. Поиск в интернете к сожалению ничего не дал.

← →
Slym © (2006-10-04 04:03) [7]

dll: ssleay32.dll & libeay32.dll имеются? без них никак

← →
diMAN © (2006-10-04 07:59) [8]

> dll: ssleay32.dll & libeay32.dll имеются? без них никак

Да, конечно имеются, без них вылетала ошибка "Could not load SSL library".

← →
umbra © (2006-10-04 10:18) [9]

diMAN © (03.10.06 15:31) [6]

а сертификаты на клиенте есть?

← →
diMAN © (2006-10-04 10:31) [10]

> а сертификаты на клиенте есть?

А как его сделать и куда подсунуть?

Вообще на компьютере установлена putty через неё нормально заходит по SSH на удаленный комп, при этом никакие сертификаты не требуются. Также скачивал SecureBlackBox, пробовал соединяться как в примере SimpleSSH, тоже работает без всяких сертификатов, то не устраивает тем, что библиотека триальная, в следствие чего все соединения идут с задержками и нет возможности (или я не понял как) принять с удаленной стороны только результат выполнения конкретного скрипта.

← →
Dmitrij_K (2006-10-04 10:37) [11]

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

Ломается легко. :)

← →
Dmitrij_K (2006-10-04 10:40) [12]

http://slil.ru/23207641 взломанная версия для d7
качай пока не удалили

Dmitrij_K, спасибо! Только у меня Delphi 2006.

> Ломается легко. :)

А вот с этого места поподробнее.
И если есть ХОРОШИЙ пример по работе в этой библиотеке с SSH, то тоже не помешал бы, а то идущие в комплекте файлы помощи и примеры не объясняют принципов работы с библиотекой.

← →
Dmitrij_K (2006-10-04 11:10) [14]

> А вот с этого места поподробнее.

В файле SBSSHClient.dcu есть вызов sleep() (в 2 местах), заменяется первый нараметр на 0, задержка пропадает.
В HEX это выглядит так
0FAFD853 - оригинальный
90906A00 - crack

> И если есть ХОРОШИЙ пример по работе в этой библиотеке с
> SSH, то тоже не помешал бы, а то идущие в комплекте файлы
> помощи и примеры не объясняют принципов работы с библиотекой.
>

хз. Я работал только с SFTP, проблем не было

Dmitrij_K, ещё раз спасибо!
У меня строка встретилась только один раз, но заработало действительно быстрее.

Посмотрел примеры по SFTP, там тоже используется TClientSocket. Не совсем понятна его роль во всех этих примерах (в SFTP и SSH).

По поводу реализации SSH посредством TidTelnet + TidSSLIOHandlerSocket нашёл следующее:
SSH and SSL are completely different things. IdSSLIOHandlerSocket
is for OpenSSL, not OpenSSH. To connect using SSH you need SSH classes.
The only native delphi SSH support is provided by SecureBlackbox

Slym, если Вы всё-таки реализовали именно соединение по SSH, отзовитесь пожалуйста.

SHH Найти похожие ветки