luos/workflow/engine/src/BusinessModel/FilesManager.php

<?php
namespace BusinessModel;

use \G;

class FilesManager
{
    /**
     * Return the Process Files Manager
     *
     * @param string $sProcessUID {@min 32} {@max 32}
     *
     * return array
     *
     * @access public
     */
    public function getProcessFilesManager($sProcessUID)
    {
        try {
            $aDirectories[] = array('name' => "templates",
                                    'type' => "folder",
                                    'path' => "/",
                                    'editable' => false);
            $aDirectories[] = array('name' => "public",
                                    'type' => "folder",
                                    'path' => "/",
                                    'editable' => false);
            return $aDirectories;
        } catch (Exception $e) {
            throw $e;
        }
    }

    /**
     * Return the Process Files Manager Path
     *
     * @param string $sProcessUID {@min 32} {@max 32}
     * @param string $path
     *
     * return array
     *
     * @access public
     */
    public function getProcessFilesManagerPath($sProcessUID, $path)
    {
        try {
            $sMainDirectory = current(explode("/", $path));
            if (strstr($path,'/')) {
                $sSubDirectory = substr($path, strpos($path, "/")+1). PATH_SEP ;
            } else {
                $sSubDirectory = '';
            }
            switch ($sMainDirectory) {
                case 'templates':
                    $sDirectory = PATH_DATA_MAILTEMPLATES . $sProcessUID . PATH_SEP . $sSubDirectory;
                    break;
                case 'public':
                    $sDirectory = PATH_DATA_PUBLIC . $sProcessUID . PATH_SEP . $sSubDirectory;
                    break;
                default:
                    die();
                    break;
            }
            \G::verifyPath($sDirectory, true);
            $aTheFiles = array();
            $aDirectories = array();
            $aFiles = array();
            $oDirectory = dir($sDirectory);
            while ($sObject = $oDirectory->read()) {
                if (($sObject !== '.') && ($sObject !== '..')) {
                    $sPath = $sDirectory . $sObject;
                    if (is_dir($sPath)) {
                        $aTheFiles[] = array('prf_name' => $sObject,
                                             'prf_type' => "folder",
                                             'prf_path' => $sMainDirectory);
                    } else {
                        $aAux = pathinfo($sPath);
                        $aAux['extension'] = (isset($aAux['extension'])?$aAux['extension']:'');
                        $aFiles[] = array('FILE' => $sObject, 'EXT' => $aAux['extension'] );
                    }
                }
            }
            foreach ($aFiles as $aFile) {
                    $arrayFileUid = $this->getFileManagerUid($sDirectory.$aFile['FILE']);
                    $fileUid =  $arrayFileUid["PRF_UID"];
                    if ($fileUid) {
                        $oProcessFiles = \ProcessFilesPeer::retrieveByPK($fileUid);
                        $aTheFiles[] = array( 'prf_filename' => $aFile['FILE'],
                                              'usr_uid' => $oProcessFiles->getUsrUid(),
                                              'prf_update_usr_uid' => $oProcessFiles->getPrfUpdateUsrUid(),
                                              'prf_path' => $sMainDirectory. PATH_SEP .$sSubDirectory,
                                              'prf_type' => $oProcessFiles->getPrfType(),
                                              'prf_editable' => $oProcessFiles->getPrfEditable(),
                                              'prf_create_date' => $oProcessFiles->getPrfCreateDate(),
                                              'prf_update_date' => $oProcessFiles->getPrfUpdateDate());

                    } else {
                        $aTheFiles[] = array('prf_filename' => $aFile['FILE'],
                                             'usr_uid' => '',
                                             'prf_update_usr_uid' => '',
                                             'prf_path' => $sMainDirectory. PATH_SEP .$sSubDirectory,
                                             'prf_type' => 'file',
                                             'prf_editable' => '',
                                             'prf_create_date' => '',
                                             'prf_update_date' => '');
                    }
    
            }
            return $aTheFiles;
        } catch (Exception $e) {
            throw $e;
        }
    }

