attempt to revive NAS

git-svn-id: http://svn.miranda-ng.org/main/trunk@8194 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c

1 files changed, 963 insertions, 0 deletions

diff --git a/plugins/NewAwaySysMod/src/Options.cpp b/plugins/NewAwaySysMod/src/Options.cpp
new file mode 100644
index 0000000000..e0d585d991
--- /dev/null
+++ b/plugins/NewAwaySysMod/src/Options.cpp
@@ -0,0 +1,963 @@
+/*

+	Options.cpp

+	Copyright (c) 2005-2008 Chervov Dmitry

+

+    This program is free software; you can redistribute it and/or modify

+    it under the terms of the GNU General Public License as published by

+    the Free Software Foundation; either version 2 of the License, or

+    (at your option) any later version.

+

+    This program is distributed in the hope that it will be useful,

+    but WITHOUT ANY WARRANTY; without even the implied warranty of

+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

+    GNU General Public License for more details.

+

+    You should have received a copy of the GNU General Public License

+    along with this program; if not, write to the Free Software

+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA

+*/

+

+#include "Common.h"

+#include "Options.h"

+

+static CString sEmptyString("");

+

+

+COptPage::COptPage(const COptPage &Item)

+{

+	*this = Item;

+}

+

+COptPage::~COptPage()

+{

+	int I;

+	for (I = 0; I < Items.GetSize(); I++)

+	{

+		delete Items[I];

+	}

+	Items.RemoveAll();

+}

+

+void COptPage::MemToPage(int OnlyEnable)

+{

+	int I;

+	_ASSERT(hWnd);

+	for (I = 0; I < Items.GetSize(); I++)

+	{

+		if (OnlyEnable)

+		{

+			Items[I]->COptItem::MemToWnd(hWnd);

+		} else

+		{

+			Items[I]->MemToWnd(hWnd);

+		}

+	}

+}

+

+void COptPage::PageToMem()

+{

+	int I;

+	_ASSERT(hWnd);

+	for (I = 0; I < Items.GetSize(); I++)

+	{

+		Items[I]->WndToMem(hWnd);

+	}

+}

+

+void COptPage::DBToMem()

+{

+	int I;

+	_ASSERT(sModule != "");

+	for (I = 0; I < Items.GetSize(); I++)

+	{

+		Items[I]->DBToMem(sModule, &sDBSettingPrefix);

+	}

+}

+

+void COptPage::MemToDB()

+{

+	int I;

+	_ASSERT(sModule != "");

+	for (I = 0; I < Items.GetSize(); I++)

+	{

+		Items[I]->MemToDB(sModule, &sDBSettingPrefix);

+	}

+}

+

+void COptPage::CleanDBSettings()

+{

+	int I;

+	_ASSERT(sModule != "");

+	for (I = 0; I < Items.GetSize(); I++)

+	{

+		Items[I]->CleanDBSettings(sModule, &sDBSettingPrefix);

+	}

+}

+

+bool COptPage::GetModified()

+{

+	int I;

+	_ASSERT(sModule != "");

+	for (I = 0; I < Items.GetSize(); I++)

+	{

+		if (Items[I]->GetModified())

+		{

+			return true;

+		}

+	}

+	return false;

+}

+

+void COptPage::SetModified(bool Modified)

+{

+	int I;

+	_ASSERT(sModule != "");

+	for (I = 0; I < Items.GetSize(); I++)

+	{

+		Items[I]->SetModified(Modified);

+	}

+}

+

+COptItem *COptPage::Find(int DlgItemID)

+{

+	int I;

+	for (I = 0; I < Items.GetSize(); I++)

+	{

+		if (Items[I]->GetID() == DlgItemID)

+		{

+			return Items[I];

+		}

+	}

+	_ASSERT(0);

+	return 0;

+}

+

+COptPage& COptPage::operator = (const COptPage& Page)

+{

+	int I;

+	hWnd = Page.hWnd;

+	sModule = Page.sModule;

+	sDBSettingPrefix = Page.sDBSettingPrefix;

+	Items.RemoveAll();

+	for (I = 0; I < Page.Items.GetSize(); I++)

+	{

+		Items.AddElem(Page.Items[I]->Copy());

+	}

+	return *this;

+}

+

+

+int COptItem::GetIntDBVal(CString &sModule, int bSigned, CString *sDBSettingPrefix)

+{ // default procedure for reading value from DB; used only for integral types

+	if (sDBSetting != NULL)

+	{

+		_ASSERT(nValueSize == DBVT_BYTE || nValueSize == DBVT_WORD || nValueSize == DBVT_DWORD);

+		DBVARIANT dbv;

+		if (db_get(NULL, sModule, sDBSetting, &dbv))

+			return GetDefValue();

+

+		return (nValueSize == DBVT_BYTE) ? (bSigned ? (signed char)dbv.bVal : (unsigned char)dbv.bVal) : ((nValueSize == DBVT_WORD) ? (bSigned ? (signed short)dbv.wVal : (unsigned short)dbv.wVal) : dbv.dVal);

+	}

+	return GetDefValue();

+}

+

+void COptItem::SetIntDBVal(CString &sModule, int Value, CString *sDBSettingPrefix)

+{ // default procedure for writing value to the DB; used only for integral types

+	if (sDBSetting != NULL && !ReadOnly)

+	{

+		_ASSERT(nValueSize == DBVT_BYTE || nValueSize == DBVT_WORD || nValueSize == DBVT_DWORD);

+

+		DBVARIANT dbv;

+		dbv.type = nValueSize;

+		dbv.dVal = Value;

+		db_set(NULL, sModule, sDBSetting, &dbv);

+	}

+}

