irc/irc.php

   1 <?php
   2 /**
   3 * Name: IRC Chat Plugin
   4 * Description: add an Internet Relay Chat chatroom
   5 * Version: 1.0
   6 * Author: tony baldwin <https://free-haven.org/profile/tony>
   7 */
   8
   9 /* enable in admin->plugins
  10  * you will then have "irc chatroom" listed at yoursite/apps
  11  * and the app will run at yoursite/irc
  12  * documentation at http://tonybaldwin.me/hax/doku.php?id=friendica:irc
  13  * admin can set popular chans, auto connect chans in settings->plugin settings
  14  */
  15
  16 function irc_install() {
  17         register_hook('app_menu', 'addon/irc/irc.php', 'irc_app_menu');
  18         register_hook('plugin_settings', 'addon/irc/irc.php', 'irc_addon_settings');
  19         register_hook('plugin_settings_post', 'addon/irc/irc.php', 'irc_addon_settings_post');
  20 }
  21
  22 function irc_uninstall() {
  23         unregister_hook('app_menu', 'addon/irc/irc.php', 'irc_app_menu');
  24         unregister_hook('plugin_settings', 'addon/irc/irc.php', 'irc_addon_settings');
  25
  26 }
  27
  28
  29 function irc_addon_settings(&$a,&$s) {
  30
  31
  32         if(! is_site_admin())
  33                 return;
  34
  35     /* Add our stylesheet to the page so we can make our settings look nice */
  36
  37         $a->page['htmlhead'] .= '<link rel="stylesheet"  type="text/css" href="' . $a->get_baseurl() . '/addon/irc/irc.css' . '" media="all" />' . "\r\n";
  38
  39     /* setting popular channels, auto connect channels */
  40         $sitechats = get_config('irc','sitechats'); /* popular channels */
  41         $autochans = get_config('irc','autochans');  /* auto connect chans */
  42
  43         $s .= '<span id="settings_irc_inflated" class="settings-block fakelink" style="display: block;" onclick="openClose(\'settings_irc_expanded\'); openClose(\'settings_irc_inflated\');">';
  44         $s .= '<h3>' . t('IRC Settings') . '</h3>';
  45         $s .= '</span>';
  46         $s .= '<div id="settings_irc_expanded" class="settings-block" style="display: none;">';
  47         $s .= '<span class="fakelink" onclick="openClose(\'settings_irc_expanded\'); openClose(\'settings_irc_inflated\');">';
  48         $s .= '<h3>' . t('IRC Settings') . '</h3>';
  49         $s .= '</span>';
  50
  51         $s .= '<div class="settings-block">';
  52         $s .= '<h3>' . t('IRC Settings') . '</h3>';
  53         $s .= '<div id="irc-chans">';
  54         $s .= '<label id="irc-auto-label" for="autochans">' . t('Channel(s) to auto connect (comma separated)') . '</label>';
  55         $s .= '<input id="irc-autochans" type="text" name="autochans" value="' . $autochans .'" />';
  56         $s .= '</div><div class="clear"></div>';
  57
  58         $s .= '<div id="irc-popchans">';
  59         $s .= '<label id="irc-pop-label" for="sitechats">' . t('Popular Channels (comma separated)') . '</label>';
  60         $s .= '<input id="irc-sitechats" type="text" name="sitechats" value="' . $sitechats.'" />';
  61         $s .= '</div><div class="clear"></div>';
  62
  63         $s .= '<div class="settings-submit-wrapper" ><input type="submit" id="irc-submit" name="irc-submit" class="settings-submit" value="' . t('Save Settings') . '" /></div></div>';
  64         $s .= '</div>';
  65
  66         return;
  67
  68 }
  69
  70 function irc_addon_settings_post(&$a,&$b) {
  71         if(! is_site_admin())
  72                 return;
  73
  74         if($_POST['irc-submit']) {
  75                 set_config('irc','autochans',trim($_POST['autochans']));
  76                 set_config('irc','sitechats',trim($_POST['sitechats']));
  77                 /* stupid pop-up thing */
  78                 info( t('IRC settings saved.') . EOL);
  79         }
  80 }
  81
  82 function irc_app_menu($a,&$b) {
  83 $b['app_menu'][] = '<div class="app-title"><a href="irc">' . t('IRC Chatroom') . '</a></div>';
  84 }
  85
  86
  87 function irc_module() {
  88 return;
  89 }
  90
  91
  92 function irc_content(&$a) {
  93
  94         $baseurl = $a->get_baseurl() . '/addon/irc';
  95         $o = '';
  96
  97         /* set the list of popular channels */
  98         $sitechats = get_config('irc','sitechats');
  99         if($sitechats)
 100                 $chats = explode(',',$sitechats);
 101         else
 102                 $chats = array('friendica','chat','chatback','hottub','ircbar','dateroom','debian');
 103
 104
 105         $a->page['aside'] .= '<div class="widget"><h3>' . t('Popular Channels') . '</h3><ul>';
 106         foreach($chats as $chat) {
 107                 $a->page['aside'] .= '<li><a href="' . $a->get_baseurl() . '/irc?channels=' . $chat . '" >' . '#' . $chat . '</a></li>';
 108         }
 109         $a->page['aside'] .= '</ul></div>';
 110
 111         /* setting the channel(s) to auto connect */
 112         $autochans = get_config('irc','autochans');
 113         if($autochans)
 114                 $channels = $autochans;
 115         else
 116                 $channels = ((x($_GET,'channels')) ? $_GET['channels'] : 'friendica');
 117
 118 /* add the chatroom frame and some html */
 119   $o .= <<< EOT
 120 <h2>IRC chat</h2>
 121 <p><a href="http://tldp.org/HOWTO/IRC/beginners.html" target="_blank">A beginner's guide to using IRC. [en]</a></p>
 122 <iframe src="//webchat.freenode.net?channels=$channels" width="600" height="600"></iframe>
 123 EOT;
 124
 125 return $o;
 126
 127 }
 128
 129