3 * Name: New Member Widget
4 * Description: Adds a widget for new members into the sidebar of the network page. The widget will be displayed for the 1st 14days of a account existance and contains a link to the new member page and a free-form text the admin can define.
6 * Author: Tobias Diekershoff <https://f.diekershoff.de/profile/tobias>
9 require_once 'include/bbcode.php';
11 use Friendica\Core\Addon;
12 use Friendica\Core\Config;
13 use Friendica\Core\L10n;
15 function newmemberwidget_install () {
16 Addon::registerHook( 'network_mod_init', 'addon/newmemberwidget/newmemberwidget.php', 'newmemberwidget_network_mod_init');
17 logger('newmemberwidget installed');
19 function newmemberwidget_uninstall () {
20 Addon::unregisterHook( 'network_mod_init', 'addon/newmemberwidget/newmemberwidget.php', 'newmemberwidget_network_mod_init');
23 function newmemberwidget_network_mod_init ( $a, $b) {
24 if (x($_SESSION['new_member'])) {
25 $t = '<div id="newmember_widget" class="widget">'.EOL;
26 $t .= '<h3>'.L10n::t('New Member').'</h3>'.EOL;
27 $t .= '<a href="newmember" id="newmemberwidget-tips">' . L10n::t('Tips for New Members') . '</a><br />'.EOL;
28 if (Config::get('newmemberwidget','linkglobalsupport')==1)
29 $t .= '<a href="https://forum.friendi.ca/profile/helpers" target="_new">'.L10n::t('Global Support Forum').'</a><br />'.EOL;
30 if (Config::get('newmemberwidget','linklocalsupport')==1)
31 $t .= '<a href="'.$a->get_baseurl().'/profile/'.Config::get('newmemberwidget','localsupport').'" target="_new">'.L10n::t('Local Support Forum').'</a><br />'.EOL;
32 $ft = Config::get('newmemberwidget','freetext');
34 $t .= '<p>'.bbcode(trim($ft)).'</p>';
35 $t .= '</div><div class="clear"></div>';
36 $a->page['aside'] = $t . $a->page['aside'];
40 function newmemberwidget_addon_admin_post(&$a)
42 $ft = ((x($_POST, 'freetext')) ? trim($_POST['freetext']) : "");
43 $lsn = ((x($_POST, 'localsupportname')) ? notags(trim($_POST['localsupportname'])) : "");
44 $gs = intval($_POST['linkglobalsupport']);
45 $ls = intval($_POST['linklocalsupport']);
46 Config::set('newmemberwidget', 'freetext', trim($ft));
47 Config::set('newmemberwidget', 'linkglobalsupport', $gs);
48 Config::set('newmemberwidget', 'linklocalsupport', $ls);
49 Config::set('newmemberwidget', 'localsupport', trim($lsn));
52 function newmemberwidget_addon_admin(&$a, &$o)
54 $t = get_markup_template('admin.tpl', 'addon/newmemberwidget');
55 $o = replace_macros($t, [
56 '$submit' => L10n::t('Save Settings'),
57 '$freetext' => [ "freetext", L10n::t("Message"), Config::get("newmemberwidget", "freetext"), L10n::t("Your message for new members. You can use bbcode here.")],
58 '$linkglobalsupport' => [ "linkglobalsupport", L10n::t('Add a link to global support forum'), Config::get('newmemberwidget', 'linkglobalsupport'), L10n::t('Should a link to the global support forum be displayed?')." (<a href='https://forum.friendi.ca/profile/helpers'>@helpers</a>)"],
59 '$linklocalsupport' => [ "linklocalsupport", L10n::t('Add a link to the local support forum'), Config::get('newmemberwidget', 'linklocalsupport'), L10n::t('If you have a local support forum and want to have a link displayed in the widget, check this box.')],
60 '$localsupportname' => [ "localsupportname", L10n::t('Name of the local support group'), Config::get('newmemberwidget', 'localsupport'), L10n::t('If you checked the above, specify the <em>nickname</em> of the local support group here (i.e. helpers)')],