arif/xcat-core
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Merge branch 'statelite'

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@8286 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
mxi1 2010-11-30 09:25:14 +00:00
parent 0d979c9caa
commit 9d2e5f5608
1 changed files with 14 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
xCAT-server/lib/xcat/plugins/statelite.pm
View File

@ -213,6 +213,19 @@ sub process_request {
my $listNew = $synclist[0];
# the directory/file in litefile table must be the absolute path ("/***")
foreach my $entry (@$listNew) {
my @tmp = split (/\s+/, $entry);
unless ($tmp[2] =~ m{^/}) {
$callback->({error=>[qq{ $tmp[2] is not one absolute path. }], errorcode=>[1]});
return;
}
if ($tmp[1] =~ m{con} and $tmp[2] =~ m{/$}) {
$callback->({error=>[qq{ $tmp[2] is directory, don't use "con" as its option }], errorcode=>[1]});
return;
}
}
my %hashNew = ();
if ( parseLiteFiles($listNew, \%hashNew) ) {
$callback->({error=>["parseLiteFiles failed for listNew!"]});
@ -224,6 +237,7 @@ sub process_request {
foreach my $entry (keys %hashNew) {
my @tmp = split (/\s+/, $entry);
my $f = $tmp[1];
if ($hashNew{$entry}) {
if ( $tmp[0] =~ m/ro$/ or $tmp[0] =~ m/con$/) {
$callback->({error=>[qq{the directory "$f" should not be with "ro" or "con" as its option}], errorcode=>[1]});