require ROOT_PATH . 'inc-upgrade.php';
}
if (PATH_COUNT == 1 && !ACTION) {
// URL: /phenotypes
// Not supported, forward user to disease-specific overview.
header('Location: ' . lovd_getInstallURL() . $_PE[0] . '/disease');
exit;
}
if (PATH_COUNT == 2 && $_PE[1] == 'disease' && !ACTION) {
// URL: /phenotypes/disease
// Present users the list of diseases to choose from, to view the phenotype entries for this disease.
define('PAGE_TITLE', 'Select a disease to view all phenotype entries');
$_T->printHeader();
$_T->printTitle();
require ROOT_PATH . 'class/object_diseases.php';
$_DATA = new LOVD_Disease();
$sViewListID = 'Diseases_for_Phenotype_VL';
$_GET['search_phenotypes'] = '!0';
$_DATA->setRowLink($sViewListID, CURRENT_PATH . '/' . $_DATA->sRowID);
$_DATA->viewList($sViewListID);
$_T->printFooter();
exit;
}
if (PATH_COUNT == 3 && $_PE[1] == 'disease' && ctype_digit($_PE[2]) && !ACTION) {
// URL: /phenotypes/disease/00001
// View all phenotype entries for a certain disease.
$nDiseaseID = sprintf('%05d', $_PE[2]);
define('PAGE_TITLE', 'View phenotypes for disease #' . $nDiseaseID);
$_T->printHeader();
$_T->printTitle();
require ROOT_PATH . 'class/object_phenotypes.php';
print '</FORM>' . "\n\n";
$_T->printFooter();
exit;
}
if (PATH_COUNT == 2 && ctype_digit($_PE[1]) && ACTION == 'delete') {
// URL: /diseases/00001?delete
// Delete specific entry.
$nID = sprintf('%05d', $_PE[1]);
define('PAGE_TITLE', 'Delete disease information entry #' . $nID);
define('LOG_EVENT', 'DiseaseDelete');
if ($nID == '00000') {
$nID = -1;
}
lovd_isAuthorized('disease', $nID);
require ROOT_PATH . 'class/object_diseases.php';
$_DATA = new LOVD_Disease();
$zData = $_DATA->loadEntry($nID);
if ($_AUTH['level'] == LEVEL_CURATOR) {
$bDelete = true;
foreach ($zData['genes'] as $sGene) {
if (!in_array($sGene, $_AUTH['curates'])) {
$bDelete = false;
break;
}
}
if (!$bDelete) {
// Curator has no delete rights, throw him out.
lovd_requireAUTH(LEVEL_MANAGER);
}
} else {
// Require manager clearance.