+

+TCString COptItem::GetStrDBVal(CString &sModule, CString *sDBSettingPrefix)

+{

+	if (sDBSetting != NULL)

+	{

+		_ASSERT(GetDefValue());

+		return db_get_s(NULL, sModule, sDBSettingPrefix ? (*sDBSettingPrefix + sDBSetting) : sDBSetting, *(TCString*)GetDefValue());

+	}

+	return *(TCString*)GetDefValue();

+}

+

+void COptItem::SetStrDBVal(CString &sModule, TCString &Str, CString *sDBSettingPrefix)

+{

+	if (sDBSetting != NULL && !ReadOnly)

+	{

+		db_set_ts(NULL, sModule, sDBSettingPrefix ? (*sDBSettingPrefix + sDBSetting) : sDBSetting, Str);

+	}

+}

+

+

+

+void COptItem_Checkbox::DBToMem(CString &sModule, CString *sDBSettingPrefix)

+{

+	if (ValueMask)

+	{

+		Value = (GetIntDBVal(sModule, false, sDBSettingPrefix) & ValueMask) ? BST_CHECKED : BST_UNCHECKED;

+	} else

+	{

+		Value = GetIntDBVal(sModule, false, sDBSettingPrefix);

+	}

+	COptItem::DBToMem(sModule, sDBSettingPrefix);

+}

+

+void COptItem_Checkbox::MemToDB(CString &sModule, CString *sDBSettingPrefix)

+{

+	if (ValueMask)

+	{

+		if (Value == BST_CHECKED)

+		{

+			SetIntDBVal(sModule, GetIntDBVal(sModule, false, sDBSettingPrefix) | ValueMask, sDBSettingPrefix);

+		} else

+		{

+			SetIntDBVal(sModule, GetIntDBVal(sModule, false, sDBSettingPrefix) & ~ValueMask, sDBSettingPrefix);

+		}

+	} else

+	{

+		SetIntDBVal(sModule, Value, sDBSettingPrefix);

+	}

+	COptItem::MemToDB(sModule, sDBSettingPrefix);

+}

+

+void COptItem_Checkbox::WndToMem(HWND hWnd)

+{

+	Value = IsDlgButtonChecked(hWnd, DlgItemID);

+// tri-state checkboxes in combination with ValueMask != 0 are not supported ;)

+	_ASSERT(!ValueMask || Value != BST_INDETERMINATE);

+	COptItem::WndToMem(hWnd);

+}

+

+void COptItem_Checkbox::MemToWnd(HWND hWnd)

+{

+	CheckDlgButton(hWnd, DlgItemID, Value);

+	COptItem::MemToWnd(hWnd);

+}

+

+

+

+void COptItem_BitDBSetting::DBToMem(CString &sModule, CString *sDBSettingPrefix)

+{

+	if (ValueMask)

+	{

+		Value = (GetIntDBVal(sModule, false, sDBSettingPrefix) & ValueMask) != 0;

+	} else

+	{

+		Value = GetIntDBVal(sModule, false, sDBSettingPrefix);

+	}

+	COptItem::DBToMem(sModule, sDBSettingPrefix);

+}

+

+void COptItem_BitDBSetting::MemToDB(CString &sModule, CString *sDBSettingPrefix)

+{

+	if (ValueMask)

+	{

+		if (Value)

+		{

+			SetIntDBVal(sModule, GetIntDBVal(sModule, false, sDBSettingPrefix) | ValueMask, sDBSettingPrefix);

+		} else

+		{

+			SetIntDBVal(sModule, GetIntDBVal(sModule, false, sDBSettingPrefix) & ~ValueMask, sDBSettingPrefix);

+		}

+	} else

+	{

+		SetIntDBVal(sModule, Value, sDBSettingPrefix);

+	}

+	COptItem::MemToDB(sModule, sDBSettingPrefix);

+}

+

+

+// ================================================ COptItem_TreeCtrl ================================================

+

+int COptItem_TreeCtrl::IDToOrder(int ID)

+{

+	int I;

+	for (I = 0; I < RootItems.GetSize(); I++)

+	{

+		if (RootItems[I].ID == ID)

+		{

+			return ROOT_INDEX_TO_ORDER(I);

+		}

+	}

+	for (I = 0; I < Value.GetSize(); I++)

+	{

+		if (Value[I].ID == ID)

+		{

+			return I;

+		}

+	}

+	return -1;

+}

+

+int COptItem_TreeCtrl::hItemToOrder(HTREEITEM hItem)

+{

+	int I;

+	for (I = 0; I < RootItems.GetSize(); I++)

+	{

+		if (RootItems[I].hItem == hItem)

+		{

+			return ROOT_INDEX_TO_ORDER(I);

+		}

+	}

+	for (I = 0; I < Value.GetSize(); I++)

+	{

+		if (Value[I].hItem == hItem)

+		{

+			return I;

+		}

+	}

+	return -1;

+}

+

+int COptItem_TreeCtrl::GenerateID()

+{

+	int ID = 0;

+	while (IDToOrder(ID) != -1)

+	{

+		ID++;

+	}

+	return ID;

+}

+

+typedef struct

+{

+	COptItem_TreeCtrl *TreeCtrl;

+	CString *sModule;

+	CString *sDBSettingPrefix;

+} sTreeReadEnumData;

+

+int TreeReadEnum(const char *szSetting, LPARAM lParam)

