VPF::затирание инфы - Форум программистов

artem1987

Дата 17.8.2006, 11:23 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 203
Регистрация: 18.7.2006
Где: Калининград

Репутация: нет
Всего: нет

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

--------------------

Don't ask me why, ask me how.

dumb

Дата 17.8.2006, 11:29 (ссылка)

(нет голосов)

Загрузка ...

sceloglauxalbifacies

Профиль
Группа: Экс. модератор
Сообщений: 2929
Регистрация: 16.6.2006

Репутация: 7
Всего: 158

в цикле записываешь в файл(который хочешь прочно затереть) то нули, то $FF поверх его содержимого. потом спокойно удаляешь. кол-во перезаписей - на вкус, ибо уже после первого прохода обычными методами файл не восстановить - только с применением спец.железа.

Romikgy

Дата 17.8.2006, 11:33 (ссылка)

(нет голосов)

Загрузка ...

Любитель-программер

Профиль
Группа: Участник Клуба
Сообщений: 7326
Регистрация: 11.5.2005
Где: Porto Franco Odes sa

Репутация: 13
Всего: 146

А лучше еще один цикл добавить с рандомом

--------------------

Владение русской орфографией это как владение кунг-фу — истинные мастера не применяют его без надобности.

Snowy

Дата 17.8.2006, 11:40 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 30
Всего: 484

http://forum.vingrad.ru/index.php?showtopic=91166

artem1987

Дата 17.8.2006, 16:23 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 203
Регистрация: 18.7.2006
Где: Калининград

Репутация: нет
Всего: нет

с этим я разобрался, там конечно дядька Гутман постарался.
а ежели нужно затереть не файл а свободное место, т.е. уже удаленные файлы?

--------------------

Don't ask me why, ask me how.

Romikgy

Дата 17.8.2006, 16:27 (ссылка)

(нет голосов)

Загрузка ...

Любитель-программер

Профиль
Группа: Участник Клуба
Сообщений: 7326
Регистрация: 11.5.2005
Где: Porto Franco Odes sa

Репутация: 13
Всего: 146

создаешь файл , на все доступное пространство и аналогично smile

потом не забудь удалить smile

--------------------

Владение русской орфографией это как владение кунг-фу — истинные мастера не применяют его без надобности.

Snowy

Дата 17.8.2006, 16:27 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 30
Всего: 484

Так не получится, если файл предварительно не восстановить.
Можно затереть вообще всё свободное место.
Но это долго.
http://forum.vingrad.ru/index.php?act=Sear...66&skipped=

Yanis

Дата 17.8.2006, 16:28 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: 13
Всего: 111

Цитата(artem1987 @ 17.8.2006, 17:23

)

с этим я разобрался, там конечно дядька Гутман постарался.

Это постарался дядька Snowy.

Цитата(artem1987 @ 17.8.2006, 17:23

)

а ежели нужно затереть не файл а свободное место, т.е. уже удаленные файлы?

Открывай диск как файл (см. CreateFile) и пиши куда тебе хочется.

--------------------

*щёлк*

artem1987

Дата 17.8.2006, 16:56 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 203
Регистрация: 18.7.2006
Где: Калининград

Репутация: нет
Всего: нет

дядька Snowy убрал конечно всех, хотя программа с багами практически не работает ObjectRescue восстанавливает bmp файлы большей частью...

--------------------

Don't ask me why, ask me how.

Snowy

Дата 17.8.2006, 17:51 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 30
Всего: 484

Скачал ObjectRescue.
Ключа у меня правда нет. Но я и не собирался восстанавливать.
Да. Есть такой файл. Никто и не говорит, что его не было...
Только вот восстановить она его не смогла.
Грит, хрен его знает, что это. Но не BMP - точно.
Прилепляю тестовую программку - она работает из коммандной строки.
Принимает один параметр - имя файла.

Добавлено @ 17:52
На всякий случай, код программы:

Код

program wiper;

{$APPTYPE CONSOLE}

uses
  Windows, Classes;

