| %%% |
| %%% Copyright 2011, Boundary |
| %%% |
| %%% Licensed under the Apache License, Version 2.0 (the "License"); |
| %%% you may not use this file except in compliance with the License. |
| %%% You may obtain a copy of the License at |
| %%% |
| %%% http://www.apache.org/licenses/LICENSE-2.0 |
| %%% |
| %%% Unless required by applicable law or agreed to in writing, software |
| %%% distributed under the License is distributed on an "AS IS" BASIS, |
| %%% WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. |
| %%% See the License for the specific language governing permissions and |
| %%% limitations under the License. |
| %%% |
| |
| |
| %%%------------------------------------------------------------------- |
| %%% File: folsom_sample_none.erl |
| %%% @author joe williams <j@boundary.com> |
| %%% @doc |
| %%% no sampling, just a capped circular buffer |
| %%% @end |
| %%%----------------------------------------------------------------- |
| |
| -module(folsom_sample_none). |
| |
| -export([ |
| new/1, |
| update/2, |
| get_values/1 |
| ]). |
| |
| -include("folsom.hrl"). |
| |
| new(Size) -> |
| #none{size = Size}. |
| |
| update(#none{reservoir = []} = Sample, Value) -> |
| Sample#none{reservoir = [Value]}; |
| update(#none{size = Size, reservoir = Reservoir} = Sample, Value) when length(Reservoir) < Size -> |
| Sample#none{reservoir = lists:append(Reservoir, [Value])}; |
| update(#none{reservoir = Reservoir} = Sample, Value) -> |
| NewReservoir = [Value | drop_last(Reservoir)], |
| Sample#none{reservoir = NewReservoir}. |
| |
| get_values(#none{reservoir = Reservoir}) -> |
| Reservoir. |
| |
| % internal api |
| |
| drop_last([_]) -> |
| []; |
| drop_last([H|T]) -> |
| [H | drop_last(T)]. |