From 919d9677461d6d736c54c17267d282a004607631 Mon Sep 17 00:00:00 2001 From: salles Date: Wed, 26 Apr 2006 23:03:03 +0200 Subject: [PATCH] On ajoute un plugin pour apt-proxy darcs-hash:20060426210303-72cb0-db10d436f0a48222654dc733b3e0b7223197c1c6.gz --- munin/apt-proxy | 68 +++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 68 insertions(+) create mode 100755 munin/apt-proxy diff --git a/munin/apt-proxy b/munin/apt-proxy new file mode 100755 index 00000000..652d26f2 --- /dev/null +++ b/munin/apt-proxy @@ -0,0 +1,68 @@ +#!/usr/bin/perl -w +# +# Copyright (C) 2006 Rodolphe Quiedeville +# +# This program is free software; you can redistribute it and/or +# modify it under the terms of the GNU General Public License +# as published by the Free Software Foundation; version 2 dated June, +# 1991. +# +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with this program; if not, write to the Free Software +# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. +# +# If you improve this script please send your version to my email address +# with the copyright notice upgrade with your name. +# +# Plugin to monitor number of files in apt-proxy cache +# +# $Log: apt-proxy,v $ +# Revision 1.1 2006-04-26 21:03:03 salles +# On ajoute un plugin pour apt-proxy +# +# Revision 1.1 2006/03/28 21:04:01 rodo +# Created by Rodolphe Quiedeville +# +# Must run on aptproxy user or root +# +#%# family=apt-proxy +#%# capabilities=autoconf + +use strict; + +if ($ARGV[0] and $ARGV[0] eq "config") +{ + print "graph_title Files in apt-proxy cache\n"; + print "graph_args --base 1000 -l 0\n"; + print "graph_vlabel files\n"; + print "main.label main\n"; + print "main.info Packages in main\n"; + print "main.draw AREA\n"; + print "security.label security\n"; + print "security.info Packages in security\n"; + print "security.draw STACK\n"; + exit 0; +} + +my $cache = "/pubftp/apt-proxy/debian/pool/main "; +my $security = "/pubftp/apt-proxy/security/pool/updates/main "; + +open (HOME,"find $cache -type f | wc -l |"); +my $files = ; +close(HOME); + +open (HOME,"find $security -type f | wc -l |"); +my $files_secu = ; +close(HOME); + +chomp($files);chomp($files_secu); + +print "main.value ".$files."\n"; +print "security.value ".$files_secu."\n"; + +# vim:syntax=perl