| summaryrefslogtreecommitdiff |
diff options
Diffstat (limited to 'src/login')
| -rw-r--r-- | src/login/query/lgn_sign_up.erl | 49 |
1 files changed, 2 insertions, 47 deletions
diff --git a/src/login/query/lgn_sign_up.erl b/src/login/query/lgn_sign_up.erl index 4111597..0632ac1 100644 --- a/src/login/query/lgn_sign_up.erl +++ b/src/login/query/lgn_sign_up.erl @@ -54,56 +54,11 @@ register_user (Input) -> Password = Input#input.password, Email = Input#input.email, - UsernameLC = string:lowercase(Username), - EmailLC = string:lowercase(Email), - - shr_janitor:new(login_db, UsernameLC), - shr_janitor:new(login_db, EmailLC), - - ok = shr_database:reserve(login_db, UsernameLC, janitor), - ok = shr_database:reserve(login_db, EmailLC, janitor), - - Player = shr_player:new(<<"">>, Username, Password, Email), - - {ok, PlayerID} = shr_database:insert(player_db, janitor, janitor, Player), - - shr_janitor:new(player_db, PlayerID), - - LoginUpdateQueryOps = - [ - shr_db_query:set_value(PlayerID), - shr_db_query:set_read_permission(any), - shr_db_query:set_write_permission([{user, PlayerID}]) - ], - - PlayerUpdateQueryOps = - [ - shr_db_query:set_field(shr_player:get_id_field(), PlayerID), - shr_db_query:set_read_permission(any), - shr_db_query:set_write_permission([{user, PlayerID}]) - ], - - ok = - shr_database:commit - ( - shr_db_query:new(login_db, UsernameLC, janitor, LoginUpdateQueryOps) - ), - - ok = - shr_database:commit - ( - shr_db_query:new(login_db, EmailLC, janitor, LoginUpdateQueryOps) - ), - - ok = - shr_database:commit - ( - shr_db_query:new(player_db, PlayerID, janitor, PlayerUpdateQueryOps) - ), + GeneratedPlayer = spe_player:generate(Username, Password, Email), #query_state { - player = shr_player:set_id(PlayerID, Player) + player = GeneratedPlayer }. -spec generate_reply(query_state()) -> binary(). |