Sancaros/egs
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

psu_proto: Review send_0d05 and move it to psu_proto.

Browse Source
This commit is contained in:
Loïc Hoguin 2010-09-03 23:26:29 +02:00
parent 116ec3201a
commit 4532169f1e
2 changed files with 11 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
src/psu/psu_game.erl
View File

@ -123,8 +123,9 @@ process_event({system_key_auth_request, AuthGID, AuthKey}) ->
log("auth success"), log("auth success"),
LID = 1 + mnesia:dirty_update_counter(counters, lobby, 1) rem 1023, LID = 1 + mnesia:dirty_update_counter(counters, lobby, 1) rem 1023,
Time = calendar:datetime_to_gregorian_seconds(calendar:universal_time()), Time = calendar:datetime_to_gregorian_seconds(calendar:universal_time()),
egs_user_model:write(#egs_user_model{id=AuthGID, pid=self(), socket=CSocket, state=authenticated, time=Time, folder=User#egs_user_model.folder, lid=LID}), NewUser = #egs_user_model{id=AuthGID, pid=self(), socket=CSocket, state=authenticated, time=Time, folder=User#egs_user_model.folder, lid=LID},
send_0d05(), egs_user_model:write(NewUser),
psu_proto:send_0d05(NewUser),
?MODULE:char_select(); ?MODULE:char_select();
_ -> _ ->
log("quit, auth failed"), log("quit, auth failed"),
@ -1379,15 +1380,6 @@ send_0d03(Data0, Data1, Data2, Data3) ->
Status2:8/unsigned-integer, 0:48, Char2/binary, 0:520, Status2:8/unsigned-integer, 0:48, Char2/binary, 0:520,
Status3:8/unsigned-integer, 0:48, Char3/binary, 0:512 >>). Status3:8/unsigned-integer, 0:48, Char3/binary, 0:512 >>).
%% @doc Send the character flags list. This is the whole list of available values, not the character's.
%% Sent without fragmentation on official for unknown reasons. Do the same here.
send_0d05() ->
{ok, Flags} = file:read_file("p/flags.bin"),
GID = get(gid),
Packet = << 16#0d050300:32, 0:32, 16#00011300:32, GID:32/little-unsigned-integer, 0:64, 16#00011300:32, GID:32/little-unsigned-integer, 0:64, Flags/binary >>,
Size = 4 + byte_size(Packet),
ssl:send(get(socket), << Size:32/little-unsigned-integer, Packet/binary >>).
%% @todo Add a character (NPC or real) to the party members on the right of the screen. %% @todo Add a character (NPC or real) to the party members on the right of the screen.
%% @todo NPCid is 65535 for normal characters. %% @todo NPCid is 65535 for normal characters.
%% @todo Apparently the 4 location ids are set to 0 when inviting an NPC in the lobby - NPCs have their location set to 0 when in lobby; also odd value before PartyPos related to missions %% @todo Apparently the 4 location ids are set to 0 when inviting an NPC in the lobby - NPCs have their location set to 0 when in lobby; also odd value before PartyPos related to missions

8
src/psu/psu_proto.erl
View File

@ -1056,6 +1056,14 @@ send_0c00(DestUser) ->
16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32,
16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32 >>). 16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32, 16#ffffffff:32 >>).
%% @doc Send the character flags list. This is the whole list of available values, not the character's.
%% Sent without fragmentation on official for unknown reasons. Do the same here.
send_0d05(DestUser) ->
#egs_user_model{id=DestGID, socket=DestSocket} = DestUser,
{ok, Flags} = file:read_file("p/flags.bin"),
Packet = << 16#0d050300:32, 0:32, 16#00011300:32, DestGID:32/little, 0:64, 16#00011300:32, DestGID:32/little, 0:64, Flags/binary >>,
Size = 4 + byte_size(Packet),
ssl:send(DestSocket, << Size:32/little, Packet/binary >>).