--- /dev/null
+<?php
+/**
+ * Name: Start Page
+ * Description: Set a preferred page to load on login from home page
+ * Version: 1.0
+ * Author: Mike Macgirvin <http://macgirvin.com/profile/mike>
+ *
+ */
+
+
+function startpage_install() {
+ register_hook('home_init', 'addon/startpage/startpage.php', 'startpage_home_init');
+ register_hook('plugin_settings', 'addon/startpage/startpage.php', 'startpage_settings');
+ register_hook('plugin_settings_post', 'addon/startpage/startpage.php', 'startpage_settings_post');
+}
+
+
+function startpage_uninstall() {
+ unregister_hook('home_init', 'addon/startpage/startpage.php', 'startpage_home_init');
+ unregister_hook('plugin_settings', 'addon/startpage/startpage.php', 'startpage_settings');
+ unregister_hook('plugin_settings_post', 'addon/startpage/startpage.php', 'startpage_settings_post');
+}
+
+
+
+function startpage_home_init($a, $b) {
+ if(! local_user())
+ return;
+
+ $page = get_pconfig(local_user(),'startpage','startpage');
+ if(strlen($page)) {
+ $slash = ((strpos($page,'/') === 0) ? true : false);
+ if(stristr($page,'://'))
+ goaway($page);
+ goaway($a->get_baseurl() . (($slash) ? '' : '/') . $page);
+ }
+ return;
+}
+
+/**
+ *
+ * Callback from the settings post function.
+ * $post contains the $_POST array.
+ * We will make sure we've got a valid user account
+ * and if so set our configuration setting for this person.
+ *
+ */
+
+function startpage_settings_post($a,$post) {
+ if(! local_user())
+ return;
+ if($_POST['startpage-submit'])
+ set_pconfig(local_user(),'startpage','startpage',strip_tags(trim($_POST['startpage'])));
+}
+
+
+/**
+ *
+ * Called from the Plugin Setting form.
+ * Add our own settings info to the page.
+ *
+ */
+
+
+
+function startpage_settings(&$a,&$s) {
+
+ if(! local_user())
+ return;
+
+ /* Add our stylesheet to the page so we can make our settings look nice */
+
+ $a->page['htmlhead'] .= '<link rel="stylesheet" type="text/css" href="' . $a->get_baseurl() . '/addon/startpage/startpage.css' . '" media="all" />' . "\r\n";
+
+ /* Get the current state of our config variable */
+
+ $page = get_pconfig(local_user(),'startpage','startpage');
+
+
+ /* Add some HTML to the existing form */
+
+ $s .= '<div class="settings-block">';
+ $s .= '<h3>' . t('Startpage Settings') . '</h3>';
+ $s .= '<div id="startpage-page-wrapper">';
+ $s .= '<label id="startpage-page-label" for="startpage-page">' . t('Home page to load after login - leave blank for profile wall') . '</label>';
+ $s .= '<input id="startpage-page" type="text" name="startpage" value="' . $page . '" />';
+ $s .= '</div><div class="clear"></div>';
+ $s .= '<div id="startpage-desc">' . t('Examples: "network" or "notifications/system"') . '</div>';
+
+ /* provide a submit button */
+
+ $s .= '<div class="settings-submit-wrapper" ><input type="submit" name="startpage-submit" class="settings-submit" value="' . t('Submit') . '" /></div></div>';
+
+}