<?php
/***************************************************************************
 Copyright (C) 2004 - 2006 Scuttle project
 http://sourceforge.net/projects/scuttle/
 http://scuttle.org/

 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
 ***************************************************************************/

require_once 'www-header.php';

/* Service creation: only useful services are created */
// No specific services

/* Managing all possible inputs */
// First input is $_FILES
// Other inputs
isset($_POST['status'])
    ? define('POST_STATUS', $_POST['status'])
    : define('POST_STATUS', $GLOBALS['defaults']['privacy']);


if ($userservice->isLoggedOn() && sizeof($_FILES) > 0 && $_FILES['userfile']['size'] > 0) {
	$userinfo = $userservice->getCurrentObjectUser();

	if (is_numeric(POST_STATUS)) {
		$status = intval(POST_STATUS);
	} else {
		$status = $GLOBALS['defaults']['privacy'];
	}

	$depth = array();
	$xml_parser = xml_parser_create();
	xml_set_element_handler($xml_parser, "startElement", "endElement");

	if (!($fp = fopen($_FILES['userfile']['tmp_name'], "r")))
	die(T_("Could not open XML input"));

	while ($data = fread($fp, 4096)) {
		if (!xml_parse($xml_parser, $data, feof($fp))) {
			die(sprintf(T_("XML error: %s at line %d"),
			xml_error_string(xml_get_error_code($xml_parser)),
			xml_get_current_line_number($xml_parser)));
		}
	}
	xml_parser_free($xml_parser);
	//FIXME: show errors and warnings
	header('Location: '. createURL('bookmarks', $userinfo->getUsername()));
} else {
	$templatename = 'importDelicious.tpl';
	$tplVars['subtitle'] = T_('Import Bookmarks from del.icio.us');
	$tplVars['formaction']  = createURL('import');
	$templateservice->loadTemplate($templatename, $tplVars);
}


function startElement($parser, $name, $attrs) {
	global $depth, $status, $tplVars, $userservice;

	$bookmarkservice =SemanticScuttle_Service_Factory::get('Bookmark');

	if ($name == 'POST') {
		$newstatus = $status;
		while (list($attrTitle, $attrVal) = each($attrs)) {
			switch ($attrTitle) {
				case 'HREF':
					$bAddress = $attrVal;
					break;
				case 'DESCRIPTION':
					$bTitle = $attrVal;
					break;
				case 'EXTENDED':
					$bDescription = $attrVal;
					break;
				case 'TIME':
					$bDatetime = $attrVal;
					break;
				case 'TAG':
					$tags = strtolower($attrVal);
					break;
				case 'PRIVATE':
					if ($attrVal == 'yes') {
						$newstatus = 2;
					}
					break;
			}
		}
		if ($bookmarkservice->bookmarkExists($bAddress, $userservice->getCurrentUserId())) {
			$tplVars['error'] = T_('You have already submitted this bookmark.');
		} else {
			// Strangely, PHP can't work out full ISO 8601 dates, so we have to chop off the Z.
			$bDatetime = substr($bDatetime, 0, -1);

			// If bookmark claims to be from the future, set it to be now instead
			if (strtotime($bDatetime) > time()) {
				$bDatetime = gmdate('Y-m-d H:i:s');
			}

			$res = $bookmarkservice->addBookmark(
				$bAddress, $bTitle, $bDescription, '', $newstatus, $tags,
				null, $bDatetime, true, true
			);
			if ($res) {
				$tplVars['msg'] = T_('Bookmark imported.');
			} else {
				$tplVars['error'] = T_('There was an error saving your bookmark. Please try again or contact the administrator.');
			}
		}
	}
	if (!isset($depth[(int)$parser])) {
		$depth[(int)$parser] = 0;
	}
	$depth[(int)$parser]++;
}

function endElement($parser, $name) {
	global $depth;
	$depth[(int)$parser]--;
}
?>