Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
emulab
emulab-devel
Commits
47ee8b7f
Commit
47ee8b7f
authored
Feb 08, 2010
by
Srikanth Chikkulapelly
Browse files
handling admin credentials
parent
9b94a0f4
Changes
1
Hide whitespace changes
Inline
Side-by-side
protogeni/lib/GeniCMV2.pm.in
View file @
47ee8b7f
...
...
@@ -571,6 +571,21 @@ sub SliverAction($$$$)
#
For
now
,
only
allow
top
level
aggregate
or
the
slice
#
my
($
slice
,
$
aggregate
)
=
Credential2SliceAggregate
($
credential
);
#
find
out
the
component
manager
URN
.
my
$
cm_urn
=
GeniHRN
::
Generate
($
OURDOMAIN
,
"authority"
,
"cm"
);
if
((
!defined($slice)) && ($credential->target_urn() =~ "+authority+cm")) {
#
administrative
credentials
are
presented
.
if
($
cm_urn
!= $credential->target_urn() {
return
GeniResponse
->
Create
(
GENIRESPONSE_FORBIDDEN
(),
undef
,
"Credential target does not match CM URN"
);
}
if
(
!defined($slice_urn)){
return
GeniResponse
->
MalformedArgsResponse
(
"Missing arguments"
);
}
$
slice
=
GeniSlice
->
Lookup
($
slice_urn
);
}
if
(
! (defined($slice) && defined($aggregate))) {
return
GeniResponse
->
Create
(
GENIRESPONSE_BADARGS
,
undef
,
"No slice or aggregate here"
);
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new 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