1# OpenXPKI::Server::Workflow::Activity::NICE::UnrevokeCertificate 2# Written by Oliver Welter for the OpenXPKI Project 2011 3# Copyright (c) 2011 by The OpenXPKI Project 4 5package OpenXPKI::Server::Workflow::Activity::NICE::UnrevokeCertificate; 6 7use strict; 8use base qw( OpenXPKI::Server::Workflow::Activity ); 9 10use OpenXPKI::Server::Context qw( CTX ); 11use OpenXPKI::Exception; 12use OpenXPKI::Debug; 13use OpenXPKI::Serialization::Simple; 14 15use OpenXPKI::Server::NICE::Factory; 16 17use Data::Dumper; 18 19sub execute { 20 my $self = shift; 21 my $workflow = shift; 22 23 ##! 32: 'context: ' . Dumper( $workflow->context() ) 24 25 my $nice_backend = OpenXPKI::Server::NICE::Factory->getHandler( $self ); 26 my $cert_identifier = $self->param('cert_identifier') || $context->param('cert_identifier'); 27 28 CTX('log')->application()->info("start cert unrevoke for cert $cert_identifier, workflow " . $workflow->id); 29 30 my $param = $self->param(); 31 delete $param->{'cert_identifier'}; 32 $nice_backend->unrevokeCertificate( $cert_identifier, $param ); 33 34} 35 361; 37__END__ 38 39=head1 Name 40 41OpenXPKI::Server::Workflow::Activity::NICE::UnrevokeCertificate; 42 43=head1 Description 44 45Unrevoke a certificate using the configured NICE backend. 46 47See L<OpenXPKI::Server::NICE/unrevokeCertificate> for details 48 49=head1 Parameters 50 51=head2 Input 52 53=over 54 55=item cert_identifier - identifier of the certificate 56 57=back 58