Changeset 41041
- Timestamp:
- Nov 5, 2019, 7:40:49 AM (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/eam_branches/ipp-20191011/Nebulous-Server/lib/Nebulous/Server.pm
r41014 r41041 17 17 use Cache::Memcached; 18 18 use DBI; 19 ## for gentoo: use Digest::SHA1 qw( sha1_hex ); 20 use Digest::SHA qw( sha1_hex ); 19 20 ## for gentoo: 21 use Digest::SHA1 qw( sha1_hex ); 22 23 ## for ubuntu: 24 # use Digest::SHA qw( sha1_hex ); 25 21 26 use Fcntl ':mode'; 22 27 use File::Basename qw( basename dirname fileparse ); … … 2091 2096 2092 2097 ## XXX this method is missing the alias deference section (see find_instances) 2098 ## if aliases are intended to be compute nodes in the same cabinet / site as 2099 ## the storage nodes, then this is not needed. 2093 2100 2094 2101 # the key's volume can't be validiated on input for this method so we have … … 2113 2120 unless ($rows > 0) { 2114 2121 $query->finish; 2115 die("no instances on storage volume or volume is not avai able for key: $key volume: $vol_name");2122 die("no instances on storage volume or volume is not available for key: $key volume: $vol_name"); 2116 2123 } 2117 2124 } else { … … 2136 2143 $db->rollback; 2137 2144 # handle soft volumes 2138 if (defined $vol_name and not defined $key->hard_volume) { 2145 # we need to call find_intances_for_cull here so the returned structure 2146 # is the same (find_instances just returns an array of strings) 2147 if (defined $vol_name and not defined $key->hard_volume and ($vol_name ne "any")) { 2139 2148 $log->debug("retrying with 'any' volume"); 2140 return $self->find_instances ($key->path, 'any');2149 return $self->find_instances_for_cull($key->path, 'any'); 2141 2150 } 2142 2151 $log->logdie("database error: $@");
Note:
See TracChangeset
for help on using the changeset viewer.
