Dolibarr\Code\Mailing\Classes\MailingTargets::getEmailingSelectorsList()

Complexity

Conditions	24
Paths	1632

Size

Total Lines	121
Code Lines	75

Duplication

Lines	0
Ratio	0 %

Importance

Changes

0

<?php
    public static function getEmailingSelectorsList($forcedir = null)
    {
        global $langs, $db;

        $files = array();
        $fullpath = array();
        $relpath = array();
        $iscoreorexternal = array();
        $modules = array();
        $orders = array();
        $i = 0;

        $diremailselector = array('/core/modules/mailings/'); // $conf->modules_parts['emailings'] is not required
        if (is_array($forcedir)) {
            $diremailselector = $forcedir;
        }

        foreach ($diremailselector as $reldir) {
            $dir = dol_buildpath($reldir, 0);
            $newdir = dol_osencode($dir);

            // Check if directory exists (we do not use dol_is_dir to avoid loading files.lib.php at each call)
            if (!is_dir($newdir)) {
                continue;
            }

            $handle = opendir($newdir);
            if (is_resource($handle)) {
                while (($file = readdir($handle)) !== false) {
                    $reg = array();
                    if (is_readable($newdir . '/' . $file) && preg_match('/^(.+)\.modules.php/', $file, $reg)) {
                        if (preg_match('/\.back$/', $file) || preg_match('/^(.+)\.disabled\.php/', $file)) {
                            continue;
                        }

                        $part1 = $reg[1];

                        //$modName = ucfirst($reg[1]);
                        $modName = 'mailing_' . $reg[1];  // name of selector submodule
                        //print "file=$file modName=$modName"; exit;
                        if (in_array($modName, $modules)) {
                            $langs->load("errors");
                            print '<div class="error">' . $langs->trans("Error") . ' : ' . $langs->trans("ErrorDuplicateEmalingSelector", $modName, "") . '</div>';
                        } else {
                            try {
                                //print $newdir.'/'.$file;
                                include_once $newdir . '/' . $file;
                            } catch (Exception $e) {
                                print $e->getMessage();
                            }
                        }

                        $files[$i] = $file;
                        $fullpath[$i] = $dir . '/' . $file;
                        $relpath[$i] = preg_replace('/^\//', '', $reldir) . '/' . $file;
                        $iscoreorexternal[$i] = ($reldir == '/core/modules/mailings/' ? 'internal' : 'external');
                        $modules[$i] = $modName;
                        $orders[$i] = $part1; // Set sort criteria value

                        $i++;
                    }
                }
                closedir($handle);
            }
        }
        //echo "<pre>";print_r($modules);echo "</pre>";

        asort($orders);

        $widget = array();
        $j = 0;

        // Loop on each emailing selector
        foreach ($orders as $key => $value) {
            $modName = $modules[$key];
            if (empty($modName)) {
                continue;
            }

            if (!class_exists($modName)) {
                print 'Error: An emailing selector file was found but its class "' . $modName . '" was not found.' . "<br>\n";
                continue;
            }

            $objMod = new $modName($db);
            if (is_object($objMod)) {
                // Define disabledbyname and disabledbymodule
                $disabledbyname = 0;
                $disabledbymodule = 0; // TODO Set to 2 if module is not enabled
                $module = '';

                // Check if widget file is disabled by name
                if (preg_match('/NORUN$/i', $files[$key])) {
                    $disabledbyname = 1;
                }

                // We set info of modules
                $widget[$j]['picto'] = (empty($objMod->picto) ? (empty($objMod->boximg) ? img_object('', 'generic') : $objMod->boximg) : img_object('', $objMod->picto));
                $widget[$j]['file'] = $files[$key];
                $widget[$j]['fullpath'] = $fullpath[$key];
                $widget[$j]['relpath'] = $relpath[$key];
                $widget[$j]['iscoreorexternal'] = $iscoreorexternal[$key];
                $widget[$j]['version'] = empty($objMod->version) ? '' : $objMod->version;
                $widget[$j]['status'] = img_picto($langs->trans("Active"), 'tick');
                if ($disabledbyname > 0 || $disabledbymodule > 1) {
                    $widget[$j]['status'] = '';
                }

                $text = '<b>' . $langs->trans("Description") . ':</b><br>';
                $text .= $objMod->boxlabel . '<br>';
                $text .= '<br><b>' . $langs->trans("Status") . ':</b><br>';
                if ($disabledbymodule == 2) {
                    $text .= $langs->trans("WidgetDisabledAsModuleDisabled", $module) . '<br>';
                }

                $widget[$j]['info'] = $text;
            }
            $j++;
        }

        return $widget;
    }