mirror of
https://github.com/salesagility/SuiteCRM.git
synced 2025-01-03 09:08:37 +00:00
92 lines
3.7 KiB
PHP
Executable File
92 lines
3.7 KiB
PHP
Executable File
<?php
|
|
/**
|
|
*
|
|
* SugarCRM Community Edition is a customer relationship management program developed by
|
|
* SugarCRM, Inc. Copyright (C) 2004-2013 SugarCRM Inc.
|
|
*
|
|
* SuiteCRM is an extension to SugarCRM Community Edition developed by SalesAgility Ltd.
|
|
* Copyright (C) 2011 - 2018 SalesAgility Ltd.
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify it under
|
|
* the terms of the GNU Affero General Public License version 3 as published by the
|
|
* Free Software Foundation with the addition of the following permission added
|
|
* to Section 15 as permitted in Section 7(a): FOR ANY PART OF THE COVERED WORK
|
|
* IN WHICH THE COPYRIGHT IS OWNED BY SUGARCRM, SUGARCRM DISCLAIMS THE WARRANTY
|
|
* OF NON INFRINGEMENT OF THIRD PARTY RIGHTS.
|
|
*
|
|
* 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 Affero General Public License for more
|
|
* details.
|
|
*
|
|
* You should have received a copy of the GNU Affero General Public License along with
|
|
* this program; if not, see http://www.gnu.org/licenses or write to the Free
|
|
* Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
|
|
* 02110-1301 USA.
|
|
*
|
|
* You can contact SugarCRM, Inc. headquarters at 10050 North Wolfe Road,
|
|
* SW2-130, Cupertino, CA 95014, USA. or at email address contact@sugarcrm.com.
|
|
*
|
|
* The interactive user interfaces in modified source and object code versions
|
|
* of this program must display Appropriate Legal Notices, as required under
|
|
* Section 5 of the GNU Affero General Public License version 3.
|
|
*
|
|
* In accordance with Section 7(b) of the GNU Affero General Public License version 3,
|
|
* these Appropriate Legal Notices must retain the display of the "Powered by
|
|
* SugarCRM" logo and "Supercharged by SuiteCRM" logo. If the display of the logos is not
|
|
* reasonably feasible for technical reasons, the Appropriate Legal Notices must
|
|
* display the words "Powered by SugarCRM" and "Supercharged by SuiteCRM".
|
|
*/
|
|
|
|
require_once 'modules/ModuleBuilder/Module/StudioModuleFactory.php' ;
|
|
|
|
function cmp($a, $b)
|
|
{
|
|
return strcasecmp($a, $b);
|
|
}
|
|
|
|
#[\AllowDynamicProperties]
|
|
class StudioBrowser
|
|
{
|
|
public $modules = array();
|
|
|
|
public function loadModules()
|
|
{
|
|
global $current_user;
|
|
$access = $current_user->getDeveloperModules();
|
|
$d = dir('modules');
|
|
while ($e = $d->read()) {
|
|
if (substr($e, 0, 1) == '.' || !is_dir('modules/' . $e)) {
|
|
continue;
|
|
}
|
|
if (file_exists('modules/' . $e . '/metadata/studio.php') && isset($GLOBALS [ 'beanList' ][$e]) && (in_array($e, $access) || $current_user->isAdmin())) { // installed modules must also exist in the beanList
|
|
$this->modules[$e] = StudioModuleFactory::getStudioModule($e) ;
|
|
}
|
|
}
|
|
}
|
|
|
|
public function loadRelatableModules()
|
|
{
|
|
$d = dir('modules');
|
|
while ($e = $d->read()) {
|
|
if (substr($e, 0, 1) == '.' || !is_dir('modules/' . $e)) {
|
|
continue;
|
|
}
|
|
if (file_exists('modules/' . $e . '/metadata/studio.php') && isset($GLOBALS [ 'beanList' ][$e])) { // installed modules must also exist in the beanList
|
|
$this->modules[$e] = StudioModuleFactory::getStudioModule($e) ;
|
|
}
|
|
}
|
|
}
|
|
|
|
public function getNodes()
|
|
{
|
|
$this->loadModules();
|
|
$nodes = array();
|
|
foreach ($this->modules as $module) {
|
|
$nodes[$module->name] = $module->getNodes();
|
|
}
|
|
uksort($nodes, 'cmp'); // bug 15103 - order is important - this array is later looped over by foreach to generate the module list
|
|
return $nodes;
|
|
}
|
|
}
|