path: root/plugins/NewStory/src/templates.cpp

#include "stdafx.h"

void TplInitVars(TemplateVars *vars);
void TplCleanVars(TemplateVars *vars);
__forceinline TCHAR *TplGetVar(TemplateVars *vars, char id);
__forceinline void TplSetVar(TemplateVars *vars, char id, TCHAR *v, bool d);
int TplMeasureVars(TemplateVars *vars, TCHAR *str);

void vfGlobal(int mode, TemplateVars *vars, HANDLE hContact, HistoryArray::ItemData *item);
void vfContact(int mode, TemplateVars *vars, HANDLE hContact, HistoryArray::ItemData *item);
void vfSystem(int mode, TemplateVars *vars, HANDLE hContact, HistoryArray::ItemData *item);
void vfEvent(int mode, TemplateVars *vars, HANDLE hContact, HistoryArray::ItemData *item);
void vfMessage(int mode, TemplateVars *vars, HANDLE hContact, HistoryArray::ItemData *item);
void vfFile(int mode, TemplateVars *vars, HANDLE hContact, HistoryArray::ItemData *item);
void vfUrl(int mode, TemplateVars *vars, HANDLE hContact, HistoryArray::ItemData *item);
void vfSign(int mode, TemplateVars *vars, HANDLE hContact, HistoryArray::ItemData *item);
void vfAuth(int mode, TemplateVars *vars, HANDLE hContact, HistoryArray::ItemData *item);
void vfAdded(int mode, TemplateVars *vars, HANDLE hContact, HistoryArray::ItemData *item);
void vfDeleted(int mode, TemplateVars *vars, HANDLE hContact, HistoryArray::ItemData *item);
void vfOther(int mode, TemplateVars *vars, HANDLE hContact, HistoryArray::ItemData *item);

