晋太元中,武陵人捕鱼为业。缘溪行,忘路之远近。忽逢桃花林,夹岸数百步,中无杂树,芳草鲜美,落英缤纷。渔人甚异之,复前行,欲穷其林。 林尽水源,便得一山,山有小口,仿佛若有光。便舍船,从口入。初极狭,才通人。复行数十步,豁然开朗。土地平旷,屋舍俨然,有良田、美池、桑竹之属。阡陌交通,鸡犬相闻。其中往来种作,男女衣着,悉如外人。黄发垂髫,并怡然自乐。 见渔人,乃大惊,问所从来。具答之。便要还家,设酒杀鸡作食。村中闻有此人,咸来问讯。自云先世避秦时乱,率妻子邑人来此绝境,不复出焉,遂与外人间隔。问今是何世,乃不知有汉,无论魏晋。此人一一为具言所闻,皆叹惋。余人各复延至其家,皆出酒食。停数日,辞去。此中人语云:“不足为外人道也。”(间隔 一作:隔绝) 既出,得其船,便扶向路,处处志之。及郡下,诣太守,说如此。太守即遣人随其往,寻向所志,遂迷,不复得路。 南阳刘子骥,高尚士也,闻之,欣然规往。未果,寻病终。后遂无问津者。
|
Server : Apache System : Linux srv.rainic.com 4.18.0-553.47.1.el8_10.x86_64 #1 SMP Wed Apr 2 05:45:37 EDT 2025 x86_64 User : rainic ( 1014) PHP Version : 7.4.33 Disable Function : exec,passthru,shell_exec,system Directory : /home/akaindir/public_html/crm/include/Webservices/ |
Upload File : |
<?php
/*+***********************************************************************************
* The contents of this file are subject to the vtiger CRM Public License Version 1.0
* ("License"); You may not use this file except in compliance with the License
* The Original Code is: vtiger CRM Open Source
* The Initial Developer of the Original Code is vtiger.
* Portions created by vtiger are Copyright (C) vtiger.
* All Rights Reserved.
*************************************************************************************/
function vtws_listtypes($fieldTypeList, $user){
// Bulk Save Mode: For re-using information
static $webserviceEntities = false;
// END
static $types = array();
if(!empty($fieldTypeList)) {
$fieldTypeList = array_map('strtolower', $fieldTypeList);
sort($fieldTypeList);
$fieldTypeString = implode(',', $fieldTypeList);
} else {
$fieldTypeString = 'all';
}
if(!empty($types[$user->id][$fieldTypeString])) {
return $types[$user->id][$fieldTypeString];
}
try{
global $log;
/**
* @var PearDatabase
*/
$db = PearDatabase::getInstance();
vtws_preserveGlobal('current_user',$user);
//get All the modules the current user is permitted to Access.
$allModuleNames = getPermittedModuleNames();
if(array_search('Calendar',$allModuleNames) !== false){
array_push($allModuleNames,'Events');
}
if(!empty($fieldTypeList)) {
$sql = "SELECT distinct(vtiger_field.tabid) as tabid FROM vtiger_field LEFT JOIN vtiger_ws_fieldtype ON ".
"vtiger_field.uitype=vtiger_ws_fieldtype.uitype
INNER JOIN vtiger_profile2field ON vtiger_field.fieldid = vtiger_profile2field.fieldid
INNER JOIN vtiger_def_org_field ON vtiger_def_org_field.fieldid = vtiger_field.fieldid
INNER JOIN vtiger_role2profile ON vtiger_profile2field.profileid = vtiger_role2profile.profileid
INNER JOIN vtiger_user2role ON vtiger_user2role.roleid = vtiger_role2profile.roleid
where vtiger_profile2field.visible=0 and vtiger_def_org_field.visible = 0
and vtiger_field.presence in (0,2)
and vtiger_user2role.userid=? and fieldtype in (".
generateQuestionMarks($fieldTypeList).')';
$params = array();
$params[] = $user->id;
foreach($fieldTypeList as $fieldType)
$params[] = $fieldType;
$result = $db->pquery($sql, $params);
$it = new SqlResultIterator($db, $result);
$moduleList = array();
foreach ($it as $row) {
$moduleList[] = getTabModuleName($row->tabid);
}
$allModuleNames = array_intersect($moduleList, $allModuleNames);
$params = $fieldTypeList;
$sql = "select name from vtiger_ws_entity inner join vtiger_ws_entity_tables on ".
"vtiger_ws_entity.id=vtiger_ws_entity_tables.webservice_entity_id inner join ".
"vtiger_ws_entity_fieldtype on vtiger_ws_entity_fieldtype.table_name=".
"vtiger_ws_entity_tables.table_name where fieldtype=(".
generateQuestionMarks($fieldTypeList).')';
$result = $db->pquery($sql, $params);
$it = new SqlResultIterator($db, $result);
$entityList = array();
foreach ($it as $row) {
$entityList[] = $row->name;
}
}
//get All the CRM entity names.
if($webserviceEntities === false || !CRMEntity::isBulkSaveMode()) {
// Bulk Save Mode: For re-using information
$webserviceEntities = vtws_getWebserviceEntities();
}
$accessibleModules = array_values(array_intersect($webserviceEntities['module'],$allModuleNames));
$entities = $webserviceEntities['entity'];
$accessibleEntities = array();
if(empty($fieldTypeList)) {
foreach($entities as $entity){
$webserviceObject = VtigerWebserviceObject::fromName($db,$entity);
$handlerPath = $webserviceObject->getHandlerPath();
$handlerClass = $webserviceObject->getHandlerClass();
require_once $handlerPath;
$handler = new $handlerClass($webserviceObject,$user,$db,$log);
$meta = $handler->getMeta();
if($meta->hasAccess()===true){
array_push($accessibleEntities,$entity);
}
}
}
}catch(WebServiceException $exception){
throw $exception;
}catch(Exception $exception){
throw new WebServiceException(WebServiceErrorCode::$DATABASEQUERYERROR,
"An Database error occured while performing the operation");
}
$default_language = VTWS_PreserveGlobal::getGlobal('default_language');
global $current_language;
if(empty($current_language)) $current_language = $default_language;
$current_language = vtws_preserveGlobal('current_language',$current_language);
$appStrings = return_application_language($current_language);
$appListString = return_app_list_strings_language($current_language);
vtws_preserveGlobal('app_strings',$appStrings);
vtws_preserveGlobal('app_list_strings',$appListString);
$informationArray = array();
foreach ($accessibleModules as $module) {
$vtigerModule = ($module == 'Events')? 'Calendar':$module;
$informationArray[$module] = array('isEntity'=>true,'label'=>getTranslatedString($module,$vtigerModule),
'singular'=>getTranslatedString('SINGLE_'.$module,$vtigerModule));
}
foreach ($accessibleEntities as $entity) {
$label = (isset($appStrings[$entity]))? $appStrings[$entity]:$entity;
$singular = (isset($appStrings['SINGLE_'.$entity]))? $appStrings['SINGLE_'.$entity]:$entity;
$informationArray[$entity] = array('isEntity'=>false,'label'=>$label,
'singular'=>$singular);
}
VTWS_PreserveGlobal::flush();
$types[$user->id][$fieldTypeString] = array("types"=>array_merge($accessibleModules,$accessibleEntities),
'information'=>$informationArray);
return $types[$user->id][$fieldTypeString];
}
?>