3 * StatusNet, the distributed open-source microblogging tool
5 * Utilities for theme files and paths
9 * LICENCE: This program is free software: you can redistribute it and/or modify
10 * it under the terms of the GNU Affero General Public License as published by
11 * the Free Software Foundation, either version 3 of the License, or
12 * (at your option) any later version.
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 * GNU Affero General Public License for more details.
19 * You should have received a copy of the GNU Affero General Public License
20 * along with this program. If not, see <http://www.gnu.org/licenses/>.
24 * @author Evan Prodromou <evan@status.net>
25 * @author Sarven Capadisli <csarven@status.net>
26 * @copyright 2008-2009 StatusNet, Inc.
27 * @license http://www.fsf.org/licensing/licenses/agpl-3.0.html GNU Affero General Public License version 3.0
28 * @link http://status.net/
31 if (!defined('STATUSNET') && !defined('LACONICA')) {
36 * Class for querying and manipulating a theme
38 * Themes are directories with some expected sub-directories and files
39 * in them. They're found in either local/theme (for locally-installed themes)
40 * or theme/ subdir of installation dir.
42 * Note that the 'local' directory can be overridden as $config['local']['path']
43 * and $config['local']['dir'] etc.
45 * This used to be a couple of functions, but for various reasons it's nice
46 * to have a class instead.
50 * @author Evan Prodromou <evan@status.net>
51 * @license http://www.fsf.org/licensing/licenses/agpl-3.0.html GNU Affero General Public License version 3.0
52 * @link http://status.net/
63 * Determines the proper directory and path for this theme.
65 * @param string $name Name of the theme; defaults to config value
67 function __construct($name=null)
70 $name = common_config('site', 'theme');
72 if (!self::validName($name)) {
73 // TRANS: Server exception displayed if a theme name was invalid.
74 throw new ServerException(_('Invalid theme name.'));
78 // Check to see if it's in the local dir
80 $localroot = self::localRoot();
82 $fulldir = $localroot.'/'.$name;
84 if (file_exists($fulldir) && is_dir($fulldir)) {
85 $this->dir = $fulldir;
86 $this->path = $this->relativeThemePath('local', 'local', 'theme/' . $name);
90 // Check to see if it's in the distribution dir
92 $instroot = self::installRoot();
94 $fulldir = $instroot.'/'.$name;
96 if (file_exists($fulldir) && is_dir($fulldir)) {
97 $this->dir = $fulldir;
98 $this->path = $this->relativeThemePath('theme', 'theme', $name);
103 * Build a full URL to the given theme's base directory, possibly
104 * using an offsite theme server path.
106 * @param string $group configuration section name to pull paths from
107 * @param string $fallbackSubdir default subdirectory under INSTALLDIR
108 * @param string $name theme name
112 * @todo consolidate code with that for other customizable paths
114 protected function relativeThemePath($group, $fallbackSubdir, $name)
116 if (StatusNet::isHTTPS()) {
117 $sslserver = common_config($group, 'sslserver');
119 if (empty($sslserver)) {
120 if (is_string(common_config('site', 'sslserver')) &&
121 mb_strlen(common_config('site', 'sslserver')) > 0) {
122 $server = common_config('site', 'sslserver');
123 } else if (common_config('site', 'server')) {
124 $server = common_config('site', 'server');
126 $path = common_config('site', 'path') . '/';
127 if ($fallbackSubdir) {
128 $path .= $fallbackSubdir . '/';
131 $server = $sslserver;
132 $path = common_config($group, 'sslpath');
134 $path = common_config($group, 'path');
140 $path = common_config($group, 'path');
143 $path = common_config('site', 'path') . '/';
144 if ($fallbackSubdir) {
145 $path .= $fallbackSubdir . '/';
149 $server = common_config($group, 'server');
151 if (empty($server)) {
152 $server = common_config('site', 'server');
158 if ($path[strlen($path)-1] != '/') {
162 if ($path[0] != '/') {
166 return $protocol.'://'.$server.$path.$name;
170 * Gets the full local filename of a file in this theme.
172 * @param string $relative relative name, like 'logo.png'
174 * @return string full pathname, like /var/www/mublog/theme/default/logo.png
176 function getFile($relative)
178 return $this->dir.'/'.$relative;
182 * Gets the full HTTP url of a file in this theme
184 * @param string $relative relative name, like 'logo.png'
186 * @return string full URL, like 'http://example.com/theme/default/logo.png'
188 function getPath($relative)
190 return $this->path.'/'.$relative;
194 * Fetch a list of other themes whose CSS needs to be pulled in before
195 * this theme's, based on following the theme.ini 'include' settings.
196 * (May be empty if this theme has no include dependencies.)
198 * @return array of strings with theme names
202 $chain = $this->doGetDeps(array($this->name));
203 array_pop($chain); // Drop us back off
207 protected function doGetDeps($chain)
209 $data = $this->getMetadata();
210 if (!empty($data['include'])) {
211 $include = $data['include'];
213 // Protect against cycles!
214 if (!in_array($include, $chain)) {
216 $theme = new Theme($include);
217 array_unshift($chain, $include);
218 return $theme->doGetDeps($chain);
219 } catch (Exception $e) {
221 "Exception while fetching theme dependencies " .
222 "for $this->name: " . $e->getMessage());
230 * Pull data from the theme's theme.ini file.
231 * @fixme calling getFile will fall back to default theme, this may be unsafe.
233 * @return associative array of strings
235 function getMetadata()
237 $iniFile = $this->getFile('theme.ini');
238 if (file_exists($iniFile)) {
239 return parse_ini_file($iniFile);
246 * Gets the full path of a file in a theme dir based on its relative name
248 * @param string $relative relative path within the theme directory
249 * @param string $name name of the theme; defaults to current theme
251 * @return string File path to the theme file
253 static function file($relative, $name=null)
255 $theme = new Theme($name);
256 return $theme->getFile($relative);
260 * Gets the full URL of a file in a theme dir based on its relative name
262 * @param string $relative relative path within the theme directory
263 * @param string $name name of the theme; defaults to current theme
265 * @return string URL of the file
267 static function path($relative, $name=null)
269 $theme = new Theme($name);
270 return $theme->getPath($relative);
274 * list available theme names
276 * @return array list of available theme names
278 static function listAvailable()
280 $local = self::subdirsOf(self::localRoot());
281 $install = self::subdirsOf(self::installRoot());
283 $i = array_search('base', $install);
287 return array_merge($local, $install);
291 * Utility for getting subdirs of a directory
293 * @param string $dir full path to directory to check
295 * @return array relative filenames of subdirs, or empty array
297 protected static function subdirsOf($dir)
302 if ($dh = opendir($dir)) {
303 while (($filename = readdir($dh)) !== false) {
304 if ($filename != '..' && $filename !== '.' &&
305 is_dir($dir.'/'.$filename)) {
306 $subdirs[] = $filename;
317 * Local root dir for themes
319 * @return string local root dir for themes
321 protected static function localRoot()
323 $basedir = common_config('local', 'dir');
325 if (empty($basedir)) {
326 $basedir = INSTALLDIR . '/local';
329 return $basedir . '/theme';
333 * Root dir for themes that are shipped with StatusNet
335 * @return string root dir for StatusNet themes
337 protected static function installRoot()
339 $instroot = common_config('theme', 'dir');
341 if (empty($instroot)) {
342 $instroot = INSTALLDIR.'/theme';
348 static function validName($name)
350 return preg_match('/^[a-z0-9][a-z0-9_-]*$/i', $name);