/**
* Recherche et suppression de correspondances anormales dans la base
*
* @param void
* @return array tableau avec label et commentaire pour chaque recherche
*/
public static function DB_corriger_anomalies()
{
$tab_bilan = array();
// un bout de code utilisé à chaque fois
function compte_rendu( $nb_modifs , $sujet )
{
$message = (!$nb_modifs) ? 'rien à signaler' : ( ($nb_modifs>1) ? $nb_modifs.' anomalies supprimées' : '1 anomalie supprimée' ) ;
$classe = (!$nb_modifs) ? 'valide' : 'alerte' ;
return '<label class="'.$classe.'">'.$sujet.' : '.$message.'.</label>';
}
// Référentiels associés à une matière supprimée
$DB_SQL = 'DELETE sacoche_referentiel,sacoche_referentiel_domaine, sacoche_referentiel_theme, sacoche_referentiel_item, sacoche_jointure_devoir_item, sacoche_saisie, sacoche_demande ';
$DB_SQL.= 'FROM sacoche_referentiel ';
$DB_SQL.= 'LEFT JOIN sacoche_matiere USING (matiere_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_referentiel_domaine USING (matiere_id,niveau_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_referentiel_theme USING (domaine_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_referentiel_item USING (theme_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_jointure_devoir_item USING (item_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_saisie USING (item_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_demande USING (item_id) ';
$DB_SQL.= 'WHERE sacoche_matiere.matiere_id IS NULL ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$tab_bilan[] = compte_rendu( DB::rowCount(SACOCHE_STRUCTURE_BD_NAME) , 'Référentiels' );
// Domaines associés à une matière supprimée...
$DB_SQL = 'DELETE sacoche_referentiel_domaine, sacoche_referentiel_theme, sacoche_referentiel_item, sacoche_jointure_devoir_item, sacoche_saisie, sacoche_demande ';
$DB_SQL.= 'FROM sacoche_referentiel_domaine ';
$DB_SQL.= 'LEFT JOIN sacoche_matiere USING (matiere_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_referentiel_theme USING (domaine_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_referentiel_item USING (theme_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_jointure_devoir_item USING (item_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_saisie USING (item_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_demande USING (item_id) ';
$DB_SQL.= 'WHERE sacoche_matiere.matiere_id IS NULL ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$tab_bilan[] = compte_rendu( DB::rowCount(SACOCHE_STRUCTURE_BD_NAME) , 'Domaines (arborescence)' );
// Thèmes associés à un domaine supprimé...
$DB_SQL = 'DELETE sacoche_referentiel_theme, sacoche_referentiel_item, sacoche_jointure_devoir_item, sacoche_saisie, sacoche_demande ';
$DB_SQL.= 'FROM sacoche_referentiel_theme ';
$DB_SQL.= 'LEFT JOIN sacoche_referentiel_domaine USING (domaine_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_referentiel_item USING (theme_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_jointure_devoir_item USING (item_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_saisie USING (item_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_demande USING (item_id) ';
$DB_SQL.= 'WHERE sacoche_referentiel_domaine.domaine_id IS NULL ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$tab_bilan[] = compte_rendu( DB::rowCount(SACOCHE_STRUCTURE_BD_NAME) , 'Thèmes (arborescence)' );
// Items associés à un thème supprimé...
$DB_SQL = 'DELETE sacoche_referentiel_item, sacoche_jointure_devoir_item, sacoche_saisie, sacoche_demande ';
$DB_SQL.= 'FROM sacoche_referentiel_item ';
$DB_SQL.= 'LEFT JOIN sacoche_referentiel_theme USING (theme_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_jointure_devoir_item USING (item_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_saisie USING (item_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_demande USING (item_id) ';
$DB_SQL.= 'WHERE sacoche_referentiel_theme.theme_id IS NULL ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$tab_bilan[] = compte_rendu( DB::rowCount(SACOCHE_STRUCTURE_BD_NAME) , 'Items (arborescence)' );
// Demandes d'évaluations associées à un user ou une matière ou un item supprimé...
$DB_SQL = 'DELETE sacoche_demande ';
$DB_SQL.= 'FROM sacoche_demande ';
$DB_SQL.= 'LEFT JOIN sacoche_user ON sacoche_demande.eleve_id=sacoche_user.user_id ';
$DB_SQL.= 'LEFT JOIN sacoche_matiere USING (matiere_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_referentiel_item USING (item_id) ';
$DB_SQL.= 'WHERE ( (sacoche_user.user_id IS NULL) OR (sacoche_matiere.matiere_id IS NULL) OR (sacoche_referentiel_item.item_id IS NULL) ) ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$nb_modifs = DB::rowCount(SACOCHE_STRUCTURE_BD_NAME);
$DB_SQL = 'UPDATE sacoche_demande ';
$DB_SQL.= 'LEFT JOIN sacoche_user ON sacoche_demande.prof_id=sacoche_user.user_id ';
$DB_SQL.= 'SET prof_id=0 ';
$DB_SQL.= 'WHERE sacoche_user.user_id IS NULL ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$nb_modifs += DB::rowCount(SACOCHE_STRUCTURE_BD_NAME);
$tab_bilan[] = compte_rendu( $nb_modifs , 'Demandes d\'évaluations' );
// Saisies de scores associées à un élève ou un item supprimé...
// Attention, on ne teste pas le professeur ou le devoir, car les saisies sont conservées au delà
$DB_SQL = 'DELETE sacoche_saisie ';
$DB_SQL.= 'FROM sacoche_saisie ';
$DB_SQL.= 'LEFT JOIN sacoche_user ON sacoche_saisie.eleve_id=sacoche_user.user_id ';
$DB_SQL.= 'LEFT JOIN sacoche_referentiel_item USING (item_id) ';
$DB_SQL.= 'WHERE ( (sacoche_user.user_id IS NULL) OR (sacoche_referentiel_item.item_id IS NULL) ) ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$tab_bilan[] = compte_rendu( DB::rowCount(SACOCHE_STRUCTURE_BD_NAME) , 'Scores' );
// Devoirs associés à un prof ou un groupe supprimé...
$DB_SQL = 'DELETE sacoche_devoir, sacoche_jointure_devoir_item , sacoche_jointure_devoir_prof , sacoche_jointure_devoir_eleve ';
$DB_SQL.= 'FROM sacoche_devoir ';
$DB_SQL.= 'LEFT JOIN sacoche_jointure_devoir_item USING (devoir_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_jointure_devoir_prof USING (devoir_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_jointure_devoir_eleve USING (devoir_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_user ON sacoche_devoir.proprio_id=sacoche_user.user_id ';
$DB_SQL.= 'LEFT JOIN sacoche_groupe USING (groupe_id) ';
$DB_SQL.= 'WHERE ( (sacoche_user.user_id IS NULL) OR (sacoche_groupe.groupe_id IS NULL) ) ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$tab_bilan[] = compte_rendu( DB::rowCount(SACOCHE_STRUCTURE_BD_NAME) , 'Évaluations' );
// Messages associés à un utilisateur supprimé...
$DB_SQL = 'DELETE sacoche_message, sacoche_jointure_message_destinataire ';
$DB_SQL.= 'FROM sacoche_message ';
$DB_SQL.= 'LEFT JOIN sacoche_jointure_message_destinataire USING (message_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_user USING (user_id) ';
$DB_SQL.= 'WHERE sacoche_user.user_id IS NULL ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$tab_bilan[] = compte_rendu( DB::rowCount(SACOCHE_STRUCTURE_BD_NAME) , 'Messages d\'accueil' );
// Destinataires de messages associés à un utilisateur ou un regroupement supprimé...
$DB_SQL = 'DELETE sacoche_jointure_message_destinataire ';
$DB_SQL.= 'FROM sacoche_jointure_message_destinataire ';
$DB_SQL.= 'LEFT JOIN sacoche_groupe ON sacoche_jointure_message_destinataire.destinataire_id=sacoche_groupe.groupe_id AND sacoche_jointure_message_destinataire.destinataire_type=sacoche_groupe.groupe_type ';
$DB_SQL.= 'WHERE destinataire_type IN ("classe","groupe","besoin") AND (sacoche_groupe.groupe_id IS NULL) ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$nb_modifs = DB::rowCount(SACOCHE_STRUCTURE_BD_NAME);
$DB_SQL = 'DELETE sacoche_jointure_message_destinataire ';
$DB_SQL.= 'FROM sacoche_jointure_message_destinataire ';
$DB_SQL.= 'LEFT JOIN sacoche_niveau ON sacoche_jointure_message_destinataire.destinataire_id=sacoche_niveau.niveau_id ';
$DB_SQL.= 'WHERE destinataire_type="niveau" AND (sacoche_niveau.niveau_id IS NULL) ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$nb_modifs += DB::rowCount(SACOCHE_STRUCTURE_BD_NAME);
$DB_SQL = 'DELETE sacoche_jointure_message_destinataire ';
$DB_SQL.= 'FROM sacoche_jointure_message_destinataire ';
$DB_SQL.= 'LEFT JOIN sacoche_user ON sacoche_jointure_message_destinataire.destinataire_id=sacoche_user.user_id ';
$DB_SQL.= 'WHERE destinataire_type="user" AND (sacoche_user.user_id IS NULL) ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$nb_modifs += DB::rowCount(SACOCHE_STRUCTURE_BD_NAME);
$tab_bilan[] = compte_rendu( $nb_modifs , 'Jointures message/destinataire' );
// Bascules vers un compte désactivé ou supprimé...
$tab_bilan[] = compte_rendu( DB_STRUCTURE_SWITCH::DB_supprimer_liaisons_obsoletes() , 'Bascules entre comptes' );
// Sélections d'items associées à un professeur supprimé...
$DB_SQL = 'DELETE sacoche_selection_item ';
$DB_SQL.= 'FROM sacoche_selection_item ';
$DB_SQL.= 'LEFT JOIN sacoche_user ON sacoche_selection_item.proprio_id=sacoche_user.user_id ';
$DB_SQL.= 'WHERE sacoche_user.user_id IS NULL ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$tab_bilan[] = compte_rendu( DB::rowCount(SACOCHE_STRUCTURE_BD_NAME) , 'Sélections d\'items sans propriétaire' );
// Jointures sélection/item à un item supprimé...
$tab_bilan[] = compte_rendu( DB_STRUCTURE_SELECTION_ITEM::DB_supprimer_jointures_items_obsoletes() , 'Jointures sélection/item' );
// Sélections d'items associées à aucun item...
$tab_bilan[] = compte_rendu( DB_STRUCTURE_SELECTION_ITEM::DB_supprimer_selections_items_obsoletes() , 'Sélections d\'items sans item' );
// Jointures période/groupe associées à une période ou un groupe supprimé...
$DB_SQL = 'DELETE sacoche_jointure_groupe_periode ';
$DB_SQL.= 'FROM sacoche_jointure_groupe_periode ';
$DB_SQL.= 'LEFT JOIN sacoche_periode USING (periode_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_groupe USING (groupe_id) ';
$DB_SQL.= 'WHERE ( (sacoche_periode.periode_id IS NULL) OR (sacoche_groupe.groupe_id IS NULL) ) ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$tab_bilan[] = compte_rendu( DB::rowCount(SACOCHE_STRUCTURE_BD_NAME) , 'Jointures période/groupe' );
// Jointures période/saisie bilan officiel associées à une période supprimée... (on ne s'occupe volontairement pas de vérifier la jointure période/groupe) (on ne vérifie pas non plus les jointures élève / prof / rubrique ... de toutes façon cette table est vidée annuellement)
$DB_SQL = 'DELETE sacoche_officiel_saisie ';
$DB_SQL.= 'FROM sacoche_officiel_saisie ';
$DB_SQL.= 'LEFT JOIN sacoche_periode USING (periode_id) ';
$DB_SQL.= 'WHERE sacoche_periode.periode_id IS NULL ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$tab_bilan[] = compte_rendu( DB::rowCount(SACOCHE_STRUCTURE_BD_NAME) , 'Jointures période/saisie bilan officiel' );
// Jointures période/fichier bilan officiel associées à un user ou une période supprimé...
$DB_SQL = 'DELETE sacoche_officiel_fichier ';
$DB_SQL.= 'FROM sacoche_officiel_fichier ';
$DB_SQL.= 'LEFT JOIN sacoche_periode USING (periode_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_user USING (user_id) ';
$DB_SQL.= 'WHERE ( (sacoche_user.user_id IS NULL) OR (sacoche_periode.periode_id IS NULL) ) ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$tab_bilan[] = compte_rendu( DB::rowCount(SACOCHE_STRUCTURE_BD_NAME) , 'Jointures période/fichier bilan officiel' );
// Jointures période/assiduité bilan officiel associées à un user ou une période supprimée...
$DB_SQL = 'DELETE sacoche_officiel_assiduite ';
$DB_SQL.= 'FROM sacoche_officiel_assiduite ';
$DB_SQL.= 'LEFT JOIN sacoche_periode USING (periode_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_user USING (user_id) ';
$DB_SQL.= 'WHERE ( (sacoche_user.user_id IS NULL) OR (sacoche_periode.periode_id IS NULL) ) ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$tab_bilan[] = compte_rendu( DB::rowCount(SACOCHE_STRUCTURE_BD_NAME) , 'Jointures période/assiduité bilan officiel' );
// Fiche brevet associée à un user supprimé...
$DB_SQL = 'DELETE sacoche_brevet_fichier ';
$DB_SQL.= 'FROM sacoche_brevet_fichier ';
$DB_SQL.= 'LEFT JOIN sacoche_user USING (user_id) ';
$DB_SQL.= 'WHERE user_id IS NULL ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$tab_bilan[] = compte_rendu( DB::rowCount(SACOCHE_STRUCTURE_BD_NAME) , 'Jointures élève/fichier fiche brevet' );
// Jointures user/groupe associées à un user ou un groupe supprimé...
$DB_SQL = 'DELETE sacoche_jointure_user_groupe ';
$DB_SQL.= 'FROM sacoche_jointure_user_groupe ';
$DB_SQL.= 'LEFT JOIN sacoche_user USING (user_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_groupe USING (groupe_id) ';
$DB_SQL.= 'WHERE ( (sacoche_user.user_id IS NULL) OR (sacoche_groupe.groupe_id IS NULL) ) ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$tab_bilan[] = compte_rendu( DB::rowCount(SACOCHE_STRUCTURE_BD_NAME) , 'Jointures utilisateur/groupe' );
// Jointures user/matière associées à un user ou une matière supprimée...
$DB_SQL = 'DELETE sacoche_jointure_user_matiere ';
$DB_SQL.= 'FROM sacoche_jointure_user_matiere ';
$DB_SQL.= 'LEFT JOIN sacoche_user USING (user_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_matiere USING (matiere_id) ';
$DB_SQL.= 'WHERE ( (sacoche_user.user_id IS NULL) OR (sacoche_matiere.matiere_id IS NULL) ) ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$tab_bilan[] = compte_rendu( DB::rowCount(SACOCHE_STRUCTURE_BD_NAME) , 'Jointures utilisateur/matière' );
// Abonnement notifications associée à un user supprimé...
$DB_SQL = 'DELETE sacoche_jointure_user_abonnement ';
$DB_SQL.= 'FROM sacoche_jointure_user_abonnement ';
$DB_SQL.= 'LEFT JOIN sacoche_user USING (user_id) ';
$DB_SQL.= 'WHERE user_id IS NULL ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$tab_bilan[] = compte_rendu( DB::rowCount(SACOCHE_STRUCTURE_BD_NAME) , 'Jointures utilisateur/abonnement notifications' );
// Jointures devoir/item associées à un devoir ou un item supprimé...
$DB_SQL = 'DELETE sacoche_jointure_devoir_item ';
$DB_SQL.= 'FROM sacoche_jointure_devoir_item ';
$DB_SQL.= 'LEFT JOIN sacoche_devoir USING (devoir_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_referentiel_item USING (item_id) ';
$DB_SQL.= 'WHERE ( (sacoche_devoir.devoir_id IS NULL) OR (sacoche_referentiel_item.item_id IS NULL) ) ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$tab_bilan[] = compte_rendu( DB::rowCount(SACOCHE_STRUCTURE_BD_NAME) , 'Jointures évaluation/item' );
// Jointures devoir/droit associées à un devoir ou un user supprimé...
$DB_SQL = 'DELETE sacoche_jointure_devoir_prof ';
$DB_SQL.= 'FROM sacoche_jointure_devoir_prof ';
$DB_SQL.= 'LEFT JOIN sacoche_devoir USING (devoir_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_user ON sacoche_jointure_devoir_prof.prof_id=sacoche_user.user_id ';
$DB_SQL.= 'WHERE ( (sacoche_devoir.devoir_id IS NULL) OR (sacoche_user.user_id IS NULL) ) ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$tab_bilan[] = compte_rendu( DB::rowCount(SACOCHE_STRUCTURE_BD_NAME) , 'Jointures évaluation/prof' );
// Jointures devoir/audio associées à un devoir ou un user supprimé...
$DB_SQL = 'DELETE sacoche_jointure_devoir_eleve ';
$DB_SQL.= 'FROM sacoche_jointure_devoir_eleve ';
$DB_SQL.= 'LEFT JOIN sacoche_devoir USING (devoir_id) ';
$DB_SQL.= 'LEFT JOIN sacoche_user ON sacoche_jointure_devoir_eleve.eleve_id=sacoche_user.user_id ';
$DB_SQL.= 'WHERE ( (sacoche_devoir.devoir_id IS NULL) OR (sacoche_user.user_id IS NULL) ) ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$tab_bilan[] = compte_rendu( DB::rowCount(SACOCHE_STRUCTURE_BD_NAME) , 'Jointures évaluation/audio' );
// Adresse associée à un parent supprimé...
$DB_SQL = 'DELETE sacoche_parent_adresse ';
$DB_SQL.= 'FROM sacoche_parent_adresse ';
$DB_SQL.= 'LEFT JOIN sacoche_user ON sacoche_parent_adresse.parent_id=sacoche_user.user_id ';
$DB_SQL.= 'WHERE user_id IS NULL ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$tab_bilan[] = compte_rendu( DB::rowCount(SACOCHE_STRUCTURE_BD_NAME) , 'Jointures parent/adresse' );
// Jointures parent/élève associées à un parent ou un élève supprimé...
$DB_SQL = 'DELETE sacoche_jointure_parent_eleve ';
$DB_SQL.= 'FROM sacoche_jointure_parent_eleve ';
$DB_SQL.= 'LEFT JOIN sacoche_user AS parent ON sacoche_jointure_parent_eleve.parent_id=parent.user_id ';
$DB_SQL.= 'LEFT JOIN sacoche_user AS eleve ON sacoche_jointure_parent_eleve.eleve_id=eleve.user_id ';
$DB_SQL.= 'WHERE ( (parent.user_id IS NULL) OR (eleve.user_id IS NULL) ) ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$tab_bilan[] = compte_rendu( DB::rowCount(SACOCHE_STRUCTURE_BD_NAME) , 'Jointures parent/enfant' );
// Élèves associés à une classe supprimée...
// Attention, l'id de classe à 0 est normal pour un élève non affecté ou un autre statut
$DB_SQL = 'UPDATE sacoche_user ';
$DB_SQL.= 'LEFT JOIN sacoche_groupe ON sacoche_user.eleve_classe_id=sacoche_groupe.groupe_id ';
$DB_SQL.= 'SET sacoche_user.eleve_classe_id=0 ';
$DB_SQL.= 'WHERE ( (sacoche_user.eleve_classe_id!=0) AND (sacoche_groupe.groupe_id IS NULL) ) ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$tab_bilan[] = compte_rendu( DB::rowCount(SACOCHE_STRUCTURE_BD_NAME) , 'Jointures élève/classe' );
// Signature associée à un user supprimé...
// Attention, l'id de user à 0 est normal pour le tampon et le logo de l'établissement
$DB_SQL = 'DELETE sacoche_image ';
$DB_SQL.= 'FROM sacoche_image ';
$DB_SQL.= 'LEFT JOIN sacoche_user USING (user_id) ';
$DB_SQL.= 'WHERE sacoche_image.user_id!=0 AND sacoche_user.user_id IS NULL ';
DB::query(SACOCHE_STRUCTURE_BD_NAME , $DB_SQL , NULL);
$tab_bilan[] = compte_rendu( DB::rowCount(SACOCHE_STRUCTURE_BD_NAME) , 'Jointures utilisateur/signature' );
// Retour
return $tab_bilan;
}
<table id="table_action" class="form">
<thead>
<tr>
<th>Identité</th>
<th>Profil</th>
<th class="nu"><q class="ajouter" title="Ajouter une liaison vers un autre compte."></q></th>
</tr>
</thead>
<tbody>
<?php
// Par sécurité et pour actualiser une éventuelle liaison (dé)faite depuis un autre compte, on ne stocke en session que l'identifiant de la clef des associations
// La méthode appelée ci-dessous effectue de multiples vérifications complémentaires
list($_SESSION['USER_SWITCH_ID'], $user_liste) = DB_STRUCTURE_SWITCH::DB_recuperer_et_verifier_listing_comptes_associes($_SESSION['USER_ID'], $_SESSION['USER_SWITCH_ID']);
if ($_SESSION['USER_SWITCH_ID']) {
$DB_TAB = DB_STRUCTURE_SWITCH::DB_recuperer_informations_comptes_associes($user_liste);
}
if (!empty($DB_TAB)) {
foreach ($DB_TAB as $DB_ROW) {
$balise_avant = $DB_ROW['user_id'] != $_SESSION['USER_ID'] ? '<a href="#id_' . $DB_ROW['user_id'] . '" title="Basculer vers ce compte.">' : '<span class="notnow" title="Compte actuel.">';
$balise_apres = $DB_ROW['user_id'] != $_SESSION['USER_ID'] ? '</a>' : '</span>';
// Afficher une ligne du tableau
echo '<tr id="id_' . $DB_ROW['user_id'] . '">';
echo '<td>' . $balise_avant . html($DB_ROW['user_nom'] . ' ' . $DB_ROW['user_prenom']) . $balise_apres . '</td>';
echo '<td>' . $balise_avant . $DB_ROW['user_profil_nom_court_singulier'] . $balise_apres . '</td>';
echo '<td class="nu">';
echo $DB_ROW['user_id'] != $_SESSION['USER_ID'] ? '<q class="supprimer" title="Supprimer la liaison vers ce compte."></q>' : '<q class="supprimer_non" title="Sans objet (compte actuel)."></q>';
echo '</td>';
echo '</tr>' . NL;
}
} else {
/**
* recuperer_et_verifier_listing_comptes_associes
*
* @param int $user_id
* @param int $user_switch_id
* @return array ($user_switch_id,$user_liste)
*/
public static function DB_recuperer_et_verifier_listing_comptes_associes($user_id, $user_switch_id)
{
$user_liste = NULL;
// Un "user_switch_id" est transmis : on recherche sur user_switch_liste, tout en vérifiant quand même que le user_id est dans la liste...
if ($user_switch_id) {
$DB_SQL = 'SELECT user_switch_id AS "0", user_switch_liste AS "1" ';
// Pour la récupération avec list()
$DB_SQL .= 'FROM sacoche_user_switch ';
$DB_SQL .= 'WHERE user_switch_id = :user_switch_id ';
$DB_SQL .= 'AND user_switch_liste LIKE :switch_liste_like ';
$DB_VAR = array(':user_switch_id' => $user_switch_id, ':switch_liste_like' => '%,' . $user_id . ',%');
list($user_switch_id, $user_switch_liste) = DB::queryRow(SACOCHE_STRUCTURE_BD_NAME, $DB_SQL, $DB_VAR) + array(NULL, NULL);
}
// Soit on n'est pas passé dans le test précédent, soit la liste récupérée ne contenait curieusement pas l'id du user : on recherche sur l'id du user, même s'il n'est pas normal qu'un rapprochement existe et ne soit pas transmis
if (!$user_switch_id) {
$DB_SQL = 'SELECT user_switch_id AS "0", user_switch_liste AS "1" ';
// Pour la récupération avec list()
$DB_SQL .= 'FROM sacoche_user_switch ';
$DB_SQL .= 'WHERE user_switch_liste LIKE :switch_liste_like ';
$DB_SQL .= 'LIMIT 1 ';
// Au cas où, même s'il ne devrait pas y avoir un même user sur des regroupement
$DB_VAR = array(':switch_liste_like' => '%,' . $user_id . ',%');
list($user_switch_id, $user_switch_liste) = DB::queryRow(SACOCHE_STRUCTURE_BD_NAME, $DB_SQL, $DB_VAR) + array(NULL, NULL);
}
// S'il y a des comptes associés, on vérifie qu'il n'y ait pas que le user_id dedans !
if ($user_switch_id && $user_switch_liste == ',' . $user_id . ',') {
DB_STRUCTURE_SWITCH::DB_supprimer_comptes_associes($user_switch_id);
list($user_switch_id, $user_switch_liste) = array(NULL, NULL);
}
// S'il y a des comptes associés, on vérifie que ce ne soient pas des comptes supprimés ou désactivés (si c'est le cas, alors on met la liste à jour)
if ($user_switch_id) {
$user_liste = substr($user_switch_liste, 1, -1);
// Lever si besoin une limitation de GROUP_CONCAT (group_concat_max_len est par défaut limité à une chaine de 1024 caractères) ; éviter plus de 8096 (http://www.glpi-project.org/forum/viewtopic.php?id=23767).
DB::query(SACOCHE_STRUCTURE_BD_NAME, 'SET group_concat_max_len = 8096');
$DB_SQL = 'SELECT GROUP_CONCAT(user_id ORDER BY user_id ASC SEPARATOR ",") AS user_switch_liste ';
$DB_SQL .= 'FROM sacoche_user ';
$DB_SQL .= 'WHERE user_id IN(' . $user_liste . ') AND user_sortie_date>NOW() ';
$user_liste = DB::queryOne(SACOCHE_STRUCTURE_BD_NAME, $DB_SQL, NULL);
if ($user_liste != substr($user_switch_liste, 1, -1)) {
// On a trouvé une différence...
if ($user_liste == $user_id) {
// Si seul le compte utilisé est envore actif, alors il n'y a plus de liaison
DB_STRUCTURE_SWITCH::DB_supprimer_comptes_associes($user_switch_id);
list($user_switch_id, $user_liste) = array(NULL, NULL);
} else {
// Sinon on met à jour avec la liste des comptes actifs
DB_STRUCTURE_SWITCH::DB_modifier_comptes_associes($user_switch_id, $user_liste);
}
}
}
return array($user_switch_id, $user_liste);
}
// Retirer une liaison
// ////////////////////////////////////////////////////////////////////////////////////////////////////
if ($action == 'supprimer' && $user_id) {
// Par sécurité et pour actualiser une éventuelle liaison (dé)faite depuis un autre compte, on ne stocke en session que l'identifiant de la clef des associations
// La méthode appelée ci-dessous effectue de multiples vérifications complémentaires
list($_SESSION['USER_SWITCH_ID'], $user_liste) = DB_STRUCTURE_SWITCH::DB_recuperer_et_verifier_listing_comptes_associes($_SESSION['USER_ID'], $_SESSION['USER_SWITCH_ID']);
if (!$_SESSION['USER_SWITCH_ID']) {
exit_json(FALSE, 'Aucune liaison de compte vous concernant n\'a été trouvée !');
}
$tab_user = explode(',', $user_liste);
$user_key = array_search($user_id, $tab_user);
if ($user_key === FALSE) {
exit_json(FALSE, 'Le compte indiqué n\'est pas relié au votre !');
}
// Ok pour supprimer la liaison
unset($tab_user[$user_key]);
// Soit on n'est plus relié avec personne...
if (count($tab_user) == 1) {
DB_STRUCTURE_SWITCH::DB_supprimer_comptes_associes($_SESSION['USER_SWITCH_ID']);
$_SESSION['USER_SWITCH_ID'] = NULL;
} else {
$user_liste = implode(',', $tab_user);
DB_STRUCTURE_SWITCH::DB_modifier_comptes_associes($_SESSION['USER_SWITCH_ID'], $user_liste);
}
// Afficher le retour
exit_json(TRUE);
}
// ////////////////////////////////////////////////////////////////////////////////////////////////////
// On ne devrait pas en arriver là !
// ////////////////////////////////////////////////////////////////////////////////////////////////////
exit_json(FALSE, 'Erreur avec les données transmises !');
DB_STRUCTURE_ADMINISTRATEUR::DB_supprimer_bilans_officiels();
// Supprimer les saisies brevet & les archives (Notanet & fiches brevet)
DB_STRUCTURE_ADMINISTRATEUR::DB_supprimer_bilans_brevet();
// Supprimer les comptes utilisateurs désactivés depuis plus de 3 ans
$DB_TAB = DB_STRUCTURE_ADMINISTRATEUR::DB_lister_users_desactives_obsoletes();
if(!empty($DB_TAB))
{
foreach($DB_TAB as $DB_ROW)
{
DB_STRUCTURE_ADMINISTRATEUR::DB_supprimer_utilisateur($DB_ROW['user_id'],$DB_ROW['user_profil_sigle']);
// Log de l'action
SACocheLog::ajouter('Suppression d\'un utilisateur au compte désactivé depuis plus de 3 ans ('.$DB_ROW['user_profil_sigle'].' '.$DB_ROW['user_id'].').');
}
}
// Retirer, dans les liaisons entre comptes, ceux qui sont désactivés ou supprimés
DB_STRUCTURE_SWITCH::DB_supprimer_liaisons_obsoletes();
// Retirer, dans les sélections d'items, les items supprimés
DB_STRUCTURE_SELECTION_ITEM::DB_supprimer_jointures_items_obsoletes();
// Retirer les sélections d'items sans item
DB_STRUCTURE_SELECTION_ITEM::DB_supprimer_selections_items_obsoletes();
// Supprimer les demandes d'évaluations, ainsi que les reliquats de notes 'REQ'
DB_STRUCTURE_ADMINISTRATEUR::DB_supprimer_demandes_evaluation();
DB_STRUCTURE_ADMINISTRATEUR::DB_supprimer_saisies_REQ();
// En profiter pour optimiser les tables (une fois par an, ça ne peut pas faire de mal)
DB_STRUCTURE_ADMINISTRATEUR::DB_optimiser_tables_structure();
// Débloquer l'application
LockAcces::debloquer_application('automate',$_SESSION['BASE']);
// Notifications (rendues visibles ultérieurement)
$notification_contenu = date('d-m-Y H:i:s').' '.$_SESSION['USER_PRENOM'].' '.$_SESSION['USER_NOM'].' a exécuté la purge annuelle de la base (initialisation de début d\'année).'."\r\n";
DB_STRUCTURE_NOTIFICATION::enregistrer_action_admin( $notification_contenu , $_SESSION['USER_ID'] );
// Afficher le retour
