X-Git-Url: http://git.cyclocoop.org/?p=velocampus%2Fweb%2Fwww.git;a=blobdiff_plain;f=www%2Fecrire%2Finc%2Fxml.php;fp=www%2Fecrire%2Finc%2Fxml.php;h=975f960fc2432b014038bb087f39c89d09bf66fe;hp=0000000000000000000000000000000000000000;hb=80b4d3e85f78d402ed2e73f8f5d1bf4c19962eed;hpb=aaf970bf4cdaf76689ecc10609048e18d073820c

diff --git a/www/ecrire/inc/xml.php b/www/ecrire/inc/xml.php
new file mode 100644
index 0000000..975f960
--- /dev/null
+++ b/www/ecrire/inc/xml.php
@@ -0,0 +1,174 @@
+<?php
+
+/***************************************************************************\
+ *  SPIP, Systeme de publication pour l'internet                           *
+ *                                                                         *
+ *  Copyright (c) 2001-2011                                                *
+ *  Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James  *
+ *                                                                         *
+ *  Ce programme est un logiciel libre distribue sous licence GNU/GPL.     *
+ *  Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne.   *
+\***************************************************************************/
+
+if (!defined('_ECRIRE_INC_VERSION')) return;
+
+// http://doc.spip.org/@spip_xml_load
+function spip_xml_load($fichier, $strict=true, $clean=true, $taille_max = 1048576, $datas='', $profondeur = -1){
+	$contenu = "";
+	if (preg_match(",^(http|ftp)://,",$fichier)){
+		include_spip('inc/distant');
+		$contenu = recuperer_page($fichier,false,false,$taille_max, $datas);
+	}
+	else lire_fichier ($fichier, $contenu);
+	$arbre = array();
+	if ($contenu)
+		$arbre = spip_xml_parse($contenu, $strict, $clean, $profondeur);
+		
+	return count($arbre)?$arbre:false;
+}
+
+if (!defined('_SPIP_XML_TAG_SPLIT')) define ('_SPIP_XML_TAG_SPLIT', "{<([^:>][^>]*?)>}sS");
+// http://doc.spip.org/@spip_xml_parse
+function spip_xml_parse(&$texte, $strict=true, $clean=true, $profondeur = -1){
+	$out = array();
+  // enlever les commentaires
+  $charset = 'AUTO';
+  if ($clean===true){
+  	if (preg_match(",<\?xml\s(.*?)encoding=['\"]?(.*?)['\"]?(\s(.*))?\?>,im",$texte,$regs))
+  		$charset = $regs[2];
+	  $texte = preg_replace(',<!--(.*?)-->,is','',$texte);
+	  $texte = preg_replace(',<\?(.*?)\?>,is','',$texte);
+		include_spip('inc/charsets');
+		$clean = $charset;
+		//$texte = importer_charset($texte,$charset);
+  }
+  if (is_string($clean)) $charset = $clean;
+  $txt = $texte;
+
+	// tant qu'il y a des tags
+	$chars = preg_split(_SPIP_XML_TAG_SPLIT,$txt,2,PREG_SPLIT_DELIM_CAPTURE);
+	while(count($chars)>=2){
+		// tag ouvrant
+		//$chars = preg_split("{<([^>]*?)>}s",$txt,2,PREG_SPLIT_DELIM_CAPTURE);
+	
+		// $before doit etre vide ou des espaces uniquements!
+		$before = trim($chars[0]);
+
+		if (strlen($before)>0)
+			return importer_charset($texte,$charset);//$texte; // before non vide, donc on est dans du texte
+	
+		$tag = rtrim($chars[1]);
+		$txt = $chars[2];
+		
+		if (strncmp($tag,'![CDATA[',8)==0) return importer_charset($texte,$charset);//$texte;
+		if(substr($tag,-1)=='/'){ // self closing tag
+			$tag = rtrim(substr($tag,0,strlen($tag)-1));
+			$out[$tag][]="";
+		}
+		else{
+			$closing_tag = preg_split(",\s|\t|\n|\r,",trim($tag));
+			$closing_tag=reset($closing_tag);
+			// tag fermant
+			$ncclos = strlen("</$closing_tag>");
+			$p = strpos($txt,"</$closing_tag>");
+			if ($p!==FALSE  AND (strpos($txt,"<")<$p)){
+				$nclose =0; $nopen = 0;
+				$d = 0;
+				while (
+					$p!==FALSE
+					AND ($morceau = substr($txt,$d,$p-$d))
+					AND (($nopen+=preg_match_all("{<".preg_quote($closing_tag)."(\s*>|\s[^>]*[^/>]>)}is",$morceau,$matches,PREG_SET_ORDER))>$nclose)
+					){
+					$nclose++;
+					$d=$p+$ncclos;
+					$p = strpos($txt,"</$closing_tag>",$d);
+				}
+			}
+			if ($p===FALSE){
+				if ($strict){
+					$out[$tag][]="erreur : tag fermant $tag manquant::$txt"; 
+					return $out;
+				}
+				else return importer_charset($texte,$charset);//$texte // un tag qui constitue du texte a reporter dans $before
+			}
+			$content = substr($txt,0,$p);
+			$txt = substr($txt,$p+$ncclos);
+			if ($profondeur==0 OR strpos($content,"<")===FALSE) // eviter une recursion si pas utile
+				$out[$tag][] = importer_charset($content,$charset);//$content;
+			else
+				$out[$tag][]=spip_xml_parse($content, $strict, $clean, $profondeur-1);
+		}
+		$chars = preg_split(_SPIP_XML_TAG_SPLIT,$txt,2,PREG_SPLIT_DELIM_CAPTURE);
+	}
+	if (count($out)&&(strlen(trim($txt))==0))
+		return $out;
+	else
+		return importer_charset($texte,$charset);//$texte;
+}
+
+// http://doc.spip.org/@spip_xml_aplatit
+function spip_xml_aplatit($arbre,$separateur = " "){
+	$s = "";
+	if (is_array($arbre))
+		foreach($arbre as $tag=>$feuille){
+			if (is_array($feuille)){
+				if ($tag!==intval($tag)){
+					$f = spip_xml_aplatit($feuille, $separateur);
+					if (strlen($f)) {
+						$tagf = explode(" ",$tag);
+						$tagf = $tagf[0];
+						$s.="<$tag>$f</$tagf>";
+					}
+					else $s.="<$tag />";
+				}
+				else
+					$s.=spip_xml_aplatit($feuille);
+				$s .= $separateur;
+			}
+			else
+				$s.="$feuille$separateur";
+		}
+	return strlen($separateur) ? substr($s, 0, -strlen($separateur)) : $s;
+}
+
+// http://doc.spip.org/@spip_xml_tagname
+function spip_xml_tagname($tag){
+	if (preg_match(',^([a-z][\w:]*),i',$tag,$reg))
+		return $reg[1];
+	return "";
+}
+// http://doc.spip.org/@spip_xml_decompose_tag
+function spip_xml_decompose_tag($tag){
+	$tagname = spip_xml_tagname($tag);
+	$liste = array();
+	$p=strpos($tag,' ');
+	$tag = substr($tag,$p);
+	$p=strpos($tag,'=');
+	while($p!==false){
+		$attr = trim(substr($tag,0,$p));
+		$tag = ltrim(substr($tag,$p+1));
+		$quote = $tag{0};
+		$p=strpos($tag,$quote,1);
+		$cont = substr($tag,1,$p-1);
+		$liste[$attr] = $cont;
+		$tag = substr($tag,$p+1);
+		$p=strpos($tag,'=');
+	}
+	return array($tagname,$liste);
+}
+
+// http://doc.spip.org/@spip_xml_match_nodes
+function spip_xml_match_nodes($regexp,&$arbre,&$matches){
+	if(is_array($arbre) && count($arbre))
+		foreach(array_keys($arbre) as $tag){
+			if (preg_match($regexp,$tag))
+				$matches[$tag] = &$arbre[$tag];
+			if (is_array($arbre[$tag]))
+				foreach(array_keys($arbre[$tag]) as $occurences)
+					spip_xml_match_nodes($regexp,$arbre[$tag][$occurences],$matches);
+		}
+	return (count($matches));
+}
+
+
+?>