← Back to branch summary

~ubuntu-branches/ubuntu/quantal/aqsis/quantal

« back to all changes in this revision

Viewing changes to libs/core/api/ri_debug.xsl

  • Committer: Bazaar Package Importer
  • Author(s): Fabrice Coutadeur
  • Date: 2009-08-06 04:53:26 UTC
  • mfrom: (1.2.3 upstream)
  • Revision ID: james.westby@ubuntu.com-20090806045326-z6xeaaao62idxcc6
Tags: 1.6.0-0ubuntu1
* New upstream release
* debian/control:
  - changed name of lib package to libaqsis1 instead of aqsis-libsc2a
  - changed name of dev package to libaqsis-dev instead of aqsis-libs-dev
  - Added aqsis-data package
  - Revised summary text according to that specified by the RISpec (Pixar)
* Moved examples installation from aqsis.install to aqsis-data.install
* debian/rules: 
  - added content to binary-indep target
* debian/rules: added explicit name of mime file to force dh_installmime
  to generate postinst and prerm scripts

Show diffs side-by-side

added added

removed removed

Lines of Context:
libs/core/api/ri_debug.xsl
 
1
<?xml version="1.0" encoding="UTF-8" ?>
 
2
 
 
3
<!DOCTYPE interface [
 
4
        <!ENTITY cr "&#xa;">
 
5
        <!ENTITY tab "&#x9;">
 
6
        <!-- Ugly hack - need to redeclare xmlns:xsl to workaround an xsltproc bug. -->
 
7
        <!ENTITY space "<xsl:text xmlns:xsl='http://www.w3.org/1999/XSL/Transform'> </xsl:text>">
 
8
]>
 
9
 
 
10
<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0">
 
11
        <xsl:output method="text"/>
 
12
        <xsl:strip-space elements="RiAPI"/>
 
13
        <xsl:include href="api_utils.xsl"/>
 
14
 
 
15
 
 
16
        <!--    API     -->
 
17
        <xsl:template match="RiAPI">
 
18
                <!--    Procedures      -->
 
19
                <xsl:apply-templates select="Procedures/Procedure"/>
 
20
                <xsl:apply-templates select="Procedures/Procedure" mode="macro"/>
 
21
        </xsl:template>
 
22
 
 
23
 
 
24
        <!--    Procedure       -->
 
25
        <xsl:template match="Procedure">
 
26
                <xsl:value-of select="concat('void ', Name, 'Debug(')"/>
 
27
                <xsl:apply-templates select="Arguments" mode="procedure_formals"/>
 
28
                <xsl:text>)&#xa;</xsl:text>
 
29
                <xsl:text>{&#xa;</xsl:text>
 
30
                <xsl:text>&#x9;if(QGetRenderContext() == 0 || !QGetRenderContext()->poptCurrent()) return;&#xa;</xsl:text>
 
31
                <xsl:text>&#x9;const TqInt* poptEcho = QGetRenderContext()->poptCurrent()->GetIntegerOption( "statistics", "echoapi" );&#xa;</xsl:text>
 
32
                <xsl:text>&#x9;if(poptEcho != 0 &amp;&amp; *poptEcho != 0 )&#xa;</xsl:text>
 
33
                <xsl:text>&#x9;{&#xa;</xsl:text>
 
34
                <xsl:text>&#x9;&#x9;std::stringstream _message;&#xa;</xsl:text>
 
35
                <xsl:value-of select="concat('&#x9;&#x9;_message &lt;&lt; &quot;', Name, ' &quot;;&#xa;')"/>
 
36
                <xsl:apply-templates select="Arguments" mode="arg_output"/>
 
37
                <xsl:text>&#x9;&#x9;Aqsis::log() &lt;&lt;  _message.str().c_str() &lt;&lt; std::endl;&#xa;</xsl:text>
 
38
                <xsl:text>&#x9;}&#xa;</xsl:text>
 
39
                <xsl:text>}&#xa;</xsl:text>
 
40
        </xsl:template>
 
41
 
 
42
<xsl:template match="Procedure" mode="macro">
 
43
#define DEBUG_<xsl:value-of select="translate(Name, 'abcdefghijklmnopqrstuvwxyz', 'ABCDEFGHIJKLMNOPQRSTUVWXYZ')"/>
 
