[doldaconnect.git] / clients / gtk2 / hublist-xml.c

/*
 *  Dolda Connect - Modular multiuser Direct Connect-style client
 *  Copyright (C) 2007 Fredrik Tolf <fredrik@dolda2000.com>
 *  
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *  
 *  This program 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 General Public License for more details.
 *  
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
*/

#include <stdlib.h>
#include <string.h>
#include <doldaconnect/utils.h>
#include <gtk/gtk.h>

/* "Programming with libxml2 is like the thrilling embrace of an
 * exotic strangler."
 *    --Me */
#include <libxml/parser.h>
#include <libxml/tree.h>

#ifdef HAVE_CONFIG_H
#include <config.h>
#endif
#include "dolcon.h"
#include "hublist.h"

static xmlNodePtr findnode(xmlNodePtr node, char *name)
{
    for(; node != NULL; node = node->next)
    {
	if(!strcmp((char *)node->name, name))
	    break;
    }
    return(node);
}

static int checkvalid(xmlNodePtr n)
{
    int match;
    char *name, *descr;
    
    name = (char *)xmlGetProp(n, (xmlChar *)"Name");
    descr = (char *)xmlGetProp(n, (xmlChar *)"Description");
    match = validhub(name, descr, NULL);
    xmlFree(name);
    if(descr != NULL)
	xmlFree(descr);
    return(match);
}

