ZwiiCMS/core/module/addon/addon.php

<?php

/**
 * This file is part of Zwii.
 *
 * For full copyright and license information, please see the LICENSE
 * file that was distributed with this source code.
 *
 * @author Rémi Jean <remi.jean@outlook.com>
 * @copyright Copyright (C) 2008-2018, Rémi Jean
 * @author Frédéric Tempez <frederic.tempez@outlook.com>
 * @copyright Copyright (C) 2018-2020, Frédéric Tempez
 * @license GNU General Public License, version 3
 * @link http://zwiicms.fr/
 */

class addon extends common {

	public static $actions = [
		'index' => self::GROUP_ADMIN,
		'moduleDelete' => self::GROUP_ADMIN
	];

	// Gestion des modules
	public static $modInstal = [];

	// pour tests
	public static $valeur = [];

	/*
	* Effacement d'un module installé et non utilisé
	*/
	public function moduleDelete() {

		// Jeton incorrect
		if ($this->getUrl(3) !== $_SESSION['csrf']) {
			// Valeurs en sortie
			$this->addOutput([
				'redirect' => helper::baseUrl()  . 'addon',
				'state' => false,
				'notification' => 'Action non autorisée'
			]);
		}
		else{
			// Suppression des dossiers
			if( $this->delete_directory('./module/'.$this->getUrl(2)) === true){
				$success = true;
				$notification = 'Module '.$this->getUrl(2) .' effacé du dossier /module/, il peut rester des données dans d\'autres dossiers';
			}
			else{
				$success = false;
				$notification = 'La suppression a échouée';
			}
			// Valeurs en sortie
			$this->addOutput([
				'redirect' => helper::baseUrl() . 'addon',
				'notification' => $notification,
				'state' => $success
			]);
		}
	}


