if (ldap_get_right("lcs_is_admin",$login)!="Y") die (gettext("Vous n'avez pas les droits suffisants pour accéder à cette fonction")."</BODY></HTML>"); if (count($_GET)>0) { //configuration objet include ("/var/www/lcs/includes/htmlpurifier/library/HTMLPurifier.auto.php"); $config = HTMLPurifier_Config::createDefault(); $purifier = new HTMLPurifier($config); //purification des variables $p=$purifier->purify($_GET['p']); $v=$purifier->purify($_GET['v']); $n=$purifier->purify($_GET['n']); $d=$purifier->purify($_GET['d']); } include("modules_commun.php"); $nf="lcs-".$n; //on supprime eventuellement les residus d'un processus interrompu $net=" rm -f /tmp/ecran_install*"; exec($net); //creation du fichier /tmp/ecran_install_nom_module.html $fecran = cree_nom_fichier_ecran($nf); creation_ecran($fecran,$msgIntro); ecrit_ecran($fecran, "<H3>Installation de </H3> <B> " . $d ." $nf ". $v ." le ". date('d/m/Y à H\hi')." </B> " ); ecrit_ecran($fecran,"<H3>Exécution du script: </H3>"); //commande d'installation $nfe= escapeshellarg("lcs-".$n); $cmd= "/usr/bin/sudo -H -u root /usr/share/lcs/scripts/gestpack.sh " .escapeshellarg($p). " install ".$nfe; exec($cmd); ?> </HTML>
$purifier = new HTMLPurifier($config); //purification des variables $dpid=$purifier->purify($_GET['dpid']); } include("modules_commun.php"); $dpid=((isset($GLOBALS["___mysqli_ston"]) && is_object($GLOBALS["___mysqli_ston"])) ? mysqli_real_escape_string($GLOBALS["___mysqli_ston"], $dpid) : ((trigger_error("[MySQLConverterToo] Fix the mysql_escape_string() call! This code does not work.", E_USER_ERROR)) ? "" : "")); $result = mysqli_query($GLOBALS["___mysqli_ston"], "SELECT * FROM applis WHERE id='$dpid'"); if (!$result) die("Erreur lors de la requète MySQL"); $row = mysqli_fetch_object($result); $version = $row->version; $nommodule= $row->name; $descrip=$row->descr; ((mysqli_free_result($result) || (is_object($result) && (get_class($result) == "mysqli_result"))) ? true : false); //on supprime eventuellement les residus d'un processus interrompu $net=" rm -f /tmp/ecran_install*"; exec($net); //creation du fichier /tmp/ecran_install_nom_module.html $nf="lcs-".$nommodule; $nfe= escapeshellarg($nf); $fecran = cree_nom_fichier_ecran($nf); creation_ecran($fecran,$msgIntro); ecrit_ecran($fecran, "<H3>Désinstallation de </H3><B>" . $descrip." $nf ".$version. " le ". date('d/m/Y à H\hi')."</B>"); ecrit_ecran($fecran,"<H3>Execution du script</H3>"); //commande de desinstallation $cmd= "/usr/bin/sudo -H -u root /usr/share/lcs/scripts/gestpack.sh 'deb http://lcs.crdp.ac-caen.fr/ Lcs main' 'remove --purge' ".$nfe; exec($cmd); ?> </html>