Files
gallery3/modules/gallery/helpers/module.php
Tim Almdal d59c6ed4f1 The admin module controller allows modules to provide a check_environment method
which is called prior to installation.  The method allows the module to provide
an error message or warnings if the module can not be installed or activated
without issues.  The admin module controller also will fire a pre_deactivate
event, which allows modules to indicate issues that may arise be deactivating the
specified module.

These messages are displayed in a dialog box prior to installation in order to
allow the gallery administrator to determine the appropriate action before proceeding.

Lays the foundation for implementing a fix for ticket #937
2010-01-21 12:57:45 -08:00

533 lines
17 KiB
PHP

<?php defined("SYSPATH") or die("No direct script access.");
/**
* Gallery - a web based photo album viewer and editor
* Copyright (C) 2000-2009 Bharat Mediratta
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or (at
* your option) any later version.
*
* 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
* General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA.
*/
/**
* This is the API for handling modules.
*
* Note: by design, this class does not do any permission checking.
*/
class module_Core {
public static $active = array();
public static $modules = array();
public static $var_cache = null;
public static $available = array();
/**
* Set the version of the corresponding Module_Model
* @param string $module_name
* @param integer $version
*/
static function set_version($module_name, $version) {
$module = self::get($module_name);
if (!$module->loaded()) {
$module->name = $module_name;
$module->active = $module_name == "gallery"; // only gallery is active by default
}
$module->version = $version;
$module->save();
Kohana_Log::add("debug", "$module_name: version is now $version");
}
/**
* Load the corresponding Module_Model
* @param string $module_name
*/
static function get($module_name) {
if (empty(self::$modules[$module_name])) {
return ORM::factory("module")->where("name", "=", $module_name)->find();
}
return self::$modules[$module_name];
}
/**
* Get the information about a module
* @returns ArrayObject containing the module information from the module.info file or false if
* not found
*/
static function info($module_name) {
$module_list = self::available();
return isset($module_list->$module_name) ? $module_list->$module_name : false;
}
/**
* Check to see if a module is installed
* @param string $module_name
*/
static function is_installed($module_name) {
return array_key_exists($module_name, self::$modules);
}
/**
* Check to see if a module is active
* @param string $module_name
*/
static function is_active($module_name) {
return array_key_exists($module_name, self::$modules) &&
self::$modules[$module_name]->active;
}
/**
* Return the list of available modules, including uninstalled modules.
*/
static function available() {
if (empty(self::$available)) {
$modules = new ArrayObject(array(), ArrayObject::ARRAY_AS_PROPS);
foreach (glob(MODPATH . "*/module.info") as $file) {
$module_name = basename(dirname($file));
$modules->$module_name =
new ArrayObject(parse_ini_file($file), ArrayObject::ARRAY_AS_PROPS);
$m =& $modules->$module_name;
$m->installed = self::is_installed($module_name);
$m->active = self::is_active($module_name);
$m->code_version = $m->version;
$m->version = self::get_version($module_name);
$m->locked = !empty($m->no_module_admin);
}
// Lock certain modules
$modules->gallery->locked = true;
$identity_module = self::get_var("gallery", "identity_provider", "user");
$modules->$identity_module->locked = true;
$modules->ksort();
self::$available = $modules;
}
return self::$available;
}
/**
* Return a list of all the active modules in no particular order.
*/
static function active() {
return self::$active;
}
/**
* Check that the module can be installed. (i.e. all the prerequistes exist)
* @param string $module_name
*/
static function check_environment($module_name) {
module::_add_to_path($module_name);
$messages = array();
$installer_class = "{$module_name}_installer";
if (method_exists($installer_class, "check_environment")) {
$messages = call_user_func(array($installer_class, "check_environment"));
}
// Now the module is installed but inactive, so don't leave it in the active path
module::_remove_from_path($module_name);
return $messages;
}
/**
* Check that the module can be installed. (i.e. all the prerequistes exist)
* @param string $module_name
*/
static function can_deactivate($module_name) {
$data = (object)array("module" => $module_name, "messages" => array());
module::event("pre_deactivate", $data);
return $data->messages;
}
/**
* Install a module. This will call <module>_installer::install(), which is responsible for
* creating database tables, setting module variables and calling module::set_version().
* Note that after installing, the module must be activated before it is available for use.
* @param string $module_name
*/
static function install($module_name) {
module::_add_to_path($module_name);
$installer_class = "{$module_name}_installer";
if (method_exists($installer_class, "install")) {
call_user_func_array(array($installer_class, "install"), array());
} else {
module::set_version($module_name, 1);
}
module::load_modules();
// Now the module is installed but inactive, so don't leave it in the active path
module::_remove_from_path($module_name);
log::success(
"module", t("Installed module %module_name", array("module_name" => $module_name)));
}
private static function _add_to_path($module_name) {
$config = Kohana_Config::instance();
$kohana_modules = $config->get("core.modules");
array_unshift($kohana_modules, MODPATH . $module_name);
$config->set("core.modules", $kohana_modules);
// Rebuild the include path so the module installer can benefit from auto loading
Kohana::include_paths(true);
}
private static function _remove_from_path($module_name) {
$config = Kohana_Config::instance();
$kohana_modules = $config->get("core.modules");
if (($key = array_search(MODPATH . $module_name, $kohana_modules)) !== false) {
unset($kohana_modules[$key]);
$kohana_modules = array_values($kohana_modules); // reindex
}
$config->set("core.modules", $kohana_modules);
Kohana::include_paths(true);
}
/**
* Upgrade a module. This will call <module>_installer::upgrade(), which is responsible for
* modifying database tables, changing module variables and calling module::set_version().
* Note that after upgrading, the module must be activated before it is available for use.
* @param string $module_name
*/
static function upgrade($module_name) {
$version_before = module::get_version($module_name);
$installer_class = "{$module_name}_installer";
if (method_exists($installer_class, "upgrade")) {
call_user_func_array(array($installer_class, "upgrade"), array($version_before));
} else {
$available = module::available();
if (isset($available->$module_name->code_version)) {
module::set_version($module_name, $available->$module_name->code_version);
} else {
throw new Exception("@todo UNKNOWN_MODULE");
}
}
// Now the module is upgraded so deactivate it, but we can'it deactivae gallery or the
// current identity provider.
$identity_provider = module::get_var("gallery", "identity_provider", "user");
if (!in_array($module_name, array("gallery", $identity_provider)) ) {
self::deactivate($module_name);
}
module::load_modules();
$version_after = module::get_version($module_name);
if ($version_before != $version_after) {
log::success(
"module", t("Upgraded module %module_name from %version_before to %version_after",
array("module_name" => $module_name,
"version_before" => $version_before,
"version_after" => $version_after)));
}
}
/**
* Activate an installed module. This will call <module>_installer::activate() which should take
* any steps to make sure that the module is ready for use. This will also activate any
* existing graphics rules for this module.
* @param string $module_name
*/
static function activate($module_name) {
module::_add_to_path($module_name);
$installer_class = "{$module_name}_installer";
if (method_exists($installer_class, "activate")) {
call_user_func_array(array($installer_class, "activate"), array());
}
$module = self::get($module_name);
if ($module->loaded()) {
$module->active = true;
$module->save();
}
module::load_modules();
graphics::activate_rules($module_name);
block_manager::activate_blocks($module_name);
log::success(
"module", t("Activated module %module_name", array("module_name" => $module_name)));
}
/**
* Deactivate an installed module. This will call <module>_installer::deactivate() which should
* take any cleanup steps to make sure that the module isn't visible in any way. Note that the
* module remains available in Kohana's cascading file system until the end of the request!
* @param string $module_name
*/
static function deactivate($module_name) {
$installer_class = "{$module_name}_installer";
if (method_exists($installer_class, "deactivate")) {
call_user_func_array(array($installer_class, "deactivate"), array());
}
$module = self::get($module_name);
if ($module->loaded()) {
$module->active = false;
$module->save();
}
module::load_modules();
graphics::deactivate_rules($module_name);
block_manager::deactivate_blocks($module_name);
log::success(
"module", t("Deactivated module %module_name", array("module_name" => $module_name)));
}
/**
* Uninstall a deactivated module. This will call <module>_installer::uninstall() which should
* take whatever steps necessary to make sure that all traces of a module are gone.
* @param string $module_name
*/
static function uninstall($module_name) {
$installer_class = "{$module_name}_installer";
if (method_exists($installer_class, "uninstall")) {
call_user_func(array($installer_class, "uninstall"));
}
graphics::remove_rules($module_name);
$module = self::get($module_name);
if ($module->loaded()) {
$module->delete();
}
module::load_modules();
// We could delete the module vars here too, but it's nice to leave them around
// in case the module gets reinstalled.
log::success(
"module", t("Uninstalled module %module_name", array("module_name" => $module_name)));
}
/**
* Load the active modules. This is called at bootstrap time.
*/
static function load_modules() {
self::$modules = array();
self::$active = array();
$kohana_modules = array();
foreach (ORM::factory("module")->find_all() as $module) {
self::$modules[$module->name] = $module;
if (!$module->active) {
continue;
}
if ($module->name == "gallery") {
$gallery = $module;
} else {
self::$active[] = $module;
$kohana_modules[] = MODPATH . $module->name;
}
}
self::$active[] = $gallery; // put gallery last in the module list to match core.modules
$config = Kohana_Config::instance();
$config->set(
"core.modules", array_merge($kohana_modules, $config->get("core.modules")));
}
/**
* Run a specific event on all active modules.
* @param string $name the event name
* @param mixed $data data to pass to each event handler
*/
static function event($name, &$data=null) {
$args = func_get_args();
array_shift($args);
$function = str_replace(".", "_", $name);
if (method_exists("gallery_event", $function)) {
switch (count($args)) {
case 0:
gallery_event::$function();
break;
case 1:
gallery_event::$function($args[0]);
break;
case 2:
gallery_event::$function($args[0], $args[1]);
break;
case 3:
gallery_event::$function($args[0], $args[1], $args[2]);
break;
case 4: // Context menu events have 4 arguments so lets optimize them
gallery_event::$function($args[0], $args[1], $args[2], $args[3]);
break;
default:
call_user_func_array(array("gallery_event", $function), $args);
}
}
foreach (self::$active as $module) {
if ($module->name == "gallery") {
continue;
}
$class = "{$module->name}_event";
if (method_exists($class, $function)) {
call_user_func_array(array($class, $function), $args);
}
}
// Give the admin theme a chance to respond, if we're in admin mode.
if (theme::$is_admin) {
$class = theme::$admin_theme_name . "_event";
if (method_exists($class, $function)) {
call_user_func_array(array($class, $function), $args);
}
}
// Give the site theme a chance to respond as well. It gets a chance even in admin mode, as
// long as the theme has an admin subdir.
$class = theme::$site_theme_name . "_event";
if (method_exists($class, $function)) {
call_user_func_array(array($class, $function), $args);
}
}
/**
* Get a variable from this module
* @param string $module_name
* @param string $name
* @param string $default_value
* @return the value
*/
static function get_var($module_name, $name, $default_value=null) {
// We cache all vars in gallery._cache so that we can load all vars at once for
// performance.
if (empty(self::$var_cache)) {
$row = db::build()
->select("value")
->from("vars")
->where("module_name", "=", "gallery")
->where("name", "=", "_cache")
->execute()
->current();
if ($row) {
self::$var_cache = unserialize($row->value);
} else {
// gallery._cache doesn't exist. Create it now.
foreach (db::build()
->select("module_name", "name", "value")
->from("vars")
->order_by("module_name")
->order_by("name")
->execute() as $row) {
if ($row->module_name == "gallery" && $row->name == "_cache") {
// This could happen if there's a race condition
continue;
}
self::$var_cache->{$row->module_name}->{$row->name} = $row->value;
}
$cache = ORM::factory("var");
$cache->module_name = "gallery";
$cache->name = "_cache";
$cache->value = serialize(self::$var_cache);
$cache->save();
}
}
if (isset(self::$var_cache->$module_name->$name)) {
return self::$var_cache->$module_name->$name;
} else {
return $default_value;
}
}
/**
* Store a variable for this module
* @param string $module_name
* @param string $name
* @param string $value
*/
static function set_var($module_name, $name, $value) {
$var = ORM::factory("var")
->where("module_name", "=", $module_name)
->where("name", "=", $name)
->find();
if (!$var->loaded()) {
$var->module_name = $module_name;
$var->name = $name;
}
$var->value = $value;
$var->save();
db::build()
->delete("vars")
->where("module_name", "=", "gallery")
->where("name", "=", "_cache")
->execute();
self::$var_cache = null;
}
/**
* Increment the value of a variable for this module
*
* Note: Frequently updating counters is very inefficient because it invalidates the cache value
* which has to be rebuilt every time we make a change.
*
* @todo Get rid of this and find an alternate approach for all callers (currently only Akismet)
*
* @deprecated
* @param string $module_name
* @param string $name
* @param string $increment (optional, default is 1)
*/
static function incr_var($module_name, $name, $increment=1) {
db::build()
->update("vars")
->set("value", new Database_Expression("`value` + $increment"))
->where("module_name", "=", $module_name)
->where("name", "=", $name)
->execute();
db::build()
->delete("vars")
->where("module_name", "=", "gallery")
->where("name", "=", "_cache")
->execute();
self::$var_cache = null;
}
/**
* Remove a variable for this module.
* @param string $module_name
* @param string $name
*/
static function clear_var($module_name, $name) {
$var = ORM::factory("var")
->where("module_name", "=", $module_name)
->where("name", "=", $name)
->find();
if ($var->loaded()) {
$var->delete();
}
db::build()
->delete("vars")
->where("module_name", "=", "gallery")
->where("name", "=", "_cache")
->execute();
self::$var_cache = null;
}
/**
* Return the version of the installed module.
* @param string $module_name
*/
static function get_version($module_name) {
return self::get($module_name)->version;
}
}