Script CGI(impossible d'ecrire dans un fichier)

**matt8-5** · 15/06/2006, 17h01

Bonjour,

je viens chercher un petit peu d'aide pour mes scripts CGI. mon but est d'écrire des donnés récupérés dans le fichier hosts.cfg
Pour ceci, j'ai donc :

1- donner les droits en ecriture au fichier chmod 777 /usr/local/nagios/etc/hosts.cfg

2-Ecris mon code :

#! /usr/bin/perl -w

use strict;
use CGI;
my $cgi=new CGI;

my $ippix=$cgi->param("ippix");
my $nompix=$cgi->param("nompix");
my $login=$cgi->param("login");
my $secret=$cgi->param("secret");
my $seuilmin=$cgi->param("seuilmin");
my $seuilmax=$cgi->param("seuilmax");

print "Content-type: text/html\n\n";

print "<html><head><title>Insertion d'un PIX</title></head><body>\n";

# # # hosts.cfg # # #
# Ouverture du fichier en écriture ajout
open(F,">>/usr/local/nagios/etc/hosts.cfg") or die "Erreur ouverture hosts.cfg : $!";
# Insertion du nouveau PIX dans le fichier de configuration nagios
print(F "define host{\n");
print(F "\tuse\t\t\tpix\n");
print(F "\thost_name\t\t".$nompix."\n");

# Fermeture du fichier
close F;

print "<H1>PIX Ins ".$nompix."</H1><br>\n";
print "</body></html>\n";

Résultat la ligne en rouge s'execute je vois à l'ecran "PIX Ins + le nom souhaité" mais la partie verte ne marche pas, il n'y a rien d'ajouter dans le fichier hosts.cfg, je ne comprend pas pourquoi????

Merci d'avance

**2Eurocents** · 15/06/2006, 17h11

Je n'y entends rien en écriture de scripts CGI/ModPerl/Web, mais il me paraîtrait normal qu'un script CGI ne puisse pas avoir accès à la totalité du système de fichier du serveur sur lequel il tourne ... tout au plus devrait il accéder à la sous-hiérarchie de son espace "privatif", son bac à sable ... Ce serait une préoccupation de sécurité élémentaire !

**matt8-5** · 15/06/2006, 17h20

Le programme fonctionnait très bien avan mais j'ai juste déplacer le repertoire je l'ai remis et plus rien ou presque ne fonctionne

**gerald2545** · 16/06/2006, 10h47

tu as un message d'erreur dans ton fichier de log du serveur web?
essaye de capturer l'erreur en englobant ton bout de code qui ne fonctionne pas avec un eval et fais afficher l'erreur $@

Script CGI(impossible d'ecrire dans un fichier)

Web Perl

Discussions similaires

Partager

Partager