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