1 files changed, 85 insertions, 0 deletions
diff --git a/utilities/mod2vpl.cpp b/utilities/mod2vpl.cpp
new file mode 100644
index 0000000..edcbfc6
--- /dev/null
+++ b/utilities/mod2vpl.cpp
@@ -0,0 +1,85 @@
+#include <swmgr.h>
+#include <swmodule.h>
+#include <swkey.h>
+#include <versekey.h>
+#include <stdio.h>
+#include <iostream>
+#ifndef NO_SWORD_NAMESPACE
+using sword::SWMgr;
+using sword::VerseKey;
+using sword::SWModule;
+using sword::SWKey;
+using sword::SW_POSITION;
+using sword::ModMap;
+#endif
+
+void cleanbuf(char *buf) {
+	char *from = buf;
+	char *to = buf;
+
+	while (*from) {
+		if ((*from != 10) && (*from != 13)) {
+			*to++ = *from++;
+		}
+		else {
+			from++;
+		}
+	}
+	*to = 0;
+}
+
+int main(int argc, char **argv) {
+	char *buffer = 0;
+
+	if (argc < 2) {
+		fprintf(stderr, "usage: %s <Mod Name> [0|1 - prepend verse reference to each line]\n", argv[0]);
+		exit(-1);
+	}
+
+	SWMgr mgr;
+
+	ModMap::iterator it = mgr.Modules.find(argv[1]);
+	if (it == mgr.Modules.end()) {
+		fprintf(stderr, "error: %s: couldn't find module: %s \n", argv[0], argv[1]);
+		exit(-2);
+	}
+
+	bool vref = false;
+	if (argc > 2)
+		vref = (argv[2][0] == '0') ? false : true;
+
+
+	SWModule *mod = it->second;
+
+	SWKey *key = (*mod);
+	VerseKey *vkey = 0;
+	SWTRY {
+		vkey = dynamic_cast<VerseKey *>(key);
+	}
+	SWCATCH (...) {}
+
+	if (!vkey) {
+		fprintf(stderr, "error: %s: %s module is not keyed to verses \n", argv[0], argv[1]);
+		exit(-3);
+	}
+
+	vkey->Headings(1);	// turn on mod/testmnt/book/chap headings
+
+	(*mod) = TOP;
+
+	while (!mod->Error()) {
+		buffer = new char [ strlen ((const char *)(*mod)) + 1 ];
+		strcpy(buffer, (const char *)(*mod));
+		cleanbuf(buffer);
+		if (vref) {
+			if ((strlen(buffer) > 0) && (vref)) {
+				std::cout << (const char *)(*vkey) << " ";
+				std::cout << buffer << std::endl;
+			}
+		}
+		else std::cout << buffer << std::endl;
+
+		delete [] buffer;
+		(*mod)++;
+	}
+}