+{

+	sTreeReadEnumData *TreeReadEnumData = (sTreeReadEnumData*)lParam;

+	int Len = TreeReadEnumData->TreeCtrl->sDBSetting.GetLen() + lengthof(TREEITEM_DBSTR_TITLE) - 1;

+	if (!strncmp(szSetting, TreeReadEnumData->TreeCtrl->sDBSetting + TREEITEM_DBSTR_TITLE, Len) && isdigit(szSetting[Len]))

+	{

+		int ID = atol(szSetting + Len);

+		short ParentID = (TreeReadEnumData->TreeCtrl->TreeFlags & TREECTRL_FLAG_IS_SINGLE_LEVEL) ? 0 : db_get_w(NULL, *TreeReadEnumData->sModule,

+			*TreeReadEnumData->sDBSettingPrefix + TreeReadEnumData->TreeCtrl->sDBSetting + TREEITEM_DBSTR_PARENT + (szSetting + Len), -1);

+		short Order = db_get_w(NULL, *TreeReadEnumData->sModule,

+			*TreeReadEnumData->sDBSettingPrefix + TreeReadEnumData->TreeCtrl->sDBSetting + TREEITEM_DBSTR_ORDER + (szSetting + Len), -1);

+		char Flags = (TreeReadEnumData->TreeCtrl->TreeFlags & TREECTRL_FLAG_IS_SINGLE_LEVEL && !(TreeReadEnumData->TreeCtrl->TreeFlags & TREECTRL_FLAG_HAS_CHECKBOXES)) ? 0 : db_get_b(NULL, *TreeReadEnumData->sModule,

+			*TreeReadEnumData->sDBSettingPrefix + TreeReadEnumData->TreeCtrl->sDBSetting + TREEITEM_DBSTR_FLAGS + (szSetting + Len), 0);

+		if (ParentID >= 0 && Order >= 0)

+		{

+			TreeReadEnumData->TreeCtrl->Value.SetAtGrow(Order).ID = ID;

+			TreeReadEnumData->TreeCtrl->Value.SetAtGrow(Order).ParentID = ParentID;

+			TreeReadEnumData->TreeCtrl->Value.SetAtGrow(Order).Flags = Flags;

+			TreeReadEnumData->TreeCtrl->Value.SetAtGrow(Order).hItem = NULL;

+			TreeReadEnumData->TreeCtrl->Value.SetAtGrow(Order).Title = db_get_s(NULL, *TreeReadEnumData->sModule, *TreeReadEnumData->sDBSettingPrefix + szSetting, _T(""));

+			TreeReadEnumData->TreeCtrl->Value.SetAtGrow(Order).User_Str1 = (TreeReadEnumData->TreeCtrl->User_Str1_DBName == NULL) ? NULL :

+				db_get_s(NULL, *TreeReadEnumData->sModule,

+					*TreeReadEnumData->sDBSettingPrefix + TreeReadEnumData->TreeCtrl->sDBSetting + TreeReadEnumData->TreeCtrl->User_Str1_DBName + (szSetting + Len), (TCHAR*)NULL);

+		}

+	}

+	return 0;

+}

+

+void COptItem_TreeCtrl::DBToMem(CString &sModule, CString *sDBSettingPrefix)

+{

+	if (!sDBSettingPrefix)

+	{

+		sDBSettingPrefix = &sEmptyString;

+	}

+	Value.RemoveAll();

+	sTreeReadEnumData TreeReadEnumData;

+	TreeReadEnumData.TreeCtrl = this;

+	TreeReadEnumData.sModule = &sModule;

+	TreeReadEnumData.sDBSettingPrefix = sDBSettingPrefix;

+	DBCONTACTENUMSETTINGS dbEnum;

+	dbEnum.lParam = (LPARAM)&TreeReadEnumData;

+	dbEnum.ofsSettings = 0;

+	dbEnum.pfnEnumProc = TreeReadEnum;

+	dbEnum.szModule = sModule;

+	CallService(MS_DB_CONTACT_ENUMSETTINGS, NULL, (LPARAM)&dbEnum);

+	if (!Value.GetSize())

+	{

+		Value = DefValue;

+	} else

+	{

+		int I;

+		for (I = 0; I < Value.GetSize(); I++)

+		{

+			if (Value[I].Title == NULL)

+			{

+				Value.RemoveElem(I);

+				I--;

+			}

+		}

+	}

+	COptItem::DBToMem(sModule, sDBSettingPrefix);

+}

+

+void COptItem_TreeCtrl::MemToDB(CString &sModule, CString *sDBSettingPrefix)

+{

+	if (!ReadOnly && Modified)

+	{

+		if (!sDBSettingPrefix)

+		{

+			sDBSettingPrefix = &sEmptyString;

+		}

+		CleanDBSettings(sModule, sDBSettingPrefix);

+		int I;

+		for (I = 0; I < Value.GetSize(); I++)

+		{

+			CString StrID;

+			_itoa(Value[I].ID, StrID.GetBuffer(64), 10);

+			StrID.ReleaseBuffer();

+			db_set_ts(NULL, sModule, *sDBSettingPrefix + sDBSetting + TREEITEM_DBSTR_TITLE + StrID, Value[I].Title);

+			if (!(TreeFlags & TREECTRL_FLAG_IS_SINGLE_LEVEL))

+				db_set_w(NULL, sModule, *sDBSettingPrefix + sDBSetting + TREEITEM_DBSTR_PARENT + StrID, Value[I].ParentID);

+

+			db_set_w(NULL, sModule, *sDBSettingPrefix + sDBSetting + TREEITEM_DBSTR_ORDER + StrID, I);

+			if (!(TreeFlags & TREECTRL_FLAG_IS_SINGLE_LEVEL) || TreeFlags & TREECTRL_FLAG_HAS_CHECKBOXES)

+				db_set_b(NULL, sModule, *sDBSettingPrefix + sDBSetting + TREEITEM_DBSTR_FLAGS + StrID, Value[I].Flags);

+

+			if (User_Str1_DBName != NULL && Value[I].User_Str1 != NULL)

+				db_set_ts(NULL, sModule, *sDBSettingPrefix + sDBSetting + User_Str1_DBName + StrID, Value[I].User_Str1);

+		}

+		COptItem::MemToDB(sModule, sDBSettingPrefix);

+	}

+}

