src/Core/Config/PreloadConfigAdapter.php

   1 <?php\r
   2 \r
   3 namespace Friendica\Core\Config;\r
   4 \r
   5 use dba;\r
   6 use Exception;\r
   7 use Friendica\BaseObject;\r
   8 \r
   9 require_once 'include/dba.php';\r
  10 \r
  11 /**\r
  12  * Preload ConfigAdapter\r
  13  *\r
  14  * Minimize the number of database queries to retrieve configuration values at the cost of memory.\r
  15  *\r
  16  * @author Hypolite Petovan <mrpetovan@gmail.com>\r
  17  */\r
  18 class PreloadConfigAdapter extends BaseObject implements IConfigAdapter\r
  19 {\r
  20         private $config_loaded = false;\r
  21 \r
  22         public function __construct()\r
  23         {\r
  24                 $this->load();\r
  25         }\r
  26 \r
  27         public function load($family = 'config')\r
  28         {\r
  29                 if ($this->config_loaded) {\r
  30                         return;\r
  31                 }\r
  32 \r
  33                 $a = self::getApp();\r
  34 \r
  35                 $configs = dba::select('config', ['cat', 'v', 'k']);\r
  36                 while ($config = dba::fetch($configs)) {\r
  37                         $cat   = $config['cat'];\r
  38                         $k     = $config['k'];\r
  39                         $value = (preg_match("|^a:[0-9]+:{.*}$|s", $config['v']) ? unserialize($config['v']) : $config['v']);\r
  40 \r
  41                         if ($cat === 'config') {\r
  42                                 $a->config[$k] = $value;\r
  43                         } else {\r
  44                                 $a->config[$cat][$k] = $value;\r
  45                         }\r
  46                 }\r
  47                 dba::close($configs);\r
  48 \r
  49                 $this->config_loaded = true;\r
  50         }\r
  51 \r
  52         public function get($cat, $k, $default_value = null, $refresh = false)\r
  53         {\r
  54                 $a = self::getApp();\r
  55 \r
  56                 $return = $default_value;\r
  57 \r
  58                 if ($cat === 'config') {\r
  59                         if (isset($a->config[$k])) {\r
  60                                 $return = $a->config[$k];\r
  61                         }\r
  62                 } else {\r
  63                         if (isset($a->config[$cat][$k])) {\r
  64                                 $return = $a->config[$cat][$k];\r
  65                         }\r
  66                 }\r
  67 \r
  68                 return $return;\r
  69         }\r
  70 \r
  71         public function set($cat, $k, $value)\r
  72         {\r
  73                 $a = self::getApp();\r
  74 \r
  75                 // We store our setting values as strings.\r
  76                 // So we have to do the conversion here so that the compare below works.\r
  77                 // The exception are array values.\r
  78                 $compare_value = !is_array($value) ? (string)$value : $value;\r
  79 \r
  80                 if ($this->get($cat, $k) === $compare_value) {\r
  81                         return true;\r
  82                 }\r
  83 \r
  84                 if ($cat === 'config') {\r
  85                         $a->config[$k] = $value;\r
  86                 } else {\r
  87                         $a->config[$cat][$k] = $value;\r
  88                 }\r
  89 \r
  90                 // manage array value\r
  91                 $dbvalue = is_array($value) ? serialize($value) : $value;\r
  92 \r
  93                 $result = dba::update('config', ['v' => $dbvalue], ['cat' => $cat, 'k' => $k], true);\r
  94                 if (!$result) {\r
  95                         throw new Exception('Unable to store config value in [' . $cat . '][' . $k . ']');\r
  96                 }\r
  97 \r
  98                 return true;\r
  99         }\r
 100 \r
 101         public function delete($cat, $k)\r
 102         {\r
 103                 $a = self::getApp();\r
 104 \r
 105                 if ($cat === 'config') {\r
 106                         if (isset($a->config[$k])) {\r
 107                                 unset($a->config[$k]);\r
 108                         }\r
 109                 } else {\r
 110                         if (isset($a->config[$cat][$k])) {\r
 111                                 unset($a->config[$cat][$k]);\r
 112                         }\r
 113                 }\r
 114 \r
 115                 $result = dba::delete('config', ['cat' => $cat, 'k' => $k]);\r
 116 \r
 117                 return $result;\r
 118         }\r
 119 }\r