TemplateInfo templates[TPL_COUNT] = 
{
	{ "tpl/interface/title", _T("Interface"), ICO_NEWSTORY, _T("Window Title"),
		_T("%N's Newstory [%c messages total]"), 0, 0,
		{ vfGlobal, vfContact, 0, 0, 0 } },
	{ "tpl/interface/passwordq", _T("Interface"), ICO_NOPASSWORD, _T("Password Query"),
		_T("Ooops, %N's history seems to be password protected, so type your password here:"), 0, 0,
		{ vfGlobal, vfContact, 0, 0, 0 } },

	{ "tpl/msglog/msg", _T("Message Log"), ICO_SENDMSG, _T("Messages"),
		_T("%I%i[b]%N, %t:[/b]\x0d\x0a%M"), 0, 0,
		{ vfGlobal, vfContact, vfEvent, vfMessage, 0 } },
	{ "tpl/msglog/file", _T("Message Log"), ICO_FILE, _T("Files"),
		_T("%I%i[b]%N, %t:[/b]%n%M"), 0, 0,
		{ vfGlobal, vfContact, vfEvent, vfFile, 0 } },
	{ "tpl/msglog/url", _T("Message Log"), ICO_URL, _T("URLs"),
		_T("%I%i[b]%N, %t:[/b]%n%M"), 0, 0,
		{ vfGlobal, vfContact, vfEvent, vfUrl, 0 } },
	{ "tpl/msglog/status", _T("Message Log"), ICO_SIGNIN, _T("Status Changes"),
		_T("%I%i[b]%N, %t:[/b]%n%M"), 0, 0,
		{ vfGlobal, vfContact, vfEvent, vfSign, 0 } },
	{ "tpl/msglog/other", _T("Message Log"), ICO_UNKNOWN, _T("Other Events"),
		_T("%I%i[b]%N, %t:[/b]%n%M"), 0, 0,
		{ vfGlobal, vfContact, vfEvent, vfOther, 0 } },

	{ "tpl/msglog/authrq", _T("Message Log"), ICO_UNKNOWN, _T("Authorization Requests"),
		_T("%I%i[b]%N, %t:[/b]%n%M"), 0, 0,
		{ vfGlobal, vfEvent, vfSystem, vfAuth, 0 } },
	{ "tpl/msglog/added", _T("Message Log"), ICO_UNKNOWN, _T("'You were added' events"),
		_T("%I%i[b]%N, %t:[/b]%n%M"), 0, 0,
		{ vfGlobal, vfEvent, vfSystem, vfAdded, 0 } },
	{ "tpl/msglog/deleted", _T("Message Log"), ICO_UNKNOWN, _T("'You were deleted' events"),
		_T("%I%i[b]%N, %t:[/b]%n%M"), 0, 0,
		{ vfGlobal, vfEvent, vfSystem, vfDeleted, 0 } },

	{ "tpl/copy/msg", _T("Clipboard"), ICO_SENDMSG, _T("Messages"),
		_T("%N, %t:\x0d\x0a%M%n"), 0, 0,
		{ vfGlobal, vfContact, vfEvent, vfMessage, 0 } },
	{ "tpl/copy/file", _T("Clipboard"), ICO_FILE, _T("Files"),
		_T("%N, %t:\x0d\x0a%M%n"), 0, 0,
		{ vfGlobal, vfContact, vfEvent, vfFile, 0 } },
	{ "tpl/copy/url", _T("Clipboard"), ICO_URL, _T("URLs"),
		_T("%N, %t:\x0d\x0a%M%n"), 0, 0,
		{ vfGlobal, vfContact, vfEvent, vfUrl, 0 } },
	{ "tpl/copy/status", _T("Clipboard"), ICO_SIGNIN, _T("Status Changes"),
		_T("%N, %t:\x0d\x0a%M%n"), 0, 0,
		{ vfGlobal, vfContact, vfEvent, vfSign, 0 } },
	{ "tpl/copy/other", _T("Clipboard"), ICO_UNKNOWN, _T("Other Events"),
		_T("%N, %t:\x0d\x0a%M%n"), 0, 0,
		{ vfGlobal, vfContact, vfEvent, vfOther, 0 } },

	{ "tpl/copy/authrq", _T("Clipboard"), ICO_UNKNOWN, _T("Authorization Requests"),
		_T("%N, %t:\x0d\x0a%M%n"), 0, 0,
		{ vfGlobal, vfEvent, vfSystem, vfAuth, 0 } },
	{ "tpl/copy/added", _T("Clipboard"), ICO_UNKNOWN, _T("'You were added' events"),
		_T("%N, %t:\x0d\x0a%M%n"), 0, 0,
		{ vfGlobal, vfEvent, vfSystem, vfAdded, 0 } },
	{ "tpl/copy/deleted", _T("Clipboard"), ICO_UNKNOWN, _T("'You were deleted' events"),
		_T("%N, %t:\x0d\x0a%M%n"), 0, 0,
		{ vfGlobal, vfEvent, vfSystem, vfDeleted, 0 } }
};

void LoadTemplates()
{
	for (int i = 0; i < TPL_COUNT; i++)
	{
		DBVARIANT dbv = {0};
		db_get_ws(0, MODULENAME, templates[i].setting, &dbv);
		if (templates[i].value)
			free(templates[i].value);
		if (dbv.pwszVal)
		{
			templates[i].value = _tcsdup(dbv.pwszVal);
		} else
		{
			templates[i].value = 0;
		}
		db_free(&dbv);
	}
}

void SaveTemplates()
{
	for (int i = 0; i < TPL_COUNT; i++)
		if (templates[i].value)
			db_set_ws(0, MODULENAME, templates[i].setting, templates[i].value);
}

TCHAR *TplFormatStringEx(int tpl, TCHAR *sztpl, HANDLE hContact, HistoryArray::ItemData *item)
{
	if ((tpl < 0) || (tpl >= TPL_COUNT) || !sztpl)
		return _tcsdup(_T(""));

	int i;
	TemplateVars vars;
	for (i = 0; i < 256; i++)
	{
		vars.del[i] = false;
		vars.val[i] = 0;
	}
	for (i = 0; i < TemplateInfo::VF_COUNT; i++)
		if (templates[tpl].vf[i])
			templates[tpl].vf[i](VFM_VARS, &vars, hContact, item);

	TCHAR *buf = (TCHAR *)malloc(sizeof(TCHAR)*(TplMeasureVars(&vars, sztpl)+1));
	TCHAR *bufptr = buf;
	for (TCHAR *p = sztpl; *p; p++)
	{
		if (*p == '%')
		{
			TCHAR *var = TplGetVar(&vars, (char)(p[1]&0xff));
			if (var)
			{
				lstrcpy(bufptr, var);
				bufptr += lstrlen(var);
			}
			p++;
		} else
		{
			*bufptr++ = *p;
		}
	}
	*bufptr = 0;
	return buf;
}

