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

psu_proto: Review and rename send_global to send_0228. Send a message to all processes instead of sending everything from the console process.

Browse Source
This commit is contained in:
Loïc Hoguin 2010-10-09 02:07:02 +02:00
parent b5a2d0e918
commit a8da246467
3 changed files with 17 additions and 29 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/egs.erl
View File

@ -49,12 +49,12 @@ stop() ->
Res.
%% @doc Send a global message.
global(Type, Message) ->
global(Message) ->
if length(Message) > 511 ->
io:format("global: message too long~n");
true ->
{ok, List} = egs_user_model:select(all),
lists:foreach(fun(User) -> psu_proto:send_global(User#egs_user_model.socket, Type, Message) end, List)
lists:foreach(fun(User) -> User#egs_user_model.pid ! {egs, notice, top, Message} end, List)
end.
%% @doc Warp all players to a new map.

3
src/egs_game.erl
View File

@ -36,6 +36,9 @@ info({egs, cast, Command}, #state{gid=GID}) ->
info({egs, chat, ChatTypeID, ChatGID, ChatName, ChatModifiers, ChatMessage}, _State) ->
psu_game:send_0304(ChatTypeID, ChatGID, ChatName, ChatModifiers, ChatMessage);
info({egs, notice, Type, Message}, State) ->
psu_proto:send_0228(Type, 2, Message, State);
%% @doc Inform the client that a player has spawn.
%% @todo Should be something along the lines of 010d 0205 203 201.
info({egs, player_spawn, _Player}, #state{gid=GID}) ->

39
src/psu/psu_proto.erl
View File

@ -1316,6 +1316,18 @@ send_0225(MOTD, CurrentPage, #state{socket=Socket, lid=DestLID}) ->
Length = byte_size(Msg) div 2 + 2,
packet_send(Socket, << 16#02250300:32, DestLID:16/little, 0:272, NbPages:8, CurrentPage:8, Length:16/little, Msg/binary, 0:16 >>).
%% @doc Display a notice on the player's screen.
%% There are four types of notices: dialog, top, scroll and timeout.
%% * dialog: A dialog in the center of the screen, which can be OK'd by players.
%% * top: Horizontal scroll on top of the screen, traditionally used for server-wide messages.
%% * scroll: Vertical scroll on the right of the screen, traditionally used for rare missions obtention messages.
%% * timeout: A dialog in the center of the screen that disappears after Duration seconds.
send_0228(Type, Duration, Message, #state{socket=Socket, gid=DestGID}) ->
TypeInt = case Type of dialog -> 0; top -> 1; scroll -> 2; timeout -> 3 end,
UCS2Message = << << X:8, 0:8 >> || X <- Message >>,
packet_send(Socket, << 16#02280300:32, 16#ffff:16, 0:144, 16#00011300:32, DestGID:32/little, 0:64,
TypeInt:32/little, Duration:32/little, UCS2Message/binary, 0:16 >>).
%% @doc Forward the player to a website. The website will open when the player closes the game. Used for login issues mostly.
send_0231(URL, #state{socket=Socket, gid=DestGID, lid=DestLID}) ->
URLBin = list_to_binary(URL),
@ -1482,33 +1494,6 @@ packet_fragment_send(CSocket, Packet, Size, Current) ->
ssl:send(CSocket, Fragment),
packet_fragment_send(CSocket, Rest, Size, Current + 16#4000).
%% @doc Shortcut for send_global/4.
send_global(CSocket, Type, Message) ->
send_global(CSocket, Type, Message, 2).
%% @doc Send a global message.
%% There are four types of global messages: dialog, top, scroll and timeout.
%% * dialog: A dialog in the center of the screen, which can be OK'd by players.
%% * top: Horizontal scroll on top of the screen, traditionally used for server-wide messages.
%% * scroll: Vertical scroll on the right of the screen, traditionally used for Player X joined the party.
%% * timeout: A dialog in the center of the screen that disappears after Duration seconds.
send_global(CSocket, Type, Message, Duration) ->
TypeID = case Type of
dialog -> 0;
top -> 1;
scroll -> 2;
timeout -> 3;
_ -> 1
end,
UCS2Message = << << X:8, 0:8 >> || X <- Message >>,
try
Packet = << 16#02280300:32, 0:288, TypeID:32/little, Duration:32/little, UCS2Message/binary, 0, 0 >>,
packet_send(CSocket, Packet)
catch
_:_ ->
ignore
end.
%% @doc Keepalive. Just send an empty packet, the game doesn't really care.
%% @todo If there's an actual keepalive command, use it instead.
send_keepalive(CSocket) ->