<?php
/*
Plugin Name: OPML Community Server Integration
Plugin URI: http://dsl.myelin.co.nz/wpopml/
Description: Adds XML-RPC functions so the OPML Editor can connect to Wordpress
Author: Phillip Pearson
Version: 0.01
Author URI: http://www.myelin.co.nz/post/
*/ 

/* GPL.  Bits taken from wp-admin/link-parse-opml.php. */

function opml_startElement($parser, $tagName, $attrs) {
    global $parsed_opml;

    if ($tagName == 'OUTLINE') {
        if ($attrs["TYPE"] == "link") {
            $parsed_opml[] = array($attrs["TEXT"], $attrs["URL"]);
        }
    }
}

function opml_endElement($parser, $tagName) {
}


function opml_xmlrpc_savefile($args)
{
    global $wpdb, $current_user;

    list($blogid, $username, $password, $path, $opml) = $args;

//    $f = fopen("/var/www/external/wpopml/wp-content/opmldebug.txt", "wt");
//    fwrite($f, "blogid $blogid username $username password $password\npath $path\ncontent:\n$opml");

    // Create an XML parser
    $opml_xml_parser = xml_parser_create();
    
    // Set the functions to handle opening and closing tags
    xml_set_element_handler($opml_xml_parser, "opml_startElement", "opml_endElement");
    
    global $parsed_opml;
    $parsed_opml = array();
    if (!xml_parse($opml_xml_parser, $opml, true)) {
        return FALSE;
//        echo(sprintf(__('XML error: %1$s at line %2$s'),
//                     xml_error_string(xml_get_error_code($opml_xml_parser)),
//                     xml_get_current_line_number($opml_xml_parser)));
    }

    // Free up memory used by the XML parser
    xml_parser_free($opml_xml_parser);

    // This is nasty - make sure you don't have any links you care about before doing this!
    $wpdb->query("DELETE FROM $wpdb->links");

    foreach ($parsed_opml as $link) {
        list($text, $url) = $link;
        $text = $wpdb->escape($text);
        $url = $wpdb->escape($url);

/*		$wpdb->query("UPDATE $wpdb->links SET link_url='$link_url',
			link_name='$link_name', link_image='$link_image',
			link_target='$link_target', link_category='$link_category',
			link_visible='$link_visible', link_description='$link_description',
			link_rating='$link_rating', link_rel='$link_rel',
			link_notes='$link_notes', link_rss = '$link_rss'
			WHERE link_id='$link_id'");
	} else {*/
		$wpdb->query("INSERT INTO $wpdb->links (link_url, link_name, link_image, link_target, link_category, link_description, link_visible, link_owner, link_rating, link_rel, link_notes, link_rss) VALUES('$url', '$text', '', '', '1', '', 'Y', '$current_user->id', '0', '$link_rel', '', '')");
    }

//    fclose($f);

    return TRUE;
}

function add_opml_xmlrpc_methods($methods)
{
    $methods['opmlCommunityServer.saveFile'] = 'opml_xmlrpc_savefile';
    return $methods;
}

add_action('xmlrpc_methods', 'add_opml_xmlrpc_methods');

?>