Extension:Multi-protocol notification

<?php
/* 
psycnotify.php 1.1:
    deliver a change notification to a PSYC group.
    written by psyc://goodadvice.pages.de/~fippo
    flirted up by psyc://psyced.org/~lynX
    released as freeware. wash your socks with it.
 
http://www.psyc.eu - the answer in messaging and conferencing
 
this script uses UDP because (a) the wiki is running on the localhost of the
server (b) you could just as well use TCP (c) then again if you don't mind
potential fake messages, you can use this across the network too - if the
network is really congested enough to lose a wiki notification, is it really
worth congesting the network even more?
 
now comes the two line config zone.
 
$psyctarget: if you don't know the uniform of your chatroom, a /status
command will tell you.
 
$psychost: in some cases when you want to use a neat domain name you will
have to resort to using SRV to map it onto a different host from where your
webserver resides. since implementing SRV here looks like too much work,
we simply ask you to provide the ip or hostname of the receiving machine
where the $psyctarget actually resides on, into $psychost. under normal
circumstances $psychost has the same hostname as $psyctarget.
 
our settings look like this:
  $psyctarget = "psyc://psyced.org/@welcome";
  $psychost = "udp://psyced.org";
 
but the easiest way to set this up is to install a psyced on the same
host, then you don't need to change anything below and the "wikinotify"
chatroom will work out of the box (feel free to edit it, though).
 */
 
$psyctarget = "psyc://localhost/@wikinotify";
$psychost = "udp://localhost";
$psycport = 4404;
 
/* in an ideal world, there is nothing you need to do below here */
 
function psycnotify($article, $user, $text, $summary, $isminor, $iswatch, $section) {
    global $psyctarget, $psychost;
 
    $url = "http://" . $_SERVER['SERVER_NAME'];
    $url .= str_replace("index.php?title=", "index.php/",
       substr($_SERVER['REQUEST_URI'], 0, -14));
    # header
    $s = ":_target\t$psyctarget\n"
#      . ":_encoding\tutf-8\n" # PSYC uses UTF-8 anyway
       . "\n"                  # move on from routing layer to application layer
       . ":_nick_wiki\t". strToLower($user->mName) ."\n"
       . ":_article\t". $article->mTitle->mTextform ."\n"
       . ":_page\t$url$section\n";
    if ($section) {
        $s .= ":_section\t$section\n";
        if ($summary && ($p = strpos($summary, " */ ")))
            $summary = substr($summary, $p + 4);
    }
    if ($summary) $s .= ":_summary\t$summary\n";
 
    # method
    $mc = "_notice_update_wiki";
    if ($isminor) $mc .= "_minor";
    $s .= $mc ."\n";
 
    # body
    $s .= "(Wiki:[_nick_wiki]) has made a "
       . ($isminor ? "minor" : "major")
       . " change in [_page]\n";
    if ($summary) $s .= "saying: [_summary]\n";
 
    # deliver, as simple as that
    $udp = fsockopen($psychost, $psycport);
    fwrite($udp, ".\n". $s .".\n");
    fclose($udp);
    return true;
}
 
$wgHooks['ArticleSaveComplete'][] = array('psycnotify');

require_once( "extensions/psycnotify.php" );