Différences

Ci-dessous, les différences entre deux révisions de la page.

--- tuto:ipasserelle:divers:scripts_dokuwiki [25/05/2016 19:13]
dani
+++ tuto:ipasserelle:divers:scripts_dokuwiki [06/06/2017 19:09]
dani
@@ Ligne 2: / Ligne 2: @@
 Voilà quelques scripts qui permettent de générer des tableaux au format dokuwiki:
+  * Génère un tableau des comptes utilisateurs
+<file perl users.pl>
+#!/usr/bin/perl -w
+use strict;
+use esmith::AccountsDB;
+use esmith::ConfigDB;
+my $a = esmith::AccountsDB->open_ro() || die "Couldn't open the accounts database";
+my $c = esmith::ConfigDB->open_ro() || die "Couldn't open the configuration database";
+my $main_dom = $c->get('DomainName')->value;
+print '^ Identifiant ^ Nom ^ Prénom ^ Adresse email principale ^' . "\n";
+print '|' . $_->key . ' |' . $_->prop('LastName') .
+     ' |' . $_->prop('FirstName') . ' |' . ($_->prop('PreferredMail') || $_->key . '@' . $main_dom) .
+      "|\n"
+  foreach ($a->users);
+</file>
   * Génère un tableau de tous les dossiers partagés (smeserver-shared-folders et ibays), avec la liste des groupes ayant accès en lecture ou en écriture