dolibarr/htdocs/blockedlog/admin/registration.php

<?php
/* Copyright (C) 2017      	ATM Consulting      <contact@atm-consulting.fr>
 * Copyright (C) 2017-2026 	Laurent Destailleur <ldestailleur@dolicloud.com>
 * Copyright (C) 2024-2026 	Frédéric France     <frederic.france@free.fr>
 * Copyright (C) 2026		MDW					<mdeweerd@users.noreply.github.com>
 *
 * 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/>.
 */

/**
 *	\file       htdocs/blockedlog/admin/registration.php
 *  \ingroup    blockedlog
 *  \brief      Page setup for blockedlog module (user registration)
 */


// Load Dolibarr environment
require '../../main.inc.php';
/**
 * @var Conf $conf
 * @var DoliDB $db
 * @var HookManager $hookmanager
 * @var Societe $mysoc
 * @var Translate $langs
 * @var User $user
 */
require_once DOL_DOCUMENT_ROOT.'/blockedlog/lib/blockedlog.lib.php';
require_once DOL_DOCUMENT_ROOT.'/blockedlog/class/blockedlog.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/modules/modBlockedLog.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/lib/admin.lib.php';
require_once DOL_DOCUMENT_ROOT.'/core/lib/profid.lib.php';
require_once DOL_DOCUMENT_ROOT.'/core/class/html.formcompany.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/class/html.formsetup.class.php';

// Load translation files required by the page
$langs->loadLangs(array('admin', 'blockedlog', 'other'));

// Get Parameters
$action     = GETPOST('action', 'aZ09');
$backtopage = GETPOST('backtopage', 'alpha');
$cancel     = GETPOST('cancel');

$withtab    = GETPOSTISSET('withtab') ? GETPOSTINT('withtab') : 1;
$origin     = GETPOST('origin');
$mode       = GETPOST('mode');

// Access Control
if (!$user->admin) {
	accessforbidden();
}


/*
 * Actions
 */

if (getDolGlobalString('BLOCKEDLOG_FOR_TAX_AUDITOR')) {	// If we are in mode for tax auditor
	header("Location: ".DOL_URL_ROOT.'/blockedlog/admin/blockedlog_archives.php');
	exit;
}

if ($cancel && $origin == 'initmodule') {
	header("Location: ".DOL_URL_ROOT."/admin/modules.php");
	exit(0);
}
if ($cancel) {
	$action = '';
}

