Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
emulab-devel
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Issues
143
Issues
143
List
Boards
Labels
Service Desk
Milestones
Merge Requests
6
Merge Requests
6
Operations
Operations
Incidents
Analytics
Analytics
Repository
Value Stream
Wiki
Wiki
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Commits
Issue Boards
Open sidebar
emulab
emulab-devel
Commits
406ede7c
Commit
406ede7c
authored
Aug 31, 2015
by
Leigh B Stoller
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Minor bug fixes.
parent
092bfa86
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
9 additions
and
7 deletions
+9
-7
protogeni/lib/GeniCMV2.pm.in
protogeni/lib/GeniCMV2.pm.in
+9
-7
No files found.
protogeni/lib/GeniCMV2.pm.in
View file @
406ede7c
...
...
@@ -3010,13 +3010,12 @@ sub TriggerImageUpdate($)
"Internal error getting most current image"
)
if
(
!defined($currentimage));
#
Better
be
the
same
,
or
something
is
out
of
whack
.
if
($
localimage
->
version
()
!= $currentimage->version()) {
return
GeniResponse
->
Create
(
GENIRESPONSE_REFUSED
,
undef
,
"Image version mismatch"
);
}
#
#
The
snapshot
might
not
be
of
the
most
recent
version
of
the
image
,
#
but
at
the
moment
we
are
not
worry
about
the
parent
/
child
relationships
,
#
as
we
do
for
provenance
.
Need
to
at
some
point
cause
of
deltas
#
my
$
imageid
=
$
localimage
->
imageid
();
my
$
version
=
$
localimage
->
version
();
#
#
Are
we
still
in
an
update
?
If
so
,
return
an
error
to
the
caller
.
...
...
@@ -3625,7 +3624,10 @@ sub CreateDataset($)
#
Only
real
local
users
can
do
blockstores
,
or
the
credential
#
must
include
the
correct
priv
.
#
my
$
user
=
GeniUser
->
Lookup
($
credential
->
owner_cert
()->
urn
(),
1
);
my
$
user
=
GeniCM
::
CreateUserFromCertificate
($
credential
);
return
$
user
if
(
GeniResponse
::
IsResponse
($
user
));
return
GeniResponse
->
Create
(
GENIRESPONSE_FORBIDDEN
)
if
(
! ((defined($user) && $user->IsLocal()) ||
$
credential
->
HasActualPrivilege
(
"blockstores"
)));
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment