FileShredder

patrick · Beiträge: 1481 WIN2k, WIN XP D6 Personal, D2005 PE

A-Coder2 FileShredder ist ein weiteres, vorab veröffentlichtes Modul des Verschlüsselungsprogramms A-Coder2.
Mit ihm ist es möglich Daten absolut sicher zu löschen, so das diese nicht mehr wiederhergestellt werden können. Dies wird zum einen durch überschreiben des Inhaltes mit Zufallsdaten und mit vernichten der alten Dateiposition auf dem Datenträger erreicht. Eine Besonderheit ist die Makrofunktion, mit dem es möglich ist Dateien und
Verzeichnisse die regelmäßig gelöscht werden müssen (z.B. Speicherkarten-Inhalte)
in einem Makro zu speichern.

user defined image

Download

schreibt mir wenn ihr bugs findet und was man noch besser machen kann.
wenn ihr die möglichkeit habt wäre es schön wenn ich per recoverytool gucken könntet ob es auch wirklich weg ist.
ich hab es mit nem recoverytool probiert aber konnte nix finden (sonst wäre das prog ja auch für den P0P0).

cya

_________________
Patrick
im zweifelsfall immer das richtige tun!!!

MrKnogge · Verfasst: Di 01.06.04 15:07

Hi !

Solche tools gibt es zwar schon des öfteren, aber als Sicherheits-Sammlung sicherlich ganz praktisch !

Also der test ging bei mir ohne Probleme, nur solltest du beachten, dass nicht alle Benutzer den gleichen XP-Theme verwenden wie du. (Auch wenn er klasse aussieht :wink:

) Bei mir(XP-Luna) ist das ausehen weniger schick, auch der Hintergrund des seitliche Schriftzuges past nicht mehr so richtig.

_________________
MfG MrKnogge

patrick · Beiträge: 1481 WIN2k, WIN XP D6 Personal, D2005 PE

hi nochmal,
die neue version ist jetzt online. download unter dem selben link

und ich hab nen "neutralen" screenshot gemacht

das das prog keine revolution ist war mir schon klar.
ich würd nur gern wissen ob es noch verbesserungsmöglichkeiten gibt

_________________
Patrick
im zweifelsfall immer das richtige tun!!!

t3Qn0lo-G · Beiträge: 68 Win 7 Delphi 7 Enterprise

hmm schaut gut aus das programm.. doch hab ich immer die skepsis bei diesen programmen... nicht, dass sie mir wegen eines code-fehlers doch mall mehr kaputt machen.. ich sag nicht, das sowas beachtsichtigt ist oder so.. kann ja auch zufall sein..

naja nen andres problem wäre: wenn man sich einmal verklickt isses zu spätt.... o_O naja aber das sind jetzt keine mängel an deinem prog, sondern nur so allgemein mein denken!!

schitho · Beiträge: 288 XP Home SP2 D2005 Prof

Hi,

gefällt mir sehr gut.

Was mir aufgefallen ist:

Man kann komplette Ordner, samt Unterordner nur über die Makrofunktion löschen. Wäre super, wenn das auch im Hauptfenster ginge.
Das mit dem Makro hat mich auch eher verwirrt, weil sich der Text von Makro auf Makro verwalten ändert, ohne dass sich etwas tut. Vielleicht findest ja eine bessere Lösung (obwohl mir momentan auch nicht Gescheites einfällt).
Wenn ich die Anzahl der Shreddervorgänge ändere, dann merkt sich Dein Programm das leider nicht. Upps - steht eh als ToDo in Deiner Beschreibung

Noch ein paar Fragen:

Was verstehst Du unter "Vernichten der alten Dateiposition"?
Hast Du das Problem gelöst, dass der Dateiname für ein Wiederherstellungsprogramm sichtbar bleibt, weil der Dateiname nicht gelöscht wird? Wenn ja: Wie?
Wo speicherst Du die Makros ab? Würde sie nämlich gerne wieder löschen.

Würde mich interessieren, weil ich selbst auch mal so ein Programm geschrieben habe? :wink:

Sonst finde ich es sehr übersichtlich und einfach zu bedienen?

Gruß
Thomas

_________________
(Sorry! Leider ewiger Delphi-Neuling)

Ehemaliges Mitglied Erhaltene Danke: 1