    /**
     * Return the Process File Manager
     *
     * @param string $sProcessUID {@min 32} {@max 32}
     * @param string $userUID {@min 32} {@max 32}
     * @param array  $aData
     *
     * return array
     *
     * @access public
     */
    public function addProcessFilesManager($sProcessUID, $userUID, $aData)
    {
        try {
            $aData['prf_path'] = rtrim($aData['prf_path'], '/') . '/';
            $sMainDirectory = current(explode("/", $aData['prf_path']));
            if ($sMainDirectory != 'public' && $sMainDirectory != 'templates') {
                throw (new \Exception( 'invalid value specified for `prf_path`. Expecting `templates/` or `public/`'));
            }
            if (strstr($aData['prf_path'],'/')) {
                $sSubDirectory = substr($aData['prf_path'], strpos($aData['prf_path'], "/")+1) ;
            } else {
                $sSubDirectory = '';
            }
            switch ($sMainDirectory) {
                case 'templates':
                    $sDirectory = PATH_DATA_MAILTEMPLATES . $sProcessUID . PATH_SEP . $sSubDirectory . $aData['prf_filename'];
                    $sCheckDirectory = PATH_DATA_MAILTEMPLATES . $sProcessUID . PATH_SEP . $sSubDirectory;
                    $sEditable = false;
                    break;
                case 'public':
                    $sDirectory = PATH_DATA_PUBLIC . $sProcessUID . PATH_SEP . $sSubDirectory . $aData['prf_filename'];
                    $sCheckDirectory = PATH_DATA_PUBLIC . $sProcessUID . PATH_SEP . $sSubDirectory;
                    break;
                default:
                    $sDirectory = PATH_DATA_MAILTEMPLATES . $sProcessUID . PATH_SEP . $sSubDirectory . $aData['prf_filename'];
                    break;
            }
            $extention = end(explode(".", $aData['prf_filename']));
            if ($extention == 'docx' || $extention == 'doc' || $extention == 'html' || $extention == 'php' || $extention == 'jsp' ||
                $extention == 'xlsx' || $extention == 'xls' || $extention == 'js' || $extention == 'css' || $extention == 'txt') {
                $sEditable = true;
            } else {
                $sEditable = false;
            }
            \G::verifyPath($sCheckDirectory, true);
            if (file_exists(PATH_SEP.$sDirectory)) {
                throw (new \Exception( 'The file: '. $sDirectory . ' already exists.'));
            }
            $sPkProcessFiles = \G::generateUniqueID();
            $oProcessFiles = new \ProcessFiles();
            $sDate = date('Y-m-d H:i:s');
            $oProcessFiles->setPrfUid($sPkProcessFiles);
            $oProcessFiles->setProUid($sProcessUID);
            $oProcessFiles->setUsrUid($userUID);
            $oProcessFiles->setPrfUpdateUsrUid('');
            $oProcessFiles->setPrfPath($sDirectory);
            $oProcessFiles->setPrfType('file');
            $oProcessFiles->setPrfEditable($sEditable);
            $oProcessFiles->setPrfCreateDate($sDate);
            $oProcessFiles->save();
            $fp = fopen($sDirectory, 'w');
            $content = $aData['prf_content'];
            fwrite($fp, $content);
            fclose($fp);
            $oProcessFile = array('prf_uid' => $oProcessFiles->getPrfUid(),
                                  'usr_uid' => $oProcessFiles->getUsrUid(),
                                  'prf_update_usr_uid' => $oProcessFiles->getPrfUpdateUsrUid(),
                                  'prf_path' => $sMainDirectory. PATH_SEP . $sSubDirectory,
                                  'prf_type' => $oProcessFiles->getPrfType(),
                                  'prf_editable' => $oProcessFiles->getPrfEditable(),
                                  'prf_create_date' => $oProcessFiles->getPrfCreateDate(),
                                  'prf_update_date' => $oProcessFiles->getPrfUpdateDate());
            return $oProcessFile;
        } catch (Exception $e) {
            throw $e;
        }
    }

    /**
     * Return the Process Files Manager
     *
     * @param string $prjUid {@min 32} {@max 32}
     * @param array $aData
     *
     *
     * @access public
     */
    public function uploadProcessFilesManager($prjUid, $aData)
    {
        try {
            $prfUid = $aData['prf_uid'];
            $path = '';
            $criteria = new \Criteria("workflow");
            $criteria->addSelectColumn(\ProcessFilesPeer::PRF_PATH);
            $criteria->add(\ProcessFilesPeer::PRF_UID, $prfUid, \Criteria::EQUAL);
            $rsCriteria = \ProcessFilesPeer::doSelectRS($criteria);
            $rsCriteria->setFetchmode(\ResultSet::FETCHMODE_ASSOC);
            $rsCriteria->next();
            while ($aRow = $rsCriteria->getRow()) {
                $path = $aRow['PRF_PATH'];
                $rsCriteria->next();
            }
            if ($path == ''){
                throw new \Exception(\G::LoadTranslation('ID_PMTABLE_UPLOADING_FILE_PROBLEM'));
            }
            $file = end(explode("/",$path));
            $path = str_replace($file,'',$path);
            if ($_FILES['my_file']['error'] != 1) {
                if ($_FILES['my_file']['tmp_name'] != '') {
                    \G::uploadFile($_FILES['my_file']['tmp_name'],$path , $_FILES['my_file']['name']);
                }
            }
        } catch (Exception $e) {
            throw $e;
        }
    }

