[sword-cvs] sword/src/modules/filters gbfredletterwords.cpp,NONE,1.1

[sword@www.crosswire.org]

Update of /usr/local/cvsroot/sword/src/modules/filters
In directory www:/tmp/cvs-serv31807/src/modules/filters

Added Files:
	gbfredletterwords.cpp 
Log Message:
added new strip filter for red letter words

--- NEW FILE: gbfredletterwords.cpp ---
/******************************************************************************
 *
 * GBFRedLetterWords -	SWFilter decendant to hide or show strongs number
 *			in a GBF module.
 */


#include <stdlib.h>
#include <string.h>
#include <gbfredletterwords.h>
#include <swmodule.h>
#ifndef __GNUC__
#else
#include <unixstr.h>
#endif
#include <ctype.h>

SWORD_NAMESPACE_START

const char GBFRedLetterWords::on[] = "On";
const char GBFRedLetterWords::off[] = "Off";
const char GBFRedLetterWords::optName[] = "Red letter words";
const char GBFRedLetterWords::optTip[] = "Toggles Red letter words  On and Off if they exist";


GBFRedLetterWords::GBFRedLetterWords() {
	option = false;
	options.push_back(on);
	options.push_back(off);
}


GBFRedLetterWords::~GBFRedLetterWords() {
}

void GBFRedLetterWords::setOptionValue(const char *ival)
{
	option = (!stricmp(ival, on));
}

const char *GBFRedLetterWords::getOptionValue()
{
	return (option) ? on:off;
}

char GBFRedLetterWords::ProcessText(char *text, int maxlen, const SWKey *key, const SWModule *module)
{
/** This function removes the red letter words in Bible like the WEB
* The words are marked by <FR> as start and <Fr> as end tag.
*/
	if (!option) {	// if we don't want footnotes
		char *to, *from, token[4096]; // cheese.  Fix.
		int tokpos = 0;
		bool intoken = false;
		int len;
		bool hide = false;

		len = strlen(text) + 1;	// shift string to right of buffer
		if (len < maxlen) {
			memmove(&text[maxlen - len], text, len);
			from = &text[maxlen - len];
		}
		else	from = text;	// -------------------------------

		for (to = text; *from; from++) {
			if (*from == '<') {
				intoken = true;
				tokpos = 0;
//				memset(token, 0, 4096);
				token[0] = 0;
				token[1] = 0;
				token[2] = 0;
				continue;
			}
			if (*from == '>') {	// process tokens
				intoken = false;
				/*switch (*token) {
				case 'F':			// Font attribute
					switch(token[1]) {
					case 'R':               // Begin red letter words
						hide = true;
						break;
					case 'r':               // end red letter words
						hide = false;
						break;
					}
					continue;	// skip token
				}*/

				//hide the token if either FR or Fr was detected
				hide = (token[0] == 'F' && ( (token[1] == 'R') || (token[1] == 'r') ));

				// if not a red letter word token, keep token in text
				if (!hide) {
					*to++ = '<';
					for (char *tok = token; *tok; tok++)
						*to++ = *tok;
					*to++ = '>';
				}
				continue;
			}
			if (intoken) {
				if (tokpos < 4090)
					token[tokpos++] = *from;
					token[tokpos+2] = 0;	// +2 cuz we init token with 2 extra '0' because of switch statement
			}
			else {
				*to++ = *from;
			}
		}
		*to++ = 0;
		*to = 0;
	}
	return 0;
}

SWORD_NAMESPACE_END