160 vault_record conditionally marshalled, svc search by synonyms

v1/Application.cfc

@@ -51,7 +51,7 @@
 		
 		//variables.framework.docs={};
 		variables.framework.docs.APIName="svc-api";
-		variables.framework.docs.APIVersion="0.159";   /*$ git config --global --unset user.password*/
+		variables.framework.docs.APIVersion="0.160";   /*$ git config --global --unset user.password*/
 		
 		variables.framework.globalHeaders = structNew();
 		variables.framework.globalHeaders["Access-Control-Expose-Headers"] = "Location"; 

v1/lib/field_set.cfm

@@ -1,32 +1,39 @@
-<cfsilent>
+<cfsilent></cfsilent>
 <!--- 20181209 v0.3 добавлено поле cfSqlType--->
 <!--- 20201029 v0.5  все атрибуты необязательные--->
 <!--- 20201114 v0.6 добавлен атрибут "container" for json--->
 <!--- 20201201 v0.7 исправлен listOut--->
 <!--- 20210326 v0.8 formatter --->
 <!--- 20210326 v0.9 listOutKeepContent --->
+<!--- 20210326 v0.10 listOutKeepContent, listOut, nameListOut fixes --->
 <!--- Используется в селекте для структурирования списка полей. Выводит вместо себя список через запятую, экспортирует Map со структурами выражение+заголовок, с ключом, соответствующим имени колонки в селекте (ключ вычисляется регулярным выражением)  --->
 
+	<cfset var local={}/> <!--- *** есть опасения, что это не будет работать в модуле .cfm (вообще var ведет себе странно) --->
 	<cfif thisTag.executionMode is "end">	
 	
 		<cfparam name="ATTRIBUTES.titleMapOut" default=""/>	
 		<cfparam name="ATTRIBUTES.lengthOut" default=""/>
 		<cfparam name="ATTRIBUTES.listOut" default=""/><!---возвращаемый	список полей через запятую для селекта. Если не задан (чаще всего так), этот список возвращается в виде контента тега --->
+		<cfparam name="ATTRIBUTES.nameListOut" default=""/><!---возвращаемый	список имен (алиасов) через запятую--->
 		<cfparam name="ATTRIBUTES.listOutKeepContent" default=false/><!--- указывает listOut не очищать контент --->
 		<cfparam name="ATTRIBUTES.fieldsToInclude" default=""/><!--- список нужных полей, если не пустой - выбрасывать все поля, кроме тех, что в списке --->
 
 		<cfparam name="thisTag.fieldsArray" type="array"/><!--- Вложенные теги field отдают сюда свои данные --->
 		
 		<cfset titleMap=structNew("linked")/><!---railo/lucee syntax--->
-		<cfset list=""/>
+		<cfset local.expressionList=""/>
+		<cfset local.nameList=""/>
+		
 		<cfset i=0/>
 		<cfloop array=#thisTag.fieldsArray# index="field">