+

+void COptItem_TreeCtrl::WndToMem(HWND hWnd)

+{ // only need to gather info of items state (expanded/collapsed, checked/unchecked)

+	HWND hTreeView = GetDlgItem(hWnd, DlgItemID);

+	int I;

+	for (I = 0; I < Value.GetSize(); I++)

+	{

+		DWORD State = TreeView_GetItemState(hTreeView, Value[I].hItem, TVIS_EXPANDED | TVIS_STATEIMAGEMASK);

+		int OldFlags = Value[I].Flags;

+		if (State & TVIS_EXPANDED)

+		{

+			Value[I].Flags |= TIF_EXPANDED;

+		} else

+		{

+			Value[I].Flags &= ~TIF_EXPANDED;

+		}

+		if (TreeFlags & TREECTRL_FLAG_HAS_CHECKBOXES && (State >> 12) - 1)

+		{

+			Value[I].Flags |= TIF_ENABLED;

+		} else

+		{

+			Value[I].Flags &= ~TIF_ENABLED;

+		}

+		if (Value[I].Flags != OldFlags)

+		{

+			Modified = true;

+		}

+	}

+	COptItem::WndToMem(hWnd);

+}

+

+void COptItem_TreeCtrl::MemToWnd(HWND hWnd)

+{

+	HWND hTreeView = GetDlgItem(hWnd, DlgItemID);

+	if (TreeFlags & TREECTRL_FLAG_HAS_CHECKBOXES)

+	{ // have to set this in run-time as it's specified in MSDN

+		LONG Style = GetWindowLongPtr(hTreeView, GWL_STYLE);

+		SetWindowLongPtr(hTreeView, GWL_STYLE, Style & ~TVS_CHECKBOXES);

+		SetWindowLongPtr(hTreeView, GWL_STYLE, Style | TVS_CHECKBOXES);

+	}

+	TVINSERTSTRUCT tvIn = {0};

+	int ScrollPos = GetScrollPos(hTreeView, SB_VERT);

+	int SelectOrder = IDToOrder(GetSelectedItemID(hWnd));

+	SendMessage(hTreeView, WM_SETREDRAW, false, 0);

+	TreeView_DeleteAllItems(hTreeView);

+	_ASSERT(RootItems.GetSize());

+	int I;

+	if (!(TreeFlags & TREECTRL_FLAG_IS_SINGLE_LEVEL))

+	{

+		for (I = 0; I < RootItems.GetSize(); I++)

+		{

+			tvIn.item.mask = TVIF_TEXT | TVIF_STATE | TVIF_PARAM;

+			RootItems[I].Flags |= TIF_GROUP;

+			tvIn.item.state = tvIn.item.stateMask = TVIS_BOLD | ((RootItems[I].Flags & TIF_EXPANDED) ? TVIS_EXPANDED : 0);

+			tvIn.item.pszText = RootItems[I].Title;

+			tvIn.hParent = TVI_ROOT;

+			tvIn.hInsertAfter = TVI_LAST;

+			tvIn.item.lParam = RootItems[I].ID;

+			RootItems[I].hItem = TreeView_InsertItem(hTreeView, &tvIn);

+		}

+	}

+	for (I = 0; I < Value.GetSize(); I++)

+	{

+		Value[I].hItem = RootItems[0].hItem; // put an item to first group in case of some strange error

+	}

+	for (I = 0; I < Value.GetSize(); I++)

+	{

+		tvIn.item.mask = TVIF_TEXT | TVIF_STATE | TVIF_PARAM;

+		tvIn.item.state = tvIn.item.stateMask = (Value[I].Flags & TIF_GROUP) ? (TVIS_BOLD | ((Value[I].Flags & TIF_EXPANDED) ? TVIS_EXPANDED : 0)) : 0;

+		if (TreeFlags & TREECTRL_FLAG_HAS_CHECKBOXES)

+		{

+			tvIn.item.stateMask |= TVIS_STATEIMAGEMASK;

+			tvIn.item.state |= INDEXTOSTATEIMAGEMASK((Value[I].Flags & TIF_ENABLED) ? 2 : 1);

+		}

+		tvIn.item.pszText = Value[I].Title;

+		int Order = IDToOrder(Value[I].ParentID);

+		if (Order != -1)

+		{

+			tvIn.hParent = (Order <= TREECTRL_ROOTORDEROFFS) ? RootItems[ROOT_ORDER_TO_INDEX(Order)].hItem : Value[Order].hItem;

+			tvIn.hInsertAfter = TVI_LAST;

+			tvIn.item.lParam = Value[I].ID;

+			Value[I].hItem = TreeView_InsertItem(hTreeView, &tvIn);

+		} else

+		{ // found an orphan item; probably it's better just to delete it

+			Value.RemoveElem(I);

+			I--;

+		}

+	}

+	TreeView_SelectItem(hTreeView, (SelectOrder >= 0) ? Value[SelectOrder].hItem : ((SelectOrder <= TREECTRL_ROOTORDEROFFS) ? RootItems[ROOT_ORDER_TO_INDEX(SelectOrder)].hItem : NULL));

+	SendMessage(hTreeView, WM_SETREDRAW, true, 0);

+	SCROLLBARINFO sbi;

+	sbi.cbSize = sizeof(sbi);

+	GetScrollBarInfo(hTreeView, OBJID_VSCROLL, &sbi);

+	if (!(sbi.rgstate[0] & STATE_SYSTEM_INVISIBLE))

+	{

+		int MinPos, MaxPos;

+		GetScrollRange(hTreeView, SB_VERT, &MinPos, &MaxPos);

+		if (ScrollPos < MinPos)

+		{

+			ScrollPos = MinPos;

+		} else if (ScrollPos > MaxPos)

+		{

+			ScrollPos = MaxPos;

+		}

+		SetScrollPos(hTreeView, SB_VERT, ScrollPos, true);

+	}

+	COptItem::MemToWnd(hWnd);

+}

