importzugferd/admin/setup.php
2026-02-01 09:25:12 +01:00

837 lines
34 KiB
PHP
Executable file

<?php
/* Copyright (C) 2026 Eduard Wisch <data@data-it-solution.de>
*
* 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.
*/
/**
* \file importzugferd/admin/setup.php
* \ingroup importzugferd
* \brief ImportZugferd setup page.
*/
// Load Dolibarr environment
$res = 0;
if (!$res && !empty($_SERVER["CONTEXT_DOCUMENT_ROOT"])) {
$res = @include $_SERVER["CONTEXT_DOCUMENT_ROOT"]."/main.inc.php";
}
$tmp = empty($_SERVER['SCRIPT_FILENAME']) ? '' : $_SERVER['SCRIPT_FILENAME'];
$tmp2 = realpath(__FILE__);
$i = strlen($tmp) - 1;
$j = strlen($tmp2) - 1;
while ($i > 0 && $j > 0 && isset($tmp[$i]) && isset($tmp2[$j]) && $tmp[$i] == $tmp2[$j]) {
$i--;
$j--;
}
if (!$res && $i > 0 && file_exists(substr($tmp, 0, ($i + 1))."/main.inc.php")) {
$res = @include substr($tmp, 0, ($i + 1))."/main.inc.php";
}
if (!$res && $i > 0 && file_exists(dirname(substr($tmp, 0, ($i + 1)))."/main.inc.php")) {
$res = @include dirname(substr($tmp, 0, ($i + 1)))."/main.inc.php";
}
if (!$res && file_exists("../../main.inc.php")) {
$res = @include "../../main.inc.php";
}
if (!$res && file_exists("../../../main.inc.php")) {
$res = @include "../../../main.inc.php";
}
if (!$res) {
die("Include of main fails");
}
// Libraries
require_once DOL_DOCUMENT_ROOT."/core/lib/admin.lib.php";
require_once '../lib/importzugferd.lib.php';
// Translations
$langs->loadLangs(array("admin", "importzugferd@importzugferd"));
// Parameters
$action = GETPOST('action', 'aZ09');
$backtopage = GETPOST('backtopage', 'alpha');
// Access control
if (!$user->admin) {
accessforbidden();
}
// Form setup using FormSetup class
if (!class_exists('FormSetup')) {
require_once DOL_DOCUMENT_ROOT.'/core/class/html.formsetup.class.php';
}
$formSetup = new FormSetup($db);
/*
* Setup configuration items
*/
// IMAP Settings Section
$formSetup->newItem('IMAPSettings')->setAsTitle();
$item = $formSetup->newItem('IMPORTZUGFERD_IMAP_HOST');
$item->defaultFieldValue = '';
$item->cssClass = 'minwidth300';
$item->fieldAttr['placeholder'] = 'imap.example.com';
$item = $formSetup->newItem('IMPORTZUGFERD_IMAP_PORT');
$item->defaultFieldValue = '993';
$item->cssClass = 'width100';
$item = $formSetup->newItem('IMPORTZUGFERD_IMAP_USER');
$item->defaultFieldValue = '';
$item->cssClass = 'minwidth300';
$item->fieldAttr['placeholder'] = 'invoices@example.com';
$item = $formSetup->newItem('IMPORTZUGFERD_IMAP_PASSWORD');
$item->cssClass = 'minwidth300';
$item->fieldAttr['type'] = 'password';
$item = $formSetup->newItem('IMPORTZUGFERD_IMAP_FOLDER');
$item->defaultFieldValue = 'INBOX';
$item->cssClass = 'minwidth200';
$formSetup->newItem('IMPORTZUGFERD_IMAP_SSL')->setAsYesNo();
// Import Settings Section
$formSetup->newItem('ImportSettings')->setAsTitle();
$formSetup->newItem('IMPORTZUGFERD_AUTO_CREATE_INVOICE')->setAsYesNo();
// Email Notification Settings Section
$formSetup->newItem('NotificationSettings')->setAsTitle();
$formSetup->newItem('IMPORTZUGFERD_NOTIFY_ENABLED')->setAsYesNo();
$item = $formSetup->newItem('IMPORTZUGFERD_NOTIFY_EMAIL');
$item->defaultFieldValue = '';
$item->cssClass = 'minwidth300';
$item->fieldAttr['placeholder'] = 'admin@example.com';
$formSetup->newItem('IMPORTZUGFERD_NOTIFY_MANUAL')->setAsYesNo();
$formSetup->newItem('IMPORTZUGFERD_NOTIFY_ERROR')->setAsYesNo();
$formSetup->newItem('IMPORTZUGFERD_NOTIFY_PRICE_DIFF')->setAsYesNo();
$item = $formSetup->newItem('IMPORTZUGFERD_PRICE_DIFF_THRESHOLD');
$item->defaultFieldValue = '10';
$item->cssClass = 'width75';
$item->fieldAttr['type'] = 'number';
$item->fieldAttr['min'] = '0';
$item->fieldAttr['max'] = '100';
$item->fieldAttr['step'] = '1';
// Scheduling Settings Section
$formSetup->newItem('SchedulingSettings')->setAsTitle();
$item = $formSetup->newItem('IMPORTZUGFERD_IMPORT_FREQUENCY');
$item->setAsSelect(array(
'manual' => $langs->trans('FrequencyManual'),
'hourly' => $langs->trans('FrequencyHourly'),
'daily' => $langs->trans('FrequencyDaily'),
'weekly' => $langs->trans('FrequencyWeekly')
));
$item->defaultFieldValue = 'manual';
// Folder Import Settings Section
$formSetup->newItem('FolderImportSettings')->setAsTitle();
$item = $formSetup->newItem('IMPORTZUGFERD_WATCH_FOLDER');
$item->defaultFieldValue = '';
$item->cssClass = 'minwidth400';
$item->fieldAttr['placeholder'] = '/path/to/invoices';
$item = $formSetup->newItem('IMPORTZUGFERD_ARCHIVE_FOLDER');
$item->defaultFieldValue = '';
$item->cssClass = 'minwidth400';
$item->fieldAttr['placeholder'] = '/path/to/archive';
$item = $formSetup->newItem('IMPORTZUGFERD_ERROR_FOLDER');
$item->defaultFieldValue = '';
$item->cssClass = 'minwidth400';
$item->fieldAttr['placeholder'] = '/path/to/errors';
$item = $formSetup->newItem('IMPORTZUGFERD_IMAP_ARCHIVE_FOLDER');
$item->defaultFieldValue = 'Archive';
$item->cssClass = 'minwidth200';
// Datanorm Settings Section
$formSetup->newItem('DatanormSettings')->setAsTitle();
$item = $formSetup->newItem('IMPORTZUGFERD_DATANORM_MARKUP');
$item->defaultFieldValue = '30';
$item->cssClass = 'width100';
$item->fieldAttr['placeholder'] = '30';
$formSetup->newItem('IMPORTZUGFERD_DATANORM_SEARCH_ALL')->setAsYesNo();
/*
* Actions
*/
if (versioncompare(explode('.', DOL_VERSION), array(15)) < 0 && $action == 'update' && !empty($user->admin)) {
$formSetup->saveConfFromPost();
}
include DOL_DOCUMENT_ROOT.'/core/actions_setmoduleoptions.inc.php';
// AJAX action for folder browsing
if ($action == 'browse_folders') {
$path = GETPOST('path', 'alpha');
$target = GETPOST('target', 'alpha');
// Sanitize path - default to /home for easier navigation
if (empty($path)) {
$path = '/home';
}
$path = realpath($path);
if ($path === false) {
$path = '/home';
if (!is_dir($path)) {
$path = '/';
}
}
// Get directories
$dirs = array();
if (is_dir($path) && is_readable($path)) {
$entries = @scandir($path);
if ($entries) {
foreach ($entries as $entry) {
if ($entry == '.') continue;
$fullPath = $path . '/' . $entry;
if (is_dir($fullPath) && is_readable($fullPath)) {
$dirs[] = array(
'name' => $entry,
'path' => $fullPath
);
}
}
}
}
// Return JSON
header('Content-Type: application/json');
echo json_encode(array(
'current' => $path,
'parent' => dirname($path),
'dirs' => $dirs,
'target' => $target
));
exit;
}
// Save folder from browser
if ($action == 'set_folder') {
$target = GETPOST('target', 'alpha');
$folder_path = GETPOST('folder_path', 'alpha');
if (in_array($target, array('IMPORTZUGFERD_WATCH_FOLDER', 'IMPORTZUGFERD_ARCHIVE_FOLDER'))) {
if (is_dir($folder_path)) {
dolibarr_set_const($db, $target, $folder_path, 'chaine', 0, '', $conf->entity);
setEventMessages($langs->trans('FolderSelected').': '.$folder_path, null, 'mesgs');
} else {
setEventMessages($langs->trans('ErrorFolderNotFound'), null, 'errors');
}
}
header('Location: '.$_SERVER['PHP_SELF']);
exit;
}
/*
* View
*/
$form = new Form($db);
$title = "ImportZugferdSetup";
llxHeader('', $langs->trans($title), '', '', 0, 0, '', '', '', 'mod-importzugferd page-admin');
// Subheader
$linkback = '<a href="'.($backtopage ? $backtopage : DOL_URL_ROOT.'/admin/modules.php?restore_lastsearch_values=1').'">'.$langs->trans("BackToModuleList").'</a>';
print load_fiche_titre($langs->trans($title), $linkback, 'title_setup');
// Configuration header
$head = importzugferdAdminPrepareHead();
print dol_get_fiche_head($head, 'settings', $langs->trans($title), -1, "importzugferd@importzugferd");
// Setup page description
print '<span class="opacitymedium">'.$langs->trans("ImportZugferdSetupPage").'</span><br><br>';
// Display the form
print $formSetup->generateOutput(true);
// Build folder validation data for JavaScript
$folderValidation = array();
// Watch folder - only needs to be readable
$watchFolder = getDolGlobalString('IMPORTZUGFERD_WATCH_FOLDER');
if (!empty($watchFolder)) {
$watchExists = is_dir($watchFolder);
$watchReadable = $watchExists && is_readable($watchFolder);
if (!$watchExists) {
$folderValidation['IMPORTZUGFERD_WATCH_FOLDER'] = array('ok' => false, 'msg' => $langs->trans('FolderNotFound'));
} elseif (!$watchReadable) {
$folderValidation['IMPORTZUGFERD_WATCH_FOLDER'] = array('ok' => false, 'msg' => $langs->trans('FolderNotReadable'));
} else {
$files = glob($watchFolder.'/*.pdf');
$files = array_merge($files ?: [], glob($watchFolder.'/*.PDF') ?: []);
$folderValidation['IMPORTZUGFERD_WATCH_FOLDER'] = array('ok' => true, 'msg' => $langs->trans('FolderOK').' ('.count($files).' PDF)');
}
}
// Archive folder - needs to be writable
$archiveFolder = getDolGlobalString('IMPORTZUGFERD_ARCHIVE_FOLDER');
if (!empty($archiveFolder)) {
$archiveExists = is_dir($archiveFolder);
$archiveWritable = $archiveExists && is_writable($archiveFolder);
if (!$archiveExists) {
$folderValidation['IMPORTZUGFERD_ARCHIVE_FOLDER'] = array('ok' => false, 'msg' => $langs->trans('FolderNotFound'));
} elseif (!$archiveWritable) {
$folderValidation['IMPORTZUGFERD_ARCHIVE_FOLDER'] = array('ok' => false, 'msg' => $langs->trans('FolderNotWritable'));
} else {
$folderValidation['IMPORTZUGFERD_ARCHIVE_FOLDER'] = array('ok' => true, 'msg' => $langs->trans('FolderOK'));
}
}
// Error folder - needs to be writable
$errorFolder = getDolGlobalString('IMPORTZUGFERD_ERROR_FOLDER');
if (!empty($errorFolder)) {
$errorExists = is_dir($errorFolder);
$errorWritable = $errorExists && is_writable($errorFolder);
if (!$errorExists) {
$folderValidation['IMPORTZUGFERD_ERROR_FOLDER'] = array('ok' => false, 'msg' => $langs->trans('FolderNotFound'));
} elseif (!$errorWritable) {
$folderValidation['IMPORTZUGFERD_ERROR_FOLDER'] = array('ok' => false, 'msg' => $langs->trans('FolderNotWritable'));
} else {
$folderValidation['IMPORTZUGFERD_ERROR_FOLDER'] = array('ok' => true, 'msg' => $langs->trans('FolderOK'));
}
}
// Folder Browser Modal
print '
<div id="folderBrowserModal" style="display:none; position:fixed; top:0; left:0; width:100%; height:100%; background:rgba(0,0,0,0.5); z-index:9999;">
<div style="position:absolute; top:50%; left:50%; transform:translate(-50%,-50%); background:white; padding:20px; border-radius:8px; min-width:500px; max-width:80%; max-height:80%; overflow:auto; box-shadow:0 4px 20px rgba(0,0,0,0.3);">
<h3 style="margin-top:0;"><i class="fas fa-folder-open paddingright"></i>'.$langs->trans('SelectFolder').'</h3>
<div style="margin-bottom:10px;">
<input type="text" id="pathInput" style="width:80%; font-family:monospace;" placeholder="/path/to/folder">
<a class="button buttongen smallpaddingimp" href="#" onclick="goToPath(); return false;" title="'.$langs->trans('Go').'"><i class="fas fa-arrow-right"></i></a>
</div>
<div style="margin-bottom:5px;">
<span class="opacitymedium">'.$langs->trans('QuickLinks').':</span>
<a href="#" onclick="loadFolderContents(\'/home\'); return false;" class="paddingleft">/home</a>
<a href="#" onclick="loadFolderContents(\'/srv\'); return false;" class="paddingleft">/srv</a>
<a href="#" onclick="loadFolderContents(\'/var\'); return false;" class="paddingleft">/var</a>
<a href="#" onclick="loadFolderContents(\'/tmp\'); return false;" class="paddingleft">/tmp</a>
</div>
<div style="border:1px solid #ccc; padding:10px; max-height:300px; overflow-y:auto; background:#f9f9f9;" id="folderList">
</div>
<div style="margin-top:15px; text-align:right;">
<input type="hidden" id="folderTarget" value="">
<a class="button" href="#" onclick="selectCurrentFolder(); return false;"><i class="fas fa-check paddingright"></i>'.$langs->trans('SelectThisFolder').'</a>
<a class="button" href="#" onclick="closeFolderBrowser(); return false;">'.$langs->trans('Cancel').'</a>
</div>
</div>
</div>
<script>
// Folder validation data from PHP
var folderValidation = '.json_encode($folderValidation).';
// Add browse buttons and validation icons next to folder input fields
document.addEventListener("DOMContentLoaded", function() {
var folderFields = ["IMPORTZUGFERD_WATCH_FOLDER", "IMPORTZUGFERD_ARCHIVE_FOLDER", "IMPORTZUGFERD_ERROR_FOLDER"];
folderFields.forEach(function(fieldName) {
var input = document.querySelector("input[name=\"" + fieldName + "\"]");
if (input) {
// Add browse button
var btn = document.createElement("a");
btn.href = "#";
btn.className = "button buttongen smallpaddingimp";
btn.style.marginLeft = "5px";
btn.innerHTML = "<i class=\"fas fa-folder-open\"></i>";
btn.title = "'.$langs->trans('Browse').'";
btn.onclick = function(e) {
e.preventDefault();
var startPath = input.value || "/home";
openFolderBrowser(fieldName, startPath);
};
input.parentNode.insertBefore(btn, input.nextSibling);
// Add validation icon if folder is configured
if (folderValidation[fieldName]) {
var validIcon = document.createElement("span");
validIcon.style.marginLeft = "10px";
validIcon.id = "validation_" + fieldName;
if (folderValidation[fieldName].ok) {
validIcon.innerHTML = "<i class=\"fas fa-check-circle\" style=\"color:green;\"></i> <span class=\"opacitymedium\">" + folderValidation[fieldName].msg + "</span>";
} else {
validIcon.innerHTML = "<i class=\"fas fa-times-circle\" style=\"color:red;\"></i> <span style=\"color:red;\">" + folderValidation[fieldName].msg + "</span>";
}
btn.parentNode.insertBefore(validIcon, btn.nextSibling);
}
}
});
});
function openFolderBrowser(target, startPath) {
document.getElementById("folderTarget").value = target;
document.getElementById("folderBrowserModal").style.display = "block";
document.getElementById("pathInput").value = startPath || "/home";
loadFolderContents(startPath || "/home");
}
function goToPath() {
var path = document.getElementById("pathInput").value;
if (path) {
loadFolderContents(path);
}
}
function closeFolderBrowser() {
document.getElementById("folderBrowserModal").style.display = "none";
}
function loadFolderContents(path) {
var target = document.getElementById("folderTarget").value;
var xhr = new XMLHttpRequest();
xhr.open("GET", "'.$_SERVER['PHP_SELF'].'?action=browse_folders&path=" + encodeURIComponent(path) + "&target=" + target + "&token='.newToken().'", true);
xhr.onreadystatechange = function() {
if (xhr.readyState === 4 && xhr.status === 200) {
var data = JSON.parse(xhr.responseText);
document.getElementById("pathInput").value = data.current;
var html = "";
if (data.current !== "/" && data.parent) {
html += "<div style=\"padding:5px; cursor:pointer; border-bottom:1px solid #eee;\" onclick=\"loadFolderContents(\'" + data.parent.replace(/\'/g, "\\\'") + "\')\">";
html += "<i class=\"fas fa-level-up-alt paddingright\"></i><strong>..</strong> ('.$langs->trans('ParentFolder').')";
html += "</div>";
}
for (var i = 0; i < data.dirs.length; i++) {
var dir = data.dirs[i];
html += "<div style=\"padding:5px; cursor:pointer; border-bottom:1px solid #eee;\" onclick=\"loadFolderContents(\'" + dir.path.replace(/\'/g, "\\\'") + "\')\" onmouseover=\"this.style.background=\'#e8f4fc\'\" onmouseout=\"this.style.background=\'transparent\'\">";
html += "<i class=\"fas fa-folder paddingright\" style=\"color:#f0ad4e;\"></i>" + dir.name;
html += "</div>";
}
if (data.dirs.length === 0 && data.current !== "/") {
html += "<div style=\"padding:10px; color:#666; text-align:center;\">'.$langs->trans('NoSubfolders').'</div>";
}
document.getElementById("folderList").innerHTML = html;
}
};
xhr.send();
}
function selectCurrentFolder() {
var path = document.getElementById("pathInput").value;
var target = document.getElementById("folderTarget").value;
// Update the input field directly
var input = document.querySelector("input[name=\"" + target + "\"]");
if (input) {
input.value = path;
}
closeFolderBrowser();
}
// Close modal on escape key
document.addEventListener("keydown", function(e) {
if (e.key === "Escape") closeFolderBrowser();
});
// Close modal on background click
document.getElementById("folderBrowserModal").addEventListener("click", function(e) {
if (e.target === this) closeFolderBrowser();
});
</script>
';
// Email Notification Test Section
if (getDolGlobalString('IMPORTZUGFERD_NOTIFY_ENABLED') && getDolGlobalString('IMPORTZUGFERD_NOTIFY_EMAIL')) {
print '<br>';
print '<div class="div-table-responsive-no-min">';
print '<table class="noborder centpercent">';
print '<tr class="liste_titre">';
print '<td colspan="2">'.$langs->trans('TestEmailNotification').'</td>';
print '</tr>';
// Handle test email action
if ($action == 'test_email') {
dol_include_once('/importzugferd/class/importnotification.class.php');
$notification = new ImportNotification($db);
$result = $notification->sendTestNotification();
if ($result > 0) {
setEventMessages($langs->trans('TestEmailSent', getDolGlobalString('IMPORTZUGFERD_NOTIFY_EMAIL')), null, 'mesgs');
} else {
setEventMessages($langs->trans('TestEmailFailed').': '.$notification->error, null, 'errors');
}
}
print '<tr class="oddeven">';
print '<td class="titlefield">'.$langs->trans('SendTestEmail').'</td>';
print '<td>';
print '<a class="button" href="'.$_SERVER['PHP_SELF'].'?action=test_email&token='.newToken().'">';
print '<i class="fas fa-paper-plane paddingright"></i>'.$langs->trans('SendTestEmail');
print '</a>';
print ' <span class="opacitymedium">'.$langs->trans('SendTo').': '.getDolGlobalString('IMPORTZUGFERD_NOTIFY_EMAIL').'</span>';
print '</td>';
print '</tr>';
print '</table>';
print '</div>';
}
// Test IMAP connection button and folder selection
if (getDolGlobalString('IMPORTZUGFERD_IMAP_HOST')) {
print '<br>';
print '<div class="div-table-responsive-no-min">';
print '<table class="noborder centpercent">';
print '<tr class="liste_titre">';
print '<td colspan="3">'.$langs->trans('TestConnection').'</td>';
print '</tr>';
// Check if IMAP extension is available
$imap_available = function_exists('imap_open');
// Test connection action
$imap_folders = array();
$connection_ok = false;
if (!$imap_available) {
print '<tr class="oddeven">';
print '<td colspan="3">';
print '<span class="error"><i class="fas fa-exclamation-triangle paddingright"></i>';
print $langs->trans('IMAPExtensionNotInstalled');
print '</span><br>';
print '<span class="opacitymedium">'.$langs->trans('IMAPExtensionHelp').'</span>';
print '</td>';
print '</tr>';
} elseif ($action == 'test_imap' || $action == 'select_folder') {
$host = getDolGlobalString('IMPORTZUGFERD_IMAP_HOST');
$port = getDolGlobalString('IMPORTZUGFERD_IMAP_PORT', '993');
$imap_user = getDolGlobalString('IMPORTZUGFERD_IMAP_USER');
$password = getDolGlobalString('IMPORTZUGFERD_IMAP_PASSWORD');
$ssl = getDolGlobalString('IMPORTZUGFERD_IMAP_SSL');
$mailbox_base = '{' . $host . ':' . $port . '/imap' . ($ssl ? '/ssl' : '') . '/novalidate-cert}';
$mailbox = $mailbox_base . 'INBOX';
$connection = @imap_open($mailbox, $imap_user, $password);
if ($connection) {
$connection_ok = true;
setEventMessages($langs->trans('ConnectionSuccessful'), null, 'mesgs');
// Get list of folders
$folders_raw = imap_list($connection, $mailbox_base, '*');
if ($folders_raw) {
foreach ($folders_raw as $folder) {
// Remove the mailbox base from folder name
$folder_name = str_replace($mailbox_base, '', $folder);
// Decode folder name (IMAP uses modified UTF-7)
$folder_name_decoded = imap_utf7_decode($folder_name);
$imap_folders[$folder_name] = $folder_name_decoded;
}
}
imap_close($connection);
} else {
setEventMessages($langs->trans('ConnectionFailed') . ': ' . imap_last_error(), null, 'errors');
}
}
// Save selected folder
if ($action == 'select_folder' && GETPOST('imap_folder', 'alpha')) {
$selected_folder = GETPOST('imap_folder', 'alpha');
dolibarr_set_const($db, 'IMPORTZUGFERD_IMAP_FOLDER', $selected_folder, 'chaine', 0, '', $conf->entity);
setEventMessages($langs->trans('FolderSelected').': '.$selected_folder, null, 'mesgs');
}
// Only show status and folder selection if IMAP is available
if ($imap_available) {
print '<tr class="oddeven">';
print '<td class="titlefield">'.$langs->trans('Status').'</td>';
print '<td colspan="2">';
if ($action == 'test_imap' || $action == 'select_folder') {
if ($connection_ok) {
print '<span class="ok"><i class="fas fa-check paddingright"></i>'.$langs->trans('ConnectionSuccessful').'</span>';
} else {
print '<span class="error"><i class="fas fa-times paddingright"></i>'.$langs->trans('ConnectionFailed').'</span>';
}
} else {
print '<span class="opacitymedium">'.$langs->trans('ClickTestToCheck').'</span>';
}
print '</td>';
print '</tr>';
}
// Show folder selection if connection was successful
if ($imap_available && $connection_ok && !empty($imap_folders)) {
print '<tr class="oddeven">';
print '<td>'.$langs->trans('SelectFolder').'</td>';
print '<td>';
print '<form method="POST" action="'.$_SERVER['PHP_SELF'].'" class="inline-block">';
print '<input type="hidden" name="token" value="'.newToken().'">';
print '<input type="hidden" name="action" value="select_folder">';
$current_folder = getDolGlobalString('IMPORTZUGFERD_IMAP_FOLDER', 'INBOX');
print '<select name="imap_folder" class="flat minwidth200">';
foreach ($imap_folders as $folder_raw => $folder_decoded) {
$selected = ($folder_raw == $current_folder) ? ' selected' : '';
print '<option value="'.dol_escape_htmltag($folder_raw).'"'.$selected.'>';
print dol_escape_htmltag($folder_decoded);
print '</option>';
}
print '</select>';
print ' <input type="submit" class="button" value="'.$langs->trans('Save').'">';
print '</form>';
print '</td>';
print '<td>';
print '<span class="opacitymedium">'.$langs->trans('FoundFolders').': '.count($imap_folders).'</span>';
print '</td>';
print '</tr>';
}
// Only show test button if IMAP extension is available
if ($imap_available) {
print '<tr class="oddeven">';
print '<td colspan="3" class="center">';
print '<a class="button" href="'.$_SERVER['PHP_SELF'].'?action=test_imap&token='.newToken().'">';
print '<i class="fas fa-plug paddingright"></i>'.$langs->trans('TestConnection');
print '</a>';
print '</td>';
print '</tr>';
}
print '</table>';
print '</div>';
}
// Manual Import Trigger Section
$hasFolder = getDolGlobalString('IMPORTZUGFERD_WATCH_FOLDER') && is_dir(getDolGlobalString('IMPORTZUGFERD_WATCH_FOLDER'));
$hasImap = getDolGlobalString('IMPORTZUGFERD_IMAP_HOST') && getDolGlobalString('IMPORTZUGFERD_IMAP_USER');
if ($hasFolder || $hasImap) {
print '<br>';
print '<div class="div-table-responsive-no-min">';
print '<table class="noborder centpercent">';
print '<tr class="liste_titre">';
print '<td colspan="2">'.$langs->trans('ManualImportTrigger').'</td>';
print '</tr>';
// Handle manual import action
if ($action == 'run_import') {
$source = GETPOST('import_source', 'alpha');
dol_include_once('/importzugferd/class/zugferdimport.class.php');
dol_include_once('/importzugferd/class/zugferdparser.class.php');
$successCount = 0;
$errorCount = 0;
$skippedCount = 0;
if ($source == 'folder' && $hasFolder) {
$watchFolder = getDolGlobalString('IMPORTZUGFERD_WATCH_FOLDER');
$archiveFolder = getDolGlobalString('IMPORTZUGFERD_ARCHIVE_FOLDER');
$errorFolder = getDolGlobalString('IMPORTZUGFERD_ERROR_FOLDER');
$autoCreate = getDolGlobalInt('IMPORTZUGFERD_AUTO_CREATE_INVOICE');
$files = glob($watchFolder.'/*.pdf');
$files = array_merge($files, glob($watchFolder.'/*.PDF'));
// Create archive folder if configured but doesn't exist
if (!empty($archiveFolder) && !is_dir($archiveFolder)) {
dol_mkdir($archiveFolder);
}
// Create error folder if configured but doesn't exist
if (!empty($errorFolder) && !is_dir($errorFolder)) {
dol_mkdir($errorFolder);
}
// Helper function for moving files with fallback
$moveFile = function($file, $targetFolder, $prefix) {
if (empty($targetFolder)) {
return false;
}
if (!is_dir($targetFolder)) {
dol_mkdir($targetFolder);
}
if (!is_dir($targetFolder) || !is_writable($targetFolder)) {
dol_syslog("ImportZugferd: Target folder not accessible: ".$targetFolder, LOG_WARNING);
return false;
}
$destFile = $targetFolder.'/'.$prefix.date('Y-m-d_His').'_'.basename($file);
if (@rename($file, $destFile)) {
dol_syslog("ImportZugferd: Moved file to: ".$destFile, LOG_INFO);
return true;
}
// Fallback: copy + delete (for cross-filesystem moves)
if (@copy($file, $destFile)) {
@unlink($file);
dol_syslog("ImportZugferd: Copied file to: ".$destFile, LOG_INFO);
return true;
}
dol_syslog("ImportZugferd: Failed to move file: ".$file." to ".$destFile, LOG_ERR);
return false;
};
foreach ($files as $file) {
$import = new ZugferdImport($db);
$result = $import->importFromFile($user, $file, $autoCreate);
if ($result > 0) {
$successCount++;
$moveFile($file, $archiveFolder, 'imported_');
} elseif ($result == -2) {
// Duplicate - move to archive
$skippedCount++;
if (!$moveFile($file, $archiveFolder, 'duplicate_')) {
@unlink($file);
}
} else {
// Error - move to error folder, fallback to archive
$errorCount++;
if (!$moveFile($file, $errorFolder, 'error_')) {
if (!$moveFile($file, $archiveFolder, 'error_')) {
dol_syslog("ImportZugferd: File stays in watch folder: ".$file, LOG_WARNING);
}
}
}
}
} elseif ($source == 'imap' && $hasImap && function_exists('imap_open')) {
$host = getDolGlobalString('IMPORTZUGFERD_IMAP_HOST');
$port = getDolGlobalString('IMPORTZUGFERD_IMAP_PORT', '993');
$imap_user = getDolGlobalString('IMPORTZUGFERD_IMAP_USER');
$password = getDolGlobalString('IMPORTZUGFERD_IMAP_PASSWORD');
$ssl = getDolGlobalString('IMPORTZUGFERD_IMAP_SSL');
$folder = getDolGlobalString('IMPORTZUGFERD_IMAP_FOLDER', 'INBOX');
$archiveFolder = getDolGlobalString('IMPORTZUGFERD_IMAP_ARCHIVE_FOLDER');
$autoCreate = getDolGlobalInt('IMPORTZUGFERD_AUTO_CREATE_INVOICE');
$mailbox = '{' . $host . ':' . $port . '/imap' . ($ssl ? '/ssl' : '') . '/novalidate-cert}' . $folder;
$connection = @imap_open($mailbox, $imap_user, $password);
if ($connection) {
$emails = imap_search($connection, 'UNSEEN');
if ($emails) {
foreach ($emails as $email_number) {
$structure = imap_fetchstructure($connection, $email_number);
// Find PDF attachments
if (isset($structure->parts)) {
foreach ($structure->parts as $partIndex => $part) {
$filename = '';
if ($part->ifdparameters) {
foreach ($part->dparameters as $param) {
if (strtolower($param->attribute) == 'filename') {
$filename = $param->value;
}
}
}
if (empty($filename) && $part->ifparameters) {
foreach ($part->parameters as $param) {
if (strtolower($param->attribute) == 'name') {
$filename = $param->value;
}
}
}
if (!empty($filename) && preg_match('/\.pdf$/i', $filename)) {
$attachment = imap_fetchbody($connection, $email_number, $partIndex + 1);
if ($part->encoding == 3) { // BASE64
$attachment = base64_decode($attachment);
} elseif ($part->encoding == 4) { // QUOTED-PRINTABLE
$attachment = quoted_printable_decode($attachment);
}
// Save to temp file
$tempFile = $conf->importzugferd->dir_temp.'/'.uniqid().'_'.$filename;
if (!is_dir($conf->importzugferd->dir_temp)) {
dol_mkdir($conf->importzugferd->dir_temp);
}
file_put_contents($tempFile, $attachment);
// Import
$import = new ZugferdImport($db);
$result = $import->importFromFile($user, $tempFile, $autoCreate);
if ($result > 0) {
$successCount++;
} elseif ($result == -2) {
$skippedCount++;
} else {
$errorCount++;
}
unlink($tempFile);
}
}
}
}
// Archive processed emails
if (!empty($archiveFolder) && $successCount > 0) {
foreach ($emails as $email_number) {
imap_mail_move($connection, $email_number, $archiveFolder);
}
imap_expunge($connection);
}
}
imap_close($connection);
} else {
setEventMessages($langs->trans('ConnectionFailed').': '.imap_last_error(), null, 'errors');
}
}
if ($successCount > 0 || $errorCount > 0 || $skippedCount > 0) {
setEventMessages($langs->trans('BatchImportComplete', $successCount, $errorCount, $skippedCount), null, 'mesgs');
} else {
setEventMessages($langs->trans('NoFilesFound'), null, 'warnings');
}
}
print '<tr class="oddeven">';
print '<td class="titlefield">'.$langs->trans('ImportFromFolder').'</td>';
print '<td>';
if ($hasFolder) {
print '<a class="button" href="'.$_SERVER['PHP_SELF'].'?action=run_import&import_source=folder&token='.newToken().'">';
print '<i class="fas fa-folder-open paddingright"></i>'.$langs->trans('StartImport');
print '</a>';
print ' <span class="opacitymedium">'.getDolGlobalString('IMPORTZUGFERD_WATCH_FOLDER').'</span>';
} else {
print '<span class="opacitymedium">'.$langs->trans('ErrorWatchFolderNotConfigured').'</span>';
}
print '</td>';
print '</tr>';
print '<tr class="oddeven">';
print '<td>'.$langs->trans('ImportFromIMAP').'</td>';
print '<td>';
if ($hasImap && function_exists('imap_open')) {
print '<a class="button" href="'.$_SERVER['PHP_SELF'].'?action=run_import&import_source=imap&token='.newToken().'">';
print '<i class="fas fa-envelope paddingright"></i>'.$langs->trans('StartImport');
print '</a>';
print ' <span class="opacitymedium">'.getDolGlobalString('IMPORTZUGFERD_IMAP_USER').'</span>';
} elseif (!function_exists('imap_open')) {
print '<span class="opacitymedium">'.$langs->trans('IMAPExtensionNotInstalled').'</span>';
} else {
print '<span class="opacitymedium">'.$langs->trans('ErrorIMAPNotConfigured').'</span>';
}
print '</td>';
print '</tr>';
print '</table>';
print '</div>';
}
print '<br>';
// Page end
print dol_get_fiche_end();
llxFooter();
$db->close();