Finally, a fix for delete_move_next with thread sort. I _think_ this should do the...
[squirrelmail.git] / functions / plugin.php
... / ...
CommitLineData
1<?php
2
3/**
4 * plugin.php
5 *
6 * Copyright (c) 1999-2003 The SquirrelMail Project Team
7 * Licensed under the GNU GPL. For full terms see the file COPYING.
8 *
9 * This file provides the framework for a plugin architecture.
10 *
11 * Documentation on how to write plugins might show up some time.
12 *
13 * $Id$
14 */
15
16require_once(SM_PATH . 'functions/global.php');
17
18global $squirrelmail_plugin_hooks;
19$squirrelmail_plugin_hooks = array();
20
21/* This function adds a plugin. */
22function use_plugin ($name) {
23 if (file_exists(SM_PATH . "plugins/$name/setup.php")) {
24 include_once(SM_PATH . "plugins/$name/setup.php");
25 $function = "squirrelmail_plugin_init_$name";
26 if (function_exists($function)) {
27 $function();
28 }
29 }
30}
31
32/* This function executes a hook. */
33function do_hook ($name) {
34 global $squirrelmail_plugin_hooks;
35 $data = func_get_args();
36 $ret = '';
37
38 if (isset($squirrelmail_plugin_hooks[$name])
39 && is_array($squirrelmail_plugin_hooks[$name])) {
40 foreach ($squirrelmail_plugin_hooks[$name] as $function) {
41 /* Add something to set correct gettext domain for plugin. */
42 if (function_exists($function)) {
43 $function($data);
44 }
45 }
46 }
47
48 /* Variable-length argument lists have a slight problem when */
49 /* passing values by reference. Pity. This is a workaround. */
50 return $data;
51}
52
53/* This function executes a hook. */
54function do_hook_function($name,$parm=NULL) {
55 global $squirrelmail_plugin_hooks;
56 $ret = '';
57
58 if (isset($squirrelmail_plugin_hooks[$name])
59 && is_array($squirrelmail_plugin_hooks[$name])) {
60 foreach ($squirrelmail_plugin_hooks[$name] as $function) {
61 /* Add something to set correct gettext domain for plugin. */
62 if (function_exists($function)) {
63 $ret = $function($parm);
64 }
65 }
66 }
67
68 /* Variable-length argument lists have a slight problem when */
69 /* passing values by reference. Pity. This is a workaround. */
70 return $ret;
71}
72
73/* This function executes a hook. */
74function concat_hook_function($name,$parm=NULL) {
75 global $squirrelmail_plugin_hooks;
76 $ret = '';
77
78 if (isset($squirrelmail_plugin_hooks[$name])
79 && is_array($squirrelmail_plugin_hooks[$name])) {
80 foreach ($squirrelmail_plugin_hooks[$name] as $function) {
81 /* Concatenate results from hook. */
82 if (function_exists($function)) {
83 $ret .= $function($parm);
84 }
85 }
86 }
87
88 /* Variable-length argument lists have a slight problem when */
89 /* passing values by reference. Pity. This is a workaround. */
90 return $ret;
91}
92
93/**
94 * This function checks whether the user's USER_AGENT is known to
95 * be broken. If so, returns true and the plugin is invisible to the
96 * offending browser.
97 */
98function soupNazi(){
99
100 $soup_menu = array('Mozilla/3','Mozilla/2','Mozilla/1', 'Opera 4',
101 'Opera/4', 'OmniWeb', 'Lynx');
102 sqgetGlobalVar('HTTP_USER_AGENT', $user_agent, SQ_SERVER);
103 foreach($soup_menu as $browser) {
104 if(stristr($user_agent, $browser)) {
105 return 1;
106 }
107 }
108 return 0;
109}
110/*************************************/
111/*** MAIN PLUGIN LOADING CODE HERE ***/
112/*************************************/
113
114/* On startup, register all plugins configured for use. */
115if (isset($plugins) && is_array($plugins)) {
116 foreach ($plugins as $name) {
117 use_plugin($name);
118 }
119}
120
121?>