v2.4.22.1

delphix · Apr 8, 2024 · 92c6896 · 92c6896
2 parents 55a1535 + 93aa30c
commit 92c6896
Show file tree

Hide file tree

Showing 4 changed files with 19 additions and 5 deletions.
diff --git a/CHANGELOG.md b/CHANGELOG.md
@@ -1,3 +1,9 @@
+## 2.4.22.1
+
+### Changes
+- Fix to support backupuuid in dx_snapshot_db
+- Fix to support dots in the user names while using @DOMAIN or @SYSTEM
+
 ## 2.4.22
 
 ### Added

diff --git a/lib/Engine.pm b/lib/Engine.pm
@@ -950,7 +950,8 @@ sub login {
   my $domain;
   my %mylogin;
 
-  if (($domain) = $user =~ /(\w+)@(\w+)/) {
+  # allows dots in the user name when specified with domain or SYSTEM
+  if (($domain) = $user =~ /([\w\.]+)@(\w+)/) {
     if (uc $2 eq "DOMAIN") {
       $domain = "DOMAIN";
       $user = $1;

diff --git a/lib/MSSQLVDB_obj.pm b/lib/MSSQLVDB_obj.pm
@@ -293,9 +293,16 @@ sub snapshot
           # backupUUID: (required)
 
           if ( $frombackup eq "yes" ) {
-            %snapshot_type = (
-                "type" => "MSSqlExistingMostRecentBackupSyncParameters"
-            );
+            if (defined($uuid)) {
+              %snapshot_type = (
+                  "type" => "MSSqlExistingSpecificBackupSyncParameters",
+                  "backupUUID" => $uuid
+              );
+            } else {
+              %snapshot_type = (
+                  "type" => "MSSqlExistingMostRecentBackupSyncParameters"
+              );
+            }
           } else {
 
             if ($self->getStagingPush() eq 'yes') {

diff --git a/lib/Toolkit_helpers.pm b/lib/Toolkit_helpers.pm
@@ -29,7 +29,7 @@ use File::Spec;
 
 use lib '../lib';
 
-our $version = '2.4.22';
+our $version = '2.4.22.1';
 
 my $tz = new Date::Manip::TZ;
 my $dt = new Date::Manip::Date;