44
        &space;<xsl:value-of select="Name"/>Debug(<xsl:apply-templates select="Arguments" mode="procedure_call"/>);
 
45
</xsl:template>
 
46
 
 
47
 
 
48
        <!--    Argument copy within the constructor    -->
 
49
        <xsl:template match="Arguments" mode="arg_output">
 
50
                <xsl:apply-templates select="Argument" mode="arg_output"/>
 
51
                <xsl:if test="ParamList">
 
52
                        <xsl:text>&#x9;&#x9;// Output the plist here.&#xa;</xsl:text>
 
53
                        <xsl:text>
 
54
                int uniform_size = 1;
 
55
                int varying_size = 1;
 
56
                int vertex_size = 1;
 
57
                int facevarying_size = 1;
 
58
                int facevertex_size = 1;
 
59
</xsl:text>
 
60
                        <xsl:if test="../UniformSize">
 
61
                                <xsl:value-of select="../UniformSize"/>
 
62
                        </xsl:if>
 
63
                        <xsl:if test="../VaryingSize">
 
64
                                <xsl:value-of select="../VaryingSize"/>
 
65
                        </xsl:if>
 
66
                        <xsl:if test="../VertexSize">
 
67
                                <xsl:value-of select="../VertexSize"/>
 
68
                        </xsl:if>
 
69
                        <xsl:if test="../FaceVaryingSize">
 
70
                                <xsl:value-of select="../FaceVaryingSize"/>
 
71
                        </xsl:if>
 
72
                        <xsl:if test="../FaceVertexSize">
 
73
                                <xsl:value-of select="../FaceVertexSize"/>
 
74
                        </xsl:if>
 
75
                        <xsl:text>              DebugPlist(count, tokens, values, SqInterpClassCounts(uniform_size, varying_size,
 
76
                        vertex_size, facevarying_size, facevertex_size), _message);&#xa;</xsl:text>
 
77
                </xsl:if>
 
78
        </xsl:template>
 
79
        <xsl:template match="Argument" mode="arg_output">
 
80
                <xsl:choose>
 
81
                        <xsl:when test="contains( Type, 'Array')">
 
82
                                <xsl:choose>
 
83
                                        <xsl:when test="./Length">
 
84
                                                <xsl:value-of select="./Length"/>
 
85
                                        </xsl:when>
 
86
                                        <xsl:otherwise>
 
87
                                                <xsl:text>&#x9;// \note: Need to specify the length method here!&#xa;</xsl:text>
 
88
                                                <xsl:value-of select="concat('&#x9;int __', Name, '_length = 1;&#xa;')"/>
 
89
                                        </xsl:otherwise>
 
90
                                </xsl:choose>
 
91
                                <xsl:value-of select="concat('&#x9;&#x9;_message &lt;&lt; ', Name, ';&#xa;')"/>
 
92
                                <xsl:value-of select="concat('&#x9;&#x9;int __', Name, '_index;&#xa;')"/>
 
93
                                <xsl:value-of select="concat('&#x9;&#x9;for(__', Name, '_index = 0; __', Name, '_index&lt;__', Name, '_length; __', Name, '_index++)&#xa;')"/>
 
94
                                <xsl:text>&#x9;&#x9;{&#xa;</xsl:text>
 
95
                                <xsl:choose>
 
96
                                        <xsl:when test="Type = 'RtTokenArray' or Type = 'RtStringArray'">
 
97
                                                <xsl:value-of select="concat('&#x9;&#x9;&#x9;_message &lt;&lt; ', Name, '[__', Name, '_index];&#xa;')"/>
 
98
                                        </xsl:when>
 
99
                                        <xsl:when test="Type = 'RtColorArray' or Type = 'RtPointArray'">
 
100
                                                <xsl:value-of select="concat('&#x9;&#x9;&#x9;_message &lt;&lt; ', Name, '[__', Name, '_index][0] &lt;&lt; &quot; &quot; &lt;&lt; ', Name, '[__', Name, '_index][1] &lt;&lt; &quot; &quot; &lt;&lt; ', Name, '[__', Name, '_index][2];&#xa;')"/>
 
101
                                        </xsl:when>
 
102
                                        <xsl:otherwise>
 
103
                                                <xsl:value-of select="concat('&#x9;&#x9;&#x9;_message &lt;&lt; ', Name, '[__', Name, '_index];&#xa;')"/>
 
