4 * Description: Defines a YourLS url shortener for the Statusnet & Twitter addons
6 * Author: Keith Fernie <http://friendika.me4.it/profile/keith>
9 use Friendica\Core\Addon;
10 use Friendica\Core\Config;
11 use Friendica\Core\L10n;
13 function yourls_install() {
14 Addon::registerHook('addon_settings', 'addon/yourls/yourls.php', 'yourls_addon_settings');
15 Addon::registerHook('addon_settings_post', 'addon/yourls/yourls.php', 'yourls_addon_settings_post');
20 function yourls_uninstall() {
21 Addon::unregisterHook('addon_settings', 'addon/yourls/yourls.php', 'yourls_addon_settings');
22 Addon::unregisterHook('addon_settings_post', 'addon/yourls/yourls.php', 'yourls_addon_settings_post');
23 Config::set('yourls','url1',trim($_POST['']));
24 Config::set('yourls','username1',trim($_POST['']));
25 Config::set('yourls','password1',trim($_POST['']));
26 Config::set('yourls','ssl1',trim($_POST['']));
34 function yourls_addon_settings(&$a,&$s) {
40 /* Add our stylesheet to the page so we can make our settings look nice */
42 $a->page['htmlhead'] .= '<link rel="stylesheet" type="text/css" href="' . $a->get_baseurl() . '/addon/yourls/yourls.css' . '" media="all" />' . "\r\n";
45 $yourls_url = Config::get('yourls','url1');
46 $yourls_username = Config::get('yourls','username1');
47 $yourls_password = Config::get('yourls', 'password1');
48 $ssl_enabled = Config::get('yourls','ssl1');
49 $ssl_checked = (($ssl_enabled) ? ' checked="checked" ' : '');
53 $yourls_ssl = Config::get('yourls', 'ssl1');
55 $s .= '<span id="settings_yourls_inflated" class="settings-block fakelink" style="display: block;" onclick="openClose(\'settings_yourls_expanded\'); openClose(\'settings_yourls_inflated\');">';
56 $s .= '<h3>' . L10n::t('YourLS') . '</h3>';
58 $s .= '<div id="settings_yourls_expanded" class="settings-block" style="display: none;">';
59 $s .= '<span class="fakelink" onclick="openClose(\'settings_yourls_expanded\'); openClose(\'settings_yourls_inflated\');">';
60 $s .= '<h3>' . L10n::t('YourLS') . '</h3>';
63 $s .= '<div id="yourls-url-wrapper">';
64 $s .= '<label id="yourls-url-label" for="yourls-url">' . L10n::t('URL: http://') . '</label>';
65 $s .= '<input id="yourls-url" type="text" name="yourls_url" value="' . $yourls_url .'" />';
66 $s .= '</div><div class="clear"></div>';
68 $s .= '<div id="yourls-username-wrapper">';
69 $s .= '<label id="yourls-username-label" for="yourls-username">' . L10n::t('Username:') . '</label>';
70 $s .= '<input id="yourls-username" type="text" name="yourls_username" value="' . $yourls_username .'" />';
71 $s .= '</div><div class="clear"></div>';
73 $s .= '<div id="yourls-password-wrapper">';
74 $s .= '<label id="yourls-password-label" for="yourls-password">' . L10n::t('Password:') . '</label>';
75 $s .= '<input id="yourls-password" type="password" name="yourls_password" value="' . $yourls_password .'" />';
76 $s .= '</div><div class="clear"></div>';
78 $s .= '<div id="yourls-ssl-wrapper">';
79 $s .= '<label id="yourls-ssl-label" for="yourls-ssl">' . L10n::t('Use SSL ') . '</label>';
80 $s .= '<input id="yourls-ssl" type="checkbox" name="yourls_ssl" value="1" ' . $ssl_checked . ' />';
81 $s .= '</div><div class="clear"></div>';
83 $s .= '<div class="settings-submit-wrapper" ><input type="submit" id="yourls-submit" name="yourls-submit" class="settings-submit" value="' . L10n::t('Save Settings') . '" /></div></div>';
89 function yourls_addon_settings_post(&$a,&$b) {
94 if($_POST['yourls-submit']) {
95 Config::set('yourls','url1',trim($_POST['yourls_url']));
96 Config::set('yourls','username1',trim($_POST['yourls_username']));
97 Config::set('yourls','password1',trim($_POST['yourls_password']));
98 Config::set('yourls','ssl1',intval($_POST['yourls_ssl']));
99 info(L10n::t('yourls Settings saved.') . EOL);