TCHAR *TplFormatString(int tpl, HANDLE hContact, HistoryArray::ItemData *item)
{
	if ((tpl < 0) || (tpl >= TPL_COUNT))
		return _tcsdup(_T(""));

	if (!templates[tpl].value)
		templates[tpl].value = _tcsdup(templates[tpl].defvalue);

	int i;
	TemplateVars vars;
	for (i = 0; i < 256; i++)
	{
		vars.del[i] = false;
		vars.val[i] = 0;
	}
	for (i = 0; i < TemplateInfo::VF_COUNT; i++)
		if (templates[tpl].vf[i])
			templates[tpl].vf[i](VFM_VARS, &vars, hContact, item);

	TCHAR *buf = (TCHAR *)malloc(sizeof(TCHAR)*(TplMeasureVars(&vars, templates[tpl].value)+1));
	TCHAR *bufptr = buf;
	for (TCHAR *p = templates[tpl].value; *p; p++)
	{
		if (*p == '%')
		{
			TCHAR *var = TplGetVar(&vars, (char)(p[1]&0xff));
			if (var)
			{
				lstrcpy(bufptr, var);
				bufptr += lstrlen(var);
			}
			p++;
		} else
		{
			*bufptr++ = *p;
		}
	}
	*bufptr = 0;
	return buf;
}

// Variable management
void TplInitVars(TemplateVars *vars)
{
	for(int i = 0; i < 256; i++)
	{
		vars->val[i] = 0;
		vars->del[i] = false;
	}
}

void TplCleanVars(TemplateVars *vars)
{
	for(int i = 0; i < 256; i++)
		if (vars->val[i] && vars->del[i])
		{
			free(vars->val[i]);
			vars->val[i] = 0;
			vars->del[i] = false;
		}
}

__forceinline TCHAR *TplGetVar(TemplateVars *vars, char id)
{
	return vars->val[id];
}

__forceinline void TplSetVar(TemplateVars *vars, char id, TCHAR *v, bool d)
{
	if (vars->val[id] && vars->del[id])
		free(vars->val[id]);
	vars->val[id] = v;
	vars->del[id] = d;
}

int TplMeasureVars(TemplateVars *vars, TCHAR *str)
{
	int res = 0;
	for (TCHAR *p = str; *p; p++)
	{
		if (*p == '%')
		{
			TCHAR *var = TplGetVar(vars, (char)(p[1]&0xff));
			if (var) res += lstrlen(var);
			p++;
		} else
		{
			res++;
		}
	}
	return res;
}

// Loading variables
void vfGlobal(int mode, TemplateVars *vars, HANDLE hContact, HistoryArray::ItemData *item)
{
//  %%: simply % character
	TplSetVar(vars, '%', _T("%"), false);

//  %n: line break
	TplSetVar(vars, 'n', _T("\x0d\x0a"), false);

// %M: my nick (not for messages)
	wchar_t *buf = Clist_GetContactDisplayName(0, 0);
	TplSetVar(vars, 'M', buf, false);
}

void vfContact(int mode, TemplateVars *vars, HANDLE hContact, HistoryArray::ItemData *item)
{
// %N: buddy's nick (not for messages)
	DWORD a = GCDNF_TCHAR;
	TplSetVar(vars, 'N', (TCHAR *)CallService(MS_CLIST_GETCONTACTDISPLAYNAME, (WPARAM)hContact, GCDNF_TCHAR), false);

// %c: event count
	TCHAR *buf = new TCHAR[20];
	wsprintf(buf, _T("%d"), CallService(MS_DB_EVENT_GETCOUNT, (WPARAM)hContact, 0));
	TplSetVar(vars, 'c', buf, false);
}