if ($action == 'update') {
	$error = 0;
	$db->begin();

	// The mandatory information must be the same than the one defined into isRegistrationDataSaved()
	if (!GETPOST("BLOCKEDLOG_REGISTRATION_NAME")) {
		setEventMessages($langs->trans("ErrorFieldRequired", $langs->trans("BLOCKEDLOG_REGISTRATION_NAME")), null, 'errors');
		$error++;
	}
	if (!GETPOST("BLOCKEDLOG_REGISTRATION_EMAIL")) {
		setEventMessages($langs->trans("ErrorFieldRequired", $langs->trans("BLOCKEDLOG_REGISTRATION_EMAIL")), null, 'errors');
		$error++;
	}
	if (!GETPOST("BLOCKEDLOG_REGISTRATION_COUNTRY_ID")) {
		setEventMessages($langs->trans("ErrorFieldRequired", $langs->trans("BLOCKEDLOG_REGISTRATION_COUNTRY_CODE")), null, 'errors');
		$error++;
	}
	if (!GETPOST("BLOCKEDLOG_REGISTRATION_IDPROF1")) {
		setEventMessages($langs->trans("ErrorFieldRequired", $langs->transcountry("ProfId1", $mysoc->country_code)), null, 'errors');
		$error++;
	}
	if (!GETPOST("BLOCKEDLOG_REGISTRATION_IDPROF2")) {
		setEventMessages($langs->trans("ErrorFieldRequired", $langs->transcountry("ProfId2", $mysoc->country_code)), null, 'errors');
		$error++;
	}

	$tmpthirdparty = new Societe($db);

	$tmparray = getCountry(GETPOSTINT('BLOCKEDLOG_REGISTRATION_COUNTRY_ID'), 'all', $db, $langs, 0);
	if (!empty($tmparray['id'])) {
		// Check we can change country
		include_once DOL_DOCUMENT_ROOT.'/blockedlog/lib/blockedlog.lib.php';
		if ($mysoc->country_code == 'FR' && $tmparray['code'] != $mysoc->country_code && isALNERunningVersion()) {
			// Trying to change the country. We refuse.
			$langs->load("blockedlog");
			setEventMessages($langs->trans("BlockedLogCountryChangeNotAllowedFR"), null, 'errors');
			$error++;
		} else {
			$mysoc->country_id   = $tmparray['id'];
			$mysoc->country_code = $tmparray['code'];
			$mysoc->country_label = $tmparray['label'];

			$s = $mysoc->country_id.':'.$mysoc->country_code.':'.$mysoc->country_label;
			dolibarr_set_const($db, "MAIN_INFO_SOCIETE_COUNTRY", $s, 'chaine', 0, '', $conf->entity);

			$tmpthirdparty->country_code = $mysoc->country_code;
			$tmpthirdparty->country_id = $mysoc->country_id;
			$tmpthirdparty->country_label = $mysoc->country_label;
			$tmpthirdparty->idprof1 = GETPOST("BLOCKEDLOG_REGISTRATION_IDPROF1");
			$tmpthirdparty->idprof2 = GETPOST("BLOCKEDLOG_REGISTRATION_IDPROF2");

			activateModulesRequiredByCountry($mysoc->country_code);
		}
	}

	// Check validity of email
	if (!isValidEmail(GETPOST("BLOCKEDLOG_REGISTRATION_EMAIL"))) {
		setEventMessages($langs->trans("ErrorBadEMail", GETPOST("BLOCKEDLOG_REGISTRATION_EMAIL")), null, 'errors');
		$error++;
	}

	// Check validity of prof id
	if ($tmpthirdparty->idprof1 && isValidProfIds(1, $tmpthirdparty, 1) <= 0) {
		$langs->loadLangs(array("errors", "companies"));
		setEventMessages($langs->trans("ErrorBadValueForParameter", $tmpthirdparty->idprof1, $langs->transcountry("ProfId1Short", $tmpthirdparty->country_code)), null, 'errors');
		$error++;
	}
	if ($tmpthirdparty->idprof2 && isValidProfIds(2, $tmpthirdparty, 1) <= 0) {
		$langs->loadLangs(array("errors", "companies"));
		setEventMessages($langs->trans("ErrorBadValueForParameter", $tmpthirdparty->idprof2, $langs->transcountry("ProfId2Short", $tmpthirdparty->country_code)), null, 'errors');
		$error++;
	}

	// Check that we don't change the SIREN. A new Dolibarr instance must be created to change SIREN.
	if ($mysoc->country_code == 'FR' && $tmpthirdparty->idprof1 && $tmpthirdparty->idprof1 != $mysoc->idprof1 && isALNERunningVersion()) {
		$langs->load("blockedlog");
		setEventMessages($langs->trans("BlockedLogProfID1ChangeNotAllowedFR"), null, 'errors');
		$error++;
	}

	$company_name = GETPOST("BLOCKEDLOG_REGISTRATION_NAME");
	$company_email = GETPOST("BLOCKEDLOG_REGISTRATION_EMAIL");
	$company_country_code = $tmparray['code'];
	$company_idprof1 = GETPOST("BLOCKEDLOG_REGISTRATION_IDPROF1");
	$company_idprof2 = GETPOST("BLOCKEDLOG_REGISTRATION_IDPROF2");
	$company_address = GETPOST("BLOCKEDLOG_REGISTRATION_ADDRESS");
	$company_state = GETPOST("BLOCKEDLOG_REGISTRATION_STATE");
	$company_zip = GETPOST("BLOCKEDLOG_REGISTRATION_ZIP");
	$company_town = GETPOST("BLOCKEDLOG_REGISTRATION_TOWN");

	$provider_name = GETPOST("MAIN_INFO_ITPROVIDER_NAME");
	$provider_email = GETPOST("MAIN_INFO_ITPROVIDER_MAIL");
	$provider_country_id = GETPOST("MAIN_INFO_ITPROVIDER_COUNTRY");
	$provider_idprof1 = GETPOST("MAIN_INFO_ITPROVIDER_IDPROF1");
	$provider_idprof2 = GETPOST("MAIN_INFO_ITPROVIDER_IDPROF2");
	$provider_address = GETPOST("MAIN_INFO_ITPROVIDER_ADDRESS");
	$provider_state = GETPOST("MAIN_INFO_ITPROVIDER_STATE");
	$provider_zip = GETPOST("MAIN_INFO_ITPROVIDER_ZIP");
	$provider_town = GETPOST("MAIN_INFO_ITPROVIDER_TOWN");

	if (!$error) {
		//Company
		$res = dolibarr_set_const($db, "BLOCKEDLOG_REGISTRATION_NAME", $company_name, 'chaine', 0, '', $conf->entity);
		if ($res <= 0) {
			$error++;
		}
		$res = dolibarr_set_const($db, "BLOCKEDLOG_REGISTRATION_EMAIL", $company_email, 'chaine', 0, '', $conf->entity);
		if ($res <= 0) {
			$error++;
		}
		$res = dolibarr_set_const($db, "MAIN_INFO_SIREN", $company_idprof1, 'chaine', 0, '', $conf->entity);
		if ($res <= 0) {
			$error++;
		}
		$res = dolibarr_set_const($db, "MAIN_INFO_SIRET", $company_idprof2, 'chaine', 0, '', $conf->entity);
		if ($res <= 0) {
			$error++;
		}
		$res = dolibarr_set_const($db, "BLOCKEDLOG_REGISTRATION_ADDRESS", $company_address, 'chaine', 0, '', $conf->entity);
		if ($res <= 0) {
			$error++;
		}
		$res = dolibarr_set_const($db, "BLOCKEDLOG_REGISTRATION_STATE", $company_state, 'chaine', 0, '', $conf->entity);
		if ($res <= 0) {
			$error++;
		}
		$res = dolibarr_set_const($db, "BLOCKEDLOG_REGISTRATION_ZIP", $company_zip, 'chaine', 0, '', $conf->entity);
		if ($res <= 0) {
			$error++;
		}
		$res = dolibarr_set_const($db, "BLOCKEDLOG_REGISTRATION_TOWN", $company_town, 'chaine', 0, '', $conf->entity);
		if ($res <= 0) {
			$error++;
		}

		//IT Provider
		$res = dolibarr_set_const($db, "MAIN_INFO_ITPROVIDER_NAME", $provider_name, 'chaine', 0, '', $conf->entity);
		if ($res <= 0) {
			$error++;
		}
		$res = dolibarr_set_const($db, "MAIN_INFO_ITPROVIDER_MAIL", $provider_email, 'chaine', 0, '', $conf->entity);
		if ($res <= 0) {
			$error++;
		}
		$res = dolibarr_set_const($db, "MAIN_INFO_ITPROVIDER_COUNTRY", $provider_country_id, 'chaine', 0, '', $conf->entity);
		if ($res <= 0) {
			$error++;
		}
		$res = dolibarr_set_const($db, "MAIN_INFO_ITPROVIDER_IDPROF1", $provider_idprof1, 'chaine', 0, '', $conf->entity);
		if ($res <= 0) {
			$error++;
		}
		$res = dolibarr_set_const($db, "MAIN_INFO_ITPROVIDER_IDPROF2", $provider_idprof1, 'chaine', 0, '', $conf->entity);
		if ($res <= 0) {
			$error++;
		}
		$res = dolibarr_set_const($db, "MAIN_INFO_ITPROVIDER_ADDRESS", $provider_address, 'chaine', 0, '', $conf->entity);
		if ($res <= 0) {
			$error++;
		}
		$res = dolibarr_set_const($db, "MAIN_INFO_ITPROVIDER_STATE", $provider_state, 'chaine', 0, '', $conf->entity);
		if ($res <= 0) {
			$error++;
		}
		$res = dolibarr_set_const($db, "MAIN_INFO_ITPROVIDER_ZIP", $provider_zip, 'chaine', 0, '', $conf->entity);
		if ($res <= 0) {
			$error++;
		}
		$res = dolibarr_set_const($db, "MAIN_INFO_ITPROVIDER_TOWN", $provider_town, 'chaine', 0, '', $conf->entity);
		if ($res <= 0) {
			$error++;
		}
	}
	if (!$error) {
		$db->commit();

		// If HMAC key was not saved, we do it now

		require_once DOL_DOCUMENT_ROOT . '/blockedlog/class/blockedlog.class.php';
		$b = new BlockedLog($db);

		$hmac_encoded_secret_key = getDolGlobalString('BLOCKEDLOG_HMAC_KEY');

		if (empty($hmac_encoded_secret_key)) {
			// No key yet, we generate one.
			$randomsecret = bin2hex(random_bytes(32)); 	// 64 char hex - 256 bits

			$hmac_secret_key = 'BLOCKEDLOGHMAC'.$randomsecret;		// Example: 'BLOCKEDLOGHMACY3Ewx37RXbSd8gL9JV8p7Wqw7qvq2K2A'
			$hmac_secret_key = 'BLOCKEDLOGHMACY3Ewx37RXbSd8gL9JV8p7Wqw7qvq2K2A';

			$obfuscationkey = $b->getObfuscationKey();	// Get the obfuscation key from memory. If not found, it will be created.

			$result = $b->saveHMACSecretKey($hmac_secret_key, 'dolobfuscationv1-'.$mysoc->idprof1, $obfuscationkey); 	// gitleaks:allow
		}


		//setEventMessages("SetupSaved", null, 'mesgs');
		$urltouse = $_SERVER["PHP_SELF"]."?mode=forceregistration";
		$urltouse .= (($withtab && GETPOST('origin')) ? '&withtab='.$withtab : '');
		$urltouse .= (GETPOST('origin') ? '&origin='.GETPOST('origin') : '');

		header("Location: ".$urltouse);
		exit;
	} else {
		$db->rollback();
	}
}


