zncadmin.php

   1 <?php
   2 /* czncadmin.php - main script - ZNCAdmin
   3  * Copyright (C) 2011-2012  Philipp Kreil (pk910)
   4  *
   5  * This program is free software: you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation, either version 3 of the License, or
   8  * (at your option) any later version.
   9  *
  10  * This program is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License
  16  * along with this program. If not, see <http://www.gnu.org/licenses/>.
  17  */
  18
  19 error_reporting(E_ALL & ~E_NOTICE);
  20 require_once("zncadmin/HTTPConnector.class.php");
  21 require_once("zncadmin/ZNCServer.class.php");
  22 require_once("zncadmin/Table.class.php");
  23
  24 require_once("config.inc.php");
  25
  26 /*
  27 $argv[1]   subcommand
  28 */
  29
  30 function error($msg) {
  31     echo"\00304ZNCAdmin error:\003 ".$msg."\n";
  32 }
  33
  34 if(strtolower($argv[1]) == "force") {
  35     $argv = array_slice($argv, 1);
  36     $force = true;
  37 } else
  38     $force = false;
  39
  40 switch(strtolower($argv[1])) {
  41     case "add":
  42         zncadmin_add();
  43         break;
  44     case "del":
  45         zncadmin_del();
  46         break;
  47     case "search":
  48         zncadmin_search();
  49         break;
  50         case "seen":
  51         zncadmin_seen();
  52         break;
  53     case "resetpass":
  54         zncadmin_resetpass();
  55         break;
  56     case "simul":
  57         zncadmin_simul();
  58         break;
  59     case "block":
  60         zncadmin_block();
  61         break;
  62     case "unblock":
  63         zncadmin_unblock();
  64         break;
  65     case "stats":
  66         zncadmin_stats();
  67         break;
  68     default:
  69         error("invalid subcommand '".$argv[1]."'");
  70         break;
  71 }
  72
  73 function preg_prepare($string,$wildcards = true,$pregstart = "#") {
  74     $in = array("\\","^",".","$","|","(",")","[","]","+","?","{","}",",",$pregstart);
  75     if(!$wildcards) array_push($in,"*");
  76     $out = array();
  77     foreach($in as $item) {
  78         $out[] = "\\".$item;
  79     }
  80     if($wildcards) {
  81         array_push($in,"*");
  82         array_push($out,"(.*)");
  83     }
  84     $string = str_replace($in,$out,$string);
  85     return $string;
  86 }
  87
  88 function generate_password() {
  89     $password_chars = "abcdefghijklmnopqrstuvwxyz01234567890ABCDEFGHIJKLMNOPQRSTUVWXYZ";
  90     $password_length = 10;
  91     $password = 0;
  92     srand();
  93     for($i = 0; $i < $password_length; $i++) {
  94         $password .= $password_chars[rand(0, strlen($password_chars))-1];
  95     }
  96     return $password;
  97 }
  98
  99 function str2time($duration) {
 100     $str="0";
 101     $dur=0;
 102     $mult=1;
 103     for($i=0;$i<strlen($duration);$i++) {
 104         if(is_numeric($duration[$i])) {
 105             $str.=$duration[$i];
 106         } else if($duration[$i] != " ") {
 107             switch ($duration[$i]) {
 108                 case "y":
 109                     $mult=365*24*60*60;
 110                     break;
 111                 case "M":
 112                     $mult=31*24*60*60;
 113                     break;
 114                 case "w":
 115                     $mult=7*24*60*60;
 116                     break;
 117                 case "d":
 118                     $mult=24*60*60;
 119                     break;
 120                 case "h":
 121                     $mult=60*60;
 122                     break;
 123                 case "m":
 124                     $mult=60;
 125                     break;
 126                 case "s":
 127                     $mult=1;
 128                     break;
 129                 case "*":
 130                     $mult=0;
 131                     break;
 132                 default:
 133                     return null;
 134                     break;
 135             }
 136             $dur=$dur+($str*$mult);
 137             $str="0";
 138         }
 139     }
 140     $dur=$dur+$str;
 141     return $dur;
 142 }
 143
 144 /***********************************************************
 145  *                   ZNCAdmin SUBCOMMANDS                  *
 146  ***********************************************************/
 147
 148 //SUBCOMMAND: search
 149 function zncadmin_search() {
 150     global $argv, $zncservers;
 151     $mask = $argv[2];
 152     if(!$mask) {
 153         error("missing mask parameter");
 154         return;
 155     }
 156     $extraflags = array();
 157     if($argv[3]) {
 158         $extraflags = explode(" ", $argv[3]);
 159     }
 160     $mask = preg_prepare($mask);
 161     $table = new Table(5);
 162     $table->add("Server", "User", "Clients", "Server", "Nick");
 163     $count = 0;
 164     foreach($zncservers as $zncserver) {
 165         $zncserver['conn'] = new ZNCServer($zncserver['host'], $zncserver['port']);
 166         $zncserver['conn']->login($zncserver['auser'], $zncserver['apass']);
 167         foreach($zncserver['conn']->getUserList() as $user) {
 168             $skip = false;
 169             foreach($extraflags as $flag) {
 170                 //some additional flags ;)
 171                 if($flag[0] == '-') {
 172                     $flag = substr($flag, 1);
 173                     $positive = false;
 174                 } else if($flag[0] == '+') {
 175                     $flag = substr($flag, 1);
 176                     $positive = true;
 177                 } else
 178                     $positive = true;
 179                 $flag = explode("=", $flag, 2);
 180                 $flagval = $flag[1];
 181                 switch (strtolower($flag[0])) {
 182                     case "online":
 183                         $skip = (($user['clients'] > 0) != $positive);
 184                         break;
 185                     case "connected":
 186                         $skip = (($user['server'] == "-N/A-") == $positive);
 187                         break;
 188                     case "server":
 189                         $skip = (preg_match("#^".preg_prepare($flagval)."$#i", $user['server']) != $positive);
 190                         break;
 191                     case "server_regex":
 192                         $skip = (preg_match("#^".$flagval."$#i", $user['server']) != $positive);
 193                         break;
 194                     case "nick":
 195                         $skip = (preg_match("#^".preg_prepare($flagval)."$#i", $user['nick']) != $positive);
 196                         break;
 197                     case "nick_regex":
 198                         $skip = (preg_match("#^".$flagval."$#i", $user['nick']) != $positive);
 199                         break;
 200                     case "znc":
 201                         $skip = (preg_match("#^".preg_prepare($flagval)."$#i", $zncserver['name']) != $positive);
 202                         break;
 203                     default:
 204
 205                         break;
 206                 }
 207                 if($skip)
 208                     break;
 209             }
 210             if($skip) continue;
 211             if(preg_match("#^".$mask."$#i", $user['user'])) {
 212                 $table->add($zncserver['name'], $user['user'], $user['clients'], $user['server'], $user['nick']);
 213                 $count++;
 214             }
 215         }
 216     }
 217     if($count) {
 218         foreach($table->end() as $line) {
 219             echo$line."\n";
 220         }
 221         echo"Found \002".$count."\002 users.\n";
 222     } else {
 223         echo "no user matching \002".$argv[2]."\002 found.\n";
 224     }
 225 }
 226
 227 //SUBCOMMAND: search
 228 function zncadmin_seen() {
 229     global $argv, $zncservers;
 230         $time = $argv[2];
 231         $over_time = true;
 232         if($time[0] == '>' || $time[0] == '<') {
 233                 if($time[0] == '<') $over_time = false;
 234                 $time = substr($time, 1);
 235         }
 236         $time = time() - str2time($time);
 237     $mask = $argv[3];
 238     if(!$time) {
 239         error("missing time parameter");
 240         return;
 241     }
 242     if($mask)
 243         $mask = preg_prepare($mask);
 244     else
 245         $mask = "(.*)";
 246     $table = new Table(4);
 247     $table->add("Server", "User", "Seen", "Info");
 248     $found = false;
 249     foreach($zncservers as $zncserver) {
 250         $zncserver['conn'] = new ZNCServer($zncserver['host'], $zncserver['port']);
 251         $zncserver['conn']->login($zncserver['auser'], $zncserver['apass']);
 252         foreach($zncserver['conn']->getSeenList() as $user) {
 253             if(preg_match("#^".$mask."$#i", $user['user']) && (($over_time && $user['seen_unix'] < $time) || (!$over_time && $user['seen_unix'] > $time))) {
 254                 $table->add($zncserver['name'], $user['user'], $user['seen'], $user['info']);
 255                 $found = true;
 256             }
 257         }
 258     }
 259     if($found) {
 260         foreach($table->end() as $line) {
 261             echo$line."\n";
 262         }
 263     } else {
 264         echo "no user matching \002".$argv[2]."\002 found.\n";
 265     }
 266 }
 267
 268 //SUBCOMMAND: del
 269 function zncadmin_del() {
 270     global $argv, $zncservers, $force;
 271     $username = strtolower($argv[2]);
 272     if(!$username) {
 273         error("missing username");
 274         return;
 275     }
 276     $delusers = array();
 277     foreach($zncservers as $zncserver) {
 278         if($argv[3] && (strtolower($argv[3]) != strtolower($zncserver['name']))) continue;
 279         if($username == strtolower($zncserver['auser'])) continue;
 280         $zncserver['conn'] = new ZNCServer($zncserver['host'], $zncserver['port']);
 281         $zncserver['conn']->login($zncserver['auser'], $zncserver['apass']);
 282         foreach($zncserver['conn']->getUserList() as $user) {
 283             if(strtolower($user['user']) == $username) {
 284                 $delusers[] = array("server" => $zncserver, "user" => $user);
 285             }
 286         }
 287     }
 288     if(count($delusers) > 1) {
 289         error($argv[2]." exists on multiple servers! please add the server name, the user should be removed from.");
 290         echo"Found User on following Servers:\n";
 291         foreach($delusers as $server) {
 292             echo "\002".$server['server']['name']."\002  Server: ".$server['user']['server']."  Nick: ".$server['user']['nick']."  Clients: ".$server['user']['clients']."\n";
 293         }
 294     } else if(count($delusers) == 0) {
 295         error("Couldn't find an user called \002".$argv[2]."\002.");
 296     } else if($delusers[0]['server']['protected'] && !$force) {
 297         error("Access denied\n");
 298     } else {
 299         $deluser = $delusers[0];
 300         $deluser['server']['conn']->delZNC($deluser['user']['user']);
 301         echo "Deleted \002".$deluser['user']['user']."\002 from Server \002".$deluser['server']['name']."\002\n";
 302         echo"/log\n";
 303     }
 304 }
 305
 306 //SUBCOMMAND: add
 307 function zncadmin_add() {
 308     global $argv, $zncservers, $add_settings, $force;
 309     $username = strtolower($argv[2]);
 310     if(!$username) {
 311         error("missing username");
 312         return;
 313     }
 314     $addserv = array();
 315     $priority = 1;
 316     foreach($zncservers as $zncserver) {
 317         if($argv[3] && (strtolower($argv[3]) != strtolower($zncserver['name']))) continue;
 318         if(!$argv[3] && $zncserver['priority'] < $priority) continue;
 319         $zncserver['conn'] = new ZNCServer($zncserver['host'], $zncserver['port']);
 320         $zncserver['conn']->login($zncserver['auser'], $zncserver['apass']);
 321         $zncserver['users'] = $zncserver['conn']->getUserList();
 322         $existing = false;
 323         foreach($zncserver['users'] as $user) {
 324             if(strtolower($user['user']) == $username) $existing = true;
 325         }
 326         if(!$existing && count($zncserver['users']) < $zncserver['maxznc']) {
 327             if($zncserver['priority'] > $priority) {
 328                 $priority = $zncserver['priority'];
 329                 $addserv = array();
 330             }
 331             $addserv[] = $zncserver;
 332         }
 333     }
 334     if(count($addserv) > 1) {
 335         //select server with lowest user count
 336         $usercount = count($addserv[0]['users']);
 337         $selected = 0;
 338         for($i = 1; $i < count($addserv); $i++) {
 339             if(count($addserv[$i]['users']) < $usercount) {
 340                 $usercount = count($addserv[$i]['users']);
 341                 $selected = $i;
 342             }
 343         }
 344         $addserv = $addserv[$selected];
 345     } else if(count($addserv) == 0) {
 346         error("Couldn't find a server the user could be added to.");
 347         return;
 348     } else {
 349         $addserv = $addserv[0];
 350     }
 351     $password = generate_password();
 352     $settings = array();
 353     $settings['nick'] = $argv[2];
 354     $settings['altnick'] = $argv[2]."`";
 355     $settings['ident'] = $username;
 356     $ret = $addserv['conn']->addZNC($argv[2], $password, $settings, $add_settings['servers'], $add_settings['modules'], $add_settings['other']);
 357     if($ret) {
 358         echo "Added user ".$argv[2]." to Server ".$addserv['name'].".\n";
 359         echo "  Server Host: ".$addserv['public']."  Port: ".$addserv['port']."  SSL Port: ".$addserv['sslport']."\n";
 360         echo "  Password: ".$password."\n";
 361         echo "[mIRC]\n";
 362         echo " /server -a ".$addserv['public']." -p ".$addserv['port']." -g KryptonZNC -w ".$argv[2].":".$password." -d KryptonZNC\n";
 363         echo " /AS addmask *@*.free-bnc.de\n";
 364         echo " /AS addmask *@*.krypton-bouncer.de\n";
 365         echo " /server -m KryptonZNC\n";
 366         echo"/log\n";
 367         $addserv['conn']->addChan($argv[2], "#Krypton");
 368     } else
 369         error("Error while adding user.");
 370 }
 371
 372 //SUBCOMMAND: resetpass
 373 function zncadmin_resetpass() {
 374     global $argv, $zncservers, $force;
 375     $username = strtolower($argv[2]);
 376     if(!$username) {
 377         error("missing username");
 378         return;
 379     }
 380     $delusers = array();
 381     foreach($zncservers as $zncserver) {
 382         if($argv[3] && (strtolower($argv[3]) != strtolower($zncserver['name']))) continue;
 383         if($username == strtolower($zncserver['auser'])) continue;
 384         $zncserver['conn'] = new ZNCServer($zncserver['host'], $zncserver['port']);
 385         $zncserver['conn']->login($zncserver['auser'], $zncserver['apass']);
 386         foreach($zncserver['conn']->getUserList() as $user) {
 387             if(strtolower($user['user']) == $username) {
 388                 $delusers[] = array("server" => $zncserver, "user" => $user);
 389             }
 390         }
 391     }
 392     if(count($delusers) > 1) {
 393         error($argv[2]." exists on multiple servers! please add the server name the user, the password should be resetted, is on.");
 394         echo"Found User on following Servers:\n";
 395         foreach($delusers as $server) {
 396             echo "\002".$server['server']['name']."\002  Server: ".$server['user']['server']."  Nick: ".$server['user']['nick']."  Clients: ".$server['user']['clients']."\n";
 397         }
 398     } else if(count($delusers) == 0) {
 399         error("Couldn't find an user called \002".$argv[2]."\002.");
 400     } else if($delusers[0]['server']['protected'] && !$force) {
 401         error("Access denied\n");
 402     } else {
 403         $deluser = $delusers[0];
 404         $password = generate_password();
 405         $deluser['server']['conn']->editZNC($deluser['user']['user'], $password);
 406         echo "Changed password of \002".$deluser['user']['user']."\002 on Server ".$deluser['server']['name']." to \002".$password."\002\n";
 407         echo"/log\n";
 408     }
 409 }
 410
 411 //SUBCOMMAND: simul
 412 function zncadmin_simul() {
 413     global $argv, $zncservers, $force;
 414     $username = strtolower($argv[2]);
 415     $server = strtolower($argv[3]);
 416     $raw = $argv[4];
 417     if(!$username) {
 418         error("missing username");
 419         return;
 420     }
 421     if($server) {
 422         $found = false;
 423         foreach($zncservers as $zncserver) {
 424             if(strtolower($server) == strtolower($zncserver['name'])) {
 425                 $found = true;
 426                 break;
 427             }
 428         }
 429         if(!$found) {
 430             $raw = $argv[3]." ".$raw;
 431             $server = null;
 432         }
 433     }
 434     if(!$raw) {
 435         error("missing raw");
 436         return;
 437     }
 438     $delusers = array();
 439     foreach($zncservers as $zncserver) {
 440         if($server && (strtolower($server) != strtolower($zncserver['name']))) continue;
 441         if($username == strtolower($zncserver['auser'])) continue;
 442         $zncserver['conn'] = new ZNCServer($zncserver['host'], $zncserver['port']);
 443         $zncserver['conn']->login($zncserver['auser'], $zncserver['apass']);
 444         foreach($zncserver['conn']->getUserList() as $user) {
 445             if(strtolower($user['user']) == $username) {
 446                 $delusers[] = array("server" => $zncserver, "user" => $user);
 447             }
 448         }
 449     }
 450     if(count($delusers) > 1) {
 451         error($argv[2]." exists on multiple servers! please add the server name the user should be simuled on.");
 452         echo"Found User on following Servers:\n";
 453         foreach($delusers as $server) {
 454             echo "\002".$server['server']['name']."\002  Server: ".$server['user']['server']."  Nick: ".$server['user']['nick']."  Clients: ".$server['user']['clients']."\n";
 455         }
 456     } else if(count($delusers) == 0) {
 457         error("Couldn't find an user called \002".$argv[2]."\002.");
 458     } else if($delusers[0]['server']['protected'] && !$force) {
 459         error("Access denied\n");
 460     } else {
 461         $deluser = $delusers[0];
 462         $ret = $deluser['server']['conn']->simulZNC($deluser['user']['user'], $raw);
 463         if($ret == ERR_MODULE_NOT_FOUND) {
 464             error("send_raw module is not installed or not activated for user ".$deluser['server']['auser']." on ".$deluser['server']['name']);
 465         } else {
 466             echo "Simuled \002".$deluser['user']['user']."\002 on Server ".$deluser['server']['name'].": ".$raw."\n";
 467             echo"/log\n";
 468         }
 469     }
 470 }
 471
 472 //SUBCOMMAND: block
 473 function zncadmin_block() {
 474     global $argv, $zncservers, $force;
 475     $username = strtolower($argv[2]);
 476     $server = strtolower($argv[3]);
 477     if(!$username) {
 478         error("missing username");
 479         return;
 480     }
 481     $delusers = array();
 482     foreach($zncservers as $zncserver) {
 483         if($server && (strtolower($server) != strtolower($zncserver['name']))) continue;
 484         if($username == strtolower($zncserver['auser'])) continue;
 485         $zncserver['conn'] = new ZNCServer($zncserver['host'], $zncserver['port']);
 486         $zncserver['conn']->login($zncserver['auser'], $zncserver['apass']);
 487         foreach($zncserver['conn']->getUserList() as $user) {
 488             if(strtolower($user['user']) == $username) {
 489                 $delusers[] = array("server" => $zncserver, "user" => $user);
 490             }
 491         }
 492     }
 493     if(count($delusers) > 1) {
 494         error($argv[2]." exists on multiple servers! please add the server name the user should be blocked on.");
 495         echo"Found User on following Servers:\n";
 496         foreach($delusers as $server) {
 497             echo "\002".$server['server']['name']."\002  Server: ".$server['user']['server']."  Nick: ".$server['user']['nick']."  Clients: ".$server['user']['clients']."\n";
 498         }
 499     } else if(count($delusers) == 0) {
 500         error("Couldn't find an user called \002".$argv[2]."\002.");
 501     } else if($delusers[0]['server']['protected'] && !$force) {
 502         error("Access denied\n");
 503     } else {
 504         $deluser = $delusers[0];
 505         $ret = $deluser['server']['conn']->blockZNC($deluser['user']['user'], true);
 506         if($ret == ERR_MODULE_NOT_FOUND) {
 507             error("blockuser module is not installed or not activated on ".$deluser['server']['name']);
 508         } else {
 509             echo "Blocked \002".$deluser['user']['user']."\002 on Server ".$deluser['server']['name'].".\n";
 510             echo"/log\n";
 511         }
 512     }
 513 }
 514
 515 //SUBCOMMAND: unblock
 516 function zncadmin_unblock() {
 517     global $argv, $zncservers, $force;
 518     $username = strtolower($argv[2]);
 519     $server = strtolower($argv[3]);
 520     if(!$username) {
 521         error("missing username");
 522         return;
 523     }
 524     $delusers = array();
 525     foreach($zncservers as $zncserver) {
 526         if($server && (strtolower($server) != strtolower($zncserver['name']))) continue;
 527         if($username == strtolower($zncserver['auser'])) continue;
 528         $zncserver['conn'] = new ZNCServer($zncserver['host'], $zncserver['port']);
 529         $zncserver['conn']->login($zncserver['auser'], $zncserver['apass']);
 530         foreach($zncserver['conn']->getUserList() as $user) {
 531             if(strtolower($user['user']) == $username) {
 532                 $delusers[] = array("server" => $zncserver, "user" => $user);
 533             }
 534         }
 535     }
 536     if(count($delusers) > 1) {
 537         error($argv[2]." exists on multiple servers! please add the server name the user should be unblocked on.");
 538         echo"Found User on following Servers:\n";
 539         foreach($delusers as $server) {
 540             echo "\002".$server['server']['name']."\002  Server: ".$server['user']['server']."  Nick: ".$server['user']['nick']."  Clients: ".$server['user']['clients']."\n";
 541         }
 542     } else if(count($delusers) == 0) {
 543         error("Couldn't find an user called \002".$argv[2]."\002.");
 544     } else if($delusers[0]['server']['protected'] && !$force) {
 545         error("Access denied\n");
 546     } else {
 547         $deluser = $delusers[0];
 548         $ret = $deluser['server']['conn']->blockZNC($deluser['user']['user'], false);
 549         if($ret == ERR_MODULE_NOT_FOUND) {
 550             error("blockuser module is not installed or not activated on ".$deluser['server']['name']);
 551         } else {
 552             echo "Unblocked \002".$deluser['user']['user']."\002 on Server ".$deluser['server']['name'].".\n";
 553             echo"/log\n";
 554         }
 555     }
 556 }
 557
 558 //SUBCOMMAND: stats
 559 function zncadmin_stats() {
 560     global $argv, $zncservers;
 561     $table = new Table(5);
 562     $table->add("Server", "Port / SSL Port", "Total ZNC's", "Connected (IRC)", "Online (User)");
 563     $count = 0;
 564     foreach($zncservers as $zncserver) {
 565         $total = 0;
 566         $connected = 0;
 567         $online = 0;
 568         $zncserver['conn'] = new ZNCServer($zncserver['host'], $zncserver['port']);
 569         $zncserver['conn']->login($zncserver['auser'], $zncserver['apass']);
 570         foreach($zncserver['conn']->getUserList() as $user) {
 571             if($user['server'] != "-N/A-") $connected++;
 572             if($user['clients'] > 0) $online++;
 573             $total++;
 574         }
 575         $table->add($zncserver['name'], $zncserver['port'].($zncserver['sslport'] ? "/".$zncserver['sslport'] : ""), $total.($zncserver['maxznc'] ? "/".$zncserver['maxznc'] : ""), $connected, $online);
 576         $count++;
 577     }
 578     if($count) {
 579         foreach($table->end() as $line) {
 580             echo$line."\n";
 581         }
 582     } else {
 583         echo "No Servers configured...\n";
 584     }
 585 }
 586
 587 ?>