From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Mon, 11 Jul 2011 16:31:18 +0000 (+0200)
Subject: expire LDAP and CRM entries after 15 min
X-Git-Url: http://git.rot13.org/?a=commitdiff_plain;h=8b12a96c600b951f3fdf2e63f073eb13c47cac7e;p=APKPM.git

expire LDAP and CRM entries after 15 min
---

diff --git a/lib/APKPM/CRM.pm b/lib/APKPM/CRM.pm
index 53424c5..1d18d04 100644
--- a/lib/APKPM/CRM.pm
+++ b/lib/APKPM/CRM.pm
@@ -42,7 +42,9 @@ sub search : Job : Encode(e_json_encode) {
 
 	my $redis = Redis->new;
 	map {
-		$redis->set( 'CRM.' . $_->{USERNAME} => $self->e_json($_) );
+		my $key = 'CRM.' . $_->{USERNAME};
+		$redis->set( $key => $self->e_json($_) );
+		$redis->expire( $key => 15 * 60 );
 	} @{ $resp->value->[0] };
 
 	return ref $resp ? $resp->value->[0] : { error => $resp };
diff --git a/lib/APKPM/LDAP.pm b/lib/APKPM/LDAP.pm
index f734ec2..2dbad19 100644
--- a/lib/APKPM/LDAP.pm
+++ b/lib/APKPM/LDAP.pm
@@ -58,7 +58,11 @@ sub search : Job : Encode(e_json) : MinProcesses(0) {
 			}
 		}
 		push @$entries, $e;
-		$redis->set( 'LDAP.' . $e->{cn} => $self->e_json($e) );
+
+		my $key = 'LDAP.' . $e->{cn};
+		$redis->set( $key => $self->e_json($e) );
+		$redis->expire( $key => 15 * 60 );
+
 	}
 #	warn "## entries = ",dump $entries;
 	return $entries;