[UPC#441] test copy non base domain

eclipseo · Nov 27, 2017 · a177a1d · a177a1d
1 parent a99ca7c
commit a177a1d
Show file tree

Hide file tree

Showing 2 changed files with 32 additions and 1 deletion.
diff --git a/t/vm/45_vol_swap.t b/t/vm/45_vol_swap.t
@@ -40,7 +40,7 @@ sub test_domain_with_swap {
         name => new_domain_name
         ,user => user_admin
     );
-    is($clone->is_base,1);
+    is($clone->is_base,0);
 
     $clone2->start(user_admin);
     $clone2->shutdown_now(user_admin);

diff --git a/t/vm/c10_copy.t b/t/vm/c10_copy.t
@@ -156,6 +156,35 @@ sub test_copy_change_ram {
     $base->remove(user_admin);
 }
 
+sub test_copy_req_nonbase {
+    my $vm_name = shift;
+    my $domain = create_domain($vm_name);
+
+    my $name_copy = new_domain_name();
+
+    my $req;
+    eval { $req = Ravada::Request->clone(
+            id_domain => $domain->id
+               , name => $name_copy
+                , uid => user_admin->id
+        );
+    };
+    is($@,'') or return;
+    is($req->status(),'requested');
+    rvd_back->_process_all_requests_dont_fork();
+    is($req->status(),'done');
+    is($req->error,'');
+
+    my $copy = rvd_back->search_domain($name_copy);
+    ok($copy,"[$vm_name] Expecting domain $name_copy");
+
+    is($domain->is_base,1);
+
+    $copy->remove(user_admin);
+    $domain->remove(user_admin);
+
+}
+
 ##########################################################################3
 
 clean();
@@ -182,6 +211,8 @@ for my $vm_name ('Void', 'KVM') {
         test_copy_request($vm_name);
 
         test_copy_change_ram($vm_name);
+
+        test_copy_req_nonbase($vm_name);
     }
 
 }