New smuxi 0.7.2.2 RPMs for Fedora Core 12

What is Smuxi?

Smuxi is an irssi-inspired, flexible, user-friendly and cross-platform IRC client for sophisticated users, targeting the GNOME desktop.

Smuxi is based on the client-server model: The core application (engine) can be placed onto a server which is connected to the Internet around-the-clock; one or more frontends then connect to the core. This way, the connection to IRC can be kept up even when all frontends have been closed. The combination of screen and irssi served as example for this architecture.

Smuxi also supports the regular single application mode. This behaves like a typical IRC client; it doesn't need separate core management and utilizes a local engine that is used by the local frontend client.

So, and what is special about Smuxi?

New nini 1.1.0 RPM for Fedora Core 12

What is Nini?

Nini is an uncommonly powerful .NET configuration library designed to help build highly configurable applications quickly.

URL: http://nini.sourceforge.net/

You can find the new Nini RPMs for fc12 here:

Architecture: noarch

Architecture: SRPM

Enjoy!

What's your favorite distribution?

Network Appliance nfsops/stats aggregator

  1. #!/usr/bin/perl
  2. #
  3. # filerops: Gather statistics on NetApp filers
  4.  
  5. use strict;
  6. use warnings;
  7. use File::Basename;
  8. use Getopt::Long;
  9.  
  10. sub usage
  11. {
  12. my $script = basename($0);
  13. print <<USAGE
  14.  
  15. $script -f <filer> -i <minutes> <-n|-s> [-o]
  16.  
  17. -f <filer> filer to gather stats from
  18. -h this elite help menu, hack the planet
  19. -i <min> interval in minutes before gathering data
  20. -n gather nfsops statistics
  21. netapp: nfsstat
  22. -o show highest nfsops offender
  23. -s gather filer statistics
  24. netapp: stats
  25.  
  26. examples:
  27.  
  28. $script -f <filer> -i 10 -n
  29. $script -f <filer> -i 1 -n -s
  30. $script -f <filer> -i 5 -n -o -s
  31.  
  32.  
  33. NOTE: This script assumes ssh agent forwarding is enabled.
  34.  
  35.  
  36. USAGE
  37. ;
  38. exit 0;
  39. }
  40.  
  41. my $opts = {};
  42. GetOptions($opts,
  43. 'filer|f=s',
  44. 'help|h',
  45. 'interval|i=i',
  46. 'offender|o',
  47.  

Nagios check for log filesizes

  1. #!/usr/bin/perl
  2.  
  3. #
  4. # This is a very simple file size checking script. It scans all files in
  5. # a specified directory for files which pass the specified thresholds. The
  6. # default notifications are 4GB for warning, and 5GB for critical. Both
  7. # the thresholds and directory can be overwritten via the command line.
  8. #
  9. # Note that bz2, gz, and pid extensions are automatically ignored.
  10. #
  11. # $Id: check_local_logs,v 1.4 2007-08-28 22:26:05 taylor Exp $
  12. #
  13.  
  14. use warnings;
  15. use strict;
  16.  
  17. use File::Glob ':glob';
  18. use File::stat;
  19. use Getopt::Long;
  20.  
  21. my ($crit, $dir, $help, $warn);
  22.  
  23. GetOptions( 'c|crit=s' => \$crit,
  24. 'd|dir=s' => \$dir,
  25. 'h|help' => \$help,
  26. 'w|warn=s' => \$warn,
  27. );
  28.  
  29. sub stat_logs ($)
  30. {
  31.  
  32. my $log_dir = shift;
  33. my @glob = glob($log_dir .

RestartServices plugin patch for Spine Management

  1. --- /usr/lib/spine/Spine/Plugin/RestartServices.pm 2009-04-07 12:17:40.000000000 -0700
  2. +++ RestartServices.pm 2009-08-18 15:29:00.000000000 -0700
  3. @@ -48,10 +48,9 @@
  4. {
  5. my $c = shift;
  6. my $rval = 0;
  7. + my %rshash;
  8.  
  9. my $start_time = $c->getval('c_start_time');
  10. - my $service_bin = $c->getval('service_bin');
  11. -
  12. my $startup = $c->getvals('startup');
  13. my $restart_deps = $c->getvals('restart_deps');
  14. my $touch = File::Touch->new( no_create => 1 );
  15. @@ -68,22 +67,23 @@
  16.  
  17. foreach my $entry (@{$restart_deps})
  18. {
  19. - my ($service, $command, @file_dependancies);
  20. - my $take_action = 0;
  21. + my ($command, $key, $service);
  22. + my @file_dependancies;
  23. my @fields = split(/:/, $entry);
  24.  
  25. # Backwards compatibility with service-only restarts.
  26. # We'll assume that any restart dep which begins with
  27. # a "/" in field1 references a command rather than service.
  28. +
  29. if ($fields[0] =~ /\//)
  30. {
  31. + $service = undef;
  32. $command = sh
Syndicate content