Topic: Envoi d'alerte pour les toner

Bonjour,

Lorsque le niveau d'un toner descend jusqu'à un certain seuil, y a-t-il un moyen pour que glpi ou fusioninventory envoi un mail d'alerte? Si oui, comment on fait?

Merci d'avance.

glpi = 0.72.4
fusioninventory = 2.2.2

Re: Envoi d'alerte pour les toner

Non ce n'est pas code encore

Co-leader, official developper
DCS official PARTNER: dcs.glpi@dcsit-group.com

Re: Envoi d'alerte pour les toner

OK, d'accord. tant pis.

Ca sera dans la prochaine version?

Re: Envoi d'alerte pour les toner

Avec la charge de taf pour la 2.3.0, c'est plutot planifié pour la 2.4.0 sauf si c'est financé, ca peut être intégré dans la 2.3.0. Voici le ticket : http://forge.fusioninventory.org/issues/566

Co-leader, official developper
DCS official PARTNER: dcs.glpi@dcsit-group.com

Re: Envoi d'alerte pour les toner

Je me suis fait un petit script sous perl qui va interroger la base glpi et envoyer un mail contenant la liste des imprimantes qui ont le niveau d'un toner en-dessous d'un certain niveau.

Au cas ou ca peut intéresser quelqu'un...

###########################################################
#!/usr/bin/perl

use Net::SMTP;
use DBI;
use strict;

my $database = "glpi";
my $server = "localhost";
my $login = "root";
my $mdp = "xxxxxxx";
my $seuil = 5;
my $server_smtp = "srv-mail";
my $server_port = "25";
my $From = 'srv-glpi@domain.local';
my $To = 'alerte@domain.local';

my $dsn = "DBI:mysql:database=$database;host=$server";
my $dbh = DBI->connect($dsn, $login, $mdp) or die "Echec connexion";

my $requete = "SELECT glpi_plugin_fusioninventory_printers_cartridges.object_name, glpi_plugin_fusioninventory_printers_cartridges.state, glpi_printers.name, glpi_printers.serial, glpi_printers.comments
FROM glpi_plugin_fusioninventory_printers_cartridges, glpi_printers
WHERE glpi_plugin_fusioninventory_printers_cartridges.FK_printers = glpi_printers.ID AND glpi_plugin_fusioninventory_printers_cartridges.state < $seuil";

my $sth = $dbh->prepare($requete);
$sth->execute();

my $liste = "Voici la liste des toners sur les imprimantes reseaux qui sont en-dessous du seuil de $seuil%\n\n\n";
my $nom;
my $etat;
my $toner;
my $serial;
my $comment;
while(my @row = $sth->fetchrow_array){
        $nom = "nom: ".$row['2']."\n";
        $etat = "niveau de la cartouche: ".$row['1']."\n";
        $toner = "toner: ".$row['0']."\n";
        $serial = "numero de serie: ".$row['3']."\n";
        $comment = "commentaire: ".$row['4']."\n";
        $liste = $liste.$nom.$serial.$comment.$toner.$etat."\n";
}

$liste = $liste."Veuillez verifier le stock des toners.\n";

$sth -> finish;
$dbh -> disconnect;

# Connexion au serveur SMTP et envoie le mail
my $smtp = Net::SMTP->new("$server_smtp", Port=>$server_port) or die "Erreur de connexion au serveur $server_smtp";
$smtp->mail($From);
$smtp->to($To);
$smtp->data();
$smtp->datasend("From: $From\n");
$smtp->datasend("To: $To\n");
$smtp->datasend("subject: Alerte sur les toners des imprimantes reseaux\n");
$smtp->datasend("\n");
$smtp->datasend("$liste");
$smtp->dataend();
$smtp->quit;
####################################################

Re: Envoi d'alerte pour les toner

Bonjour,
Désolé de déterrer ce vieux post mais est ce que cette fonctionnalité a été impliqué depuis dans fusion?
Si oui, est-il possible d'avoir une procédure à suivre?
Merci à vous.