    /**
     * Get data of unique ids of a file
     *
     * @param string $path
     *
     * return array
     */
    public function getFileManagerUid($path)
    {
        try {
            $criteria = new \Criteria("workflow");
            $criteria->addSelectColumn(\ProcessFilesPeer::PRF_UID);
            $criteria->add(\ProcessFilesPeer::PRF_PATH, $path, \Criteria::EQUAL);
            $rsCriteria = \ProcessFilesPeer::doSelectRS($criteria);
            $rsCriteria->setFetchmode(\ResultSet::FETCHMODE_ASSOC);
            $rsCriteria->next();
            return $rsCriteria->getRow();
        } catch (\Exception $e) {
            throw $e;
        }
    }

    /**
     * Return the Process Files Manager
     *
     * @param string $sProcessUID {@min 32} {@max 32}
     * @param string $path
     * @param string $userUID {@min 32} {@max 32}
     * @param array  $aData
     *
     * return array
     *
     * @access public
     */
    public function updateProcessFilesManager($sProcessUID, $userUID, $aData, $path)
    {
        try {
            $path = rtrim($path, '/') . '/';
            $sMainDirectory = current(explode("/", $path));
            if ($sMainDirectory != 'public' && $sMainDirectory != 'templates') {
                throw (new \Exception( 'invalid value specified for `prf_path`. Expecting `templates/` or `public/`'));
            }
            if (strstr($path,'/')) {
                $sSubDirectory = substr($path, strpos($path, "/")+1) ;
            } else {
                $sSubDirectory = '';
            }
            switch ($sMainDirectory) {
                case 'templates':
                    $sDirectory = PATH_DATA_MAILTEMPLATES . $sProcessUID . PATH_SEP . $sSubDirectory . $aData['prf_filename'];
                    $sEditable = false;
                    break;
                case 'public':
                    $sDirectory = PATH_DATA_PUBLIC . $sProcessUID . PATH_SEP . $sSubDirectory . $aData['prf_filename'];
                    break;
                default:
                    $sDirectory = PATH_DATA_MAILTEMPLATES . $sProcessUID . PATH_SEP . $aData['prf_filename'];
                    break;
            }
            $arrayFileUid = $this->getFileManagerUid($sDirectory);
            if (!$arrayFileUid) {
                throw (new \Exception( 'invalid value specified for `path`.'));
            }
            $extention = end(explode(".", $aData['prf_filename']));
            if ($extention == 'docx' || $extention == 'doc' || $extention == 'html' || $extention == 'php' || $extention == 'jsp' ||
                $extention == 'xlsx' || $extention == 'xls' || $extention == 'js' || $extention == 'css' || $extention == 'txt') {
                $sEditable = true;
            } else {
                $sEditable = false;
            }
            if ($sEditable == false) {
                throw (new \Exception( 'Can`t edit. Make sure your file has an editable extension.'));
            }
            $fileUid =  $arrayFileUid["PRF_UID"];
            $oProcessFiles = \ProcessFilesPeer::retrieveByPK($fileUid);
            $sDate = date('Y-m-d H:i:s');
            $oProcessFiles->setPrfUpdateUsrUid($userUID);
            $oProcessFiles->setPrfUpdateDate($sDate);
            $oProcessFiles->save();
            $fp = fopen($sDirectory, 'w');
            $content = $aData['prf_content'];
            fwrite($fp, $content);
            fclose($fp);
            $oProcessFile = array('prf_uid' => $oProcessFiles->getPrfUid(),
                                  'usr_uid' => $oProcessFiles->getUsrUid(),
                                  'prf_update_usr_uid' => $oProcessFiles->getPrfUpdateUsrUid(),
                                  'prf_path' => $sMainDirectory. PATH_SEP . $sSubDirectory,
                                  'prf_type' => $oProcessFiles->getPrfType(),
                                  'prf_editable' => $sEditable,
                                  'prf_create_date' => $oProcessFiles->getPrfCreateDate(),
                                  'prf_update_date' => $oProcessFiles->getPrfUpdateDate());
            return $oProcessFile;
        } catch (Exception $e) {
            throw $e;
        }
    }