schitho hat folgendes geschrieben:

Hast Du das Problem gelöst, dass der Dateiname für ein Wiederherstellungsprogramm sichtbar bleibt, weil der Dateiname nicht gelöscht wird? Wenn ja: Wie?

Muss mich mal einmischen

Früher, unter MS-DOS (ja, das war, als es auch noch Schallplatten gab), da hat folgendes gereicht -

1. Dateiinhalt überschreiben (so oft du willst oder eben nach Methode)
2. Datei durch ReWrite neu öffnen, und damit den Zeiger auf die alten Daten zerstören, aber gleich wieder zumachen (die Datei, meine ich).
3. Datei umbenennen, wobei der neue Name nur 1 Zeichen enthält.
4. Dann die Datei mit "Erase(File)" löschen.

Beim FAT-System wurde ja nur der erste Buchstabe überschrieben. Da der Dateiname aber nur noch aus einem Zeichen bestand, war der Name natürlich nicht mehr zu sehen.
Probier´s aus, vielleicht hilft´s dir weiter.

MrKnogge · Verfasst: Mi 02.06.04 08:52

Moin Mathias,

ob das unter Windows für Spezialisten (Datenlabor etc.) reicht, bin ich mir nicht sicher, da Windows die Daten nicht einfach nur speichert, sndern auch von alleine bestimmte teile sichert (wohl solange HD-Platz reicht :mrgreen:

). Aber für gewöhnliche Recovery-Tools, denke ich schon.

_________________
MfG MrKnogge

Ehemaliges Mitglied Erhaltene Danke: 1

Deswegen sagte ich ja: Früher hat´s gereicht.

Heute müsste man das mal ausprobieren. Aber ich meine, wenn du deine Daten wiederherstellen willst, dann wirst du wahrscheinlich sowieso alle Möglichkeiten nutzen (von der eingebauten Systemwiederherstellung bis hin zu externen Tools).
Wenn du die Platte allerdings verhökern willst, dann wird sie unter diversen Überschreibtools wohl noch mal arg zu leiden haben. :mrgreen:

Wobei dann aber auch interessant wäre, wie sich das Programm von patrick in einem Datenlabor schlägt. Sprich: Hinterlässt es Spuren? Er hat ja nur gesagt, dass Recoverytools nichts finden. Aber die kann man ja nun nicht mit den Sachen vergleichen, die professionelle Datenretter verwenden.

Wie gesagt: @schitho: Einfach mal ausprobieren. Einen Shredder hast du ja, soweit ich das mitbekommen habe. Einfach mal ergänzen, was ich schrieb, und dann wirst du ja sehen ob ein Undelete-Programm bzw. ein Wiederherstellungstool den Namen noch findet.

patrick · Beiträge: 1481 WIN2k, WIN XP D6 Personal, D2005 PE

schitho hat folgendes geschrieben:

Hi,
[*]Man kann komplette Ordner, samt Unterordner nur über die Makrofunktion löschen. Wäre super, wenn das auch im Hauptfenster ginge.

wird gemacht

.
war ursprünglich auch so geplant aber habs wohl vergessen es auch umzusetzten :oops:

schitho hat folgendes geschrieben:

[*]Das mit dem Makro hat mich auch eher verwirrt, weil sich der Text von Makro auf Makro verwalten ändert, ohne dass sich etwas tut. Vielleicht findest ja eine bessere Lösung (obwohl mir momentan auch nicht Gescheites einfällt). :oops:

der text ändert sich weil er von dem combobox-Text auf das menüitem wechselt. ich werd mir was einfallen lassen

schitho hat folgendes geschrieben:

[*]Wenn ich die Anzahl der Shreddervorgänge ändere, dann merkt sich Dein Programm das leider nicht. Upps - steht eh als ToDo in Deiner Beschreibung

no comment :mrgreen:

schitho hat folgendes geschrieben:

[*]Was verstehst Du unter "Vernichten der alten Dateiposition"?

im grunde das was mathias mit dos geschreiben hab. ich poste den source mal ins forum wenn ich zuhause bin.

schitho hat folgendes geschrieben:

[*]Hast Du das Problem gelöst, dass der Dateiname für ein Wiederherstellungsprogramm sichtbar bleibt, weil der Dateiname nicht gelöscht wird? Wenn ja: Wie?

