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");
 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']);
 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         if($zncserver['protected'] === true && !$force) {
 320             error("Access denied\n");
 321             return;
 322         }
 323         $zncserver['conn'] = new ZNCServer($zncserver['host'], $zncserver['port']);
 324         $zncserver['conn']->login($zncserver['auser'], $zncserver['apass']);
 325         $zncserver['users'] = $zncserver['conn']->getUserList();
 326         $existing = false;
 327         foreach($zncserver['users'] as $user) {
 328             if(strtolower($user['user']) == $username) $existing = true;
 329         }
 330         if(!$existing && count($zncserver['users']) < $zncserver['maxznc']) {
 331             if($zncserver['priority'] > $priority) {
 332                 $priority = $zncserver['priority'];
 333                 $addserv = array();
 334             }
 335             $addserv[] = $zncserver;
 336         }
 337     }
 338     if(count($addserv) > 1) {
 339         //select server with lowest user count
 340         $usercount = count($addserv[0]['users']);
 341         $selected = 0;
 342         for($i = 1; $i < count($addserv); $i++) {
 343             if(count($addserv[$i]['users']) < $usercount) {
 344                 $usercount = count($addserv[$i]['users']);
 345                 $selected = $i;
 346             }
 347         }
 348         $addserv = $addserv[$selected];
 349     } else if(count($addserv) == 0) {
 350         error("Couldn't find a server the user could be added to.");
 351         return;
 352     } else {
 353         $addserv = $addserv[0];
 354     }
 355     $password = generate_password();
 356     $settings = array();
 357     $settings['nick'] = $argv[2];
 358     $settings['altnick'] = $argv[2]."`";
 359     $settings['ident'] = $username;
 360     $ret = $addserv['conn']->addZNC($argv[2], $password, $settings, $add_settings['servers'], $add_settings['modules'], $add_settings['other']);
 361     if($ret) {
 362         echo "Added user ".$argv[2]." to Server ".$addserv['name'].".\n";
 363         echo "  Server Host: ".$addserv['public']."  Port: ".$addserv['port']."  SSL Port: ".$addserv['sslport']."\n";
 364         echo "  Password: ".$password."\n";
 365         echo "[mIRC]\n";
 366         echo " /server -a ".$addserv['public']." -p ".$addserv['port']." -g KryptonZNC -w ".$argv[2].":".$password." -d KryptonZNC\n";
 367         echo " /AS addmask *@*.free-bnc.de\n";
 368         echo " /AS addmask *@*.krypton-bouncer.de\n";
 369         echo " /server -m KryptonZNC\n";
 370         echo"/log\n";
 371         $addserv['conn']->addChan($argv[2], "#Krypton");
 372     } else
 373         error("Error while adding user.");
 374 }
 375
 376 //SUBCOMMAND: resetpass
 377 function zncadmin_resetpass() {
 378     global $argv, $zncservers, $force;
 379     $username = strtolower($argv[2]);
 380     if(!$username) {
 381         error("missing username");
 382         return;
 383     }
 384     $delusers = array();
 385     foreach($zncservers as $zncserver) {
 386         if($argv[3] && (strtolower($argv[3]) != strtolower($zncserver['name']))) continue;
 387         if($username == strtolower($zncserver['auser'])) continue;
 388         $zncserver['conn'] = new ZNCServer($zncserver['host'], $zncserver['port']);
 389         $zncserver['conn']->login($zncserver['auser'], $zncserver['apass']);
 390         foreach($zncserver['conn']->getUserList() as $user) {
 391             if(strtolower($user['user']) == $username) {
 392                 $delusers[] = array("server" => $zncserver, "user" => $user);
 393             }
 394         }
 395     }
 396     if(count($delusers) > 1) {
 397         error($argv[2]." exists on multiple servers! please add the server name the user, the password should be resetted, is on.");
 398         echo"Found User on following Servers:\n";
 399         foreach($delusers as $server) {
 400             echo "\002".$server['server']['name']."\002  Server: ".$server['user']['server']."  Nick: ".$server['user']['nick']."  Clients: ".$server['user']['clients']."\n";
 401         }
 402     } else if(count($delusers) == 0) {
 403         error("Couldn't find an user called \002".$argv[2]."\002.");
 404     } else if($delusers[0]['server']['protected'] && !$force) {
 405         error("Access denied\n");
 406     } else {
 407         $deluser = $delusers[0];
 408         $password = generate_password();
 409         $deluser['server']['conn']->editZNC($deluser['user']['user'], $password);
 410         echo "Changed password of \002".$deluser['user']['user']."\002 on Server ".$deluser['server']['name']." to \002".$password."\002\n";
 411         echo"/log\n";
 412     }
 413 }
 414
 415 //SUBCOMMAND: simul
 416 function zncadmin_simul() {
 417     global $argv, $zncservers, $force;
 418     $username = strtolower($argv[2]);
 419     $server = strtolower($argv[3]);
 420     $raw = $argv[4];
 421     if(!$username) {
 422         error("missing username");
 423         return;
 424     }
 425     if($server) {
 426         $found = false;
 427         foreach($zncservers as $zncserver) {
 428             if(strtolower($server) == strtolower($zncserver['name'])) {
 429                 $found = true;
 430                 break;
 431             }
 432         }
 433         if(!$found) {
 434             $raw = $argv[3]." ".$raw;
 435             $server = null;
 436         }
 437     }
 438     if(!$raw) {
 439         error("missing raw");
 440         return;
 441     }
 442     $delusers = array();
 443     foreach($zncservers as $zncserver) {
 444         if($server && (strtolower($server) != strtolower($zncserver['name']))) continue;
 445         if($username == strtolower($zncserver['auser'])) continue;
 446         $zncserver['conn'] = new ZNCServer($zncserver['host'], $zncserver['port']);
 447         $zncserver['conn']->login($zncserver['auser'], $zncserver['apass']);
 448         foreach($zncserver['conn']->getUserList() as $user) {
 449             if(strtolower($user['user']) == $username) {
 450                 $delusers[] = array("server" => $zncserver, "user" => $user);
 451             }
 452         }
 453     }
 454     if(count($delusers) > 1) {
 455         error($argv[2]." exists on multiple servers! please add the server name the user should be simuled on.");
 456         echo"Found User on following Servers:\n";
 457         foreach($delusers as $server) {
 458             echo "\002".$server['server']['name']."\002  Server: ".$server['user']['server']."  Nick: ".$server['user']['nick']."  Clients: ".$server['user']['clients']."\n";
 459         }
 460     } else if(count($delusers) == 0) {
 461         error("Couldn't find an user called \002".$argv[2]."\002.");
 462     } else if($delusers[0]['server']['protected'] && !$force) {
 463         error("Access denied\n");
 464     } else {
 465         $deluser = $delusers[0];
 466         $ret = $deluser['server']['conn']->simulZNC($deluser['user']['user'], $raw);
 467         if($ret == ERR_MODULE_NOT_FOUND) {
 468             error("send_raw module is not installed or not activated for user ".$deluser['server']['auser']." on ".$deluser['server']['name']);
 469         } else {
 470             echo "Simuled \002".$deluser['user']['user']."\002 on Server ".$deluser['server']['name'].": ".$raw."\n";
 471             echo"/log\n";
 472         }
 473     }
 474 }
 475
 476 //SUBCOMMAND: block
 477 function zncadmin_block() {
 478     global $argv, $zncservers, $force;
 479     $username = strtolower($argv[2]);
 480     $server = strtolower($argv[3]);
 481     if(!$username) {
 482         error("missing username");
 483         return;
 484     }
 485     $delusers = array();
 486     foreach($zncservers as $zncserver) {
 487         if($server && (strtolower($server) != strtolower($zncserver['name']))) continue;
 488         if($username == strtolower($zncserver['auser'])) continue;
 489         $zncserver['conn'] = new ZNCServer($zncserver['host'], $zncserver['port']);
 490         $zncserver['conn']->login($zncserver['auser'], $zncserver['apass']);
 491         foreach($zncserver['conn']->getUserList() as $user) {
 492             if(strtolower($user['user']) == $username) {
 493                 $delusers[] = array("server" => $zncserver, "user" => $user);
 494             }
 495         }
 496     }
 497     if(count($delusers) > 1) {
 498         error($argv[2]." exists on multiple servers! please add the server name the user should be blocked on.");
 499         echo"Found User on following Servers:\n";
 500         foreach($delusers as $server) {
 501             echo "\002".$server['server']['name']."\002  Server: ".$server['user']['server']."  Nick: ".$server['user']['nick']."  Clients: ".$server['user']['clients']."\n";
 502         }
 503     } else if(count($delusers) == 0) {
 504         error("Couldn't find an user called \002".$argv[2]."\002.");
 505     } else if($delusers[0]['server']['protected'] && !$force) {
 506         error("Access denied\n");
 507     } else {
 508         $deluser = $delusers[0];
 509         $ret = $deluser['server']['conn']->blockZNC($deluser['user']['user'], true);
 510         if($ret == ERR_MODULE_NOT_FOUND) {
 511             error("blockuser module is not installed or not activated on ".$deluser['server']['name']);
 512         } else {
 513             echo "Blocked \002".$deluser['user']['user']."\002 on Server ".$deluser['server']['name'].".\n";
 514             echo"/log\n";
 515         }
 516     }
 517 }
 518
 519 //SUBCOMMAND: unblock
 520 function zncadmin_unblock() {
 521     global $argv, $zncservers, $force;
 522     $username = strtolower($argv[2]);
 523     $server = strtolower($argv[3]);
 524     if(!$username) {
 525         error("missing username");
 526         return;
 527     }
 528     $delusers = array();
 529     foreach($zncservers as $zncserver) {
 530         if($server && (strtolower($server) != strtolower($zncserver['name']))) continue;
 531         if($username == strtolower($zncserver['auser'])) continue;
 532         $zncserver['conn'] = new ZNCServer($zncserver['host'], $zncserver['port']);
 533         $zncserver['conn']->login($zncserver['auser'], $zncserver['apass']);
 534         foreach($zncserver['conn']->getUserList() as $user) {
 535             if(strtolower($user['user']) == $username) {
 536                 $delusers[] = array("server" => $zncserver, "user" => $user);
 537             }
 538         }
 539     }
 540     if(count($delusers) > 1) {
 541         error($argv[2]." exists on multiple servers! please add the server name the user should be unblocked on.");
 542         echo"Found User on following Servers:\n";
 543         foreach($delusers as $server) {
 544             echo "\002".$server['server']['name']."\002  Server: ".$server['user']['server']."  Nick: ".$server['user']['nick']."  Clients: ".$server['user']['clients']."\n";
 545         }
 546     } else if(count($delusers) == 0) {
 547         error("Couldn't find an user called \002".$argv[2]."\002.");
 548     } else if($delusers[0]['server']['protected'] && !$force) {
 549         error("Access denied\n");
 550     } else {
 551         $deluser = $delusers[0];
 552         $ret = $deluser['server']['conn']->blockZNC($deluser['user']['user'], false);
 553         if($ret == ERR_MODULE_NOT_FOUND) {
 554             error("blockuser module is not installed or not activated on ".$deluser['server']['name']);
 555         } else {
 556             echo "Unblocked \002".$deluser['user']['user']."\002 on Server ".$deluser['server']['name'].".\n";
 557             echo"/log\n";
 558         }
 559     }
 560 }
 561
 562 //SUBCOMMAND: stats
 563 function zncadmin_stats() {
 564     global $argv, $zncservers;
 565     $table = new Table(5);
 566     $table->add("Server", "Port / SSL Port", "Total ZNC's", "Connected (IRC)", "Online (User)");
 567     $count = 0;
 568     foreach($zncservers as $zncserver) {
 569         $total = 0;
 570         $connected = 0;
 571         $online = 0;
 572         $zncserver['conn'] = new ZNCServer($zncserver['host'], $zncserver['port']);
 573         $zncserver['conn']->login($zncserver['auser'], $zncserver['apass']);
 574         foreach($zncserver['conn']->getUserList() as $user) {
 575             if($user['server'] != "-N/A-") $connected++;
 576             if($user['clients'] > 0) $online++;
 577             $total++;
 578         }
 579         $table->add($zncserver['name'], $zncserver['port'].($zncserver['sslport'] ? "/".$zncserver['sslport'] : ""), $total.($zncserver['maxznc'] ? "/".$zncserver['maxznc'] : ""), $connected, $online);
 580         $count++;
 581     }
 582     if($count) {
 583         foreach($table->end() as $line) {
 584             echo$line."\n";
 585         }
 586     } else {
 587         echo "No Servers configured...\n";
 588     }
 589 }
 590
 591 ?>