procedure ZeroFillDelete(FileName: string);
var
  fs: TFileStream;
  i:  integer;
  procedure RandomWrite;
  var b:  byte;
  begin
    repeat
      b := Random(256); fs.Write(b, 1);
    until fs.Position + 1 >= fs.Size;
  end;
  procedure WritePattern(pattern: byte);
  const patt: array[5..31] of dword = ($555555, $AAAAAA, $924924, $492492,
        $249249, 0, $111111, $222222, $333333, $444444, $555555, $666666,
        $777777, $888888, $999999, $AAAAAA, $BBBBBB, $CCCCCC, $DDDDDD,
        $EEEEEE, $FFFFFF, $924924, $492492, $249249, $6DB6DB, $B6DB6D, $DB6DB6);
  var d: dword;
  begin
    d := patt[pattern] shl 8;
    repeat fs.Write(d, 3); until fs.Position + 3 >= fs.Size;
  end;
begin
  for i := 1 to 35 do
  try
    fs := TFileStream.Create(FileName, 2);
    try
      if (i < 5) or (i > 31) then RandomWrite
      else WritePattern(i);
    finally
      fs.Free;
    end;
  except Exit; end;
  DeleteFile(PChar(FileName));
end;

begin
  if ParamCount <> 1 then
    Writeln('Usage: ' + ParamStr(0) + ' FileToWipe.ext')
  else begin
    WriteLn('Wipe: ' + ParamStr(1));
    ZeroFillDelete(ParamStr(1));
  end;
end.

Присоединённый файл ( Кол-во скачиваний: 9 )

wiper.zip 35,69 Kb

artem1987

Дата 17.8.2006, 19:23 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 203
Регистрация: 18.7.2006
Где: Калининград

Репутация: нет
Всего: нет

не, с удалением все в поряде...просто система такая что когда затираешь хоть файл, хоть свободное простр(читай удаленные файлы)
то любой потом recover их найдет, но открыть не сможет, так и любой вайпер делает, я проверял ,вот только bmp файлы открываются
а 1/4 одного тона(типа затертая)...

--------------------

Don't ask me why, ask me how.

Romikgy

Дата 17.8.2006, 19:39 (ссылка)

(нет голосов)

Загрузка ...

Любитель-программер

Профиль
Группа: Участник Клуба
Сообщений: 7326
Регистрация: 11.5.2005
Где: Porto Franco Odes sa

Репутация: 13
Всего: 146

дык сам ищи эти удал. файлы на фАТ сами файлы не удаляются а изменяется 1 символ в названии , вот и пройдись по каталогу и ищи эти файлы а потом востанавливай 1 символ переписывай и снова удаляй

--------------------

Владение русской орфографией это как владение кунг-фу — истинные мастера не применяют его без надобности.

Snowy

Дата 17.8.2006, 19:48 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 30
Всего: 484

Затирать фат - это уже другая проблема.
Не спорю, код убивает файл, но не делает вид, будто его и не было.
След в фат остаётся.
Сам файл восстановить нельзя, но имя его остаётся в фат'e
Удаление из фат - проблема специфическая.
Разные фаты устроены по разному - универсального решения нет.
Разве что переименовать файл перед удалением во что-нить нейтральное.

Romikgy

Дата 18.8.2006, 00:21 (ссылка)

(нет голосов)

Загрузка ...

Любитель-программер

Профиль
Группа: Участник Клуба
Сообщений: 7326
Регистрация: 11.5.2005
Где: Porto Franco Odes sa

Репутация: 13
Всего: 146

Цитата(Snowy @ 17.8.2006, 18:48

)

Сам файл восстановить нельзя

в фат без проблем востановить файл!!!!

--------------------

Владение русской орфографией это как владение кунг-фу — истинные мастера не применяют его без надобности.

dumb

Дата 18.8.2006, 00:58 (ссылка)

(нет голосов)

Загрузка ...

sceloglauxalbifacies

Профиль
Группа: Экс. модератор
Сообщений: 2929
Регистрация: 16.6.2006

Репутация: 7
Всего: 158

Romikgy, брр... ты нить утерял чтоль? восстановить - восстановишь, но внутри то куча хлама будет. smile

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: WinAPI и системное программирование \| Следующая тема »