Brauche Ideen für Zeitmessung zwischen 2 Rechnern

Hallo in die Runde,

ich stehe gerade mal voll auf dem Schlauch und bräuchte eine Idee für die folgende Problemstellung:

Ausgangslage:

• Client auf Rechner A
• Server auf Rechner B
• zwischen beiden findet per TCP ein Datenaustausch statt (ich sende JSONs vom Client zum Server)

Problemstellungen:

• Den Unterschied zwischen der jeweils lokalen Systemzeit feststellen.
  Im Moment sende ich vom Client die Ausgabe von _NowCalc(), führe am Server ebenfalls ein _NowCalc() aus und berechne die Differenz mit _DateDiff
  Das ergibt einen Sekunden genauen Wert.
  Wie könnte ich das auf Millisekunden genau ermitteln? Klar, es wird einen Fehler/Abweichung durch die Laufzeit der TCP-Pakete geben - dazu Punkt 2
• Wie Messe ich die Laufzeit meiner Datenpakete zwischen Client und Server? Würde ich mir z.B. errechnen wenn ich die Differenz aus 1. kenne
• Alternativ: Wie schaffe ich es 2 Funktionen / Befehle auf diesen beiden Rechnern exakt zum gleichen Zeitpunkt zu starten?

Hintergundgeschichte:

Ich baue hier gerade ein "App-Performance-Monitoring" einer Applikation innerhalb einer RDP und/oder Citrix-Sitzung.
Der Server startet auf einem Test-Client die Citrix-Sitzung. In dieser wird der Client gestartet.
Dieser nimmt Verbindung zum Server-teil auf - das ist für mich die gemessene Anmeldezeit / Startzeit für die Sitzung.
Der Client startet dann das Programm des Kunden und führt verschiedene Aktionen durch. Die Laufzeiten ermittelt der Client "lokal".
Nun gibt es einen Zeitunterschied zwischen dem "Fertig" sein und bis man es über die Citrix-Verbindung sieht. Im lokalen Netzwerk nur ein paar duzend Millisekunden - aus den USA ggf. ein paar hundert.
Die "Fertig" Ermittlung mit dem Server-Teil (also über die Citrix-Sitzung) habe ich schon fertig (Optisch über die Farbänderungen der Pixel).
Damit ich diesen Zeitunterschied in Zahlen fassen kann müsste ich entweder den Zeitunterschied kennen - oder unabhängig von der lokalen zeit es schaffen auf beiden Rechnern einen Vorgang zu exakt gleichen Zeit zu starten.

Gruß,

BLinzer

Ich werde es morgen erst einmal mit der Laufzeit der Pakete versuchen,
Ich sende ja per TCP. Sprich wenn das Senden abgeschlossen ist sind auch alle Pakete drüben angekommen - mit Bestätigung.

Den Wert nehme ich dann als Korrektur zum lokalen Zeitvergleich (Vergleich der beiden Systemuhren),
ich werde dann ein paar Tests laufen lassen (Anzahl der Daten, Zeitunterschiede, Versuch etwas Synchron zu starten) und mal sehen was da so rauskommt.

Jetzt lese ich mich erst einmal mehr in das NTP-Protokoll ein und wie der Abgleich funktioniert. Die Tools sagen mir schließlich die lokale, die entfernte Zeit und die Laufzeit für die Abfrage:

root@webserver01:~# ntpq -p
     remote           refid      st t when poll reach   delay   offset  jitter
==============================================================================
 0.ubuntu.pool.n .POOL.          16 p    -   64    0    0.000    0.000   0.000
 1.ubuntu.pool.n .POOL.          16 p    -   64    0    0.000    0.000   0.000
 2.ubuntu.pool.n .POOL.          16 p    -   64    0    0.000    0.000   0.000
 3.ubuntu.pool.n .POOL.          16 p    -   64    0    0.000    0.000   0.000
 ntp.ubuntu.com  .POOL.          16 p    -   64    0    0.000    0.000   0.000
-v.bsod.fr       193.79.237.14    2 u    -   64    1    4.658   -2.854   0.145
-ip139.ip-5-196- 145.238.203.14   2 u    1   64    1    0.369    2.814   0.621
-shattrath.sceen 145.238.203.14   2 u    -   64    1    0.281    1.426   0.167
+sumatra.ordimat 213.251.128.249  2 u    -   64    1    0.357   -0.152   0.134
 yoda.dousse.eu  92.243.6.5       3 u    1   64    1    4.590   -2.825   0.020
