startpage/startpage.php

   1 <?php
   2 /**
   3  * Name: Start Page
   4  * Description: Set a preferred page to load on login from home page
   5  * Version: 1.0
   6  * Author: Mike Macgirvin <http://macgirvin.com/profile/mike>
   7  *
   8  */
   9 use Friendica\Core\Hook;
  10 use Friendica\DI;
  11
  12 function startpage_install() {
  13         Hook::register('home_init', 'addon/startpage/startpage.php', 'startpage_home_init');
  14         Hook::register('addon_settings', 'addon/startpage/startpage.php', 'startpage_settings');
  15         Hook::register('addon_settings_post', 'addon/startpage/startpage.php', 'startpage_settings_post');
  16 }
  17
  18 function startpage_uninstall()
  19 {
  20         Hook::unregister('home_init', 'addon/startpage/startpage.php', 'startpage_home_init');
  21         Hook::unregister('addon_settings', 'addon/startpage/startpage.php', 'startpage_settings');
  22         Hook::unregister('addon_settings_post', 'addon/startpage/startpage.php', 'startpage_settings_post');
  23 }
  24
  25 function startpage_home_init($a, $b)
  26 {
  27         if (!local_user()) {
  28                 return;
  29         }
  30
  31         $page = DI::pConfig()->get(local_user(), 'startpage', 'startpage');
  32         if (strlen($page)) {
  33                 DI::baseUrl()->redirect($page);
  34         }
  35         return;
  36 }
  37
  38 /**
  39  *
  40  * Callback from the settings post function.
  41  * $post contains the $_POST array.
  42  * We will make sure we've got a valid user account
  43  * and if so set our configuration setting for this person.
  44  *
  45  */
  46
  47 function startpage_settings_post($a, $post)
  48 {
  49         if (!local_user()) {
  50                 return;
  51         }
  52
  53         if (!empty($_POST['startpage-submit'])) {
  54                 DI::pConfig()->set(local_user(), 'startpage', 'startpage', strip_tags(trim($_POST['startpage'])));
  55         }
  56 }
  57
  58 /**
  59  *
  60  * Called from the Addon Setting form.
  61  * Add our own settings info to the page.
  62  *
  63  */
  64 function startpage_settings(&$a, &$s)
  65 {
  66         if (!local_user()) {
  67                 return;
  68         }
  69
  70         /* Add our stylesheet to the page so we can make our settings look nice */
  71
  72         DI::page()['htmlhead'] .= '<link rel="stylesheet"  type="text/css" href="' . DI::baseUrl()->get() . '/addon/startpage/startpage.css' . '" media="all" />' . "\r\n";
  73
  74         /* Get the current state of our config variable */
  75
  76         $page = DI::pConfig()->get(local_user(), 'startpage', 'startpage');
  77
  78         /* Add some HTML to the existing form */
  79
  80         $s .= '<span id="settings_startpage_inflated" class="settings-block fakelink" style="display: block;" onclick="openClose(\'settings_startpage_expanded\'); openClose(\'settings_startpage_inflated\');">';
  81         $s .= '<h3>' . DI::l10n()->t('Startpage') . '</h3>';
  82         $s .= '</span>';
  83         $s .= '<div id="settings_startpage_expanded" class="settings-block" style="display: none;">';
  84         $s .= '<span class="fakelink" onclick="openClose(\'settings_startpage_expanded\'); openClose(\'settings_startpage_inflated\');">';
  85         $s .= '<h3>' . DI::l10n()->t('Startpage') . '</h3>';
  86         $s .= '</span>';
  87         $s .= '<div id="startpage-page-wrapper">';
  88         $s .= '<label id="startpage-page-label" for="startpage-page">' . DI::l10n()->t('Home page to load after login  - leave blank for profile wall') . '</label>';
  89         $s .= '<input id="startpage-page" type="text" name="startpage" value="' . $page . '" />';
  90         $s .= '</div><div class="clear"></div>';
  91         $s .= '<div id="startpage-desc">' . DI::l10n()->t('Examples: &quot;network&quot; or &quot;notifications/system&quot;') . '</div>';
  92
  93         /* provide a submit button */
  94
  95         $s .= '<div class="settings-submit-wrapper" ><input type="submit" name="startpage-submit" class="settings-submit" value="' . DI::l10n()->t('Save Settings') . '" /></div></div>';
  96 }