+

+

+typedef struct

+{

+	TMyArray<CString> TreeSettings;

+	COptItem_TreeCtrl *TreeCtrl;

+	CString *sDBSettingPrefix;

+} sTreeDeleteEnumData;

+

+int TreeDeleteEnum(const char *szSetting, LPARAM lParam)

+{

+	sTreeDeleteEnumData *TreeDeleteEnumData = (sTreeDeleteEnumData*)lParam;

+	CString CurSetting;

+	CurSetting = *TreeDeleteEnumData->sDBSettingPrefix + TreeDeleteEnumData->TreeCtrl->sDBSetting + TREEITEM_DBSTR_TITLE;

+	if (!strncmp(szSetting, CurSetting, CurSetting.GetLen()))

+	{

+		TreeDeleteEnumData->TreeSettings.AddElem(szSetting);

+	}

+	CurSetting = *TreeDeleteEnumData->sDBSettingPrefix + TreeDeleteEnumData->TreeCtrl->sDBSetting + TREEITEM_DBSTR_PARENT;

+	if (!strncmp(szSetting, CurSetting, CurSetting.GetLen()))

+	{

+		TreeDeleteEnumData->TreeSettings.AddElem(szSetting);

+	}

+	CurSetting = *TreeDeleteEnumData->sDBSettingPrefix + TreeDeleteEnumData->TreeCtrl->sDBSetting + TREEITEM_DBSTR_ORDER;

+	if (!strncmp(szSetting, CurSetting, CurSetting.GetLen()))

+	{

+		TreeDeleteEnumData->TreeSettings.AddElem(szSetting);

+	}

+	CurSetting = *TreeDeleteEnumData->sDBSettingPrefix + TreeDeleteEnumData->TreeCtrl->sDBSetting + TREEITEM_DBSTR_FLAGS;

+	if (!strncmp(szSetting, CurSetting, CurSetting.GetLen()))

+	{

+		TreeDeleteEnumData->TreeSettings.AddElem(szSetting);

+	}

+	if (TreeDeleteEnumData->TreeCtrl->User_Str1_DBName != NULL)

+	{

+		CurSetting = *TreeDeleteEnumData->sDBSettingPrefix + TreeDeleteEnumData->TreeCtrl->sDBSetting + TreeDeleteEnumData->TreeCtrl->User_Str1_DBName;

+		if (!strncmp(szSetting, CurSetting, CurSetting.GetLen()))

+		{

+			TreeDeleteEnumData->TreeSettings.AddElem(szSetting);

+		}

+	}

+	return 0;

+}

+

+void COptItem_TreeCtrl::CleanDBSettings(CString &sModule, CString *sDBSettingPrefix)

+{

+	if (!sDBSettingPrefix)

+	{

+		sDBSettingPrefix = &sEmptyString;

+	}

+	sTreeDeleteEnumData TreeDeleteEnumData;

+	TreeDeleteEnumData.TreeCtrl = this;

+	TreeDeleteEnumData.sDBSettingPrefix = sDBSettingPrefix;

+	DBCONTACTENUMSETTINGS dbEnum;

+	dbEnum.lParam = (LPARAM)&TreeDeleteEnumData;

+	dbEnum.ofsSettings = 0;

+	dbEnum.pfnEnumProc = TreeDeleteEnum;

+	dbEnum.szModule = sModule;

+	CallService(MS_DB_CONTACT_ENUMSETTINGS, NULL, (LPARAM)&dbEnum);

+	int I;

+	for (I = 0; I < TreeDeleteEnumData.TreeSettings.GetSize(); I++)

+	{

+		db_unset(NULL, sModule, TreeDeleteEnumData.TreeSettings[I]);

+	}

+}

+

+

+int COptItem_TreeCtrl::GetSelectedItemID(HWND hWnd)

+{

+	HWND hTreeView = GetDlgItem(hWnd, DlgItemID);

+	TVITEM tvi = {0};

+	tvi.hItem = TreeView_GetSelection(hTreeView);

+	if (!tvi.hItem)

+	{

+		return -1;

+	}

+	tvi.mask = TVIF_HANDLE | TVIF_PARAM;

+	TreeView_GetItem(hTreeView, &tvi);

+	return tvi.lParam;

+}

+

+void COptItem_TreeCtrl::Delete(HWND hWnd, int ID)

+{

+	int SelectedOrder = IDToOrder(ID);

+	_ASSERT(SelectedOrder >= 0);

+	RecursiveDelete(hWnd, SelectedOrder);

+	Modified = true;

+}

+

+void COptItem_TreeCtrl::RecursiveDelete(HWND hWnd, int I)

