analytics/templates/ps/tm1/103/serverContent.xts

<?xml version="1.0" encoding="UTF-8"?>
<!--
   Copyright (C) 2008 Cognos Incorporated. All rights reserved.
   Cognos (R) is a trademark of Cognos Incorporated.
-->
<xts:morphlet xmlns:xts="http://developer.cognos.com/schemas/xts/">
	<xts:block id="dologin" type="exec" mode="interpret" processor="XSLT"
		xmlns:pf="http://developer.cognos.com/schemas/xts/pf" >
		<!-- This block requests NavigationTree from chosen TM1 server for the first time.
			This request is expected to fail with HTTP 302 (Found) and the same location as given.
			It also returns one to many cookies that are required in subsequent requests.
		  -->
		<xts:logicsheet path="logicsheets/portal.xsl"/>
		<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform" xmlns:bus="http://developer.cognos.com/schemas/bibus/3/" xmlns:xtsext="xalan://com.cognos.xts.ext.XTSExt" xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" exclude-result-prefixes="xts xtsext xsl pf bus soapenv xsd xsi">
			<xsl:output method="xml" version="1.0" encoding="UTF-8" indent="no"/>
			<pf:variables/>
			<xsl:variable name="timeout" select="'200'"/>
			<xsl:template match="/">
				<xts:sequence>
					<xts:update select="/root/openNavTree1">
						<openNavTree1>
						<xts:request protocol="GET" faultBlock="handleNavTreeFault" protocolHeader="true" >
							<xsl:attribute name="href">
								<xsl:choose>
									<xsl:when test="key('env-param','https') and key('env-param','https') != '0' ">
											<xsl:text>https://</xsl:text>
									</xsl:when>
									<xsl:otherwise>
										<xsl:text>http://</xsl:text>
									</xsl:otherwise>
								</xsl:choose>
								<xsl:value-of select="key('env-param','TM1WebHost')"/>
								<xsl:text>:</xsl:text>
								<xsl:choose>
									<xsl:when test="key('env-param', 'TM1WebPort') != ''">
										<xsl:value-of select="key('env-param','TM1WebPort')"/>
									</xsl:when>
									<xsl:otherwise>
										<xsl:text>9510</xsl:text>
									</xsl:otherwise>
								</xsl:choose>
								<xsl:text>/</xsl:text>
								<xsl:value-of select="key('env-param','TM1WebVirtualDirectory')"/>
								<xsl:choose>
									<xsl:when test="key('env-param','TM1username') and key('env-param','TM1username') != '' ">
										<xsl:text>/services/TM1Service?method=loginServer</xsl:text>
										<xsl:text>&amp;userName=</xsl:text>
										<xsl:value-of select="key('env-param','TM1username')"/>
										<xsl:text>&amp;password=</xsl:text>
										<xsl:value-of select="key('env-param','TM1pass')"/>
									</xsl:when>
									<xsl:otherwise>
										<xsl:text>/services/TM1Service?method=loginServerCAM</xsl:text>
										<xsl:text>&amp;camPassport=</xsl:text>
										<xsl:value-of select="xtsext:urlencode($passport)"/>
									</xsl:otherwise>
								</xsl:choose>
								<xsl:text>&amp;serverName=</xsl:text>
								<xsl:value-of select="key('env-param','TM1DataServer')"/>
								<xsl:text>&amp;host=</xsl:text>
								<xsl:value-of select="key('env-param','TM1Host')"/>
							</xsl:attribute>
							<xsl:if test="$timeout">
								<xts:param name="timeout">
									<xsl:value-of select="number($timeout) * 1000 "/>
								</xts:param>
							</xsl:if>
						</xts:request>
						</openNavTree1>
					</xts:update>
				</xts:sequence>
			</xsl:template>
		</xsl:stylesheet>
	</xts:block>
	<xts:block id="transformNavTreeContent" type="exec" mode="interpret" dependency="dologin" processor="XSLT" xmlns:pf="http://developer.cognos.com/schemas/xts/pf" mandatory="false">
		<xts:logicsheet path="logicsheets/portal.xsl"/>
		<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform" xmlns:bus="http://developer.cognos.com/schemas/bibus/3/" xmlns:xtsext="xalan://com.cognos.xts.ext.XTSExt" xmlns:xos="http://developer.cognos.com/schemas/xts/output/" xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" exclude-result-prefixes="xts xtsext xsl pf bus xos xsd xsi soapenv">
			<xsl:output method="xml" version="1.0" encoding="UTF-8" indent="no"/>
			<pf:variables/>
			<xsl:template match="/root">
				<xts:sequence>
					<xts:append select="/root/output">
						<xts:transform processor="XSLT" src="/tm1/103/getServerTransform.xslt" option="part" mimeType="application/atom+xml">
							<xts:param name="messageBase">/messages/tm1buxmsgs.xml</xts:param>
							<root>
								<xsl:if test="key('env-param', 'Id') != ''">
									<Id>
										<xsl:value-of select="key('env-param','Id')"/>
									</Id>
								</xsl:if>
								<xsl:if test="key('env-param', 'TM1WebHost') != ''">
									<TM1WebURL>
										<xsl:choose>
											<xsl:when test="key('env-param','https') and key('env-param','https') != '0' ">
		 										<xsl:text>https://</xsl:text>
											</xsl:when>
											<xsl:otherwise>
												<xsl:text>http://</xsl:text>
											</xsl:otherwise>
										</xsl:choose>
									
										<xsl:value-of select="xtsext:urlencode(key('env-param','TM1WebHost'))"/>
										<xsl:text>:</xsl:text>
										<xsl:choose>
											<xsl:when test="key('env-param', 'TM1WebPort') != ''">
												<xsl:value-of select="key('env-param','TM1WebPort')"/>
											</xsl:when>
											<xsl:otherwise>
												<xsl:text>9510</xsl:text>
											</xsl:otherwise>
										</xsl:choose>
									</TM1WebURL>
								</xsl:if>
								<xsl:if test="key('env-param', 'TM1WebURL') != ''">
									<TM1WebURL>
										<xsl:value-of select="xtsext:urlencode(key('env-param','TM1WebURL'))"/>
									</TM1WebURL>
								</xsl:if>
								<xsl:if test="key('env-param', 'FilterPackages') != ''">
									<FilterPackages>
										<xsl:value-of select="xtsext:urlencode(key('env-param','FilterPackages'))"/>
									</FilterPackages>
								</xsl:if>
								<xsl:if test="key('env-param', 'TM1WebVirtualDirectory') != ''">
									<TM1WebVirtualDirectory>
										<xsl:value-of select="xtsext:urlencode(key('env-param','TM1WebVirtualDirectory'))"/>
									</TM1WebVirtualDirectory>
								</xsl:if>
								<xsl:if test="key('env-param', 'TM1Host') != ''">
									<TM1Host>
										<xsl:value-of select="key('env-param','TM1Host')"/>
									</TM1Host>
								</xsl:if>
								<xsl:if test="key('env-param', 'TM1DataServer') != ''">
									<TM1DataServer>
										<xsl:value-of select="xtsext:urlencode(key('env-param','TM1DataServer'))"/>
									</TM1DataServer>
								</xsl:if>
								<xsl:if test="key('env-param', 'NavTreeDisplayServerView') != ''">
									<TM1DisplayViews>
										<xsl:value-of select="xtsext:urlencode(key('env-param','NavTreeDisplayServerView'))"/>
									</TM1DisplayViews>
								</xsl:if>
								<xsl:if test="key('env-param', 'TM1username') != ''">
									<TM1username>
										<xsl:value-of select="key('env-param','TM1username')"/>
									</TM1username>
								</xsl:if>
								<xsl:if test="key('env-param', 'TM1pass') != ''">
									<TM1pass>
										<xsl:value-of select="key('env-param','TM1pass')"/>
									</TM1pass>
								</xsl:if>
								<xsl:if test="key('env-param', 'TM1Toolbar') != ''">
									<TM1Toolbar>
										<xsl:value-of select="key('env-param','TM1Toolbar')"/>
									</TM1Toolbar>
								</xsl:if>
								<xsl:if test="key('env-param', 'ASPSessionId') != ''">
									<JSESSIONID>
										<xsl:value-of select="key('env-param','JSESSIONID')"/>
									</JSESSIONID>
								</xsl:if>
								<xsl:if test="key('env-param', 'sessionToken') != ''">
									<sessionToken>
										<xsl:value-of select="key('env-param','sessionToken')"/>
									</sessionToken>
								</xsl:if>

								<!-- Here's where the cookies get sent -->
								<xsl:for-each select="/root/openNavTree1/xos:protocolHeader/xos:param[@name='Set-Cookie']">
									<!-- For each cookie returned in previous request -->
									<JSESSIONID>
										<xsl:value-of select="xtsext:urlencode(text())"/>
									</JSESSIONID>
								</xsl:for-each>

								<GatewayURL>
									<xsl:value-of select="$gateway"/>
								</GatewayURL>
								<WebRootURL>
									<xsl:value-of select="$webRoot"/>
								</WebRootURL>
								<TM1pass2>
									<xsl:text>id0</xsl:text>
								</TM1pass2>

								<xsl:copy-of select="/root/openNavTree1/soapenv:Envelope/soapenv:Body/loginServerCAMResponse"/>
								<xsl:copy-of select="/root/openNavTree1/soapenv:Envelope/soapenv:Body/loginServerResponse"/>
							</root>
						</xts:transform>
					</xts:append>
				</xts:sequence>
			</xsl:template>
		</xsl:stylesheet>
	</xts:block>

	<!-- = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = -->
	<xts:block id="handleNavTreeFault" type="fault" processor="XSLT">
		<xsl:stylesheet version="1.0" 
				xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
				xmlns:xtse="http://developer.cognos.com/schemas/xts/error/1/">
			<xsl:output method="xml" version="1.0" encoding="UTF-8" indent="no"/>

			<xsl:template match="/">
				<xtse:error>
					<xsl:for-each select="/root/fault/xts:exception[not(starts-with(xts:exceptionCode, 'java'))]">
						<xtse:message>
							<xsl:value-of select="xts:exceptionMsg"/>
						</xtse:message>
						<xtse:detail>
							<xsl:for-each select="xts:exceptionDetail">
								<xsl:call-template name="copyTree"/>
							</xsl:for-each>
						</xtse:detail>
					</xsl:for-each>
				</xtse:error>
			</xsl:template>
			<xsl:template name="copyTree">
				<xsl:param name="nodes" select="."/>
				<xsl:for-each select="$nodes">
					<xsl:copy>
						<xsl:for-each select="@*">
					<xsl:copy/>
				</xsl:for-each>
				<xsl:call-template name="copyTree">
					<xsl:with-param name="nodes" select="*|text()|comment()"/>
				</xsl:call-template>
				</xsl:copy>
				</xsl:for-each>
			</xsl:template>
		</xsl:stylesheet>
	</xts:block>

</xts:morphlet>