Indy: Server an Client

[blackfin]

So geht das natürlich nicht
Du brauchst, um dich an mehrere Ports zu binden, auch mehrere Instanzen des IDTCPServer.
EIN Server bindet sich immer an EINEN Port, willst du mehrere aufmachen, brauchst du mehrere Instanzen.

Was ist überhaupt dein Vorhaben, wieso brauchst du mehrere Ports?
Im Normalfall reicht eigentlich ein offener Port pro Applikation, ausser du willst, wie ChrisE bereits gesagt hatte, mehrere Server für verschiedene Protokolle aufmachen.

Entschuldige mich, wenn ich falsch liege, aber mir kommt es jetzt irgendwie so vor, als würdest du annehmen, für mehrere Clients brauchst du auch mehrere offene Ports am Server. Das stimmt so nicht, du kannst mit einem TCP-Server viele Client-Verbindungen auf einem offenen Port laufen lassen.
(Beispiel Webserver: ein Standard-Webserver läuft auf Port 80 (EIN offener Port), aber kann viele Clients bedienen, die sich immer auf Port 80 verbinden)

[Major1337]

hmm Ich habe doch IDTCPServer1, IDTCPServer2, IDTCPServer3... usw.

[blackfin]

Oh, sorry, das habe ich übersehen, aber dann stimmt dein Code irgendwie nicht, du setzte die Ports für Server 1 und 2 (3 nicht), die Execute-Routinen sind aber für 2 und 3? Jetzt bin ich etwas verwirrt.

Was willst du eigentlich genau machen?
Falls du einen Server-Port "on the fly" umschalten willst, musst du auch die Bindings des Servers umschalten, die eventuell bereits bestehen:

Delphi-Quellcode:

IdTCPServer2.DefaultPort := 20;

for I := 0 to IdTCPServer2.Bindings.Count-1 do
begin
   IdTCPServer2.Bindings[I].Port := IdTCPServer2.DefaultPort;
end;

IdTCPServer.Active := True;

[Major1337]

Im Anhang sieht man mein Vorhaben. Wenn ich das jetzt richtig verstehe bin ich der Server und der Client ist in diesem Fall Sick. Ich bekomme somit vom Client auf verschiedenen Ports etwas, welche der Client verarbeiten soll.

[DataCool]

Hi,

das Bild sagt in meinen Augen noch nicht aus was Du machen möchtest.
Könntest Du den Sinn & Zweck mal versuchen in Worte zu fassen ?

Greetz Data

[taveuni]

Zitat von Major1337:

Im Anhang sieht man mein Vorhaben. Wenn ich das jetzt richtig verstehe bin ich der Server und der Client ist in diesem Fall Sick. Ich bekomme somit vom Client auf verschiedenen Ports etwas, welche der Client verarbeiten soll.

Du möchtest also mit einem Sick RFID kommunizieren.
Dazu benötigst Du nur einen Port. Ausser wenn die unidirektionalen 50007 und 50008 für send/receive benutzt.
Die anderen unterscheiden sich in der Schnittstelle (HTTP, Socket, SSH) und teilweise im Protokoll.
Für Deine Versuche ist vermutlich 2112 mit STX/ETX am ehesten geeignet. Bist Du im Besitz des Protokolls?

[Major1337]

Ich bin noch nicht im Besitz des RFID. Ich möchte das ganze aber mit einem Client und Server simulieren. Ich benötige mehrere Portadressen.

Ich möchte folgendes:

Der Client schickt über Port 10 etwas an Server - der Server erkennt den Port und führt den für diesen Port bestimmten Event aus. Das gleiche sollte auch für andere Ports gelten.

[taveuni]

Und wo liegt Dein Problem?
Du erzeugst auf der Serverseite so viele Instanzen wie Du Ports brauchst.
Dasselbe auf der Clientseite.

[DataCool]

Hi Major,

jetzt bin ich auch ein wenig verwirrt.
Was hat den der Port 10 mit der obrigen Grafik zu tuen ?

Du möchtest den Server auf verschiedenen Ports laufen lassen ,
kein Problem dafür gibt es sogar mehrere Möglichkeiten :

1. Eine Anwendung, ein TIdTcpServer und über die Eigenschaft "Bindings" alle Ports hinzufügen,
auf denen der Server lauschen soll.
Das führt dazu das Du nur ein einen TIdTcpServer mit einem "OnExecute" hast,
indem Du allerdings dann die Ports der verschiedenen Clients unterscheiden musst.

2. Eine Anwwendung mehrere TIdTcpServer, für jeden Port der für die Clients offen sein soll einen Server,
dadurch gibt es auch für jeden port ein "eigenes" "OnExecute".

3. Mehrere Anwendungen bzw. eine Anwendung die mehrfach gestartet wird und je nach Configuration/Übergabe auf einem bestimmten Port läuft.
Bsp.: Der Server soll auf 3 Ports lauschen, dann wird Dein Program 3 x gestartet :
DeinServer.exe 44444 (diese Exe soll auf Port 44444 laufen)
DeinServer.exe 44445 (diese Exe soll auf Port 44445 laufen)
DeinServer.exe 44450 (diese Exe soll auf Port 44450 laufen)
In der Anwendung selber hat Du nur einen TIdTcpServer und nur ein OnExecute, den Port des Servers setzt Du beim Start der Anwendung.
Einfach wie jetzt hier im Bsp. die Eigenschaft "ParamStr" auslesen.

Ich würde Variante 3 wählen!
Übersichtlicher Code, Anzahl der Ports/Serverinstanz variabel und Du kannst im laufenden Betrieb einen Server "kicken"/neu starten
ohne das die Clients der anderen Server davon betroffen sind(das ist im Live Betrieb nachher viel Wert).

Zitat:

Der Client schickt über Port 10 etwas an Server - der Server erkennt den Port und führt den für diesen Port bestimmten Event aus. Das gleiche sollte auch für andere Ports gelten.

Weiter oben hast Du danach gefragt wie der Client den Port des Servers mit dem er gerade verbunden ist erkennt ....
Antwort:
IdTCPClient1.Socket.Binding.PeerPort Jetzt möchtest Du wissen wie Du das dasselbe(Portunterscheidung) am Server machen kannst ?
AContext.Socket.Binding.PeerPort Eigentlich sollte alles klar sein, sehe kein Problem bei der Umsetzung Deines Vorhabens.

Greetz Data