	/**
	 * Gestion des modules
	 */
	public function index() {
		// Retour du formulaire ?
		if($this->isPost()) {
			// Installation d'un module
			$success = true;
			$checkValidMaj = $this->getInput('configModulesCheck', helper::FILTER_BOOLEAN);
			$zipFilename =	$this->getInput('configModulesInstallation', helper::FILTER_STRING_SHORT);
			if( $zipFilename !== ''){
				$tempFolder = 'datamodules';//uniqid();
				$zip = new ZipArchive();
				if ($zip->open(self::FILE_DIR.'source/'.$zipFilename) === TRUE) {
					$notification = 'Archive ouverte';
					mkdir (self::TEMP_DIR . $tempFolder);
					$zip->extractTo(self::TEMP_DIR . $tempFolder );
					// Archive de module ?
					$success = false;
					$notification = 'Ce n\'est pas l\'archive d\'un module !';
					$moduleDir = self::TEMP_DIR . $tempFolder . '/module';
					$moduleName = '';
					if ( is_dir( $moduleDir )) {
						// Lire le nom du module
						if ($dh = opendir( $moduleDir )) {
							while (($file = readdir($dh)) !== false) {
								$moduleName = $file;
							}
							closedir($dh);
						}
						// Module normalisé ?
						if( is_file( $moduleDir.'/'.$moduleName.'/'.$moduleName.'.php' ) AND is_file( $moduleDir.'/'.$moduleName.'/view/index/index.php' ) ){

							// Lecture de la version du module pour validation de la mise à jour
							// Pour une version <= version installée l'utilisateur doit cocher 'Mise à jour forcée'
							// Lecture de version en lisant la valeur des constantes directement dans le fichier nommodule.php
							$version = '0.0';
							$file = file_get_contents( $moduleDir.'/'.$moduleName.'/'.$moduleName.'.php');
							// A FAIRE supprimer les espaces et les tab et rechercher 'constVERSION'
							$pos1 = strpos($file, 'const VERSION');
							if( $pos1 !== false){
								$posdeb = strpos($file, "'", $pos1);
								$posend = strpos($file, "'", $posdeb + 1);
								$version = substr($file, $posdeb + 1, $posend - $posdeb - 1);
							}

							// Module déjà installé ?
							$moduleInstal = false;
							foreach( self::$modInstal as $key=>$value){
								if($moduleName === $value[0]){
									$moduleInstal = true;
								}
							}

							// Validation de la maj si autorisation du concepteur du module ET
							// ( Version plus récente OU Check de forçage )
							$valNewVersion = floatval($version);
							$valInstalVersion = floatval( $infomodule[$moduleName]['version'] );
							$newVersion = false;
							if( $valNewVersion > $valInstalVersion ) $newVersion = true;
							$validMaj = $infomodule[$moduleName]['update'] && ( $newVersion || $checkValidMaj);

							// Nouvelle installation ou mise à jour du module
							if( ! $moduleInstal ||  $validMaj ){
								// Copie récursive des dossiers
								$this -> custom_copy( self::TEMP_DIR . $tempFolder, './' );
								$success = true;
								if( ! $moduleInstal ){
									$notification = 'Module '.$moduleName.' installé';
								}
								else{
									$notification = 'Module '.$moduleName.' mis à jour';
								}
							}
							else{
								$success = false;
								$notification = ' Version détectée '.$version.' <= à celle installée '.$infomodule[$moduleName]['version'];
								if( $infomodule[$moduleName]['update'] === false){
									$notification = ' Mise à jour par ce procédé interdite par le concepteur du module';
								}
							}
						}
					}
					// Supprimer le dossier temporaire même si le module est invalide
					$this->removeDir(self::TEMP_DIR . $tempFolder);
					$zip->close();
				} else {
					// erreur à l'ouverture
					$success = false;
					$notification = 'Impossible d\'ouvrir l\'archive';
				}
			}

			$this->addOutput([
				'redirect' => helper::baseUrl() . $this->getUrl(),
				'notification' => $notification,
				'state' => $success
			]);
		}
		$infomodule = helper::getModules();
		// $infomodule[nom_module]['realName'], ['version'], ['update'], ['delete'], ['dataDirectory']
		// Préparation du tableau des modules installés
		// Liste des modules installés (répertoire de module/)
		if ($dh = opendir( 'module/' )) {
			$i=0;
			while (($dirmodule = readdir($dh)) !== false) {
				if( $dirmodule !== '.' && $dirmodule !== '..'){
					self::$modInstal[$i][0] = $dirmodule; // nom du module
					self::$modInstal[$i][1] = $infomodule[$dirmodule]['realName'];
					self::$modInstal[$i][2] = $infomodule[$dirmodule]['version'];
					// Initialisations
					self::$modInstal[$i][3] = ''; // page(s)
					self::$modInstal[$i][4] = ''; // pour button effacement
					self::$modInstal[$i][5] = ''; // pour button download
					$i++;
				}
			}
			closedir($dh);
		}
		foreach( self::$modInstal as $i=>$value){
			// Page(s)
			foreach( $this->getData(['page']) as $keyPage=>$valuePage){
				if( $valuePage['moduleId'] === self::$modInstal[$i][0]){
					if(self::$modInstal[$i][3] !==''){
						self::$modInstal[$i][3] = self::$modInstal[$i][3].'<br>'.$valuePage['title'];
					}
					else{
						self::$modInstal[$i][3] = $valuePage['title'];
					}
				}
			}
			// Non utilisé et autorisation de suppression ?
			if( self::$modInstal[$i][3] == '' && $infomodule[ self::$modInstal[$i][0] ]['delete'] === true ){
				self::$modInstal[$i][4] =	template::button('moduleDelete' . self::$modInstal[$i][0], [
						'class' => 'moduleDelete buttonRed',
						'href' => helper::baseUrl() . $this->getUrl(0) . '/moduleDelete/' . self::$modInstal[$i][0] . '/' . $_SESSION['csrf'],
						'value' => template::ico('cancel')
					]);
			}
			// Présence de données externes à module.json ?
			if( $infomodule[ self::$modInstal[$i][0] ]['dataDirectory'] !== '' ){
				self::$modInstal[$i][5] =	template::button('moduleExport' . self::$modInstal[$i][0], [
						'class' => 'buttonBlue',
						//'href' => helper::baseUrl() . $this->getUrl(0) . '/exportData/' . self::$modInstal[$i][0] . '/' . $_SESSION['csrf'],
						'href' => helper::baseUrl(false).$this->exportZip( self::$modInstal[$i][0] ),
						'value' => template::ico('upload')
					]);
			}

		}
		// Valeurs en sortie
		$this->addOutput([
			'title' => 'Gestion des modules',
			'view' => 'index'
		]);
	}