siehste wenn ich den source poste

schitho hat folgendes geschrieben:

[*]Wo speicherst Du die Makros ab? Würde sie nämlich gerne wieder löschen.

macros kannst du auch über das "makros verwalten"-fenster löschen.
ansonsten: "fileshredderconfig.ini" im programmverzeichnis
(wir bei der nächsten version anders heißen. da kommen dann die wirklichen einstellungen rein)

schitho hat folgendes geschrieben:

Sonst finde ich es sehr übersichtlich und einfach zu bedienen?

das fragezeichen macht mir sorgen - war das absicht oder ein versehen

schitho hat folgendes geschrieben:

Gruß
Thomas

gruß zurück :wink:

_________________
Patrick
im zweifelsfall immer das richtige tun!!!

patrick · Beiträge: 1481 WIN2k, WIN XP D6 Personal, D2005 PE

hier der source den ich versprochen hab:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:

  Dir:=ExtractFilePath(szFilename);
  ShredFile := 'Shrd.tmp';

  Assignfile(f,szFilename);
  ReWrite(f,1);                          // alte Position vernichten
  CloseFile(f);
  Rename(f,ShredFile);

  Assignfile(f,Dir+ShredFile);
  ReWrite(f,1);                           // alte Position nochmal vernichten
  Closefile(f);
  Erase(f);                                // Datei löschen

im prinzip das was mathias gesagt hat in doppelter ausführung

_________________
Patrick
im zweifelsfall immer das richtige tun!!!

schitho · Beiträge: 288 XP Home SP2 D2005 Prof

MathiasSimmack hat folgendes geschrieben:

Früher, unter MS-DOS (ja, das war, als es auch noch Schallplatten gab), da hat folgendes gereicht -

1. Dateiinhalt überschreiben (so oft du willst oder eben nach Methode)
2. Datei durch ReWrite neu öffnen, und damit den Zeiger auf die alten Daten zerstören, aber gleich wieder zumachen (die Datei, meine ich).
3. Datei umbenennen, wobei der neue Name nur 1 Zeichen enthält.
4. Dann die Datei mit "Erase(File)" löschen.

Das Umbenennen hab ich mal gemacht. Das Wiederherstellungstool hat den alten Namen aber trotzdem gefunden. Allerdings hab ich Schritt zwei nicht gemacht. Werde es daher mal ausprobieren. Danke für den Hinweis :wink2:

patrick hat folgendes geschrieben:

das fragezeichen macht mir sorgen - war das absicht oder ein versehen

Mach Dir keine Sorgen! Es war ein Versehen es sollte natürlich heißen:

Sonst finde ich es sehr übersichtlich und einfach zu bedienen :!:

Und Danke für den Source-Code

Gruß
Thomas

_________________
(Sorry! Leider ewiger Delphi-Neuling)

schitho · Beiträge: 288 XP Home SP2 D2005 Prof

Hallo Patrick,

hab Deinen Source-Code ausprobiert. Es funktioniert (zumindest unter NTFS) super. Der alte Dateiname wird nicht mehr wieder gefunden

Danke!
Gruß
Thomas

_________________
(Sorry! Leider ewiger Delphi-Neuling)

patrick · Beiträge: 1481 WIN2k, WIN XP D6 Personal, D2005 PE

so und wieder ist ne neue version fertig.
ich hab schitho's liste weitestgehend abgearbeitet:

-Beim Öffnen der "Macros" Combobox wird nun nicht mehr automatisch der letzte Eintrag markiert
-Einige Änderungen an dem GUI
-Es jetzt auch möglich Ordner-Inhalte direkt einzufügen
-Macros werden jetzt in ShredderMacros.ini gepeichert
-Programmeinstellungen werden in ShredderConfig.ini

:!:

wenn du die alte version in dem selben verzeichnis hast musst du die datei "ShredderConfig.ini" in "ShredderMacros.ini" umbenennen damit die Macros net gelöscht werden.

die todos:
-Hinzufügen von festen Makros für Temp-Ordner,Cache,Internet-Files usw.
-Eintrag ins Kontextmenü des Explorers (per Einstellung)
hab ich noch nicht integriert da ich überlege diese dinge direkt in einen installer zu integrieren :
auslesen und abspeichern der benötigten systempfade für die Makros.
abfrage ob das programm sich ins kontextmenü eintragen soll.

