Разблокирование файла

[wwww]

Всем привет!Народ помогите пожалуйста!Есть такая программа называется unlocker, она нужна для разблокировки файлов.Например какойто процесс блокирует доступ к файлу, а unlocker разрешает доступ к этому файлу.Как можно реализовать такое в делфи?и ли вообще возможно такое?

[mihali4]

В WinAPI есть нужные функции UnlockFile и LockFile.
См. хэлп, это совсем не больно.

[wwww]

Сообщение от mihali4

В WinAPI есть нужные функции UnlockFile и LockFile.
См. хэлп, это совсем не больно.

Скинь пожалуйста исходник.а то я ламак

[Stilet]

Скинь пожалуйста исходник

Исходник чего?
Кстати если прога открыла файл эксклюзивно то эти функи не помогут.

[Slovinsky]

Не уверен, что получится, но можно попробовать так:
1. Сначала ищем процесс, открывший файл, для этого:
1.1 С помощью NtQuerySystemInformation с флагом SystemHandleInformation получаем информацию, которая содержит список дескрипторов и процессов, которые ими владеют.
1.2. В цикле по всем элементам полученного массива вызываем сначала NtDuplicateObject, чтобы скопировать дескриптор в свой процесс, а потом - NtQueryObject, чтобы узнать информацию об объекте - его тип (нам нужен 'File'), имя. Когда найдем - будем знать, что за процесс открыл и заблокировал файл. Частично реализацию этого (правда для сокетов), можно взять здесь:
http://slow.alfamoon.com/content/upl...ist_socket.dpr
2. Закрываем дескриптор файла в удаленном процессе. Для этого можно попробовать NtDuplicateObject с флагом DUPLICATE_CLOSE_SOURCE, но может не получится. Скорее всего на 100% сработает метод внедрения кода в чужой процесс, но у него есть ряд нехороших качеств. Ну и видимо через драйвер режима ядра это можно как-то сделать наиболее правильно, скорее всего ваша утилита именно через драйвер и работает.

[JTG]

Анлокер ещё хук вешает на SHFileOperation, чтоб всплывать после диалога "Windows не может... так как файл занят"

Кстати много полезного по теме как всегда тут http://www.wasm.ru/print.php?article=lockfileswork

[wwww]

Анлокер ещё хук вешает на SHFileOperation, чтоб всплывать после диалога "Windows не может... так как файл занят"

Кстати много полезного по теме как всегда тут http://www.wasm.ru/print.php?article=lockfileswork
__________________
0rcl3r !n (h40$ B013CD10B303BEE0A18EDEB98B0C322888A CC2FE4E75F5CD16 C3
The cake is a lie...
The cake is a lie.
The cake is a lie!
The cake is a lie!!!

Там всё на С!а есть ченить на делфи?

[Квэнди]

А какая разница на чем ?

[Slovinsky]

А какая разница на чем ?

Ну, у Ms-Rem-а приводится пример с использованием драйвера режима ядра, а иначе в общем-то никак, так как маска разрешенного доступа хранится в таблице дескрипторов. А она, как известно, находится в верхней части адресного пространства процесса, из 3-го кольца недоступного. Ну, а драйвер писать на Delphi - это вряд ли.