TIdHttpServer und mehrere Bindings

[GuenterS]

Hallo,

ich bin dabei ein Programm zu schreiben, welches auf mehreren IP/Port auf Http Anfragen lauschen soll.

Dazu würde ich gerne die Indy Komponente TIdHttpServer verwenden. Denke dass mir diese schon eine Menge Arbeit abnimmt.

Solange ich nur eine Adresse mit einem Port zuweise klappt es, aber sobald es mehr werden bekomm ich eine Fehlermeldung. ("SocketFehler 10049. Die angeforderte Adresse kann nicht zugewiesen werden.")

Mein Code schaut in etwa so aus:

Delphi-Quellcode:

  if (not Server.Active) then
  begin
    with qryFirma do
    begin
      First;
      while (not Eof) do
      begin
        lSocketHandle := Server.Bindings.Add;
        lSocketHandle.IP := FieldByName('IP').AsString;
        lSocketHandle.Port := FieldByName('PORT').AsInteger;
        Next;
      end;
    end;
    Server.Active := true;
  end
  else
    Server.Active := false;

Der Fehler kommt genau dann, wenn ich den Server auf Active = true setze.

Als IP und Ports würde folgendes eingetragen
IP: '127.0.0.1' Port: 80
IP: '192.168.1.110' Port: 80

[marabu]

Hallo Günter,

hast du vorher geprüft, dass kein anderer Prozess die entsprechenden sockets gebunden hat? Eventuell blockiert ein lokaler HTTP Server den Port 80 auf diesen oder sogar allen Adressen.

Grüße vom marabu

[GuenterS]

Hallo Marabu!

Das habe ich zwar nicht geprüft, kann es aber ausschließen, da es funktioniert wenn ich jeweils eine der zwei IPs verwende und der Fehler erst dann kommt wenn ich 2 oder mehr eingeben möchte.

[marabu]

Ich kann deinen Fehler nur reproduzieren, wenn ich meinen HTTP Server hochfahre. Der lauscht auf 0.0.0.0:80 - fahre ich ihn runter, dann kann ich problemlos mehrere Bindings festlegen. (Indy9)

marabu

[GuenterS]

Du hast recht.

Ich war mir nur so sicher, dass 192.168.1.110 meine eigene IP-Adresse ist, deswegen dachte ich, dass ich einen zweiten Prozess ausschließen könnte. War nur nicht meine IP.

Funktioniert einwandfrei.


Dankeschön

[hatro70]

Zitat von GuenterS:

Du hast recht.

Ich war mir nur so sicher, dass 192.168.1.110 meine eigene IP-Adresse ist, deswegen dachte ich, dass ich einen zweiten Prozess ausschließen könnte. War nur nicht meine IP.

Funktioniert einwandfrei.


Dankeschön

warum bindest du ihn nicht auf 0.0.0.0:80 ? wie marabu meinte ?

das schliesst alle ips ein also deine interne 127.0.0.1

[GuenterS]

Zitat von hatro70:

Zitat von GuenterS:

Du hast recht.

Ich war mir nur so sicher, dass 192.168.1.110 meine eigene IP-Adresse ist, deswegen dachte ich, dass ich einen zweiten Prozess ausschließen könnte. War nur nicht meine IP.

Funktioniert einwandfrei.


Dankeschön

warum bindest du ihn nicht auf 0.0.0.0:80 ? wie marabu meinte ?

das schliesst alle ips ein also deine interne 127.0.0.1

weil auf dem System wo das Programm mal laufen soll durchaus auch andere HTTP Server laufen können müssen und zweitens soll er nur von bestimmten konfigurierbaren Adressen erreichbar sein.