-pfsense.berton. 145.238.203.14   2 u    -   64    1   24.792    5.219   0.826
*time.gambitclou 213.251.128.249  2 u    -   64    1    0.400   -0.711   0.045
-ks3357022.kimsu 140.203.204.77   2 u    -   64    1    1.977    1.207   0.144
+ntp-3.arkena.ne 138.96.64.10     2 u    1   64    1    4.296   -1.672   0.067
 62.210.28.176 ( 84.255.209.79    4 u    1   64    1    4.642   -0.604   0.057

Das wäre was ich will ... z.B. das mein Server-Modul als Zeitserver für den Client dient und dieser die Abweichung misst.
Vielleicht kann ich das was nachbauen - oder per AutoIt nativ die Zeitabweichung zu einem festgelegten NTP-Server messen. Gibt ja diverse Beispiele mit AutoIt die Systemzeit zu synchronisieren ...

So, erste Lösung fand ich hier:
https://www.autoitscript.com/forum/topic/14…all-workaround/

Da wird sich die Zeit von einem Webserver geholt.
Mein Test-Skript:

; Zeit von Google:
$site = "www.google.com"
$oHTTP = ObjCreate("winhttp.winhttprequest.5.1")
$oHTTP.Open("GET", "http://" & $site & "/", False)
$oHTTP.Send()
$date = $oHTTP.GetResponseHeader("Date")
MsgBox(0,"Zeit von Google", $date)


; Funktioniert scheinbar mit beliebigen Webservern:
; Apache2 unter Ubuntu 16.04
$site = "znil.net"
$oHTTP = ObjCreate("winhttp.winhttprequest.5.1")
$oHTTP.Open("GET", "http://" & $site & "/", False)
$oHTTP.Send()
$date = $oHTTP.GetResponseHeader("Date")
MsgBox(0,"Zeit von znil.net", $date)


; IIS 8.5 unter Windows Server 2012 R2
$site = "email.linz.email"
$oHTTP = ObjCreate("winhttp.winhttprequest.5.1")
$oHTTP.Open("GET", "http://" & $site & "/", False)
$oHTTP.Send()
$date = $oHTTP.GetResponseHeader("Date")
MsgBox(0,"Zeit von email.linz.email", $date)

Die Laufzeit für die Abfrage kann ich ja problemlos ermitteln.
Ich könnte also den Client und den Server gegen einen beliebigen Webserver die Abweichung zur lokalen Zeit ermitteln lassen,
damit hätten beide eine gemeinsame Referenzquelle ... mit einem möglichen Fehler von einer Sekunde ...

Mit mehren Abfragen hintereinander sollte ich den Wert genauer hinbekommen ... und das nächste Test-Skript ...

Und ich noch einmal.

Ich habe mein Testprogramm soweit verbessert das es den Sekundenwechsel auf dem Webserver treffen sollte.
Dazu wird in einer Schleife die Zeit ständig abgefragt bis es einen Sekundenwechsel gab,
dann startet ein scharfer Lauf bis zum nächsten Sekundenwechsel - der im Idealfall selbst ziemlich genau eine Sekunde braucht.
Dann gibt es eine Meldung über die ermittelten Werte:

; Test Zeitabfrage aus dem Internet
; 2017 BLinz
; Es wird der angebene Webserver in einer Schleife abgefragt bis es einen Sekundenwechsel gab,
; dann erfolgt der scharfe Lauf bis zum nächsten Sekundenwechsel - um eben diesen ziemlich genau zu treffen.
; Die "genaue" Serverzeit sollte dann bei dem letzten Zeitwert minus der durchschnittlichen Laufzeit liegen


Global $sText = "" 		; Antwortext für MsgBox
Global $iTimeDiff1 		; Laufzeit zwischen 2 Sekundenwechseln, im Idealfall sollten 1.000ms dabei herauskommen
Global $iTimeDiff2 = 0	; Hier addieren wir die Laufzeit einer einzelnen Abfrage zusammen, teilen wir durch $iCounter um den Durchschnitt zu erhalten
Global $iTemp			; Temporär - Die Laufzeit des aktuellen Durchlaufs
Global $iCounter = 0	; Hier Zählen wir die Anzahl der notwendigen Durchläufe zwischen 2 Sekundenwechsel
Global $aAnswer			; Array in dem die Antwort des Webservers steht. [7] sind die Sekunden
Global $iSecond			; Hier merken wir uns die vorherige Sekunde um einen Vergleich für den Wechsel zu haben
Global $bPreRun = True	; Wird auf False gesetzt wenn wir den ersten Sekundenwechsel gefunden haben, dann messen wir bis zum 2. Wechsel




; Webseite die wir als Zeitquelle nutzen
Global $site = "www.google.com"
; Abfrage vorbereiten
Global $oHTTP = ObjCreate("winhttp.winhttprequest.5.1")
$oHTTP.Open("GET", "http://" & $site & "/", False)


; Abfrage senden!
$oHTTP.Send()


;Antwort an allen Leerzeichen und Doppelpunkten teilen:
$aAnswer = StringSplit($oHTTP.GetResponseHeader("Date")," :",0)
; In $aAnswer[7] steht die aktuelle Sekunde die wir uns merken
$iSecond = $aAnswer[7]


While 1
	; Timer für den aktuellen Durchlauf starten
	$iTemp = TimerInit()
	; Durchlaufzähler um 1 erhöhen
	$iCounter = $iCounter + 1
	; neue Abfrage starten
	$oHTTP.Send()
	; Zeit des Durchlaufs messen (Der StringSplit braucht 1 bis 2 ms)
	$iTimeDiff2 = $iTimeDiff2 + TimerDiff($iTemp)
	;Antwort an allen Leerzeichen und Doppelpunkten teilen:
	$aAnswer = StringSplit($oHTTP.GetResponseHeader("Date")," :",0)
	; Prüfen ob die Sekunde sich geändert hat
	If $iSecond <> $aAnswer[7] Then
		; Ja, hat sie!
		If $bPreRun = True Then
			; Wir sind noch im Vorlauf, alles für den scharfen Lauf vorbereiten
			; beim nächsten Sekundenwechsel nicht hier abiegen:
			$bPreRun = False
			; Timer für Gesamtzeit (sollte am Ende nahe bei 1 Sekunde liegen)
			$iTimeDiff1 = TimerInit()
			; Durchschnittszähler wieder auf 0
			$iTimeDiff2 = 0
			$iCounter = 0
			; Die Vergleichsekunde auf den Antwortwert setzen, wir wollen ja wieder auf den Sekundenwechsel warten
			$iSecond = $aAnswer[7]
		Else
			; Wir sind nicht mehr im Vorlauf und sollten den Sekundenwechsel erwischt haben
			ExitLoop
		EndIf
	EndIf
WEnd
; Meldung zusammenbauen
$sText = 	"Laufzeit zwischen Sekundenwechsel: " & Round(TimerDiff($iTimeDiff1),2) & "ms" & @CRLF & _
			"Anzahl Durchläufe: " & $iCounter & @CRLF & _
			"Durchschnittliche Abfragezeit: " & Round($iTimeDiff2/$iCounter,2) & "ms" & @CRLF & _
			$oHTTP.GetResponseHeader("Date") & @CRLF
; und ausgeben
MsgBox(0,"Zeiten von Google", $sText)

Beispielausgabe:
[Blockierte Grafik: https://znil.net/images/0/0a/ClipCapIt-170511-220659.PNG][Blockierte Grafik: https://znil.net/images/1/12/ClipCapIt-170511-222855.PNG]

Zitat von chip

Und was machst wenn dein Webserver gerade Schluckauf hat und nicht sofort antwortet? Mir ist auch nicht klar warum nicht direkt in Windows dann den Zeitserver einträgst sodern das, recht unnötigerweise, selbst versuchst nachzupfuschen.

Naja, eigentlich ist der Zeitabgleich zwischen 2 Rechnern das Thema.
Ich setze das nach obiger Grundidee (mehrmals hintereinander abfragen um den Sekundenwechsel zu finden) um,
das Ergebnis werde ich hier posten.

Aber ich kann den hier erst einmal auf "erledigt" setzen.

Zitat von chip

Nochmal die Frage, warum trägst nicht bei beiden Rechnern den gleichen Zeitserver ein. Dann sparst dir den manuellen abgleich.

Weil mir das nicht genau genug ist. Die verschiedenen Programmpunkte brauchen teilweise nur 100 bis 500 ms, da ist mir der Messfehler beim Sekunden genauen Messen zu groß.

Zudem agiert mein Programm als normaler Benutzer, der darf die Uhr nicht stellen. Zudem brauche ich dann eine externe 3. Stelle die auch erreichbar ist (jupp, Domänencontroller geht auch).

Ich habe heute erfolgreich den Zeitabgleich zwischen verschiedenen Rechnern programmiert, ich habe es dabei nach der Methode des NTP Protokolls gemacht, siehe https://www.meinberg.de/german/info/ntp-packet.htm
Damit ermittle ich die Zeitunterschiede direkt zwischen 2 Rechnern. Ich wiederhole das ganze 2 mal da der erste Durchlauf hier im Kundennetzwerk immer länger dauert als die nachfolgenden

Dabei konnte ich aber auch feststellen das nach einem NTP-Abgleich beider Rechner die Abweichung im unteren, zweistelligen Millisekunden-Bereich liegt.
Allerdings sind die Meßpunkte des Kunden (=normale PC's) über die ganze Erdkugel verteilt und nutzen dementsprechend verschiedene Zeitserver / Domänencontroller.

Morgen steht dann "wir starten auf 2 Rechnern etwas gleichzeitig" auf dem Plan (ein Rechner steht in Hamburg, einer in Polen) bzw. Rechner 1 ist Remote mit Rechner 2 verbunden und ich messe wie lange ein Programm auf Rechner 2 braucht und was Rechner 1 dazu aus der entfernen misst (Verzögerung durch Bildaufbau etc.)

Zitat von Bitnugger

Owe... dann hat er gar nichts mehr zu tun... und geht uns vor Langeweile evtl. noch ein...

Immerhin werde ich dafür bezahlt es genau zu machen Und ich trete mit meinen "Programmierer" Wissen gegen ein kommerzielles Produkt an welches eine 6-stellige Summe kosten sollte ... und trotzdem das ganze nicht über eine Citrix-Sitzung konnte.

Zitat von chip

Ohne dir auf die Füße treten zu wollen, aber da wirst du verlieren. Alleine schon weil dir nicht bekannt ist, dass es etwas genaueres als NTP nämlich PTP gibt.

Das habe ich natürlich schon in Erwägung gezogen *hust* aber Millisekunden ist genau genug, Micro- oder Nanosekunden müssen es nicht sein.