[Summary view] [Print] [Text view]

   1  <?php
   2  /*+***********************************************************************************
   3   * The contents of this file are subject to the vtiger CRM Public License Version 1.0
   4   * ("License"); You may not use this file except in compliance with the License
   5   * The Original Code is:  vtiger CRM Open Source
   6   * The Initial Developer of the Original Code is vtiger.
   7   * Portions created by vtiger are Copyright (C) vtiger.
   8   * All Rights Reserved.
   9   *************************************************************************************/
  10  
  11  class Emails_CheckServerInfo_Action extends Vtiger_Action_Controller {
  12  
  13  	function checkPermission(Vtiger_Request $request) {
  14          $moduleName = $request->getModule();
  15          $moduleModel = Vtiger_Module_Model::getInstance($moduleName);
  16  
  17          $currentUserPriviligesModel = Users_Privileges_Model::getCurrentUserPrivilegesModel();
  18          if(!$currentUserPriviligesModel->hasModulePermission($moduleModel->getId())) {
  19              throw new AppException(vtranslate($moduleName).' '.vtranslate('LBL_NOT_ACCESSIBLE'));
  20          }
  21      }
  22  
  23  	function process(Vtiger_Request $request) {
  24          $db = PearDatabase::getInstance();
  25          $response = new Vtiger_Response();
  26  
  27          $result = $db->pquery('SELECT 1 FROM vtiger_systems WHERE server_type = ?', array('email'));
  28          if($db->num_rows($result)) {
  29              $response->setResult(true);
  30          } else {
  31              $response->setResult(false);
  32          }
  33          return $response;
  34      }
  35  }