mirror of
https://github.com/salesagility/SuiteCRM.git
synced 2024-11-21 15:37:57 +00:00
115 lines
3.8 KiB
PHP
115 lines
3.8 KiB
PHP
<?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".
|
|
*/
|
|
|
|
namespace SuiteCRM\Utility;
|
|
|
|
if (!defined('sugarEntry') || !sugarEntry) {
|
|
die('Not A Valid Entry Point');
|
|
}
|
|
|
|
/**
|
|
* Class StringUtils holds static methods to perform various operations with strings.
|
|
*/
|
|
#[\AllowDynamicProperties]
|
|
class StringUtils
|
|
{
|
|
/**
|
|
* Converts a string from camelCase to snake_case
|
|
*
|
|
* @param string $input
|
|
* @param bool $uppercase
|
|
*
|
|
* @return string
|
|
*/
|
|
public static function camelToUnderscoreCase($input, $uppercase = true)
|
|
{
|
|
$shards = self::explodeCamelCase($input);
|
|
|
|
$return = implode('_', $shards);
|
|
|
|
if ($uppercase) {
|
|
$return = strtoupper($return);
|
|
}
|
|
|
|
return $return;
|
|
}
|
|
|
|
/**
|
|
* Attempts to find a translation for a camel-cased string, like a class name.
|
|
*
|
|
* For instance, if you pass `ElasticSearchEngine` it will look for the label `LBL_ELASTIC_SEARCH_ENGINE`.
|
|
*
|
|
* @param string $input
|
|
*
|
|
* @return string
|
|
*/
|
|
public static function camelToTranslation($input)
|
|
{
|
|
$label = 'LBL_' . StringUtils::camelToUnderscoreCase($input);
|
|
$translation = translate($label);
|
|
|
|
if ($label !== $translation) {
|
|
return $translation;
|
|
}
|
|
|
|
return ucwords(implode(' ', self::explodeCamelCase($input)));
|
|
}
|
|
|
|
/**
|
|
* Explodes a camel case string into its components.
|
|
*
|
|
* @param string $input
|
|
*
|
|
* @return string[]
|
|
*/
|
|
public static function explodeCamelCase($input)
|
|
{
|
|
// Breaks the camel-cased word into matches
|
|
preg_match_all('!([A-Z][A-Z0-9]*(?=$|[A-Z][a-z0-9])|[A-Za-z][a-z0-9]+)!', $input, $matches);
|
|
|
|
$ret = $matches[0];
|
|
|
|
foreach ($ret as &$match) {
|
|
$match = $match == strtoupper($match) ? strtolower($match) : lcfirst($match);
|
|
}
|
|
|
|
return $ret;
|
|
}
|
|
}
|