bugfix

[picodrive.git] / platform / uiq3 / CSimpleTextParser.cpp

/*******************************************************************\r
 *\r
 *	File:		CSimpleTextParser.cpp\r
 *\r
 *	Author:		Peter van Sebille (peter@yipton.net)\r
 *\r
 *	(c) Copyright 2002, Peter van Sebille\r
 *	All Rights Reserved\r
 *\r
 *******************************************************************/\r
\r
#include "CSimpleTextParser.h"\r
\r
enum\r
{\r
	EBadTag,\r
	EBadZeroLengthTag,\r
	EBadIntegerParam,\r
	EBadAlignmentParam,\r
	EBadRgbColorParam\r
};\r
\r
void Panic(TInt aPanic)\r
{\r
	User::Panic(_L("STP"), aPanic);\r
}\r
\r
CSimpleTextFormatParser* CSimpleTextFormatParser::NewLC()\r
{\r
	CSimpleTextFormatParser*	self = new(ELeave)CSimpleTextFormatParser;\r
	CleanupStack::PushL(self);\r
	self->ConstructL();\r
	return self;\r
}\r
\r
CSimpleTextFormatParser::~CSimpleTextFormatParser()\r
{\r
	delete iParaFormat;\r
}\r
\r
void CSimpleTextFormatParser::ConstructL()\r
{\r
	iParaFormat = CParaFormat::NewL();\r
}\r
\r
\r
void CSimpleTextFormatParser::SetBold(TBool aEnable)\r
{\r
	iCharFormat.iFontSpec.iFontStyle.SetStrokeWeight(aEnable ? EStrokeWeightBold : EStrokeWeightNormal);\r
	iCharMask.ClearAll();\r
	iCharMask.SetAttrib(EAttFontStrokeWeight);\r
	iRichText->ApplyCharFormatL(iCharFormat, iCharMask, TextPos(), 0);\r
}\r
\r
void CSimpleTextFormatParser::SetItalic(TBool aEnable)\r
{\r
	iCharFormat.iFontSpec.iFontStyle.SetPosture(aEnable ? EPostureItalic : EPostureUpright);\r
	iCharMask.ClearAll();\r
	iCharMask.SetAttrib(EAttFontPosture);\r
	iRichText->ApplyCharFormatL(iCharFormat, iCharMask, TextPos(), 0);\r
}\r
\r
void CSimpleTextFormatParser::SetUnderLine(TBool aEnable)\r
{\r
	iCharFormat.iFontPresentation.iUnderline = aEnable ? EUnderlineOn : EUnderlineOff;\r
	iCharMask.ClearAll();\r
	iCharMask.SetAttrib(EAttFontUnderline);\r
	iRichText->ApplyCharFormatL(iCharFormat, iCharMask, TextPos(), 0);\r
}\r
\r
void CSimpleTextFormatParser::SetHiddenText(TBool aEnable)\r
{\r
	iCharFormat.iFontPresentation.iHiddenText = aEnable;\r
	iCharMask.ClearAll();\r
	iCharMask.SetAttrib(EAttFontHiddenText);\r
	iRichText->ApplyCharFormatL(iCharFormat, iCharMask, TextPos(), 0);\r
}\r
\r
TRgb CSimpleTextFormatParser::ForegroundColor()\r
{\r
	iCharMask.ClearAll();\r
	iCharMask.SetAttrib(EAttColor);\r
	iRichText->GetCharFormat(iCharFormat, iCharMask, TextPos(), 0);\r
	return iCharFormat.iFontPresentation.iTextColor;\r
}\r
\r
void CSimpleTextFormatParser::SetForegroundColor(const TRgb& aColor)\r
{\r
	iCharFormat.iFontPresentation.iTextColor = aColor;\r
	iCharMask.ClearAll();\r
	iCharMask.SetAttrib(EAttColor);\r
	iRichText->ApplyCharFormatL(iCharFormat, iCharMask, TextPos(), 0);\r
}\r
\r
void CSimpleTextFormatParser::SetBackgroundColor(const TRgb& aColor)\r
{\r
	iParaFormat->iFillColor = aColor;\r
	iParaMask.ClearAll();\r
	iParaMask.SetAttrib(EAttFillColor);\r
	iRichText->ApplyParaFormatL(iParaFormat, iParaMask, ParaPos(), 0);\r
}\r
\r
void CSimpleTextFormatParser::NewParagraph()\r
{\r
	iCurrentPara++;\r
	iRichText->AppendParagraphL();\r
	AppendTextL(_L(""));\r
}\r
\r
\r
void CSimpleTextFormatParser::SetAlignment(CParaFormat::TAlignment aAlignment)\r
{\r
	iParaFormat->iHorizontalAlignment = aAlignment;\r
	iParaMask.ClearAll();\r
	iParaMask.SetAttrib(EAttAlignment);\r
	iRichText->ApplyParaFormatL(iParaFormat, iParaMask, ParaPos(), 0);\r
}\r
\r
\r
void CSimpleTextFormatParser::SetFontHeight(TInt aHeight)\r
{\r
	iCharFormat.iFontSpec.iHeight = (aHeight * KTwipsPerInch)/KPointsPerInch;\r
	iCharMask.ClearAll();\r
	iCharMask.SetAttrib(EAttFontHeight);\r
	iRichText->ApplyCharFormatL(iCharFormat, iCharMask, TextPos(), 0);\r
}\r
\r
void CSimpleTextFormatParser::SetFontName(const TDesC& aName)\r
{\r
	iCharFormat.iFontSpec.iTypeface.iName = aName;\r
	iCharFormat.iFontSpec.iTypeface.SetAttributes(0);\r
	iCharFormat.iFontSpec.iTypeface.SetIsProportional(ETrue);\r
	iCharMask.ClearAll();\r
	iCharMask.SetAttrib(EAttFontTypeface);\r
	iRichText->ApplyCharFormatL(iCharFormat, iCharMask, TextPos(), 0);\r
}\r
\r
\r
/*\r
 * Character formatting:\r
 * <b>				Bold on\r
 * </b>				Bold of\r
 * <i>				Italic on\r
 * </i>				Italic off\r
 * <u>				Underline on\r
 * </u>				Underline off\r
 * <h>				Hidden text on		**doesn't work**\r
 * </h>				Hidden text off		**doesn't work**\r
 * <f=name>			Fontname: name (type: string)\r
 * <s=size>			Fontsize: size (type: integer)\r
 * <fg=color>		Foreground color: color (type: color)\r
 * </fg>			Restore foreground color\r
 *\r
 * Paragraph formatting:\r
 * <p>				New paragraph - will reset both character & paragraph formatting to defaults\r
 * <a=align>		Alignment: aling (type: alignement)\r
 * <bg=color>		Background color: color (type: color) **doesn't work**\r
 *\r
 * Special characters:\r
 * </<>				The character: <\r
 *\r
 * Types:\r
 * - string:\r
 * - integer:		Either decimal or hexidecimal value\r
 * - color:			Either integer specifing rgb value, or (r,g,b) in which r, g and b are of type integer\r
 * - align:			element of enumeration {center, left, right}\r
 *\r
 * Comments:\r
 * The syntax/parser is fairly simplistic. The parser is not trying to match a tag like \r
 * <tag> </tag> as XML/HTML do. Basically, when it encounters a tag (e.g., <b>) it will \r
 * simply instruct the the editor to apply the formatting from the current position as \r
 * specified by the tag (e.g., enable bold). For example, <b><b>Hello</b>World</b> results\r
 * in Hello displayed in a Bold font and World in a normal font.\r
 *\r
 * The only case where state is maintained is when using <fg=color> and </fg>. The current\r
 * fg color is stored when parsing <fg=color> and restored when doing </fg>. Again, <fg> and \r
 * </fg> don't have the XML/HTML <tag> </tag> behavior. For example:\r
 *       <fg=red>Peter<fg=blue>was</fg></fg>here\r
 * results in "Peter" displayed in red, "was" displayed in blue and "here" displayed in red.\r
 * It literally goes like this:\r
 *   1) <fg=red>  --> apply editor text color red, previous color = whatever the editor's text color is now\r
 *   2) <fg=blue> --> apply editor text color blue, previous color = whatever the editor's text color \r
 *                    is now --> red\r
 *   3) </fg>     --> apply editor text to previous color --> red\r
 *   4) </fg>     --> apply editor text to previous color --> red\r
 *\r
 * What you probably wanted was:\r
 *       <fg=red>Peter</fg><fg=blue>was</fg>here\r
 * Now "Peter" is displayed in red, "was" in blue and "here" in the default editor's color\r
 */\r