void vfSystem(int mode, TemplateVars *vars, HANDLE hContact, HistoryArray::ItemData *item)
{
// %N: buddy's nick (not for messages)
	TplSetVar(vars, 'N', /*TranslateTS*/_T("System Event"), false);

// %c: event count
	TCHAR *buf = new TCHAR[20];
	wsprintf(buf, _T("%d"), CallService(MS_DB_EVENT_GETCOUNT, (WPARAM)hContact, 0));
	TplSetVar(vars, 'c', buf, false);
}

void vfEvent(int mode, TemplateVars *vars, HANDLE hContact, HistoryArray::ItemData *item)
{
	HICON hIcon;
	TCHAR *s;

//  %U: UIN (contextual, own uin for sent, buddys UIN for received messages)

//  %N: Nickname
	TplSetVar(vars, 'N', (TCHAR *)CallService(MS_CLIST_GETCONTACTDISPLAYNAME, item->dbe.flags&DBEF_SENT ? 0 : (WPARAM)item->hContact, GCDNF_TCHAR), false);

//  %I: Icon
	switch (item->dbe.eventType)
	{
		case EVENTTYPE_MESSAGE:
			hIcon = icons[ICO_SENDMSG].hIcon;
			break;
		case EVENTTYPE_FILE:
			hIcon = icons[ICO_FILE].hIcon;
			break;
		case EVENTTYPE_URL:
			hIcon = icons[ICO_URL].hIcon;
			break;
		case EVENTTYPE_STATUSCHANGE:
			hIcon = icons[ICO_SIGNIN].hIcon;
			break;
		default:
			hIcon = icons[ICO_UNKNOWN].hIcon;
			break;
	}
	s = (TCHAR *)calloc(64,sizeof(TCHAR));
	wsprintf(s, _T("[$hicon=%d$]"), hIcon);
	TplSetVar(vars, 'I', s, true);

//  %i: Direction icon
	if (item->dbe.flags & DBEF_SENT)
	{
		hIcon = icons[ICO_MSGOUT].hIcon;
	} else
	{
		hIcon = icons[ICO_MSGIN].hIcon;
	}
	s = (TCHAR *)calloc(64,sizeof(TCHAR));
	wsprintf(s, _T("[$hicon=%d$]"), hIcon);
	TplSetVar(vars, 'i', s, true);

// %D: direction symbol
	if (item->dbe.flags & DBEF_SENT)
	{
		TplSetVar(vars, 'D', _T("<<"), false);
	} else
	{
		TplSetVar(vars, 'D', _T(">>"), false);
	}

//  %t: timestamp
	TCHAR *buf = (TCHAR *)calloc(100, sizeof(TCHAR));
	_tcsftime(buf, 100, _T("%d.%m.%Y, %H:%M"), localtime((time_t *)&item->dbe.timestamp));
	TplSetVar(vars, 't', buf, true);

//	DBTIMETOSTRING tts;
//	tts.cbDest = 100;
//	tts.szFormat = "d, t";
//	tts.szDest = (char *)calloc(100, 1);
//	CallService(MS_DB_TIME_TIMESTAMPTOSTRING, item->dbe.timestamp, (LPARAM)&tts);
//	TplSetVar(vars, 't', tts.szDest, true);

//	tts.szFormat = "";
//	tts.szDest = (char *)calloc(100, 1);
//	CallService(MS_DB_TIME_TIMESTAMPTOSTRING, item->dbe.timestamp, (LPARAM)&tts);
//	TplSetVar(vars, 't', tts.szDest, true);

//  %h: hour (24 hour format, 0-23)
	buf = (TCHAR *)calloc(5, sizeof(TCHAR));
	_tcsftime(buf, 5, _T("%H"), localtime((time_t *)&item->dbe.timestamp));
	TplSetVar(vars, 'h', buf, true);

//  %a: hour (12 hour format)
	buf = (TCHAR *)calloc(5, sizeof(TCHAR));
	_tcsftime(buf, 5, _T("%h"), localtime((time_t *)&item->dbe.timestamp));
	TplSetVar(vars, 'a', buf, true);

//  %m: minute
	buf = (TCHAR *)calloc(5, sizeof(TCHAR));
	_tcsftime(buf, 5, _T("%M"), localtime((time_t *)&item->dbe.timestamp));
	TplSetVar(vars, 'm', buf, true);

//  %s: second
	buf = (TCHAR *)calloc(5, sizeof(TCHAR));
	_tcsftime(buf, 5, _T("%S"), localtime((time_t *)&item->dbe.timestamp));
	TplSetVar(vars, 's', buf, true);

//  %o: month
	buf = (TCHAR *)calloc(5, sizeof(TCHAR));
	_tcsftime(buf, 5, _T("%m"), localtime((time_t *)&item->dbe.timestamp));
	TplSetVar(vars, 'o', buf, true);

//  %d: day of month
	buf = (TCHAR *)calloc(5, sizeof(TCHAR));
	_tcsftime(buf, 5, _T("%d"), localtime((time_t *)&item->dbe.timestamp));
	TplSetVar(vars, 'd', buf, true);

//  %y: year
	buf = (TCHAR *)calloc(5, sizeof(TCHAR));
	_tcsftime(buf, 5, _T("%Y"), localtime((time_t *)&item->dbe.timestamp));
	TplSetVar(vars, 'y', buf, true);

//  %w: day of week (Sunday, Monday.. translateable)
	buf = (TCHAR *)calloc(25, sizeof(TCHAR));
	_tcsftime(buf, 25, _T("%A"), localtime((time_t *)&item->dbe.timestamp));
	TplSetVar(vars, 'w', TranslateTS(buf), false);

//  %p: AM/PM symbol
	buf = (TCHAR *)calloc(5, sizeof(TCHAR));
	_tcsftime(buf, 5, _T("%p"), localtime((time_t *)&item->dbe.timestamp));
	TplSetVar(vars, 'p', buf, true);

//  %O: Name of month, translateable
	buf = (TCHAR *)calloc(25, sizeof(TCHAR));
	_tcsftime(buf, 25, _T("%B"), localtime((time_t *)&item->dbe.timestamp));
	TplSetVar(vars, 'O', TranslateTS(buf), false);
}

