# Get the list of supported plaintext file types from the parser.
ifneq ($(wildcard $(BUILDDIR)/parser.xslt),)
-override plaintexttypes := $(filter-out $(XMLTYPES),$(shell $(XSLTPROC) $(call quote,$(THISDIR)/lib/parser2types.xslt) $(call quote,$(BUILDDIR)/parser.xslt)))
+override plaintexttypes := $(filter-out $(XMLTYPES),$(shell $(XMLLINT) --xpath '/*/*[@name="书社:parsers"]//*[namespace-uri()="http://www.w3.org/1999/xhtml" and local-name()="dd"]/text()' $(call quote,$(BUILDDIR)/parser.xslt)))
endif
# (callable) Get all of the files (source and includes) which have the
#
# This recipe sleeps for one second to ensure that files built after
# the restart have a more current time·stamp.
-$(THISDIR)/GNUmakefile:: $(BUILDDIR)/magic.mgc $(BUILDDIR)/parser.xslt $(THISDIR)/lib/parser2types.xslt
+$(THISDIR)/GNUmakefile:: $(BUILDDIR)/magic.mgc $(BUILDDIR)/parser.xslt
$(silent)$(TOUCH) $(THISDIR)/GNUmakefile
$(silent)$(RM) -f $(call quote,$(BUILDDIR)/dependencies)
@$(PRINTF) '%b\n' '\0033[1mMagic file or parsers have updated. Restarting…\0033[22m'
<transform
xmlns="http://www.w3.org/1999/XSL/Transform"
xmlns:catalog="urn:oasis:names:tc:entity:xmlns:xml:catalog"
+ xmlns:exslstr="http://exslt.org/strings"
+ xmlns:html="http://www.w3.org/1999/xhtml"
+ xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
xmlns:xslt="http://www.w3.org/1999/XSL/TransformAlias"
xmlns:书社="urn:fdc:ladys.computer:20231231:Shu1She4"
- exclude-result-prefixes="catalog"
+ exclude-result-prefixes="catalog exslstr"
version="1.0"
>
<namespace-alias stylesheet-prefix="xslt" result-prefix="#default"/>
<template match="/">
<xslt:transform version="1.0">
+ <xslt:variable name="书社:parsers">
+ <html:dl>
+ <for-each select="//catalog:uri">
+ <variable name="parser" select="document(@uri, .)"/>
+ <html:div>
+ <html:dt>
+ <value-of select="@name"/>
+ </html:dt>
+ <choose>
+ <when test="$parser/*/@书社:supported-media-types">
+ <for-each select="exslstr:tokenize($parser/*/@书社:supported-media-types)">
+ <if test="not(translate(., '0123456789abcdefghijklmnopqrstuvwxyz!#$&-^_.+/', ''))">
+ <html:dd>
+ <value-of select="."/>
+ </html:dd>
+ </if>
+ </for-each>
+ </when>
+ <otherwise>
+ <for-each select="$parser//xsl:template[not(@name) and not(@mode)]">
+ <variable name="match" select="@match"/>
+ <for-each select="namespace::*[local-name() and string()='http://www.w3.org/1999/xhtml']">
+ <variable name="matchstart">
+ <value-of select="local-name()"/>
+ <text>:</text>
+ <text>script[@type=</text>
+ </variable>
+ <if test="starts-with($match, $matchstart) and substring($match, string-length($match))=']' and contains($match, '/')">
+ <variable name="inner" select="substring-before(substring-after($match, $matchstart), ']')"/>
+ <if test="starts-with($inner, '"') and substring($inner, string-length($inner))='"' or starts-with($inner, "'") and substring($inner, string-length($inner))="'"">
+ <variable name="type" select="substring($inner, 2, string-length($inner)-2)"/>
+ <if test="not(translate($type, '0123456789abcdefghijklmnopqrstuvwxyz!#$&-^_.+/', ''))">
+ <html:dd>
+ <value-of select="$type"/>
+ </html:dd>
+ </if>
+ </if>
+ </if>
+ </for-each>
+ </for-each>
+ </otherwise>
+ </choose>
+ </html:div>
+ </for-each>
+ </html:dl>
+ </xslt:variable>
<for-each select="//catalog:uri">
<xslt:include href="{@uri}">
<if test="contains(@name, ':')">
+++ /dev/null
-<?xml version="1.0"?>
-<!--
-⁌ ⛩️📰 书社 ∷ lib/parser2types.xslt
-
-© 2023–2024 Lady [@ Lady’s 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:catalog="urn:oasis:names:tc:entity:xmlns:xml:catalog"
- xmlns:exslstr="http://exslt.org/strings"
- xmlns:xslt="http://www.w3.org/1999/XSL/Transform"
- xmlns:书社="urn:fdc:ladys.computer:20231231:Shu1She4"
- version="1.0"
->
- <template match="/">
- <for-each select="//xslt:include">
- <variable name="included" select="document(@href, .)"/>
- <choose>
- <when test="$included/*/@书社:supported-media-types">
- <for-each select="exslstr:tokenize($included/*/@书社:supported-media-types)">
- <if test="not(translate(., '0123456789abcdefghijklmnopqrstuvwxyz!#$&-^_.+/', ''))">
- <value-of select="."/>
- <text>
</text>
- </if>
- </for-each>
- </when>
- <otherwise>
- <for-each select="$included//xslt:template[not(@name) and not(@mode)]">
- <variable name="match" select="@match"/>
- <for-each select="namespace::*[local-name() and string()='http://www.w3.org/1999/xhtml']">
- <variable name="matchstart">
- <value-of select="local-name()"/>
- <text>:</text>
- <text>script[@type=</text>
- </variable>
- <if test="starts-with($match, $matchstart) and substring($match, string-length($match))=']' and contains($match, '/')">
- <variable name="inner" select="substring-before(substring-after($match, $matchstart), ']')"/>
- <if test="starts-with($inner, '"') and substring($inner, string-length($inner))='"' or starts-with($inner, "'") and substring($inner, string-length($inner))="'"">
- <variable name="type" select="substring($inner, 2, string-length($inner)-2)"/>
- <if test="not(translate($type, '0123456789abcdefghijklmnopqrstuvwxyz!#$&-^_.+/', ''))">
- <value-of select="$type"/>
- <text>
</text>
- </if>
- </if>
- </if>
- </for-each>
- </for-each>
- </otherwise>
- </choose>
- </for-each>
- </template>
- <output method="text" encoding="UTF-8"/>
-</transform>