kvs_user.erl 926 B

1234567891011121314151617181920212223242526
  1. -module(kvs_user).
  2. -copyright('Synrc Research Center s.r.o.').
  3. -include("user.hrl").
  4. -include("config.hrl").
  5. -include("state.hrl").
  6. -include("metainfo.hrl").
  7. -compile(export_all).
  8. metainfo() ->
  9. #schema{name=kvs,tables=[
  10. #table{name=user2,container=feed,fields=record_info(fields,user2)},
  11. #table{name=user,container=feed,fields=record_info(fields,user),
  12. keys=[facebook_id,googleplus_id,twitter_id,github_id]}
  13. ]}.
  14. handle_notice([kvs_user, user, registered], {_,_,#user{id=Who}=U}, #state{owner=Who}=State)->
  15. kvs:info(?MODULE,"[kvs_user] process registration: ~p", [U]),
  16. {noreply, State};
  17. handle_notice([kvs_user, user, Owner, delete], [#user{}=U], #state{owner=Owner}=State) ->
  18. kvs:info(?MODULE,"[kvs_user] delete user: ~p", [U]),
  19. {noreply, State};
  20. handle_notice(_Route, _Message, State) ->
  21. kvs:info(?MODULE,"[kvs_user] unknown notice."),
  22. {noreply, State}.