Difference between revisions of "Unit Services"

procedure ServicesInit;

procedure NTPUpdateTime(Client:TNTPClient);

function SysLogLoggingStart(Logging:PLoggingDevice):LongWord;

function SysLogLoggingStop(Logging:PLoggingDevice):LongWord;

function SysLogLoggingOutput(Logging:PLoggingDevice; const Data:String):LongWord;

function SysLogLoggingOutputEx(Logging:PLoggingDevice; Facility,Severity:LongWord; const Tag,Content:String):LongWord;

function SysLogLoggingGetTarget(Logging:PLoggingDevice):String;

function SysLogLoggingSetTarget(Logging:PLoggingDevice; const Target:String):LongWord;

procedure ServiceLog(Level:LongWord;const AText:String);

procedure ServiceLogInfo(const AText:String);

procedure ServiceLogError(const AText:String);

procedure ServiceLogDebug(const AText:String);

function NTPTimestampToHost(const Timestamp:TNTPTimestamp):TNTPTimestamp;

function NTPTimestampToNetwork(const Timestamp:TNTPTimestamp):TNTPTimestamp;

function NTPTimestampAdd(const Timestamp1,Timestamp2:TNTPTimestamp):TNTPTimestamp;

function NTPTimestampSubtract(const Timestamp1,Timestamp2:TNTPTimestamp):TNTPTimestamp;

function ClockTimeToNTPTimestamp(const Time:Int64):TNTPTimestamp;

function NTPTimestampToClockTime(const Timestamp:TNTPTimestamp):Int64;

function TelnetCommandToString(Command:Byte):String;

function TelnetCommandHasOption(Command:Byte):Boolean;

function TelnetOptionToString(Option:Byte):String;

function FileTimeToSysLogDateTime(const AFileTime:TFileTime):String;

function LoggingFacilityToSysLogFacility(Facility:LongWord):LongWord;

function LoggingSeverityToSysLogSeverity(Severity:LongWord):LongWord;