AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Win32/Win64 API (native code) Delphi Dateisystem: Non-PChar-Dateinamen und WinAPI
Thema durchsuchen
Ansicht
Themen-Optionen

Dateisystem: Non-PChar-Dateinamen und WinAPI

Ein Thema von himitsu · begonnen am 29. Jul 2009 · letzter Beitrag vom 31. Jul 2009
Antwort Antwort
Benutzerbild von himitsu
himitsu

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

Dateisystem: Non-PChar-Dateinamen und WinAPI

  Alt 29. Jul 2009, 20:13
Also erstmal vorweg:

Ich hab hier eine alte Festplatte (FAT32), wo der IDE-Controler (Mainboard) durchgedreht ist
und willkürlich Integerwerte im unterem Bereich (bis 255) in den Datenstrom reinschmuggelte ... also quasi viele #0en auf der Platte und auch im Dateisystem verteilte.

Checkdisk erkennt dieses allerdings nicht als Fehler und behebt es demnach nicht.
Auch wenn ich weiß, wie ich das am Dateisystem vorbei umgehen bzw. den Fehler manuell beheben kann.
Also sind praktisch einige Dateien nicht zugreifbar, da beim Auslesen/Zugreifen alles ab der #0 ja abgeschnitten wird ... PChar halt.

Die Platte bzw. der Datenfehler ist schon älter und ich hab mir das eigentlich nur noch als Testobjekt aufgehoben, also ich brauch jetzt keine Tipps zum Reparieren.

Nun ist mir aber grad eben zufällig aufgefallen, das FindFirstFile mir unter Umständen mir dennoch den kompletten Dateinamen liefert.

Nur kann ich ja nun nicht einfach per DeleteFile, MoveFile oder CreateFile drauf zugreifen, da diese ja bekanntlich die #0en im Dateinamen nicht mögen.

Nun die Frage:
kennt wer zufällig passende Funktionen (Win2k bis Seven), welchen man auch solche Dateinamen übergeban kann?
(bei der Registry weiß ich z.B., daß es solche Funktionen gibt)

Aber wenn, dann wäre es nicht schlecht, wenn diese Funktionen relativ zuverlässig funktionieren.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat
Benutzerbild von mirage228
mirage228

Registriert seit: 23. Mär 2003
Ort: Münster
3.750 Beiträge
 
Delphi 2010 Professional
 
#2

Re: Dateisystem: Non-PChar-Dateinamen und WinAPI

  Alt 29. Jul 2009, 20:20
Die internen NT-Funktionen könnten evtl. gehen. Sowas wie Bei Google suchenNtDeleteFile...

Viele Grüße
David F.

May the source be with you, stranger.
PHP Inspection Unit (Delphi-Unit zum Analysieren von PHP Code)
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

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

Re: Dateisystem: Non-PChar-Dateinamen und WinAPI

  Alt 29. Jul 2009, 20:46
Ohhh, von den Funktionen hatte ich doch schonmal was gehört,
aber mir war so, als wenn die auch PChar genutzt hätten.

Aber sieht gut aus
Mal sehn ob ich demnächst etwas Zeit finde und was sich damit alles machen läßt.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

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

Re: Dateisystem: Non-PChar-Dateinamen und WinAPI

  Alt 29. Jul 2009, 21:08
Da die Windows API in C geschrieben ist und C nur Charackterarrays kennt, habe ich da wenig Hoffnung, dass das funktioniert.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

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

Re: Dateisystem: Non-PChar-Dateinamen und WinAPI

  Alt 29. Jul 2009, 21:21
einige der netten Nt...- bzw. Zw...-APIs nutzen einen UNICODE_STRING mit Längenangabe

und so wie es aussieht, hab ich grad noch 'nen teilweisen Ersatz für FindFirstFile gefunden, obwohl man diesem eh schon den vollen Namen entlocken kann (wenn man so Einiges beachtet ),
welcher aber schneller sein dürfte/könnte.

bei FindFirstFile braucht man ja ganz schön Zeit, bis ein größeres Verzeichnis eingelesen ist.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

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

Re: Dateisystem: Non-PChar-Dateinamen und WinAPI

  Alt 31. Jul 2009, 17:06
Also einen Tree, welcher mit allen Partitionen gefüllt ist, selbst die nicht gemounteten
und wo auch die "defekten" Dateien mit angezeigt werden, war ja noch leicht.

Aber dieses NtDeleteFile will einfach nicht löschen
Delphi-Quellcode:
Procedure TForm1.delete1Click(Sender: TObject);
  Var S2: WideString;
    S: UNICODE_STRING;
    O: OBJECT_ATTRIBUTES;
    E: NTSTATUS;

  Begin
    If Tree1.GetFirstSelected = nil Then Exit;
    S2 := GetFullName(Tree1.GetFirstSelected);
    S.Length := Length(S2) * 2;
    S.MaximumLength := MAX_PATH * 2;
    S.Buffer := PWideChar(S2);
    O.Length := SizeOf(OBJECT_ATTRIBUTES);
    O.RootDirectory := 0;
    O.ObjectName := @S;
    O.Attributes := 0;
    O.SecurityDescriptor := nil;
    O.SecurityQualityOfService := nil;
    E := NtDeleteFile(O);
    ShowMessage(SysErrorMessage(E and $0FFFFFFF));
  End;
S bzw. S2 enthalten z.B. einen String wie
S2 := '\\?\Volume{7172b2a6-ae53-11dd-853d-806d6172696f}\Da'#0'ài_Suchen.exe' und das nicht gelöscht wird, liegt nicht an der #0, denn es geht bei allen Dateien nicht.

auch sowas mag die Funktion nicht
Delphi-Quellcode:
S2 := '\\.\S:\Da'#0'ài_Suchen.exe'
S2 := 'S:\Da'#0'ài_Suchen.exe'
die aktuelle Fehlermeldung ist (mit dem obrigem Code)
Zitat:
Windows kann den Netzwerkpfad nicht finden. Überprüfen Sie, dass der Netzwerkpfad korrekt ist und dass der Zielcomputer nicht ausgelastet oder ausgeschaltet ist. Falls dies nicht der Fall ist, sollten Sie sich an den Netzwerkadministrator wenden
es gab auch schon Andere ... weiß jetzt nur nimmer wie die genau lauteten
Miniaturansicht angehängter Grafiken
unbenannt_352.png   unbenannt_229.png  
Angehängte Dateien
Dateityp: exe thedirectoryeditor_464.exe (913,0 KB, 2x aufgerufen)
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


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 00:24 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