riak / src / riak_vnode_sidekick.erl

%% This file is provided to you 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
%% KIND, either express or implied.  See the License for the
%% specific language governing permissions and limitations
%% under the License.    


-export([init/1, handle_event/3, handle_sync_event/4,
         handle_info/3, terminate/3, code_change/4]).

-define(TIMEOUT, 60000).     % poll time for normal operation
-define(LONGTIMEOUT, 120000). % if a vnode-merkle exchange in progress

-record(state, {vnode,idx,counter}).

% The vnode sidekick notices when a vnode is not "home"
% (when it is serving as an imperfect recipient of puts)
% and if it is not home and the home node is reachable,
% the sidekick initiates handoff.

start(VNode,Idx) ->
    gen_fsm:start(?MODULE, [VNode,Idx], []).
init([VNode,Idx]) ->
    StateData = #state{vnode=VNode,idx=Idx,counter=0},

home(timeout, StateData=#state{vnode=VNode,idx=Idx,counter=Count}) ->
    {ok, MyRing} = riak_ring_manager:get_my_ring(),
    Me = node(),
    case riak_ring:index_owner(MyRing, Idx) of
        Me ->
            gen_server2:cast(VNode, activate),
            case Count > 9 of
                true ->
                    gen_server2:cast(VNode, cache_purge),
                false ->
        _ ->

not_home(timeout, StateData=#state{vnode=VNode,idx=Idx}) ->
    {ok, MyRing} = riak_ring_manager:get_my_ring(),
    TargetNode = riak_ring:index_owner(MyRing, Idx),
    Me = node(),
    case TargetNode of % just in case we took ownership
        Me -> {next_state,home,StateData,?TIMEOUT}; 
        _ -> 
            case net_adm:ping(TargetNode) of
                pang -> {next_state,not_home,StateData,?TIMEOUT};
                pong ->
                    ObjList = gen_server2:call(VNode, list, 60000),
                    case ObjList of
                        [] ->
                            gen_server2:cast(VNode, {rexit, "sidekick"}),
                        _ -> 
                            gen_server2:cast(VNode, deactivate),
                            Merk = make_merk(VNode, Idx, ObjList),
                            gen_server:cast({riak_vnode_master, TargetNode},
                                            {vnode_merkle, {VNode,Idx,Merk}}),

make_merk(VNode, Idx, ObjList) ->
    riak_eventer:notify(riak_vnode_sidekick, merkle_prep, Idx),
    merkerl:build_tree([{K,crypto:sha(V)} || {K,{ok,V}} <- 
                        [{K,gen_server2:call(VNode, {get_binary, K})} ||
                           K <- ObjList]]).

%% @private
code_change(_OldVsn, StateName, State, _Extra) -> {ok, StateName, State}.

%% @private
handle_event(_Event, _StateName, StateData) ->

%% @private
handle_sync_event(_Event, _From, _StateName, StateData) ->

%% @private
handle_info(vnode_shutdown, _StateName, StateData) ->

%% @private
terminate(_Reason, _StateName, _State) -> ok.
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for ProjectModifiedEvent.java.
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.