    /**
     *
     * @param string $sProcessUID {@min 32} {@max 32}
     * @param string $path
     *
     *
     * @access public 
     */
    public function deleteProcessFilesManager($sProcessUID, $path)
    {
        try {
            $sMainDirectory = current(explode("/", $path));
            if ($sMainDirectory != 'public' && $sMainDirectory != 'templates') {
                throw (new \Exception( 'invalid value specified for `prf_path`. Expecting `templates/` or `public/`'));
            }
            if ($sMainDirectory == 'templates') {
                $sMainDirectory = 'mailTemplates';
            }
            $sfile = end(explode("/",$path));
            $sSubDirectorytemp = substr($path, strpos($path, "/")+1);
            if (strstr($sSubDirectorytemp,'/')) {
                $sSubDirectory = str_replace('/'.$sfile,"",$sSubDirectorytemp);
                $sSubDirectoryCheck = str_replace($sfile,"",$sSubDirectorytemp);
            } else {
                $sSubDirectory = '';
                $sSubDirectoryCheck = '';
            }
            switch ($sMainDirectory) {
                case 'mailTemplates':
                    $sDirectory = PATH_DATA_MAILTEMPLATES . $sProcessUID . PATH_SEP . $sSubDirectoryCheck . $sfile;
                    $sEditable = false;
                    break;
                case 'public':
                    $sDirectory = PATH_DATA_PUBLIC . $sProcessUID . PATH_SEP . $sSubDirectoryCheck . $sfile;
                    break;
                default:
                    $sDirectory = PATH_DATA_MAILTEMPLATES . $sProcessUID . PATH_SEP . $sfile;
                    break;
            }
            $arrayTaskUid = $this->getFileManagerUid($sDirectory);
            if (!$arrayTaskUid){
                throw (new \Exception( 'invalid value specified for `path`.'));
            }
            $oProcessMap = new \processMap(new \DBConnection());
            $oProcessMap->deleteFile($sProcessUID,
                                     $sMainDirectory,
                                     $sSubDirectory,
                                     $sfile);
            $c = new \Criteria("workflow");
            $c->add(\ProcessFilesPeer::PRF_PATH, $sDirectory, \Criteria::EQUAL);
            $rs = \ProcessFilesPeer::doDelete($c);
        } catch (Exception $e) {
            throw $e;
        }
    }

    /**
     *
     * @param string $sProcessUID {@min 32} {@max 32}
     * @param string $path
     *
     *
     * @access public
     */
    public function downloadProcessFilesManager($sProcessUID, $path)
    {
        try {
            $sMainDirectory = current(explode("/", $path));
            if ($sMainDirectory != 'public' && $sMainDirectory != 'templates') {
                throw (new \Exception( 'invalid value specified for `prf_path`. Expecting `templates/` or `public/`'));
            }
            if ($sMainDirectory == 'templates') {
                $sMainDirectory = 'mailTemplates';
            }
            $sfile = end(explode("/",$path));
            $sSubDirectorytemp = substr($path, strpos($path, "/")+1);
            if (strstr($sSubDirectorytemp,'/')) {
                $sSubDirectory = str_replace('/'.$sfile,"",$sSubDirectorytemp);
                $sSubDirectoryCheck = str_replace($sfile,"",$sSubDirectorytemp);
            } else {
                $sSubDirectory = '';
                $sSubDirectoryCheck = '';
            }
            switch ($sMainDirectory) {
                case 'mailTemplates':
                    $sDirectory = PATH_DATA_MAILTEMPLATES . $sProcessUID . PATH_SEP . $sSubDirectoryCheck . $sfile;
                    break;
                case 'public':
                    $sDirectory = PATH_DATA_PUBLIC . $sProcessUID . PATH_SEP . $sSubDirectoryCheck . $sfile;
                    break;
                default:
                    $sDirectory = PATH_DATA_MAILTEMPLATES . $sProcessUID . PATH_SEP . $sfile;
                    break;
            }
            if (file_exists(PATH_SEP.$sDirectory)) {
                $oProcessMap = new \processMap(new \DBConnection());
                $oProcessMap->downloadFile($sProcessUID,$sMainDirectory,$sSubDirectory,$sfile);
            } else {
                throw (new \Exception( 'invalid value specified for `path`.'));
            }
        } catch (Exception $e) {
            throw $e;
        }
    }
}