Атрибут файла через Indy->IdFTP SOS!!!

← →
NovaC (2006-11-13 09:49) [0]

Написал прогу для мониторинга файлов по FTP
Показывает наличие файла, время его создания
и позволяет изменять атрибут доступа.
Для изменения атрибута использую:

IdFTP1.SendCmd("SITE CHMOD " + "444" + " " + fName);
IdFTP1.SendCmd("SITE CHMOD " + "644" + " " + fName);

всё работает. !!! Но никак не могу найти способа
определить эти атрибуты фалов на момент, например,
запуска программы. Подскажите кто знает !!!
Заранее БОЛЬШОЕ СПАСИБО !
Сергей
mailto KirillovSB@Mail.ru
ICQ 296307385

← →
Anatoly Podgoretsky © (2006-11-13 10:26) [1]

> NovaC (13.11.2006 09:49:00) [0]

Дело в том, что это относится к команде ls
А реализаций ответа несколько десятков, больше 50
И поэтому в общем случае эту информацию вообще не возможно получить.
Но у тебя по вопросу получается, что позже ты как то можешь это получить, это так, тогда где код.

← →
umbra © (2006-11-13 10:45) [2]

а команда LIST не помогает?

← →
Anatoly Podgoretsky © (2006-11-13 11:07) [3]

> umbra (13.11.2006 10:45:02) [2]

Когда помогает, когда нет, Инди поддерживает только свыше десятка форматов, даже не достигая трети от возможного.

← →
NovaC (2006-11-13 12:41) [4]

В том то и дело что я не знаю как определить этот атрибут.
В программе я его только меняю:

IdFTP1.SendCmd("SITE CHMOD " + "444" + " " + fName);
IdFTP1.SendCmd("SITE CHMOD " + "644" + " " + fName);

а мне надо при запуске проги определить этот атрибут
Хотелось бы узнать хоть какой-то способ...
Как можно использовать команду ls в Delphi?
Если так же через: IdFTP1.SendCmd(); то как получить результат
её выполнения?
Если использовать LIST, то как через него добраться до атрибутов файла?

← →
NovaC (2006-11-13 12:50) [5]

Если использовать:

InternetOpen
InternetConnect
FtpFindFirstFile(hFTP, ftpFile, sRec, 0, 0)
sRec.dwFileAttributes

где sRec : TWin32FindData
то варианты следующие:

FILE_ATTRIBUTE_DIRECTORY
FILE_ATTRIBUTE_HIDDEN
FILE_ATTRIBUTE_READONLY

А можно ли таким образом через dwFileAttributes получить режима доступа к файлам для групп пользователей
Такая возможность есть в любом файловом менеджере
Может всё намного проще ?

← →
umbra © (2006-11-13 17:19) [6]

на какой ОС установлен ФТП-сервер, на котором лежат файлы?

← →
NovaC (2006-11-14 04:50) [7]

unix

← →
NovaC (2006-11-14 05:15) [8]

FreeBSD 6.0-RELEASE... ftp-шник стандартный FreeBSD-шный...

← →
NovaC (2006-11-14 09:10) [9]

Нашёл следующее решение:

ListBox1.Items.Clear;
IdFTP1.List(ListBox1.Items, "маска файла", true);

где true - значит показывать все свойства и атрибуты файла.
среди них и было то что нужно - режим доступа к файлам для групп пользователей, а выглядит так: -rw-r--r--
Спасибо всем кто помагал...

TIdFTPListItems.Item[x].OwnerPermissions[|GroupPermissions|UserPermissions]

Атрибут файла через Indy->IdFTP SOS!!! Найти похожие ветки