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
|
|
76 <xsl:template match="m:primaryKey | m:property | m:thisKey | clr:association" mode="members">
|
|
77 <t:trace msg="{name()} {@name}"/>
|
|
78 <xsl:apply-templates select="." mode="property"/>
|
|
79 </xsl:template>
|
|
80
|
|
81 <!-- hasA and hasMany doesn't generate members itself, they delegate this work to inner members -->
|
|
82 <xsl:template match="m:hasA | m:hasMany" mode="members">
|
|
83 <t:trace msg="{name()} {@name}" />
|
|
84 <xsl:apply-templates mode="members" />
|
|
85 </xsl:template>
|
|
86
|
|
87 <xsl:template match="m:hasA/clr:lazy" mode="members">
|
|
88 <xsl:apply-templates select="." mode="field"/>
|
|
89 </xsl:template>
|
|
90
|
|
91 <!-- member-name -->
|
|
92 <xsl:template match="*|text()|@*" mode="member-name" />
|
|
93
|
|
94 <xsl:template match="*[@name]" mode="member-name">
|
|
95 <xsl:value-of select="@name"/>
|
|
96 </xsl:template>
|
|
97 <xsl:template match="*[@clr:name]" mode="member-name">
|
|
98 <xsl:value-of select="@clr:name"/>
|
|
99 </xsl:template>
|
|
100
|
|
101 <!-- member-type -->
|
|
102 <xsl:template match="*|text()|@*" mode="member-type" />
|
|
103
|
|
104 <xsl:template match="*[@type]" mode="member-type">
|
|
105 <xsl:call-template name="getClrType">
|
|
106 <xsl:with-param name="type" select="@type" />
|
|
107 </xsl:call-template>
|
|
108 </xsl:template>
|
|
109
|
|
110 <xsl:template match="*[clr:type]" mode="member-type">
|
|
111 <xsl:apply-templates select="clr:type" mode="clr-type" />
|
|
112 </xsl:template>
|
|
113
|
|
114 <!-- member-attributes -->
|
|
115 <xsl:template match="*|text()" mode="member-attributes"/>
|
|
116
|
|
117 <!-- member-extension -->
|
|
118 <xsl:template match="*|text()" mode="member-extension"/>
|
|
119 <xsl:template match="*" mode="member-extension">
|
|
120 <xsl:apply-templates mode="member-extension-comments"/>
|
|
121 </xsl:template>
|
|
122
|
|
123 <xsl:template match="m:hasA/* | m:hasMany/*" mode="member-extension">
|
|
124 <xsl:variable name="comments" select="../m:description | m:description"/>
|
|
125 <xsl:apply-templates select="$comments[position() = count($comments)]" mode="member-extension-comments"/>
|
|
126 </xsl:template>
|
|
127
|
|
128 <!-- member-extension-comments -->
|
|
129 <xsl:template match="*|text()" mode="member-extension-comments"/>
|
|
130
|
|
131 <xsl:template match="m:description" mode="member-extension-comments">
|
|
132 <cs:comments>
|
|
133 <xsl:apply-templates mode="comments" />
|
|
134 </cs:comments>
|
|
135 </xsl:template>
|
|
136
|
|
137 <!-- property -->
|
|
138
|
|
139 <xsl:template match="*" mode="property">
|
|
140 <cs:property modifiers="public">
|
6
|
141 <xsl:attribute name="name"><xsl:apply-templates select="." mode="member-name"/></xsl:attribute>
|
|
142 <xsl:attribute name="modifiers"><xsl:apply-templates select="." mode="member-modifiers"/></xsl:attribute>
|
|
143 <xsl:apply-templates select="." mode="member-type"/>
|
|
144 <xsl:apply-templates select="." mode="member-attributes"/>
|
|
145 <xsl:apply-templates select="." mode="member-extension" />
|
2
|
146 <xsl:apply-templates select="." mode="property-accessors"/>
|
|
147 </cs:property>
|
|
148 </xsl:template>
|
|
149
|
5
|
150
|
6
|
151 <!-- member-name -->
|
|
152 <xsl:template match="m:hasA/clr:association[not(@name|@clr:name)]" mode="member-name">
|
2
|
153 <!-- if the association doesn't define a name, use it from the parent node -->
|
6
|
154 <xsl:apply-templates select=".." mode="member-name"/>
|
2
|
155 </xsl:template>
|
6
|
156 <xsl:template match="m:hasMany/clr:association[not(@name|@clr:name)]" mode="member-name">
|
2
|
157 <!-- if the association doesn't define a name, use it from the parent node -->
|
6
|
158 <xsl:apply-templates select=".." mode="member-name"/>
|
2
|
159 </xsl:template>
|
|
160
|
6
|
161 <!-- member-modifiers -->
|
|
162 <xsl:template match="*" mode="member-modifiers">
|
3
|
163 <xsl:text>public</xsl:text>
|
|
164 </xsl:template>
|
|
165
|
6
|
166 <!-- member-type -->
|
|
167 <xsl:template match="m:hasA[@type]/clr:association[not(clr:type)]" mode="member-type">
|
|
168 <xsl:apply-templates select=".." mode="member-type"/>
|
5
|
169 </xsl:template>
|
|
170
|
6
|
171 <xsl:template match="m:hasMany[@type]/clr:association[not(clr:type)]" mode="member-type">
|
2
|
172 <cs:array>
|
6
|
173 <xsl:apply-templates select=".." mode="member-type"/>
|
2
|
174 </cs:array>
|
|
175 </xsl:template>
|
|
176
|
6
|
177 <xsl:template match="m:hasA[@type]/m:thisKey" mode="member-type">
|
5
|
178 <xsl:variable name="otherKey">
|
3
|
179 <xsl:call-template name="getPrimaryKey">
|
2
|
180 <xsl:with-param name="type" select="../@type"/>
|
|
181 </xsl:call-template>
|
5
|
182 </xsl:variable>
|
|
183 <xsl:choose>
|
|
184 <xsl:when test="@optional">
|
6
|
185 <cs:nullable>
|
|
186 <xsl:apply-templates select="exsl:node-set($otherKey)" mode="member-type"/>
|
|
187 </cs:nullable>
|
5
|
188 </xsl:when>
|
|
189 <xsl:otherwise>
|
6
|
190 <xsl:apply-templates select="exsl:node-set($otherKey)" mode="member-type"/>
|
5
|
191 </xsl:otherwise>
|
|
192 </xsl:choose>
|
2
|
193 </xsl:template>
|
|
194
|
6
|
195 <!-- member-attributes -->
|
|
196 <xsl:template match="m:primaryKey" mode="member-attributes">
|
2
|
197 <cs:attribute>
|
|
198 <cs:type name="PrimaryKey" namespace="Linq2Db" />
|
|
199 </cs:attribute>
|
|
200 </xsl:template>
|
|
201
|
6
|
202 <xsl:template match="m:hasA/clr:association" mode="member-attributes">
|
2
|
203 <cs:attribute>
|
|
204 <cs:type name="Association" namespace="Linq2Db"/>
|
|
205 <cs:parameter name="thisKey">
|
|
206 <cs:nameOf>
|
6
|
207 <xsl:call-template name="getClrMemberReference">
|
2
|
208 <xsl:with-param name="memberName" select="../@name"/>
|
6
|
209 <xsl:with-param name="type" select="../@declaringType"/>
|
2
|
210 </xsl:call-template>
|
|
211 </cs:nameOf>
|
|
212 </cs:parameter>
|
|
213 <cs:parameter name="otherKey">
|
|
214 <cs:nameOf>
|
6
|
215 <xsl:call-template name="getClrKeyReference">
|
2
|
216 <xsl:with-param name="type" select="../@type"/>
|
|
217 </xsl:call-template>
|
|
218 </cs:nameOf>
|
|
219 </cs:parameter>
|
|
220 </cs:attribute>
|
|
221 </xsl:template>
|
|
222
|
6
|
223 <xsl:template match="m:hasMany/clr:association" mode="member-attributes">
|
2
|
224 <cs:attribute>
|
|
225 <cs:type name="Association" namespace="Linq2Db"/>
|
|
226 <!-- thisKey points to own primaryKey which may be inherited, using getKeyName to address such cases -->
|
|
227 <cs:parameter name="thisKey">
|
|
228 <cs:nameOf>
|
6
|
229 <xsl:call-template name="getClrKeyReference">
|
2
|
230 <xsl:with-param name="type" select="../../@name"/>
|
|
231 </xsl:call-template>
|
|
232 </cs:nameOf>
|
|
233 </cs:parameter>
|
|
234 <cs:parameter name="otherKey">
|
|
235 <cs:nameOf>
|
6
|
236 <xsl:call-template name="getClrMemberReference">
|
2
|
237 <xsl:with-param name="type" select="../@type"/>
|
|
238 <xsl:with-param name="memberName" select="../m:otherKey/@name"/>
|
|
239 </xsl:call-template>
|
|
240 </cs:nameOf>
|
|
241 </cs:parameter>
|
|
242 </cs:attribute>
|
|
243 </xsl:template>
|
|
244
|
|
245 <!-- property-accessors -->
|
|
246 <xsl:template match="*" mode="property-accessors">
|
|
247 <cs:get/>
|
|
248 <cs:set/>
|
|
249 </xsl:template>
|
|
250
|
|
251 <xsl:template match="m:hasA[clr:lazy]/m:thisKey" mode="property-accessors">
|
|
252 <cs:get>
|
|
253 <xsl:text>return </xsl:text>
|
|
254 <xsl:apply-templates select="../clr:lazy" mode="field-name"/>
|
|
255 <xsl:text>.Key;</xsl:text>
|
|
256 </cs:get>
|
|
257 <cs:set>
|
|
258 <xsl:apply-templates select="../clr:lazy" mode="field-name"/>
|
|
259 <xsl:text>.Key = value;</xsl:text>
|
|
260 </cs:set>
|
|
261 </xsl:template>
|
|
262
|
|
263 <xsl:template match="m:hasA[clr:lazy]/clr:association" mode="property-accessors">
|
|
264 <cs:get>
|
|
265 <xsl:text>return </xsl:text>
|
|
266 <xsl:apply-templates select="../clr:lazy" mode="field-name"/>
|
|
267 <xsl:text>.Instance;</xsl:text>
|
|
268 </cs:get>
|
|
269 <cs:set>
|
|
270 <xsl:apply-templates select="../clr:lazy" mode="field-name"/>
|
|
271 <xsl:text>.Instance = value;</xsl:text>
|
|
272 </cs:set>
|
|
273 </xsl:template>
|
|
274
|
|
275 <!-- fields -->
|
|
276 <xsl:template match="*" mode="field">
|
|
277 <cs:field>
|
6
|
278 <xsl:attribute name="name"><xsl:apply-templates select="." mode="member-name"/></xsl:attribute>
|
|
279 <xsl:apply-templates select="." mode="member-type"/>
|
2
|
280 <xsl:apply-templates select="." mode="field-initializer"/>
|
|
281 </cs:field>
|
|
282 </xsl:template>
|
|
283
|
|
284 <!-- field-name -->
|
6
|
285 <xsl:template match="m:hasA/clr:lazy" mode="member-name">
|
2
|
286 <xsl:text>m_lazy</xsl:text>
|
6
|
287 <xsl:apply-templates select=".." mode="member-name"/>
|
2
|
288 </xsl:template>
|
|
289
|
6
|
290 <xsl:template match="clr:lazy[@field]" mode="member-name">
|
2
|
291 <xsl:value-of select="@field"/>
|
|
292 </xsl:template>
|
|
293
|
6
|
294 <!-- member-type -->
|
|
295 <xsl:template match="m:hasA[@optional='true']/clr:lazy" mode="member-type">
|
|
296 <xsl:variable name="otherKey">
|
|
297 <xsl:call-template name="getPrimaryKey">
|
2
|
298 <xsl:with-param name="type" select="../@type"/>
|
|
299 </xsl:call-template>
|
6
|
300 </xsl:variable>
|
|
301 <cs:type name="NullableReference" namespace="Pallada.Data">
|
|
302 <xsl:apply-templates select="exsl:node-set($otherKey)" mode="member-type"/>
|
|
303 <xsl:apply-templates select=".." mode="member-type"/>
|
2
|
304 </cs:type>
|
|
305 </xsl:template>
|
6
|
306 <xsl:template match="m:hasA[@optional!='true']/clr:lazy" mode="member-type">
|
2
|
307 <cs:type name="Reference" namespace="Pallada.Data">
|
6
|
308 <xsl:apply-templates select="../m:thisKey" mode="member-type"/>
|
|
309 <xsl:apply-templates select=".." mode="member-type"/>
|
2
|
310 </cs:type>
|
|
311 </xsl:template>
|
|
312
|
|
313 <!-- field-initializer -->
|
|
314 <xsl:template match="*|text()" mode="field-initializer"/>
|
|
315
|
5
|
316 <xsl:template name="getClrKeyReference">
|
|
317 <xsl:param name="type"/>
|
|
318 <xsl:variable name="primaryKey">
|
|
319 <xsl:call-template name="getPrimaryKey">
|
|
320 <xsl:with-param name="type" select="$type"/>
|
|
321 </xsl:call-template>
|
|
322 </xsl:variable>
|
|
323
|
|
324 <xsl:apply-templates select="exsl:node-set($primaryKey)" mode="clr-member-reference"/>
|
|
325 </xsl:template>
|
|
326
|
|
327 <!-- -->
|
|
328 <xsl:template name="getClrMemberReference">
|
2
|
329 <xsl:param name="type"/>
|
5
|
330 <xsl:param name="memberName"/>
|
|
331 <xsl:param name="scope" select="members"/>
|
|
332 <xsl:variable name="member">
|
|
333 <xsl:call-template name="getMembers">
|
|
334 <xsl:with-param name="memberName" select="$memberName"/>
|
|
335 <xsl:with-param name="type" select="$type"/>
|
|
336 </xsl:call-template>
|
|
337 </xsl:variable>
|
|
338
|
|
339 <xsl:apply-templates select="exsl:node-set($member)" mode="clr-member-reference"/>
|
|
340 </xsl:template>
|
|
341
|
|
342 <xsl:template match="*" mode="clr-member-reference">
|
6
|
343 <xsl:param name="type" select="@declaringType"/>
|
2
|
344 <cs:member>
|
5
|
345 <xsl:attribute name="name">
|
|
346 <xsl:apply-templates select="." mode="member-name"/>
|
|
347 </xsl:attribute>
|
|
348 <xsl:call-template name="getClrType">
|
|
349 <xsl:with-param name="type" select="$type"/>
|
|
350 </xsl:call-template>
|
2
|
351 </cs:member>
|
|
352 </xsl:template>
|
|
353
|
3
|
354 <!-- resolves CLR type for the given type -->
|
|
355 <xsl:template name="getClrType">
|
|
356 <xsl:param name="type" />
|
|
357 <xsl:param name="typeArgs" select="/.." />
|
|
358 <!-- <t:trace msg="resolveClrType {$type}"/> -->
|
|
359 <xsl:for-each select="$module">
|
|
360 <xsl:apply-templates select="key('type', $type)"
|
|
361 mode="clr-type">
|
|
362 <xsl:with-param name="typeArgs" select="$typeArgs"/>
|
|
363 </xsl:apply-templates>
|
|
364 </xsl:for-each>
|
|
365 </xsl:template>
|
|
366
|
|
367 <!-- CLR type construction -->
|
|
368 <xsl:template match="*" mode="clr-type" />
|
|
369
|
|
370 <xsl:template match="m:type[clr:type]" mode="clr-type">
|
|
371 <xsl:param name="typeArgs" select="clr:type/*" />
|
|
372 <xsl:apply-templates select="clr:type" mode="clr-type">
|
|
373 <xsl:with-param name="typeArgs" select="$typeArgs" />
|
|
374 </xsl:apply-templates>
|
|
375 </xsl:template>
|
|
376
|
|
377 <xsl:template match="m:entity" mode="clr-type">
|
|
378 <cs:type name="{@clr:name | @name[not(../@clr:name)]}" namespace="{ancestor::*[@clr:namespace]/@clr:namespace}" />
|
|
379 </xsl:template>
|
|
380
|
|
381 <xsl:template match="clr:type" mode="clr-type">
|
|
382 <xsl:apply-templates mode="clr-type"/>
|
|
383 </xsl:template>
|
|
384
|
|
385 <xsl:template match="clr:type[@ref]" mode="clr-type">
|
|
386 <xsl:param name="typeArgs" select="*" />
|
|
387 <xsl:call-template name="getClrType">
|
|
388 <xsl:with-param name="type" select="@ref" />
|
|
389 <xsl:with-param name="typeArgs" select="$typeArgs" />
|
|
390 </xsl:call-template>
|
|
391 </xsl:template>
|
|
392
|
|
393 <xsl:template match="clr:type[@cs:name or @name]" mode="clr-type">
|
|
394 <xsl:param name="typeArgs" select="*" />
|
|
395 <xsl:variable name="ns"
|
|
396 select="@cs:namespace | @namespace[not(../@cs:namespace)]" />
|
|
397 <cs:type name="{@cs:name | @name[not(../@cs:name)]}">
|
|
398 <xsl:if test="$ns">
|
|
399 <xsl:attribute name="namespace"><xsl:value-of select="$ns" /></xsl:attribute>
|
|
400 </xsl:if>
|
|
401 <xsl:copy-of select="@struct"/>
|
|
402
|
|
403 <xsl:apply-templates select="$typeArgs | *[not($typeArgs)]"
|
|
404 mode="clr-type" />
|
|
405 </cs:type>
|
|
406 </xsl:template>
|
|
407
|
|
408 <xsl:template match="clr:arrayOf[@type]" mode="clr-type">
|
|
409 <xsl:param name="typeArgs" select="*" />
|
|
410 <cs:array>
|
|
411 <xsl:call-template name="getClrType">
|
|
412 <xsl:with-param name="type" select="@type" />
|
|
413 <xsl:with-param name="typeArgs" select="$typeArgs" />
|
|
414 </xsl:call-template>
|
|
415 </cs:array>
|
|
416 </xsl:template>
|
|
417
|
|
418 <xsl:template match="clr:arrayOf[@cs:name or @name]" mode="clr-type">
|
|
419 <xsl:param name="typeArgs" select="*" />
|
|
420 <xsl:variable name="ns"
|
|
421 select="@cs:namespace | @namespace[not(../@cs:namespace)]" />
|
|
422 <cs:array>
|
|
423 <cs:type name="{@cs:name | @name[not(../@cs:name)]}">
|
|
424 <xsl:if test="$ns">
|
|
425 <xsl:attribute name="namespace"><xsl:value-of
|
|
426 select="$ns" /></xsl:attribute>
|
|
427 </xsl:if>
|
|
428 <xsl:apply-templates select="$typeArgs | *[not($typeArgs)]"
|
|
429 mode="clr-type" />
|
|
430 </cs:type>
|
|
431 </cs:array>
|
|
432 </xsl:template>
|
|
433
|
2
|
434
|
|
435 </xsl:stylesheet> |