mit NSIS ist da ja relativ einfach und es ist sourcesparend

ich freu mich noch über verbesserungsvorschläge

_________________
Patrick
im zweifelsfall immer das richtige tun!!!

patrick · Beiträge: 1481 WIN2k, WIN XP D6 Personal, D2005 PE

Und wieder eine neue Version.
Das Programm hab ich jetzt in ein Setup gepackt. Das Setup erstellt die vordefinierten Macros (Temporäre Dateien, Cache, Cookies, Verlauf, Zuletzt verwendete Dateien)

Neben mehreren kleine Änderungen, hab ich noch ein paar Bugs beseitigt durch welche es möglich war, dass geshredderte Dateien noch sichtbar waren.

wäre schön wenn ihr es nochmal durchtesten würdet.

THX

_________________
Patrick
im zweifelsfall immer das richtige tun!!!

schitho · Beiträge: 288 XP Home SP2 D2005 Prof

Hi,

erster Eindruck ist super.

Toll wäre, wenn auch noch Drag and Drop funktionieren würde, so dass man zu löschende Dateien einfach nur auf das Fenster oder das Symbol ziehen muss.

Gruß
Thomas

_________________
(Sorry! Leider ewiger Delphi-Neuling)

patrick · Beiträge: 1481 WIN2k, WIN XP D6 Personal, D2005 PE

OK, kommt in der nächsten version

_________________
Patrick
im zweifelsfall immer das richtige tun!!!

patrick · Beiträge: 1481 WIN2k, WIN XP D6 Personal, D2005 PE

nach langer, langer, langer zeit ist es mir mal wieder gelungen mich aus der sonne zu schleifen (ok es war schon dunkel) und mich dem projekt mal wieder zuzuwenden.
es ist ne neue version da.((download siehe oben)

änderungen/verbesserungen

Maximieren und verändern der Fenstergröße ist jetzt möglich
Zeitanzeige Bug behoben
Explorer-Parameterübergabe möglich
Direktes Öffnen eines Macros über den Parameter "-macroname" möglich
Direktes Löschen per Kontextmenü möglich (Senden an > FileShredder)
(weil mich 300 einträge im kontext-menü einfach nerfen)
Fehler beim mehrmaligem Öffnen des "Macro-Verwalten"-Fensters behoben

würd mich wieder über ein paar verbesserungsvorschäge freuen

THX

_________________
Patrick
im zweifelsfall immer das richtige tun!!!

Ehemaliges Mitglied Erhaltene Danke: 1

noch ein Vorschlag:

das Programm im Tray laufen zu lassen. Bei 10 Gb 5x schreddern dauert doch ganz schön lange und wenn man nebenbei am Rechner arbeitet..

patrick · Beiträge: 1481 WIN2k, WIN XP D6 Personal, D2005 PE

ich arbeite gerade an einer sehr umfangreich überarbeiteteten version, wird mit auf die todo liste gesetzt.
PS: sorry das ich mich erst jetzt melde aber ich hab seit sonntag die grippe :eyes:

_________________
Patrick
im zweifelsfall immer das richtige tun!!!

patrick · Beiträge: 1481 WIN2k, WIN XP D6 Personal, D2005 PE

kurriert und voller tatendrang. die neue version 1.1 ist released.

änderungen und verbesserungen:

Dauer des Shredvorgangs wird angezeigt.
Schnellerer Shredvorgang
Detailierteres ErrorLog: Der Grund, warum das Shreden einer Datei fehlgeschlagen ist, wird angezeigt.
Bug behoben: "Shrd.tmp" erscheint in div. Ordnern oder bleibt im Zielordner erhalten.
(Hinweis: Dieser Bug stellt kein Sicherheitsrisiko da, diese Datei enhält keinerlei Informationen mehr)
Ist der Ordner in dem sich eine geschredderte Datei befunden hatte leer, wird der Ordner in der Dateizuordnugstabelle unkenntlich gemacht und gelöscht.
Bei Minimieren wird nun das Programm aus der Taskbar entfernt und als Trayicon angezeigt.(Per Konifgurationsdatei abstellbar)
Suchfunktion für das Dateilisting (BETA)

_________________
Patrick
im zweifelsfall immer das richtige tun!!!

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme