From 05564d5225c55c0238de93173cd2803d0c60006f Mon Sep 17 00:00:00 2001
From: Klaus Thoden <kthoden@mpiwg-berlin.mpg.de>
Date: Tue, 11 Jul 2017 14:25:33 +0200
Subject: [PATCH] Script for generating xml:id attributes for certain elements

---
 assign_ids.xsl | 75 ++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 75 insertions(+)
 create mode 100644 assign_ids.xsl

diff --git a/assign_ids.xsl b/assign_ids.xsl
new file mode 100644
index 0000000..6d14dfc
--- /dev/null
+++ b/assign_ids.xsl
@@ -0,0 +1,75 @@
+<?xml version="1.0"?>
+<xsl:stylesheet version="2.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
+
+<!--
+a script taken from the ECHO workflow project
+https://it-dev.mpiwg-berlin.mpg.de/tracs/mpdl-project-content/browser/digitizing-tools/scripts/share/xslFiles/generateId.xsl
+and modified for TEI purposes
+-->
+
+  <xsl:output method="xml" encoding="utf-8"/>
+
+  <xsl:template match="@*|node()">
+    <xsl:copy>
+      <xsl:apply-templates select="@*|node()"/>
+    </xsl:copy>
+  </xsl:template>
+
+  <xsl:template match="*:body//*:p|*:head|*:div|*:table|*:figure|*:formula">
+    <xsl:variable name="elemName" select="name()"/>
+    <xsl:variable name="divLevel" select="@type"/>
+    <xsl:variable name="docPos">
+      <xsl:choose>
+        <xsl:when test="$elemName = 'p'">
+          <xsl:value-of select="count(./preceding::*:p) + 1"/>
+	</xsl:when>
+        <xsl:when test="$elemName = 'head'">
+          <xsl:value-of select="count(./preceding::*:head) + 1"/>
+        </xsl:when>
+        <!-- <xsl:when test="$elemName = 'div'"> -->
+        <!-- </xsl:when> -->
+        <!-- part chapter section subsection subsubsection -->
+        <xsl:when test="$divLevel = 'part'">
+          <xsl:value-of select="count(./preceding::*:div/@type='part') + 1"/>
+        </xsl:when>
+        <xsl:when test="$divLevel = 'chapter'">
+          <xsl:value-of select="count(./preceding::*:div) + 1"/>
+        </xsl:when>
+        <xsl:when test="$divLevel = 'section'">
+          <!-- <xsl:value-of select="count(./preceding::*:div/@type='section') + 1"/> -->
+          <xsl:value-of select="count(./preceding::*:div) + 1"/>          
+        </xsl:when>
+        <xsl:when test="$divLevel = 'subsection'">
+          <xsl:value-of select="count(./preceding::*:div/@type='subsection') + 1"/>
+        </xsl:when>
+        <xsl:when test="$divLevel = 'subsubsection'">
+          <xsl:value-of select="count(./preceding::*:div/@type='subsubsection') + 1"/>
+        </xsl:when>
+        <xsl:when test="$elemName = 'table'">
+          <xsl:value-of select="count(./preceding::*:table) + 1"/>
+        </xsl:when>
+        <xsl:when test="$elemName = 'figure'">
+          <xsl:value-of select="count(./preceding::*:figure) + 1"/>
+        </xsl:when>
+        <xsl:when test="$elemName = 'formula'">
+          <xsl:value-of select="count(./preceding::*:formula) + 1"/>
+        </xsl:when>
+	<xsl:otherwise></xsl:otherwise>
+      </xsl:choose>
+    </xsl:variable>
+    <xsl:copy>
+      <xsl:attribute name="xml:id">
+        <xsl:choose>
+          <xsl:when test="$elemName = 'div'">
+            <xsl:value-of select="concat(replace($divLevel, 'section', 'sec'), $docPos)"/>
+          </xsl:when>
+          <xsl:otherwise>
+            <xsl:value-of select="concat($elemName, $docPos)"/>
+          </xsl:otherwise>
+        </xsl:choose>
+      </xsl:attribute>
+      <xsl:apply-templates select="@*|node()"/>
+    </xsl:copy>
+  </xsl:template>
+
+</xsl:stylesheet>