void vfMessage(int mode, TemplateVars *vars, HANDLE hContact, HistoryArray::ItemData *item)
{
//  %M: the message string itself
	TplSetVar(vars, 'M', item->getTBuf(), false);
}

void vfFile(int mode, TemplateVars *vars, HANDLE hContact, HistoryArray::ItemData *item)
{
//  %M: the message string itself
	TplSetVar(vars, 'M', item->getTBuf(), false);
//	TplSetVar(vars, 'M', _T("File event"), false);
}

void vfUrl(int mode, TemplateVars *vars, HANDLE hContact, HistoryArray::ItemData *item)
{
//  %M: the message string itself
	TplSetVar(vars, 'M', item->getTBuf(), false);
//	TplSetVar(vars, 'M', _T("URL Event"), false);
}

void vfSign(int mode, TemplateVars *vars, HANDLE hContact, HistoryArray::ItemData *item)
{
//  %M: the message string itself
	TplSetVar(vars, 'M', item->getTBuf(), false);
}

void vfAuth(int mode, TemplateVars *vars, HANDLE hContact, HistoryArray::ItemData *item)
{
//  %M: the message string itself
	TplSetVar(vars, 'M', item->getTBuf(), false);
//	TplSetVar(vars, 'M', _T("Auth Rq"), false);
}

void vfAdded(int mode, TemplateVars *vars, HANDLE hContact, HistoryArray::ItemData *item)
{
//  %M: the message string itself
	TplSetVar(vars, 'M', item->getTBuf(), false);
//	TplSetVar(vars, 'M', _T("Added"), false);
}

void vfDeleted(int mode, TemplateVars *vars, HANDLE hContact, HistoryArray::ItemData *item)
{
//  %M: the message string itself
	TplSetVar(vars, 'M', item->getTBuf(), false);
//	TplSetVar(vars, 'M', _T("Deleted"), false);
}

void vfOther(int mode, TemplateVars *vars, HANDLE hContact, HistoryArray::ItemData *item)
{
//  %M: the message string itself
	TplSetVar(vars, 'M', _T("Unknown Event"), false);
}

// Option dialog