/*
 *	View
 */

$formSetup = new FormSetup($db);
$form = new Form($db);
$formcompany = new FormCompany($db);
$block_static = new BlockedLog($db);
$block_static->loadTrackedEvents();

if ($withtab) {
	$title = $langs->trans("ModuleSetup").' '.$langs->trans('BlockedLog');
} else {
	$title = $langs->trans("BrowseBlockedLog");
}

$help_url = "EN:Module_Unalterable_Archives_-_Logs|FR:Module_Archives_-_Logs_Inaltérable";

llxHeader('', $title, $help_url, '', 0, 0, '', '', '', 'mod-blockedlog page-admin_blockedlog');

if ($withtab) {
	$linkback = '<a href="'.dolBuildUrl($backtopage ? $backtopage : DOL_URL_ROOT.'/admin/modules.php', ['restore_lastsearch_values' => 1]).'">'.img_picto($langs->trans("BackToModuleList"), 'back', 'class="pictofixedwidth"').'<span class="hideonsmartphone">'.$langs->trans("BackToModuleList").'</span></a>';
} else {
	$linkback = '';
}

$morehtmlcenter = '';
$texttop = '';

$registrationnumber = getHashUniqueIdOfRegistration();
if (!userIsTaxAuditor()) {
	$texttop = '<small class="opacitymedium">'.$langs->trans("RegistrationNumber").':</small> <small>'.dol_trunc($registrationnumber, 10).'</small>';
	if ((!isRegistrationDataSavedAndPushed() || !isModEnabled('blockedlog')) && $mode != "forceregistration") {
		$texttop = '';
	}
}

