PDA

Archiv verlassen und diese Seite im Standarddesign anzeigen : PERL - Protokoll eines Sockets rausfinden



sticky bit
21-10-2006, 03:26
Ich möchte rausfinden welches Protokol ein Socket hat.

Also angenommen irgendwo im Programm wird ein Socket erzeugt, z. B. so:
socket($sock, PF_INET, SOCK_STREAM, getprotobyname('tcp'));
Wie kann ich wo anders im Pogramm nur anhand des Sockets feststellen das das Protokoll dessen TCP ist?
Auch wenn ich in dem Beispiel ja weiss, dass es TCP sein muss, ich will es aus dem Socket wieder "rauslesen", weil ich mir ne allgemein verwendbare Subroutine schreiben möchte die mir die Adress-Parameter eines Sockets zurück gibt u. A. auch den Port, der vorzugsweise in den Dienst-Alias aufzulösen ist. Für getprotobyport() brauch ich dazu aber das Protokoll. Ausserdem schadets auch so nicht, an diese Information wieder zu kommen.

Dachte zuerst, dass geht vielleicht mit getsockopt() aber so ganz steig ich da ned durch ob das geht und wenn ja wie ich das genau machen muss...

Irgendwer irgendeinen Vorschlag?