diff options
Diffstat (limited to 'utilities/thml2gbs.cpp')
-rw-r--r-- | utilities/thml2gbs.cpp | 329 |
1 files changed, 329 insertions, 0 deletions
diff --git a/utilities/thml2gbs.cpp b/utilities/thml2gbs.cpp new file mode 100644 index 0000000..e95f4ab --- /dev/null +++ b/utilities/thml2gbs.cpp @@ -0,0 +1,329 @@ +#include <ctype.h> +#include <stdio.h> +#include <fcntl.h> +#include <errno.h> +#include <stdlib.h> + +#ifndef __GNUC__ +#include <io.h> +#else +#include <unistd.h> +#endif + +#include <entriesblk.h> +#include <iostream> +#include <string> +#include <stdio.h> +#include <treekeyidx.h> +#include <rawgenbook.h> + +#ifndef O_BINARY +#define O_BINARY 0 +#endif + +void printTree(TreeKeyIdx treeKey, TreeKeyIdx *target = 0, int level = 1) { + if (!target) + target = &treeKey; + + unsigned long currentOffset = target->getOffset(); + std::cout << ((currentOffset == treeKey.getOffset()) ? "==>" : ""); + for (int i = 0; i < level; i++) std::cout << "\t"; + std::cout << treeKey.getLocalName() << "/\n"; + if (treeKey.firstChild()) { + printTree(treeKey, target, level+1); + treeKey.parent(); + } + if (treeKey.nextSibling()) + printTree(treeKey, target, level); + +} + + + +void setkey (TreeKeyIdx * treeKey, char* keybuffer) { + char* tok = strtok(keybuffer, "/"); + while (tok) { + bool foundkey = false; + if (treeKey->hasChildren()) { + treeKey->firstChild(); + if (!strcmp(treeKey->getLocalName(), tok)) { + foundkey = true; + } else { + while (treeKey->nextSibling()) { + if (treeKey->getLocalName()) { + if (!strcmp(treeKey->getLocalName(), tok)) { + foundkey = true; + } + } + } + } + if (!foundkey) { + treeKey->append(); + treeKey->setLocalName(tok); + treeKey->save(); + } + } + else { + treeKey->appendChild(); + treeKey->setLocalName(tok); + treeKey->save(); + } + + //DEBUG std::cout << treeKey->getLocalName() << " : " << tok << std::endl; + + tok = strtok(NULL, "/"); + + } +} + +int main(int argc, char **argv) { + + const char * helptext ="thml2gbs 1.0 General Book module creation tool for the SWORD Project\n usage:\n %s <filename> [modname] [0|1 - long names] [0|1 - output in 'import format']\n"; + + signed long i = 0; + string divs[6]; + int level = 0; + char* keybuffer = new char[2048]; + char* entbuffer = new char[1048576]; + char modname[16]; + unsigned long entrysize = 0; + unsigned long keysize = 0; + + bool closer = false; + bool longnames = false; + if (argc > 3) + if (strcmp(argv[3], "0")) + longnames = true; + bool exportfile = false; + if (argc > 4) + if (strcmp(argv[4], "0")) + exportfile = true; + + + char* n = new char[256]; + char* type = new char[256]; + char* title= new char[512]; + + char* strtmp; + + if (argc > 2) { + strcpy (modname, argv[2]); + } + else if (argc > 1) { + for (i = 0; (i < 16) && (argv[1][i]) && (argv[1][i] != '.'); i++) { + modname[i] = argv[1][i]; + } + modname[i] = 0; + } + else { + fprintf(stderr, helptext, argv[0]); + exit(-1); + } + + + FILE *infile; + infile = fopen(argv[1], "r"); + FILE *outfile; + if (exportfile) { + strcat (modname, ".imp"); + outfile = fopen(modname, "w"); + } + + TreeKeyIdx * treeKey; + RawGenBook *book; + + if (!exportfile) { + // Do some initialization stuff + TreeKeyIdx::create(modname); + treeKey = new TreeKeyIdx(modname); + RawGenBook::createModule(modname); + delete treeKey; + book = new RawGenBook(modname); + //DEBUG TreeKeyIdx root = *((TreeKeyIdx *)((SWKey *)(*book))); + treeKey = ((TreeKeyIdx *)((SWKey *)(*book))); + } + + int c; + while ((c = fgetc(infile)) != EOF) { + if (c == '<') { + if (fgets( keybuffer, 6, infile )) { + if (!strncmp(keybuffer, "/div", 4) && (keybuffer[4] > '0' && keybuffer[4] < '7')) { + if (!closer) { + keysize = 0; + keybuffer[0] = 0; + for (i = 0; i < level; i++) { + keybuffer[keysize] = '/'; + keysize++; + keybuffer[keysize] = 0; + strcat (keybuffer, divs[i].c_str()); + keysize += divs[i].length(); + } + + if (level) { + std::cout << keybuffer << std::endl; + if (exportfile) { + fprintf (outfile, "$$$%s\n%s\n", keybuffer, entbuffer); + } + else { + treeKey->root(); + setkey(treeKey, keybuffer); + book->setEntry(entbuffer, entrysize); // save text to module at current position + } + } + } + level--; + entbuffer[0] = 0; + entrysize = 0; + + closer = true; + } + else if (strncmp(keybuffer, "div", 3) + || (keybuffer[3] < '1' || keybuffer[3] > '6')) { + for (i = 4; i >= 0; i--) { + ungetc(keybuffer[i], infile); + } + entbuffer[entrysize] = '<'; + entrysize++; + entbuffer[entrysize] = 0; + } + else { + //we have a divN... + if (!closer) { + keysize = 0; + keybuffer[0] = 0; + for (i = 0; i < level; i++) { + keybuffer[keysize] = '/'; + keysize++; + keybuffer[keysize] = 0; + strcat (keybuffer, divs[i].c_str()); + keysize += divs[i].length(); + } + + if (level) { + std::cout << keybuffer << std::endl; + if (exportfile) { + fprintf (outfile, "$$$%s\n%s\n", keybuffer, entbuffer); + } + else { + treeKey->root(); + setkey(treeKey, keybuffer); + book->setEntry(entbuffer, entrysize); // save text to module at current position + } + } + } + + entbuffer[0] = 0; + entrysize = 0; + + level++; + keysize = 0; + while ((c = fgetc(infile)) != EOF) { + if (c != '>') { + keybuffer[keysize] = c; + keysize++; + } + else { + break; + } + } + keybuffer[keysize] = 0; + + type[0] = 0; + strtmp = strstr(keybuffer, "type=\""); + if (strtmp) { + strtmp += 6; + i = 0; + for (;*strtmp != '\"'; strtmp++) { + if (*strtmp == 10) { + type[i] = ' '; + i++; + } + else if (*strtmp != 13) { + type[i] = *strtmp; + i++; + } + } + type[i] = 0; + } + + n[0] = 0; + strtmp = strstr(keybuffer, "n=\""); + if (strtmp) { + strtmp += 3; + i = 0; + for (;*strtmp != '\"'; strtmp++) { + if (*strtmp == 10) { + n[i] = ' '; + i++; + } + else if (*strtmp != 13) { + n[i] = *strtmp; + i++; + } + } + n[i] = 0; + } + + title[0] = 0; + strtmp = strstr(keybuffer, "title=\""); + if (strtmp) { + strtmp += 7; + i = 0; + for (;*strtmp != '\"'; strtmp++) { + if (*strtmp == 10) { + title[i] = ' '; + i++; + } + else if (*strtmp != 13) { + title[i] = *strtmp; + i++; + } + } + title[i] = 0; + } + strcpy (keybuffer, type); + if (strlen(keybuffer) && strlen(n)) + strcat (keybuffer, " "); + strcat (keybuffer, n); + + if (longnames && strlen(keybuffer)) + strcat (keybuffer, ": "); + if (longnames || !strlen(keybuffer)) + strcat (keybuffer, title); + + divs[level-1] = keybuffer; + + closer = false; + } + } + } + else if (c != 13) { + entbuffer[entrysize] = c; + entrysize++; + entbuffer[entrysize] = 0; + } + } +//DEBUG printTree(root, treeKey); + + delete treeKey; + delete book; + delete n; + delete type; + delete title; + delete keybuffer; + delete entbuffer; + + return 0; +} + + + + + + + + + + + + |