Discussion :

[Oli_Ifre]

Bonjour !
J'aurais voulu savoir si ce module pouvait etre utilisé pour ajouter des fichiers ldif sur mon serveur LDAP.
Car d'apres ce que j'ai lu de la doc, il faut toujours donner tous les attributs lors d'un ajout.

J'ai aussi regardé le module Net::LDAP::LDIF, mais je comprend pas trop comment effectuer l'ajout avec cette méthode.

Si quelqu'un peut m'eclairer, je l en remercie

[Jedai]

C'est très simple, en fait il te suffit de te connecter à ton serveur LDAP, puis d'utiliser le code d'example de Net::LDAP::LDIF pour obtenir les entrée à ajouter :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
# connection à ton serveur, disons dans $ldap_server
 
 use Net::LDAP::LDIF;
 
 $ldif = Net::LDAP::LDIF->new( "file.ldif", "r", onerror => 'undef' );
 while( not $ldif->eof ( ) ) {
   $entry = $ldif->read_entry ( );
   if ( $ldif->error ( ) ) {
     print "Error msg: ", $ldif->error ( ), "\n";
     print "Error lines:\n", $ldif->error_lines ( ), "\n";
   } else {
     # do stuff : ICI TU AJOUTES LES ENTREES VALIDE A TON SERVEUR
     $ldap_server->add( $entry );
   }
 }
 $ldif->done ( );
 
# déconnexion

Pour que ce soit plus clair, je te conseille d'en faire une fonction.

--
Jedaï

[Oli_Ifre]

merci Jedai !
Juste une derniere petite question ^^

G le message d'erreur qui apparait :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Can't call method "eof" on an undefined value

et j'ai codé de la facon suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
$ldif = Net::LDAP::LDIF->new( FICHIER, "r", onerror => 'undef' );
	while( not $ldif->eof () ) {
		$entry = $ldif->read_entry ();
		if ( $ldif->error ( ) ) {
		print "Error msg: ", $ldif->error (), "\n";
		print "Error lines:\n", $ldif->error_lines (), "\n";
		}

"FICHIER" provient de la commande suivante, executée au début de mon programme :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

open (FICHIER, ">/tmp/$$.ldif");

et je fais un close(FICHIER) après m'etre déconnécté de LDAP.
Je pense que l'erreur vient de là, mais je suis pas bien sur ^^

merci de ton aide

[Jedai]

Tu ne peux pas utiliser un handle de fichier ouvert en écriture pour lire ton fichier !!
Utilise plutôt :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

$ldif = Net::LDAP::LDIF->new( "/tmp/$$.ldif", "r", onerror => 'undef' );

Et ferme FICHIER avant.

--
Jedaï

[Oli_Ifre]

Nickel !!
Merci pour les réponses