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 id="irc-chans">';
  52         $s .= '<label id="irc-auto-label" for="autochans">' . t('Channel(s) to auto connect (comma separated)') . '</label>';
  53         $s .= '<input id="irc-autochans" type="text" name="autochans" value="' . $autochans .'" />';
  54         $s .= '</div><div class="clear"></div>';
  55
  56         $s .= '<div id="irc-popchans">';
  57         $s .= '<label id="irc-pop-label" for="sitechats">' . t('Popular Channels (comma separated)') . '</label>';
  58         $s .= '<input id="irc-sitechats" type="text" name="sitechats" value="' . $sitechats.'" />';
  59         $s .= '</div><div class="clear"></div>';
  60
  61         $s .= '<div class="settings-submit-wrapper" ><input type="submit" id="irc-submit" name="irc-submit" class="settings-submit" value="' . t('Save Settings') . '" /></div></div>';
  62
  63         return;
  64
  65 }
  66
  67 function irc_addon_settings_post(&$a,&$b) {
  68         if(! is_site_admin())
  69                 return;
  70
  71         if($_POST['irc-submit']) {
  72                 set_config('irc','autochans',trim($_POST['autochans']));
  73                 set_config('irc','sitechats',trim($_POST['sitechats']));
  74                 /* stupid pop-up thing */
  75                 info( t('IRC settings saved.') . EOL);
  76         }
  77 }
  78
  79 function irc_app_menu($a,&$b) {
  80 $b['app_menu'][] = '<div class="app-title"><a href="irc">' . t('IRC Chatroom') . '</a></div>';
  81 }
  82
  83
  84 function irc_module() {
  85 return;
  86 }
  87
  88
  89 function irc_content(&$a) {
  90
  91         $baseurl = $a->get_baseurl() . '/addon/irc';
  92         $o = '';
  93
  94         /* set the list of popular channels */
  95         $sitechats = get_config('irc','sitechats');
  96         if($sitechats)
  97                 $chats = explode(',',$sitechats);
  98         else
  99                 $chats = array('friendica','chat','chatback','hottub','ircbar','dateroom','debian');
 100
 101
 102         $a->page['aside'] .= '<div class="widget"><h3>' . t('Popular Channels') . '</h3><ul>';
 103         foreach($chats as $chat) {
 104                 $a->page['aside'] .= '<li><a href="' . $a->get_baseurl() . '/irc?channels=' . $chat . '" >' . '#' . $chat . '</a></li>';
 105         }
 106         $a->page['aside'] .= '</ul></div>';
 107
 108         /* setting the channel(s) to auto connect */
 109         $autochans = get_config('irc','autochans');
 110         if($autochans)
 111                 $channels = $autochans;
 112         else
 113                 $channels = ((x($_GET,'channels')) ? $_GET['channels'] : 'friendica');
 114
 115 /* add the chatroom frame and some html */
 116   $o .= <<< EOT
 117 <h2>IRC chat</h2>
 118 <p><a href="http://tldp.org/HOWTO/IRC/beginners.html" target="_blank">A beginner's guide to using IRC. [en]</a></p>
 119 <iframe src="//webchat.freenode.net?channels=$channels" width="600" height="600"></iframe>
 120 EOT;
 121
 122 return $o;
 123
 124 }
 125
 126