X-Git-Url: https://git.ladys.computer/Shushe/blobdiff_plain/1c02c25ab49b46225f48d51ccc52648c20c82eaf..d925cf1fa09c85a10f150a643579b44d08b4626a:/lib/catalog2parser.xslt

diff --git a/lib/catalog2parser.xslt b/lib/catalog2parser.xslt
index ead56da..1faa880 100644
--- a/lib/catalog2parser.xslt
+++ b/lib/catalog2parser.xslt
@@ -10,6 +10,7 @@ If a copy of the M·P·L was not distributed with this file, You can obtain one
 <transform
 	xmlns="http://www.w3.org/1999/XSL/Transform"
 	xmlns:catalog="urn:oasis:names:tc:entity:xmlns:xml:catalog"
+	xmlns:exsl="http://exslt.org/common"
 	xmlns:exslstr="http://exslt.org/strings"
 	xmlns:html="http://www.w3.org/1999/xhtml"
 	xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
@@ -21,6 +22,12 @@ If a copy of the M·P·L was not distributed with this file, You can obtain one
 	<namespace-alias stylesheet-prefix="xslt" result-prefix="#default"/>
 	<template match="/">
 		<xslt:transform version="1.0">
+			<xslt:param name="BUILDTIME" select="'1972-12-31T00:00:00Z'"/>
+			<xslt:param name="CKSUM" select="false"/>
+			<xslt:param name="IDENTIFIER" select="false"/>
+			<xslt:param name="SRCREV" select="false"/>
+			<xslt:param name="SRCTIME" select="'1972-12-31T00:00:00Z'"/>
+			<xslt:param name="THISREV" select="false"/>
 			<xslt:variable name="书社:parsers">
 				<html:dl>
 					<for-each select="//catalog:uri">
@@ -76,11 +83,88 @@ If a copy of the M·P·L was not distributed with this file, You can obtain one
 					</if>
 				</xslt:include>
 			</for-each>
+			<xslt:template name="书社:apply-parsed-by">
+				<xslt:param name="id"/>
+				<xslt:param name="media-type"/>
+				<xslt:param name="result" select="/.."/>
+				<xslt:for-each select="$result/node()">
+					<xslt:choose>
+						<xslt:when test="self::*">
+							<xslt:copy>
+								<xslt:if test="string($id)!=''">
+									<xslt:attribute name="书社:parsed-by">
+										<xslt:value-of select="$id"/>
+										<xslt:if test="@书社:parsed-by">
+											<xslt:text>
+												<text> </text>
+											</xslt:text>
+											<xslt:value-of select="@书社:parsed-by"/>
+										</xslt:if>
+									</xslt:attribute>
+								</xslt:if>
+								<xslt:if test="string($media-type)!=''">
+									<xslt:attribute name="书社:media-type">
+										<xslt:value-of select="$media-type"/>
+									</xslt:attribute>
+								</xslt:if>
+								<xslt:copy-of select="@*[namespace-uri()!='urn:fdc:ladys.computer:20231231:Shu1She4' or local-name()!='parsed-by' and local-name()!='media-type']|node()"/>
+							</xslt:copy>
+						</xslt:when>
+						<xslt:otherwise>
+							<xslt:copy-of select="."/>
+						</xslt:otherwise>
+					</xslt:choose>
+				</xslt:for-each>
+			</xslt:template>
+			<xslt:template match="/">
+				<xslt:variable name="parsedroot">
+					<xslt:apply-templates select="node()" mode="书社:parse"/>
+				</xslt:variable>
+				<xslt:for-each select="exsl:node-set($parsedroot)/node()">
+					<xslt:choose>
+						<xslt:when test="self::*">
+							<xslt:copy>
+								<xslt:attribute name="书社:cksum">
+									<xslt:value-of select="$CKSUM"/>
+								</xslt:attribute>
+								<xslt:copy-of select="@*|node()"/>
+							</xslt:copy>
+						</xslt:when>
+						<xslt:otherwise>
+							<xslt:copy-of select="."/>
+						</xslt:otherwise>
+					</xslt:choose>
+				</xslt:for-each>
+			</xslt:template>
 			<xslt:template match="@*|node()" priority="-1">
 				<xslt:copy>
-					<xslt:apply-templates select="@*|node()"/>
+					<xslt:apply-templates select="@*|node()" mode="书社:parse"/>
 				</xslt:copy>
 			</xslt:template>
+			<xslt:template match="html:script[@type]" mode="书社:parse" priority="1">
+				<xslt:variable name="parserdiv" select="exsl:node-set($书社:parsers)//html:div[html:dd=current()/@type]"/>
+				<xslt:choose>
+					<xslt:when test="$parserdiv">
+						<xslt:variable name="result">
+							<xslt:apply-templates select="."/>
+						</xslt:variable>
+						<xslt:variable name="reparsed-result">
+							<xslt:apply-templates select="exsl:node-set($result)/node()" mode="书社:parse"/>
+						</xslt:variable>
+						<xslt:call-template name="书社:apply-parsed-by">
+							<xslt:with-param name="id" select="string($parserdiv/html:dt)"/>
+							<xslt:with-param name="media-type" select="string(@type)"/>
+							<xslt:with-param name="result" select="exsl:node-set($reparsed-result)"/>
+						</xslt:call-template>
+					</xslt:when>
+					<xslt:otherwise>
+						<xslt:apply-templates select="."/>
+					</xslt:otherwise>
+				</xslt:choose>
+			</xslt:template>
+			<xslt:template match="@*|node()" mode="书社:parse">
+				<xslt:apply-templates select="."/>
+			</xslt:template>
 		</xslt:transform>
 	</template>
 	<output method="xml" encoding="UTF-8"/>