print load_fiche_titre($title.'<br>'.$texttop, $linkback, 'blockedlog', 0, '', '', $morehtmlcenter);

if ($withtab) {
	$head = blockedlogadmin_prepare_head($withtab);
	print dol_get_fiche_head($head, 'registration', '', -1);
} else {
	print '<br>';
}

print '<span class="opacitymedium">'.$langs->trans("BlockedLogDesc")."</span><br>\n";


// Version
$versionbadge = '<span class="badge-text badge-secondary">'.getBlockedLogVersionToShow().'</span>';


// Special additional message for FR only
$infotoshow = '';
if ($mysoc->country_code == 'FR') {
	$islne = isALNEQualifiedVersion(1, 1);
	if ($islne) {
		if (preg_match('/\-/', getBlockedLogVersionToShow())) {
			// This is an alpha or beta version
			$infotoshow = $langs->trans("LNECandidateVersionForCertificationFR", $versionbadge);
		} else {
			$infotoshow = $langs->trans("LNECertifiedVersionFR", $versionbadge);
		}
	} else {
		$infotoshow = $langs->trans("NotCertifiedVersionFR", $versionbadge);
	}

	$infotoshow .= ' - <a href="'.DOL_URL_ROOT.'/blockedlog/admin/filecheck.php">'.img_picto('', 'url', 'class="pictofixedwidth"').$langs->trans("FileCheck").'</a>';
}

