# * servertab.irc by phos for vip
# pretty basic script to change servertab display
# if you set servername on and network on it will choose network
# manually turn network off or vice versa
# http://deep.jircii.info/ for my scripts..
#
# 
# ./load path/to/servertab.irc
#
# /servertab_tog toggle network or servername on/off
# /servertab_help list of toggles
#
# support -> danfare@jircii.info or #jIRCii on irc.freenode.net/irc.easynews.com

# begin customized functions for easier scripting
sub prop { return getProperty("$1"); }

# end customized functions for easier scripting


alias servertab_tog { 
    $regex = '(on|off)';
    if ($2 ismatch $regex)
    {
        @match = matches($2, $regex);
        $match = @match[0];
        if ($1 eq "network") { 
             echo("* servertab.irc: setting $1" . ": $2"); setProperty("st_network", $match); return; } 
        
        if ($1 eq "servername") {
             echo("* servertab.irc: setting $1" . ": $2"); setProperty("st_servername", $match); return; } 
    }
}
alias servertab_help { 
     echo("use /servertab_tog.... ");
     echo("`-> network: show server network");
     echo("`-> servername: show server name (irc.easynews.com would show easynews)");
     echo("to turn this script off please kill yourself");
     echo("just kidding, unload the script and restart jIRCii. sorry.");
}
on repl_376 {
   if (prop("st_network") eq "on") { $network = getServerNetwork(); setSessionText("$network"); }
   if (prop("st_servername") eq "on") { setSessionText(srvinfo(getServerHost())); }
}
sub srvinfo { #this whole alias basically taken from belf's ini.irc (the token examples)
    $tmp = tokenize("$1", '.');
    $item  = getToken($tmp, 0);    
    $value = getTokenFrom($tmp, 1);
    $value = replace(getTokenFrom($tmp, 1), "." . getTokenFrom($tmp, 2), ' ');
   return $value;
}