From dad764bc84d371ffc775e66b942ecbbc59f05c8e Mon Sep 17 00:00:00 2001 From: Jon Robertson Date: Tue, 26 Jan 2010 14:45:40 -0800 Subject: Added way to clean things during a fork for kadmin The MIT kadmin module currently directly runs the MIT kadmin program. Some data needs to be cleaned during the forks for this. This provides a callback that can be registered and is called during the fork process, currently just to mark database handles inactive. It was added to both the MIT and Heimdal modules, though it's only a stub in the Heimdal module. Heimdal is not forking kadmin, but the stub is there in order to allow the caller to not care which module is being used and just always register the callbacks. --- perl/Wallet/Kadmin/Heimdal.pm | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'perl/Wallet/Kadmin/Heimdal.pm') diff --git a/perl/Wallet/Kadmin/Heimdal.pm b/perl/Wallet/Kadmin/Heimdal.pm index 9c2805b..b0010a5 100644 --- a/perl/Wallet/Kadmin/Heimdal.pm +++ b/perl/Wallet/Kadmin/Heimdal.pm @@ -39,6 +39,11 @@ sub error { return $self->{error}; } +# Set a callback to be called for forked kadmin processes. This does nothing +# for Heimdal, as we're not forking anything, but remains for compatibility +# with the MIT kadmin module. +sub fork_callback { } + ############################################################################## # kadmin Interaction ############################################################################## -- cgit v1.2.3