From 15725caf30a564d33868bf2dccb2c98ea5eb34eb Mon Sep 17 00:00:00 2001 From: Matthias Schiffer Date: Sat, 2 Oct 2010 02:58:44 +0200 Subject: Added some debug output --- src/core/ephraim_conn.erl | 3 +++ src/core/ephraim_gui.erl | 2 +- src/core/ephraim_roster.erl | 3 ++- 3 files changed, 6 insertions(+), 2 deletions(-) (limited to 'src/core') diff --git a/src/core/ephraim_conn.erl b/src/core/ephraim_conn.erl index 6a34599..1ac5236 100644 --- a/src/core/ephraim_conn.erl +++ b/src/core/ephraim_conn.erl @@ -42,10 +42,12 @@ loop(State) -> exmpp_session:stop(State#conn_state.session); #received_packet{packet_type=presence, raw_packet=Packet} -> + %io:format("Received packet ~p~n", [Packet]), ephraim ! {roster, {presence, Packet}}, loop(State); #received_packet{packet_type=message, raw_packet=Packet} -> + %io:format("Received packet ~p~n", [Packet]), From = exmpp_xml:get_attribute(Packet, from, <<"unknown">>), HasElement = exmpp_xml:has_element(Packet,'http://jabber.org/protocol/pubsub#event',event), if HasElement -> @@ -56,6 +58,7 @@ loop(State) -> loop(State); #received_packet{packet_type=iq, raw_packet=Packet} -> + %io:format("Received packet ~p~n", [Packet]), From = exmpp_stanza:get_sender(Packet), IQ = exmpp_iq:xmlel_to_iq(Packet), ephraim ! {receive_iq, From, IQ}, diff --git a/src/core/ephraim_gui.erl b/src/core/ephraim_gui.erl index 8ee56b8..b049da3 100644 --- a/src/core/ephraim_gui.erl +++ b/src/core/ephraim_gui.erl @@ -3,7 +3,7 @@ -spec init() -> ok. init() -> - {jid,JID} = ephraim_config:get(jid), + %{jid,JID} = ephraim_config:get(jid), Port = open_port({spawn_executable, "ephraim-gtk"}, [binary, nouse_stdio, {packet, 4}]), ephraim ! {register_ui, self()}, loop(Port), diff --git a/src/core/ephraim_roster.erl b/src/core/ephraim_roster.erl index 362b788..502497f 100644 --- a/src/core/ephraim_roster.erl +++ b/src/core/ephraim_roster.erl @@ -190,6 +190,7 @@ loop(Roster) -> ok; {presence, Packet} -> + %io:format("ephraim_roster: Presence: ~p~n", [Packet]), From = exmpp_xml:get_attribute(Packet, from, <<"unknown">>), Priority = exmpp_presence:get_priority(Packet), @@ -214,6 +215,6 @@ loop(Roster) -> loop(Roster); Msg -> - %io:format("ephraim_roster: ~p~n", [Msg]), + io:format("ephraim_roster: ~p~n", [Msg]), loop(Roster) end. -- cgit v1.2.3