// Show generic message (for countries that need registration) to explain we need registration to collect data and why
if (in_array($mysoc->country_code, array('FR'))) {
	$organization_for_ping = getDolGlobalString('MAIN_ORGANIZATION_FOR_PING', "Association Dolibarr");
	$dataprivacy_url = getDolGlobalString('MAIN_ORGANIZATION_URL_PRIVACY', "https://www.dolibarr.org/legal-privacy-gdpr.php");

	if (!isRegistrationDataSavedAndPushed() || $origin == 'initmodule') {
		if ($infotoshow) {
			print info_admin($infotoshow, 0, 0, 'info');
		}

		if ((!isRegistrationDataSavedAndPushed() || !isModEnabled('blockedlog')) && $mode != "forceregistration") {
			print '<center><span class="error"><br>'.$langs->trans("RegistrationRequired").'<br><br></span></center>';
		}

		$htmltext = "";
		$htmltext .= $langs->trans("UnalterableLogToolRegistrationFR").'<br>';
		$htmltext .= $langs->trans("InformationWillBePublishedTo");
		$htmltext .= '<br>'.$langs->trans("InformationWillBePublishedTo2", $organization_for_ping, $dataprivacy_url);
		if (!isRegistrationDataSavedAndPushed() || !isModEnabled('blockedlog')) {
			$htmltext .= '<br>'.$langs->trans("InformationWillBePublishedTo3");
			$color = 'warning';
		} else {
			$color = 'info';
		}

		print info_admin($htmltext, 0, 0, $color);

		$htmltext = '';
		// @phpstan-ignore-next-line  Country code is already FR because of in_array('FR') test above
		if ($mysoc->country_code === 'FR') {
			$htmltext .= $langs->trans("UnalterableLogTool1FR", $langs->transnoentitiesnoconv("Archives")).'<br>';
		}

		print info_admin($htmltext, 0, 0, 'warning');

		if (isRegistrationDataSavedAndPushed() && isModEnabled('blockedlog') && $mode != "forceregistration") {
			print '<center><span class="ok"><br>'.$langs->trans("ApplicationHasBeenRegistered").'<br><br></span></center>';
		}
	} else {
		$htmltext = ($infotoshow ? $infotoshow.'<br>' : '');
		$htmltext .= $langs->trans("ApplicationHasBeenRegistered");
		$htmltext .= ' '.$langs->trans("RegistrationNumber").': <span class="badge-text badge-secondary" title="Flag stored into MAIN_FIRST_REGISTRATION_OK_DATE. Registered data saved into BLOCKEDLOG_REGISTRATION_...">'.dol_trunc($registrationnumber, 10).'</span>';
		$htmltext .= '<br>';
		$htmltext .= $langs->trans("LastRegistrationDate").' : ';
		//$htmltext .= dol_print_date(getDolGlobalString('MAIN_FIRST_REGISTRATION_OK_DATE'), 'dayhour', 'tzuserrel');
		$htmltext .= getDolGlobalString('MAIN_FIRST_REGISTRATION_OK_DATE');

		print info_admin($htmltext, 0, 0, 'info');

		// Show remind on good practices related to archives
		$htmltext = $langs->trans("UnalterableLogTool1FR", $langs->transnoentitiesnoconv("Archives")).'<br>';
		print info_admin($htmltext, 0, 0, 'warning');
	}
}


