Changeset 28446 for trunk/Nebulous/lib

Timestamp:

Jun 23, 2010, 5:51:46 PM (16 years ago)

Author:

watersc1

Message:

Updates to add neb-migrate code, and to fix repeated "can't find device info" bug in nebdiskd.

File:

• trunk/Nebulous/lib/Nebulous/Client.pm (modified) (1 diff)

trunk/Nebulous/lib/Nebulous/Client.pm

@@ -790 +790 @@
 }
 
+sub find_ext_id_by_volume
+{
+    my $self = shift;
+    my ($vol_name, $limit) = validate_pos( @_,
+                                           { 
+                                               type => SCALAR,
+                                           },
+                                           {
+                                               type => SCALAR|UNDEF,
+                                               optional => 1,
+                                           },
+        );
+    
+    $log->debug( "entered - @_" );
+
+    my $response = $self->{ 'server' }->find_ext_id_by_volume( $vol_name, $limit);
+    if ( $response->fault ) {
+        $self->set_err($response->faultstring);
+        if ($response->faultstring =~ /no instances on storage volume/) {
+            $log->debug( "leaving" );
+            return;
+        }
+
+        $log->logdie("unhandled fault - ", $self->err);
+    }
+
+    my $ext_ids = $response->result;
+    
+    $log->debug( "server found @$ext_ids" );
+    $log->debug( "leaving" );
+    
+    return($ext_ids);
+}
+
 sub find_instances_for_cull
 {