diff --git a/docs/STARTUP_OPTIONS.md b/docs/STARTUP_OPTIONS.md index c15bdef..6214c88 100644 --- a/docs/STARTUP_OPTIONS.md +++ b/docs/STARTUP_OPTIONS.md @@ -21,7 +21,7 @@ If there are smaller objects then lookups within a Journal may get faster if eac - excessive CPU use and related performance impacts during rolling of CDB files, see log `CDB07`; - excessive load caused during journal compaction despite tuning down `max_run_length`. -If the store is used to hold bigger objects, the `max_journalsize` may be scaled up accordingly. Having fewer Journal files (by using larger objects), will reduce the lookup time to find the right Journal during GET requests, but in most circumstances the impact of this improvement is marginal. +If the store is used to hold bigger objects, the `max_journalsize` may be scaled up accordingly. Having fewer Journal files (by using larger objects), will reduce the lookup time to find the right Journal during GET requests, but in most circumstances the impact of this improvement is marginal. The primary impact of fewer Journal files is the decision-making time of Journal compaction (the time to calculate if a compaction should be undertaken, then what should be compacted) will increase. The timing for making compaction calculations can be monitored through log `IC003`. ## Ledger Cache Size diff --git a/src/leveled_iclerk.erl b/src/leveled_iclerk.erl index ed7a8f3..9614825 100644 --- a/src/leveled_iclerk.erl +++ b/src/leveled_iclerk.erl @@ -217,6 +217,10 @@ handle_cast({compact, Checker, InitiateFun, CloseFun, FilterFun, Inker, _TO}, State) -> % Empty the waste folder clear_waste(State), + SW = os:timestamp(), + % Clock to record the time it takes to calculate the potential for + % compaction + % Need to fetch manifest at start rather than have it be passed in % Don't want to process a queued call waiting on an old manifest [_Active|Manifest] = leveled_inker:ink_getmanifest(Inker), @@ -233,6 +237,7 @@ handle_cast({compact, Checker, InitiateFun, CloseFun, FilterFun, Inker, _TO}, case score_run(BestRun0, ScoreParams) of Score when Score > 0.0 -> BestRun1 = sort_run(BestRun0), + leveled_log:log_timer("IC003", [Score, true], SW), print_compaction_run(BestRun1, ScoreParams), ManifestSlice = compact_files(BestRun1, CDBopts, @@ -258,7 +263,7 @@ handle_cast({compact, Checker, InitiateFun, CloseFun, FilterFun, Inker, _TO}, {noreply, State} end; Score -> - leveled_log:log("IC003", [Score]), + leveled_log:log_timer("IC003", [Score, false], SW), ok = leveled_inker:ink_compactioncomplete(Inker), ok = CloseFun(FilterServer), {noreply, State} diff --git a/src/leveled_log.erl b/src/leveled_log.erl index 0df0aeb..a08d97b 100644 --- a/src/leveled_log.erl +++ b/src/leveled_log.erl @@ -296,7 +296,8 @@ {"IC002", {info, "Clerk updating Inker as compaction complete of ~w files"}}, {"IC003", - {info, "No compaction run as highest score=~w"}}, + {info, "Scoring of compaction runs complete with highest score=~w " + ++ "and run to be made=~w"}}, {"IC004", {info, "Score for filename ~s is ~w"}}, {"IC005",