Bifurcation pour faire mes petits pull requests
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 

176 lines
5.0 KiB

<?php
/***************************************************************************\
* SPIP, Systeme de publication pour l'internet *
* *
* Copyright (c) 2001-2018 *
* 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. *
\***************************************************************************/
/**
* Réparation de la base de données
*
* @package SPIP\Core\SQL\Reparation
*/
if (!defined('_ECRIRE_INC_VERSION')) {
return;
}
/**
* Action de réparation de la base de données
*
* Tente de réparer les tables, recalcule les héritages et secteurs
* de rubriques. Affiche les erreurs s'il y en a eu.
*
* @pipeline_appel base_admin_repair
* @uses admin_repair_tables()
* @uses calculer_rubriques()
* @uses propager_les_secteurs()
*
* @param string $titre Inutilisé
* @param string $reprise Inutilisé
**/
function base_repair_dist($titre = '', $reprise = '') {
$res = admin_repair_tables();
if (!$res) {
$res = "<div class='error'>" . _T('avis_erreur_mysql') . ' ' . sql_errno() . ': ' . sql_error() . "</div>\n";
} else {
include_spip('inc/rubriques');
calculer_rubriques();
propager_les_secteurs();
}
include_spip('inc/minipres');
$res .= pipeline('base_admin_repair', $res);
echo minipres(_T('texte_tentative_recuperation'),
$res . generer_form_ecrire('accueil', '', '', _T('public:accueil_site')));
}
/**
* Réparer les documents stockés dans des faux répertoires .plat
*
* @deprecated Les fichiers .plat ne sont plus utilisés. Cette fonction n'est plus appelée depuis r14292
* @todo À supprimer ou déplacer dans le plugin Medias.
*
* @return string Description des changements de chemins des documents
**/
function admin_repair_plat() {
spip_log("verification des documents joints", _LOG_INFO_IMPORTANTE);
$out = "";
$repertoire = array();
include_spip('inc/getdocument');
$res = sql_select('*', 'spip_documents', "fichier REGEXP CONCAT('^',extension,'[^/\]') AND distant='non'");
while ($row = sql_fetch($res)) {
$ext = $row['extension'];
if (!$ext) {
spip_log("document sans extension: " . $row['id_document'], _LOG_INFO_IMPORTANTE);
continue;
}
if (!isset($repertoire[$ext])) {
if (@file_exists($plat = _DIR_IMG . $ext . ".plat")) {
spip_unlink($plat);
}
$repertoire[$ext] = creer_repertoire_documents($ext);
if (preg_match(',_$,', $repertoire[$ext])) {
$repertoire[$ext] = false;
}
}
if ($d = $repertoire[$ext]) {
$d = substr($d, strlen(_DIR_IMG));
$src = $row['fichier'];
$dest = $d . substr($src, strlen($d));
if (@copy(_DIR_IMG . $src, _DIR_IMG . $dest)
and file_exists(_DIR_IMG . $dest)
) {
sql_updateq('spip_documents', array('fichier' => $dest), 'id_document=' . intval($row['id_document']));
spip_unlink(_DIR_IMG . $src);
$out .= "$src => $dest<br />";
}
}
}
return $out;
}
/**
* Exécute une réparation de la base de données
*
* Crée les tables et les champs manquants.
* Applique sur les tables un REPAIR en SQL (si le serveur SQL l'accepte).
*
* @return string
* Code HTML expliquant les actions réalisées
**/
function admin_repair_tables() {
$repair = sql_repair('repair', null, 'continue');
// recreer les tables manquantes eventuelles
include_spip('base/create');
creer_base();
$connexion = $GLOBALS['connexions'][0];
$prefixe = $connexion['prefixe'];
$rows = array();
if ($res1 = sql_showbase()) {
while ($r = sql_fetch($res1)) {
$rows[] = $r;
}
sql_free($res1);
}
$res = "";
if (count($rows)) {
while ($r = array_shift($rows)) {
$tab = array_shift($r);
$class = "";
$m = "<strong>$tab</strong> ";
spip_log("Repare $tab", _LOG_INFO_IMPORTANTE);
// supprimer la meta avant de lancer la reparation
// car le repair peut etre long ; on ne veut pas boucler
effacer_meta('admin_repair');
if ($repair) {
$result_repair = sql_repair($tab);
if (!$result_repair) {
return false;
}
}
// essayer de maj la table (creation de champs manquants)
maj_tables($tab);
$count = sql_countsel($tab);
if ($count > 1) {
$m .= "(" . _T('texte_compte_elements', array('count' => $count)) . ")\n";
} else {
if ($count == 1) {
$m .= "(" . _T('texte_compte_element', array('count' => $count)) . ")\n";
} else {
$m .= "(" . _T('texte_vide') . ")\n";
}
}
if ($result_repair
and $msg = join(" ",
(is_resource($result_repair) or is_object($result_repair)) ? sql_fetch($result_repair) : $result_repair) . ' '
and strpos($msg, ' OK ') === false
) {
$class = " class='notice'";
$m .= "<br /><tt>" . spip_htmlentities($msg) . "</tt>\n";
} else {
$m .= " " . _T('texte_table_ok');
}
$res .= "<div$class>$m</div>";
}
}
return $res;
}