CRM/Core/BAO/Setting.php

   1 <?php
   2 /*
   3  +--------------------------------------------------------------------+
   4  | CiviCRM version 4.4                                                |
   5  +--------------------------------------------------------------------+
   6  | Copyright CiviCRM LLC (c) 2004-2013                                |
   7  +--------------------------------------------------------------------+
   8  | This file is a part of CiviCRM.                                    |
   9  |                                                                    |
  10  | CiviCRM is free software; you can copy, modify, and distribute it  |
  11  | under the terms of the GNU Affero General Public License           |
  12  | Version 3, 19 November 2007 and the CiviCRM Licensing Exception.   |
  13  |                                                                    |
  14  | CiviCRM is distributed in the hope that it will be useful, but     |
  15  | WITHOUT ANY WARRANTY; without even the implied warranty of         |
  16  | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.               |
  17  | See the GNU Affero General Public License for more details.        |
  18  |                                                                    |
  19  | You should have received a copy of the GNU Affero General Public   |
  20  | License and the CiviCRM Licensing Exception along                  |
  21  | with this program; if not, contact CiviCRM LLC                     |
  22  | at info[AT]civicrm[DOT]org. If you have questions about the        |
  23  | GNU Affero General Public License or the licensing of CiviCRM,     |
  24  | see the CiviCRM license FAQ at http://civicrm.org/licensing        |
  25  +--------------------------------------------------------------------+
  26 */
  27
  28 /**
  29  *
  30  * @package CRM
  31  * @copyright CiviCRM LLC (c) 2004-2013
  32  * $Id$
  33  *
  34  */
  35
  36 /**
  37  * BAO object for civicrm_setting table. This table is used to store civicrm settings that are not used
  38  * very frequently (i.e. not on every page load)
  39  *
  40  * The group column is used for grouping together all settings that logically belong to the same set.
  41  * Thus all settings in the same group are retrieved with one DB call and then cached for future needs.
  42  *
  43  */
  44 class CRM_Core_BAO_Setting extends CRM_Core_DAO_Setting {
  45
  46   /**
  47    * various predefined settings that have been migrated to the setting table
  48    */
  49   CONST
  50     ADDRESS_STANDARDIZATION_PREFERENCES_NAME = 'Address Standardization Preferences',
  51     CAMPAIGN_PREFERENCES_NAME = 'Campaign Preferences',
  52     DIRECTORY_PREFERENCES_NAME = 'Directory Preferences',
  53     EVENT_PREFERENCES_NAME = 'Event Preferences',
  54     MAILING_PREFERENCES_NAME = 'Mailing Preferences',
  55     CONTRIBUTE_PREFERENCES_NAME = 'Contribute Preferences',
  56     MEMBER_PREFERENCES_NAME = 'Member Preferences',
  57     MULTISITE_PREFERENCES_NAME = 'Multi Site Preferences',
  58     PERSONAL_PREFERENCES_NAME = 'Personal Preferences',
  59     SYSTEM_PREFERENCES_NAME = 'CiviCRM Preferences',
  60     URL_PREFERENCES_NAME = 'URL Preferences',
  61     LOCALIZATION_PREFERENCES_NAME = 'Localization Preferences',
  62     SEARCH_PREFERENCES_NAME = 'Search Preferences';
  63   static $_cache = NULL;
  64
  65   /**
  66    * Checks whether an item is present in the in-memory cache table
  67    *
  68    * @param string $group (required) The group name of the item
  69    * @param string $name  (required) The name of the setting
  70    * @param int    $componentID The optional component ID (so componenets can share the same name space)
  71    * @param int    $contactID    If set, this is a contactID specific setting, else its a global setting
  72    * @param int    $load  if true, load from local cache (typically memcache)
  73    *
  74    * @return boolean true if item is already in cache
  75    * @static
  76    * @access public
  77    */
  78   static function inCache(
  79     $group,
  80     $name,
  81     $componentID = NULL,
  82     $contactID   = NULL,
  83     $load        = FALSE,
  84     $domainID = NULL,
  85     $force = FALSE
  86   ) {
  87     if (!isset(self::$_cache)) {
  88       self::$_cache = array();
  89     }
  90
  91     $cacheKey = "CRM_Setting_{$group}_{$componentID}_{$contactID}_{$domainID}";
  92
  93     if (
  94       $load &&
  95       ($force || !isset(self::$_cache[$cacheKey]))
  96     ) {
  97
  98       // check in civi cache if present (typically memcache)
  99       $globalCache = CRM_Utils_Cache::singleton();
 100       $result = $globalCache->get($cacheKey);
 101       if ($result) {
 102
 103         self::$_cache[$cacheKey] = $result;
 104       }
 105     }
 106
 107     return isset(self::$_cache[$cacheKey]) ? $cacheKey : NULL;
 108   }
 109   /**
 110   * Allow key o be cleared
 111   * @param string $cacheKey
 112   */
 113   static function flushCache($cacheKey){
 114     unset(self::$_cache[$cacheKey]);
 115     $globalCache = CRM_Utils_Cache::singleton();
 116     $globalCache->delete($cacheKey);
 117   }
 118
 119   static function setCache($values,
 120     $group,
 121     $componentID = NULL,
 122     $contactID = NULL,
 123     $domainID = NULL
 124   ) {
 125     if (!isset(self::$_cache)) {
 126       self::$_cache = array();
 127     }
 128
 129     $cacheKey = "CRM_Setting_{$group}_{$componentID}_{$contactID}_{$domainID}";
 130
 131     self::$_cache[$cacheKey] = $values;
 132
 133     $globalCache = CRM_Utils_Cache::singleton();
 134     $result = $globalCache->set($cacheKey, $values);
 135
 136     return $cacheKey;
 137   }
 138
 139   static function dao($group,
 140     $name        = NULL,
 141     $componentID = NULL,
 142     $contactID   = NULL,
 143     $domainID = NULL
 144   ) {
 145     if (self::isUpgradeFromPreFourOneAlpha1()) {
 146       // civicrm_setting table is not going to be present. For now we'll just
 147       // return a dummy object
 148       $dao = new CRM_Core_DAO_Domain();
 149       $dao->id = -1; // so ->find() doesn't fetch any data later on
 150       return $dao;
 151     }
 152     $dao = new CRM_Core_DAO_Setting();
 153
 154     $dao->group_name   = $group;
 155     $dao->name         = $name;
 156     $dao->component_id = $componentID;
 157     if (empty($domainID)) {
 158       $dao->domain_id    = CRM_Core_Config::domainID();
 159     }
 160     else {
 161       $dao->domain_id = $domainID;
 162     }
 163
 164     if ($contactID) {
 165       $dao->contact_id = $contactID;
 166       $dao->is_domain = 0;
 167     }
 168     else {
 169       $dao->is_domain = 1;
 170     }
 171
 172     return $dao;
 173   }
 174
 175   /**
 176    * Retrieve the value of a setting from the DB table
 177    *
 178    * @param string $group (required) The group name of the item
 179    * @param string $name  (required) The name under which this item is stored
 180    * @param int    $componentID The optional component ID (so componenets can share the same name space)
 181    * @param string $defaultValue The default value to return for this setting if not present in DB
 182    * @param int    $contactID    If set, this is a contactID specific setting, else its a global setting
 183
 184    *
 185    * @return object The data if present in the setting table, else null
 186    * @static
 187    * @access public
 188    */
 189   static function getItem(
 190     $group,
 191     $name         = NULL,
 192     $componentID  = NULL,
 193     $defaultValue = NULL,
 194     $contactID    = NULL,
 195     $domainID     = NULL
 196   ) {
 197
 198     if (NULL !== ($override = self::getOverride($group, $name, NULL))) {
 199       return $override;
 200     }
 201
 202     if (empty($domainID)) {
 203       $domainID = CRM_Core_Config::domainID();
 204     }
 205     $cacheKey = self::inCache($group, $name, $componentID, $contactID, TRUE, $domainID);
 206     if (!$cacheKey) {
 207       $dao = self::dao($group, NULL, $componentID, $contactID, $domainID);
 208       $dao->find();
 209
 210       $values = array();
 211       while ($dao->fetch()) {
 212         if (NULL !== ($override = self::getOverride($group, $dao->name, NULL))) {
 213           $values[$dao->name] = $override;
 214         }
 215         elseif ($dao->value) {
 216           $values[$dao->name] = unserialize($dao->value);
 217         }
 218         else {
 219           $values[$dao->name] = NULL;
 220         }
 221       }
 222       $dao->free();
 223
 224       $cacheKey = self::setCache($values, $group, $componentID, $contactID, $domainID);
 225     }
 226     return $name ? CRM_Utils_Array::value($name, self::$_cache[$cacheKey], $defaultValue) : self::$_cache[$cacheKey];
 227   }
 228
 229   /**
 230    * Store multiple items in the setting table
 231    *
 232    * @param array $params (required) An api formatted array of keys and values
 233    * @domains array an array of domains to get settings for. Default is the current domain
 234    * @return void
 235    * @static
 236    * @access public
 237    */
 238   static function getItems(&$params, $domains = NULL, $settingsToReturn) {
 239     $originalDomain = CRM_Core_Config::domainID();
 240     if (empty($domains)) {
 241       $domains[] = $originalDomain;
 242     }
 243     if (!empty($settingsToReturn) && !is_array($settingsToReturn)) {
 244       $settingsToReturn = array($settingsToReturn);
 245     }
 246     $reloadConfig = FALSE;
 247
 248     $fields = $result = array();
 249     $fieldsToGet = self::validateSettingsInput(array_flip($settingsToReturn), $fields, FALSE);
 250     foreach ($domains as $domainID) {
 251       if($domainID != CRM_Core_Config::domainID()){
 252         $reloadConfig = TRUE;
 253         CRM_Core_BAO_Domain::setDomain($domainID);
 254       }
 255       $config = CRM_Core_Config::singleton($reloadConfig, $reloadConfig);
 256       $result[$domainID] = array();
 257       foreach ($fieldsToGet as $name => $value) {
 258         if(!empty($fields['values'][$name]['prefetch'])){
 259           if(isset($params['filters']) && isset($params['filters']['prefetch'])
 260             && $params['filters']['prefetch'] == 0){
 261             // we are filtering out the prefetches from the return array
 262             // so we will skip
 263             continue;
 264           }
 265           $configKey = CRM_Utils_Array::value('config_key', $fields['values'][$name],  $name);
 266           if(isset($config->$configKey)){
 267             $setting = $config->$configKey;
 268           }
 269         }
 270         else {
 271           $setting =
 272             CRM_Core_BAO_Setting::getItem(
 273             $fields['values'][$name]['group_name'],
 274             $name,
 275             CRM_Utils_Array::value('component_id', $params),
 276             NULL,
 277             CRM_Utils_Array::value('contact_id', $params),
 278             $domainID
 279           );
 280         }
 281         if (!is_null($setting)) {
 282           // we won't return if not set - helps in return all scenario - otherwise we can't indentify the missing ones
 283           // e.g for revert of fill actions
 284           $result[$domainID][$name] = $setting;
 285         }
 286       }
 287       CRM_Core_BAO_Domain::resetDomain();
 288     }
 289     return $result;
 290   }
 291
 292   /**
 293    * Store an item in the setting table
 294    *
 295    * _setItem() is the common logic shared by setItem() and setItems().
 296    *
 297    * @param object $value (required) The value that will be serialized and stored
 298    * @param string $group (required) The group name of the item
 299    * @param string $name  (required) The name of the setting
 300    * @param int    $componentID The optional component ID (so componenets can share the same name space)
 301    * @param int    $createdID   An optional ID to assign the creator to. If not set, retrieved from session
 302    *
 303    * @return void
 304    * @static
 305    * @access public
 306    */
 307   static function setItem(
 308     $value,
 309     $group,
 310     $name,
 311     $componentID = NULL,
 312     $contactID   = NULL,
 313     $createdID   = NULL,
 314     $domainID    = NULL
 315   ) {
 316     $fields = array();
 317     $fieldsToSet = self::validateSettingsInput(array($name => $value), $fields);
 318     //We haven't traditionally validated inputs to setItem, so this breaks things.
 319     //foreach ($fieldsToSet as $settingField => &$settingValue) {
 320     //  self::validateSetting($settingValue, $fields['values'][$settingField]);
 321     //}
 322
 323     return self::_setItem($fields['values'][$name], $value, $group, $name, $componentID, $contactID, $createdID, $domainID);
 324   }
 325
 326   /**
 327    * Store an item in a setting table
 328    *
 329    * _setItem() is the common logic shared by setItem() and setItems().
 330    *
 331    * @param array $metadata metadata describing this field
 332    * @param $value
 333    * @param $group
 334    * @param $name
 335    * @param null $componentID
 336    * @param null $contactID
 337    * @param null $createdID
 338    * @param null $domainID
 339    */
 340   static function _setItem(
 341     $metadata,
 342     $value,
 343     $group,
 344     $name,
 345     $componentID = NULL,
 346     $contactID   = NULL,
 347     $createdID   = NULL,
 348     $domainID    = NULL
 349   ) {
 350     if (empty($domainID)) {
 351       $domainID = CRM_Core_Config::domainID();
 352     }
 353
 354     $dao = self::dao($group, $name, $componentID, $contactID, $domainID);
 355     $dao->find(TRUE);
 356
 357     if (isset($metadata['on_change'])) {
 358       foreach ($metadata['on_change'] as $callback) {
 359         call_user_func($callback, unserialize($dao->value), $value, $metadata);
 360       }
 361     }
 362
 363     if (CRM_Utils_System::isNull($value)) {
 364       $dao->value = 'null';
 365     }
 366     else {
 367       $dao->value = serialize($value);
 368     }
 369
 370     $dao->created_date = date('Ymdhis');
 371
 372     if ($createdID) {
 373       $dao->created_id = $createdID;
 374     }
 375     else {
 376       $session = CRM_Core_Session::singleton();
 377       $createdID = $session->get('userID');
 378
 379       if ($createdID) {
 380         // ensure that this is a valid contact id (for session inconsistency rules)
 381         $cid = CRM_Core_DAO::getFieldValue('CRM_Contact_DAO_Contact',
 382           $createdID,
 383           'id',
 384           'id'
 385         );
 386         if ($cid) {
 387           $dao->created_id = $session->get('userID');
 388         }
 389       }
 390     }
 391
 392     $dao->save();
 393     $dao->free();
 394
 395     // also save in cache if needed
 396     $cacheKey = self::inCache($group, $name, $componentID, $contactID, FALSE, $domainID);
 397     if ($cacheKey) {
 398       self::$_cache[$cacheKey][$name] = $value;
 399     }
 400   }
 401
 402   /**
 403    * Store multiple items in the setting table. Note that this will also store config keys
 404    * the storage is determined by the metdata and is affected by
 405    *  'name' setting's name
 406    *  'prefetch' = store in config
 407    *  'config_only' = don't store in settings
 408    *  'config_key' = the config key is different to the settings key - e.g. debug where there was a conflict
 409    *  'legacy_key' = rename from config or setting with this name
 410    *
 411    * _setItem() is the common logic shared by setItem() and setItems().
 412    *
 413    * @param array $params (required) An api formatted array of keys and values
 414    * @domains array an array of domains to get settings for. Default is the current domain
 415    * @return void
 416    * @static
 417    * @access public
 418    */
 419   static function setItems(&$params, $domains = NULL) {
 420     $originalDomain = CRM_Core_Config::domainID();
 421     if (empty($domains)) {
 422       $domains[] = $originalDomain;
 423     }
 424     $reloadConfig = FALSE;
 425     $fields = $config_keys = array();
 426     $fieldsToSet = self::validateSettingsInput($params, $fields);
 427
 428     foreach ($fieldsToSet as $settingField => &$settingValue) {
 429       self::validateSetting($settingValue, $fields['values'][$settingField]);
 430     }
 431
 432     foreach ($domains as $domainID) {
 433       if($domainID != CRM_Core_Config::domainID()){
 434         $reloadConfig = TRUE;
 435         CRM_Core_BAO_Domain::setDomain($domainID);
 436       }
 437       $result[$domainID] = array();
 438       foreach ($fieldsToSet as $name => $value) {
 439         if(empty($fields['values'][$name]['config_only'])){
 440           CRM_Core_BAO_Setting::_setItem(
 441             $fields['values'][$name],
 442             $value,
 443             $fields['values'][$name]['group_name'],
 444             $name,
 445             CRM_Utils_Array::value('component_id', $params),
 446             CRM_Utils_Array::value('contact_id', $params),
 447             CRM_Utils_Array::value('created_id', $params),
 448             $domainID
 449           );
 450         }
 451         if(!empty($fields['values'][$name]['prefetch'])){
 452           if(!empty($fields['values'][$name]['config_key'])){
 453             $name = $fields['values'][$name]['config_key'];
 454           }
 455           $config_keys[$name] = $value;
 456         }
 457         $result[$domainID][$name] = $value;
 458       }
 459       if($reloadConfig){
 460         CRM_Core_Config::singleton($reloadConfig, $reloadConfig);
 461       }
 462
 463       if(!empty($config_keys)){
 464         CRM_Core_BAO_ConfigSetting::create($config_keys);
 465       }
 466       if($reloadConfig){
 467         CRM_Core_BAO_Domain::resetDomain();
 468       }
 469     }
 470
 471     return $result;
 472   }
 473
 474   /**
 475    * gets metadata about the settings fields (from getfields) based on the fields being passed in
 476    *
 477    * This function filters on the fields like 'version' & 'debug' that are not settings
 478    * @param array $params Parameters as passed into API
 479    * @param array $fields empty array to be populated with fields metadata
 480    * @param bool $createMode
 481    *
 482    * @return array $fieldstoset name => value array of the fields to be set (with extraneous removed)
 483    */
 484   static function validateSettingsInput($params, &$fields, $createMode = TRUE) {
 485     $group = CRM_Utils_Array::value('group', $params);
 486
 487     $ignoredParams = array(
 488       'version',
 489       'id',
 490       'domain_id',
 491       'debug',
 492       'created_id',
 493       'component_id',
 494       'contact_id',
 495       'filters',
 496       'entity_id',
 497       'entity_table',
 498       'sequential',
 499       'api.has_parent',
 500       'IDS_request_uri',
 501       'IDS_user_agent',
 502       'check_permissions',
 503     );
 504     $settingParams = array_diff_key($params, array_fill_keys($ignoredParams, TRUE));
 505     $getFieldsParams = array('version' => 3);
 506     if (count($settingParams) ==1) {
 507       // ie we are only setting one field - we'll pass it into getfields for efficiency
 508       list($name) = array_keys($settingParams);
 509       $getFieldsParams['name'] = $name;
 510     }
 511     $fields = civicrm_api('setting','getfields', $getFieldsParams);
 512     $invalidParams = (array_diff_key($settingParams, $fields['values']));
 513     if (!empty($invalidParams)) {
 514       throw new api_Exception(implode(',', $invalidParams) . " not valid settings");
 515     }
 516     if (!empty($settingParams)) {
 517       $filteredFields = array_intersect_key($settingParams, $fields['values']);
 518     }
 519     else {
 520       // no filters so we are interested in all for get mode. In create mode this means nothing to set
 521       $filteredFields = $createMode ? array() : $fields['values'];
 522     }
 523     return $filteredFields;
 524   }
 525
 526   /**
 527    * Validate & convert settings input
 528    *
 529    * @value mixed value of the setting to be set
 530    * @fieldSpec array Metadata for given field (drawn from the xml)
 531    */
 532   static function validateSetting(&$value, $fieldSpec) {
 533     if($fieldSpec['type'] == 'String' && is_array($value)){
 534       $value = CRM_Core_DAO::VALUE_SEPARATOR . implode(CRM_Core_DAO::VALUE_SEPARATOR,$value) . CRM_Core_DAO::VALUE_SEPARATOR;
 535     }
 536     if (empty($fieldSpec['validate_callback'])) {
 537       return TRUE;
 538     }
 539     else {
 540       list($class,$fn) = explode('::',$fieldSpec['validate_callback']);
 541       if (!$class::$fn($value,$fieldSpec)) {
 542         throw new api_Exception("validation failed for {$fieldSpec['name']} = $value  based on callback {$fieldSpec['validate_callback']}");
 543       }
 544     }
 545   }
 546
 547   /**
 548    * Validate & convert settings input - translate True False to 0 or 1
 549    *
 550    * @value mixed value of the setting to be set
 551    * @fieldSpec array Metadata for given field (drawn from the xml)
 552    */
 553   static function validateBoolSetting(&$value, $fieldSpec) {
 554     if (!CRM_Utils_Rule::boolean($value)) {
 555       throw new api_Exception("Boolean value required for {$fieldSpec['name']}");
 556     }
 557     if (!$value) {
 558       $value = 0;
 559     }
 560     else {
 561       $value = 1;
 562     }
 563     return TRUE;
 564   }
 565
 566   /**
 567    * Delete some or all of the items in the settings table
 568    *
 569    * @param string $group The group name of the entries to be deleted
 570    * @param string $name  The name of the setting to be deleted
 571    * @param int    $componentID The optional component ID (so componenets can share the same name space)
 572    *
 573    * @return void
 574    * @static
 575    * @access public
 576    *
 577   static function deleteItem($group, $name = NULL, $componentID = NULL, $contactID = NULL) {
 578     $dao = self::dao($group, $name, $componentID, $contactID);
 579     $dao->delete();
 580
 581     // also reset memory cache if any
 582     CRM_Utils_System::flushCache();
 583
 584     $cacheKey = self::inCache($group, $name, $componentID, $contactID, FALSE);
 585     if ($cacheKey) {
 586       if ($name) {
 587         unset(self::$_cache[$cacheKey][$name]);
 588       }
 589       else {
 590         unset(self::$_cache[$cacheKey]);
 591       }
 592     }
 593   }*/
 594
 595   /**
 596    * This provides information about the setting - similar to the fields concept for DAO information.
 597    * As the setting is serialized code creating validation setting input needs to know the data type
 598    * This also helps move information out of the form layer into the data layer where people can interact with
 599    * it via the API or other mechanisms. In order to keep this consistent it is important the form layer
 600    * also leverages it.
 601    *
 602    * Note that this function should never be called when using the runtime getvalue function. Caching works
 603    * around the expectation it will be called during setting administration
 604    *
 605    * Function is intended for configuration rather than runtime access to settings
 606    *
 607    * The following params will filter the result. If none are passed all settings will be returns
 608    *
 609    * @params string $name Name of specific setting e.g customCSSURL
 610    * @params integer $componentID id of relevant component.
 611    *
 612    * @return array $result - the following information as appropriate for each setting
 613    * - name
 614    * - type
 615    * - default
 616    * - add (CiviCRM version added)
 617    * - is_domain
 618    * - is_contact
 619    * - description
 620    * - help_text
 621    */
 622   static function getSettingSpecification(
 623     $componentID = NULL,
 624     $filters = array(),
 625     $domainID = NULL,
 626     $profile = NULL
 627   ) {
 628     $cacheString = 'settingsMetadata_' . $domainID . '_' . $profile;
 629     foreach ($filters as $filterField => $filterString) {
 630       $cacheString .= "_{$filterField}_{$filterString}";
 631     }
 632     $cached = 1;
 633     $settingsMetadata = CRM_Core_BAO_Cache::getItem('CiviCRM setting Specs', $cacheString, $componentID);
 634     if ($settingsMetadata === NULL) {
 635       $settingsMetadata = CRM_Core_BAO_Cache::getItem('CiviCRM setting Spec', 'All', $componentID);
 636       if (empty($settingsMetadata)) {
 637         $settingsMetadata = array();
 638         global $civicrm_root;
 639         $metaDataFolders = array($civicrm_root. '/settings');
 640         CRM_Utils_Hook::alterSettingsFolders($metaDataFolders);
 641         foreach ($metaDataFolders as $metaDataFolder) {
 642           $settingsMetadata = $settingsMetadata + self::loadSettingsMetaData($metaDataFolder);
 643         }
 644         CRM_Core_BAO_Cache::setItem($settingsMetadata,'CiviCRM setting Spec', 'All', $componentID);
 645       }
 646       $cached = 0;
 647     }
 648
 649     CRM_Utils_Hook::alterSettingsMetaData($settingsMetadata, $domainID, $profile);
 650     self::_filterSettingsSpecification($filters, $settingsMetadata);
 651
 652     if (!$cached) {
 653       // this is a bit 'heavy' if you are using hooks but this function
 654       // is expected to only be called during setting administration
 655       // it should not be called by 'getvalue' or 'getitem
 656       CRM_Core_BAO_Cache::setItem(
 657         $settingsMetadata,
 658         'CiviCRM setting Specs',
 659         $cacheString,
 660         $componentID
 661       );
 662     }
 663     return $settingsMetadata;
 664
 665   }
 666
 667   /**
 668    * Load up settings metadata from files
 669    */
 670   static function loadSettingsMetadata($metaDataFolder) {
 671     $settingMetaData = array();
 672     $settingsFiles = CRM_Utils_File::findFiles($metaDataFolder, '*.setting.php');
 673     foreach ($settingsFiles as $file) {
 674       $settings = include $file;
 675       $settingMetaData = array_merge($settingMetaData, $settings);
 676     }
 677     CRM_Core_BAO_Cache::setItem($settingMetaData,'CiviCRM setting Spec', 'All');
 678     return $settingMetaData;
 679   }
 680
 681   /**
 682    * Filter the settings metadata according to filters passed in. This is a convenience filter
 683    * and allows selective reverting / filling of settings
 684    *
 685    * @param array $filters Filters to match against data
 686    * @param array $settingSpec metadata to filter
 687    */
 688   static function _filterSettingsSpecification($filters, &$settingSpec) {
 689     if (empty($filters)) {
 690       return;
 691     }
 692     else if (array_keys($filters) == array('name')) {
 693       $settingSpec = array($filters['name'] => $settingSpec[$filters['name']]);
 694       return;
 695     }
 696     else {
 697       foreach ($settingSpec as $field => $fieldValues) {
 698         if (array_intersect_assoc($fieldValues, $filters) != $filters) {
 699           unset($settingSpec[$field]);
 700         }
 701       }
 702       return;
 703     }
 704   }
 705
 706   /**
 707    * Look for any missing settings and convert them from config or load default as appropriate
 708    * This should be run from GenCode & also from upgrades to add any new defaults.
 709    *
 710    * Multisites have often been overlooked in upgrade scripts so can be expected to be missing
 711    * a number of settings
 712    */
 713   static function updateSettingsFromMetaData() {
 714     $apiParams = array(
 715       'version' => 3,
 716       'domain_id' => 'all',
 717       'filters' => array('prefetch' => 0),
 718     );
 719     $existing = civicrm_api('setting', 'get', $apiParams);
 720
 721     if (!empty($existing['values'])) {
 722       $allSettings = civicrm_api('setting', 'getfields', array('version' => 3));
 723       foreach ($existing['values'] as $domainID => $domainSettings) {
 724         CRM_Core_BAO_Domain::setDomain($domainID);
 725         $missing = array_diff_key($allSettings['values'], $domainSettings);
 726         foreach ($missing as $name => $settings) {
 727           self::convertConfigToSetting($name, $domainID);
 728         }
 729         CRM_Core_BAO_Domain::resetDomain();
 730       }
 731     }
 732   }
 733
 734   /**
 735    * move an item from being in the config array to being stored as a setting
 736    * remove from config - as appropriate based on metadata
 737    *
 738    * Note that where the key name is being changed the 'legacy_key' will give us the old name
 739    */
 740   static function convertConfigToSetting($name, $domainID = NULL) {
 741     // we have to force this here in case more than one domain is in play.
 742     // whenever there is a possibility of more than one domain we must force it
 743     $config = CRM_Core_Config::singleton();
 744     if (empty($domainID)) {
 745       $domainID= CRM_Core_Config::domainID();
 746     }
 747     $domain = new CRM_Core_DAO_Domain();
 748     $domain->id = $domainID;
 749     $domain->find(TRUE);
 750     if ($domain->config_backend) {
 751       $values = unserialize($domain->config_backend);
 752     } else {
 753       $values = array();
 754     }
 755     $spec = self::getSettingSpecification(NULL, array('name' => $name), $domainID);
 756     $configKey = CRM_Utils_Array::value('config_key', $spec[$name], CRM_Utils_Array::value('legacy_key', $spec[$name], $name));
 757     //if the key is set to config_only we don't need to do anything
 758     if(empty($spec[$name]['config_only'])){
 759       if (!empty($values[$configKey])) {
 760         civicrm_api('setting', 'create', array('version' => 3, $name => $values[$configKey], 'domain_id' => $domainID));
 761       }
 762       else {
 763         civicrm_api('setting', 'fill', array('version' => 3, 'name' => $name, 'domain_id' => $domainID));
 764       }
 765
 766       if (empty($spec[$name]['prefetch']) && !empty($values[$configKey])) {
 767         unset($values[$configKey]);
 768         $domain->config_backend = serialize($values);
 769         $domain->save();
 770         unset($config->$configKey);
 771       }
 772     }
 773   }
 774
 775   static function valueOptions($group,
 776     $name,
 777     $system              = TRUE,
 778     $userID              = NULL,
 779     $localize            = FALSE,
 780     $returnField         = 'name',
 781     $returnNameANDLabels = FALSE,
 782     $condition           = NULL
 783   ) {
 784     $optionValue = self::getItem($group, $name);
 785
 786     $groupValues = CRM_Core_OptionGroup::values($name, FALSE, FALSE, $localize, $condition, $returnField);
 787
 788     //enabled name => label require for new contact edit form, CRM-4605
 789     if ($returnNameANDLabels) {
 790       $names = $labels = $nameAndLabels = array();
 791       if ($returnField == 'name') {
 792         $names = $groupValues;
 793         $labels = CRM_Core_OptionGroup::values($name, FALSE, FALSE, $localize, $condition, 'label');
 794       }
 795       else {
 796         $labels = $groupValues;
 797         $names = CRM_Core_OptionGroup::values($name, FALSE, FALSE, $localize, $condition, 'name');
 798       }
 799     }
 800
 801     $returnValues = array();
 802     foreach ($groupValues as $gn => $gv) {
 803       $returnValues[$gv] = 0;
 804     }
 805
 806     if ($optionValue && !empty($groupValues)) {
 807       $dbValues = explode(CRM_Core_DAO::VALUE_SEPARATOR,
 808         substr($optionValue, 1, -1)
 809       );
 810
 811       if (!empty($dbValues)) {
 812         foreach ($groupValues as $key => $val) {
 813           if (in_array($key, $dbValues)) {
 814             $returnValues[$val] = 1;
 815             if ($returnNameANDLabels) {
 816               $nameAndLabels[$names[$key]] = $labels[$key];
 817             }
 818           }
 819         }
 820       }
 821     }
 822     return ($returnNameANDLabels) ? $nameAndLabels : $returnValues;
 823   }
 824
 825   static function setValueOption($group,
 826     $name,
 827     $value,
 828     $system   = TRUE,
 829     $userID   = NULL,
 830     $keyField = 'name'
 831   ) {
 832     if (empty($value)) {
 833       $optionValue = NULL;
 834     }
 835     elseif (is_array($value)) {
 836       $groupValues = CRM_Core_OptionGroup::values($name, FALSE, FALSE, FALSE, NULL, $keyField);
 837
 838       $cbValues = array();
 839       foreach ($groupValues as $key => $val) {
 840         if (CRM_Utils_Array::value($val, $value)) {
 841           $cbValues[$key] = 1;
 842         }
 843       }
 844
 845       if (!empty($cbValues)) {
 846         $optionValue = CRM_Core_DAO::VALUE_SEPARATOR . implode(CRM_Core_DAO::VALUE_SEPARATOR,
 847           array_keys($cbValues)
 848         ) . CRM_Core_DAO::VALUE_SEPARATOR;
 849       }
 850       else {
 851         $optionValue = NULL;
 852       }
 853     }
 854     else {
 855       $optionValue = $value;
 856     }
 857
 858     self::setItem($optionValue, $group, $name);
 859   }
 860
 861   static function fixAndStoreDirAndURL(&$params, $domainID = NULL) {
 862     if (self::isUpgradeFromPreFourOneAlpha1()) {
 863       return;
 864     }
 865
 866     if (empty($domainID)) {
 867       $domainID = CRM_Core_Config::domainID();
 868     }
 869     $sql = "
 870  SELECT name, group_name
 871  FROM   civicrm_setting
 872  WHERE domain_id = %1
 873  AND ( group_name = %2
 874  OR  group_name = %3 )
 875 ";
 876     $sqlParams = array(
 877       1 => array($domainID, 'Integer'),
 878       2 => array(self::DIRECTORY_PREFERENCES_NAME, 'String'),
 879       3 => array(self::URL_PREFERENCES_NAME, 'String'),
 880     );
 881
 882     $dirParams = array();
 883     $urlParams = array();
 884
 885     $dao = CRM_Core_DAO::executeQuery($sql,
 886       $sqlParams,
 887       TRUE,
 888       NULL,
 889       FALSE,
 890       TRUE,
 891       // trap exceptions as error
 892       TRUE
 893     );
 894
 895     if (is_a($dao, 'DB_Error')) {
 896       if (CRM_Core_Config::isUpgradeMode()) {
 897         // seems like this is a 4.0 -> 4.1 upgrade, so we suppress this error and continue
 898         return;
 899       }
 900       else {
 901         echo "Fatal DB error, exiting, seems like your schema does not have civicrm_setting table\n";
 902         exit();
 903       }
 904     }
 905
 906     while ($dao->fetch()) {
 907       if (!isset($params[$dao->name])) {
 908         continue;
 909       }
 910       if ($dao->group_name == self::DIRECTORY_PREFERENCES_NAME) {
 911         $dirParams[$dao->name] = CRM_Utils_Array::value($dao->name, $params, '');
 912       }
 913       else {
 914         $urlParams[$dao->name] = CRM_Utils_Array::value($dao->name, $params, '');
 915       }
 916       unset($params[$dao->name]);
 917     }
 918
 919     if (!empty($dirParams)) {
 920       self::storeDirectoryOrURLPreferences($dirParams,
 921         self::DIRECTORY_PREFERENCES_NAME
 922       );
 923     }
 924
 925     if (!empty($urlParams)) {
 926       self::storeDirectoryOrURLPreferences($urlParams,
 927         self::URL_PREFERENCES_NAME
 928       );
 929     }
 930   }
 931
 932   static function storeDirectoryOrURLPreferences(&$params, $group) {
 933     foreach ($params as $name => $value) {
 934       // always try to store relative directory or url from CMS root
 935       $value = ($group == self::DIRECTORY_PREFERENCES_NAME) ? CRM_Utils_File::relativeDirectory($value) : CRM_Utils_System::relativeURL($value);
 936
 937       self::setItem($value, $group, $name);
 938     }
 939   }
 940
 941   static function retrieveDirectoryAndURLPreferences(&$params, $setInConfig = FALSE) {
 942     if (CRM_Core_Config::isUpgradeMode()) {
 943       $isJoomla = (defined('CIVICRM_UF') && CIVICRM_UF == 'Joomla') ? TRUE : FALSE;
 944       // hack to set the resource base url so that js/ css etc is loaded correctly
 945       if ($isJoomla) {
 946         $params['userFrameworkResourceURL'] = CRM_Utils_File::addTrailingSlash(CIVICRM_UF_BASEURL, '/') . str_replace('administrator', '', CRM_Core_DAO::getFieldValue('CRM_Core_DAO_OptionValue', 'userFrameworkResourceURL', 'value', 'name'));
 947       }
 948       if (self::isUpgradeFromPreFourOneAlpha1()) {
 949         return;
 950       }
 951     }
 952
 953     if ($setInConfig) {
 954       $config = CRM_Core_Config::singleton();
 955     }
 956
 957     $sql = "
 958 SELECT name, group_name, value
 959 FROM   civicrm_setting
 960 WHERE  ( group_name = %1
 961 OR       group_name = %2 )
 962 AND domain_id = %3
 963 ";
 964     $sqlParams = array(1 => array(self::DIRECTORY_PREFERENCES_NAME, 'String'),
 965       2 => array(self::URL_PREFERENCES_NAME, 'String'),
 966       3 => array(CRM_Core_Config::domainID(), 'Integer'),
 967     );
 968
 969     $dao = CRM_Core_DAO::executeQuery($sql,
 970       $sqlParams,
 971       TRUE,
 972       NULL,
 973       FALSE,
 974       TRUE,
 975       // trap exceptions as error
 976       TRUE
 977     );
 978
 979     if (is_a($dao, 'DB_Error')) {
 980       echo "Fatal DB error, exiting, seems like your schema does not have civicrm_setting table\n";
 981       exit();
 982     }
 983
 984     while ($dao->fetch()) {
 985       $value = self::getOverride($dao->group_name, $dao->name, NULL);
 986       if ($value === NULL && $dao->value) {
 987         $value = unserialize($dao->value);
 988         if ($dao->group_name == self::DIRECTORY_PREFERENCES_NAME) {
 989           $value = CRM_Utils_File::absoluteDirectory($value);
 990         }
 991         else {
 992           // CRM-7622: we need to remove the language part
 993           $value = CRM_Utils_System::absoluteURL($value, TRUE);
 994         }
 995       }
 996       // CRM-10931, If DB doesn't have any value, carry on with any default value thats already available
 997       if (!isset($value) && CRM_Utils_Array::value($dao->name, $params)) {
 998         $value = $params[$dao->name];
 999       }
1000       $params[$dao->name] = $value;
1001
1002       if ($setInConfig) {
1003         $config->{$dao->name} = $value;
1004       }
1005     }
1006   }
1007
1008   /**
1009    * Determine what, if any, overrides have been provided
1010    * for a setting.
1011    *
1012    * @return mixed, NULL or an overriden value
1013    */
1014   protected static function getOverride($group, $name, $default) {
1015     global $civicrm_setting;
1016     if ($group && $name && isset($civicrm_setting[$group][$name])) {
1017       return $civicrm_setting[$group][$name];
1018     }
1019     else {
1020       return $default;
1021     }
1022   }
1023
1024   /**
1025    * civicrm_setting didn't exist before 4.1.alpha1 and this function helps taking decisions during upgrade
1026    *
1027    * @return boolean
1028    */
1029   static function isUpgradeFromPreFourOneAlpha1() {
1030     if (CRM_Core_Config::isUpgradeMode()) {
1031       $currentVer = CRM_Core_BAO_Domain::version();
1032       if (version_compare($currentVer, '4.1.alpha1') < 0) {
1033         return TRUE;
1034       }
1035     }
1036     return FALSE;
1037   }
1038 }