showosinfo.php3 2.32 KB
Newer Older
1
<?php
Leigh Stoller's avatar
Leigh Stoller committed
2
#
3
# Copyright (c) 2000-2014 University of Utah and the Flux Group.
4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22
# 
# {{{EMULAB-LICENSE
# 
# This file is part of the Emulab network testbed software.
# 
# This file is free software: you can redistribute it and/or modify it
# under the terms of the GNU Affero General Public License as published by
# the Free Software Foundation, either version 3 of the License, or (at
# your option) any later version.
# 
# This file is distributed in the hope that it will be useful, but WITHOUT
# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
# FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Affero General Public
# License for more details.
# 
# You should have received a copy of the GNU Affero General Public License
# along with this file.  If not, see <http://www.gnu.org/licenses/>.
# 
# }}}
Leigh Stoller's avatar
Leigh Stoller committed
23
#
24
include("defs.php3");
25
include_once("osinfo_defs.php");
26 27

#
28
# Only known and logged in users.
29
#
30 31 32
$this_user = CheckLoginOrDie();
$uid       = $this_user->uid();
$isadmin   = ISADMIN();
33 34

#
35 36 37
# Verify page arguments.
#
$reqargs = RequiredPageArguments("osinfo", PAGEARG_OSINFO);
38 39

#
Leigh Stoller's avatar
Leigh Stoller committed
40
# Verify permission.
41
#
42 43
if (!$osinfo->AccessCheck($this_user, $TB_OSID_READINFO)) {
    USERERROR("You do not have permission to access this OS Descriptor!", 1);
44
}
45
$osid = $osinfo->osid();
46 47 48 49 50 51
$osname = $osinfo->osname();

#
# Standard Testbed Header
#
PAGEHEADER("OSID $osname");
52

53
SUBPAGESTART();
54
SUBMENUSTART("OSID Options");
55 56 57 58 59
#
# Delete from the image descriptor when its an EZ image.
#
if ($osinfo->ezid()) {
    $fooid = rawurlencode($osinfo->osid());
60 61
    WRITESUBMENUBUTTON("Clone this OS Descriptor",
		       "newimageid_ez.php3?baseimage=$fooid");
62 63 64 65 66 67
    WRITESUBMENUBUTTON("Delete this OS Descriptor",
		       "deleteimageid.php3?imageid=$fooid");
}
else {
    WRITESUBMENUBUTTON("Delete this OS Descriptor",
		       CreateURL("deleteosid", $osinfo));
68
}
Leigh Stoller's avatar
Leigh Stoller committed
69
WRITESUBMENUBUTTON("Image Descriptor list",
70
		   "showimageid_list.php3");
71 72 73
if ($isadmin) {
    WRITESUBMENUBUTTON("OS Descriptor list",
		       "showosid_list.php3");
74 75
    WRITESUBMENUBUTTON("Create a new Image Descriptor",
		       "newimageid_ez.php3");
76 77 78 79
    WRITESUBMENUBUTTON("Create a new OS Descriptor",
		       "newosid.php3");
}

80
SUBMENUEND();
81
echo "<br><br>\n";
82

83 84 85
#
# Dump os_info record.
# 
86 87
$osinfo->Show();
$osinfo->ShowExperiments($this_user);
88
SUBPAGEEND();
89 90 91 92 93 94

#
# Standard Testbed Footer
# 
PAGEFOOTER();
?>