	/*
	* Copie récursive de dossiers
	*
	*/
	private function custom_copy($src, $dst) {
		// open the source directory
		$dir = opendir($src);
		// Make the destination directory if not exist
		@mkdir($dst);
		// Loop through the files in source directory
		while( $file = readdir($dir) ) {
			if (( $file != '.' ) && ( $file != '..' )) {
				if ( is_dir($src . '/' . $file) ){
					// Recursively calling custom copy function
					// for sub directory
					$this -> custom_copy($src . '/' . $file, $dst . '/' . $file);
				}
				else {
					copy($src . '/' . $file, $dst . '/' . $file);
				}
			}
		}
		closedir($dir);
	}

	/*
	*
	* Suppression d'un dossier et de ses sous-dossiers
	*/
	private function delete_directory($directory, $empty = false) {
		if(substr($directory,-1) == "/") {
			$directory = substr($directory,0,-1);
		}
		if(!file_exists($directory) || !is_dir($directory)) {
			return false;
		} elseif(!is_readable($directory)) {
			return false;
		} else {
			$directoryHandle = opendir($directory);
			while ($contents = readdir($directoryHandle)) {
				if($contents != '.' && $contents != '..') {
					$path = $directory . "/" . $contents;
					if(is_dir($path)) {
						$this->delete_directory($path);
					} else {
						unlink($path);
					}
				}
			}
			closedir($directoryHandle);
			if($empty == false) {
				if(!rmdir($directory)) {
					return false;
				}
			}
			return true;
		}
	}

	/*
	* Création récursive d'un zip
	* https://makitweb.com/how-to-create-and-download-a-zip-file-with-php/
	*/
	private function createZip($zip,$dir){
		if (is_dir($dir)){
			if ($dh = opendir($dir)){
				while (($file = readdir($dh)) !== false){
					// If file
					if (is_file($dir.$file)) {
						if($file != '' && $file != '.' && $file != '..'){
						   $zip->addFile($dir.$file);
						}
					}
					else{
						// If directory
						if(is_dir($dir.$file) ){
							if($file != '' && $file != '.' && $file != '..'){
								// Add empty directory
								$zip->addEmptyDir($dir.$file);
								$folder = $dir.$file.'/';
								// Read data of the folder
								$this->createZip($zip,$folder);
							}
						}
					}
				}
				closedir($dh);
			}
		}
	}

	/*
	* Export des données d'un module externes à module.json
	*/
	private function exportZip( $exportModule ){
			$infomodule = helper::getModules();
			// création du zip
			$zip = new ZipArchive();
			if( ! is_dir('tmp/exportDataModules')) mkdir('tmp/exportDataModules',0777, true);
			$filename = 'tmp/exportDataModules/'.$exportModule.'dataExport.zip';
			if( is_file( $filename )) unlink( $filename);
			$directory = $infomodule[$exportModule]['dataDirectory'].'/';
			if($zip->open( $filename, ZipArchive::CREATE) !== TRUE){
				exit;
			}
			else{
				$this->createZip($zip,$directory);
				$zip->close();
			}
			return( $filename );
	}
}