[sword-svn] r536 - in trunk/modules: . apostolicfathers

scribe at crosswire.org scribe at crosswire.org
Mon Dec 21 01:33:19 EST 2020


Author: scribe
Date: 2020-12-21 01:33:18 -0500 (Mon, 21 Dec 2020)
New Revision: 536

Added:
   trunk/modules/apostolicfathers/
   trunk/modules/apostolicfathers/Makefile
   trunk/modules/apostolicfathers/extractv11n.sh
   trunk/modules/apostolicfathers/impify.sh
Log:
Added apostolic fathers module build


Added: trunk/modules/apostolicfathers/Makefile
===================================================================
--- trunk/modules/apostolicfathers/Makefile	                        (rev 0)
+++ trunk/modules/apostolicfathers/Makefile	2020-12-21 06:33:18 UTC (rev 536)
@@ -0,0 +1,15 @@
+all: upenn/1Clement.imp
+
+upenn/1Clement:
+	wget -r -np http://ccat.sas.upenn.edu/gopher/text/religion/churchwriters/ApostolicFathers/
+	mv ccat.sas.upenn.edu/gopher/text/religion/churchwriters/ApostolicFathers upenn
+	rm -rf ccat.sas.upenn.edu
+	rm -f upenn/*index*
+
+upenn/1Clement.imp: upenn/1Clement
+	./impify.sh
+
+versification.xml: upenn/1Clement.imp
+
+clean:
+	rm -rf ccat.sas.upenn.edu upenn versification.xml

Added: trunk/modules/apostolicfathers/extractv11n.sh
===================================================================
--- trunk/modules/apostolicfathers/extractv11n.sh	                        (rev 0)
+++ trunk/modules/apostolicfathers/extractv11n.sh	2020-12-21 06:33:18 UTC (rev 536)
@@ -0,0 +1,49 @@
+#!/bin/sh
+
+VNFILE=versification.xml
+
+echo "<v11n v11nID=\"ApostolicFathers\">" > $VNFILE
+echo "	<collection collectionID=\"1\">" >> $VNFILE
+for i in upenn/*.imp
+do
+	BOOKNAME=$(echo $i|cut -f2 -d/|cut -f1 -d. \
+		|sed "s/_\\(.*s\\)$/ to the\\1/" \
+		|sed "s/^\\(Martyrdom\\)_/\\1 of/" \
+		|sed "s/_\\(.*\\)$/ to\\1/" \
+		|sed "s/\\(.\\)\\([A-Z]\\)/\\1 \\2/g" \
+	)
+	BOOK=$(grep " 1:1" $i|cut -f1 -d' '|cut -f 4 -d$)
+	CHAPMAX=$(grep "\\$\\$\\$" $i | cut -f2 -d' '|cut -f1 -d:| sort -n| tail -n1)
+	echo "		<book osisID=\"$BOOK\" preferredAbbrev=\"$BOOK\" name=\"$BOOKNAME\" chapterMax=\"$CHAPMAX\">" >> $VNFILE
+	j=1
+	while [ $j -le $CHAPMAX ]
+	do
+		VERSEMAX=$(grep " $j:" $i | cut -f2 -d' '|cut -f2 -d:| sort -n| tail -n1)
+		echo "			<chapter osisID=\"$BOOK.$j\" verseMax=\"$VERSEMAX\"/>" >> $VNFILE
+		j=$(($j + 1))
+	done
+	echo "		</book>" >> $VNFILE
+done
+echo "	</collection>" >> $VNFILE
+echo "	<collection collectionID=\"2\">" >> $VNFILE
+echo "		<book osisID=\"Appendix\" preferredAbbrev=\"Appendix\" name=\"Appendix\" chapterMax=\"3\">" >> $VNFILE
+echo "			<chapter osisID=\"Appendix.1\" verseMax=\"999\"/>" >> $VNFILE
+echo "			<chapter osisID=\"Appendix.2\" verseMax=\"999\"/>" >> $VNFILE
+echo "			<chapter osisID=\"Appendix.3\" verseMax=\"999\"/>" >> $VNFILE
+echo "		</book>" >> $VNFILE
+echo "	</collection>" >> $VNFILE
+echo "	<abbreviations>" >> $VNFILE
+for i in upenn/*.imp
+do
+	BOOKNAME=$(echo $i|cut -f2 -d/|cut -f1 -d. \
+		|sed "s/_\\(.*s\\)$/ to the\\1/" \
+		|sed "s/^\\(Martyrdom\\)_/\\1 of/" \
+		|sed "s/_\\(.*\\)$/ to\\1/" \
+		|sed "s/\\(.\\)\\([A-Z]\\)/\\1 \\2/g" \
+	)
+	BOOK=$(grep " 1:1" $i|cut -f1 -d' '|cut -f 4 -d$)
+	echo "		<abbr osisID=\"$BOOK\">$BOOKNAME</abbr>" >> $VNFILE
+done
+echo "	</abbreviations>" >> $VNFILE
+echo "</v11n>" >> $VNFILE
+


Property changes on: trunk/modules/apostolicfathers/extractv11n.sh
___________________________________________________________________
Added: svn:executable
## -0,0 +1 ##
+*
\ No newline at end of property
Added: trunk/modules/apostolicfathers/impify.sh
===================================================================
--- trunk/modules/apostolicfathers/impify.sh	                        (rev 0)
+++ trunk/modules/apostolicfathers/impify.sh	2020-12-21 06:33:18 UTC (rev 536)
@@ -0,0 +1,27 @@
+#!/bin/sh
+rm -f upenn/*.imp
+for i in upenn/*
+do
+	BOOK=$(grep " 1:1" $i|cut -f1 -d' ')
+	echo "Book: $BOOK"
+	echo "\$\$\$$BOOK 0:0" > $i.imp
+	# These are mostly for very strange things in Hermes, which seems to include
+	# Muliple reference systems which start chapters over after main sections
+	# But also include a chapter numbering scheme which doesn't start over
+	# so for now, we're choosing that one.
+	sed s/^$BOOK/\$\$\$$BOOK/ $i|sed s/prologue:1/1:0/ \
+		|sed "s/\\(\$\$\$[^ ]* \\)[0-9]*\\[\\([0-9]*\\)0\\^/\\1\\21/" \
+		|sed "s/\\(\$\$\$[^ ]* \\)[0-9]*\\[\\([0-9]*\\)1\\^/\\1\\22/" \
+		|sed "s/\\(\$\$\$[^ ]* \\)[0-9]*\\[\\([0-9]*\\)2\\^/\\1\\23/" \
+		|sed "s/\\(\$\$\$[^ ]* \\)[0-9]*\\[\\([0-9]*\\)3\\^/\\1\\24/" \
+		|sed "s/\\(\$\$\$[^ ]* \\)[0-9]*\\[\\([0-9]*\\)4\\^/\\1\\25/" \
+		|sed "s/\\(\$\$\$[^ ]* \\)[0-9]*\\[\\([0-9]*\\)5\\^/\\1\\26/" \
+		|sed "s/\\(\$\$\$[^ ]* \\)[0-9]*\\[\\([0-9]*\\)6\\^/\\1\\27/" \
+		|sed "s/\\(\$\$\$[^ ]* \\)[0-9]*\\[\\([0-9]*\\)7\\^/\\1\\28/" \
+		|sed "s/\\(\$\$\$[^ ]* \\)[0-9]*\\[\\([0-9]*\\)8\\^/\\1\\29/" \
+		|sed "s/\\(\$\$\$[^ ]* \\)[0-9]*\\[104_/\\1106/" \
+		|sed "s/\\(\$\$\$[^ ]* \\)[0-9]*\\[104\`/\\1107/" \
+		|sed "s/\\(\$\$\$[^ ]* \\)[0-9]*\\[104a/\\1108/" \
+		|sed "s/\\(\$\$\$.* \\)[0-9]*\\[\\(.*\\)\\]/\\1\\2/" \
+	        >> $i.imp
+done


Property changes on: trunk/modules/apostolicfathers/impify.sh
___________________________________________________________________
Added: svn:executable
## -0,0 +1 ##
+*
\ No newline at end of property


More information about the sword-cvs mailing list