<?php
/* Copyright (C) 2010 Laurent Destailleur  <eldy@users.sourceforge.net>
 * Copyright (C) 2023 Alexandre Janniaux   <alexandre.janniaux@gmail.com>
 * Copyright (C) 2024		MDW							<mdeweerd@users.noreply.github.com>
 * Copyright (C) 2024       Frédéric France         <frederic.france@free.fr>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program. If not, see <https://www.gnu.org/licenses/>.
 * or see https://www.gnu.org/
 */

/**
 *      \file       test/phpunit/ModulesTest.php
 *		\ingroup    test
 *      \brief      PHPUnit test
 *		\remarks	To run this script as CLI:  phpunit filename.php
 */

global $conf, $user, $langs, $db, $mysoc;

require_once dirname(__FILE__).'/../../htdocs/master.inc.php';
require_once dirname(__FILE__).'/CommonClassTest.class.php';

if (empty($user->id)) {
	print "Load permissions for admin user nb 1\n";
	$user->fetch(1);
	$user->loadRights();
}
$conf->global->MAIN_DISABLE_ALL_MAILS = 1;


use PHPUnit\Framework\TestCase;

/**
 * Class for PHPUnit tests
 *
 * @backupGlobals disabled
 * @backupStaticAttributes enabled
 * @remarks	backupGlobals must be disabled to have db,conf,user and lang not erased.
 */
class ModulesTest extends CommonClassTest // TestCase //CommonClassTest
{
	/**
	 * setUpBeforeClass
	 *
	 * @return void
	 */
	public static function setUpBeforeClass(): void
	{
		global $conf,$user,$langs,$db;

		print 'setUpBeforeClass '.$db->transaction_opened."\n";
		$db->begin(); // This is to have all actions inside a transaction even if test launched without suite.

		if ((int) getenv('PHPUNIT_DEBUG') > 0) {
			print get_called_class()."::".__FUNCTION__.PHP_EOL;
		}

		//$infotable = $db->DDLListTablesFull($db->database_name);
		//print "List of existing tables before running test ModulesTest\n";
		//print var_export($infotable, true)."\n";
	}

	/**
	 * tearDownAfterClass
	 *
	 * @return	void
	 */
	public static function tearDownAfterClass(): void
	{
		global $db;

		$db->rollback();
		print 'tearDownAfterClass '.$db->transaction_opened."\n";
		if ((int) getenv('PHPUNIT_DEBUG') > 0) {
			print get_called_class()."::".__FUNCTION__.PHP_EOL;
		}
	}


	/**
	 * Return list of modules for which to test initialisation
	 *
	 * @return array<array{0:string}> List of module labels to test (class is mod<module_label>)
	 */
	public function moduleInitListProvider()
	{
		$full_list = self::VALID_MODULE_MAPPING;
		/*
		$full_list = array(
		'category' => 'Categorie',
		'debugbar' => 'DebugBar',
		);
		*/

		$filtered_list = array_map(function ($value) {
			return array($value);
		}, array_filter($full_list, function ($value) {
			return $value !== null;
		}));
		return $filtered_list;
	}

	/**
	 * testModulesInit
	 *
	 * @return int
	 */
	public function testModulesInit()
	{
		global $conf,$user,$langs,$db,$mysoc;

		// WARNING: This test is doing init that include DDL and break transactions.So rollback may have no effect.

		//$modlabel = 'DebugBar';

		foreach ($this->moduleInitListProvider() as $case) {
			list($modlabel) = $case;
			$conf = $this->savconf;
			$user = $this->savuser;
			$langs = $this->savlangs;
			$db = $this->savdb;

			$mysoc = new Societe($db);
			$mysoc->setMysoc($conf);

			require_once DOL_DOCUMENT_ROOT.'/core/modules/mod'.$modlabel.'.class.php';
			$class = 'mod'.$modlabel;
			$mod = new $class($db);

			$result = $mod->remove();
			print __METHOD__." test remove for module ".$modlabel.", result=".$result."\n";

			$result = $mod->init();
			print __METHOD__." test init for module ".$modlabel.", result=".$result."\n";

			$this->assertLessThan($result, 0, $modlabel." ".$mod->error);


			if ($modlabel == 'User') {
				print __METHOD__." test table llx_user exists after Webhook init\n";
				$infotable = $db->DDLListTablesFull($db->database_name);
				//print var_export($infotable, true)."\n";
				$this->assertGreaterThan(0, count($infotable));
			}
			if ($modlabel == 'Webhook') {
				print __METHOD__." test table llx_webhook_target exists after Webhook init\n";
				$infotable = $db->DDLListTablesFull($db->database_name);
				//print var_export($infotable, true)."\n";
				$this->assertGreaterThan(0, count($infotable));
			}

			// WARNING: This test is doing init that include DDL and break transactions.So rollback may have no effect.
			// This is why we force disabling modules.

			// Disable modules
			if (in_array($modlabel, array('Ldap', 'MailmanSpip', 'DebugBar'))) {
				$result = $mod->remove();
			}
		}

		return 0;
	}
}