From 4d2fae4048ad9e0ebe14e6ceb0ba095b7f967327 Mon Sep 17 00:00:00 2001 From: SisMaker <1713699517@qq.com> Date: Tue, 23 Mar 2021 14:36:43 +0800 Subject: [PATCH] =?UTF-8?q?rf:=20=E4=BB=A3=E7=A0=81=E6=95=B4=E7=90=86?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- src/measure/DsTest/utTestDs.erl | 6 +++--- src/measure/DsTestSimple/utSTestDs.erl | 17 ++++++++--------- 2 files changed, 11 insertions(+), 12 deletions(-) diff --git a/src/measure/DsTest/utTestDs.erl b/src/measure/DsTest/utTestDs.erl index 63fe956..e1d69a0 100644 --- a/src/measure/DsTest/utTestDs.erl +++ b/src/measure/DsTest/utTestDs.erl @@ -11,9 +11,9 @@ %-define(V_NUM, [8, 16, 32, 64, 128, 256, 516, 1024, 2048, 4096, 8192, 16384, 32768, 65536, 131072, 524288, 1048576]). -define(V_NUM, [8, 16, 32, 64, 128, 256, 516, 1024, 2048, 4096, 8192, 16384]). -%-define(DsList, [utPdDs, utArrayDs, utTupleDs, utListsDs, utMapsDs, utEtsSetDs, utEtsOrdDs, utDictDs, utGb_treesDs, utSetsDs, utGb_setsDs, utOrddictDs, utOrdsetsDs, utAtomicsDs, utPTermDs, utArrayDs1, utHashBblDs, utHashBblDs1]). +-define(DsList, [utPdDs, utTupleDs, utListsDs, utMapsDs, utEtsSetDs, utEtsOrdDs, utPTermDs, utAtomicsDs, utArrayDs, utArrayDs1, utDictDs, utGb_treesDs, utSetsDs, utGb_setsDs, utOrddictDs, utOrdsetsDs, utHashBblDs, utHashBblDs1, utKhashDs]). %-define(DsList, [utPdDs, utArrayDs, utNifArrayDs, utTupleDs, utListsDs, utMapsDs, utEtsSetDs, utArrayDs1, utHashBblDs, utHashBblDs1, utKhashDs]). --define(DsList, [utPdDs, utArrayDs, utEtsSetDs, utTupleDs, utMapsDs, utSetsDs]). +%-define(DsList, [utPdDs, utArrayDs, utEtsSetDs, utTupleDs, utMapsDs, utSetsDs]). -define(Cnt, 12). @@ -125,7 +125,7 @@ calcAvgS(CntList, Num) -> AvgCnt = ?Cnt - 2, SortList = lists:sort(CntList), AvgList = lists:sublist(SortList, 2, AvgCnt), - float_to_list(lists:sum(AvgList) / AvgCnt / Num, [{decimals, 2}]). + integer_to_list(erlang:trunc(lists:sum(AvgList) / AvgCnt)). calcAvgT([not_support | _], Num) -> <<"notSupport">>; diff --git a/src/measure/DsTestSimple/utSTestDs.erl b/src/measure/DsTestSimple/utSTestDs.erl index 04e2b2c..333c770 100644 --- a/src/measure/DsTestSimple/utSTestDs.erl +++ b/src/measure/DsTestSimple/utSTestDs.erl @@ -11,9 +11,8 @@ %-define(V_NUM, [8, 16, 32, 64, 128, 256, 516, 1024, 2048, 4096, 8192, 16384, 32768, 65536, 131072, 524288, 1048576]). -define(V_NUM, [8, 16, 32, 64, 128, 256, 516, 1024, 2048, 4096, 8192, 16384]). -%-define(DsList, [utPdDs, utArrayDs, utTupleDs, utListsDs, utMapsDs, utEtsSetDs, utEtsOrdDs, utDictDs, utGb_treesDs, utSetsDs, utGb_setsDs, utOrddictDs, utOrdsetsDs, utAtomicsDs, utPTermDs, utArrayDs1, utHashBblDs, utHashBblDs1]). -%-define(DsList, [utPdDs, utArrayDs, utNifArrayDs, utTupleDs, utListsDs, utMapsDs, utEtsSetDs, utArrayDs1, utHashBblDs, utHashBblDs1, utKhashDs]). --define(DsList, [utSPdDs, utSTupleDs, utSMapsDs, utSArrayDs, utSEtsSetDs, utSSetsDs]). +-define(DsList, [utSPdDs, utSTupleDs, utSListsDs, utSMapsDs, utSEtsSetDs, utSEtsOrdDs, utSArrayDs, utSDictDs, utSGb_treesDs, utSSetsDs, utSGb_setsDs, utSOrddictDs, utSOrdsetsDs]). +%-define(DsList, [utSPdDs, utSTupleDs, utSMapsDs, utSArrayDs, utSEtsSetDs, utSSetsDs]). -define(Cnt, 12). @@ -55,7 +54,7 @@ runExe(Num, Ds) -> Update = cvrTUnit(UpdateTU), For = cvrTUnit(ForTU), Delete = cvrTUnit(DeleteTU), - storeStatistics(Ds, Num, Insert, Read, Update, For, Delete), + storeStatistics(Ds, Num, Insert, Read, Update, For, Delete, TermSize), {_, DsName} = lists:split(2, atom_to_list(Ds)), printLog("~-10.s ~8.s ~12.s ~12.s ~10.s ~12.s ~10.s ~14.s ~10.s ~12.s ~12.s ~12.s ~12.s ~n", [DsName, integer_to_list(Num), timeToStr(Insert), calcPer(Insert, Num), timeToStr(Read), calcPer(Read, Num), timeToStr(Update), calcPer(Update, Num), timeToStr(For), calcPer(For, Num), timeToStr(Delete), calcPer(Delete, Num), sizeToStr(TermSize)]); @@ -118,14 +117,14 @@ calcPer(skip, _Num) -> calcPer(Time, Num) -> float_to_list(Time / Num, [{decimals, 2}]) ++ "ns". -calcAvgS([no_zie | _], Num) -> +calcAvgS([no_size | _], Num) -> <<"noSize">>; calcAvgS(CntList, Num) -> %% 去掉最大值与最小值 然后求平均值 AvgCnt = ?Cnt - 2, SortList = lists:sort(CntList), AvgList = lists:sublist(SortList, 2, AvgCnt), - float_to_list(lists:sum(AvgList) / AvgCnt / Num, [{decimals, 2}]). + integer_to_list(erlang:trunc(lists:sum(AvgList) / AvgCnt)). calcAvgT([not_support | _], Num) -> <<"notSupport">>; @@ -138,15 +137,15 @@ calcAvgT(CntList, Num) -> AvgList = lists:sublist(SortList, 2, AvgCnt), float_to_list(lists:sum(AvgList) / AvgCnt / Num, [{decimals, 2}]) ++ "ns". -storeStatistics(Ds, Num, Insert, Read, Update, For, Delete) -> - #tempCnt{insert = InsertList, read = ReadList, update = UpdateList, for = ForList, delete = DeleteList} = +storeStatistics(Ds, Num, Insert, Read, Update, For, Delete, TermSize) -> + #tempCnt{insert = InsertList, read = ReadList, update = UpdateList, for = ForList, delete = DeleteList, size = SizeList} = case erlang:get({Ds, Num}) of undefined -> #tempCnt{}; TempCnt -> TempCnt end, - NewTempCnt = #tempCnt{insert = [Insert | InsertList], read = [Read | ReadList], update = [Update | UpdateList], for = [For | ForList], delete = [Delete | DeleteList]}, + NewTempCnt = #tempCnt{insert = [Insert | InsertList], read = [Read | ReadList], update = [Update | UpdateList], for = [For | ForList], delete = [Delete | DeleteList], size = [TermSize | SizeList]}, erlang:put({Ds, Num}, NewTempCnt). getStatistics(Ds, Num) ->