+{

+	if (Value[I].Flags & TIF_GROUP)

+	{

+		int J;

+		for (J = I + 1; J < Value.GetSize(); J++)

+		{

+			if (Value[J].ParentID == Value[I].ID)

+			{

+				RecursiveDelete(hWnd, J--);

+			}

+		}

+	}

+	HWND hTreeView = GetDlgItem(hWnd, DlgItemID);

+	TreeView_DeleteItem(hTreeView, Value[I].hItem);

+	Value.RemoveElem(I);

+}

+

+CTreeItem* COptItem_TreeCtrl::InsertItem(HWND hWnd, CTreeItem &Item)

+// Item's ID and ParentID are not used (the new item position is determined by current selection in the tree)

+// returns a pointer to the newly inserted item info

+{

+	_ASSERT(!(TreeFlags & TREECTRL_FLAG_IS_SINGLE_LEVEL) || !(Item.Flags & TIF_GROUP));

+	HWND hTreeView = GetDlgItem(hWnd, DlgItemID);

+	TVITEM tvi;

+	int SelOrder = -1;

+	Item.ParentID = RootItems[0].ID;

+	TVINSERTSTRUCT tvIn = {0};

+	tvIn.hParent = RootItems[0].hItem;

+	tvIn.hInsertAfter = TVI_FIRST;

+	if (tvi.hItem = TreeView_GetSelection(hTreeView))

+	{

+		tvi.mask = TVIF_HANDLE | TVIF_PARAM;

+		TreeView_GetItem(hTreeView, &tvi);

+		SelOrder = IDToOrder(tvi.lParam);

+		if (SelOrder <= TREECTRL_ROOTORDEROFFS)

+		{

+			Item.ParentID = RootItems[ROOT_ORDER_TO_INDEX(SelOrder)].ID;

+			tvIn.hParent = RootItems[ROOT_ORDER_TO_INDEX(SelOrder)].hItem;

+			SelOrder = -1;

+		} else

+		{

+			if (Value[SelOrder].Flags & TIF_GROUP)

+			{

+				Item.ParentID = Value[SelOrder].ID;

+				tvIn.hParent = Value[SelOrder].hItem;

+			} else

+			{

+				Item.ParentID = Value[SelOrder].ParentID;

+				int Order = IDToOrder(Value[SelOrder].ParentID);

+				tvIn.hParent = (Order <= TREECTRL_ROOTORDEROFFS) ? RootItems[ROOT_ORDER_TO_INDEX(Order)].hItem : Value[Order].hItem;

+				tvIn.hInsertAfter = Value[SelOrder].hItem;

+			}

+		}

+	}

+	tvIn.item.mask = TVIF_TEXT | TVIF_STATE | TVIF_PARAM;

+	tvIn.item.state = tvIn.item.stateMask = (Item.Flags & TIF_GROUP) ? (TVIS_BOLD |

+		((Item.Flags & TIF_EXPANDED) ? TVIS_EXPANDED : 0)) : 0;

+	if (TreeFlags & TREECTRL_FLAG_HAS_CHECKBOXES)

+	{

+		tvIn.item.stateMask |= TVIS_STATEIMAGEMASK;

+		tvIn.item.state |= INDEXTOSTATEIMAGEMASK((Item.Flags & TIF_ENABLED) ? 2 : 1);

+	}

+	tvIn.item.pszText = Item.Title;

+	tvIn.item.lParam = Item.ID = GenerateID();

+	Value.InsertElem(Item, SelOrder + 1);

+	Value[SelOrder + 1].hItem = TreeView_InsertItem(hTreeView, &tvIn);

+	TreeView_SelectItem(hTreeView, Value[SelOrder + 1].hItem);

+	Modified = true;

+	return &Value[SelOrder + 1];

+}

+

+int COptItem_TreeCtrl::RecursiveMove(int ItemOrder, int ParentID, int InsertAtOrder)

+// ItemOrder must be a movable item (i.e. ItemOrder >= 0)

+// InsertAtOrder must be >= 0 too.

+{

+	int ItemsMoved = 1;

+	Value.MoveElem(ItemOrder, InsertAtOrder);

+	Value[InsertAtOrder].ParentID = ParentID;

+	if (Value[InsertAtOrder].Flags & TIF_GROUP) // need to ensure that no items were left before their group by an order.

+	{

+		int GroupID = Value[InsertAtOrder].ID;

+		int I;

+		for (I = ItemOrder; I < InsertAtOrder; I++) // if ItemOrder > InsertAtOrder then there is simply nothing to do

+		{

+			if (Value[I].ParentID == GroupID)

+			{

+				int CurrentItemsMoved = RecursiveMove(I, GroupID, InsertAtOrder);

+				ItemsMoved += CurrentItemsMoved;

+				InsertAtOrder -= CurrentItemsMoved;

+				I--;

+			}

+		}

+	}

+	return ItemsMoved;

+}

+

+void COptItem_TreeCtrl::MoveItem(HWND hWnd, HTREEITEM hItem, HTREEITEM hMoveTo)

+{ // hMoveTo can be NULL and it means that we must move hItem to the beginning of the list

+	_ASSERT(hItem && (hMoveTo || TreeFlags & TREECTRL_FLAG_IS_SINGLE_LEVEL));

+	if (hItem == hMoveTo)

+	{

+		return;

+	}

+	HWND hTreeView = GetDlgItem(hWnd, DlgItemID);

+	TVITEM tvi;

+	tvi.mask = TVIF_HANDLE | TVIF_PARAM;

+	tvi.hItem = hItem;

+	TreeView_GetItem(hTreeView, &tvi);

+	int ItemOrder = IDToOrder(tvi.lParam);

+	_ASSERT(ItemOrder != -1);

+	int MoveToOrder;

+	if (hMoveTo)

+	{

+		tvi.hItem = hMoveTo;

+		TreeView_GetItem(hTreeView, &tvi);

+		MoveToOrder = IDToOrder(tvi.lParam);

+		_ASSERT(MoveToOrder != -1);

+	} else

+	{

+		MoveToOrder = -1;

+	}

+	if (ItemOrder <= TREECTRL_ROOTORDEROFFS)

+	{

+		return; // can't move root items

+	}

+	if (Value[ItemOrder].Flags & TIF_GROUP)

+	{ // need to check for a case when trying to move a group to its own subgroup.

+		int Order = MoveToOrder;

+		while (Order >= 0)

+		{

+			Order = IDToOrder(Value[Order].ParentID);

+			if (Order == ItemOrder)

+			{

+				return;

+			}

+		}

+	}

+// well, everything is ok, we really can move that item.

+	WndToMem(hWnd); // save groups state (expanded/collapsed)

+	if (MoveToOrder != -1 && ((MoveToOrder <= TREECTRL_ROOTORDEROFFS) ? RootItems[ROOT_ORDER_TO_INDEX(MoveToOrder)].Flags : Value[MoveToOrder].Flags) & TIF_GROUP)

+	{ // if the destination is a group, then move the item to that group

+		RecursiveMove(ItemOrder, (MoveToOrder <= TREECTRL_ROOTORDEROFFS) ? RootItems[ROOT_ORDER_TO_INDEX(MoveToOrder)].ID : Value[MoveToOrder].ID, (MoveToOrder >= 0) ? ((ItemOrder < MoveToOrder) ? MoveToOrder : (MoveToOrder + 1)) : 0);

+	} else

+	{ // else place the item after the destination item

+		RecursiveMove(ItemOrder, (MoveToOrder == -1) ? 0 : Value[MoveToOrder].ParentID, (ItemOrder < MoveToOrder) ? MoveToOrder : (MoveToOrder + 1)); // when TREECTRL_FLAG_IS_SINGLE_LEVEL, we always have a root item with ID = 0.

+	}

+	MemToWnd(hWnd); // update the tree

+	Modified = true;

+}

+

+

+// ================================================ COptItem_ListCtrl ================================================

+

+typedef struct

+{

+	COptItem_ListCtrl *ListCtrl;

+	CString *sModule;

+	CString *sDBSettingPrefix;

+} sListReadEnumData;

+

+int ListReadEnum(const char *szSetting, LPARAM lParam)

+{

+	sListReadEnumData *ListReadEnumData = (sListReadEnumData*)lParam;

+	int Len = ListReadEnumData->sDBSettingPrefix->GetLen() + ListReadEnumData->ListCtrl->sDBSetting.GetLen() + lengthof(LISTITEM_DBSTR_TEXT) - 1;

+	if (!strncmp(szSetting, *ListReadEnumData->sDBSettingPrefix + ListReadEnumData->ListCtrl->sDBSetting + LISTITEM_DBSTR_TEXT, Len) && isdigit(szSetting[Len]))

+	{

+		int ID = atol(szSetting + Len);

+		ListReadEnumData->ListCtrl->Value.SetAtGrow(ID).Text = db_get_s(NULL, *ListReadEnumData->sModule, *ListReadEnumData->sDBSettingPrefix + szSetting, _T(""));

+	}

+	return 0;

+}

+

+void COptItem_ListCtrl::DBToMem(CString &sModule, CString *sDBSettingPrefix)

+{

+	if (!sDBSettingPrefix)

+	{

+		sDBSettingPrefix = &sEmptyString;

+	}

+	Value.RemoveAll();

+	sListReadEnumData ListReadEnumData;

+	ListReadEnumData.ListCtrl = this;

+	ListReadEnumData.sModule = &sModule;

+	ListReadEnumData.sDBSettingPrefix = sDBSettingPrefix;

+	DBCONTACTENUMSETTINGS dbEnum;

+	dbEnum.lParam = (LPARAM)&ListReadEnumData;

+	dbEnum.ofsSettings = 0;

+	dbEnum.pfnEnumProc = ListReadEnum;

+	dbEnum.szModule = sModule;

+	CallService(MS_DB_CONTACT_ENUMSETTINGS, NULL, (LPARAM)&dbEnum);

+	if (!Value.GetSize())

+	{

+		Value = DefValue;

+	} else

+	{

+		int I;

+		for (I = 0; I < Value.GetSize(); I++)

+		{

+			if (Value[I].Text == NULL) // NULL is not ""!

+			{

+				Value.RemoveElem(I);

+				I--;

+			}

+		}

+	}

+	COptItem::DBToMem(sModule, sDBSettingPrefix);

+}

+

+void COptItem_ListCtrl::MemToDB(CString &sModule, CString *sDBSettingPrefix)

+{

+	if (!ReadOnly && Modified)

+	{

+		if (!sDBSettingPrefix)

+		{

+			sDBSettingPrefix = &sEmptyString;

+		}

+		CleanDBSettings(sModule, sDBSettingPrefix);

+		int I;

+		for (I = 0; I < Value.GetSize(); I++)

+		{

+			CString StrID;

+			_itoa(I, StrID.GetBuffer(64), 10);

+			StrID.ReleaseBuffer();

+			db_set_ts(NULL, sModule, *sDBSettingPrefix + sDBSetting + LISTITEM_DBSTR_TEXT + StrID, Value[I].Text);

+		}

+		COptItem::MemToDB(sModule, sDBSettingPrefix);

+	}

+}

+

+void COptItem_ListCtrl::WndToMem(HWND hWnd)