\r
static TUint32 ParseInteger(const TDesC& aString)\r
{\r
	TUint32		val = 0;\r
	TBool		parsed = EFalse;\r
	if (aString.Length() > 2)\r
	{\r
		if ((aString[0] == '0') && ((aString[0] == 'x') || (aString[0] == 'X')))\r
		{\r
			TLex	lex(aString.Right(aString.Length()-2));\r
			if (lex.Val(val, EHex) != KErrNone)\r
			{\r
				__ASSERT_DEBUG(ETrue, Panic(EBadIntegerParam));\r
			}\r
			parsed = ETrue;\r
		}\r
	}\r
	if (!parsed)\r
	{\r
		TLex	lex(aString);\r
		if (lex.Val(val, EDecimal) != KErrNone)\r
		{\r
			__ASSERT_DEBUG(ETrue, Panic(EBadIntegerParam));\r
		}\r
	}\r
	return val;\r
}\r
\r
static TRgb ParseColor(const TDesC& aString)\r
{\r
	if (aString.Length() > 0)\r
	{\r
		if (aString[0] == 'R')\r
		{\r
			if (aString.Compare(_L("RgbBlack")) == 0)\r
				return KRgbBlack;\r
			else if (aString.Compare(_L("RgbDarkGray")) == 0)\r
				return KRgbDarkGray;\r
			else if (aString.Compare(_L("RgbDarkRed")) == 0)\r
				return KRgbDarkRed;\r
			else if (aString.Compare(_L("RgbDarkGreen")) == 0)\r
				return KRgbDarkGreen;\r
			else if (aString.Compare(_L("RgbDarkYellow")) == 0)\r
				return KRgbDarkYellow;\r
			else if (aString.Compare(_L("RgbDarkBlue")) == 0)\r
				return KRgbDarkBlue;\r
			else if (aString.Compare(_L("RgbDarkMagenta")) == 0)\r
				return KRgbDarkMagenta;\r
			else if (aString.Compare(_L("RgbDarkCyan")) == 0)\r
				return KRgbDarkCyan;\r
			else if (aString.Compare(_L("RgbRed")) == 0)\r
				return KRgbRed;\r
			else if (aString.Compare(_L("RgbGreen")) == 0)\r
				return KRgbGreen;\r
			else if (aString.Compare(_L("RgbYellow")) == 0)\r
				return KRgbYellow;\r
			else if (aString.Compare(_L("RgbBlue")) == 0)\r
				return KRgbBlue;\r
			else if (aString.Compare(_L("RgbMagenta")) == 0)\r
				return KRgbMagenta;\r
			else if (aString.Compare(_L("RgbCyan")) == 0)\r
				return KRgbCyan;\r
			else if (aString.Compare(_L("RgbGray")) == 0)\r
				return KRgbGray;\r
			else if (aString.Compare(_L("RgbWhite")) == 0)\r
				return KRgbWhite;\r
			else\r
			{\r
				__ASSERT_DEBUG(ETrue, Panic(EBadRgbColorParam));\r
			}\r
		}\r
		return ParseInteger(aString);\r
	}\r
	__ASSERT_DEBUG(ETrue, Panic(EBadRgbColorParam));\r
\r
	return KRgbBlack;\r
}\r
\r
\r
\r
static CParaFormat::TAlignment ParseAlignment(const TDesC& aString)\r
{\r
	if (aString.Compare(_L("center")) == 0)\r
	{\r
		return CParaFormat::ECenterAlign;\r
	}\r
	else if (aString.Compare(_L("left")) == 0)\r
	{\r
		return CParaFormat::ELeftAlign;\r
	}\r
	else if (aString.Compare(_L("right")) == 0)\r
	{\r
		return CParaFormat::ERightAlign;\r
	}\r
	__ASSERT_DEBUG(ETrue, Panic(EBadAlignmentParam));\r
\r
	return CParaFormat::ECenterAlign;\r
}\r
\r
void CSimpleTextFormatParser::ParseTagL(const TDesC& aTag)\r
{\r
	TInt	tagLength = aTag.Length();\r
	if (tagLength == 0)\r
	{\r
		__ASSERT_DEBUG(ETrue, Panic(EBadZeroLengthTag));\r
		return;\r
	}\r
\r
	TPtrC	param(_L(""));\r
	TInt pos = aTag.Find(_L("="));\r
	if (pos>0)\r
	{\r
		param.Set(aTag.Right(aTag.Length()-pos-1));\r
		tagLength = pos;\r
	}\r
	TPtrC	tag = aTag.Left(tagLength);\r
\r
//	RDebug::Print(_L("tag=%S, param=%S"), &tag, &param);\r
\r
	switch (tagLength)\r
	{\r
		case 1:\r
		{\r
			if (tag.Compare(_L("a")) == 0)\r
				SetAlignment(ParseAlignment(param));\r
			else if (tag.Compare(_L("b")) == 0)\r
				SetBold();\r
			else if (tag.Compare(_L("f")) == 0)\r
				SetFontName(param);\r
			else if (tag.Compare(_L("h")) == 0)\r
				SetHiddenText();\r
			else if (tag.Compare(_L("i")) == 0)\r
				SetItalic();\r
			else if (tag.Compare(_L("p")) == 0)\r
				NewParagraph();\r
			else if (tag.Compare(_L("s")) == 0)\r
				SetFontHeight(ParseInteger(param));\r
			else if (tag.Compare(_L("u")) == 0)\r
				SetUnderLine();\r
			else\r
			{\r
				__ASSERT_DEBUG(ETrue, Panic(EBadTag));\r
			}\r
			break;\r
		}\r
		\r
		case 2:\r
		{\r
			if (tag.Compare(_L("/b")) == 0)\r
				SetBold(EFalse);\r
			if (tag.Compare(_L("bg")) == 0)\r
				SetBackgroundColor(ParseColor(param));\r
			if (tag.Compare(_L("fg")) == 0)\r
			{\r
				iPrevFgColor = ForegroundColor();\r
				SetForegroundColor(ParseColor(param));\r
			}\r
			else if (tag.Compare(_L("/h")) == 0)\r
				SetHiddenText(EFalse);\r
			else if (tag.Compare(_L("/i")) == 0)\r
				SetItalic(EFalse);\r
			else if (tag.Compare(_L("/u")) == 0)\r
				SetUnderLine(EFalse);\r
			else if (tag.Compare(_L("/<")) == 0)\r
				AppendTextL(_L("<"));\r
			break;\r
		}\r
		case 3:\r
		{\r
			if (tag.Compare(_L("/fg")) == 0)\r
				SetForegroundColor(iPrevFgColor);\r
			break;\r
		}\r
		default:\r
			;\r
	}\r
}\r
\r
void CSimpleTextFormatParser::ParseL(const TDesC& aSimpleText, CRichText& aRichText)\r
{\r
	iRichText = &aRichText;\r
	iCurrentPara = 0;\r
\r
	TBool	done = EFalse;\r
	TPtrC simpleText(aSimpleText);\r
	do\r
	{\r
		TInt pos = simpleText.Locate('<');\r
		if (pos > 0)\r
		{\r
			AppendTextL(simpleText.Left(pos));\r
			simpleText.Set(simpleText.Right(simpleText.Length() - pos));\r
		}\r
		else if (pos == 0)\r
		{\r
			pos = simpleText.Locate('>');\r
			if (pos<=0)\r
				User::Leave(KErrArgument);\r
			ParseTagL(simpleText.Mid(1, pos-1));\r
			simpleText.Set(simpleText.Right(simpleText.Length() - pos - 1));\r
		}\r
		else\r
		{\r
			AppendTextL(simpleText);\r
			done = ETrue;\r
		}\r
	} while (!done);\r
}\r
\r
\r
TInt CSimpleTextFormatParser::TextPos()\r
{\r
	return iRichText->DocumentLength();\r
#if 0\r
	TInt pos, length;\r
	pos = iRichText->CharPosOfParagraph(length, iCurrentPara);\r
	return pos+length-1;\r
#endif\r
}\r
\r
TInt CSimpleTextFormatParser::ParaPos()\r
{\r
	return TextPos();\r
#if 0\r
	TInt pos, length;\r
	pos = iRichText->CharPosOfParagraph(length, iCurrentPara);\r
	return pos+length-1;\r
#endif\r
}\r
\r
\r
void CSimpleTextFormatParser::AppendTextL(const TDesC& aText)\r
{\r
//	RDebug::Print(_L("text=%S"), &aText);\r
	iRichText->InsertL(TextPos(), aText);\r
}\r
\r
\r
#if 0\r
void CTestDialog::ShowTextL(CRichText& aRichText)\r
{\r
	aRichText.Reset();\r
\r
	TCharFormat			charFormat;\r
	TCharFormatMask		charMask;\r
	aRichText.GetCharFormat(charFormat, charMask, 0, 0);\r
\r
	TInt para = 0;\r
	AppendTextL(_L("http://www.yipton.net"), aRichText);\r
\r
	para++;\r
	aRichText.AppendParagraphL();\r
\r
	CParaFormat*	paraFormat = CParaFormat::NewLC();\r
	TParaFormatMask	paraMask;\r
	aRichText.GetParaFormatL(paraFormat, paraMask, ParaPos(aRichText, para), 0);\r
	paraFormat->iHorizontalAlignment = CParaFormat::ECenterAlign;\r
	paraMask.ClearAll();\r
	paraMask.SetAttrib(EAttAlignment);\r
	aRichText.ApplyParaFormatL(paraFormat, paraMask, ParaPos(aRichText, para), 0);\r
\r
	charFormat.iFontPresentation.iUnderline = EUnderlineOn;\r
	charFormat.iFontSpec.iFontStyle.SetPosture(EPostureItalic);\r
	charMask.ClearAll();\r
	charMask.SetAttrib(EAttFontPosture);\r
	charMask.SetAttrib(EAttFontUnderline);\r
	aRichText.ApplyCharFormatL(charFormat, charMask, TextPos(aRichText, para));\r
	AppendTextL(_L("mailto:Peter is here"), aRichText, para);\r
\r
	para++;\r
	aRichText.AppendParagraphL();\r
\r
	TFontSpec	fontSpec(_L("edmunds"), 20 * KPointsPerInch);\r
//	CFont*	font = NULL;\r
//	iCoeEnv->ScreenDevice()->GetNearestFontInTwips(font, fontSpec);\r
\r
	charFormat.iFontSpec = fontSpec;\r
	charMask.ClearAll();\r
	charMask.SetAttrib(EAttFontHeight);\r
	charMask.SetAttrib(EAttFontTypeface);\r
	aRichText.ApplyCharFormatL(charFormat, charMask, TextPos(aRichText, para));\r
	AppendTextL(_L("mailto:Peter is here"), aRichText, para);\r
\r
	CleanupStack::PopAndDestroy();\r
}\r
\r
#endif\r