Răsfoiți Sursa

rename library from Rstat to eyelib

Roman Dmitriev 2 ani în urmă
părinte
comite
3412db3dc0
43 a modificat fișierele cu 162 adăugiri și 162 ștergeri
  1. 4 4
      docs/addons/print-dns-commands.pl
  2. 3 3
      docs/addons/print-dns-zones.pl
  3. 4 4
      docs/addons/print-ou-ip.pl
  4. 2 2
      docs/addons/print_cacti_create.pl
  5. 2 2
      docs/addons/print_cacti_hosts.pl
  6. 4 4
      docs/addons/print_devices.pl
  7. 4 4
      docs/addons/print_dns_commands.pl
  8. 4 4
      docs/addons/set_dns_record.pl
  9. 6 6
      docs/addons/set_port_descr.pl
  10. 4 4
      docs/addons/socket/dhcp-log.pl
  11. 4 4
      docs/devices/export-user-dev.pl
  12. 4 4
      docs/devices/import-system-dev.pl
  13. 4 4
      docs/devices/source/export-system-dev.pl
  14. 4 4
      docs/devices/source/import-user-dev.pl
  15. 4 4
      docs/dhcpd/print-dhcpd.pl
  16. 4 4
      docs/dhcpd/print-dhcpd2.pl
  17. 4 4
      docs/iptables/parse_ulog.pl
  18. 5 5
      docs/iptables/sync_iptables.pl
  19. 4 4
      docs/mac-oids/update-mac-vendors.pl
  20. 3 3
      docs/oxidized/print_devices_oxi.pl
  21. 4 4
      docs/win32/print-dhcpd-netsh.pl
  22. 4 4
      docs/win32/sync-dhcpd-netsh.pl
  23. 5 5
      scripts/backupcfg.pl
  24. 4 4
      scripts/check_dhcp_pool.pl
  25. 4 4
      scripts/dhcp-log.pl
  26. 3 3
      scripts/eyelib/cmd.pm
  27. 1 1
      scripts/eyelib/config.pm
  28. 2 2
      scripts/eyelib/main.pm
  29. 4 4
      scripts/eyelib/mysql.pm
  30. 3 3
      scripts/eyelib/net_utils.pm
  31. 2 2
      scripts/eyelib/rest_api.pm
  32. 3 3
      scripts/eyelib/snmp.pm
  33. 5 5
      scripts/fetch_new_arp.pl
  34. 3 3
      scripts/garbage.pl
  35. 4 4
      scripts/parse_flow.pl
  36. 4 4
      scripts/print-dnsmasq.pl
  37. 6 6
      scripts/set_port_descr.pl
  38. 4 4
      scripts/stat-sync.pl
  39. 5 5
      scripts/sync_mikrotik.pl
  40. 3 3
      scripts/syslog-stat.pl
  41. 4 4
      updates/2-4-1/migrate_mac_vendors.pl
  42. 4 4
      updates/2-4-1/upgrade-to-2.4.pl
  43. 4 4
      updates/2-4-12/upgrade-to-2-4-12.pl

+ 4 - 4
docs/addons/print-dns-commands.pl

@@ -12,10 +12,10 @@ use lib "$Bin/";
 use strict;
 use DBI;
 use Time::Local;
