4 * Description: Shows list of subscribed community forums on network sidebar
6 * Author: Mike Macgirvin <mike@macgirvin.com>
7 * based on pages plugin by
8 * Author: Michael Vogel <ike@piratenpartei.de>
12 function forumlist_install() {
13 register_hook('network_mod_init', 'addon/forumlist/forumlist.php', 'forumlist_network_mod_init');
14 register_hook('plugin_settings', 'addon/forumlist/forumlist.php', 'forumlist_plugin_settings');
15 register_hook('plugin_settings_post', 'addon/forumlist/forumlist.php', 'forumlist_plugin_settings_post');
16 register_hook('profile_advanced', 'addon/forumlist/forumlist.php', 'forumlist_profile_advanced');
20 function forumlist_uninstall() {
21 unregister_hook('network_mod_init', 'addon/forumlist/forumlist.php', 'forumlist_network_mod_init');
22 unregister_hook('plugin_settings', 'addon/forumlist/forumlist.php', 'forumlist_plugin_settings');
23 unregister_hook('plugin_settings_post', 'addon/forumlist/forumlist.php', 'forumlist_plugin_settings_post');
24 unregister_hook('profile_advanced', 'addon/forumlist/forumlist.php', 'forumlist_profile_advanced');
29 function forumlist_getpage($uid,$showhidden = true,$randomise = false, $showprivate = false) {
34 $order = (($showhidden) ? '' : " and hidden = 0 ");
35 $order .= (($randomise) ? ' order by rand() ' : ' order by name asc ');
36 $select = "`forum` = 1";
38 $select = "( `forum` = 1 OR `prv` = 1 )";
41 $contacts = q("SELECT `contact`.`id`, `contact`.`url`, `contact`.`name`, `contact`.`micro` from contact
42 WHERE `network`= 'dfrn' AND $select AND `uid` = %d
43 and blocked = 0 and hidden = 0 and pending = 0 and archive = 0
48 // Look if the profile is a community page
49 foreach($contacts as $contact) {
50 $forumlist[] = array("url"=>$contact["url"], "name"=>$contact["name"], "id"=>$contact["id"], "micro"=>$contact['micro']);
55 function forumlist_network_mod_init($a,$b) {
57 if(! intval(get_pconfig(local_user(),'forumlist','show_on_network')))
60 $a->page['htmlhead'] .= '<link rel="stylesheet" type="text/css" href="' . $a->get_baseurl() . '/addon/forumlist/forumlist.css' . '" media="all" />' . "\r\n";
62 $forumlist = '<div id="forumlist-sidebar" class="widget">
63 <div class="title tool">
64 <h3>'.t("Forums").'</h3></div>';
66 $forumlist .= '<div id="hide-forum-list" class="fakelink" onclick="openClose(\'forum-list\');" >'
67 . t('show/hide') . '</div>'
68 . '<div role="menu" id="forum-list" style="display: none;">';
71 $randomise = intval(get_pconfig(local_user(),'forumlist','randomise'));
73 $contacts = forumlist_getpage($a->user['uid'],true,$randomise, true);
75 if(count($contacts)) {
76 foreach($contacts as $contact) {
77 $forumlist .= '<div role="menuitem"><a href="' . $a->get_baseurl() . '/redir/' . $contact["id"] . '" title="'.t('External link to forum').'" class="label sparkle" target="_blank"><img class="forumlist-img" height="20" width="20" src="' . $contact['micro'] .'" alt="'.t('External link to forum').'" /></a> <a href="' . $a->get_baseurl() . '/network?f=&cid=' . $contact['id'] . '" >' . $contact["name"]."</a></div>";
81 $forumlist .= t('No forum subscriptions');
84 $forumlist .= "</div></div>";
85 if (sizeof($contacts) > 0)
86 $a->page['aside'] = $forumlist . $a->page['aside'];
90 function forumlist_profile_advanced($a,&$b) {
91 $a->page['htmlhead'] .= '<link rel="stylesheet" type="text/css" href="' . $a->get_baseurl() . '/addon/forumlist/forumlist.css' . '" media="all" />' . "\r\n";
93 $profile = intval(get_pconfig($a->profile['profile_uid'],'forumlist','show_on_profile'));
97 $forumlist = '<div id="forumlist-profile">
98 <div class="title">'.t("Forums:").'</div>
99 <div id="profile-forumlist-list">';
101 // place holder in case somebody wants configurability
106 $contacts = forumlist_getpage($a->user['uid'],false,$randomise,false);
111 foreach($contacts as $contact) {
112 $forumlist .= micropro($contact,false,'forumlist-profile-advanced');
114 if($total_shown == $show_total)
117 $forumlist .= '</div></div><div class="clear"></div>';
119 if(count($contacts) > 0)
126 function forumlist_plugin_settings_post($a,$post) {
127 if(! local_user() || (! x($_POST,'forumlist-settings-submit')))
129 // set_pconfig(local_user(),'forumlist','max_forumlists',intval($_POST['forumlist_max_forumlists']));
130 set_pconfig(local_user(),'forumlist','randomise',intval($_POST['forumlist_random']));
131 set_pconfig(local_user(),'forumlist','show_on_profile',intval($_POST['forumlist_profile']));
132 set_pconfig(local_user(),'forumlist','show_on_network',intval($_POST['forumlist_network']));
134 info( t('Forumlist settings updated.') . EOL);
138 function forumlist_plugin_settings(&$a,&$s) {
143 /* Add our stylesheet to the forumlist so we can make our settings look nice */
145 $a->page['htmlhead'] .= '<link rel="stylesheet" type="text/css" href="' . $a->get_baseurl() . '/addon/forumlist/forumlist.css' . '" media="all" />' . "\r\n";
147 /* Get the current state of our config variable */
149 $randomise = intval(get_pconfig(local_user(),'forumlist','randomise'));
150 $randomise_checked = (($randomise) ? ' checked="checked" ' : '');
152 $profile = intval(get_pconfig(local_user(),'forumlist','show_on_profile'));
153 $profile_checked = (($profile) ? ' checked="checked" ' : '');
155 $network = intval(get_pconfig(local_user(),'forumlist','show_on_network'));
156 $network_checked = (($network) ? ' checked="checked" ' : '');
159 /* Add some HTML to the existing form */
160 $s .= '<span id="settings_forumlist_inflated" class="settings-block fakelink" style="display: block;" onclick="openClose(\'settings_forumlist_expanded\'); openClose(\'settings_forumlist_inflated\');">';
161 $s .= '<h3>' . t('Forumlist') . '</h3>';
163 $s .= '<div id="settings_forumlist_expanded" class="settings-block" style="display: none;">';
164 $s .= '<span class="fakelink" onclick="openClose(\'settings_forumlist_expanded\'); openClose(\'settings_forumlist_inflated\');">';
165 $s .= '<h3>' . t('Forumlist') . '</h3>';
168 $s .= '<div id="forumlist-settings-wrapper">';
169 $s .= '<label id="forumlist-random-label" for="forumlist-random">' . t('Randomise forum list') . '</label>';
170 $s .= '<input id="forumlist-random" type="checkbox" name="forumlist_random" value="1" ' . $randomise_checked . '/>';
171 $s .= '<div class="clear"></div>';
172 $s .= '<label id="forumlist-profile-label" for="forumlist-profile">' . t('Show forums on profile page') . '</label>';
173 $s .= '<input id="forumlist-profile" type="checkbox" name="forumlist_profile" value="1" ' . $profile_checked . '/>';
174 $s .= '<div class="clear"></div>';
175 $s .= '<label id="forumlist-network-label" for="forumlist-network">' . t('Show forums on network page') . '</label>';
176 $s .= '<input id="forumlist-network" type="checkbox" name="forumlist_network" value="1" ' . $network_checked . '/>';
177 $s .= '<div class="clear"></div>';
181 /* provide a submit button */
183 $s .= '<div class="settings-submit-wrapper" ><input type="submit" name="forumlist-settings-submit" class="settings-submit" value="' . t('Save Settings') . '" /></div></div>';