Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi eigenen Fileserver / Hook / ? (https://www.delphipraxis.net/31845-eigenen-fileserver-hook.html)

Gruber_Hans_12345 14. Okt 2004 17:42


eigenen Fileserver / Hook / ?
 
Habe vor längerer Zeit diese frage mal im ee gestellt, aber keine Vernünftigen Hinweise bekommen (vielleicht weil die Frage auf Englisch gestellt war :gruebel: )

Das Ziel was ich verfolge ist, eine eigenen "Fileserver" zu machen, der aufgrund wer die Anfrage macht (erkennung der IP und des User) die Verzeichnisstruktur virtuell aufbaut.

Ich habe mir verschiedene Wege ausgesucht, die alle zu einem ähnlcihen Ergebnis führen :

1.) Einen eigenen IFS oder Samba Server (einen File Server wie Windows selbst)
auf dem Rechner wo der läuft ist dann einen zweite IP Adresse wo der Dienst läuft, oder der Windows eigene ist ganz abgedreht.
Jede Anforderung die kommt wird dann von meinem Server abgefangen und dann per DB (und anhand der IP) wird die Verzeichnis struktur aufgebaut und an den Client geschickt. Dazu müsste ich das Protokoll kennen

2.) Am Server läuft ein FTP Server der wie oben funktioniert (der funktioniert schon). Am Client ein AddIn für den Explorer, damit man direkt auf FTP Server, zugreifen kann. Ist aber teilweise etws problematisch, da diverse Programme nicht direkt damit arbeiten können.

3.) Am Client eine virtuelle Disk samt Treiber, der sich alle Infos vom Server holt.

Im Moment habe ich folgende Lösung :
*) am Server gebe ich die Daten mit $ frei, damit man wenigstens den Freigabename nicht gleich rausfindet.
*) Die Appliaktion, die die Files anzeigt, prüft anhand der DB welche zu zeigen sind, und zeigt diese.
*) per Doppelklick wird die Datei dann mit dem Standardprogramm geöffnet.

Problem :
*) Meldet sich der User in meinem Programm mit einem anderen Namen an, hat er die selben Rechten
*) Wie kann man mitkriegen, das eine Datei "auserhalb" meiner Anwendung geöffnet wird (z.b.: in einer anderen Anwedung - letzte Datei)
*) Es solle eine automatische Versionierung erfolgen. d.h.: wenn ich die Datei test.txt speicher und diese gibts schon, dann die alte umbenennen und verstecken. (Später dann einmal löschen)

Gruss
Hans


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:59 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