From ced58cce1fae558e07b6253281601524c212533b Mon Sep 17 00:00:00 2001
From: Gioele Barabucci <gioele@svario.it>
Date: Thu, 18 Nov 2010 11:06:37 +0100
Subject: Split long paragraphs inside flat ODT files

Flat ODT files usually contain very long paragraphs. As each `<text:p>`
is put on its own line, these `.fodt` files end up containing very
long lines. Long lines in XML files cause problems when using flat ODT
files in text-oriented SCM systems like git or when opening these files
in XML editors.

A very simple yet XML-compliant approach to make these lines shorter is
to, during the XML serialization, output a newline instead of a space
every N spaces (only inside paragraphs, if you want to be conservative).
Files created using this method are, from an XML point of view,
equivalent to the currently created `.fodt` files. Their files size
is also identical.
---
 filter/source/odfflatxml/odfflatxmlexport.xsl |    2 +
 filter/source/odfflatxml/split-long-lines.xsl |   87 +++++++++++++++++++++++++
 2 files changed, 89 insertions(+), 0 deletions(-)
 create mode 100644 filter/source/odfflatxml/split-long-lines.xsl

diff --git a/filter/source/odfflatxml/odfflatxmlexport.xsl b/filter/source/odfflatxml/odfflatxmlexport.xsl
index e08afd7..2c1ea97 100644
--- a/filter/source/odfflatxml/odfflatxmlexport.xsl
+++ b/filter/source/odfflatxml/odfflatxmlexport.xsl
@@ -11,4 +11,6 @@
   <xsl:template match="@office:mimetype[string(.)='application/vnd.oasis.opendocument.drawing']">
       <xsl:attribute name="office:mimetype">application/vnd.oasis.opendocument.graphics</xsl:attribute>
   </xsl:template>
+
+  <xsl:include href="split-long-lines.xsl"/>
 </xsl:stylesheet>
diff --git a/filter/source/odfflatxml/split-long-lines.xsl b/filter/source/odfflatxml/split-long-lines.xsl
new file mode 100644
index 0000000..cdf9f73
--- /dev/null
+++ b/filter/source/odfflatxml/split-long-lines.xsl
@@ -0,0 +1,87 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!--
+Version: ISC
+
+The Initial Developer of the Original Code is
+      Gioele Barabucci <gioele@svario.it>
+
+Contributor(s):
+
+Portions created by the Initial Developer are Copyright (C) 2010 the
+Initial Developer. All Rights Reserved.
+
+Permission to use, copy, modify, and/or distribute this software for any
+purpose with or without fee is hereby granted, provided that the above
+copyright notice and this permission notice appear in all copies.
+
+THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
+WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
+MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
+ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
+ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
+OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+-->
+<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
+                xmlns:text="urn:oasis:names:tc:opendocument:xmlns:text:1.0"
+                version="1.0">
+	<xsl:param name="num-max-spaces">5</xsl:param>
+	<xsl:param name="sep"><xsl:text xml:space="preserve">&#32;</xsl:text></xsl:param>
+	<xsl:param name="newline"><xsl:text xml:space="preserve">&#10;</xsl:text></xsl:param>
+
+	<xsl:template match="text:p/text()">
+		<xsl:call-template name="split-text">
+			<xsl:with-param name="num-prec-spaces">0</xsl:with-param>
+			<xsl:with-param name="text" select="."/>
+		</xsl:call-template>
+	</xsl:template>
+
+	<xsl:template name="split-text">
+		<xsl:param name="num-prec-spaces"/>
+		<xsl:param name="text"/>
+
+		<xsl:variable name="contains-space" select="contains($text, $sep)"/>
+		<xsl:variable name="text-before">
+			<xsl:choose>
+				<xsl:when test="$contains-space"><xsl:value-of select="substring-before($text, $sep)"/></xsl:when>
+				<xsl:when test="$text = $sep"><xsl:value-of select="$text"/></xsl:when>
+				<xsl:otherwise><xsl:value-of select="$text"/></xsl:otherwise>
+			</xsl:choose>
+		</xsl:variable>
+		<xsl:variable name="text-after">
+			<xsl:choose>
+				<xsl:when test="$contains-space"><xsl:value-of select="substring-after($text, $sep)"/></xsl:when>
+				<xsl:otherwise></xsl:otherwise>
+			</xsl:choose>
+		</xsl:variable>
+		<xsl:variable name="finished" select="string-length($text-after) = 0"/>
+		<xsl:variable name="is-empty" select="string-length($text-before) = 0"/>
+
+		<xsl:value-of select="$text-before"/>
+
+		<xsl:choose>
+			<xsl:when test="$num-prec-spaces = $num-max-spaces">
+				<xsl:value-of select="$newline"/>
+				<xsl:call-template name="split-text">
+					<xsl:with-param name="text" select="$text-after"/>
+					<xsl:with-param name="num-prec-spaces">0</xsl:with-param>
+				</xsl:call-template>
+			</xsl:when>
+
+			<xsl:otherwise>
+				<xsl:if test="$contains-space">
+					<xsl:value-of select="$sep"/>
+				</xsl:if>
+
+				<xsl:if test="not($finished)">
+					<xsl:variable name="incr" select="number(not($is-empty))"/>
+
+					<xsl:call-template name="split-text">
+						<xsl:with-param name="text" select="$text-after"/>
+						<xsl:with-param name="num-prec-spaces" select="$num-prec-spaces + $incr"/>
+					</xsl:call-template>
+				</xsl:if>
+			</xsl:otherwise>
+		</xsl:choose>
+	</xsl:template>
+</xsl:stylesheet>
-- 
1.7.3.2