104
                                        </xsl:otherwise>
 
105
                                </xsl:choose>
 
106
                                <xsl:text>&#x9;}&#xa;</xsl:text>
 
107
                        </xsl:when>
 
108
                        <xsl:otherwise>
 
109
                                <xsl:choose>
 
110
                                        <xsl:when test="Type = 'RtToken' or Type = 'RtString'">
 
111
                                                <xsl:value-of select="concat('&#x9;&#x9;_message &lt;&lt; &quot;\&quot;&quot; &lt;&lt; ', Name, ' &lt;&lt; &quot;\&quot; &quot;;&#xa;')"/>
 
112
                                        </xsl:when>
 
113
                                        <xsl:when test="Type = 'RtColor' or Type = 'RtPoint'">
 
114
                                                <xsl:value-of select="concat('&#x9;&#x9;_message &lt;&lt; ', Name, '[0] &lt;&lt; &quot; &quot; &lt;&lt; ', Name, '[1] &lt;&lt; &quot; &quot; &lt;&lt; ', Name, '[2];&#xa;')"/>
 
115
                                        </xsl:when>
 
116
                                        <xsl:when test="Type = 'RtMatrix' or Type = 'RtBasis'">
 
117
                                                <xsl:value-of select="string('&#x9;&#x9;_message &lt;&lt; &quot;[&quot;;&#xa;')"/>
 
118
                                                <xsl:value-of select="concat('&#x9;&#x9;int __', Name, '_i, __', Name, '_j;&#xa;')"/>
 
119
                                                <xsl:value-of select="concat('&#x9;&#x9;for(__', Name, '_j = 0; __', Name, '_j&lt;4; __', Name, '_j++)&#xa;')"/>
 
120
                                                <xsl:value-of select="concat('&#x9;&#x9;&#x9;for(__', Name, '_i = 0; __', Name, '_i&lt;4; __', Name, '_i++)&#xa;')"/>
 
121
                                                <xsl:value-of select="concat('&#x9;&#x9;&#x9;&#x9;_message &lt;&lt; ', Name, '[__', Name, '_j][__', Name, '_i] &lt;&lt; &quot; &quot;;&#xa;')"/>
 
122
                                                <xsl:value-of select="string('&#x9;&#x9;_message &lt;&lt; &quot;]&quot; &lt;&lt; &quot; &quot;;&#xa;')"/>
 
123
                                        </xsl:when>
 
124
                                        <xsl:when test="Type = 'RtBound'">
 
125
                                                <xsl:value-of select="concat('&#x9;&#x9;_message &lt;&lt; ', Name, '[0] &lt;&lt; &quot; &quot;;&#xa;')"/>
 
126
                                                <xsl:value-of select="concat('&#x9;&#x9;_message &lt;&lt; ', Name, '[1] &lt;&lt; &quot; &quot;;&#xa;')"/>
 
127
                                                <xsl:value-of select="concat('&#x9;&#x9;_message &lt;&lt; ', Name, '[2] &lt;&lt; &quot; &quot;;&#xa;')"/>
 
128
                                                <xsl:value-of select="concat('&#x9;&#x9;_message &lt;&lt; ', Name, '[3] &lt;&lt; &quot; &quot;;&#xa;')"/>
 
129
                                                <xsl:value-of select="concat('&#x9;&#x9;_message &lt;&lt; ', Name, '[4] &lt;&lt; &quot; &quot;;&#xa;')"/>
 
130
                                                <xsl:value-of select="concat('&#x9;&#x9;_message &lt;&lt; ', Name, '[5] &lt;&lt; &quot; &quot;;&#xa;')"/>
 
131
                                        </xsl:when>
 
132
                                        <xsl:otherwise>
 
133
                                                <xsl:if test="not(Name = '...') and not(Name = '')">
 
134
                                                        <xsl:value-of select="concat('&#x9;&#x9;_message &lt;&lt; ', Name, ' &lt;&lt; &quot; &quot;;&#xa;')"/>
 
135
                                                </xsl:if>
 
136
                                        </xsl:otherwise>
 
137
                                </xsl:choose>
 
138
                        </xsl:otherwise>
 
139
                </xsl:choose>
 
140
        </xsl:template>
 
141
 
 
142
</xsl:stylesheet>