int pubhubxmlhandler(int op, char *buf, size_t len)
{
    static xmlParserCtxtPtr ctxt = NULL;
    int i, o;
    xmlNodePtr dr, r, cr, c, n;
    int numcols, *cols, sortcol;
    GType type, *types;
    char **names, *name, *stype, *attr;
    GtkListStore *model;
    GtkTreeIter iter;
    
    numcols = 0;
    names = NULL;
    types = NULL;
    switch(op)
    {
    case PHO_INIT:
	break;
    case PHO_DATA:
	if(ctxt == NULL) {
	    ctxt = xmlCreatePushParserCtxt(NULL, NULL, buf, len, NULL);
	    if(ctxt == NULL)
		return(-1);
	} else {
	    xmlParseChunk(ctxt, buf, len, 0);
	}
	return(len);
    case PHO_EOF:
	if(ctxt == NULL)
	{
	    msgbox(GTK_MESSAGE_WARNING, GTK_BUTTONS_OK, _("A hub list could not be read from the server"));
	    break;
	}
	xmlParseChunk(ctxt, NULL, 0, 1);
	if(!ctxt->wellFormed)
	{
	    msgbox(GTK_MESSAGE_ERROR, GTK_BUTTONS_OK, _("The hub list is not valid"));
	    break;
	}
	dr = r = cr = NULL;
	dr = xmlDocGetRootElement(ctxt->myDoc);
	if(dr != NULL)
	    r = findnode(dr->children, "Hubs");
	if(r != NULL)
	    cr = findnode(r->children, "Columns");
	if(cr == NULL)
	{
	    msgbox(GTK_MESSAGE_WARNING, GTK_BUTTONS_OK, _("The hub list cannot be understood"));
	    break;
	}
	for(c = findnode(cr->children, "Column"); c != NULL; c = findnode(c->next, "Column"))
	{
	    name = (char *)xmlGetProp(c, (xmlChar *)"Name");
	    stype = (char *)xmlGetProp(c, (xmlChar *)"Type");
	    type = G_TYPE_INVALID;
	    if(stype != NULL)
	    {
		if(!strcmp(stype, "string"))
		    type = G_TYPE_STRING;
		else if(!strcmp(stype, "int"))
		    type = G_TYPE_INT;
		else if(!strcmp(stype, "percent"))
		    type = G_TYPE_INT;
		else if(!strcmp(stype, "bytes"))
		    type = G_TYPE_INT64;
	    }
	    if((name != NULL) && (type != G_TYPE_INVALID))
	    {
		names = srealloc(names, (numcols + 1) * sizeof(*names));
		types = srealloc(types, (numcols + 1) * sizeof(*names));
		names[numcols] = sstrdup(name);
		types[numcols] = type;
		numcols++;
	    }
	    if(name != NULL)
		xmlFree(name);
	    if(stype != NULL)
		xmlFree(stype);
	}
	if(numcols == 0)
	{
	    msgbox(GTK_MESSAGE_WARNING, GTK_BUTTONS_OK, _("The hub list did not contain any columns"));
	    break;
	}
	for(i = 0; i < numcols; i++)
	{
	    if(!strcasecmp(names[i], "Address"))
	    {
		for(o = i; o > 0; o--) {
		    name = names[o];
		    type = types[o];
		    names[o] = names[o - 1];
		    types[o] = types[o - 1];
		    names[o - 1] = name;
		    types[o - 1] = type;
		}
		break;
	    }
	}
	if(i == numcols)
	{
	    msgbox(GTK_MESSAGE_WARNING, GTK_BUTTONS_OK, _("The hub list did not contain the address to any hubs"));
	    break;
	}
	model = gtk_list_store_newv(numcols, types);
	for(n = findnode(r->children, "Hub"); n != NULL; n = findnode(n->next, "Hub"))
	{
	    if(!xmlHasProp(n, (xmlChar *)"Address") || !xmlHasProp(n, (xmlChar *)"Name"))
		continue;
	    if(!checkvalid(n))
		continue;
	    gtk_list_store_append(model, &iter);
	    for(i = 0; i < numcols; i++)
	    {
		attr = (char *)xmlGetProp(n, (xmlChar *)names[i]);
		if(attr != NULL)
		{
		    if(!strcmp(names[i], "Address")) {
			if(!strncmp(attr, "dchub://", 8))
			    gtk_list_store_set(model, &iter, i, attr + 8, -1);
			else
			    gtk_list_store_set(model, &iter, i, attr, -1);
		    } else if(types[i] == G_TYPE_STRING) {
			gtk_list_store_set(model, &iter, i, attr, -1);
		    } else if(types[i] == G_TYPE_INT) {
			gtk_list_store_set(model, &iter, i, atoi(attr), -1);
		    } else if(types[i] == G_TYPE_INT64) {
			gtk_list_store_set(model, &iter, i, strtoll(attr, NULL, 0), -1);
		    }
		    xmlFree(attr);
		}
	    }
	}
	cols = smalloc((numcols - 1) * sizeof(*cols));
	for(i = 1; i < numcols; i++)
	    cols[i - 1] = i;
	sortcol = 0;
	for(i = 0; i < numcols; i++)
	{
	    if(!strcmp(names[i], "Users"))
		sortcol = i;
	}
	setpubhubmodel(GTK_TREE_MODEL(model), sortcol, numcols - 1, cols, names + 1);
	free(cols);
	g_object_unref(model);
	break;
    case PHO_FINI:
	if(ctxt != NULL)
	{
	    if(ctxt->myDoc != NULL)
		xmlFreeDoc(ctxt->myDoc);
	    xmlFreeParserCtxt(ctxt);
	    ctxt = NULL;
	}
	break;
    }
    if(numcols != 0)
    {
	for(i = 0; i < numcols; i++)
	    free(names[i]);
	free(names);
	free(types);
    }
    return(0);
}
Commit	Line	Data
0d04e87e FT	1	/*
0d04e87e FT	2	* Dolda Connect - Modular multiuser Direct Connect-style client
302a2600	3	* Copyright (C) 2007 Fredrik Tolf <fredrik@dolda2000.com>
0d04e87e FT	4	*
	5	* This program is free software; you can redistribute it and/or modify
	6	* it under the terms of the GNU General Public License as published by
	7	* the Free Software Foundation; either version 2 of the License, or
	8	* (at your option) any later version.
	9	*
	10	* This program is distributed in the hope that it will be useful,
	11	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	12	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	13	* GNU General Public License for more details.
	14	*
	15	* You should have received a copy of the GNU General Public License
	16	* along with this program; if not, write to the Free Software
	17	* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
	18	*/
	19
	20	#include <stdlib.h>
	21	#include <string.h>
	22	#include <doldaconnect/utils.h>
	23	#include <gtk/gtk.h>
	24
	25	/* "Programming with libxml2 is like the thrilling embrace of an
	26	* exotic strangler."
	27	* --Me */
	28	#include <libxml/parser.h>
	29	#include <libxml/tree.h>
	30
	31	#ifdef HAVE_CONFIG_H
	32	#include <config.h>
	33	#endif
	34	#include "dolcon.h"
	35	#include "hublist.h"
	36
	37	static xmlNodePtr findnode(xmlNodePtr node, char *name)
	38	{
	39	for(; node != NULL; node = node->next)
	40	{
	41	if(!strcmp((char *)node->name, name))
	42	break;
	43	}
	44	return(node);
	45	}
	46
	47	static int checkvalid(xmlNodePtr n)
	48	{
	49	int match;
	50	char name, descr;
	51
	52	name = (char )xmlGetProp(n, (xmlChar )"Name");
	53	descr = (char )xmlGetProp(n, (xmlChar )"Description");
	54	match = validhub(name, descr, NULL);
	55	xmlFree(name);
	56	if(descr != NULL)
	57	xmlFree(descr);
	58	return(match);
	59	}
	60
	61	int pubhubxmlhandler(int op, char *buf, size_t len)
	62	{
	63	static xmlParserCtxtPtr ctxt = NULL;
c3b5c7fd	64	int i, o;
0d04e87e FT	65	xmlNodePtr dr, r, cr, c, n;
	66	int numcols, *cols, sortcol;
	67	GType type, *types;
	68	char *names, name, stype, attr;
	69	GtkListStore *model;
	70	GtkTreeIter iter;
	71
	72	numcols = 0;
	73	names = NULL;
	74	types = NULL;
	75	switch(op)
	76	{
	77	case PHO_INIT:
	78	break;
	79	case PHO_DATA:
	80	if(ctxt == NULL) {
	81	ctxt = xmlCreatePushParserCtxt(NULL, NULL, buf, len, NULL);
	82	if(ctxt == NULL)
	83	return(-1);
	84	} else {
	85	xmlParseChunk(ctxt, buf, len, 0);
	86	}
	87	return(len);
	88	case PHO_EOF:
	89	if(ctxt == NULL)
	90	{
	91	msgbox(GTK_MESSAGE_WARNING, GTK_BUTTONS_OK, _("A hub list could not be read from the server"));
	92	break;
	93	}
	94	xmlParseChunk(ctxt, NULL, 0, 1);
	95	if(!ctxt->wellFormed)
	96	{
	97	msgbox(GTK_MESSAGE_ERROR, GTK_BUTTONS_OK, _("The hub list is not valid"));
	98	break;
	99	}
	100	dr = r = cr = NULL;
	101	dr = xmlDocGetRootElement(ctxt->myDoc);
	102	if(dr != NULL)
	103	r = findnode(dr->children, "Hubs");
	104	if(r != NULL)
	105	cr = findnode(r->children, "Columns");
	106	if(cr == NULL)
	107	{
	108	msgbox(GTK_MESSAGE_WARNING, GTK_BUTTONS_OK, _("The hub list cannot be understood"));
	109	break;
	110	}
	111	for(c = findnode(cr->children, "Column"); c != NULL; c = findnode(c->next, "Column"))
	112	{
	113	name = (char )xmlGetProp(c, (xmlChar )"Name");
	114	stype = (char )xmlGetProp(c, (xmlChar )"Type");
	115	type = G_TYPE_INVALID;
	116	if(stype != NULL)
	117	{
	118	if(!strcmp(stype, "string"))
	119	type = G_TYPE_STRING;
	120	else if(!strcmp(stype, "int"))
	121	type = G_TYPE_INT;
d8813d88 FT	122	else if(!strcmp(stype, "percent"))
d8813d88 FT	123	type = G_TYPE_INT;
0d04e87e FT	124	else if(!strcmp(stype, "bytes"))
	125	type = G_TYPE_INT64;
	126	}
	127	if((name != NULL) && (type != G_TYPE_INVALID))
	128	{
	129	names = srealloc(names, (numcols + 1) * sizeof(*names));
	130	types = srealloc(types, (numcols + 1) * sizeof(*names));
	131	names[numcols] = sstrdup(name);
	132	types[numcols] = type;
	133	numcols++;
	134	}
	135	if(name != NULL)
	136	xmlFree(name);
	137	if(stype != NULL)
	138	xmlFree(stype);
	139	}
	140	if(numcols == 0)
	141	{
	142	msgbox(GTK_MESSAGE_WARNING, GTK_BUTTONS_OK, _("The hub list did not contain any columns"));
	143	break;
	144	}
	145	for(i = 0; i < numcols; i++)
	146	{
c3b5c7fd	147	if(!strcasecmp(names[i], "Address"))
0d04e87e	148	{
c3b5c7fd FT	149	for(o = i; o > 0; o--) {
	150	name = names[o];
	151	type = types[o];
	152	names[o] = names[o - 1];
	153	types[o] = types[o - 1];
	154	names[o - 1] = name;
	155	types[o - 1] = type;
	156	}
0d04e87e FT	157	break;
	158	}
	159	}
	160	if(i == numcols)
	161	{
	162	msgbox(GTK_MESSAGE_WARNING, GTK_BUTTONS_OK, _("The hub list did not contain the address to any hubs"));
	163	break;
	164	}
	165	model = gtk_list_store_newv(numcols, types);
	166	for(n = findnode(r->children, "Hub"); n != NULL; n = findnode(n->next, "Hub"))
	167	{
	168	if(!xmlHasProp(n, (xmlChar )"Address") \|\| !xmlHasProp(n, (xmlChar )"Name"))
	169	continue;
	170	if(!checkvalid(n))
	171	continue;
	172	gtk_list_store_append(model, &iter);
	173	for(i = 0; i < numcols; i++)
	174	{
	175	attr = (char )xmlGetProp(n, (xmlChar )names[i]);
	176	if(attr != NULL)
	177	{
f079b169 FT	178	if(!strcmp(names[i], "Address")) {
	179	if(!strncmp(attr, "dchub://", 8))
	180	gtk_list_store_set(model, &iter, i, attr + 8, -1);
	181	else
	182	gtk_list_store_set(model, &iter, i, attr, -1);
	183	} else if(types[i] == G_TYPE_STRING) {
0d04e87e	184	gtk_list_store_set(model, &iter, i, attr, -1);
f079b169	185	} else if(types[i] == G_TYPE_INT) {
0d04e87e	186	gtk_list_store_set(model, &iter, i, atoi(attr), -1);
f079b169	187	} else if(types[i] == G_TYPE_INT64) {
0d04e87e	188	gtk_list_store_set(model, &iter, i, strtoll(attr, NULL, 0), -1);
f079b169	189	}
0d04e87e FT	190	xmlFree(attr);
	191	}
	192	}
	193	}
	194	cols = smalloc((numcols - 1) * sizeof(*cols));
	195	for(i = 1; i < numcols; i++)
	196	cols[i - 1] = i;
	197	sortcol = 0;
	198	for(i = 0; i < numcols; i++)
	199	{
	200	if(!strcmp(names[i], "Users"))
	201	sortcol = i;
	202	}
	203	setpubhubmodel(GTK_TREE_MODEL(model), sortcol, numcols - 1, cols, names + 1);
	204	free(cols);
	205	g_object_unref(model);
	206	break;
	207	case PHO_FINI:
	208	if(ctxt != NULL)
	209	{
	210	if(ctxt->myDoc != NULL)
	211	xmlFreeDoc(ctxt->myDoc);
	212	xmlFreeParserCtxt(ctxt);
	213	ctxt = NULL;
	214	}
	215	break;
	216	}
	217	if(numcols != 0)
	218	{
	219	for(i = 0; i < numcols; i++)
	220	free(names[i]);
	221	free(names);
	222	free(types);
	223	}
	224	return(0);
	225	}