Difference between revisions of "TNTPClient"

From Ultibo.org
Jump to: navigation, search
(Created page with "Return to Unit Services __TOC__ === Description === ---- ''To be documented'' === Class definitions === ---- <div class="toccolours mw-collapsible mw-...")
 
 
(2 intermediate revisions by the same user not shown)
Line 47: Line 47:
 
| <code>FRetryTimeout:LongWord;</code>
 
| <code>FRetryTimeout:LongWord;</code>
 
| How long to wait between poll retries (in milliseconds)
 
| How long to wait between poll retries (in milliseconds)
 +
|-
 +
|colspan="2"|&nbsp;
 +
|-
 +
| <code>FUseClockOffset:Boolean;</code>
 +
| Use the calculated NTP clock offset to update the local time
 +
|-
 +
| <code>FClockTolerance:LongWord;</code>
 +
| Milliseconds difference between local and remote to trigger a clock set
 
|-
 
|-
 
|colspan="2"|&nbsp;
 
|colspan="2"|&nbsp;
Line 55: Line 63:
 
| <code>FInitialClockCount:LongWord;</code>
 
| <code>FInitialClockCount:LongWord;</code>
 
| How many times have we tried to obtain the initial clock
 
| How many times have we tried to obtain the initial clock
 +
|-
 +
| <code>FInitialClockRetry:Boolean;</code>
 +
| Should the client setup a worker thread to retry until the initial clock has been set (Default: True)
 
|-
 
|-
 
|colspan="2"|&nbsp;
 
|colspan="2"|&nbsp;
Line 83: Line 94:
 
|-
 
|-
 
| <code>procedure SetRetryTimeout(ARetryTimeout:LongWord);</code>
 
| <code>procedure SetRetryTimeout(ARetryTimeout:LongWord);</code>
 +
| &nbsp;
 +
|-
 +
|colspan="2"|&nbsp;
 +
|-
 +
| <code>procedure SetUseClockOffset(AUseClockOffset:Boolean);</code>
 +
| &nbsp;
 +
|-
 +
| <code>procedure SetClockTolerance(AClockTolerance:LongWord);</code>
 
| &nbsp;
 
| &nbsp;
 
|-
 
|-
Line 112: Line 131:
 
|-
 
|-
 
| <code>property RetryTimeout:LongWord read FRetryTimeout write SetRetryTimeout;</code>
 
| <code>property RetryTimeout:LongWord read FRetryTimeout write SetRetryTimeout;</code>
 +
| &nbsp;
 +
|-
 +
|colspan="2"|&nbsp;
 +
|-
 +
| <code>property UseClockOffset:Boolean read FUseClockOffset write SetUseClockOffset;</code>
 +
| &nbsp;
 +
|-
 +
| <code>property ClockTolerance:LongWord read FClockTolerance write SetClockTolerance;</code>
 
| &nbsp;
 
| &nbsp;
 
|-
 
|-
Line 120: Line 147:
 
|-
 
|-
 
| <code>property InitialClockCount:LongWord read FInitialClockCount write SetInitialClockCount;</code>
 
| <code>property InitialClockCount:LongWord read FInitialClockCount write SetInitialClockCount;</code>
 +
| &nbsp;
 +
|-
 +
| <code>property InitialClockRetry:Boolean read FInitialClockRetry write SetInitialClockRetry;</code>
 
| &nbsp;
 
| &nbsp;
 
|-
 
|-
Line 135: Line 165:
 
|-
 
|-
 
| <code>procedure IncrementInitialClockCount;</code>
 
| <code>procedure IncrementInitialClockCount;</code>
 +
| &nbsp;
 +
|-
 +
|colspan="2"|&nbsp;
 +
|-
 +
| <code>function FormatTime(Time:Int64):String;</code>
 +
| &nbsp;
 +
|-
 +
| <code>function FormatOffset(Offset:Int64):String;</code>
 +
| &nbsp;
 +
|-
 +
|colspan="2"|&nbsp;
 +
|-
 +
| <code>function CalculateClockOffset(T1,T2,T3,T4:Int64):Int64;</code>
 +
| &nbsp;
 +
|-
 +
| <code>function CalculateRoundtripDelay(T1,T2,T3,T4:Int64):Int64;</code>
 
| &nbsp;
 
| &nbsp;
 
|-
 
|-
Line 231: Line 277:
 
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
<pre style="border: 0; padding-bottom:0px;">procedure TNTPClient.SetRetryTimeout(ARetryTimeout:LongWord);</pre>
 
<pre style="border: 0; padding-bottom:0px;">procedure TNTPClient.SetRetryTimeout(ARetryTimeout:LongWord);</pre>
 +
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
 +
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 +
{| class="wikitable" style="font-size: 14px; background: white;"
 +
|-
 +
! Note
 +
| None documented
 +
|-
 +
|}
 +
</div></div>
 +
<br />
 +
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 +
<pre style="border: 0; padding-bottom:0px;">procedure TNTPClient.SetUseClockOffset(AUseClockOffset:Boolean);</pre>
 +
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
 +
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 +
{| class="wikitable" style="font-size: 14px; background: white;"
 +
|-
 +
! Note
 +
| None documented
 +
|-
 +
|}
 +
</div></div>
 +
<br />
 +
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 +
<pre style="border: 0; padding-bottom:0px;">procedure TNTPClient.SetClockTolerance(AClockTolerance:LongWord);</pre>
 
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
 
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
 
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
Line 255: Line 325:
 
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
<pre style="border: 0; padding-bottom:0px;">procedure TNTPClient.SetInitialClockCount(AInitialClockCount:LongWord);</pre>
 
<pre style="border: 0; padding-bottom:0px;">procedure TNTPClient.SetInitialClockCount(AInitialClockCount:LongWord);</pre>
 +
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
 +
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 +
{| class="wikitable" style="font-size: 14px; background: white;"
 +
|-
 +
! Note
 +
| None documented
 +
|-
 +
|}
 +
</div></div>
 +
<br />
 +
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 +
<pre style="border: 0; padding-bottom:0px;">procedure TNTPClient.SetInitialClockRetry(AInitialClockRetry:Boolean);</pre>
 
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
 
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
 
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
Line 297: Line 379:
 
! Note
 
! Note
 
| None documented
 
| None documented
 +
|-
 +
|}
 +