print '<br>';


if ($mode == "forceregistration") {
	$company_state = $mysoc->state;
	if (getDolGlobalString('BLOCKEDLOG_REGISTRATION_STATE')) {
		$company_state = getState(getDolGlobalInt('BLOCKEDLOG_REGISTRATION_STATE'));
	}
	$arrayofdata = array(
		'action' => 'dolibarrregistration',

		'company_name' => getDolGlobalString('BLOCKEDLOG_REGISTRATION_NAME', $mysoc->name),
		'company_email' => getDolGlobalString('BLOCKEDLOG_REGISTRATION_EMAIL', $mysoc->email),
		'company_idprof1' => getDolGlobalString('MAIN_INFO_SIREN', $mysoc->idprof1),
		'company_idprof2' => getDolGlobalString('MAIN_INFO_SIRET', $mysoc->idprof2),
		'company_address' => getDolGlobalString('BLOCKEDLOG_REGISTRATION_ADDRESS', $mysoc->address),
		'company_state' => $company_state,
		'company_zip' => getDolGlobalString('BLOCKEDLOG_REGISTRATION_ZIP', $mysoc->zip),
		'company_town' => getDolGlobalString('BLOCKEDLOG_REGISTRATION_TOWN', $mysoc->town),
		'country_code' => $mysoc->country_code,

		'provider_name' => getDolGlobalString('MAIN_INFO_ITPROVIDER_NAME'),
		'provider_email' => getDolGlobalString('MAIN_INFO_ITPROVIDER_MAIL'),
		'provider_phone' => getDolGlobalString('MAIN_INFO_ITPROVIDER_PHONE'),
		'provider_address' => getDolGlobalString('MAIN_INFO_ITPROVIDER_ADDRESS'),
		'provider_state' => getDolGlobalString('MAIN_INFO_ITPROVIDER_STATE'),
		'provider_zip' => getDolGlobalString('MAIN_INFO_ITPROVIDER_ZIP'),
		'provider_town' => getDolGlobalString('MAIN_INFO_ITPROVIDER_TOWN'),
		'provider_country' => getDolGlobalString('MAIN_INFO_ITPROVIDER_COUNTRY'),
		'provider_idprof1' => getDolGlobalString('MAIN_INFO_ITPROVIDER_IDPROF1'),
		'provider_idprof2' => getDolGlobalString('MAIN_INFO_ITPROVIDER_IDPROF2')
	);

	// Output js code to register data.
	// Note: You can force thereigstration message by calling page /index.php?foreceregistration=1
	printCodeForPing("MAIN_LAST_REGISTRATION_KO_DATE", "MAIN_FIRST_REGISTRATION_OK_DATE", $arrayofdata, 1);

	if (!isModEnabled("blockedlog")) {
		$modblckedlog = new modBlockedLog($db);
		$res = $modblckedlog->init('forceinit');
		//$res = 1;

		if ($res <= 0) {
			setEventMessages($modblckedlog->error, $modblckedlog->errors, 'errors');

			$mode = '';
		}
	}
	if ($mode == "forceregistration") {
		print '<div class="center">';
		print img_picto('', 'tick', 'class="large"');
		print '<br>'.$langs->trans("RegistrationDoneAndModuleEnabled", $langs->transnoentitiesnoconv("BlockedLog"));

		// Go back to setup of module page
		if (GETPOST('origin') == 'initmodule') {
			print '<br><br>';
			print '<br><br>';
			print img_picto('', 'back').' ';
			print '<a href="'.DOL_URL_ROOT.'/admin/modules.php">'.$langs->trans("BackToModuleList").'</a>';
		}
		print '</div>';
	}
}
if (empty($mode)) {
	if ($origin != 'initmodule') {
		print '<br>';
		print '<span class="opacitymedium">'.$langs->trans("UseThisFormToUpdate").'</span><br><br>';
	}

	$formSetup->newItem('Company')->setAsTitle();

	//Company name
	$item = $formSetup->newItem('BLOCKEDLOG_REGISTRATION_NAME');
	$item->defaultFieldValue = getDolGlobalString('BLOCKEDLOG_REGISTRATION_NAME', $mysoc->name);
	$item->fieldParams['isMandatory'] = 1;

	//Company email
	$item = $formSetup->newItem('BLOCKEDLOG_REGISTRATION_EMAIL');
	$item->defaultFieldValue = (GETPOSTISSET('BLOCKEDLOG_REGISTRATION_EMAIL') ? GETPOST('BLOCKEDLOG_REGISTRATION_EMAIL') : getDolGlobalString('BLOCKEDLOG_REGISTRATION_EMAIL', $mysoc->email));
	$item->setAsEmail();
	$item->fieldParams['isMandatory'] = 1;
	$item->cssClass = "minwidth300 maxwidth500 widthcentpercentminusx";

	//Company IDPROF1
	$item = $formSetup->newItem('BLOCKEDLOG_REGISTRATION_IDPROF1');
	$item->defaultFieldValue = (GETPOSTISSET('MAIN_INFO_SIREN') ? GETPOST('MAIN_INFO_SIREN') : getDolGlobalString('MAIN_INFO_SIREN', $mysoc->idprof1));
	$item->fieldValue = (GETPOSTISSET('MAIN_INFO_SIREN') ? GETPOST('MAIN_INFO_SIREN') : getDolGlobalString('MAIN_INFO_SIREN', $mysoc->idprof1));
	$item->helpText = $langs->trans("Example").': 732 829 320';
	$item->fieldParams['isMandatory'] = 1;
	$item->nameText = $langs->transcountry("ProfId1", $mysoc->country_code);

	//Company IDPROF2
	$item = $formSetup->newItem('BLOCKEDLOG_REGISTRATION_IDPROF2');
	$item->defaultFieldValue = (GETPOSTISSET('MAIN_INFO_SIRET') ? GETPOST('MAIN_INFO_SIRET') : getDolGlobalString('MAIN_INFO_SIRET', $mysoc->idprof2));
	$item->fieldValue = (GETPOSTISSET('MAIN_INFO_SIRET') ? GETPOST('MAIN_INFO_SIRET') : getDolGlobalString('MAIN_INFO_SIRET', $mysoc->idprof2));
	$item->helpText = $langs->trans("Example").': 732 829 320 00074';
	$item->fieldParams['isMandatory'] = 1;
	$item->nameText = $langs->transcountry("ProfId2", $mysoc->country_code);

	//Company country code
	$country_id = getDolGlobalString('BLOCKEDLOG_REGISTRATION_COUNTRY_ID', $mysoc->country_id);
	$item = $formSetup->newItem('BLOCKEDLOG_REGISTRATION_COUNTRY_CODE');
	$item->fieldInputOverride = $form->select_country($country_id, "BLOCKEDLOG_REGISTRATION_COUNTRY_ID", '', 0, 'minwidth300');
	$item->fieldParams['isMandatory'] = 1;

	//Company address
	$item = $formSetup->newItem('BLOCKEDLOG_REGISTRATION_ADDRESS');
	$item->defaultFieldValue = getDolGlobalString('BLOCKEDLOG_REGISTRATION_ADDRESS', $mysoc->address);
	$item->setAsTextarea();

	//Company state
	$item = $formSetup->newItem('BLOCKEDLOG_REGISTRATION_STATE');
	$state_id = 0;
	if (getDolGlobalString('MAIN_INFO_SOCIETE_STATE')) {
		$tmp = explode(':', getDolGlobalString('MAIN_INFO_SOCIETE_STATE'));
		$state_id = $tmp[0];
	}
	$stateid = getDolGlobalInt('BLOCKEDLOG_REGISTRATION_STATE', (int) $state_id);
	$item->fieldInputOverride = $formcompany->select_state($stateid, $mysoc->country_code, "BLOCKEDLOG_REGISTRATION_STATE");

	//Company zip
	$item = $formSetup->newItem('BLOCKEDLOG_REGISTRATION_ZIP');
	$item->defaultFieldValue = getDolGlobalString('BLOCKEDLOG_REGISTRATION_ZIP', $mysoc->zip);
	$item->cssClass = "width100";

	//Company town
	$item = $formSetup->newItem('BLOCKEDLOG_REGISTRATION_TOWN');
	$item->defaultFieldValue = getDolGlobalString('BLOCKEDLOG_REGISTRATION_TOWN', $mysoc->town);

	$formSetup->newItem('ITProvider')->setAsTitle();

	//IT provider name
	$item = $formSetup->newItem('MAIN_INFO_ITPROVIDER_NAME');
	$item->defaultFieldValue = getDolGlobalString('MAIN_INFO_ITPROVIDER_NAME');

	//IT provider email
	$item = $formSetup->newItem('MAIN_INFO_ITPROVIDER_MAIL');
	$item->defaultFieldValue = getDolGlobalString('MAIN_INFO_ITPROVIDER_MAIL');
	$item->setAsEmail();
	$item->cssClass = "minwidth300 maxwidth500 widthcentpercentminusx";

	//IT provider IDPROF1
	$item = $formSetup->newItem('MAIN_INFO_ITPROVIDER_IDPROF1');
	$item->defaultFieldValue = getDolGlobalString('MAIN_INFO_ITPROVIDER_IDPROF1');

	//IT provider IDPROF1
	$item = $formSetup->newItem('MAIN_INFO_ITPROVIDER_IDPROF2');
	$item->defaultFieldValue = getDolGlobalString('MAIN_INFO_ITPROVIDER_IDPROF2');

	//IT provider country code
	$item = $formSetup->newItem('MAIN_INFO_ITPROVIDER_COUNTRY');
	$item->defaultFieldValue = getDolGlobalString('MAIN_INFO_ITPROVIDER_COUNTRY');
	$item->fieldInputOverride = $form->select_country(getDolGlobalString('MAIN_INFO_ITPROVIDER_COUNTRY'), 'MAIN_INFO_ITPROVIDER_COUNTRY');

	//IT provider address
	$item = $formSetup->newItem('MAIN_INFO_ITPROVIDER_ADDRESS');
	$item->defaultFieldValue = getDolGlobalString('MAIN_INFO_ITPROVIDER_ADDRESS');
	$item->setAsTextarea();

	//IT provider state
	$item = $formSetup->newItem('MAIN_INFO_ITPROVIDER_STATE');
	$item->fieldInputOverride = $formcompany->select_state(getDolGlobalInt('MAIN_INFO_ITPROVIDER_STATE'), getDolGlobalString('MAIN_INFO_ITPROVIDER_COUNTRY'), "MAIN_INFO_ITPROVIDER_STATE");

	//IT provider zip
	$item = $formSetup->newItem('MAIN_INFO_ITPROVIDER_ZIP');
	$item->defaultFieldValue = getDolGlobalString('MAIN_INFO_ITPROVIDER_ZIP');
	$item->cssClass = "width100";

	//IT provider town
	$item = $formSetup->newItem('MAIN_INFO_ITPROVIDER_TOWN');
	$item->defaultFieldValue = getDolGlobalString('MAIN_INFO_ITPROVIDER_TOWN');

	$formSetup->formHiddenInputs['origin'] = GETPOST('origin');
	$formSetup->formHiddenInputs['withtab'] = $withtab;

	if (isRegistrationDataSavedAndPushed() && $origin != 'initmodule') {
		$formSetup->htmlButtonLabel = 'SaveUpdate';
	} else {
		$formSetup->htmlButtonLabel = 'SaveAndEnableModule';
	}

	print $formSetup->generateOutput(2, true, '', '');
}

if ($withtab) {
	print dol_get_fiche_end();
}

print '<br>';


// End of page
llxFooter();
$db->close();