3 * Name: Forum Directory
4 * Description: Add a directory of forums hosted on your server, with verbose descriptions.
6 * Author: Thomas Willingham <https://beardyunixer.com/profile/beardyunixer>
9 function forumdirectory_install() {
10 register_hook('app_menu', 'addon/forumdirectory/forumdirectory.php', 'forumdirectory_app_menu');
13 function forumdirectory_uninstall() {
14 unregister_hook('app_menu', 'addon/forumdirectory/forumdirectory.php', 'forumdirectory_app_menu');
17 function forumdirectory_module() {
21 function forumdirectory_app_menu($a,&$b) {
22 $b['app_menu'][] = '<div class="app-title"><a href="forumdirectory">' . t('Forum Directory') . '</a></div>';
25 function forumdirectory_init(&$a) {
26 $a->page['htmlhead'] .= '<link rel="stylesheet" type="text/css" href="'.$a->get_baseurl().'/addon/forumdirectory/forumdirectory.css" media="all" />';
28 $a->set_pager_itemspage(60);
31 require_once('include/contact_widgets.php');
33 $a->page['aside'] .= findpeople_widget();
37 unset($_SESSION['theme']);
43 function forumdirectory_post(&$a) {
44 if(x($_POST,'search'))
45 $a->data['search'] = $_POST['search'];
50 function forumdirectory_content(&$a) {
52 if((get_config('system','block_public')) && (! local_user()) && (! remote_user())) {
53 notice( t('Public access denied.') . EOL);
58 nav_set_selected('directory');
60 if(x($a->data,'search'))
61 $search = notags(trim($a->data['search']));
63 $search = ((x($_GET,'search')) ? notags(trim(rawurldecode($_GET['search']))) : '');
65 $tpl = get_markup_template('directory_header.tpl');
68 $gdirpath = get_config('system','directory');
69 if(strlen($gdirpath)) {
70 $globaldir = '<ul><li><div id="global-directory-link"><a href="'
71 . zrl($gdirpath,true) . '">' . t('Global Directory') . '</a></div></li></ul>';
76 $o .= replace_macros($tpl, array(
78 '$globaldir' => $globaldir,
79 '$desc' => t('Find on this site'),
81 '$finding' => (strlen($search) ? '<h4>' . t('Finding: ') . "'" . $search . "'" . '</h4>' : ""),
82 '$sitedir' => t('Site Directory'),
83 '$submit' => t('Find')
87 $search = dbesc($search);
88 $sql_extra = ((strlen($search)) ? " AND MATCH (`profile`.`name`, `user`.`nickname`, `pdesc`, `locality`,`region`,`country-name`,`gender`,`marital`,`sexual`,`about`,`romance`,`work`,`education`,`pub_keywords`,`prv_keywords` ) AGAINST ('$search' IN BOOLEAN MODE) " : "");
90 $publish = ((get_config('system','publish_all')) ? '' : " AND `publish` = 1 " );
93 $r = q("SELECT COUNT(*) AS `total` FROM `profile` LEFT JOIN `user` ON `user`.`uid` = `profile`.`uid` WHERE `is-default` = 1 $publish AND `user`.`blocked` = 0 AND `page-flags` = 2 $sql_extra ");
95 $a->set_pager_total($r[0]['total']);
97 $order = " ORDER BY `name` ASC ";
100 $r = q("SELECT `profile`.*, `profile`.`uid` AS `profile_uid`, `user`.`nickname`, `user`.`timezone` , `user`.`page-flags` FROM `profile` LEFT JOIN `user` ON `user`.`uid` = `profile`.`uid` WHERE `is-default` = 1 $publish AND `user`.`blocked` = 0 AND `page-flags` = 2 $sql_extra $order LIMIT %d , %d ",
101 intval($a->pager['start']),
102 intval($a->pager['itemspage'])
106 if(in_array('small', $a->argv))
114 $profile_link = $a->get_baseurl() . '/profile/' . ((strlen($rr['nickname'])) ? $rr['nickname'] : $rr['profile_uid']);
116 $pdesc = (($rr['pdesc']) ? $rr['pdesc'] . '<br />' : '');
119 if(strlen($rr['locality']))
120 $details .= $rr['locality'];
121 if(strlen($rr['region'])) {
122 if(strlen($rr['locality']))
124 $details .= $rr['region'];
126 if(strlen($rr['country-name'])) {
129 $details .= $rr['country-name'];
131 if(strlen($rr['dob'])) {
132 if(($years = age($rr['dob'],$rr['timezone'],'')) != 0)
133 $details .= '<br />' . t('Age: ') . $years ;
135 if(strlen($rr['gender']))
136 $details .= '<br />' . t('Gender: ') . $rr['gender'];
138 if($rr['page-flags'] == PAGE_NORMAL)
139 $page_type = "Personal Profile";
140 if($rr['page-flags'] == PAGE_SOAPBOX)
141 $page_type = "Fan Page";
142 if($rr['page-flags'] == PAGE_COMMUNITY)
143 $page_type = "Community Forum";
144 if($rr['page-flags'] == PAGE_FREELOVE)
145 $page_type = "Open Forum";
146 if($rr['page-flags'] == PAGE_PRVGROUP)
147 $page_type = "Private Group";
151 if((x($profile,'address') == 1)
152 || (x($profile,'locality') == 1)
153 || (x($profile,'region') == 1)
154 || (x($profile,'postal-code') == 1)
155 || (x($profile,'country-name') == 1))
156 $location = t('Location:');
158 $gender = ((x($profile,'gender') == 1) ? t('Gender:') : False);
160 $marital = ((x($profile,'marital') == 1) ? t('Status:') : False);
162 $homepage = ((x($profile,'homepage') == 1) ? t('Homepage:') : False);
164 $about = ((x($profile,'about') == 1) ? t('About:') : False);
166 # $tpl = file_get_contents( dirname(__file__).'/forumdirectory_item.tpl');
167 $tpl = get_markup_template( 'forumdirectory_item.tpl', 'addon/forumdirectory/' );
169 $entry = replace_macros($tpl,array(
171 '$profile_link' => $profile_link,
172 '$photo' => $a->get_cached_avatar_image($rr[$photo]),
173 '$alt_text' => $rr['name'],
174 '$name' => $rr['name'],
175 '$details' => $pdesc . $details,
176 '$page_type' => $page_type,
177 '$profile' => $profile,
178 '$location' => template_escape($location),
179 '$gender' => $gender,
181 '$marital' => $marital,
182 '$homepage' => $homepage,
187 $arr = array('contact' => $rr, 'entry' => $entry);
196 $o .= "<div class=\"directory-end\" ></div>\r\n";
201 info( t("No entries \x28some entries may be hidden\x29.") . EOL);