4 // install and uninstall plugin
5 if (! function_exists('uninstall_plugin')){
6 function uninstall_plugin($plugin){
7 logger("Addons: uninstalling " . $plugin);
8 q("DELETE FROM `addon` WHERE `name` = '%s' ",
12 @include_once('addon/' . $plugin . '/' . $plugin . '.php');
13 if(function_exists($plugin . '_uninstall')) {
14 $func = $plugin . '_uninstall';
19 if (! function_exists('install_plugin')){
20 function install_plugin($plugin) {
21 // silently fail if plugin was removed
23 if(! file_exists('addon/' . $plugin . '/' . $plugin . '.php'))
25 logger("Addons: installing " . $plugin);
26 $t = @filemtime('addon/' . $plugin . '/' . $plugin . '.php');
27 @include_once('addon/' . $plugin . '/' . $plugin . '.php');
28 if(function_exists($plugin . '_install')) {
29 $func = $plugin . '_install';
32 $plugin_admin = (function_exists($plugin."_plugin_admin")?1:0);
34 $r = q("INSERT INTO `addon` (`name`, `installed`, `timestamp`, `plugin_admin`) VALUES ( '%s', 1, %d , %d ) ",
40 // we can add the following with the previous SQL
41 // once most site tables have been updated.
42 // This way the system won't fall over dead during the update.
44 if(file_exists('addon/' . $plugin . '/.hidden')) {
45 q("update addon set hidden = 1 where name = '%s' limit 1",
52 logger("Addons: FAILED installing " . $plugin);
58 // reload all updated plugins
60 if(! function_exists('reload_plugins')) {
61 function reload_plugins() {
62 $plugins = get_config('system','addon');
63 if(strlen($plugins)) {
65 $r = q("SELECT * FROM `addon` WHERE `installed` = 1");
71 $parr = explode(',',$plugins);
74 foreach($parr as $pl) {
78 $fname = 'addon/' . $pl . '/' . $pl . '.php';
80 if(file_exists($fname)) {
81 $t = @filemtime($fname);
82 foreach($installed as $i) {
83 if(($i['name'] == $pl) && ($i['timestamp'] != $t)) {
84 logger('Reloading plugin: ' . $i['name']);
85 @include_once($fname);
87 if(function_exists($pl . '_uninstall')) {
88 $func = $pl . '_uninstall';
91 if(function_exists($pl . '_install')) {
92 $func = $pl . '_install';
95 q("UPDATE `addon` SET `timestamp` = %d WHERE `id` = %d LIMIT 1",
112 if(! function_exists('register_hook')) {
113 function register_hook($hook,$file,$function,$priority=0) {
115 $r = q("SELECT * FROM `hook` WHERE `hook` = '%s' AND `file` = '%s' AND `function` = '%s' LIMIT 1",
123 $r = q("INSERT INTO `hook` (`hook`, `file`, `function`, `priority`) VALUES ( '%s', '%s', '%s', '%s' ) ",
132 if(! function_exists('unregister_hook')) {
133 function unregister_hook($hook,$file,$function) {
135 $r = q("DELETE FROM `hook` WHERE `hook` = '%s' AND `file` = '%s' AND `function` = '%s' LIMIT 1",
144 if(! function_exists('load_hooks')) {
145 function load_hooks() {
148 $r = q("SELECT * FROM `hook` WHERE 1 ORDER BY `priority` DESC");
151 if(! array_key_exists($rr['hook'],$a->hooks))
152 $a->hooks[$rr['hook']] = array();
153 $a->hooks[$rr['hook']][] = array($rr['file'],$rr['function']);
159 if(! function_exists('call_hooks')) {
160 function call_hooks($name, &$data = null) {
163 if((is_array($a->hooks)) && (array_key_exists($name,$a->hooks))) {
164 foreach($a->hooks[$name] as $hook) {
165 @include_once($hook[0]);
166 if(function_exists($hook[1])) {
171 // remove orphan hooks
172 q("delete from hook where hook = '%s' and file = '$s' and function = '%s' limit 1",
185 * parse plugin comment in search of plugin infos.
189 * * Description: A plugin which plugs in
191 * * Author: John <profile url>
192 * * Author: Jane <email>
196 if (! function_exists('get_plugin_info')){
197 function get_plugin_info($plugin){
208 if (!is_file("addon/$plugin/$plugin.php")) return $info;
210 $stamp1 = microtime(true);
211 $f = file_get_contents("addon/$plugin/$plugin.php");
212 $a->save_timestamp($stamp1, "file");
214 $r = preg_match("|/\*.*\*/|msU", $f, $m);
217 $ll = explode("\n", $m[0]);
218 foreach( $ll as $l ) {
219 $l = trim($l,"\t\n\r */");
221 list($k,$v) = array_map("trim", explode(":",$l,2));
224 $r=preg_match("|([^<]+)<([^>]+)>|", $v, $m);
226 $info['author'][] = array('name'=>$m[1], 'link'=>$m[2]);
228 $info['author'][] = array('name'=>$v);
231 if (array_key_exists($k,$info)){
245 * parse theme comment in search of theme infos.
249 * * Description: My Cool Theme
251 * * Author: John <profile url>
252 * * Maintainer: Jane <profile url>
256 if (! function_exists('get_theme_info')){
257 function get_theme_info($theme){
262 'maintainer' => array(),
265 'experimental' => false,
266 'unsupported' => false
269 if(file_exists("view/theme/$theme/experimental"))
270 $info['experimental'] = true;
271 if(file_exists("view/theme/$theme/unsupported"))
272 $info['unsupported'] = true;
274 if (!is_file("view/theme/$theme/theme.php")) return $info;
277 $stamp1 = microtime(true);
278 $f = file_get_contents("view/theme/$theme/theme.php");
279 $a->save_timestamp($stamp1, "file");
281 $r = preg_match("|/\*.*\*/|msU", $f, $m);
284 $ll = explode("\n", $m[0]);
285 foreach( $ll as $l ) {
286 $l = trim($l,"\t\n\r */");
288 list($k,$v) = array_map("trim", explode(":",$l,2));
292 $r=preg_match("|([^<]+)<([^>]+)>|", $v, $m);
294 $info['author'][] = array('name'=>$m[1], 'link'=>$m[2]);
296 $info['author'][] = array('name'=>$v);
299 elseif ($k=="maintainer"){
300 $r=preg_match("|([^<]+)<([^>]+)>|", $v, $m);
302 $info['maintainer'][] = array('name'=>$m[1], 'link'=>$m[2]);
304 $info['maintainer'][] = array('name'=>$v);
307 if (array_key_exists($k,$info)){
320 function get_theme_screenshot($theme) {
322 $exts = array('.png','.jpg');
323 foreach($exts as $ext) {
324 if(file_exists('view/theme/' . $theme . '/screenshot' . $ext))
325 return($a->get_baseurl() . '/view/theme/' . $theme . '/screenshot' . $ext);
327 return($a->get_baseurl() . '/images/blank.png');
331 // check service_class restrictions. If there are no service_classes defined, everything is allowed.
332 // if $usage is supplied, we check against a maximum count and return true if the current usage is
333 // less than the subscriber plan allows. Otherwise we return boolean true or false if the property
334 // is allowed (or not) in this subscriber plan. An unset property for this service plan means
335 // the property is allowed, so it is only necessary to provide negative properties for each plan,
336 // or what the subscriber is not allowed to do.
339 function service_class_allows($uid,$property,$usage = false) {
341 if($uid == local_user()) {
342 $service_class = $a->user['service_class'];
345 $r = q("select service_class from user where uid = %d limit 1",
348 if($r !== false and count($r)) {
349 $service_class = $r[0]['service_class'];
352 if(! x($service_class))
353 return true; // everything is allowed
355 $arr = get_config('service_class',$service_class);
356 if(! is_array($arr) || (! count($arr)))
360 return ((x($arr[$property])) ? (bool) $arr['property'] : true);
362 if(! array_key_exists($property,$arr))
364 return (((intval($usage)) < intval($arr[$property])) ? true : false);
369 function service_class_fetch($uid,$property) {
371 if($uid == local_user()) {
372 $service_class = $a->user['service_class'];
375 $r = q("select service_class from user where uid = %d limit 1",
378 if($r !== false and count($r)) {
379 $service_class = $r[0]['service_class'];
382 if(! x($service_class))
383 return false; // everything is allowed
385 $arr = get_config('service_class',$service_class);
386 if(! is_array($arr) || (! count($arr)))
389 return((array_key_exists($property,$arr)) ? $arr[$property] : false);
393 function upgrade_link($bbcode = false) {
394 $l = get_config('service_class','upgrade_link');
398 $t = sprintf('[url=%s]' . t('Click here to upgrade.') . '[/url]', $l);
400 $t = sprintf('<a href="%s">' . t('Click here to upgrade.') . '</div>', $l);
404 function upgrade_message($bbcode = false) {
405 $x = upgrade_link($bbcode);
406 return t('This action exceeds the limits set by your subscription plan.') . (($x) ? ' ' . $x : '') ;
409 function upgrade_bool_message($bbcode = false) {
410 $x = upgrade_link($bbcode);
411 return t('This action is not available under your subscription plan.') . (($x) ? ' ' . $x : '') ;