From 51e5ff0d4bd738fc69c2ded044339a6872dc0614 Mon Sep 17 00:00:00 2001
From: Gioele Barabucci <gioele@svario.it>
Date: Thu, 18 Nov 2010 11:22:20 +0100
Subject: Also split `<text:span>` elements

---
 filter/source/odfflatxml/split-long-lines.xsl |    7 +++++++
 1 files changed, 7 insertions(+), 0 deletions(-)

diff --git a/filter/source/odfflatxml/split-long-lines.xsl b/filter/source/odfflatxml/split-long-lines.xsl
index cdf9f73..a5bb8e6 100644
--- a/filter/source/odfflatxml/split-long-lines.xsl
+++ b/filter/source/odfflatxml/split-long-lines.xsl
@@ -36,6 +36,13 @@ OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 		</xsl:call-template>
 	</xsl:template>
 
+	<xsl:template match="text:p/text:span/text()">
+		<xsl:call-template name="split-text">
+			<xsl:with-param name="num-prec-spaces">0</xsl:with-param>
+			<xsl:with-param name="text" select="."/>
+		</xsl:call-template>
+	</xsl:template>
+
 	<xsl:template name="split-text">
 		<xsl:param name="num-prec-spaces"/>
 		<xsl:param name="text"/>
-- 
1.7.3.2


From 4c70e80e9dbe0c2b258c64e733792dcec1739d77 Mon Sep 17 00:00:00 2001
From: Gioele Barabucci <gioele@svario.it>
Date: Thu, 18 Nov 2010 11:23:29 +0100
Subject: Unification of `<text:p>` and `<text:span>` code paths

---
 filter/source/odfflatxml/split-long-lines.xsl |    9 +++++----
 1 files changed, 5 insertions(+), 4 deletions(-)

diff --git a/filter/source/odfflatxml/split-long-lines.xsl b/filter/source/odfflatxml/split-long-lines.xsl
index a5bb8e6..b514e28 100644
--- a/filter/source/odfflatxml/split-long-lines.xsl
+++ b/filter/source/odfflatxml/split-long-lines.xsl
@@ -30,13 +30,14 @@ OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 	<xsl:param name="newline"><xsl:text xml:space="preserve">&#10;</xsl:text></xsl:param>
 
 	<xsl:template match="text:p/text()">
-		<xsl:call-template name="split-text">
-			<xsl:with-param name="num-prec-spaces">0</xsl:with-param>
-			<xsl:with-param name="text" select="."/>
-		</xsl:call-template>
+		<xsl:call-template name="split-current-text-node"/>
 	</xsl:template>
 
 	<xsl:template match="text:p/text:span/text()">
+		<xsl:call-template name="split-current-text-node"/>
+	</xsl:template>
+
+	<xsl:template name="split-current-text-node">
 		<xsl:call-template name="split-text">
 			<xsl:with-param name="num-prec-spaces">0</xsl:with-param>
 			<xsl:with-param name="text" select="."/>
-- 
1.7.3.2