<?php

/**
 * SPIP, Système de publication pour l'internet
 *
 * Copyright © avec tendresse depuis 2001
 * Arnaud Martin, Antoine Pitrou, Philippe Rivière, Emmanuel Saint-James
 *
 * Ce programme est un logiciel libre distribué sous licence GNU/GPL.
 */

if (!defined('_ECRIRE_INC_VERSION')) {
	return;
}

function action_importer_bookmarks_netscape_dist($fichier_ok, $id_parent, $importer_statut_publie, $importer_tags) {

	$nb = 0;
	if (autoriser('importer', '_sites')) {
		$out = bookmarks_netscape_fast_parse($fichier_ok['contenu']);

		// le premier content ne nous interesse pas
		$out = reset($out['sub']);
		$nb = bookmarks_insert($out, $id_parent, $importer_statut_publie, $importer_tags);
	}

	return $nb;
}

function bookmarks_netscape_fast_parse(&$contenu) {
	$out = [];
	# var_dump(">>".substr($contenu,0,200));

	$po = stripos($contenu, '<h3', 4);
	$pf = stripos($contenu, '</dl>');
	while ($po or $pf) {
		# var_dump("$po:$pf");
		if ($po > 0 and $po < $pf) {
			$out['content'] .= substr($contenu, 0, $po);
			$contenu = substr($contenu, $po);
			$out['sub'][] = bookmarks_netscape_fast_parse($contenu);
		} else {
			$out['content'] .= substr($contenu, 0, $pf);
			$contenu = substr($contenu, $pf + 5);
			# var_dump("<<".substr($contenu,0,200));
			$out['content'] = bookmarks_extract_links($out['content']);

			return $out;
		}
		$po = stripos($contenu, '<h3');
		$pf = stripos($contenu, '</dl>');
	}
	$out['content'] = bookmarks_extract_links($out['content']);

	return $out;
}

function bookmarks_extract_links($contenu) {
	$out = [];
	$contenu = str_ireplace('<DT>', '<dt>', $contenu);
	$contenu = explode('<dt>', $contenu);

	$h3 = array_shift($contenu);
	$h3 = extraire_balise($h3, 'h3');
	$out['titre'] = strip_tags($h3);

	foreach ($contenu as $item) {
		$link = [];
		if ($a = extraire_balise($item, 'a')) {
			$link['url'] = extraire_attribut($a, 'href');
			$link['titre'] = strip_tags($a);
			$link['date'] = extraire_attribut($a, 'add_date');
			$link['descriptif'] = '';

			if ($p = stripos($item, '<dd>')) {
				$link['descriptif'] = textebrut(substr($item, $p));
			}
			$out['links'][] = $link;
		}
	}

	return $out;
}

function bookmarks_insert($tree, $id_parent, $importer_statut_publie, $importer_tags, $level = 0) {
	include_spip('action/editer_rubrique');
	include_spip('action/editer_site');

	$nb = 0;
	if (
		is_countable($tree['content']['links']) ? count($tree['content']['links']) : 0
		or isset($tree['sub'])
	) {
		$titre = ($tree['content']['titre'] ?: _T('info_sans_titre'));
		$id_rubrique = sql_getfetsel(
			'id_rubrique',
			'spip_rubriques',
			'id_parent=' . intval($id_parent) . ' AND titre=' . sql_quote($titre)
		);
		if (
			!$id_rubrique
			and $id_rubrique = rubrique_inserer($id_parent)
		) {
			rubrique_modifier($id_rubrique, ['titre' => $titre]);
		}
		if ($id_rubrique) {
			$statut = 'prop';
			if ($importer_statut_publie and autoriser('publierdans', 'rubrique', $id_rubrique)) {
				$statut = 'publie';
			}
			$now = time();
			foreach ($tree['content']['links'] as $link) {
				if (
					!$id_syndic = sql_getfetsel(
						'id_syndic',
						'spip_syndic',
						'id_rubrique=' . intval($id_rubrique) . ' AND url_site=' . sql_quote($link['url'])
					)
				) {
					$id_syndic = site_inserer($id_rubrique);
					$set = [
						'url_site' => $link['url'],
						'nom_site' => $link['titre'],
						'date' => date('Y-m-d H:i:s', $link['date'] ?: $now),
						'statut' => $statut,
						'descriptif' => $link['descriptif'],
					];
					# echo "creation site $id_syndic ".$set['url_site']." <br />";
					site_modifier($id_syndic, $set);
					$nb++;
				} else {
					# echo "existant site $id_syndic ".$link['url']." <br />";
					$nb++;
				}
			}
			if ($level < 30) {
				if (isset($tree['sub'])) {
					foreach ($tree['sub'] as $sub) {
						$nb += bookmarks_insert($sub, $id_rubrique, $importer_statut_publie, $importer_tags, $level + 1);
					}
				}
			}
		}
	}

	return $nb;
}
