';
+print '| '.$langs->trans("BlockedLogDisableNotAllowedForCountry").' | ';
+print '';
+print '';
+print ' |
';
+
print '';
dol_fiche_end();
diff --git a/htdocs/core/lib/admin.lib.php b/htdocs/core/lib/admin.lib.php
index 422e7be984d..47624b2e05d 100644
--- a/htdocs/core/lib/admin.lib.php
+++ b/htdocs/core/lib/admin.lib.php
@@ -1132,6 +1132,82 @@ function complete_dictionary_with_modules(&$taborder,&$tabname,&$tablib,&$tabsql
return 1;
}
+/**
+ * Activate external modules for country if neccessary
+ *
+ * @param string $country_code CountryCode
+ * @return int 1
+ */
+function module_require_by_country($country_code)
+{
+ global $db, $conf, $langs;
+
+ $modulesdir = dolGetModulesDirs();
+
+ foreach ($modulesdir as $dir)
+ {
+ // Load modules attributes in arrays (name, numero, orders) from dir directory
+ dol_syslog("Scan directory ".$dir." for modules");
+ $handle=@opendir(dol_osencode($dir));
+ if (is_resource($handle))
+ {
+ while (($file = readdir($handle))!==false)
+ {
+ if (is_readable($dir.$file) && substr($file, 0, 3) == 'mod' && substr($file, dol_strlen($file) - 10) == '.class.php')
+ {
+ $modName = substr($file, 0, dol_strlen($file) - 10);
+
+ if ($modName)
+ {
+ include_once $dir.$file;
+ $objMod = new $modName($db);
+
+ if ($objMod->numero > 0)
+ {
+ $j = $objMod->numero;
+ }
+ else
+ {
+ $j = 1000 + $i;
+ }
+
+ $modulequalified=1;
+
+ // We discard modules according to features level (PS: if module is activated we always show it)
+ $const_name = 'MAIN_MODULE_'.strtoupper(preg_replace('/^mod/i','',get_class($objMod)));
+
+ if ($objMod->version == 'development' && $conf->global->MAIN_FEATURES_LEVEL < 2) $modulequalified=0;
+ if ($objMod->version == 'experimental' && $conf->global->MAIN_FEATURES_LEVEL < 1) $modulequalified=0;
+ if(!empty($conf->global->$const_name)) $modulequalified=0; // already activated
+
+ if ($modulequalified)
+ {
+ // Load languages files of module
+ if (isset($objMod->automatic_activation) && is_array($objMod->automatic_activation) && isset($objMod->automatic_activation[$country_code]))
+ {
+
+ activateModule($modName);
+
+ setEventMessage($objMod->automatic_activation[$country_code],'warnings');
+
+ }
+
+ }
+ else dol_syslog("Module ".get_class($objMod)." not qualified");
+ }
+ }
+ }
+ closedir($handle);
+ }
+ else
+ {
+ dol_syslog("htdocs/admin/modules.php: Failed to open directory ".$dir.". See permission and open_basedir option.", LOG_WARNING);
+ }
+ }
+
+ return 1;
+}
+
/**
* Add external modules to list of contact element
*
diff --git a/htdocs/core/modules/modBlockedLog.class.php b/htdocs/core/modules/modBlockedLog.class.php
index 6928c6f6f1c..7c1227e14fe 100644
--- a/htdocs/core/modules/modBlockedLog.class.php
+++ b/htdocs/core/modules/modBlockedLog.class.php
@@ -36,7 +36,7 @@ class modBlockedLog extends DolibarrModules
*/
function __construct($db)
{
- global $langs,$conf;
+ global $langs,$conf,$mysoc;
$this->db = $db;
$this->numero = 3200;
@@ -69,8 +69,12 @@ class modBlockedLog extends DolibarrModules
$this->depends = array('always'=>'modFacture'); // List of modules id that must be enabled if this module is enabled
$this->requiredby = array(); // List of modules id to disable if this one is disabled
$this->conflictwith = array(); // List of modules id this module is in conflict with
- $this->langfiles = array();
+ $this->langfiles = array('blockedlog');
+ $this->warnings_unactivation = array('FR'=>'BlockedLogAreRequiredByYourCountryLegislation');
+
+ $this->automatic_activation = array('FR'=>'BlockedLogActivatedBecauseRequiredByYourCountryLegislation');
+
// Constants
//-----------
@@ -86,5 +90,55 @@ class modBlockedLog extends DolibarrModules
// Main menu entries
//------------------
$this->menu = array();
+
+ $this->always_enabled = !empty($conf->blockedlog->enabled) && !empty($conf->global->BLOCKEDLOG_DISABLE_NOT_ALLOWED_FOR_COUNTRY) && in_array($mysoc->country_code, explode(',', $conf->global->BLOCKEDLOG_DISABLE_NOT_ALLOWED_FOR_COUNTRY));
+
+ }
+
+ /**
+ * Check if module was already used before unactivation linked to warnings_unactivation property
+ */
+ function alreadyUsed() {
+
+ $res = $this->db->query("SELECT count(*) as nb FROM ".MAIN_DB_PREFIX."blockedlog");
+ if($res!==false) {
+ $obj = $this->db->fetch_object($res);
+ return ($obj->nb > 0);
+ }
+
+ return false;
+ }
+
+ /**
+ * Function called when module is disabled.
+ * The remove function removes tabs, constants, boxes, permissions and menus from Dolibarr database.
+ * Data directories are not deleted
+ *
+ * @param string $options Options when enabling module ('', 'noboxes')
+ * @return int 1 if OK, 0 if KO
+ */
+ function remove($options = '') {
+
+ global $user;
+
+ require_once DOL_DOCUMENT_ROOT.'/blockedlog/class/blockedlog.class.php';
+
+ $object=new stdClass;
+ $object->id = 1;
+ $object->element = 'module';
+ $object->ref = 'module';
+ $object->date = time();
+
+ $b=new BlockedLog($this->db);
+ $b->setObjectData($object, 'MODULE_RESET', -1);
+
+ $res = $b->create($user);
+ if($res<=0) {
+ $this->error = $b->error;
+ return $res;
+ }
+
+ return $this->_remove(array(), $options);
+
}
}
diff --git a/htdocs/langs/en_US/admin.lang b/htdocs/langs/en_US/admin.lang
index b8673911f7f..fc3caa74657 100644
--- a/htdocs/langs/en_US/admin.lang
+++ b/htdocs/langs/en_US/admin.lang
@@ -1765,3 +1765,4 @@ ResourceSetup=Configuration du module Resource
UseSearchToSelectResource=Use a search form to choose a resource (rather than a drop-down list).
DisabledResourceLinkUser=Disabled resource link to user
DisabledResourceLinkContact=Disabled resource link to contact
+ConfirmUnactivation=Confirm module reset
diff --git a/htdocs/langs/en_US/blockedlog.lang b/htdocs/langs/en_US/blockedlog.lang
index 9c4edd35a52..8f3ef9ff22e 100644
--- a/htdocs/langs/en_US/blockedlog.lang
+++ b/htdocs/langs/en_US/blockedlog.lang
@@ -26,4 +26,7 @@ DownloadLogCSV=Download archive logs (CSV)
logDOC_PREVIEW=Preview of a validated document in order to print or download
logDOC_DOWNLOAD=Download of a validated document in order to print or send
DataOfArchivedEvent=Full datas of archived event
-ImpossibleToReloadObject=Object (type %s, id %s) removed
\ No newline at end of file
+ImpossibleToReloadObject=Object (type %s, id %s) removed
+BlockedLogAreRequiredByYourCountryLegislation=Unalterable logs are required by the legislation of your country. Disabling this module may render any future transactions invalid with respect to the law and the use of non-legal software as it can not be validated by a tax audit.
+BlockedLogActivatedBecauseRequiredByYourCountryLegislation=Unalterable logs module was activated because of the legislation of your country. Disabling this module may render any future transactions invalid with respect to the law and the use of non-legal software as it can not be validated by a tax audit.
+BlockedLogDisableNotAllowedForCountry=Disable not allowed for this countries
\ No newline at end of file