mORMot and Open Source friends
Check-in [609a27477c]
Check-in [609a27477c]
Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
| Comment: | fixed time log file rotation to run each hour instead of once a day, after the first trigger |
|---|---|
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
609a27477ca1d59a76312b158d4e14ed |
| User & Date: | User 2014-09-09 15:36:14 |
|
2014-09-10
| ||
| 07:17 | added the possibility to use the hexadecimal session value for GET ModelRoot/auth?UserName=...&SessionHex=... method-based service to release a session and also added TSQLRestServerURIContext.InputHexaOrVoid[] property check-in: 24954e1126 user: User tags: trunk | |
|
2014-09-09
| ||
| 15:36 | fixed time log file rotation to run each hour instead of once a day, after the first trigger check-in: 609a27477c user: User tags: trunk | |
| 15:26 | documentation update mainly about new features in logging, e.g. cross-platform logging, remote logging and new fixed time log file rotation check-in: 577de174f3 user: User tags: trunk | |
Changes to SynCommons.pas.
42431 42432 42433 42434 42435 42436 42437 42438 42439 42440 42441 42442 42443 42444 42445 |
procedure TSynLog.LogTrailerUnLock(Level: TSynLogInfo);
begin
try
if Level in fFamily.fLevelStackTrace then
AddStackTrace(nil);
fWriter.AddEndOfLine(fCurrentLevel);
if (fFileRotationNextHour<>0) and (GetTickCount64>=fFileRotationNextHour) then begin
inc(fFileRotationNextHour,(1000*60*60));
PerformRotation;
end else
if (fFileRotationSize>0) and (fWriter.fTotalFileSize>fFileRotationSize) then
PerformRotation;
finally
LeaveCriticalSection(fThreadLock);
end;
|
| |
42431 42432 42433 42434 42435 42436 42437 42438 42439 42440 42441 42442 42443 42444 42445 |
procedure TSynLog.LogTrailerUnLock(Level: TSynLogInfo);
begin
try
if Level in fFamily.fLevelStackTrace then
AddStackTrace(nil);
fWriter.AddEndOfLine(fCurrentLevel);
if (fFileRotationNextHour<>0) and (GetTickCount64>=fFileRotationNextHour) then begin
inc(fFileRotationNextHour,MSecsPerDay);
PerformRotation;
end else
if (fFileRotationSize>0) and (fWriter.fTotalFileSize>fFileRotationSize) then
PerformRotation;
finally
LeaveCriticalSection(fThreadLock);
end;
|