mirror of
https://github.com/YunoHost-Apps/spip_ynh.git
synced 2024-09-03 20:25:59 +02:00
338 lines
10 KiB
PHP
338 lines
10 KiB
PHP
<?php
|
|
|
|
/***************************************************************************\
|
|
* SPIP, Systeme de publication pour l'internet *
|
|
* *
|
|
* Copyright (c) 2001-2014 *
|
|
* 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;
|
|
|
|
/**
|
|
* lecture d'un texte conforme a la DTD paquet.dtd
|
|
* et conversion en tableau PHP identique a celui fourni par plugin.xml
|
|
* manque la description
|
|
*
|
|
* @param $desc
|
|
* @param string $plug
|
|
* @param string $dir_plugins
|
|
* @return array
|
|
*/
|
|
function plugins_infos_paquet($desc, $plug = '', $dir_plugins = _DIR_PLUGINS) {
|
|
static $process = array( // tableau constant
|
|
'debut' => 'paquet_debutElement',
|
|
'fin' => 'paquet_finElement',
|
|
'text' => 'paquet_textElement'
|
|
);
|
|
|
|
$valider_xml = charger_fonction('valider', 'xml');
|
|
$vxml = $valider_xml($desc, false, $process, 'paquet.dtd', "utf-8");
|
|
if (!$vxml->err){
|
|
// On veut toutes les variantes selon la version de SPIP
|
|
if (!$plug)
|
|
return $vxml->versions;
|
|
|
|
// compatibilite avec l'existant:
|
|
$tree = $vxml->versions['0'];
|
|
|
|
// l'arbre renvoie parfois un tag vide... etrange. Pas la peine de garder ca.
|
|
if (isset($tree['']) and !strlen($tree['']))
|
|
unset($tree['']);
|
|
|
|
$tree['slogan'] = $tree['prefix']."_slogan";
|
|
$tree['description'] = $tree['prefix']."_description";
|
|
paquet_readable_files($tree, "$dir_plugins$plug/");
|
|
if (!$tree['chemin'])
|
|
$tree['chemin'] = array(array('path' => '')); // initialiser par defaut
|
|
|
|
// On verifie qu'il existe des balises spip qu'il faudrait rajouter dans
|
|
// la structure d'infos du paquet en fonction de la version spip courante
|
|
if (count($vxml->versions) > 1) {
|
|
$vspip = $GLOBALS['spip_version_branche'];
|
|
foreach ($vxml->versions as $_compatibilite => $_version) {
|
|
if (($_version['balise'] == 'spip')
|
|
AND (plugin_version_compatible($_compatibilite, $vspip,'spip'))) {
|
|
// on merge les sous-balises de la balise spip compatible avec celles de la
|
|
// balise paquet
|
|
foreach ($_version as $_index => $_balise) {
|
|
if ($_index AND $_index != 'balise')
|
|
$tree[$_index] =array_merge($tree[$_index], $_balise);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
return $tree;
|
|
}
|
|
// Prendre les messages d'erreur sans les numeros de lignes
|
|
$msg = array_map('array_shift', $vxml->err);
|
|
// Construire le lien renvoyant sur l'application du validateur XML
|
|
$h = $GLOBALS['meta']['adresse_site'].'/'
|
|
.substr("$dir_plugins$plug/", strlen(_DIR_RACINE)).'paquet.xml';
|
|
|
|
$h = generer_url_ecrire('valider_xml', "var_url=$h");
|
|
$t = _T('plugins_erreur', array('plugins' => $plug));
|
|
array_unshift($msg, "<a href='$h'>$t</a>");
|
|
return array('erreur' => $msg);
|
|
}
|
|
|
|
/**
|
|
* Verifier le presence des fichiers remarquables
|
|
* options/actions/administrations et peupler la description du plugin en consequence
|
|
*
|
|
* @param array $tree
|
|
* @param string $dir
|
|
* @return void
|
|
*/
|
|
function paquet_readable_files(&$tree, $dir){
|
|
$prefix = strtolower($tree['prefix']);
|
|
|
|
$tree['options'] = (is_readable($dir.$f = ($prefix.'_options.php'))) ? array($f) : array();
|
|
$tree['fonctions'] = (is_readable($dir.$f = ($prefix.'_fonctions.php'))) ? array($f) : array();
|
|
$tree['install'] = (is_readable($dir.$f = ($prefix.'_administrations.php'))) ? array($f) : array();
|
|
}
|
|
|
|
/**
|
|
* Appeler le validateur, qui memorise le texte dans le tableau "versions"
|
|
* On memorise en plus dans les index de numero de version de SPIP
|
|
* les attributs de la balise rencontree
|
|
* qu'on complete par des entrees nommees par les sous-balises de "paquet",
|
|
* et initialisees par un tableau vide, rempli a leur rencontre.
|
|
* La sous-balise "spip", qui ne peut apparaitre qu'apres les autres,
|
|
* reprend les valeurs recuperees precedement (valeurs par defaut)
|
|
*
|
|
* @param object $phraseur
|
|
* @param string $name
|
|
* @param array $attrs
|
|
*/
|
|
function paquet_debutElement($phraseur, $name, $attrs) {
|
|
xml_debutElement($phraseur, $name, $attrs);
|
|
if ($phraseur->err) return;
|
|
if (($name=='paquet') OR ($name=='spip')){
|
|
if ($name=='spip'){
|
|
$n = $attrs['compatibilite'];
|
|
$attrs = array();
|
|
}
|
|
else {
|
|
$n = '0';
|
|
$phraseur->contenu['paquet'] = $attrs;
|
|
$attrs['menu'] = array();
|
|
$attrs['chemin'] = array();
|
|
$attrs['necessite'] = array();
|
|
$attrs['lib'] = array();
|
|
$attrs['onglet'] = array();
|
|
$attrs['procure'] = array();
|
|
$attrs['pipeline'] = array();
|
|
$attrs['utilise'] = array();
|
|
}
|
|
$phraseur->contenu['compatible'] = $n;
|
|
$phraseur->versions[$phraseur->contenu['compatible']] = $attrs;
|
|
}
|
|
else
|
|
$phraseur->versions[$phraseur->contenu['compatible']][$name][0] = $attrs;
|
|
$phraseur->versions[$phraseur->contenu['compatible']][''] = '';
|
|
}
|
|
|
|
/**
|
|
* Appeler l'indenteur pour sa gestion de la profondeur,
|
|
* et memoriser les attributs dans le tableau avec l'oppose de la profondeur
|
|
* comme index, avec '' comme sous-index (les autres sont les attributs)
|
|
*
|
|
* @param pbject $phraseur
|
|
* @param string $data
|
|
*/
|
|
function paquet_textElement($phraseur, $data) {
|
|
xml_textElement($phraseur, $data);
|
|
if ($phraseur->err OR !(trim($data))) return;
|
|
$phraseur->versions[$phraseur->contenu['compatible']][''] .= $data;
|
|
}
|
|
|
|
/**
|
|
* Si on sait deja que le texte n'est pas valide on ne fait rien.
|
|
* Pour une balise sans attribut, le traitement est forcement toujours le meme.
|
|
* Pour une balise sans texte, idem mais parce que la DTD est bien fichue
|
|
*
|
|
* @param object $phraseur
|
|
* @param string $name
|
|
*/
|
|
function paquet_finElement($phraseur, $name) {
|
|
if ($phraseur->err) return;
|
|
$n = $phraseur->contenu['compatible'];
|
|
|
|
if (isset($phraseur->versions[$n][$name][0]) AND is_array($phraseur->versions[$n][$name][0])){
|
|
$attrs = $phraseur->versions[$n][$name][0];
|
|
unset($phraseur->versions[$n][$name][0]);
|
|
} else {
|
|
$attrs = array();
|
|
}
|
|
|
|
$texte = trim($phraseur->versions[$n]['']);
|
|
$phraseur->versions[$n][''] = '';
|
|
|
|
$f = 'info_paquet_'.$name;
|
|
if (function_exists($f))
|
|
$f($phraseur, $attrs, $texte);
|
|
elseif (!$attrs)
|
|
$phraseur->versions[$n][$name] = $texte;
|
|
else {
|
|
// Traitement generique. Si $attrs['nom'] n'existe pas, ce n'est pas normal ici
|
|
$phraseur->versions[$n][$name][$attrs['nom']] = $attrs;
|
|
# echo("<br>pour $name $n " . $attrs['nom']); var_dump($phraseur->versions[$n]);
|
|
}
|
|
xml_finElement($phraseur, $name, $attrs);
|
|
}
|
|
|
|
/**
|
|
* Cas particulier de la balise licence :
|
|
* transformer en lien sur url fournie dans l'attribut lien
|
|
*
|
|
* @param object $phraseur
|
|
* @param array $attrs
|
|
* @param string $texte
|
|
*/
|
|
function info_paquet_licence($phraseur, $attrs, $texte) {
|
|
if (isset($attrs['lien']))
|
|
$lien = $attrs['lien'];
|
|
else
|
|
$lien = '';
|
|
$n = $phraseur->contenu['compatible'];
|
|
$phraseur->versions[$n]['licence'][] = array('nom' => $texte, 'url' => $lien);
|
|
}
|
|
|
|
/**
|
|
* Cas particulier de la balise chemin :
|
|
* stocker un tableau
|
|
*
|
|
* @param object $phraseur
|
|
* @param array $attrs
|
|
* @param string $texte
|
|
*/
|
|
function info_paquet_chemin($phraseur, $attrs, $texte) {
|
|
$n = $phraseur->contenu['compatible'];
|
|
if (isset($attrs['path'])){
|
|
if (isset($attrs['type']))
|
|
$phraseur->versions[$n]['chemin'][] = array('path' => $attrs['path'], 'type' => $attrs['type']);
|
|
else
|
|
$phraseur->versions[$n]['chemin'][] = array('path' => $attrs['path']);
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Cas particulier de la balise auteur
|
|
* peupler le mail si besoin (en le protegeant, mais est-ce bien la place pour cela ?)
|
|
* et le lien vers le site de l'auteur si fournit
|
|
*
|
|
* @param object $phraseur
|
|
* @param array $attrs
|
|
* @param string $texte
|
|
*/
|
|
function info_paquet_auteur($phraseur, $attrs, $texte) {
|
|
# echo 'auteur ', $texte; var_dump($attrs);
|
|
if (isset($attrs['mail'])){
|
|
if (strpos($attrs['mail'], '@'))
|
|
$attrs['mail'] = str_replace('@', ' AT ', $attrs['mail']);
|
|
$mail = $attrs['mail'];
|
|
}
|
|
else
|
|
$mail = '';
|
|
|
|
if (isset($attrs['lien']))
|
|
$lien = $attrs['lien'];
|
|
else
|
|
$lien = '';
|
|
|
|
$n = $phraseur->contenu['compatible'];
|
|
$phraseur->versions[$n]['auteur'][] = array('nom' => $texte, 'url' => $lien, 'mail' => $mail);
|
|
}
|
|
|
|
/**
|
|
* Cas particulier de la balise credit
|
|
* peupler le lien vers le site externe si necessaire
|
|
*
|
|
* @param object $phraseur
|
|
* @param array $attrs
|
|
* @param string $texte
|
|
*/
|
|
function info_paquet_credit($phraseur, $attrs, $texte) {
|
|
|
|
if (isset($attrs['lien']))
|
|
$lien = $attrs['lien'];
|
|
else
|
|
$lien = '';
|
|
|
|
$n = $phraseur->contenu['compatible'];
|
|
$phraseur->versions[$n]['credit'][] = array('nom' => $texte, 'url' => $lien);
|
|
}
|
|
|
|
/**
|
|
* Cas particulier de la balise copyright :
|
|
* transformer en lien sur url fournie dans l'attribut lien
|
|
*
|
|
* @param object $phraseur
|
|
* @param array $attrs
|
|
* @param string $texte
|
|
*/
|
|
function info_paquet_copyright($phraseur, $attrs, $texte) {
|
|
$n = $phraseur->contenu['compatible'];
|
|
$phraseur->versions[$n]['copyright'][] = $texte;
|
|
}
|
|
|
|
/**
|
|
* Cas particulier de la balise paquet :
|
|
* Remplacer cet index qui ne sert a rien par un index balise=paquet et ajouter la reference a la dtd
|
|
*
|
|
* @param object $phraseur
|
|
* @param array $attrs
|
|
* @param string $texte
|
|
*/
|
|
function info_paquet_paquet($phraseur, $attrs, $texte) {
|
|
$n = 0;
|
|
$phraseur->versions[$n]['dtd'] = "paquet";
|
|
$phraseur->versions[$n]['balise'] = "paquet";
|
|
}
|
|
|
|
/**
|
|
* Cas particulier sur la balise traduire :
|
|
* Elle n'a pas de 'nom'
|
|
*
|
|
* @param object $phraseur
|
|
* @param array $attrs
|
|
* @param string $texte
|
|
**/
|
|
function info_paquet_traduire($phraseur, $attrs, $texte) {
|
|
$n = $phraseur->contenu['compatible'];
|
|
$phraseur->versions[$n]['traduire'][] = $attrs;
|
|
}
|
|
|
|
/**
|
|
* Cas particulier de la balise spip :
|
|
* Remplacer cet index qui ne sert a rien par un index balise=spip et ajouter la reference a la dtd
|
|
*
|
|
* @param object $phraseur
|
|
* @param array $attrs
|
|
* @param string $texte
|
|
*/
|
|
function info_paquet_spip($phraseur, $attrs, $texte) {
|
|
$n = $phraseur->contenu['compatible'];
|
|
$phraseur->versions[$n]['balise'] = "spip";
|
|
}
|
|
|
|
|
|
/**
|
|
* Pipelines : plusieurs declarations possibles pour un meme pipeline
|
|
*
|
|
* @param $phraseur
|
|
* @param $attrs
|
|
* @param $texte
|
|
*/
|
|
function info_paquet_pipeline($phraseur, $attrs, $texte) {
|
|
$n = $phraseur->contenu['compatible'];
|
|
$phraseur->versions[$n]['pipeline'][] = $attrs;
|
|
}
|
|
|
|
?>
|