]> Lady’s Gitweb - Shushe/blobdiff - lib/expandmetadata.xslt
Generate destinations and dependencies as metadata
[Shushe] / lib / expandmetadata.xslt
diff --git a/lib/expandmetadata.xslt b/lib/expandmetadata.xslt
new file mode 100644 (file)
index 0000000..e75fe23
--- /dev/null
@@ -0,0 +1,160 @@
+<?xml version="1.0"?>
+<!--
+SPDX-FileCopyrightText: 2023, 2024 Lady <https://www.ladys.computer/about/#lady>
+SPDX-License-Identifier: MPL-2.0
+-->
+<!--
+⁌ ⛩📰 书社 ∷ lib/expandmetadata.xslt
+
+© 2023–2024 Lady [@ Ladys Computer].
+
+This Source Code Form is subject to the terms of the Mozilla Public License, v 2.0.
+If a copy of the M·P·L was not distributed with this file, You can obtain one at <https://mozilla.org/MPL/2.0/>.
+-->
+<transform
+       xmlns="http://www.w3.org/1999/XSL/Transform"
+       xmlns:dct="http://purl.org/dc/terms/"
+       xmlns:exsl="http://exslt.org/common"
+       xmlns:nie="http://www.semanticdesktop.org/ontologies/2007/01/19/nie#"
+       xmlns:nfo="http://www.semanticdesktop.org/ontologies/2007/03/22/nfo#"
+       xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"
+       xmlns:xlink="http://www.w3.org/1999/xlink"
+       xmlns:书社="urn:fdc:ladys.computer:20231231:Shu1She4"
+       xmlns:书社vocab="urn:fdc:ladys.computer:20231231:Shu1She4:vocab:"
+       extension-element-prefixes="exsl"
+       version="1.0"
+>
+       <variable name="builddir" select="//*[@rdf:about='about:shushe?builddir']/@nfo:fileUrl"/>
+       <variable name="files" select="/rdf:RDF/nfo:LocalFileDataObject[not(nie:interpretedAs/nfo:Folder)]"/>
+       <template name="书社:process-dependencies">
+               <param name="processed"/>
+               <param name="unprocessed"/>
+               <variable name="queue">
+                       <copy-of select="exsl:node-set($unprocessed)/书社:dependency-root"/>
+                       <for-each select="exsl:node-set($unprocessed)/书社:dependency">
+                               <if test="not((exsl:node-set($processed)/书社:*|preceding-sibling::书社:*|following-sibling::书社:recursive-dependency)[string()=string(current())])">
+                                       <copy-of select="."/>
+                               </if>
+                       </for-each>
+               </variable>
+               <variable name="old">
+                       <copy-of select="exsl:node-set($processed)/书社:dependency-root"/>
+                       <copy-of select="exsl:node-set($processed)/书社:recursive-dependency"/>
+                       <for-each select="exsl:node-set($unprocessed)/书社:recursive-dependency">
+                               <if test="not((exsl:node-set($processed)/书社:recursive-dependency|preceding-sibling::书社:recursive-dependency)[string()=string(current())])">
+                                       <copy-of select="."/>
+                               </if>
+                       </for-each>
+                       <for-each select="exsl:node-set($processed)/书社:dependency">
+                               <if test="not(exsl:node-set($unprocessed)/书社:recursive-dependency[string()=string(current())])">
+                                       <copy-of select="."/>
+                               </if>
+                       </for-each>
+                       <copy-of select="$queue"/>
+               </variable>
+               <variable name="new">
+                       <for-each select="exsl:node-set($queue)/书社:*">
+                               <for-each select="$files[@rdf:about=string(current()) and nie:interpretedAs/nfo:PlainTextDocument]">
+                                       <variable name="parent" select="@rdf:about"/>
+                                       <variable name="subdir">
+                                               <choose>
+                                                       <when test="starts-with($parent, 'about:shushe?include=')">
+                                                               <text>/includes/</text>
+                                                       </when>
+                                                       <when test="starts-with($parent, 'about:shushe?source=')">
+                                                               <text>/sources/</text>
+                                                       </when>
+                                               </choose>
+                                       </variable>
+                                       <for-each select="document(concat($builddir, $subdir, @nfo:fileName), .)//书社:link[@xlink:show='embed']">
+                                               <if test="exsl:node-set($old)/书社:dependency-root[string()=string(current()/@xlink:href)]">
+                                                       <书社:recursive-dependency>
+                                                               <value-of select="$parent"/>
+                                                       </书社:recursive-dependency>
+                                               </if>
+                                               <if test="$files/@rdf:about[string()=string(current()/@xlink:href)]">
+                                                       <书社:dependency>
+                                                               <value-of select="@xlink:href"/>
+                                                       </书社:dependency>
+                                               </if>
+                                       </for-each>
+                               </for-each>
+                       </for-each>
+               </variable>
+               <choose>
+                       <when test="exsl:node-set($new)/书社:dependency">
+                               <call-template name="书社:process-dependencies">
+                                       <with-param name="processed">
+                                               <copy-of select="$old"/>
+                                       </with-param>
+                                       <with-param name="unprocessed">
+                                               <copy-of select="$new"/>
+                                       </with-param>
+                               </call-template>
+                       </when>
+                       <otherwise>
+                               <copy-of select="$old"/>
+                       </otherwise>
+               </choose>
+       </template>
+       <template match="rdf:RDF/nfo:LocalFileDataObject[not(nie:interpretedAs/nfo:Folder or nie:interpretedAs/nfo:PlainTextDocument)]" priority="1">
+               <copy>
+                       <apply-templates select="@*|node()"/>
+                       <if test="starts-with(@rdf:about, 'about:shushe?source=')">
+                               <dct:hasFormat>
+                                       <nfo:LocalFileDataObject dct:creator="urn:fdc:ladys.computer:20231231:Shu1She4" nfo:fileName="{substring-after(@rdf:about, 'about:shushe?source=')}"/>
+                               </dct:hasFormat>
+                       </if>
+               </copy>
+       </template>
+       <template match="rdf:RDF/nfo:LocalFileDataObject[nie:interpretedAs/nfo:PlainTextDocument]" priority="1">
+               <variable name="parsed" select="document(concat($builddir, '/sources/', @nfo:fileName), .)"/>
+               <variable name="destination-delim" select="concat('/', $parsed/*/@书社:destination, '/')"/>
+               <variable name="destination">
+                       <choose>
+                               <when test="not(starts-with(@rdf:about, 'about:shushe?source='))"/>
+                               <when test="not(contains($destination-delim, '//') or contains($destination-delim, '/./') or contains($destination-delim, '/../'))">
+                                       <value-of select="$parsed/*/@书社:destination"/>
+                               </when>
+                               <otherwise>
+                                       <value-of select="substring-after(@rdf:about, 'about:shushe?source=')"/>
+                               </otherwise>
+                       </choose>
+               </variable>
+               <variable name="dependencies-fragment">
+                       <apply-templates select="." mode="书社:dependencies"/>
+               </variable>
+               <variable name="dependencies" select="exsl:node-set($dependencies)"/>
+               <copy>
+                       <apply-templates select="@*|node()"/>
+                       <for-each select="$dependencies/书社:dependency">
+                               <书社vocab:hasDependencyOn rdf:resource="{.}"/>
+                       </for-each>
+                       <for-each select="$dependencies/书社:recursive-dependency">
+                               <书社vocab:hasRecursiveDependencyOn rdf:resource="{.}"/>
+                       </for-each>
+                       <if test="$destination!=''">
+                               <dct:hasFormat>
+                                       <nfo:LocalFileDataObject dct:creator="urn:fdc:ladys.computer:20231231:Shu1She4" nfo:fileName="{$destination}">
+                                       </nfo:LocalFileDataObject>
+                               </dct:hasFormat>
+                       </if>
+               </copy>
+       </template>
+       <template match="@*|node()">
+               <copy>
+                       <apply-templates select="@*|node()"/>
+               </copy>
+       </template>
+       <template match="nfo:LocalFileDataObject" mode="书社:dependencies">
+               <if test="nie:interpretedAs/nfo:PlainTextDocument">
+                       <call-template name="书社:process-dependencies">
+                               <with-param name="unprocessed">
+                                       <书社:dependency-root>
+                                               <value-of select="@rdf:about"/>
+                                       </书社:dependency-root>
+                               </with-param>
+                       </call-template>
+               </if>
+       </template>
+</transform>
This page took 0.025159 seconds and 4 git commands to generate.