summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authornsensfel <SpamShield0@noot-noot.org>2017-11-28 17:14:02 +0100
committernsensfel <SpamShield0@noot-noot.org>2017-11-28 17:14:02 +0100
commitf539b7072c357339328d9bfd54f1f1ed51828586 (patch)
treeb6205dd79c78090831e812aceac177d2a9f35d28 /www/handler/battlemap/load_state.yaws
parent80358376b9300a0d73cb8b62dfa9fdd65240ca66 (diff)
Trying to tidy up this mess.
Diffstat (limited to 'www/handler/battlemap/load_state.yaws')
-rw-r--r--www/handler/battlemap/load_state.yaws123
1 files changed, 0 insertions, 123 deletions
diff --git a/www/handler/battlemap/load_state.yaws b/www/handler/battlemap/load_state.yaws
deleted file mode 100644
index e04fd96..0000000
--- a/www/handler/battlemap/load_state.yaws
+++ /dev/null
@@ -1,123 +0,0 @@
-<erl>
--record(input, {session_token, player_id, battlemap_id, instance_id}).
-
--include("/my/src/tacticians-server/src/timed_cache_data.hrl").
-
-parse_input (Req) ->
- JSONReqMap = jiffy:decode(Req, [return_maps]),
- #input
- {
- session_token = maps:get(<<"session_token">>, JSONReqMap),
- player_id = maps:get(<<"player_id">>, JSONReqMap),
- battlemap_id = maps:get(<<"battlemap_id">>, JSONReqMap),
- instance_id = maps:get(<<"instance_id">>, JSONReqMap)
- }.
-
-generate_set_map (Battlemap) ->
- jiffy:encode
- (
- {
- [
- {<<"width">>, Battlemap#battlemap.width},
- {<<"height">>, Battlemap#battlemap.height},
- {<<"content">>, array:sparse_to_list(Battlemap#battlemap.content)}
- ]
- }
- ).
-
-generate_add_char (Char, CharInstance, BattlemapInstance, PlayerID) ->
- jiffy:encode
- (
- {
- [
- {<<"id">>, Char#character.id},
- {<<"name">>, Char#character.name},
- {<<"icon">>, Char#character.icon},
- {<<"portrait">>, Char#character.portrait},
- {<<"loc_x">>, CharInstance#character_instance.x},
- {<<"loc_y">>, CharInstance#character_instance.y},
- {<<"team">>, CharInstance#character_instance.team},
- {<<"mov_pts">>, Char#character.mov_pts},
- {<<"atk_rg">>, Char#character.atk_rg},
- {
- <<"enabled">>,
- battlemap_instance:can_play_char_instance
- (
- BattlemapInstance,
- PlayerID,
- Char#character.id
- )
- }
- ]
- }
- ).
-
-generate_reply (Battlemap, BattlemapInstance, Characters, PlayerID) ->
- jiffy:encode
- (
- [
- [
- <<"set_map">>,
- generate_set_map(Battlemap)
- ]
- |
- lists:map
- (
- fun ({CharID, CharInstance}) ->
- [
- <<"add_char">>,
- generate_add_char
- (
- CharID,
- CharInstance,
- BattlemapInstance,
- PlayerID
- )
- ]
- end,
- Characters
- )
- ]
- ).
-
-handle (Req) ->
- %%%% Parse
- Input = parse_input(Req),
- %%%% Fetch
- Battlemap = timed_cache:fetch(battlemap_db, Input#input.battlemap_id),
- BattlemapInstance =
- timed_cache:fetch
- (
- battlemap_instance_db,
- <<"0">>
-% {Input#input.battlemap_id, Input#input.battlemap_instance_id}
- ),
- Characters =
- lists:map
- (
- fun ({CharID, CharInst}) ->
- {
- timed_cache:fetch(character_db, CharID),
- CharInst
- }
- end,
- dict:to_list(BattlemapInstance#battlemap_instance.chars)
- ),
- %%%% Calc
- %%%% Commit
- %%%% Reply
- generate_reply
- (
- Battlemap,
- BattlemapInstance,
- Characters,
- Input#input.player_id
- ).
-
-out(A) ->
- {
- content,
- "application/json; charset=UTF-8",
- handle(A#arg.clidata)
- }.
-</erl>