AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Sonstige Fragen zu Delphi Delphi Position einer Datei auf einem Datenträger
Thema durchsuchen
Ansicht
Themen-Optionen

Position einer Datei auf einem Datenträger

Ein Thema von Mr_G · begonnen am 1. Mär 2006 · letzter Beitrag vom 10. Jul 2006
Antwort Antwort
Seite 2 von 2     12   
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#11

Re: Position einer Datei auf einem Datenträger

  Alt 3. Mär 2006, 19:30
Und am Ende nooben sie dir deine if-Bedingung doch in zwei Minuten wieder aus.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Benutzerbild von Mr_G
Mr_G

Registriert seit: 2. Sep 2004
Ort: Duisburg
468 Beiträge
 
Delphi 2006 Professional
 
#12

Re: Position einer Datei auf einem Datenträger

  Alt 3. Mär 2006, 20:02
In dem Fall (Client Server etc. pp.) eher nicht aber hast schon recht... wesentlich sicherer wird da nichts. Trozdem hat mich, wie schon erwähnt, die Neugirde und ein wenig der Ehrgeiz gepackt ...
Jan
  Mit Zitat antworten Zitat
Benutzerbild von mael
mael

Registriert seit: 13. Jan 2005
391 Beiträge
 
Delphi XE3 Professional
 
#13

Re: Position einer Datei auf einem Datenträger

  Alt 3. Mär 2006, 20:33
Ein paar Infos zum direkten Lesen von Festplatten:
http://www.delphipraxis.net/internal...=310776#310776

Die Sektorposition steht in der FAT drin, es gibt aber verschiedene "Formate": FAT-16, FAT-32, NTFS,...
Bei der Hilfe zu DeviceIOControl gibt es eine Liste der unterstützen Funktionen, gibt auch was zu Dateien, habe aber nichts gesehen womit man die Sektorposition direkt rausfinden könnte.

Das heißt Du mußt das FAT-Format rausfinden und analysieren, ist recht ecklig, besonders bei NTFS, außerdem auch nicht sehr portabel.
HxD, schneller Hexeditor:
http://mh-nexus.de/hxd
  Mit Zitat antworten Zitat
Benutzerbild von Mr_G
Mr_G

Registriert seit: 2. Sep 2004
Ort: Duisburg
468 Beiträge
 
Delphi 2006 Professional
 
#14

Re: Position einer Datei auf einem Datenträger

  Alt 3. Mär 2006, 20:47
Zitat von mael:
...
Das heißt Du mußt das FAT-Format rausfinden und analysieren, ist recht ecklig, besonders bei NTFS, außerdem auch nicht sehr portabel.
Danke erstmal! Aber aufgrund der genannten Nachteile und meines Unvermögens sowas "mal eben" zu schreiben würde ich mich mit dem oben von mir geposteten Code zufriedengeben, der die virtual cluster number (VCN) und die logical cluster number (LCN) ermitteln könnte wenn er denn funktionieren würde.
Jan
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.114 Beiträge
 
Delphi 12 Athens
 
#15

Re: Position einer Datei auf einem Datenträger

  Alt 10. Jul 2006, 13:00
hatte och gerade FSCTL_GET_RETRIEVAL_POINTERS gefunden und ich glaub ich weiß auch wo dein Fehler lag ... werd' es aber erst später testen (könnte es ja selber gubt gebrauchen, aber andre Dinge sind erstma wichtiger).
Das gehört mit zu den in NT4.0 eingeführten einheitlichen Defragmentierungsroutinen für FAT und NTFS und sollte demnach für nahezu alle Dateisysteme (welche sich mit WinNT direkt nutzen lassen) gleich sein?

Das war sozusagen für's Reden mit dem Dateisystemtreiber.
Und wie man es direkt macht weiß ich auch noch nicht so ganz (in FAT12/16/32 ist das ja schon fast klar, aber bei NTFS -.-'') ... aber ich hoffe mal, daß sich dat bald etwas ändert

Also man braucht sich nur vom RootVerzeichnis, über die verschiedenen Unterverzeichnisse, bis zur entsprechenden Datei durchhangeln und dort den StartCluster auslesen (wird bei NTFS ähnlich sein).

In FAT16 sehen die einzelnen Einträge in den Verzeichnissen so aus und ein ganzes Verzeichnis kannst du dir als einen Record daraus vorstellen.
Code:
FATFolderEntry = packed Record
  Name: Array[0..10] of Char;
  Attribute: Byte;
  CreateTimeLo: Word;
  CreateTimeHi: Byte;
  CreateDate: Word;
  LastAccessDate: Word;
  LastModifiedTime, LastModifiedDate: Word;
  [b]StartingClusterNumber: Word;[/b]
  FileSize: LongInt;
End;
Und die Position wäre dann
Code:
StartingClusterNumber * SectorsPerCluster * BytesPerSector
+ BootSectorSize(256 Bytes)
+ SizeOfExtendetBootSector
+ (NumberOfFATs * SectorsPerFAT * BytesPerSector)
+ (RootEntries * SizeOf(FATFolderEntry) + BytesPerSector - 1) div BytesPerSector;
Aber im Endefekt würde och die StartingClusterNumber ausreichen ... außerdem wäre es kleiner und besser zu speichern (WORD statt INT64).
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 2 von 2     12   


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 07:50 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz