/*
 * This program parses the XML data provided by sourceforge to extract the
 * list of "attached files" (which are not themselves included in the XML
 * stream and therefore need to be seperately downloaded for archiving).
 */

#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <libxml/xmlmemory.h>
#include <libxml/parser.h>

struct artifact_type {
    char *name;
    int id;
} artifact_types[] = {
    "Bugs",		109746,
    "Support Requests",	209746,
    "Patches",		309746,
    "Feature Requests",	359746,
};

#ifndef NO_ELEMS
#define NO_ELEMS(array)	(sizeof(array)/sizeof(*(array)))
#endif

void parse_history(xmlDocPtr doc,const xmlChar *artifact_id,
  const xmlChar *artifact_type,xmlNodePtr node)
{
    xmlNodePtr field,cur;
    xmlAttrPtr attr;
    xmlChar *name=NULL;
    xmlChar *field_name=NULL;
    xmlChar *text;
    int file_id,i;
    for(field=node->xmlChildrenNode;field;field=field->next)
	if (!xmlStrcmp(field->name,(const xmlChar *)"field"))
	{
	    for(attr=field->properties;attr;attr=attr->next)
		if (!xmlStrcmp(attr->name,(const xmlChar *)"name"))
		{
		    name=xmlNodeListGetString(doc,attr->children,1);
		    if (!xmlStrcmp(name,(const xmlChar *)"field_name"))
			field_name=xmlNodeListGetString(doc,field->children,1);
		    if (!xmlStrcmp(field_name,(const xmlChar *)"File Added") &&
		      !xmlStrcmp(name,(const xmlChar *)"old_value"))
		    {
			text=xmlNodeListGetString(doc,field->children,1);
			if (sscanf(text,"%d",&file_id)==1)
			{
			    for(i=NO_ELEMS(artifact_types)-1;i>=0;i--)
				if (!strcmp(artifact_types[i].name,
				  (const char *)artifact_type))
				    break;
			    if (i>=0)
				printf("%d %s %d\n",
				  artifact_types[i].id,artifact_id,file_id);
			    else
				fprintf(stderr,
				  "Warning: Unknown artifact type \"%s\" - "
				  "attached file %s ignored\n",
				  artifact_type,text);
			}
			xmlFree(text);
		    }
		    xmlFree(name);
		}
	}
    if (field_name)
	xmlFree(field_name);
}

void parse_artifact(xmlDocPtr doc,xmlNodePtr node)
{
    xmlNodePtr field,cur;
    xmlAttrPtr attr;
    xmlChar *name=NULL;
    xmlChar *id=NULL;
    xmlChar *type=NULL;
    xmlChar *text;
    for(field=node->xmlChildrenNode;field;field=field->next)
	if (!xmlStrcmp(field->name,(const xmlChar *)"field"))
	{
	    for(attr=field->properties;attr;attr=attr->next)
		if (!xmlStrcmp(attr->name,(const xmlChar *)"name"))
		{
		    name=xmlNodeListGetString(doc,attr->children,1);
		    if (!xmlStrcmp(name,(const xmlChar *)"artifact_id"))
			id=xmlNodeListGetString(doc,field->children,1);
		    if (!xmlStrcmp(name,(const xmlChar *)"artifact_type"))
			type=xmlNodeListGetString(doc,field->children,1);
		}
	    if (!xmlStrcmp(name,(const xmlChar *)"artifact_history"))
		for(cur=field->xmlChildrenNode;cur;cur=cur->next)
		    if (!xmlStrcmp(cur->name,"history"))
			parse_history(doc,id,type,cur);
	    if (name)
	    {
		xmlFree(name);
		name=NULL;
	    }
	}
    if (id)
	xmlFree(id);
    if (type)
	xmlFree(type);
}

int main(int argc,char **argv)
{
    xmlDocPtr doc;
    xmlNodePtr cur;
    doc=xmlParseFile(argv[1]);
    if (!doc)
    {
	fprintf(stderr,"Document not parsed successfully.\n");
	exit(1);
    }
    cur=xmlDocGetRootElement(doc);
    if (!cur)
    {
	fprintf(stderr,"Empty document.\n");
	xmlFreeDoc(doc);
	exit(1);
    }
    if (xmlStrcmp(cur->name,(const xmlChar *)"project_export"))
    {
	fprintf(stderr,"%s does not appear to be a project export document.\n",
	  argv[1]);
	xmlFreeDoc(doc);
	exit(1);
    }
    for(cur=cur->xmlChildrenNode;cur;cur=cur->next)
	if (!xmlStrcmp(cur->name,(const xmlChar *)"artifacts"))
	    break;
    if (!cur)
    {
	fprintf(stderr,"%s does not appear to contain an artifacts node.\n",
	  argv[1]);
	xmlFreeDoc(doc);
	exit(1);
    }
    for(cur=cur->xmlChildrenNode;cur;cur=cur->next)
	if (!xmlStrcmp(cur->name,(const xmlChar *)"artifact"))
	    parse_artifact(doc,cur);
    xmlFreeDoc(doc);
    exit(0);
}