-use Rstat::config;
-use Rstat::main;
-use Rstat::mysql;
-use Rstat::net_utils;
+use eyelib::config;
+use eyelib::main;
+use eyelib::mysql;
+use eyelib::net_utils;
 
 my @devices=get_records_sql($dbh,'SELECT * FROM devices WHERE deleted=0 and (vendor_id=3 or vendor_id=8 or vendor_id=9) and device_type<=2 ORDER BY device_name');
 foreach my $device (@devices) {

+ 3 - 3
docs/addons/print-dns-zones.pl

@@ -11,9 +11,9 @@ use DBI;
 use Time::Local;
 use Net::Patricia;
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
-use Rstat::mysql;
+use eyelib::config;
+use eyelib::main;
+use eyelib::mysql;
 
 setpriority(0,0,19);
 

+ 4 - 4
docs/addons/print-ou-ip.pl

@@ -11,10 +11,10 @@ use DBI;
 use Time::Local;
 use Net::Patricia;
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
-use Rstat::net_utils;
-use Rstat::mysql;
+use eyelib::config;
+use eyelib::main;
+use eyelib::net_utils;
+use eyelib::mysql;
 
 my $OU_ID=$ARGV[0];
 my $ou_filter=" and L.ou_id=$OU_ID ";

+ 2 - 2
docs/addons/print_cacti_create.pl

@@ -9,8 +9,8 @@ use lib "$Bin/";
 use strict;
 use DBI;
 use Date::Parse;
-use Rstat::config;
-use Rstat::mysql;
+use eyelib::config;
+use eyelib::mysql;
 use encoding 'utf8';
 
 

+ 2 - 2
docs/addons/print_cacti_hosts.pl

@@ -9,8 +9,8 @@ use lib "$Bin/";
 use strict;
 use DBI;
 use Date::Parse;
-use Rstat::config;
-use Rstat::mysql;
+use eyelib::config;
+use eyelib::mysql;
 use encoding 'utf8';
 
 

+ 4 - 4
docs/addons/print_devices.pl

@@ -13,10 +13,10 @@ use Net::Patricia;
 use Data::Dumper;
 use Date::Parse;
 use Socket;
-use Rstat::config;
-use Rstat::main;
-use Rstat::net_utils;
-use Rstat::mysql;
+use eyelib::config;
+use eyelib::main;
+use eyelib::net_utils;
+use eyelib::mysql;
 use NetAddr::IP;
 
 setpriority(0,0,19);

+ 4 - 4
docs/addons/print_dns_commands.pl

@@ -12,10 +12,10 @@ use lib "$Bin/";
 use strict;
 use DBI;
 use Time::Local;
-use Rstat::config;
-use Rstat::main;
-use Rstat::mysql;
-use Rstat::net_utils;
+use eyelib::config;
+use eyelib::main;
+use eyelib::mysql;
+use eyelib::net_utils;
 
 my @devices=get_records_sql($dbh,'SELECT * FROM devices WHERE deleted=0 and (vendor_id=3 or vendor_id=8 or vendor_id=9) and device_type<=2 ORDER BY device_name');
 foreach my $device (@devices) {

+ 4 - 4
docs/addons/set_dns_record.pl

@@ -16,10 +16,10 @@ use Time::Local;
 use Net::Patricia;
 use NetAddr::IP;
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
-use Rstat::mysql;
-use Rstat::net_utils;
+use eyelib::config;
+use eyelib::main;
+use eyelib::mysql;
+use eyelib::net_utils;
 use File::Basename;
 use File::Path;
 

+ 6 - 6
docs/addons/set_port_descr.pl

@@ -13,12 +13,12 @@ use strict;
 use Time::Local;
 use FileHandle;
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
-use Rstat::net_utils;
-use Rstat::mysql;
-use Rstat::snmp;
-use Rstat::cmd;
+use eyelib::config;
+use eyelib::main;
+use eyelib::net_utils;
+use eyelib::mysql;
+use eyelib::snmp;
+use eyelib::cmd;
 use Net::SNMP qw(:snmp);
 use Fcntl qw(:flock);
 no if $] >= 5.018, warnings =>  "experimental::smartmatch";

+ 4 - 4
docs/addons/socket/dhcp-log.pl

@@ -12,10 +12,10 @@ use base;
 use FindBin '$Bin';
 use lib "$Bin/";
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
-use Rstat::mysql;
-use Rstat::net_utils;
+use eyelib::config;
+use eyelib::main;
+use eyelib::mysql;
+use eyelib::net_utils;
 use strict;
 use warnings;
 use Getopt::Long;

+ 4 - 4
docs/devices/export-user-dev.pl

@@ -9,10 +9,10 @@
 use FindBin '$Bin';
 use lib "$Bin/";
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
-use Rstat::mysql;
-use Rstat::net_utils;
+use eyelib::config;
+use eyelib::main;
+use eyelib::mysql;
+use eyelib::net_utils;
 use strict;
 use warnings;
 

+ 4 - 4
docs/devices/import-system-dev.pl

@@ -9,10 +9,10 @@
 use FindBin '$Bin';
 use lib "$Bin/";
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
-use Rstat::mysql;
-use Rstat::net_utils;
+use eyelib::config;
+use eyelib::main;
+use eyelib::mysql;
+use eyelib::net_utils;
 use strict;
 use warnings;
 

+ 4 - 4
docs/devices/source/export-system-dev.pl

@@ -10,10 +10,10 @@
 use FindBin '$Bin';
 use lib "$Bin/";
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
-use Rstat::mysql;
-use Rstat::net_utils;
+use eyelib::config;
+use eyelib::main;
+use eyelib::mysql;
+use eyelib::net_utils;
 use strict;
 use warnings;
 

+ 4 - 4
docs/devices/source/import-user-dev.pl

@@ -10,10 +10,10 @@
 use FindBin '$Bin';
 use lib "$Bin/";
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
-use Rstat::mysql;
-use Rstat::net_utils;
+use eyelib::config;
+use eyelib::main;
+use eyelib::mysql;
+use eyelib::net_utils;
 use strict;
 use warnings;
 

+ 4 - 4
docs/dhcpd/print-dhcpd.pl

@@ -12,10 +12,10 @@ use Time::Local;
 use Net::Patricia;
 use NetAddr::IP;
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
-use Rstat::mysql;
-use Rstat::net_utils;
+use eyelib::config;
+use eyelib::main;
+use eyelib::mysql;
+use eyelib::net_utils;
 use File::Basename;
 use File::Path;
 use utf8;

+ 4 - 4
docs/dhcpd/print-dhcpd2.pl

@@ -12,10 +12,10 @@ use Time::Local;
 use Net::Patricia;
 use NetAddr::IP;
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
-use Rstat::mysql;
-use Rstat::net_utils;
+use eyelib::config;
+use eyelib::main;
+use eyelib::mysql;
+use eyelib::net_utils;
 use File::Basename;
 use File::Path;
 use utf8;

+ 4 - 4
docs/iptables/parse_ulog.pl

@@ -13,10 +13,10 @@ use Net::Patricia;
 use Data::Dumper;
 use Date::Parse;
 use Socket;
-use Rstat::config;
-use Rstat::main;
-use Rstat::net_utils;
-use Rstat::mysql;
+use eyelib::config;
+use eyelib::main;
+use eyelib::net_utils;
+use eyelib::mysql;
 
 setpriority(0,0,19);
 

+ 5 - 5
docs/iptables/sync_iptables.pl

@@ -10,13 +10,13 @@ use strict;
 use Time::Local;
 use FileHandle;
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
-use Rstat::cmd;
+use eyelib::config;
+use eyelib::main;
+use eyelib::cmd;
 use Net::Patricia;
 use Date::Parse;
-use Rstat::net_utils;
-use Rstat::mysql;
+use eyelib::net_utils;
+use eyelib::mysql;
 use IPTables::libiptc;
 use DBI;
 use utf8;

+ 4 - 4
docs/mac-oids/update-mac-vendors.pl

@@ -8,10 +8,10 @@ use utf8;
 use FindBin '$Bin';
 use lib "$Bin/";
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
-use Rstat::mysql;
-use Rstat::net_utils;
+use eyelib::config;
+use eyelib::main;
+use eyelib::mysql;
+use eyelib::net_utils;
 use strict;
 use warnings;
 

+ 3 - 3
docs/oxidized/print_devices_oxi.pl

@@ -12,9 +12,9 @@ use DBI;
 no if $] >= 5.018, warnings =>  "experimental::smartmatch";
 use Data::Dumper;
 use Socket;
