Commit 67c8df09 authored by Clément OUDOT's avatar Clément OUDOT
Browse files

Possibility to exclude attributes in sessions conversion

parent 321be132
......@@ -23,11 +23,13 @@ our $VERSION = "2.0.12";
# -c: configuration file
# -r: rename attributes
# -i: ignore errors
# -x: exclude attributes
my $debug;
my $config_file;
my $ignore_errors;
my %rename;
my @exclude;
my $help;
my $nb_converted = 0;
my $nb_error = 0;
......@@ -38,6 +40,7 @@ GetOptions(
'config|c=s' => \$config_file,
'ignore-errors|i' => \$ignore_errors,
'rename|r=s' => \%rename,
'exclude|x=s' => \@exclude,
) or pod2usage(2);
pod2usage(
-exitval => 1,
......@@ -133,6 +136,16 @@ Lemonldap::NG::Common::Apache::Session->get_key_from_all_sessions(
}
}
if (@exclude) {
for my $excludekey (@exclude) {
if ( $entry->{$excludekey} ) {
print "Exclude $excludekey in session $id\n"
if $debug;
delete $entry->{$excludekey};
}
}
}
print "Processing session $id\n" if $debug;
my $s = Lemonldap::NG::Common::Session->new( {
storageModule => $backendTo->{backend},
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment