<?php
/**
 * $Id$
 *
 * Business logic page that provides business logic for adding a folder (uses
 * addFolderUI.inc for HTML)
 *
 * The following form variables are expected:
 * o $fFolderID - id of the folder the user is currently in
 *
 * Copyright (c) 2003 Jam Warehouse http://www.jamwarehouse.com
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 * 
 * This program 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 General Public License for more details.
 * 
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *
 * @version $Revision$
 * @author Rob Cherry, Jam Warehouse (Pty) Ltd, South Africa
 * @package foldermanagement
 */

require_once("../../../../config/dmsDefaults.php");

KTUtil::extractGPC('fDocumentTypeID', 'fFolderID', 'fFolderName');

require_once("$default->fileSystemRoot/lib/foldermanagement/Folder.inc");
    
if (!checkSession()) {
    // Doesn't return anyway.  Just in case...
    exit(0);
}

require_once("$default->fileSystemRoot/lib/visualpatterns/PatternCustom.inc");

$oPatternCustom = & new PatternCustom();

if (!isset($fFolderID)) {
    require_once("$default->fileSystemRoot/presentation/webpageTemplate.inc");
    $oPatternCustom->setHtml("");
    $main->setCentralPayload($oPatternCustom);
    $main->setErrorMessage(_("No folder currently selected"));
    $main->render();
    exit(0);
}

//initialse a folder object
$oFolder = Folder::get($fFolderID);
require_once("$default->fileSystemRoot/lib/visualpatterns/PatternTableSqlQuery.inc");
require_once("$default->fileSystemRoot/lib/visualpatterns/PatternListBox.inc");
require_once("$default->fileSystemRoot/lib/foldermanagement/Folder.inc");
require_once("$default->fileSystemRoot/lib/foldermanagement/FolderDocTypeLink.inc");
require_once("$default->fileSystemRoot/lib/foldermanagement/PhysicalFolderManagement.inc");
require_once("$default->fileSystemRoot/lib/subscriptions/SubscriptionEngine.inc");
require_once("$default->fileSystemRoot/presentation/lookAndFeel/knowledgeTree/foldermanagement/folderUI.inc");
require_once("$default->fileSystemRoot/presentation/Html.inc");
require_once("addFolderUI.inc");

require_once(KT_LIB_DIR . '/permissions/permission.inc.php');
require_once(KT_LIB_DIR . '/permissions/permissionutil.inc.php');

// if (!Permission::userHasFolderWritePermission($oFolder)) {
$oPermission = KTPermission::getByName('ktcore.permissions.addFolder');
$oUser =& User::get($_SESSION['userID']);
KTPermissionUtil::userHasPermissionOnItem($oUser, $oPermission, $oFolder);
if (KTPermissionUtil::userHasPermissionOnItem($oUser, $oPermission, $oFolder) !== true) {
    //if the user doesn't have write permission for this folder,
    //give them only browse facilities
    require_once("$default->fileSystemRoot/presentation/webpageTemplate.inc");
    $oPatternCustom->setHtml(renderBrowsePage($fFolderID));
    $main->setCentralPayload($oPatternCustom);
    $main->setErrorMessage(_("You do not have permission to create new folders in this folder"));
    $main->setFormAction($_SERVER["PHP_SELF"] . "?fFolderID=$fFolderID");
    $main->render();
    exit(0);
}

if (!isset($fFolderName)) {
    require_once("$default->fileSystemRoot/presentation/webpageTemplate.inc");
   
    $oPatternCustom->setHtml(renderBrowseAddPage($fFolderID));
    $main->setCentralPayload($oPatternCustom);
    $main->setFormAction($_SERVER["PHP_SELF"] . "?fFolderID=$fFolderID");
    $main->setHasRequiredFields(true);
    $main->render();
    exit(0);
}

// a document type has been specified
if (!isset($fDocumentTypeID)) {
    //there are no document type assigned to this folder
    require_once("$default->fileSystemRoot/presentation/webpageTemplate.inc");
    $oPatternCustom->setHtml(renderBrowseAddPage($fFolderID));
    $main->setCentralPayload($oPatternCustom);
    $main->setErrorMessage(_("You did not specify a document type.  If there are no system document types, please contact a System Administrator."));
    $main->setFormAction($_SERVER["PHP_SELF"] . "?fFolderID=$fFolderID");
    $main->render();        		
    exit(0);
}

//check for illegal characters in the folder name

// strip slashes from the already EPGCS escaped form input
$sCheckFolderName = stripslashes($fFolderName);
if (!(strpos($sCheckFolderName, "\\") === false && strpos($sCheckFolderName, ">") === false &&
    strpos($sCheckFolderName, "<") === false && strpos($sCheckFolderName, ":") === false &&
    strpos($sCheckFolderName, "*") === false && strpos($sCheckFolderName, "?") === false &&
     strpos($sCheckFolderName, "|") === false && strpos($sCheckFolderName, "/") === false &&
     strpos($sCheckFolderName, "\"") === false)) {
    //the user entered an illegal character in the folder name
    require_once("$default->fileSystemRoot/presentation/webpageTemplate.inc");
    $oPatternCustom->setHtml(renderBrowseAddPage($fFolderID));
    $main->setCentralPayload($oPatternCustom);
    $main->setErrorMessage(_("Folder not created. Folder names may not contain: '<', '>', '*', '/', '\', '|', '?' or '\"' "));
    $main->setHasRequiredFields(true);
    $main->setFormAction($_SERVER["PHP_SELF"] . "?fFolderID=$fFolderID");
    $main->render();
    exit(0);
}
         
if (Folder::folderExistsName($fFolderName, $fFolderID)) {
    require_once("$default->fileSystemRoot/presentation/webpageTemplate.inc");
    $oPatternCustom->setHtml(renderBrowseAddPage($fFolderID));
    $main->setCentralPayload($oPatternCustom);
    $main->setErrorMessage(sprintf(_("There is another folder named %s in this folder already"), $fFolderName));
    $main->setHasRequiredFields(true);
    $main->setFormAction($_SERVER["PHP_SELF"] . "?fFolderID=$fFolderID");
    $main->render();
    exit(0);
}

$oParentFolder = Folder::get($fFolderID);
//create the folder in the db, giving it the properties of it's parent folder
$oFolder = & new Folder($fFolderName, "", $fFolderID, $_SESSION["userID"], $oParentFolder->getUnitID());

if (!$oFolder->create()) {
    //if we couldn't create the folder in the db, report an error
    $default->log->error("addFolderBL.php DB error attempting to store folder name=$fFolderName in parent folder '" . Folder::getFolderPath($fFolderID) . "' id=$fFolderID");
                                        
    require_once("$default->fileSystemRoot/presentation/webpageTemplate.inc");
    $oPatternCustom->setHtml(renderBrowsePage($fFolderID));
    $main->setCentralPayload($oPatternCustom);
    $main->setErrorMessage(sprintf(_("There was an error creating the folder %s in the database"), $fFolderName));
    $main->setFormAction($_SERVER["PHP_SELF"] . "?fFolderID=$fFolderID");
    $main->render();
    exit(0);
}

if (!is_array($fDocumentTypeID)) {
    $fDocumentTypeID = array($fDocumentTypeID);
}

$aFolderDocTypeLinks = array();
$bFailed = false;
foreach ($fDocumentTypeID as $iDocumentTypeID) {
    $oFolderDocTypeLink = & new FolderDocTypeLink($oFolder->getID(), $iDocumentTypeID);
    if (!$oFolderDocTypeLink->create()) {
        $bFailed = true;
        break;
    }
    $aFolderDocTypeLinks[] =& $oFolderDocTypeLink;
}

if ($bFailed) {
    foreach ($aFolderDocTypeLinks as $oFolderDocTypeLink) {
        $oFolderDocTypeLink->delete();
    }
    //couldn't associate the chosen document type with this folder
    $default->log->error("addFolderBL.php DB error storing folder-document type link for folder name=$fFolderName in parent folder '" . Folder::getFolderPath($fFolderID) . "' folderID=$fFolderID; docTypeID=$fDocumentTypeID");
    
    //remove the folder from the database								
    $oFolder->delete();
    require_once("$default->fileSystemRoot/presentation/webpageTemplate.inc");
    $oPatternCustom->setHtml(renderBrowsePage($fFolderID));
    $main->setCentralPayload($oPatternCustom);
    $main->setErrorMessage(sprintf(_("There was an error creating the folder %s on the filesystem"), $fFolderName));
    $main->setFormAction($_SERVER["PHP_SELF"] . "?fFolderID=$fFolderID");
    $main->setHasRequiredFields(true);
    $main->render();								
    exit(0);
}

//create the folder on the file system
if (!PhysicalFolderManagement::createFolder(Folder::getFolderPath($oFolder->getID()))) {
    //if we couldn't do that
    $default->log->error("addFolderBL.php Filesystem error attempting to store folder name=$fFolderName in parent folder '" . Folder::getFolderPath($fFolderID) . "' id=$fFolderID");
    
    // remove the folder and its doc type link from the db and report and error
    foreach ($aFolderDocTypeLinks as $oFolderDocTypeLink) {
        $oFolderDocTypeLink->delete();
    }
    //couldn't associate the chosen document type with this folder
    $oFolder->delete();
    require_once("$default->fileSystemRoot/presentation/webpageTemplate.inc");
    $oPatternCustom->setHtml(renderBrowsePage($fFolderID));
    $main->setCentralPayload($oPatternCustom);
    $main->setErrorMessage(sprintf(_("There was an error creating the folder %s on the filesystem"), $fFolderName));
    $main->setFormAction($_SERVER["PHP_SELF"] . "?fFolderID=$fFolderID");
    $main->setHasRequiredFields(true);									
    $main->render();
    exit(0);
}

$default->log->info("addFolderBL.php successfully added folder $fFolderName to parent folder " . Folder::getFolderPath($fFolderID) . " id=$fFolderID");
    
// fire subscription alerts for the new folder
$count = SubscriptionEngine::fireSubscription($oParentFolder->getID(), SubscriptionConstants::subscriptionAlertType("AddFolder"),
         SubscriptionConstants::subscriptionType("FolderSubscription"),
         array( "newFolderName" => $fFolderName,
                "parentFolderName" => $oParentFolder->getName()) );
$default->log->info("addFolderBL.php fired $count subscription alerts for new folder $fFolderName");
redirect("$default->rootUrl/control.php?action=editFolder&fFolderID=" . $oFolder->getID());

?>