forumdirectory/forumdirectory.php

   1 <?php
   2 /**
   3 * Name: Forum Directory
   4 * Description: Add a directory of forums hosted on your server, with verbose descriptions.
   5 * Version: 1.0
   6 * Author: Thomas Willingham <https://beardyunixer.com/profile/beardyunixer>
   7 */
   8
   9 use Friendica\Core\Config;
  10
  11 function forumdirectory_install() {
  12 register_hook('app_menu', 'addon/forumdirectory/forumdirectory.php', 'forumdirectory_app_menu');
  13 }
  14
  15 function forumdirectory_uninstall() {
  16 unregister_hook('app_menu', 'addon/forumdirectory/forumdirectory.php', 'forumdirectory_app_menu');
  17 }
  18
  19 function forumdirectory_module() {
  20 return;
  21 }
  22
  23 function forumdirectory_app_menu($a,&$b) {
  24 $b['app_menu'][] = '<div class="app-title"><a href="forumdirectory">' . t('Forum Directory') . '</a></div>';
  25 }
  26
  27 function forumdirectory_init(&$a) {
  28         $a->page['htmlhead'] .= '<link rel="stylesheet" type="text/css" href="'.$a->get_baseurl().'/addon/forumdirectory/forumdirectory.css" media="all" />';
  29
  30         $a->set_pager_itemspage(60);
  31
  32         if(local_user()) {
  33                 require_once('include/contact_widgets.php');
  34
  35                 $a->page['aside'] .= findpeople_widget();
  36
  37         }
  38         else
  39                 unset($_SESSION['theme']);
  40
  41
  42 }
  43
  44
  45 function forumdirectory_post(&$a) {
  46         if(x($_POST,'search'))
  47                 $a->data['search'] = $_POST['search'];
  48 }
  49
  50
  51
  52 function forumdirectory_content(&$a) {
  53
  54         if((Config::get('system','block_public')) && (! local_user()) && (! remote_user())) {
  55                 notice( t('Public access denied.') . EOL);
  56                 return;
  57         }
  58
  59         $o = '';
  60         nav_set_selected('directory');
  61
  62         if(x($a->data,'search'))
  63                 $search = notags(trim($a->data['search']));
  64         else
  65                 $search = ((x($_GET,'search')) ? notags(trim(rawurldecode($_GET['search']))) : '');
  66
  67         $tpl = get_markup_template('directory_header.tpl');
  68
  69         $globaldir = '';
  70         $gdirpath = Config::get('system','directory');
  71         if(strlen($gdirpath)) {
  72                 $globaldir = '<ul><li><div id="global-directory-link"><a href="'
  73                 . zrl($gdirpath,true) . '">' . t('Global Directory') . '</a></div></li></ul>';
  74         }
  75
  76         $admin = '';
  77
  78         $o .= replace_macros($tpl, [
  79                 '$search' => $search,
  80                 '$globaldir' => $globaldir,
  81                 '$desc' => t('Find on this site'),
  82                 '$admin' => $admin,
  83                 '$finding' => (strlen($search) ? '<h4>' . t('Finding: ') . "'" . $search . "'" . '</h4>' : ""),
  84                 '$sitedir' => t('Site Directory'),
  85                 '$submit' => t('Find')
  86         ]);
  87
  88         if($search)
  89                 $search = dbesc($search);
  90         $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) " : "");
  91
  92         $publish = ((Config::get('system','publish_all')) ? '' : " AND `publish` = 1 " );
  93
  94
  95         $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 ");
  96         if(count($r))
  97                 $a->set_pager_total($r[0]['total']);
  98
  99         $order = " ORDER BY `name` ASC ";
 100
 101
 102         $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 ",
 103                 intval($a->pager['start']),
 104                 intval($a->pager['itemspage'])
 105         );
 106         if(count($r)) {
 107
 108                 if(in_array('small', $a->argv))
 109                         $photo = 'thumb';
 110                 else
 111                         $photo = 'photo';
 112
 113                 foreach($r as $rr) {
 114
 115
 116                         $profile_link = $a->get_baseurl() . '/profile/' . ((strlen($rr['nickname'])) ? $rr['nickname'] : $rr['profile_uid']);
 117
 118                         $pdesc = (($rr['pdesc']) ? $rr['pdesc'] . '<br />' : '');
 119
 120                         $details = '';
 121                         if(strlen($rr['locality']))
 122                                 $details .= $rr['locality'];
 123                         if(strlen($rr['region'])) {
 124                                 if(strlen($rr['locality']))
 125                                         $details .= ', ';
 126                                 $details .= $rr['region'];
 127                         }
 128                         if(strlen($rr['country-name'])) {
 129                                 if(strlen($details))
 130                                         $details .= ', ';
 131                                 $details .= $rr['country-name'];
 132                         }
 133                         if(strlen($rr['dob'])) {
 134                                 if(($years = age($rr['dob'],$rr['timezone'],'')) != 0)
 135                                         $details .= '<br />' . t('Age: ') . $years ;
 136                         }
 137                         if(strlen($rr['gender']))
 138                                 $details .= '<br />' . t('Gender: ') . $rr['gender'];
 139
 140                         if($rr['page-flags'] == PAGE_NORMAL)
 141                                 $page_type = "Personal Profile";
 142                         if($rr['page-flags'] == PAGE_SOAPBOX)
 143                                 $page_type = "Fan Page";
 144                         if($rr['page-flags'] == PAGE_COMMUNITY)
 145                                 $page_type = "Community Forum";
 146                         if($rr['page-flags'] == PAGE_FREELOVE)
 147                                 $page_type = "Open Forum";
 148                         if($rr['page-flags'] == PAGE_PRVGROUP)
 149                                 $page_type = "Private Group";
 150
 151                         $profile = $rr;
 152
 153                         if((x($profile,'address') == 1)
 154                                 || (x($profile,'locality') == 1)
 155                                 || (x($profile,'region') == 1)
 156                                 || (x($profile,'postal-code') == 1)
 157                                 || (x($profile,'country-name') == 1))
 158                         $location = t('Location:');
 159
 160                         $gender = ((x($profile,'gender') == 1) ? t('Gender:') : False);
 161
 162                         $marital = ((x($profile,'marital') == 1) ?  t('Status:') : False);
 163
 164                         $homepage = ((x($profile,'homepage') == 1) ?  t('Homepage:') : False);
 165
 166                         $about = ((x($profile,'about') == 1) ?  t('About:') : False);
 167
 168 #                       $tpl = file_get_contents( dirname(__file__).'/forumdirectory_item.tpl');
 169                         $tpl = get_markup_template( 'forumdirectory_item.tpl', 'addon/forumdirectory/' );
 170
 171                         $entry = replace_macros($tpl,[
 172                                 '$id' => $rr['id'],
 173                                 '$profile_link' => $profile_link,
 174                                 '$photo' => $a->get_cached_avatar_image($rr[$photo]),
 175                                 '$alt_text' => $rr['name'],
 176                                 '$name' => $rr['name'],
 177                                 '$details' => $pdesc . $details,
 178                                 '$page_type' => $page_type,
 179                                 '$profile' => $profile,
 180                                 '$location' => $location,
 181                                 '$gender'   => $gender,
 182                                 '$pdesc'        => $pdesc,
 183                                 '$marital'  => $marital,
 184                                 '$homepage' => $homepage,
 185                                 '$about' => $about,
 186
 187                         ]);
 188
 189                         $arr = ['contact' => $rr, 'entry' => $entry];
 190
 191                         unset($profile);
 192                         unset($location);
 193
 194                         $o .= $entry;
 195
 196                 }
 197
 198                 $o .= "<div class=\"directory-end\" ></div>\r\n";
 199                 $o .= paginate($a);
 200
 201         }
 202         else
 203                 info( t("No entries \x28some entries may be hidden\x29.") . EOL);
 204
 205         return $o;
 206 }