-use Rstat::config;
-use Rstat::main;
-use Rstat::mysql;
+use eyelib::config;
+use eyelib::main;
+use eyelib::mysql;
 
 my @router_list = get_records_sql($dbh,"SELECT * FROM devices WHERE device_type<=2" );
 

+ 4 - 4
docs/win32/print-dhcpd-netsh.pl

@@ -11,10 +11,10 @@ use DBI;
 use Time::Local;
 use Net::Patricia;
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
-use Rstat::net_utils;
-use Rstat::mysql;
+use eyelib::config;
+use eyelib::main;
+use eyelib::net_utils;
+use eyelib::mysql;
 
 my $time_shift=$ARGV[0];
 

+ 4 - 4
docs/win32/sync-dhcpd-netsh.pl

@@ -10,10 +10,10 @@ use strict;
 use DBI;
 use Time::Local;
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
-use Rstat::net_utils;
-use Rstat::mysql;
+use eyelib::config;
+use eyelib::main;
+use eyelib::net_utils;
+use eyelib::mysql;
 use Text::Iconv;
 
 exit;

+ 5 - 5
scripts/backupcfg.pl

@@ -13,11 +13,11 @@ use strict;
 use Time::Local;
 use FileHandle;
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
-use Rstat::mysql;
-use Rstat::net_utils;
-use Rstat::cmd;
+use eyelib::config;
+use eyelib::main;
+use eyelib::mysql;
+use eyelib::net_utils;
+use eyelib::cmd;
 use Fcntl qw(:flock);
 
 open(SELF,"<",$0) or die "Cannot open $0 - $!";

