From af5af28b6a27fa199d7383cb0bd57974e7c00ec0 Mon Sep 17 00:00:00 2001 From: Anton Horodchuk Date: Thu, 7 Mar 2019 16:57:36 +0200 Subject: [PATCH 1/2] Configurations can be created by users with "@" sign in a name. --- META-INF/plugin.xml | 2 +- dev/build.sh | 2 +- .../steps/createAndAttachCredential.pl | 8 ++++---- pages/help.xml | 9 ++++++--- 4 files changed, 12 insertions(+), 9 deletions(-) diff --git a/META-INF/plugin.xml b/META-INF/plugin.xml index 05f7dea..190cbdb 100644 --- a/META-INF/plugin.xml +++ b/META-INF/plugin.xml @@ -9,5 +9,5 @@ EC-Docker ec_config - 1.5.0 + 1.5.1 diff --git a/dev/build.sh b/dev/build.sh index 93e1368..201efd2 100644 --- a/dev/build.sh +++ b/dev/build.sh @@ -17,5 +17,5 @@ if [ $DEPLOY -eq 1 ]; then echo "Installing plugin ..." ectool --server localhost login admin changeme ectool installPlugin ./EC-Docker.jar --force 1 - ectool promotePlugin EC-Docker-1.2.0 + ectool promotePlugin EC-Docker-1.5.1 fi \ No newline at end of file diff --git a/dsl/procedures/createConfiguration/steps/createAndAttachCredential.pl b/dsl/procedures/createConfiguration/steps/createAndAttachCredential.pl index 6622524..19145b3 100644 --- a/dsl/procedures/createConfiguration/steps/createAndAttachCredential.pl +++ b/dsl/procedures/createConfiguration/steps/createAndAttachCredential.pl @@ -26,17 +26,17 @@ }; ## get an EC object -my $ec = new ElectricCommander(); +my $ec = ElectricCommander->new(); $ec->abortOnError(0); -my $credName = "$[/myJob/config]"; +my $credName = '$[/myJob/config]'; my $xpath = $ec->getFullCredential("credential"); my $errors = $ec->checkAllErrors($xpath); my $clientID = $xpath->findvalue("//userName"); my $clientSecret = $xpath->findvalue("//password"); -my $projName = "$[/myProject/projectName]"; +my $projName = '$[/myProject/projectName]'; # Create credential $ec->deleteCredential($projName, $credName); @@ -49,7 +49,7 @@ $errors .= $ec->checkAllErrors($xpath); # Give job launcher full permissions on the credential -my $user = "$[/myJob/launchedByUser]"; +my $user = '$[/myJob/launchedByUser]'; $xpath = $ec->createAclEntry("user", $user, {projectName => $projName, credentialName => $credName, diff --git a/pages/help.xml b/pages/help.xml index 4604a18..3a6a194 100644 --- a/pages/help.xml +++ b/pages/help.xml @@ -14,7 +14,7 @@

@PLUGIN_KEY@

Plugin version @PLUGIN_VERSION@

-

Revised on December 07, 2018

+

Revised on March 06, 2019


Contents

@@ -1051,11 +1051,14 @@ For more information on docker networking, see Release Notes +

@PLUGIN_KEY@ 1.5.1

+ +

@PLUGIN_KEY@ 1.5.0

@PLUGIN_KEY@ 1.4.0

From ed7923bd2b9b1f494f96ea2c3465cfa6aa7f93f8 Mon Sep 17 00:00:00 2001 From: Anton Horodchuk Date: Thu, 7 Mar 2019 20:33:48 +0200 Subject: [PATCH 2/2] Fixed deleting all configurations when DeleteConfiguration is called with empty value. --- .../steps/deleteConfiguration.pl | 17 ++++++++++++----- 1 file changed, 12 insertions(+), 5 deletions(-) diff --git a/dsl/procedures/deleteConfiguration/steps/deleteConfiguration.pl b/dsl/procedures/deleteConfiguration/steps/deleteConfiguration.pl index 7c48c59..784c5f9 100644 --- a/dsl/procedures/deleteConfiguration/steps/deleteConfiguration.pl +++ b/dsl/procedures/deleteConfiguration/steps/deleteConfiguration.pl @@ -15,10 +15,17 @@ # use ElectricCommander; +my $ec = ElectricCommander->new(); +my $config = '$[config]'; -my $ec = new ElectricCommander(); -my $configName = "$[config]"; +if (!defined $config || $config eq "" ) { + my $errMsg = "config parameter must exist and be non-blank"; + print $errMsg . "\n"; + $ec->setProperty("/myJob/configError", $errMsg); + exit 1; +} -$ec->deleteProperty("/myProject/ec_plugin_cfgs/$[config]"); -$ec->deleteCredential("$[/myProject/projectName]", $configName); -exit 0; +$ec->deleteProperty("/myProject/ec_plugin_cfgs/$config"); +$ec->deleteCredential('$[/myProject/projectName]', $config); + +exit 0; \ No newline at end of file