static void xmpp_iq_gameroom_open_cb ( const char *msg,
enum xmpp_msg_type type,
void *args )
{
/* Answer :
<iq to='masterserver@warface/pve_2' type='get'>
<query xmlns='urn:cryonline:k01'>
<data query_name='gameroom_open' compressedData='...'
originalSize='42'/>
</query>
</iq>
*/
struct cb_args *a = ( struct cb_args * ) args;
if ( type & XMPP_TYPE_ERROR )
{
free ( a );
return;
}
session.gameroom.joined = 1;
/* Leave previous room if any */
if ( session.gameroom.jid != NULL )
{
xmpp_presence ( session.gameroom.jid, 1, NULL, NULL );
free ( session.gameroom.group_id );
session.gameroom.group_id = NULL;
free ( session.gameroom.jid );
session.gameroom.jid = NULL;
}
xmpp_iq_player_status ( STATUS_ONLINE | STATUS_ROOM );
char *data = wf_get_query_content ( msg );
char *room = get_info ( data, "room_id='", "'", "Room ID" );
free ( data );
if ( room )
{
/* Join XMPP room */
char *room_jid;
FORMAT ( room_jid, "*****@*****.**", session.online.channel, room );
xmpp_presence ( room_jid, 0, NULL, NULL );
session.gameroom.jid = room_jid;
}
if ( a->fun != NULL )
a->fun ( room, a->args );
free ( room );
free ( a );
}
static void xmpp_iq_gameroom_on_kicked_cb ( const char *msg_id,
const char *msg,
void *args )
{
/* Answer
<iq from='masterserver@warface/pvp_pro_4' type='get'>
<query xmlns='urn:cryonline:k01'>
<gameroom_on_kicked reason='1'/>
</query>
</iq>
*/
if ( strstr ( msg, "from='masterserver@warface" ) == NULL )
return;
#ifdef DBUS_API
dbus_api_emit_room_kicked ( );
#endif /* DBUS_API */
session.gameroom.joined = 0;
xmpp_iq_player_status ( STATUS_ONLINE | STATUS_LOBBY );
xmpp_presence ( session.gameroom.jid, 1, NULL, NULL );
free ( session.gameroom.group_id );
session.gameroom.group_id = NULL;
free ( session.gameroom.jid );
session.gameroom.jid = NULL;
}
static void xmpp_iq_gameroom_join_cb(const char *msg, void *args)
{
/* Answer :
<iq to='masterserver@warface/pve_2' type='get'>
<query xmlns='urn:cryonline:k01'>
<data query_name='gameroom_join' compressedData='...'
originalSize='42'/>
</query>
</iq>
*/
struct cb_args *a = (struct cb_args *) args;
if (!xmpp_is_error(msg))
{
session.ingameroom = 1;
/* Leave previous room if any */
if (session.gameroom_jid != NULL)
{
xmpp_presence(session.gameroom_jid, 1, NULL, NULL);
free(session.gameroom_jid);
session.gameroom_jid = NULL;
}
/* Join XMPP room */
char *room_jid;
FORMAT(room_jid, "*****@*****.**",
a->channel, a->room_id);
xmpp_presence(room_jid, 0, NULL, NULL);
session.gameroom_jid = room_jid;
/* Change public status */
xmpp_iq_player_status(STATUS_ONLINE | STATUS_ROOM);
/* Reset current team */
session.curr_team = 1;
}
free(a->room_id);
free(a->channel);
free(a);
}
/*
** DBus method call: "ChatRoomLeave"
*/
gboolean on_handle_chat_room_leave(Warfacebot *object,
GDBusMethodInvocation *invocation,
const gchar *arg_Jid)
{
xmpp_presence(arg_Jid, XMPP_PRESENCE_LEAVE, NULL, NULL);
warfacebot_complete_chat_room_leave(object, invocation);
return TRUE;
}
static void xmpp_iq_gameroom_on_kicked_cb(const char *msg_id,
const char *msg,
void *args)
{
/* Answer
<iq from='masterserver@warface/pvp_pro_4' type='get'>
<query xmlns='urn:cryonline:k01'>
<gameroom_on_kicked reason='1'/>
</query>
</iq>
*/
xmpp_iq_player_status(STATUS_ONLINE | STATUS_LOBBY);
xmpp_presence(session.room_jid, 1);
}
static void xmpp_iq_gameroom_open_cb(const char *msg,
enum xmpp_msg_type type,
void *args)
{
/* Answer :
<iq to='masterserver@warface/pve_2' type='get'>
<query xmlns='urn:cryonline:k01'>
<data query_name='gameroom_open' compressedData='...'
originalSize='42'/>
</query>
</iq>
*/
struct cb_args *a = (struct cb_args *) args;
if (type & XMPP_TYPE_ERROR)
{
int code = get_info_int(msg, "code='", "'", NULL);
int custom_code = get_info_int(msg, "custom_code='", "'", NULL);
const char *reason = NULL;
switch (code)
{
case 1006:
reason = "QoS limit reached";
break;
case 8:
switch (custom_code)
{
case 0: /* Expired mission, update and try again */
if (++a->tries < 2)
{
struct mission *m =
mission_list_get_by_key(a->mission_key);
if (m != NULL)
{
a->mission_name = strdup(m->name);
mission_list_update(
_open_updated_list,
args);
return;
}
}
reason = "Expired missions";
break;
case 1:
reason = "Invalid or expired mission";
break;
case 12:
reason = "Rank restricted";
break;
case 21:
reason = "Invalid room name";
break;
default:
break;
}
break;
default:
break;
}
if (reason != NULL)
eprintf("Failed to open room (%s)\n", reason);
else
eprintf("Failed to open room (%i:%i)\n", code, custom_code);
}
else
{
char *data = wf_get_query_content(msg);
if (data == NULL)
{
free(a);
return;
}
/* Leave previous room if any */
if (session.gameroom.jid != NULL)
{
xmpp_presence(session.gameroom.jid, XMPP_PRESENCE_LEAVE, NULL, NULL);
free(session.gameroom.group_id);
session.gameroom.group_id = NULL;
free(session.gameroom.jid);
session.gameroom.jid = NULL;
gameroom_sync_free();
}
char *room = get_info(data, "room_id='", "'", "Room ID");
if (room != NULL)
{
/* Join XMPP room */
char *room_jid;
FORMAT(room_jid, "*****@*****.**",
session.online.channel, room);
xmpp_presence(room_jid, XMPP_PRESENCE_JOIN, NULL, NULL);
session.gameroom.jid = room_jid;
/* Reset auto-ready */
session.gameroom.desired_status = GAMEROOM_READY;
gameroom_sync_init();
gameroom_sync(data);
status_set(STATUS_ONLINE | STATUS_ROOM);
}
if (a->fun != NULL)
a->fun(room, a->args);
free(room);
free(data);
}
free(a->mission_name);
a->mission_name = NULL;
free(a->mission_key);
a->mission_key = NULL;
free(a);
}
static void
dissect_xmpp(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree) {
xml_frame_t *xml_frame;
gboolean out_packet;
conversation_t *conversation;
xmpp_conv_info_t *xmpp_info;
proto_tree *xmpp_tree = NULL;
proto_item *xmpp_item = NULL;
xmpp_element_t *packet = NULL;
/*check if desegment
* now it checks that last char is '>',
* TODO checks that first element in packet is closed*/
int indx;
gchar last_char;
if (xmpp_desegment)
{
indx = tvb_reported_length(tvb) - 1;
if (indx >= 0)
{
last_char = tvb_get_guint8(tvb, indx);
while ((last_char <= ' ') && (indx - 1 >= 0))
{
indx--;
last_char = tvb_get_guint8(tvb, indx);
}
if ((indx >= 0) && (last_char != '>'))
{
pinfo->desegment_len = DESEGMENT_ONE_MORE_SEGMENT;
return;
}
}
}
col_set_str(pinfo->cinfo, COL_PROTOCOL, "XMPP");
col_clear(pinfo->cinfo, COL_INFO);
conversation = find_or_create_conversation(pinfo);
xmpp_info = (xmpp_conv_info_t *)conversation_get_proto_data(conversation, proto_xmpp);
if (xmpp_info && xmpp_info->ssl_proceed &&
xmpp_info->ssl_proceed < pinfo->fd->num)
{
call_dissector(ssl_handle, tvb, pinfo, tree);
return;
}
/*if tree == NULL then xmpp_item and xmpp_tree will also NULL*/
xmpp_item = proto_tree_add_item(tree, proto_xmpp, tvb, 0, -1, ENC_NA);
xmpp_tree = proto_item_add_subtree(xmpp_item, ett_xmpp);
call_dissector(xml_handle, tvb, pinfo, xmpp_tree);
/* If XML dissector is disabled, we can't do much */
if (!proto_is_protocol_enabled(find_protocol_by_id(dissector_handle_get_protocol_index(xml_handle))))
{
col_append_str(pinfo->cinfo, COL_INFO, "(XML dissector disabled, can't dissect XMPP)");
expert_add_info_format(pinfo, xmpp_item, PI_UNDECODED, PI_WARN, "XML dissector disabled, can't dissect XMPP");
return;
}
/*if stream end occurs then return*/
if(xmpp_stream_close(xmpp_tree,tvb, pinfo))
{
if(xmpp_tree)
xmpp_proto_tree_hide_first_child(xmpp_tree);
return;
}
if(!pinfo->private_data)
return;
/*data from XML dissector*/
xml_frame = ((xml_frame_t*)pinfo->private_data)->first_child;
if(!xml_frame)
return;
if (!xmpp_info) {
xmpp_info = se_new(xmpp_conv_info_t);
xmpp_info->req_resp = se_tree_create_non_persistent(EMEM_TREE_TYPE_RED_BLACK, "xmpp_req_resp");
xmpp_info->jingle_sessions = se_tree_create_non_persistent(EMEM_TREE_TYPE_RED_BLACK, "xmpp_jingle_sessions");
xmpp_info->ibb_sessions = se_tree_create_non_persistent(EMEM_TREE_TYPE_RED_BLACK, "xmpp_ibb_sessions");
xmpp_info->gtalk_sessions = se_tree_create_non_persistent(EMEM_TREE_TYPE_RED_BLACK, "xmpp_gtalk_sessions");
xmpp_info->ssl_start = 0;
xmpp_info->ssl_proceed = 0;
conversation_add_proto_data(conversation, proto_xmpp, (void *) xmpp_info);
}
if (pinfo->match_uint == pinfo->destport)
out_packet = TRUE;
else
out_packet = FALSE;
while(xml_frame)
{
packet = xmpp_xml_frame_to_element_t(xml_frame, NULL, tvb);
DISSECTOR_ASSERT(packet);
if (strcmp(packet->name, "iq") == 0) {
xmpp_iq_reqresp_track(pinfo, packet, xmpp_info);
xmpp_jingle_session_track(pinfo, packet, xmpp_info);
xmpp_gtalk_session_track(pinfo, packet, xmpp_info);
}
if (strcmp(packet->name, "iq") == 0 || strcmp(packet->name, "message") == 0) {
xmpp_ibb_session_track(pinfo, packet, xmpp_info);
}
if (tree) { /* we are being asked for details */
proto_item *outin_item;
if (out_packet)
outin_item = proto_tree_add_boolean(xmpp_tree, hf_xmpp_out, tvb, 0, 0, TRUE);
else
outin_item = proto_tree_add_boolean(xmpp_tree, hf_xmpp_in, tvb, 0, 0, TRUE);
PROTO_ITEM_SET_HIDDEN(outin_item);
/*it hides tree generated by XML dissector*/
xmpp_proto_tree_hide_first_child(xmpp_tree);
if (strcmp(packet->name, "iq") == 0) {
xmpp_iq(xmpp_tree, tvb, pinfo, packet);
} else if (strcmp(packet->name, "presence") == 0) {
xmpp_presence(xmpp_tree, tvb, pinfo, packet);
} else if (strcmp(packet->name, "message") == 0) {
xmpp_message(xmpp_tree, tvb, pinfo, packet);
} else if (strcmp(packet->name, "auth") == 0) {
xmpp_auth(xmpp_tree, tvb, pinfo, packet);
} else if (strcmp(packet->name, "challenge") == 0) {
xmpp_challenge_response_success(xmpp_tree, tvb, pinfo, packet, hf_xmpp_challenge, ett_xmpp_challenge, "CHALLENGE");
} else if (strcmp(packet->name, "response") == 0) {
xmpp_challenge_response_success(xmpp_tree, tvb, pinfo, packet, hf_xmpp_response, ett_xmpp_response, "RESPONSE");
} else if (strcmp(packet->name, "success") == 0) {
xmpp_challenge_response_success(xmpp_tree, tvb, pinfo, packet, hf_xmpp_success, ett_xmpp_success, "SUCCESS");
} else if (strcmp(packet->name, "failure") == 0) {
xmpp_failure(xmpp_tree, tvb, pinfo, packet);
} else if (strcmp(packet->name, "xml") == 0) {
xmpp_xml_header(xmpp_tree, tvb, pinfo, packet);
} else if (strcmp(packet->name, "stream") == 0) {
xmpp_stream(xmpp_tree, tvb, pinfo, packet);
} else if (strcmp(packet->name, "features") == 0) {
xmpp_features(xmpp_tree, tvb, pinfo, packet);
} else if (strcmp(packet->name, "starttls") == 0) {
xmpp_starttls(xmpp_tree, tvb, pinfo, packet, xmpp_info);
}else if (strcmp(packet->name, "proceed") == 0) {
xmpp_proceed(xmpp_tree, tvb, pinfo, packet, xmpp_info);
}else {
xmpp_proto_tree_show_first_child(xmpp_tree);
expert_add_info_format(pinfo, xmpp_tree, PI_UNDECODED, PI_NOTE, "Unknown packet: %s", packet->name);
col_clear(pinfo->cinfo, COL_INFO);
col_append_fstr(pinfo->cinfo, COL_INFO, "UNKNOWN PACKET ");
}
/*appends to COL_INFO information about src or dst*/
if (pinfo->match_uint == pinfo->destport) {
xmpp_attr_t *to = xmpp_get_attr(packet, "to");
if (to)
col_append_fstr(pinfo->cinfo, COL_INFO, "> %s ", to->value);
} else {
xmpp_attr_t *from = xmpp_get_attr(packet, "from");
if (from)
col_append_fstr(pinfo->cinfo, COL_INFO, "< %s ", from->value);
}
}
xmpp_element_t_tree_free(packet);
xml_frame = xml_frame->next_sibling;
}
}
static void leave_room_cb_(void *r, void *args)
{
xmpp_presence(((struct room *) r)->jid, 1, NULL, NULL);
}