+ 4 - 4
scripts/check_dhcp_pool.pl

@@ -16,10 +16,10 @@ use Time::Local;
 use Net::Patricia;
 use NetAddr::IP;
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
-use Rstat::mysql;
-use Rstat::net_utils;
+use eyelib::config;
+use eyelib::main;
+use eyelib::mysql;
+use eyelib::net_utils;
 use File::Basename;
 use File::Path;
 

+ 4 - 4
scripts/dhcp-log.pl

@@ -10,10 +10,10 @@ use base;
 use FindBin '$Bin';
 use lib "$Bin/";
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
-use Rstat::mysql;
-use Rstat::net_utils;
+use eyelib::config;
+use eyelib::main;
+use eyelib::mysql;
+use eyelib::net_utils;
 use strict;
 use warnings;
 use Getopt::Long;

+ 3 - 3
scripts/Rstat/cmd.pm → scripts/eyelib/cmd.pm

@@ -1,4 +1,4 @@
-package Rstat::cmd;
+package eyelib::cmd;
 
 #
 # Copyright (C) Roman Dmitiriev, rnd@rajven.ru
@@ -13,8 +13,8 @@ use lib "$Bin";
 use base 'Exporter';
 use vars qw(@EXPORT @ISA);
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
+use eyelib::config;
+use eyelib::main;
 use Net::Telnet;
 use Net::OpenSSH;
 

+ 1 - 1
scripts/Rstat/config.pm → scripts/eyelib/config.pm

@@ -1,4 +1,4 @@
-package Rstat::config;
+package eyelib::config;
 
 #
 # Copyright (C) Roman Dmitiriev, rnd@rajven.ru

+ 2 - 2
scripts/Rstat/main.pm → scripts/eyelib/main.pm

@@ -1,4 +1,4 @@
-package Rstat::main;
+package eyelib::main;
 
 #
 # Copyright (C) Roman Dmitiriev, rnd@rajven.ru
@@ -11,7 +11,7 @@ use FindBin '$Bin';
 use lib "$Bin";
 use base 'Exporter';
 use vars qw(@EXPORT @ISA);
-use Rstat::config;
+use eyelib::config;
 use Socket;
 use IO::Select;
 use IO::Handle;

