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