+			<!--- <cfdump var=#field#/> --->
 			<cfif len(#field.name#) EQ 0 
 				OR listLen(ATTRIBUTES.fieldsToInclude) EQ 0 
-				OR listFind(ATTRIBUTES.fieldsToInclude,field.name)> 
+				OR listFindNoCase(ATTRIBUTES.fieldsToInclude,field.name)> 
 				<!--- пытаемся сохранить прежнюю логику - поля без имени не выбрасываются, но не попадают в titleMap --->				
 				<cfset i=i+1/>			
-				<cfset list=listAppend(#list#, #field.expression#)/>
+				<cfset local.expressionList=listAppend(#local.expressionList#, #field.expression#)/>
+				<cfset local.nameList=listAppend(#local.nameList#, #field.name#)/>
 			
 				<cfif len(#field.name#)>					
 					<cfset structInsert(#titleMap#, #field.name#, structNew())/>
@@ -46,6 +53,10 @@
 		
 		<cfif len(ATTRIBUTES.titleMapOut)>
 			<cfset "CALLER.#ATTRIBUTES.titleMapOut#"=#titleMap#/>
+		</cfif>		
+		
+		<cfif len(ATTRIBUTES.nameListOut)>
+			<cfset "CALLER.#ATTRIBUTES.nameListOut#"=#local.nameList#/>
 		</cfif>
 		
 		<!--- <cfif len(ATTRIBUTES.listOut)>
@@ -54,15 +65,14 @@
 		</cfif> --->
 		
 		<cfif len(ATTRIBUTES.listOut)><!--- *** некрасиво --->
-			<cfset "CALLER.#ATTRIBUTES.listOut#"=list/>
+			<cfset "CALLER.#ATTRIBUTES.listOut#"=local.expressionList/>
 			<cfif ATTRIBUTES.listOutKeepContent>
-				<cfset thisTag.generatedContent=preserveSingleQuotes(list)/>
+				<cfset thisTag.generatedContent=preserveSingleQuotes(local.expressionList)/>
 			<cfelse>
 				<cfset thisTag.generatedContent=""/>
 			</cfif>
 		<cfelse>
-			<cfset thisTag.generatedContent=preserveSingleQuotes(list)/>
+			<cfset thisTag.generatedContent=preserveSingleQuotes(local.expressionList)/>
 		</cfif>
 		
 	</cfif>
-</cfsilent>

v1/resources/instance_ls.cfc

@@ -80,7 +80,6 @@
 					</cfif>
 				</cfloop>
 			<!--- </cfif> --->
-			<!--- <cfdump var=#local.fieldsToOutput#/><cfabort/> --->
 			
 			<cfset local.fieldsToQueryFor = local.fieldsToOutput/>
 			<cfset local.fieldsShortList=""/>
@@ -136,7 +135,8 @@
 				
 			<m:field_set titleMapOut="local.titleMap" 
 					lengthOut="local.fieldCount" 
-					listOut="definedInstanceFields"
+					nameListOut="local.definedRecordFields"
+					listOut="local.definedQueryFields"
 					fieldsToInclude=#local.fieldsToQueryFor#>				
 				<m:field>to_char(e.dt_created, 'YYYY-MM-DD"T"HH24:MI:SS.FF3TZHTZM') as instance_config_dt_created</m:field>
 				<m:field>to_char(e.dt_updated, 'YYYY-MM-DD"T"HH24:MI:SS.FF3TZHTZM') as instance_config_dt_updated</m:field>
@@ -195,8 +195,7 @@
 				) as explained_status</m:field>		
 				<m:field>st.version</m:field>
 			</m:field_set>	
-	
+
-			<!--- <cfdump var=#definedInstanceFields#/><cfabort/> ---> 
 		
 			<cfquery name="local.qCnt" result="local.result">
 			select count(*) as cnt
@@ -206,7 +205,7 @@
 				<cfif structIsEmpty(filter)>
 					'' as placeholder
 				<cfelse>
-					#preserveSingleQuotes(definedInstanceFields)#
+					#preserveSingleQuotes(definedQueryFields)#
 				</cfif>
 				from instance e
 				join specification_item i on (e.specification_item_id=i.specification_item_id)		
@@ -248,7 +247,7 @@
 			<cfif listLen(local.fieldsToOutput)>#local.fieldsToOutput#<cfelse>*</cfif> 
 			from (
 			select
-				#preserveSingleQuotes(definedInstanceFields)#	
+				#preserveSingleQuotes(definedQueryFields)#	
 			from instance e
 			join specification_item i on (e.specification_item_id=i.specification_item_id)		
 			join specification s on (i.specification_id=s.specification_id)		

v1/resources/svc_ls.cfc

@@ -6,21 +6,24 @@
 	</cfsilent>
 
 	<!---спецификация полей, пригодных для фильтрации (?и сортировки)--->
+	<!---здесь для простоты без префикса, потому что мы используем вложенный селект, чтобы сделать композитное поле--->
 	<cfset this.fieldsSpec={
-		dt_created={prefix="s", type="date"},
+		"dt_created"={type="date"},
-		dt_updated={prefix="s", type="date"},
+		"dt_updated"={type="date"},
-		svc_id={prefix="s", type="integer"},
+		"svc_id"={type="integer"},
-		svc_group_id={prefix="s", type="integer"},
+<!--- 		svc_group_id={type="integer"}, --->
-		resource_realm_type_id={prefix="s", type="integer"},
+		"resource_realm_type_id"={type="integer"},
-		sort={prefix="s", type="integer"},
+		"sort"={type="integer"},
-		is_production_ready={prefix="s", type="boolean"},
+		"is_production_ready"={type="boolean"},
-		svc={prefix="s", type="string"},
+		"svc"={type="string"},
-		svc_short={prefix="s", type="string"},
+		"svc_short"={type="string"},
-		orchestrator_name={prefix="s", type="string"},
+		"svc_extended_name"={type="string"},
-		code={prefix="s", type="string"},
+		"orchestrator_name"={type="string"},
-		version={prefix="s", type="string"},
+		"synonyms"={type="string"},
-		descr={prefix="s", type="string"},
+		"code"={type="string"},
-		man={prefix="s", type="string"}
+		"version"={type="string"},
+		"descr"={type="string"},
+		"man"={type="string"}
 	}
 	/>
 
@@ -28,9 +31,11 @@
 		<cfargument name="pageSize" type="string" hint="type:integer" default=100/>	
 		<cfargument name="page" type="string" hint="type:integer" default="1"/>	
 		<cfargument name="orderBy" type="string" hint="type:string, description:comma-separated list of fields to sort by, example:fld1.ASC,fld2.DESC,fld3.ASC" default=""/>
+		<cfargument name="fields" type="string" hint="type:string, description:comma-separated list of fields to limit output to, empty string or omitted for default field set"  required=false default=""/>
+		<cfargument name="search" type="string" hint="type:string, free search (black box)" required=false default=""/>
 
 		<cfset local={}/>
-		
+		<!--- Фильтрация не униицирована (разница с instance_ls) --->
 		
 		<!---parse and validate request parameters--->
 		<cftry>
@@ -38,64 +43,167 @@
 			<cfset this.helper.validateField(arguments, "page", "integer")/>
 			
 			<!---мы мирно игнорируем поля, отсутствующие в спецификации, что позволяет не делать исключения для orderBy и т.п.--->
+			
 			<cfset var filter=this.helper.parseFilterParams(this.fieldsSpec)/>
-			<!--- <cfset var order=this.helper.parseOrderBy(this.fieldsSpec, arguments.orderBy)/> --->
+			<cfset var order=this.helper.parseOrderBy(this.fieldsSpec, arguments.orderBy)/>	
+	
+			<cfset local.fieldsToOutput=""/>
+
+			<cfloop collection=#this.fieldsSpec# item="fld">
+				<!--- <cfoutput>#this.helper.snake2camel(trim(fld))#</cfoutput> --->
+				<!--- *** в данном случае мы некорректно ограничиваем состав выводимых полей
+				полями, перечисленными в fieldSpec --->
+				<cfif listFindNoCase(arguments.fields, this.helper.snake2camel(trim(fld)))
+				OR len(arguments.fields) EQ 0>
+					<cfset local.fieldsToOutput=listAppend(local.fieldsToOutput,trim(fld))/>
+				</cfif>
+			</cfloop>
+			
+			<cfset local.fieldsToQueryFor = local.fieldsToOutput/>
+			<cfset local.fieldsShortList=""/>
+			
+			<!--- теперь добавим в перечень полей, которые нужно оставить, поля для фильтрации и сортировки --->
+			<cfloop collection=#filter# item="item">
+				<cfset var fltr = structFind(filter,item)/>
+				<cfif listLen(fltr.field,".") EQ 2>
+					<cfset var fld = listGetAt(fltr.field,2,".")/>
+				<cfelseif listLen(fltr.field,".") EQ 1>
+					<cfset var fld = fltr.field/>
+				<cfelse>
+					<cfreturn representationOf(this.helper.formatBadRequestError("Ошибка разбора фильтра")).withStatus(500)/>
+				</cfif>
+				<cfif structKeyExists(this.fieldsSpec,fld) AND NOT listFindNoCase(local.fieldsToQueryFor,fld)>
+					<cfset local.fieldsToQueryFor=listAppend(local.fieldsToQueryFor,fld)/>
+				</cfif>
+				<cfif structKeyExists(this.fieldsSpec,fld) AND NOT listFindNoCase(local.fieldsShortList,fld)>
+					<cfset local.fieldsShortList=listAppend(local.fieldsShortList,fld)/>
+				</cfif>
+			</cfloop>
+
+			
+			<!--- *** Не нужно ли сохранять префикс? (на случай одноименных полей) --->
+			<cfloop collection=#order# item="item">
+				<cfset var ord = structFind(order,item)/>
+				<cfif listLen(ord.fld,".") EQ 2>
+					<cfset var fld = listGetAt(ord.fld,2,".")/>
+				<cfelseif listLen(ord.fld,".") EQ 1>
+					<cfset var fld = ord.fld/>
+				<cfelse>
+					<cfreturn representationOf(this.helper.formatBadRequestError("Ошибка разбора порядка сортировки")).withStatus(500)/>
+				</cfif>
+				<cfif structKeyExists(this.fieldsSpec,fld) AND NOT listFindNoCase(local.fieldsToQueryFor,fld)>
+					<!--- в данном случае мы не пытаемся поддерживать позиционную сортировку --->
+					<cfset local.fieldsToQueryFor=listAppend(local.fieldsToQueryFor,fld)/>
+				</cfif>
+				<cfif structKeyExists(this.fieldsSpec,fld) AND NOT listFindNoCase(local.fieldsShortList,fld)>
+					<cfset local.fieldsShortList=listAppend(local.fieldsShortList,fld)/>
+				</cfif>	
+			</cfloop>
 			
 			<cfcatch type="invalidParamValue"><!--- <cfreturn representationOf("Проверка связи 3")> --->
 				<cfreturn representationOf(this.helper.formatBadRequestError(cfcatch)).withStatus(400)/>
 			</cfcatch>
+			
+			
 			<cfcatch type="any">
 				<cfreturn representationOf(cfcatch)/>				
 			</cfcatch>
-		</cftry>		
+		</cftry>			
-		
 		
 		<cfset var out=structNew("linked")/>
 		<cfset var maxrows=arguments.pageSize*arguments.page/>
 		<cfset var startrow=arguments.pageSize*(arguments.page-1)+1/>
 		
-<!--- 		<cfset request.locateIamService()/> ---> 
+		<m:field_set 
+				titleMapOut="local.titleMap" 
+				lengthOut="local.fieldCount" 
+				nameListOut="local.definedRecordFields"
+				listOut="local.definedQueryFields"
+				fieldsToInclude=#local.fieldsToQueryFor#
+		>				
+			<m:field title="ID" cfSqlType="CF_SQL_INTEGER">s.svc_id</m:field>
+			<m:field title="Сервис">s.svc</m:field>
+			<m:field title="Сокращение">s.svc_short</m:field>
+			<m:field>s.orchestrator_name</m:field>
+			<m:field>s.synonyms</m:field>
+			<m:field title="Код">s.code</m:field>
+			<m:field title="URL создания">(select url from svc_operation so where so.operation='create' AND so.svc_id=s.svc_id limit 1) as create_url</m:field>
+			<m:field formatter=#function(x){return x NEQ 0}#>s.is_production_ready</m:field>
+			<m:field>s.resource_realm_type_id</m:field>
+			<m:field>s.sort</m:field>
+			<m:field>s.version</m:field>
+			<m:field>s.icon_src</m:field>
+			<m:field>s.descr</m:field>
+			<m:field>s.man</m:field>
+			<m:field>(select count(distinct r.resource_realm)
+				from resource_realm r
+				join resource_realm_access a on (
+				r.resource_realm_id=a.resource_realm_id 
+				AND (a.contract_id IN (
+					select contract_id 
+					from contract d
+					where d.contragent_id=k.contragent_id AND NOT d.is_closed							
+				) OR a.contract_id=0) /*0 means access to any contract*/
+				AND a.is_enabled)
+				where r.resource_realm_type_id=s.resource_realm_type_id) as resource_realm_cnt </m:field> <!--- количество доступных ресурсных платформ --->
+			<m:field>to_char(s.dt_created, 'YYYY-MM-DD"T"HH24:MI:SS.FF3TZHTZM') as dt_created</m:field>
+			<m:field>to_char(s.dt_updated, 'YYYY-MM-DD"T"HH24:MI:SS.FF3TZHTZM') as dt_updated</m:field>
+			<m:field>(coalesce(s.svc,'') ||' '|| coalesce(s.svc_short,'') ||' '|| coalesce(s.synonyms,'')) as svc_extended_name</m:field>
+		</m:field_set>
+		
+
+		
+<!---  --->		
+		<!--- <cfdump var=#local.titleMap#/>
+		<cfdump var=#local.fieldCount#/> --->
+<!---  		fieldsToOutput:<cfdump var=#local.fieldsToOutput#/>
+		fieldsToQueryFor:<cfdump var=#local.fieldsToQueryFor#/>
+		definedRecordFields:<cfdump var=#local.definedRecordFields#/>	
+		 <cfoutput>
+			select <cfif listLen(local.fieldsToOutput)>#local.fieldsToOutput#<cfelse>*</cfif> from 
+			(
+				select 
+				<cfif listLen(local.definedQueryFields)>
+					#preserveSingleQuotes(local.definedQueryFields)#					
+				<cfelse>
+					'' as placeholder
+				</cfif>
+				from svc s 
+				left outer join contragent k on (
+					k.external_uid=<
+				) 
+			) sv			
+			where 1=1 
+			order by <m:order_build sortCollection=#this.helper.parseNumericOrder(local.titleMap, arguments.orderBy)# fieldCount=0/>		
+		</cfoutput>		
+		<cfabort/>	--->
 		
 		
  		<cfquery name="local.qRead" result="local.result">
-			select 
+			select <cfif listLen(local.fieldsToOutput)>#local.fieldsToOutput#<cfelse>*</cfif> from 
-			<m:field_set titleMapOut="local.titleMap" lengthOut="local.fieldCount">
+			(
-				<m:field title="ID" cfSqlType="CF_SQL_INTEGER">s.svc_id</m:field>
+				select 
-				<m:field title="Сервис">s.svc</m:field>
+				<cfif listLen(local.definedQueryFields)>
-				<m:field title="Сокращение">s.svc_short</m:field>
+					#preserveSingleQuotes(local.definedQueryFields)#
-				<m:field>s.orchestrator_name</m:field>
+				<cfelse>
-				<m:field title="Код">s.code</m:field>
+					'' as placeholder
-				<m:field title="URL создания">(select url from svc_operation so where so.operation='create' AND so.svc_id=s.svc_id limit 1) as create_url</m:field>
+				</cfif>
-				<m:field formatter=#function(x){return x NEQ 0}#>s.is_production_ready</m:field>
+				from svc s 
-				<m:field>s.resource_realm_type_id</m:field>
+				left outer join contragent k on (
-				<m:field>s.sort</m:field>
+					k.external_uid=<cfqueryparam cfsqltype="CF_SQL_OTHER" value=#arguments.companyUid# null=#!isValid("guid", arguments.companyUid)#/> 
-				<m:field>s.version</m:field>
+				) /*эти хитрости для того, чтобы втащить cfqueryparam внутрь cfqery*/
-				<m:field>s.icon_src</m:field>
+				where 1=1 
-				<m:field>s.descr</m:field>
+				<cfif len(arguments.search)>
-				<m:field>s.man</m:field>
+					AND (
-				<m:field>(select count(distinct r.resource_realm)
+					lower((coalesce(s.svc,'') ||' '|| coalesce(s.svc_short,'') ||' '|| coalesce(s.synonyms,''))) like lower(<cfqueryparam cfsqltype="cf_sql_varchar" value='%#arguments.search#%'/>)
-					from resource_realm r
+					)
-					join resource_realm_access a on (
+				</cfif>	
-					r.resource_realm_id=a.resource_realm_id 
+			) sv			
-					AND (a.contract_id IN (
+			where 1=1 <m:filter_build filter=#filter#/>			
-						select contract_id 
+			order by <m:order_build sortCollection=#this.helper.parseNumericOrder(local.titleMap, arguments.orderBy)# fieldCount=0/><!---no sort length limit--->
-						from contract d
-						join contragent z on (d.contragent_id=z.contragent_id)
-						where z.external_uid=<cfqueryparam cfsqltype="CF_SQL_OTHER" value=#arguments.companyUid# null=#!isValid("guid", arguments.companyUid)#/> 
-						AND NOT d.is_closed							
-					) OR a.contract_id=0) /*0 means access to any contract*/
-					AND a.is_enabled)
-					where r.resource_realm_type_id=s.resource_realm_type_id) as resource_realm_cnt </m:field> <!--- количество доступных ресурсных платформ --->
-				<m:field>to_char(s.dt_created, 'YYYY-MM-DD"T"HH24:MI:SS.FF3TZHTZM') as dt_created</m:field>
-				<m:field>to_char(s.dt_updated, 'YYYY-MM-DD"T"HH24:MI:SS.FF3TZHTZM') as dt_updated</m:field>
-			</m:field_set>	
-			from svc s 
-			--left outer join svc_group on ()
-				where 1=1 			<m:filter_build filter=#filter#/>
-				order by <m:order_build sortCollection=#this.helper.parseNumericOrder(local.titleMap, arguments.orderBy)# fieldCount=0/><!---no sort length limit--->
-				--limit #maxrows#
 		</cfquery>  
 		
+		
 		<cftry>
 			<cfquery name="local.qTotal">
 				select count(*) as cnt
@@ -103,7 +211,6 @@
 				where 1=1 
 			</cfquery> 
 			<cfcatch type="any">
-<!--- 				<cfreturn representationOf(createObject("java", "java.lang.System").getEnv())/>	 --->			
 				<cfreturn representationOf(cfcatch)/>				
 			</cfcatch>
 		</cftry>

v1/resources/vault_record.cfc

@@ -123,7 +123,7 @@
 		
 		<cfset var out = structNew("linked")/>
 		<cfset "out.name" = #arguments.secretName#/>
-		<cfset "out.value" = #serializeJson(local.vaultData)#/><!--- cast any to string --->
+		<cfset "out.value" = #isSimpleValue(local.vaultData)? local.vaultData : serializeJson(local.vaultData)#/><!--- cast any to string --->
 		<cfset "out.queryDurationMs"=getTickCount() - request.startTickCount/>	
 		<cfset "out.runDurationMs"=getTickCount() - request.startTickCount/>
 		<cfreturn representationOf(out) />