+ 4 - 4
scripts/Rstat/mysql.pm → scripts/eyelib/mysql.pm

@@ -1,4 +1,4 @@
-package Rstat::mysql;
+package eyelib::mysql;
 
 #
 # Copyright (C) Roman Dmitiriev, rnd@rajven.ru
@@ -11,10 +11,10 @@ use FindBin '$Bin';
 use lib "$Bin";
 use base 'Exporter';
 use vars qw(@EXPORT @ISA);
-use Rstat::config;
-use Rstat::main;
+use eyelib::config;
+use eyelib::main;
 use Net::Patricia;
-use Rstat::net_utils;
+use eyelib::net_utils;
 use Data::Dumper;
 use DateTime;
 use POSIX;

+ 3 - 3
scripts/Rstat/net_utils.pm → scripts/eyelib/net_utils.pm

@@ -1,4 +1,4 @@
-package Rstat::net_utils;
+package eyelib::net_utils;
 
 #
 # Copyright (C) Roman Dmitiriev, rnd@rajven.ru
@@ -13,8 +13,8 @@ use base 'Exporter';
 use vars qw(@EXPORT @ISA);
 use FileHandle;
 use POSIX;
-use Rstat::config;
-use Rstat::main;
+use eyelib::config;
+use eyelib::main;
 use Net::Ping;
 use Net::Patricia;
 use NetAddr::IP;

+ 2 - 2
scripts/Rstat/rest_api.pm → scripts/eyelib/rest_api.pm

@@ -1,4 +1,4 @@
-package Rstat::rest_api;
+package eyelib::rest_api;
 
 #
 # Copyright (C) Roman Dmitiriev, rnd@rajven.ru
@@ -15,7 +15,7 @@ use HTTP::Request::Common;
 use HTTP::Request;
 use LWP;
 use URI::Encode;
-use Rstat::main;
+use eyelib::main;
 use Data::Dumper;
 use IO::Socket::SSL;
 use JSON;

+ 3 - 3
scripts/Rstat/snmp.pm → scripts/eyelib/snmp.pm

@@ -1,4 +1,4 @@
-package Rstat::snmp;
+package eyelib::snmp;
 
 #
 # Copyright (C) Roman Dmitiriev, rnd@rajven.ru
@@ -12,8 +12,8 @@ use lib "$Bin";
 use base 'Exporter';
 use vars qw(@EXPORT @ISA);
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
+use eyelib::config;
+use eyelib::main;
 use Net::SNMP;
 
 @ISA = qw(Exporter);

+ 5 - 5
scripts/fetch_new_arp.pl

@@ -16,11 +16,11 @@ use Net::Patricia;
 use Data::Dumper;
 use Date::Parse;
 use Socket;
-use Rstat::config;
-use Rstat::main;
-use Rstat::net_utils;
-use Rstat::snmp;
-use Rstat::mysql;
+use eyelib::config;
+use eyelib::main;
+use eyelib::net_utils;
+use eyelib::snmp;
+use eyelib::mysql;
 use NetAddr::IP;
 use Fcntl qw(:flock);
 use Parallel::ForkManager;

+ 3 - 3
scripts/garbage.pl

@@ -12,9 +12,9 @@ use lib "$Bin/";
 use strict;
 use DBI;
 use Date::Parse;
-use Rstat::config;
-use Rstat::mysql;
-use Rstat::net_utils;
+use eyelib::config;
+use eyelib::mysql;
+use eyelib::net_utils;
 use DateTime;
 use Fcntl qw(:flock);
 

+ 4 - 4
scripts/parse_flow.pl

@@ -16,10 +16,10 @@ use Net::Patricia;
 use Data::Dumper;
 use Date::Parse;
 use Socket;
