/*
* search-keys-info.c - Source for Jingle info discovery
* Copyright (C) 2008 Collabora Ltd.
* and/or its subsidiaries. All rights reserved.
* @author Ole Andre Vadla Ravnaas <ole.andre.ravnaas@collabora.co.uk>
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or (at your option) any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
*/
#include <string.h>
#include <stdlib.h>
#define DEBUG_FLAG GABBLE_DEBUG_MEDIA
#include "debug.h"
#include "search-keys-info.h"
#include "gabble-error.h"
#include "namespaces.h"
#include "util.h"
#ifdef DEBUG_FLAG
//#define DEBUG(format, ...)
#define DEBUGGING 0
#define NODE_DEBUG(n, s)
#endif /* DEBUG_FLAG */
/**
* get_search_keys_info:
*
* get search keys
*
*/
void
get_search_keys_info (GabbleConnection *conn, const gchar *jid )
{
LmMessage *msg;
LmMessageNode *query_node;
gboolean result;
gchar *service = NULL;
GError *error = NULL;
conn->search_service_jid = g_strdup( jid );
msg= lm_message_new_with_sub_type ( jid,
LM_MESSAGE_TYPE_IQ,
LM_MESSAGE_SUB_TYPE_GET);
query_node = lm_message_node_add_child (msg->node, "query", NULL);
lm_message_node_set_attribute (query_node, "xmlns", NS_SEARCH);
if (!_gabble_connection_send (conn, msg, &error))
{
g_warning ("%s: send failed: %s\n", G_STRFUNC, error->message);
goto OUT;
}
OUT:
if (msg)
lm_message_unref (msg);
if (error)
g_error_free (error);
}
/**
* _gabble_submit_search_form:
*
* Submit search form
*
*/
gboolean
_gabble_submit_search_form (GabbleConnection *conn)
{
LmMessage *msg;
LmMessageNode *query_node;
LmMessageNode *x_node;
LmMessageNode *field_node, *value_node;
gboolean result;
const gchar *jid;
gchar *service = NULL;
GError **error = NULL;
g_message("_gabble_submit_search_form\n");
jid = gabble_handle_inspect (conn->handles, TP_HANDLE_TYPE_CONTACT, conn->self_handle);
g_message("jid is %s\n",jid);
gabble_decode_jid(jid, NULL /*username*/,&service,NULL/*resource*/);
g_message("service is %s\n",service);
msg= lm_message_new_with_sub_type ( service,
LM_MESSAGE_TYPE_IQ,
LM_MESSAGE_SUB_TYPE_SET);
query_node = lm_message_node_add_child (msg->node, "query", NULL);
lm_message_node_set_attribute (query_node, "xmlns", NS_SEARCH);
x_node = lm_message_node_add_child ( query_node, "x", NULL );
lm_message_node_set_attributes (x_node,
"xmlns", NS_X_DATA,
"type", "submit",
NULL);
field_node = lm_message_node_add_child ( x_node, "x", NULL );
lm_message_node_set_attributes (x_node,
"type", "hidden",
"var", "FORM_TYPE",
NULL);
value_node = lm_message_node_get_child(field_node, "value");
lm_message_node_set_value(value_node,"NS_SEARCH");
g_message("_gabble_submit_search_form b4 _gabble_connection_send\n");
result = _gabble_connection_send (conn, msg, error);
lm_message_unref (msg);
if (!result)
return FALSE;
return TRUE;
}
/**
* search_keys_iq_cb
*
* Called by loudmouth when we get an incoming <iq>. This handler
* is concerned only with Requesting Search Keys info queries.
*/
LmHandlerResult
search_keys_iq_cb (LmMessageHandler *handler,
LmConnection *lmconn,
LmMessage *message,
gpointer user_data)
{
GabbleConnection *conn = GABBLE_CONNECTION (user_data);
LmMessageSubType sub_type;
LmMessageNode *query_node, *x_node, *result_node,*x_item_node;
const gchar *str;
const gchar *type, *field_label,*field_var, *field_type;
guint i = 0;
if ( NULL == conn )
{
g_debug ("%s: accesing after dereferenced connection", G_STRFUNC);
return LM_HANDLER_RESULT_ALLOW_MORE_HANDLERS;
}
query_node = lm_message_node_get_child_with_namespace (message->node,
"query", NS_SEARCH);
if (query_node == NULL)
return LM_HANDLER_RESULT_ALLOW_MORE_HANDLERS;
sub_type = lm_message_get_sub_type (message);
if (sub_type != LM_MESSAGE_SUB_TYPE_RESULT)
{
return LM_HANDLER_RESULT_ALLOW_MORE_HANDLERS;
}
if (sub_type == LM_MESSAGE_SUB_TYPE_RESULT)
{
x_node = lm_message_node_get_child_with_namespace (query_node, "x", NS_X_DATA);
if( x_node )
{
//if service supports data forms
result_node = x_node;
type = lm_message_node_get_attribute (x_node, "type" );
if (0 == strcmp (type, "form"))
{
gint filed_count = 0;
for (x_item_node = result_node->children; x_item_node; x_item_node = x_item_node->next)
{
if( 0 == strcmp (x_item_node->name, "field") )
{
filed_count++;
}
}
if(conn->search_key_names == NULL)
{
conn->search_key_names = (gchar**)g_new0( gchar*, filed_count);
}
if(conn->search_key_ht == NULL)
{
conn->search_key_ht = g_hash_table_new_full (g_str_hash, g_str_equal, g_free, g_free);
}
conn->search_form = TRUE;
for (x_item_node = result_node->children; x_item_node; x_item_node = x_item_node->next)
{
// "reported" should also be used to get the types of search result fields
//'g' type currently not supported by dbus-glib-binding
if (0 != strcmp (x_item_node->name, "field")
&& 0 != strcmp (x_item_node->name, "instructions"))
continue;
if( 0 == strcmp (x_item_node->name, "instructions") )
{
//get the instructions
g_message("get the instuction\n");
conn->search_instr = g_strdup( lm_message_node_get_value(x_item_node) );
g_message("after gettting the instuction\n");
continue;
}
if( 0 == strcmp (x_item_node->name, "field") )
{
//node is a field node
//get the name of each field
//type also ..later
field_type = lm_message_node_get_attribute(x_item_node, "type");
if( 0 == strcmp (field_type, "hidden") )
{
//see later if this must be sent while sending request to the server
continue;
}
//get the "type" of the attr as well along with "var"
//to send it to the client later
//dbus-glib-binding tool support 'g' type
field_label = lm_message_node_get_attribute(x_item_node, "label");
g_message("b4 gettting the search_key_names\n");
conn->search_key_names[i] = g_strdup(field_label);
g_message("after gettting the search_key_names\n");
g_message("%s\n",conn->search_key_names[i]);
field_var = lm_message_node_get_attribute(x_item_node, "var");
g_hash_table_insert(conn->search_key_ht,g_strdup(field_label),g_strdup(field_var));
i++;
}
}
conn->search_key_names[i] = NULL;
// this should be done when we need to give the
// search result attributes in advance to the client
// and if we are able to give the type also
}
}
else
{
return LM_HANDLER_RESULT_ALLOW_MORE_HANDLERS;
}
return LM_HANDLER_RESULT_REMOVE_MESSAGE;
}
else if (sub_type == LM_MESSAGE_SUB_TYPE_ERROR)
{
GabbleXmppError xmpp_error = INVALID_XMPP_ERROR;
result_node = lm_message_node_get_child (message->node, "error");
if (result_node)
{
xmpp_error = gabble_xmpp_error_from_node (result_node);
}
str = gabble_xmpp_error_string (xmpp_error);
g_warning ("%s: jingle info error: %s", G_STRFUNC,
(str) ? str : "unknown error");
}
else
{
NODE_DEBUG (message->node, "unknown message sub type");
}
return LM_HANDLER_RESULT_ALLOW_MORE_HANDLERS;
}