|
2
|
1 <?xml version="1.0" encoding="UTF-8"?>
|
|
|
2 <xsl:stylesheet version="1.0"
|
|
|
3 xmlns:xsl="http://www.w3.org/1999/XSL/Transform" xmlns:m="http://implab.org/schemas/data-model.v1.xsd"
|
|
|
4 xmlns:clr="http://implab.org/schemas/data-model/dotnet.v1.xsd"
|
|
|
5 xmlns:cs="http://implab.org/schemas/code-dom/csharp.v1.xsd" xmlns:sql="http://implab.org/schemas/data-model/sql.v1.xsd"
|
|
|
6 xmlns:t="http://implab.org/schemas/temp" xmlns:exsl="http://exslt.org/common"
|
|
|
7 exclude-result-prefixes="clr m xsl exsl sql">
|
|
|
8 <xsl:import href="model.xsl"/>
|
|
|
9
|
|
|
10 <xsl:output method="xml" indent="yes" />
|
|
|
11
|
|
3
|
12 <!-- generate code for primary package -->
|
|
|
13 <xsl:template match="m:package[@primary='true' and @clr:namespace]" mode="document">
|
|
|
14 <cs:namespace name="{@clr:namespace}">
|
|
|
15 <xsl:apply-templates mode="document" />
|
|
|
16 </cs:namespace>
|
|
|
17 </xsl:template>
|
|
|
18
|
|
|
19 <xsl:template match="m:package[@primary='true']" mode="document">
|
|
|
20 <xsl:apply-templates mode="document" />
|
|
|
21 </xsl:template>
|
|
|
22
|
|
2
|
23 <!-- entity -->
|
|
|
24 <xsl:template match="m:entity" mode="document">
|
|
|
25 <xsl:apply-templates select="." mode="entity"/>
|
|
|
26 </xsl:template>
|
|
|
27
|
|
|
28 <xsl:template match="m:entity" mode="entity">
|
|
5
|
29 <!-- select all members -->
|
|
4
|
30 <xsl:variable name="members">
|
|
6
|
31 <xsl:apply-templates mode="filter-members"/>
|
|
4
|
32 </xsl:variable>
|
|
5
|
33
|
|
3
|
34 <cs:class modifiers="partial">
|
|
5
|
35 <!-- generate class name -->
|
|
2
|
36 <xsl:attribute name="name">
|
|
|
37 <xsl:apply-templates select="." mode="class-name"/>
|
|
|
38 </xsl:attribute>
|
|
5
|
39 <xsl:attribute name="modifiers">
|
|
|
40 <xsl:apply-templates select="." mode="class-modifiers"/>
|
|
|
41 </xsl:attribute>
|
|
|
42
|
|
2
|
43 <xsl:apply-templates mode="class-attributes" />
|
|
4
|
44 <xsl:apply-templates select="exsl:node-set($members)" mode="members" />
|
|
2
|
45 </cs:class>
|
|
|
46 </xsl:template>
|
|
|
47
|
|
|
48 <!-- class-name -->
|
|
|
49 <xsl:template match="*[@name]" mode="class-name">
|
|
|
50 <xsl:value-of select="@name"/>
|
|
|
51 </xsl:template>
|
|
|
52
|
|
|
53 <xsl:template match="*[@clr:name]" mode="class-name">
|
|
|
54 <xsl:value-of select="@clr:name"/>
|
|
|
55 </xsl:template>
|
|
|
56
|
|
5
|
57 <!-- class-modifiers -->
|
|
|
58 <xsl:template match="*" mode="class-modifiers">
|
|
|
59 <xsl:text>partial</xsl:text>
|
|
|
60 </xsl:template>
|
|
|
61
|
|
2
|
62 <!-- class-attributes -->
|
|
|
63 <xsl:template match="*|text()" mode="class-attributes" />
|
|
|
64
|
|
|
65 <xsl:template match="sql:table" mode="class-attributes">
|
|
|
66 <cs:attribute>
|
|
|
67 <cs:type name="Table" namespace="Linq2Db" />
|
|
|
68 <cs:parameter><cs:string text="{@name}"/></cs:parameter>
|
|
|
69 </cs:attribute>
|
|
|
70 </xsl:template>
|
|
|
71
|
|
|
72 <!-- generate members -->
|
|
|
73
|
|
|
74 <xsl:template match="*|text()" mode="members" />
|
|
|
75
|
|
7
|
76 <xsl:template match="m:primaryKey | m:property" mode="members">
|
|
2
|
77 <t:trace msg="{name()} {@name}"/>
|
|
|
78 <xsl:apply-templates select="." mode="property"/>
|
|
|
79 </xsl:template>
|
|
|
80
|
|
|
81 <!-- member-name -->
|
|
|
82 <xsl:template match="*|text()|@*" mode="member-name" />
|
|
|
83
|
|
|
84 <xsl:template match="*[@name]" mode="member-name">
|
|
|
85 <xsl:value-of select="@name"/>
|
|
|
86 </xsl:template>
|
|
|
87 <xsl:template match="*[@clr:name]" mode="member-name">
|
|
|
88 <xsl:value-of select="@clr:name"/>
|
|
|
89 </xsl:template>
|
|
|
90
|
|
|
91 <!-- member-type -->
|
|
|
92 <xsl:template match="*|text()|@*" mode="member-type" />
|
|
|
93
|
|
|
94 <xsl:template match="*[@type]" mode="member-type">
|
|
|
95 <xsl:call-template name="getClrType">
|
|
|
96 <xsl:with-param name="type" select="@type" />
|
|
|
97 </xsl:call-template>
|
|
|
98 </xsl:template>
|
|
|
99
|
|
|
100 <xsl:template match="*[clr:type]" mode="member-type">
|
|
|
101 <xsl:apply-templates select="clr:type" mode="clr-type" />
|
|
|
102 </xsl:template>
|
|
|
103
|
|
|
104 <!-- member-attributes -->
|
|
|
105 <xsl:template match="*|text()" mode="member-attributes"/>
|
|
|
106
|
|
|
107 <!-- member-extension -->
|
|
|
108 <xsl:template match="*|text()" mode="member-extension"/>
|
|
|
109 <xsl:template match="*" mode="member-extension">
|
|
|
110 <xsl:apply-templates mode="member-extension-comments"/>
|
|
|
111 </xsl:template>
|
|
|
112
|
|
|
113 <xsl:template match="m:hasA/* | m:hasMany/*" mode="member-extension">
|
|
|
114 <xsl:variable name="comments" select="../m:description | m:description"/>
|
|
|
115 <xsl:apply-templates select="$comments[position() = count($comments)]" mode="member-extension-comments"/>
|
|
|
116 </xsl:template>
|
|
|
117
|
|
|
118 <!-- member-extension-comments -->
|
|
|
119 <xsl:template match="*|text()" mode="member-extension-comments"/>
|
|
|
120
|
|
|
121 <xsl:template match="m:description" mode="member-extension-comments">
|
|
|
122 <cs:comments>
|
|
|
123 <xsl:apply-templates mode="comments" />
|
|
|
124 </cs:comments>
|
|
|
125 </xsl:template>
|
|
|
126
|
|
|
127 <!-- property -->
|
|
|
128
|
|
|
129 <xsl:template match="*" mode="property">
|
|
|
130 <cs:property modifiers="public">
|
|
6
|
131 <xsl:attribute name="name"><xsl:apply-templates select="." mode="member-name"/></xsl:attribute>
|
|
|
132 <xsl:attribute name="modifiers"><xsl:apply-templates select="." mode="member-modifiers"/></xsl:attribute>
|
|
|
133 <xsl:apply-templates select="." mode="member-type"/>
|
|
|
134 <xsl:apply-templates select="." mode="member-attributes"/>
|
|
|
135 <xsl:apply-templates select="." mode="member-extension" />
|
|
2
|
136 <xsl:apply-templates select="." mode="property-accessors"/>
|
|
|
137 </cs:property>
|
|
|
138 </xsl:template>
|
|
|
139
|
|
5
|
140
|
|
6
|
141 <!-- member-name -->
|
|
|
142 <xsl:template match="m:hasA/clr:association[not(@name|@clr:name)]" mode="member-name">
|
|
2
|
143 <!-- if the association doesn't define a name, use it from the parent node -->
|
|
6
|
144 <xsl:apply-templates select=".." mode="member-name"/>
|
|
2
|
145 </xsl:template>
|
|
6
|
146 <xsl:template match="m:hasMany/clr:association[not(@name|@clr:name)]" mode="member-name">
|
|
2
|
147 <!-- if the association doesn't define a name, use it from the parent node -->
|
|
6
|
148 <xsl:apply-templates select=".." mode="member-name"/>
|
|
2
|
149 </xsl:template>
|
|
|
150
|
|
6
|
151 <!-- member-modifiers -->
|
|
|
152 <xsl:template match="*" mode="member-modifiers">
|
|
3
|
153 <xsl:text>public</xsl:text>
|
|
|
154 </xsl:template>
|
|
|
155
|
|
6
|
156 <!-- member-type -->
|
|
|
157 <xsl:template match="m:hasA[@type]/clr:association[not(clr:type)]" mode="member-type">
|
|
|
158 <xsl:apply-templates select=".." mode="member-type"/>
|
|
5
|
159 </xsl:template>
|
|
|
160
|
|
6
|
161 <xsl:template match="m:hasMany[@type]/clr:association[not(clr:type)]" mode="member-type">
|
|
2
|
162 <cs:array>
|
|
6
|
163 <xsl:apply-templates select=".." mode="member-type"/>
|
|
2
|
164 </cs:array>
|
|
|
165 </xsl:template>
|
|
|
166
|
|
6
|
167 <xsl:template match="m:hasA[@type]/m:thisKey" mode="member-type">
|
|
5
|
168 <xsl:variable name="otherKey">
|
|
3
|
169 <xsl:call-template name="getPrimaryKey">
|
|
2
|
170 <xsl:with-param name="type" select="../@type"/>
|
|
|
171 </xsl:call-template>
|
|
5
|
172 </xsl:variable>
|
|
|
173 <xsl:choose>
|
|
|
174 <xsl:when test="@optional">
|
|
6
|
175 <cs:nullable>
|
|
|
176 <xsl:apply-templates select="exsl:node-set($otherKey)" mode="member-type"/>
|
|
|
177 </cs:nullable>
|
|
5
|
178 </xsl:when>
|
|
|
179 <xsl:otherwise>
|
|
6
|
180 <xsl:apply-templates select="exsl:node-set($otherKey)" mode="member-type"/>
|
|
5
|
181 </xsl:otherwise>
|
|
|
182 </xsl:choose>
|
|
2
|
183 </xsl:template>
|
|
|
184
|
|
6
|
185 <!-- member-attributes -->
|
|
|
186 <xsl:template match="m:primaryKey" mode="member-attributes">
|
|
2
|
187 <cs:attribute>
|
|
|
188 <cs:type name="PrimaryKey" namespace="Linq2Db" />
|
|
|
189 </cs:attribute>
|
|
|
190 </xsl:template>
|
|
|
191
|
|
6
|
192 <xsl:template match="m:hasA/clr:association" mode="member-attributes">
|
|
2
|
193 <cs:attribute>
|
|
|
194 <cs:type name="Association" namespace="Linq2Db"/>
|
|
|
195 <cs:parameter name="thisKey">
|
|
|
196 <cs:nameOf>
|
|
6
|
197 <xsl:call-template name="getClrMemberReference">
|
|
2
|
198 <xsl:with-param name="memberName" select="../@name"/>
|
|
6
|
199 <xsl:with-param name="type" select="../@declaringType"/>
|
|
2
|
200 </xsl:call-template>
|
|
|
201 </cs:nameOf>
|
|
|
202 </cs:parameter>
|
|
|
203 <cs:parameter name="otherKey">
|
|
|
204 <cs:nameOf>
|
|
6
|
205 <xsl:call-template name="getClrKeyReference">
|
|
2
|
206 <xsl:with-param name="type" select="../@type"/>
|
|
|
207 </xsl:call-template>
|
|
|
208 </cs:nameOf>
|
|
|
209 </cs:parameter>
|
|
|
210 </cs:attribute>
|
|
|
211 </xsl:template>
|
|
|
212
|
|
6
|
213 <xsl:template match="m:hasMany/clr:association" mode="member-attributes">
|
|
2
|
214 <cs:attribute>
|
|
|
215 <cs:type name="Association" namespace="Linq2Db"/>
|
|
|
216 <!-- thisKey points to own primaryKey which may be inherited, using getKeyName to address such cases -->
|
|
|
217 <cs:parameter name="thisKey">
|
|
|
218 <cs:nameOf>
|
|
6
|
219 <xsl:call-template name="getClrKeyReference">
|
|
2
|
220 <xsl:with-param name="type" select="../../@name"/>
|
|
|
221 </xsl:call-template>
|
|
|
222 </cs:nameOf>
|
|
|
223 </cs:parameter>
|
|
|
224 <cs:parameter name="otherKey">
|
|
|
225 <cs:nameOf>
|
|
6
|
226 <xsl:call-template name="getClrMemberReference">
|
|
2
|
227 <xsl:with-param name="type" select="../@type"/>
|
|
|
228 <xsl:with-param name="memberName" select="../m:otherKey/@name"/>
|
|
|
229 </xsl:call-template>
|
|
|
230 </cs:nameOf>
|
|
|
231 </cs:parameter>
|
|
|
232 </cs:attribute>
|
|
|
233 </xsl:template>
|
|
|
234
|
|
|
235 <!-- property-accessors -->
|
|
|
236 <xsl:template match="*" mode="property-accessors">
|
|
|
237 <cs:get/>
|
|
|
238 <cs:set/>
|
|
|
239 </xsl:template>
|
|
|
240
|
|
|
241 <xsl:template match="m:hasA[clr:lazy]/m:thisKey" mode="property-accessors">
|
|
|
242 <cs:get>
|
|
|
243 <xsl:text>return </xsl:text>
|
|
|
244 <xsl:apply-templates select="../clr:lazy" mode="field-name"/>
|
|
|
245 <xsl:text>.Key;</xsl:text>
|
|
|
246 </cs:get>
|
|
|
247 <cs:set>
|
|
|
248 <xsl:apply-templates select="../clr:lazy" mode="field-name"/>
|
|
|
249 <xsl:text>.Key = value;</xsl:text>
|
|
|
250 </cs:set>
|
|
|
251 </xsl:template>
|
|
|
252
|
|
|
253 <xsl:template match="m:hasA[clr:lazy]/clr:association" mode="property-accessors">
|
|
|
254 <cs:get>
|
|
|
255 <xsl:text>return </xsl:text>
|
|
|
256 <xsl:apply-templates select="../clr:lazy" mode="field-name"/>
|
|
|
257 <xsl:text>.Instance;</xsl:text>
|
|
|
258 </cs:get>
|
|
|
259 <cs:set>
|
|
|
260 <xsl:apply-templates select="../clr:lazy" mode="field-name"/>
|
|
|
261 <xsl:text>.Instance = value;</xsl:text>
|
|
|
262 </cs:set>
|
|
|
263 </xsl:template>
|
|
|
264
|
|
|
265 <!-- fields -->
|
|
|
266 <xsl:template match="*" mode="field">
|
|
|
267 <cs:field>
|
|
6
|
268 <xsl:attribute name="name"><xsl:apply-templates select="." mode="member-name"/></xsl:attribute>
|
|
|
269 <xsl:apply-templates select="." mode="member-type"/>
|
|
2
|
270 <xsl:apply-templates select="." mode="field-initializer"/>
|
|
|
271 </cs:field>
|
|
|
272 </xsl:template>
|
|
|
273
|
|
|
274 <!-- field-name -->
|
|
6
|
275 <xsl:template match="m:hasA/clr:lazy" mode="member-name">
|
|
2
|
276 <xsl:text>m_lazy</xsl:text>
|
|
6
|
277 <xsl:apply-templates select=".." mode="member-name"/>
|
|
2
|
278 </xsl:template>
|
|
|
279
|
|
6
|
280 <xsl:template match="clr:lazy[@field]" mode="member-name">
|
|
2
|
281 <xsl:value-of select="@field"/>
|
|
|
282 </xsl:template>
|
|
|
283
|
|
6
|
284 <!-- member-type -->
|
|
|
285 <xsl:template match="m:hasA[@optional='true']/clr:lazy" mode="member-type">
|
|
|
286 <xsl:variable name="otherKey">
|
|
|
287 <xsl:call-template name="getPrimaryKey">
|
|
2
|
288 <xsl:with-param name="type" select="../@type"/>
|
|
|
289 </xsl:call-template>
|
|
6
|
290 </xsl:variable>
|
|
|
291 <cs:type name="NullableReference" namespace="Pallada.Data">
|
|
|
292 <xsl:apply-templates select="exsl:node-set($otherKey)" mode="member-type"/>
|
|
|
293 <xsl:apply-templates select=".." mode="member-type"/>
|
|
2
|
294 </cs:type>
|
|
|
295 </xsl:template>
|
|
6
|
296 <xsl:template match="m:hasA[@optional!='true']/clr:lazy" mode="member-type">
|
|
2
|
297 <cs:type name="Reference" namespace="Pallada.Data">
|
|
6
|
298 <xsl:apply-templates select="../m:thisKey" mode="member-type"/>
|
|
|
299 <xsl:apply-templates select=".." mode="member-type"/>
|
|
2
|
300 </cs:type>
|
|
|
301 </xsl:template>
|
|
|
302
|
|
|
303 <!-- field-initializer -->
|
|
|
304 <xsl:template match="*|text()" mode="field-initializer"/>
|
|
|
305
|
|
5
|
306 <xsl:template name="getClrKeyReference">
|
|
|
307 <xsl:param name="type"/>
|
|
|
308 <xsl:variable name="primaryKey">
|
|
|
309 <xsl:call-template name="getPrimaryKey">
|
|
|
310 <xsl:with-param name="type" select="$type"/>
|
|
|
311 </xsl:call-template>
|
|
|
312 </xsl:variable>
|
|
|
313
|
|
|
314 <xsl:apply-templates select="exsl:node-set($primaryKey)" mode="clr-member-reference"/>
|
|
|
315 </xsl:template>
|
|
|
316
|
|
|
317 <!-- -->
|
|
|
318 <xsl:template name="getClrMemberReference">
|
|
2
|
319 <xsl:param name="type"/>
|
|
5
|
320 <xsl:param name="memberName"/>
|
|
|
321 <xsl:param name="scope" select="members"/>
|
|
|
322 <xsl:variable name="member">
|
|
|
323 <xsl:call-template name="getMembers">
|
|
|
324 <xsl:with-param name="memberName" select="$memberName"/>
|
|
|
325 <xsl:with-param name="type" select="$type"/>
|
|
|
326 </xsl:call-template>
|
|
|
327 </xsl:variable>
|
|
|
328
|
|
|
329 <xsl:apply-templates select="exsl:node-set($member)" mode="clr-member-reference"/>
|
|
|
330 </xsl:template>
|
|
|
331
|
|
|
332 <xsl:template match="*" mode="clr-member-reference">
|
|
6
|
333 <xsl:param name="type" select="@declaringType"/>
|
|
2
|
334 <cs:member>
|
|
5
|
335 <xsl:attribute name="name">
|
|
|
336 <xsl:apply-templates select="." mode="member-name"/>
|
|
|
337 </xsl:attribute>
|
|
|
338 <xsl:call-template name="getClrType">
|
|
|
339 <xsl:with-param name="type" select="$type"/>
|
|
|
340 </xsl:call-template>
|
|
2
|
341 </cs:member>
|
|
|
342 </xsl:template>
|
|
|
343
|
|
3
|
344 <!-- resolves CLR type for the given type -->
|
|
|
345 <xsl:template name="getClrType">
|
|
|
346 <xsl:param name="type" />
|
|
|
347 <xsl:param name="typeArgs" select="/.." />
|
|
|
348 <!-- <t:trace msg="resolveClrType {$type}"/> -->
|
|
|
349 <xsl:for-each select="$module">
|
|
|
350 <xsl:apply-templates select="key('type', $type)"
|
|
|
351 mode="clr-type">
|
|
|
352 <xsl:with-param name="typeArgs" select="$typeArgs"/>
|
|
|
353 </xsl:apply-templates>
|
|
|
354 </xsl:for-each>
|
|
|
355 </xsl:template>
|
|
|
356
|
|
|
357 <!-- CLR type construction -->
|
|
|
358 <xsl:template match="*" mode="clr-type" />
|
|
|
359
|
|
|
360 <xsl:template match="m:type[clr:type]" mode="clr-type">
|
|
|
361 <xsl:param name="typeArgs" select="clr:type/*" />
|
|
|
362 <xsl:apply-templates select="clr:type" mode="clr-type">
|
|
|
363 <xsl:with-param name="typeArgs" select="$typeArgs" />
|
|
|
364 </xsl:apply-templates>
|
|
|
365 </xsl:template>
|
|
|
366
|
|
|
367 <xsl:template match="m:entity" mode="clr-type">
|
|
|
368 <cs:type name="{@clr:name | @name[not(../@clr:name)]}" namespace="{ancestor::*[@clr:namespace]/@clr:namespace}" />
|
|
|
369 </xsl:template>
|
|
|
370
|
|
|
371 <xsl:template match="clr:type" mode="clr-type">
|
|
|
372 <xsl:apply-templates mode="clr-type"/>
|
|
|
373 </xsl:template>
|
|
|
374
|
|
|
375 <xsl:template match="clr:type[@ref]" mode="clr-type">
|
|
|
376 <xsl:param name="typeArgs" select="*" />
|
|
|
377 <xsl:call-template name="getClrType">
|
|
|
378 <xsl:with-param name="type" select="@ref" />
|
|
|
379 <xsl:with-param name="typeArgs" select="$typeArgs" />
|
|
|
380 </xsl:call-template>
|
|
|
381 </xsl:template>
|
|
|
382
|
|
|
383 <xsl:template match="clr:type[@cs:name or @name]" mode="clr-type">
|
|
|
384 <xsl:param name="typeArgs" select="*" />
|
|
|
385 <xsl:variable name="ns"
|
|
|
386 select="@cs:namespace | @namespace[not(../@cs:namespace)]" />
|
|
|
387 <cs:type name="{@cs:name | @name[not(../@cs:name)]}">
|
|
|
388 <xsl:if test="$ns">
|
|
|
389 <xsl:attribute name="namespace"><xsl:value-of select="$ns" /></xsl:attribute>
|
|
|
390 </xsl:if>
|
|
|
391 <xsl:copy-of select="@struct"/>
|
|
|
392
|
|
|
393 <xsl:apply-templates select="$typeArgs | *[not($typeArgs)]"
|
|
|
394 mode="clr-type" />
|
|
|
395 </cs:type>
|
|
|
396 </xsl:template>
|
|
|
397
|
|
|
398 <xsl:template match="clr:arrayOf[@type]" mode="clr-type">
|
|
|
399 <xsl:param name="typeArgs" select="*" />
|
|
|
400 <cs:array>
|
|
|
401 <xsl:call-template name="getClrType">
|
|
|
402 <xsl:with-param name="type" select="@type" />
|
|
|
403 <xsl:with-param name="typeArgs" select="$typeArgs" />
|
|
|
404 </xsl:call-template>
|
|
|
405 </cs:array>
|
|
|
406 </xsl:template>
|
|
|
407
|
|
|
408 <xsl:template match="clr:arrayOf[@cs:name or @name]" mode="clr-type">
|
|
|
409 <xsl:param name="typeArgs" select="*" />
|
|
|
410 <xsl:variable name="ns"
|
|
|
411 select="@cs:namespace | @namespace[not(../@cs:namespace)]" />
|
|
|
412 <cs:array>
|
|
|
413 <cs:type name="{@cs:name | @name[not(../@cs:name)]}">
|
|
|
414 <xsl:if test="$ns">
|
|
|
415 <xsl:attribute name="namespace"><xsl:value-of
|
|
|
416 select="$ns" /></xsl:attribute>
|
|
|
417 </xsl:if>
|
|
|
418 <xsl:apply-templates select="$typeArgs | *[not($typeArgs)]"
|
|
|
419 mode="clr-type" />
|
|
|
420 </cs:type>
|
|
|
421 </cs:array>
|
|
|
422 </xsl:template>
|
|
|
423
|
|
2
|
424
|
|
|
425 </xsl:stylesheet> |