-use Rstat::config;
-use Rstat::main;
-use Rstat::net_utils;
-use Rstat::mysql;
+use eyelib::config;
+use eyelib::main;
+use eyelib::net_utils;
+use eyelib::mysql;
 use Parallel::ForkManager;
 
 if (!$ARGV[0]) { exit 110; }

+ 4 - 4
scripts/print-dnsmasq.pl

@@ -15,10 +15,10 @@ use Time::Local;
 use Net::Patricia;
 use NetAddr::IP;
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
-use Rstat::mysql;
-use Rstat::net_utils;
+use eyelib::config;
+use eyelib::main;
+use eyelib::mysql;
+use eyelib::net_utils;
 use File::Basename;
 use File::Path;
 use Fcntl qw(:flock);

+ 6 - 6
scripts/set_port_descr.pl

@@ -13,12 +13,12 @@ use strict;
 use Time::Local;
 use FileHandle;
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
-use Rstat::net_utils;
-use Rstat::mysql;
-use Rstat::snmp;
-use Rstat::cmd;
+use eyelib::config;
+use eyelib::main;
+use eyelib::net_utils;
+use eyelib::mysql;
+use eyelib::snmp;
+use eyelib::cmd;
 use Net::SNMP qw(:snmp);
 use Fcntl qw(:flock);
 no if $] >= 5.018, warnings =>  "experimental::smartmatch";

+ 4 - 4
scripts/stat-sync.pl

@@ -10,10 +10,10 @@ use base;
 use FindBin '$Bin';
 use lib "$Bin/";
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
-use Rstat::mysql;
-use Rstat::net_utils;
+use eyelib::config;
+use eyelib::main;
+use eyelib::mysql;
+use eyelib::net_utils;
 use strict;
 use warnings;
 use Getopt::Long;

+ 5 - 5
scripts/sync_mikrotik.pl

@@ -13,13 +13,13 @@ use strict;
 use Time::Local;
 use FileHandle;
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
-use Rstat::cmd;
+use eyelib::config;
+use eyelib::main;
+use eyelib::cmd;
 use Net::Patricia;
 use Date::Parse;
-use Rstat::net_utils;
-use Rstat::mysql;
+use eyelib::net_utils;
+use eyelib::mysql;
 use DBI;
 use Fcntl qw(:flock);
 use Parallel::ForkManager;

+ 3 - 3
scripts/syslog-stat.pl

@@ -12,9 +12,9 @@ use lib "$Bin";
 use strict;
 use Time::Local;
 use FileHandle;
-use Rstat::config;
-use Rstat::main;
-use Rstat::mysql;
+use eyelib::config;
+use eyelib::main;
+use eyelib::mysql;
 use Data::Dumper;
 use DBI;
 use Time::Local;

+ 4 - 4
updates/2-4-1/migrate_mac_vendors.pl

@@ -8,10 +8,10 @@ use utf8;
 use FindBin '$Bin';
 use lib "$Bin/";
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
-use Rstat::mysql;
-use Rstat::net_utils;
+use eyelib::config;
+use eyelib::main;
+use eyelib::mysql;
+use eyelib::net_utils;
 use strict;
 use warnings;
 

+ 4 - 4
updates/2-4-1/upgrade-to-2.4.pl

@@ -8,10 +8,10 @@ use utf8;
 use FindBin '$Bin';
 use lib "$Bin/";
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
-use Rstat::mysql;
-use Rstat::net_utils;
+use eyelib::config;
+use eyelib::main;
+use eyelib::mysql;
+use eyelib::net_utils;
 use strict;
 use warnings;
 

+ 4 - 4
updates/2-4-12/upgrade-to-2-4-12.pl

@@ -8,10 +8,10 @@ use utf8;
 use FindBin '$Bin';
 use lib "$Bin/";
 use Data::Dumper;
-use Rstat::config;
-use Rstat::main;
-use Rstat::mysql;
-use Rstat::net_utils;
+use eyelib::config;
+use eyelib::main;
+use eyelib::mysql;
+use eyelib::net_utils;
 use strict;
 use warnings;