</div></div>
 +
<br />
 +
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 +
<pre style="border: 0; padding-bottom:0px;">function TNTPClient.FormatTime(Time:Int64):String;</pre>
 +
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
 +
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 +
{| class="wikitable" style="font-size: 14px; background: white;"
 +
|-
 +
! Note
 +
| None documented
 +
|-
 +
|}
 +
</div></div>
 +
<br />
 +
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 +
<pre style="border: 0; padding-bottom:0px;">function TNTPClient.FormatOffset(Offset:Int64):String;</pre>
 +
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
 +
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 +
{| class="wikitable" style="font-size: 14px; background: white;"
 +
|-
 +
! Note
 +
| None documented
 +
|-
 +
|}
 +
</div></div>
 +
<br />
 +
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 +
<pre style="border: 0; padding-bottom:0px;">function TNTPClient.CalculateClockOffset(T1,T2,T3,T4:Int64):Int64;</pre>
 +
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
 +
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 +
{| class="wikitable" style="font-size: 14px; background: white;"
 +
|-
 +
! Note
 +
| T1 = Originate Timestamp (time request sent by client) T2 = Receive Timestamp (time request received by server) T3 = Transmit Timestamp (time reply sent by server) T4 = Destination Timestamp (time reply received by client)
 +
|-
 +
|}
 +
</div></div>
 +
<br />
 +
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 +
<pre style="border: 0; padding-bottom:0px;">function TNTPClient.CalculateRoundtripDelay(T1,T2,T3,T4:Int64):Int64;</pre>
 +
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
 +
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 +
{| class="wikitable" style="font-size: 14px; background: white;"
 +
|-
 +
! Note
 +
| T1 = Originate Timestamp (time request sent by client) T2 = Receive Timestamp (time request received by server) T3 = Transmit Timestamp (time reply sent by server) T4 = Destination Timestamp (time reply received by client)
 
|-
 
|-
 
|}
 
|}

Latest revision as of 06:04, 13 September 2022

Return to Unit Services


Description

To be documented

Class definitions


[Expand]

TNTPClient = class(TWinsock2UDPClient)


Function declarations


[Expand] 
constructor TNTPClient.Create;
Description: To be documented


[Expand] 
destructor TNTPClient.Destroy;
Description: To be documented


[Expand] 
function TNTPClient.AcquireLock:Boolean;
Description: To be documented


[Expand] 
function TNTPClient.ReleaseLock:Boolean;
Description: To be documented


[Expand] 
procedure TNTPClient.SetPollInterval(APollInterval:LongWord);
Description: To be documented


[Expand] 
procedure TNTPClient.SetPollTimeout(APollTimeout:LongWord);
Description: To be documented


[Expand] 
procedure TNTPClient.SetPollRetries(APollRetries:LongWord);
Description: To be documented


[Expand] 
procedure TNTPClient.SetRetryTimeout(ARetryTimeout:LongWord);
Description: To be documented


[Expand] 
procedure TNTPClient.SetUseClockOffset(AUseClockOffset:Boolean);
Description: To be documented


[Expand] 
procedure TNTPClient.SetClockTolerance(AClockTolerance:LongWord);
Description: To be documented


[Expand] 
procedure TNTPClient.SetInitialClockGet(AInitialClockGet:Boolean);
Description: To be documented


[Expand] 
procedure TNTPClient.SetInitialClockCount(AInitialClockCount:LongWord);
Description: To be documented


[Expand] 
procedure TNTPClient.SetInitialClockRetry(AInitialClockRetry:Boolean);
Description: To be documented


[Expand] 
procedure TNTPClient.SetTimerHandle(ATimerHandle:TTimerHandle);
Description: To be documented


[Expand] 
function TNTPClient.GetTime:Int64;
Description: To be documented


[Expand] 
procedure TNTPClient.IncrementInitialClockCount;
Description: To be documented


[Expand] 
function TNTPClient.FormatTime(Time:Int64):String;
Description: To be documented


[Expand] 
function TNTPClient.FormatOffset(Offset:Int64):String;
Description: To be documented


[Expand] 
function TNTPClient.CalculateClockOffset(T1,T2,T3,T4:Int64):Int64;
Description: To be documented


[Expand] 
function TNTPClient.CalculateRoundtripDelay(T1,T2,T3,T4:Int64):Int64;
Description: To be documented


Return to Unit Reference

Retrieved from "https://ultibo.org/mediawiki_ultibo_org/index.php?title=TNTPClient&oldid=5460"