BOOL CALLBACK OptTemplatesDlgProc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)
{
	static int CurrentTemplate;
	switch (msg)
	{
		case WM_INITDIALOG:
		{
			CurrentTemplate = -1;

			HTREEITEM hGroup = 0;
			HTREEITEM hFirst = 0;

			HIMAGELIST himgTree = ImageList_Create(GetSystemMetrics(SM_CXSMICON),GetSystemMetrics(SM_CYSMICON),(IsWinVerXPPlus()?ILC_COLOR32:ILC_COLOR16)|ILC_MASK,1,1);
			TreeView_SetImageList(GetDlgItem(hwnd, IDC_TEMPLATES), himgTree, TVSIL_NORMAL);

			ImageList_AddIcon(himgTree, icons[ICO_TPLGROUP].hIcon);

			for (int i = 0; i < TPL_COUNT; i++)
			{
				if (!i || lstrcmp(templates[i].group, templates[i-1].group))
				{
					if (hGroup)
						TreeView_Expand(GetDlgItem(hwnd, IDC_TEMPLATES), hGroup, TVE_EXPAND);

					TVINSERTSTRUCT tvis;
					tvis.hParent = 0;
					tvis.hInsertAfter = TVI_LAST;
					tvis.item.mask = TVIF_TEXT|TVIF_STATE|TVIF_PARAM|TVIF_IMAGE|TVIF_SELECTEDIMAGE;
					tvis.item.state = tvis.item.stateMask = TVIS_BOLD;
					tvis.item.iSelectedImage = tvis.item.iImage = 0;
					tvis.item.pszText = templates[i].group;
					tvis.item.lParam = -1;
					hGroup = TreeView_InsertItem(GetDlgItem(hwnd, IDC_TEMPLATES), &tvis);

					if (!hFirst) hFirst = hGroup;
				}

				TVINSERTSTRUCT tvis;
				tvis.hParent = hGroup;
				tvis.hInsertAfter = TVI_LAST;
				tvis.item.mask = TVIF_TEXT|TVIF_PARAM|TVIF_IMAGE|TVIF_SELECTEDIMAGE;
				tvis.item.pszText = templates[i].title;
				tvis.item.iSelectedImage = tvis.item.iImage =
					ImageList_AddIcon(himgTree, icons[templates[i].icon].hIcon);
				tvis.item.lParam = i;
				TreeView_InsertItem(GetDlgItem(hwnd, IDC_TEMPLATES), &tvis);
			}

			if (hGroup)
				TreeView_Expand(GetDlgItem(hwnd, IDC_TEMPLATES), hGroup, TVE_EXPAND);

			TreeView_SelectItem(GetDlgItem(hwnd, IDC_TEMPLATES), hFirst);
			TreeView_EnsureVisible(GetDlgItem(hwnd, IDC_TEMPLATES), hFirst);

			SendMessage(GetDlgItem(hwnd, IDC_DISCARD),       BUTTONSETASFLATBTN, 0, 0);
			SendMessage(GetDlgItem(hwnd, IDC_UPDATEPREVIEW), BUTTONSETASFLATBTN, 0, 0);
			SendMessage(GetDlgItem(hwnd, IDC_VARHELP),       BUTTONSETASFLATBTN, 0, 0);

			SendMessage(GetDlgItem(hwnd, IDC_DISCARD),       BUTTONADDTOOLTIP, (WPARAM)Translate("Cancel Edit"), 0);
			SendMessage(GetDlgItem(hwnd, IDC_UPDATEPREVIEW), BUTTONADDTOOLTIP, (WPARAM)Translate("Update Preview"), 0);
			SendMessage(GetDlgItem(hwnd, IDC_VARHELP),       BUTTONADDTOOLTIP, (WPARAM)Translate("Help on Variables"), 0);

			SendMessage(GetDlgItem(hwnd, IDC_DISCARD),       BM_SETIMAGE, IMAGE_ICON, (LPARAM)icons[ICO_RESET].hIcon);
			SendMessage(GetDlgItem(hwnd, IDC_UPDATEPREVIEW), BM_SETIMAGE, IMAGE_ICON, (LPARAM)icons[ICO_PREVIEW].hIcon);
			SendMessage(GetDlgItem(hwnd, IDC_VARHELP),       BM_SETIMAGE, IMAGE_ICON, (LPARAM)icons[ICO_VARHELP].hIcon);

			return TRUE;
		}

		case WM_COMMAND:
			switch (LOWORD(wParam))
			{
				case IDC_EDITTEMPLATE:
				{
					SendMessage(GetParent(GetParent(hwnd)), PSM_CHANGED, 0, 0);
				}

				case IDC_UPDATEPREVIEW:
				{
					if (templates[CurrentTemplate].tmpValue)
						free(templates[CurrentTemplate].tmpValue);
					int length = GetWindowTextLength(GetDlgItem(hwnd, IDC_EDITTEMPLATE))+1;
					templates[CurrentTemplate].tmpValue = (TCHAR *)malloc(length*sizeof(TCHAR));
					GetWindowText(GetDlgItem(hwnd, IDC_EDITTEMPLATE), templates[CurrentTemplate].tmpValue, length);

					HistoryArray::ItemData item;
					item.hContact = (HANDLE)CallService(MS_DB_CONTACT_FINDFIRST, 0, 0);
					while (item.hContact && !item.hEvent)
					{
						item.hEvent = (HANDLE)CallService(MS_DB_EVENT_FINDFIRST, (WPARAM)item.hContact, 0);
						if (!item.hEvent)
							item.hContact = (HANDLE)CallService(MS_DB_CONTACT_FINDNEXT, (WPARAM)item.hContact, 0);
					}
					if (item.hContact && item.hEvent)
					{
						item.load(ELM_DATA);
						TCHAR *preview = TplFormatStringEx(CurrentTemplate, templates[CurrentTemplate].tmpValue, item.hContact, &item);
						SetWindowText(GetDlgItem(hwnd, IDC_PREVIEW), preview);
//						SetWindowText(GetDlgItem(hwnd, IDC_GPREVIEW), preview);
						SetWindowText(GetDlgItem(hwnd, IDC_GPREVIEW), _T("$hit :)"));
						free(preview);
					} else
					{
						SetWindowText(GetDlgItem(hwnd, IDC_PREVIEW), _T(""));
						SetWindowText(GetDlgItem(hwnd, IDC_GPREVIEW), _T(""));
					}
					break;
				}

				case IDC_DISCARD:
				{
					if (templates[CurrentTemplate].tmpValue)
						free(templates[CurrentTemplate].tmpValue);
					templates[CurrentTemplate].tmpValue = 0;
					if (templates[CurrentTemplate].value)
					{
						SetWindowText(GetDlgItem(hwnd, IDC_EDITTEMPLATE), templates[CurrentTemplate].value);
					} else
					{
						SetWindowText(GetDlgItem(hwnd, IDC_EDITTEMPLATE), templates[CurrentTemplate].defvalue);
					}
					PostMessage(hwnd, WM_COMMAND, MAKEWPARAM(IDC_UPDATEPREVIEW,0), 0);
					break;
				}
			}
			break;

		case WM_NOTIFY:
			switch(((LPNMHDR)lParam)->idFrom)
			{
				case 0:
				{
					switch (((LPNMHDR)lParam)->code) 
					{
						case PSN_RESET:
						{
							for (int i = 0; i < TPL_COUNT; i++)
							{
								if (templates[i].tmpValue)
								{
									if (templates[i].tmpValue)
										free(templates[i].tmpValue);
								}
							}
							return TRUE;
						}

						case PSN_APPLY:
						{
							for (int i = 0; i < TPL_COUNT; i++)
							{
								if (templates[i].tmpValue)
								{
									if (templates[i].value)
										free(templates[i].value);
									templates[i].value = templates[i].tmpValue;
									templates[i].tmpValue = 0;
								}
							}
							SaveTemplates();
							return TRUE;
						}
					}
					break; 
				} 

				case IDC_TEMPLATES:
				{
					switch (((LPNMHDR)lParam)->code)
					{
						case TVN_SELCHANGED:
						case TVN_SELCHANGING:
						{
							LPNMTREEVIEW lpnmtv = (LPNMTREEVIEW)lParam;

							TVITEM tvi;
							tvi.hItem = TreeView_GetSelection(GetDlgItem(hwnd, IDC_TEMPLATES));
							tvi.mask = TVIF_PARAM;
							TreeView_GetItem(GetDlgItem(hwnd, IDC_TEMPLATES), &tvi);

							if ((tvi.lParam < 0) || (tvi.lParam >= TPL_COUNT))
							{
								EnableWindow(GetDlgItem(hwnd, IDC_EDITTEMPLATE), FALSE);
								EnableWindow(GetDlgItem(hwnd, IDC_GPREVIEW), FALSE);
								EnableWindow(GetDlgItem(hwnd, IDC_PREVIEW), FALSE);
								EnableWindow(GetDlgItem(hwnd, IDC_DISCARD), FALSE);
								EnableWindow(GetDlgItem(hwnd, IDC_UPDATEPREVIEW), FALSE);
								EnableWindow(GetDlgItem(hwnd, IDC_VARHELP), FALSE);
/*								HTREEITEM hItem = TreeView_GetChild(GetDlgItem(hwnd, IDC_TEMPLATES), tvi.hItem);
								if (hItem)
								{
									TreeView_Expand(GetDlgItem(hwnd, IDC_TEMPLATES), tvi.hItem, TVE_EXPAND);
									TreeView_SelectItem(GetDlgItem(hwnd, IDC_TEMPLATES), hItem);
								}*/
								break;
							} else
							{
								EnableWindow(GetDlgItem(hwnd, IDC_EDITTEMPLATE), TRUE);
								EnableWindow(GetDlgItem(hwnd, IDC_GPREVIEW), TRUE);
								EnableWindow(GetDlgItem(hwnd, IDC_PREVIEW), TRUE);
								EnableWindow(GetDlgItem(hwnd, IDC_DISCARD), TRUE);
								EnableWindow(GetDlgItem(hwnd, IDC_UPDATEPREVIEW), TRUE);
								EnableWindow(GetDlgItem(hwnd, IDC_VARHELP), TRUE);
							}

							if ((lpnmtv->itemOld.mask&TVIF_HANDLE) && lpnmtv->itemOld.hItem && (lpnmtv->itemOld.hItem != lpnmtv->itemNew.hItem) && (lpnmtv->itemOld.lParam >= 0) && (lpnmtv->itemOld.lParam < TPL_COUNT))
							{
								if (templates[lpnmtv->itemOld.lParam].tmpValue)
									free(templates[lpnmtv->itemOld.lParam].tmpValue);
								int length = GetWindowTextLength(GetDlgItem(hwnd, IDC_EDITTEMPLATE))+1;
								templates[lpnmtv->itemOld.lParam].tmpValue = (TCHAR *)malloc(length*sizeof(TCHAR));
								GetWindowText(GetDlgItem(hwnd, IDC_EDITTEMPLATE), templates[lpnmtv->itemOld.lParam].tmpValue, length);
							}

							CurrentTemplate = tvi.lParam;

							if (templates[CurrentTemplate].tmpValue)
							{
								SetWindowText(GetDlgItem(hwnd, IDC_EDITTEMPLATE), templates[CurrentTemplate].tmpValue);
							} else
							if (templates[CurrentTemplate].value)
							{
								SetWindowText(GetDlgItem(hwnd, IDC_EDITTEMPLATE), templates[CurrentTemplate].value);
							} else
							{
								SetWindowText(GetDlgItem(hwnd, IDC_EDITTEMPLATE), templates[CurrentTemplate].defvalue);
							}

							PostMessage(hwnd, WM_COMMAND, MAKEWPARAM(IDC_UPDATEPREVIEW,0), 0);

							break;
						}
						case TVN_KEYDOWN:
						case NM_CLICK:
						{
							SendMessage(GetParent(hwnd), PSM_CHANGED, 0, 0);
							break;
						}

/*
						{
							TVHITTESTINFO hti;
							hti.pt.x = (short)LOWORD(GetMessagePos());
							hti.pt.y = (short)HIWORD(GetMessagePos());
							ScreenToClient(((LPNMHDR)lParam)->hwndFrom,&hti.pt);
							if(TreeView_HitTest(((LPNMHDR)lParam)->hwndFrom,&hti))
								if(hti.flags&TVHT_ONITEMSTATEICON)
									SendMessage(GetParent(hwnd), PSM_CHANGED, 0, 0);
						}
*/

					}
					break;
				}
			}
			break;
	}
	return FALSE;
}