LuckiePing

[Luckie]

Da ja anscheinend Ping Programme gerade Mode sind: http://www.delphipraxis.net/internal...ct.php?t=78344 will ich auch mal meine Version vorstellen. Gerechterweise, muss ich sagen, dass ich die Ping Unit von retnyg benutze. Das Programm ist OpenSource und nonVCL.

Anzeigen von:

• Computername
• IP
• MAC Adresse
• Domain
• Servertyp
• Betriebssystem
• Kommentar zum Rechner
• Antwortzeit

Features:

• Multithreaded
• Verbose Mode
• Rechner mit Freigaben haben ein ander4es Icon
• Doppelklick öffnet den Rechner im Explorer

To do:

• Benutzer kann Threadanzahl selber wählen (in vernünftigen Grenzen)
• Export in eine CSV Datei

Aktuelleversion 1.0.6.320:
Performance verbessert. Ich habe gerade eben innerhalb von 30 Sekunken ein ganzes Subnet durchgepingt. (Verbose war deaktiviert, damit er nicht alle Informationen ermittelt.)
Bugfixes.
Sourcen zur Aktuellenversione werden nachgereicht.

Aktuelle Version: 1.0.6.321:
Threads auf 25 begrenzt. Bei 255 Threads verliert man etwas die Kontrolle und es dauert ewig bis alle Threads beendet sind, wenn man abbricht, da viele Threads blockiert sind, wenn sie gerade Informationen zu den Rechnern ermitteln.

Aktuelle Version: 1.0.6.322:
Rechner mit Freigaben haben ein entsprechendes Icon.
Doppelklick öffnet den Rechner im Explorer

Aktuelle Version: 1.0.6.327:
Sekunden korrigiert, waren wirkölich etwas schnell.
Öffnen eine Rechners per Doppelklick oder Leertaste in einem eigenen Thread.

Aktuelle Version 1.0.0.7:
Vertauschte IP Adressen werden automatisch korrigiert
Vorerst die Final.

Aktueller Screenshot im Anhang.

[Tubos]

@glkgereon: Sowas nennt man einen Portscan.
Natürlich kann man den auch blocken, und zwar indem man eine Software- oder Hardware-Firewall benutzt, die keine Verbindungen durchlässt.

[glkgereon]

Zitat von Tubos:

@glkgereon: Sowas nennt man einen Portscan.
Natürlich kann man den auch blocken, und zwar indem man eine Software- oder Hardware-Firewall benutzt, die keine Verbindungen durchlässt.

nein, ich meine das wäre noch grundsätzlicher gewesen

ich könnt mich in den hintern beissen das ich mir nirgendwo den link aufgeschrieben hab :$

ich such nochmal und meld mich falls ich was finde^^

Edit:

Haha
das ganze nannte sich "arp"...
oder hab ich das was falsch verstanden?

[Tubos]

Zitat:

Haha
das ganze nannte sich "arp"...
oder hab ich das was falsch verstanden?

ARP steht für Address Resolution Protocol. Es dient dazu, in LANs die IP-Addresse in eine MAC-Addresse umzuwandeln.
Dabei schickt der Rechner eine Nachricht vom Typ "Wer hat die IP xx", und der entsprechende Rechner antwortet ihm dann.
Du hast Recht - wenn man ARP deaktivieren würde, könnte keiner mehr diesen Rechner erreichen.
Es sei denn, er hat einen statischen ARP-Eintrag mit der entsprechenden MAC-Adresse.
Für mich sieht das so aus, als könnte man das tatsächlich zum Pingen verwenden. Ist mir zuerst gar nicht eingefallen!

@Luckie: Dein Tool funktioniert bei mir überhaupt nicht. Weder mein LAN, noch einen Adressbereich im Internet konnte ich auflisten.
Vielleicht liegt es an der verbuggten Windows Firewall liegt. Die habe ich soeben deaktiviert. Dagegen spricht aber, dass mein Switch beim Pingen blinkt - dein Programm darf also durchaus von meinem Rechner aus hinaussenden.
Ich starte später den Rechner neu und probier es nochmal. Vielleicht wars wirklich die Firewall.

[glkgereon]

Zitat von Tubos:

ARP steht für Address Resolution Protocol. Es dient dazu, in LANs die IP-Addresse in eine MAC-Addresse umzuwandeln.
Dabei schickt der Rechner eine Nachricht vom Typ "Wer hat die IP xx", und der entsprechende Rechner antwortet ihm dann.
Du hast Recht - wenn man ARP deaktivieren würde, könnte keiner mehr diesen Rechner erreichen.
Es sei denn, er hat einen statischen ARP-Eintrag mit der entsprechenden MAC-Adresse.
Für mich sieht das so aus, als könnte man das tatsächlich zum Pingen verwenden. Ist mir zuerst gar nicht eingefallen!

Hatte ich das doch richtig im Kopf

kann man das mit Delphi irgendwie nutzen?

[pacman1986]

Arp ist ein Broadcast und ich glaub windows hat probleme damit

[Tubos]

Zitat:

kann man das mit Delphi irgendwie nutzen?

Das weiß ich nicht.
Durch Eingabe von arp -a in der Konsole kann selbst ein unprivilegierter Nutzer alle ARP-Einträge abfragen.
Man könnte also einfach den Rechner, der eine Firewall hat, anpingen. Er antwortet zwar nicht, aber bevor das Ping versendet wird benutzt Windows ARP, um die MAC-Adresse des Rechners zu finden. Dann liest man entweder den ARP-Cache mit entsprechenden API-Funktionen aus, oder - wenn das nicht geht - führt man arp -a aus und schaut nach, ob die gesuchte IP in der AUsgabe vorhanden ist. Das wäre zwar eine unsaubere Lösung, würde aber funktionieren.

Zitat:

Arp ist ein Broadcast und ich glaub windows hat probleme damit

Wenn Windows Probleme mit ARP hätte, könnte man es nicht in TCP/IP LANs verwenden

[pacman1986]

stimmt auch wieder... hmm k hab scheisse gelabert sry

[phXql]

Zitat von pacman1986:

Arp ist ein Broadcast und ich glaub windows hat probleme damit

alles klar...

// edit: Kein roter kasten :/

[Neutral General]

Sieht gut aus.. Und ist ehh.. bissschen besser als mein Ping-Ding

[engine]

Sicher wirst Du jetzt denken, nicht der schon wieder mit seinem 120dpi Font, aber so sieht für mich die Welt aus (siehe Anhang). Mir ist auch klar das ich damit einer Minderheit angehöre. Ist es unter der nonVCL Programmierung schwieriger die Fontgröße zu berücksichtigen als mit VCL?