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.1
   6  * Author: Thomas Willingham <https://beardyunixer.com/profile/beardyunixer>
   7  */
   8
   9 use Friendica\App;
  10 use Friendica\Content\Nav;
  11 use Friendica\Content\Pager;
  12 use Friendica\Content\Widget;
  13 use Friendica\Core\Hook;
  14 use Friendica\Core\Renderer;
  15 use Friendica\Database\DBA;
  16 use Friendica\DI;
  17 use Friendica\Model\Profile;
  18 use Friendica\Model\User;
  19 use Friendica\Util\Strings;
  20
  21 function forumdirectory_install()
  22 {
  23         Hook::register('app_menu', 'addon/forumdirectory/forumdirectory.php', 'forumdirectory_app_menu');
  24 }
  25
  26 function forumdirectory_module()
  27 {
  28         return;
  29 }
  30
  31 function forumdirectory_app_menu(App $a, array &$b)
  32 {
  33         $b['app_menu'][] = '<div class="app-title"><a href="forumdirectory">' . DI::l10n()->t('Forum Directory') . '</a></div>';
  34 }
  35
  36 function forumdirectory_init(App $a)
  37 {
  38         if (local_user()) {
  39                 DI::page()['aside'] .= Widget::findPeople();
  40         }
  41 }
  42
  43 function forumdirectory_post(App $a)
  44 {
  45         if (!empty($_POST['search'])) {
  46                 $a->data['search'] = $_POST['search'];
  47         }
  48 }
  49
  50 function forumdirectory_content(App $a)
  51 {
  52         if ((DI::config()->get('system', 'block_public')) && (!local_user()) && (!remote_user())) {
  53                 notice(DI::l10n()->t('Public access denied.') . EOL);
  54                 return;
  55         }
  56
  57         $o = '';
  58         $entries = [];
  59
  60         Nav::setSelected('directory');
  61
  62         if (!empty($a->data['search'])) {
  63                 $search = Strings::escapeTags(trim($a->data['search']));
  64         } else {
  65                 $search = (!empty($_GET['search']) ? Strings::escapeTags(trim(rawurldecode($_GET['search']))) : '');
  66         }
  67
  68         $gdirpath = '';
  69         $dirurl = DI::config()->get('system', 'directory');
  70         if (strlen($dirurl)) {
  71                 $gdirpath = Profile::zrl($dirurl, true);
  72         }
  73
  74         $sql_extra = '';
  75         if (strlen($search)) {
  76                 $search = DBA::escape($search);
  77
  78                 $sql_extra = " AND ((`profile`.`name` LIKE '%$search%') OR
  79                                 (`user`.`nickname` LIKE '%$search%') OR
  80                                 (`profile`.`about` LIKE '%$search%') OR
  81                                 (`profile`.`locality` LIKE '%$search%') OR
  82                                 (`profile`.`region` LIKE '%$search%') OR
  83                                 (`profile`.`country-name` LIKE '%$search%') OR
  84                                 (`profile`.`pub_keywords` LIKE '%$search%') OR
  85                                 (`profile`.`prv_keywords` LIKE '%$search%'))";
  86         }
  87
  88         $publish = DI::config()->get('system', 'publish_all') ? '' : "`publish` = 1";
  89
  90         $total = 0;
  91         $cnt = DBA::fetchFirst("SELECT COUNT(*) AS `total` FROM `profile`
  92                                 INNER JOIN `user` ON `user`.`uid` = `profile`.`uid`
  93                                 WHERE $publish AND NOT `user`.`blocked` AND NOT `user`.`account_removed` AND `user`.`page-flags` = ? $sql_extra",
  94                                 User::PAGE_FLAGS_COMMUNITY);
  95         if (DBA::isResult($cnt)) {
  96                 $total = $cnt['total'];
  97         }
  98
  99         $pager = new Pager(DI::l10n(), DI::args()->getQueryString(), 60);
 100
 101         $order = " ORDER BY `name` ASC ";
 102
 103         $limit = $pager->getStart()."," . $pager->getItemsPerPage();
 104
 105         $r = DBA::p("SELECT `profile`.*, `user`.`nickname`, `user`.`timezone` , `user`.`page-flags`,
 106                         `contact`.`addr`, `contact`.`url` FROM `profile`
 107                         INNER JOIN `user` ON `user`.`uid` = `profile`.`uid`
 108                         INNER JOIN `contact` ON `contact`.`uid` = `user`.`uid`
 109                         WHERE $publish AND NOT `user`.`blocked` AND NOT `user`.`account_removed` AND `user`.`page-flags` = ? AND `contact`.`self`
 110                         $sql_extra $order LIMIT $limit", User::PAGE_FLAGS_COMMUNITY
 111         );
 112
 113         if (DBA::isResult($r)) {
 114                 if (in_array('small', $a->argv)) {
 115                         $photo = 'thumb';
 116                 } else {
 117                         $photo = 'photo';
 118                 }
 119
 120                 while ($rr = DBA::fetch($r)) {
 121                         $entries[] = Friendica\Module\Directory::formatEntry($rr, $photo);
 122                 }
 123                 DBA::close($r);
 124         } else {
 125                 notice(DI::l10n()->t("No entries \x28some entries may be hidden\x29."));
 126         }
 127
 128         $tpl = Renderer::getMarkupTemplate('directory_header.tpl');
 129         $o .= Renderer::replaceMacros($tpl, [
 130                 '$search'     => $search,
 131                 '$globaldir'  => DI::l10n()->t('Global Directory'),
 132                 '$gdirpath'   => $gdirpath,
 133                 '$desc'       => DI::l10n()->t('Find on this site'),
 134                 '$contacts'   => $entries,
 135                 '$finding'    => DI::l10n()->t('Results for:'),
 136                 '$findterm'   => (strlen($search) ? $search : ""),
 137                 '$title'      => DI::l10n()->t('Forum Directory'),
 138                 '$search_mod' => 'forumdirectory',
 139                 '$submit'     => DI::l10n()->t('Find'),
 140                 '$paginate'   => $pager->renderFull($total),
 141         ]);
 142
 143         return $o;
 144 }