+{

+// nothing to do

+	COptItem::WndToMem(hWnd);

+}

+

+void COptItem_ListCtrl::MemToWnd(HWND hWnd)

+{

+	HWND hListView = GetDlgItem(hWnd, DlgItemID);

+	SendMessage(hListView, WM_SETREDRAW, false, 0);

+	SendMessage(hListView, LB_RESETCONTENT, 0, 0);

+	int I;

+	for (I = 0; I < Value.GetSize(); I++)

+	{

+		SendMessage(hListView, LB_INSERTSTRING, -1, (LPARAM)(TCHAR*)Value[I].Text);

+	}

+	SendMessage(hListView, WM_SETREDRAW, true, 0);

+	COptItem::MemToWnd(hWnd);

+}

+

+

+typedef struct

+{

+	TMyArray<CString> ListSettings;

+	COptItem_ListCtrl *ListCtrl;

+	CString *sDBSettingPrefix;

+} sListDeleteEnumData;

+

+int ListDeleteEnum(const char *szSetting, LPARAM lParam)

+{

+	sListDeleteEnumData *ListDeleteEnumData = (sListDeleteEnumData*)lParam;

+	CString CurSetting = *ListDeleteEnumData->sDBSettingPrefix + ListDeleteEnumData->ListCtrl->sDBSetting + LISTITEM_DBSTR_TEXT;

+	if (!strncmp(szSetting, CurSetting, CurSetting.GetLen()))

+	{

+		ListDeleteEnumData->ListSettings.AddElem(szSetting);

+	}

+	return 0;

+}

+

+void COptItem_ListCtrl::CleanDBSettings(CString &sModule, CString *sDBSettingPrefix)

+{

+	if (!sDBSettingPrefix)

+	{

+		sDBSettingPrefix = &sEmptyString;

+	}

+	sListDeleteEnumData ListDeleteEnumData;

+	ListDeleteEnumData.ListCtrl = this;

+	ListDeleteEnumData.sDBSettingPrefix = sDBSettingPrefix;

+	DBCONTACTENUMSETTINGS dbEnum;

+	dbEnum.lParam = (LPARAM)&ListDeleteEnumData;

+	dbEnum.ofsSettings = 0;

+	dbEnum.pfnEnumProc = ListDeleteEnum;

+	dbEnum.szModule = sModule;

+	CallService(MS_DB_CONTACT_ENUMSETTINGS, NULL, (LPARAM)&dbEnum);

+	int I;

+	for (I = 0; I < ListDeleteEnumData.ListSettings.GetSize(); I++)

+	{

+		db_unset(NULL, sModule, ListDeleteEnumData.ListSettings[I]);

+	}

+}

+

+

+int COptItem_ListCtrl::GetSelectedItemID(HWND hWnd)

+{

+	int Res = SendDlgItemMessage(hWnd, DlgItemID, LB_GETCURSEL, 0, 0);

+	return (Res == LB_ERR) ? -1 : Res; // I know that LB_ERR = -1 ;)

+}

+

+int COptItem_ListCtrl::SetSelectedItemID(HWND hWnd, int ID)

+{

+	int Res = SendDlgItemMessage(hWnd, DlgItemID, LB_SETCURSEL, ID, 0);

+	return (Res == LB_ERR) ? -1 : Res;

+}

+

+void COptItem_ListCtrl::Delete(HWND hWnd, int ID)

+{

+	_ASSERT(ID >= 0);

+	HWND hListView = GetDlgItem(hWnd, DlgItemID);

+	int Res = SendMessage(hListView, LB_DELETESTRING, ID, 0);

+	_ASSERT(Res != LB_ERR);

+	Value.RemoveElem(ID);

+	Modified = true;

+}

+

+void COptItem_ListCtrl::ModifyItem(HWND hWnd, int ID, CListItem &Item)

+{ // changes the text of item with the specified ID

+	_ASSERT(ID >= 0);

+	HWND hListView = GetDlgItem(hWnd, DlgItemID);

+	SendMessage(hListView, WM_SETREDRAW, false, 0);

+	int CurSel = SendMessage(hListView, LB_GETCURSEL, 0, 0);

+	int TopIndex = SendMessage(hListView, LB_GETTOPINDEX, 0, 0);

+	int Res = SendMessage(hListView, LB_DELETESTRING, ID, 0);

+	_ASSERT(Res != LB_ERR);

+	Res = SendMessage(hListView, LB_INSERTSTRING, ID, (LPARAM)(TCHAR*)(Item.Text));

+	_ASSERT(Res != LB_ERR && Res != LB_ERRSPACE);

+	SendMessage(hListView, LB_SETCURSEL, CurSel, 0);

+	SendMessage(hListView, LB_SETTOPINDEX, TopIndex, 0);

+	SendMessage(hListView, WM_SETREDRAW, true, 0);

+	Value[ID].Text = Item.Text;

+	Modified = true;

+}

+

+CListItem* COptItem_ListCtrl::InsertItem(HWND hWnd, int ID, CListItem &Item)

+// returns a pointer to the newly inserted item info

+// ID is position at which to insert the item; -1 = add to the end of the list

+{

+	HWND hListView = GetDlgItem(hWnd, DlgItemID);

+	int Res = SendMessage(hListView, LB_INSERTSTRING, ID, (LPARAM)(TCHAR*)(Item.Text)); // LB_INSERTSTRING doesn't sort the lists even with LBS_SORT style

+	_ASSERT(Res != LB_ERR && Res != LB_ERRSPACE);

+	int I = Value.AddElem(Item);

+	Modified = true;

+	return &Value[I];

+}