//***************************************************************************************
//
//   Google Extension plugin for the Miranda IM's Jabber protocol
//   Copyright (c) 2011 bems@jabber.org, George Hazan (ghazan@jabber.ru)
//
//   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 "stdafx.h"
#include "options.h"

static const LPTSTR ACCOUNT_PROP_NAME = _T("{BF447EBA-27AE-4DB7-893C-FC42A3F74D75}");
static const LPTSTR DIALOG_INITIALIZED_PROP_NAME = _T("{5EE59FE5-679A-4A29-B0A1-03092E7AC20E}");

static const LPTSTR POPUPS_OPTIONS_GROUP = LPGENT("PopUps");
static const LPTSTR NETWORK_OPTIONS_GROUP = LPGENT("Network");

static const LPSTR NOTIFY_SETTINGS_FROM_MOD_NAME = SHORT_PLUGIN_NAME ".NotifySettingsFromModName";

static const LPTSTR TEST_LETTER_SUBJECT = _T("Why C sucks");
static const LPTSTR TEST_LETTER_INBOX = _T("brickstrace@gmail.com [1]");
static const LPTSTR TEST_LETTER_SENDER = _T("    bems <bems@vingrad.ru>\n");
static const LPTSTR TEST_LETTER_SNIP =
	LPGENT("* Primitive type system\n")
	LPGENT("* No overloading\n")
	LPGENT("* Limited possibility of data abstraction, polymorphism, subtyping and code reuse\n")
	LPGENT("* No metaprogramming except preprocessor macros\n")
	LPGENT("* No exceptions");

extern HINSTANCE g_hInst;

void CheckControlsEnabled(HWND wnd)
{
	BOOL PopupsEnabled = (SendMessage(GetDlgItem(wnd, IDC_POPUPSENABLED), BM_GETSTATE, 0, 0) & BST_CHECKED) == BST_CHECKED;
	EnableWindow(GetDlgItem(wnd, IDC_POPUPSINFULLSCREEN), PopupsEnabled);
	EnableWindow(GetDlgItem(wnd, IDC_POPUPSINFULLSCREENLABEL), PopupsEnabled);
	EnableWindow(GetDlgItem(wnd, IDC_ADDSNIP), PopupsEnabled);

	EnableWindow(GetDlgItem(wnd, IDC_MAILBOXVIEWLABEL), PopupsEnabled);
	EnableWindow(GetDlgItem(wnd, IDC_UNKNOWNVIEW), PopupsEnabled);
	EnableWindow(GetDlgItem(wnd, IDC_STANDARDVIEW), PopupsEnabled);
	EnableWindow(GetDlgItem(wnd, IDC_HTMLVIEW), PopupsEnabled);
}

BOOL ReadCheckbox(HWND wnd, int id, DWORD controls)
{
	BOOL result = ((controls >> (id - IDC_BASE)) & 1);
	if (id != IDC_STANDARDVIEW && id != IDC_HTMLVIEW) result = !result;
	if (wnd) Button_SetCheck(GetDlgItem(wnd, id), result);
	return result;
}

DWORD ReadCheckboxes(HWND wnd, LPCSTR mod)
{
	DWORD controls = DBGetContactSettingDword(0, NOTIFY_SETTINGS_FROM_MOD_NAME, mod, 0);
	ReadCheckbox(wnd, IDC_POPUPSENABLED, controls);
	ReadCheckbox(wnd, IDC_POPUPSINFULLSCREEN, controls);
	ReadCheckbox(wnd, IDC_AUTHONMAILBOX, controls);
	ReadCheckbox(wnd, IDC_ADDSNIP, controls);
	ReadCheckbox(wnd, IDC_UNKNOWNVIEW, controls);
	ReadCheckbox(wnd, IDC_STANDARDVIEW, controls);
	ReadCheckbox(wnd, IDC_HTMLVIEW, controls);
	return controls;
}

DWORD GetCheckboxSaveValue(HWND wnd, int id)
{
	BOOL val = Button_GetCheck(GetDlgItem(wnd, id));
	if (id != IDC_STANDARDVIEW && id != IDC_HTMLVIEW) val = !val;
	return val ? (1 << (id - IDC_BASE)) : 0;
}

void SaveControls(HWND wnd, LPCSTR mod)
{
	DWORD controls = 
		GetCheckboxSaveValue(wnd, IDC_POPUPSINFULLSCREEN) |
		GetCheckboxSaveValue(wnd, IDC_POPUPSENABLED) |
		GetCheckboxSaveValue(wnd, IDC_AUTHONMAILBOX) |
		GetCheckboxSaveValue(wnd, IDC_ADDSNIP) |
		GetCheckboxSaveValue(wnd, IDC_UNKNOWNVIEW) |
		GetCheckboxSaveValue(wnd, IDC_STANDARDVIEW) |
		GetCheckboxSaveValue(wnd, IDC_HTMLVIEW);

	db_set_dw(0, NOTIFY_SETTINGS_FROM_MOD_NAME, mod, controls);
}

INT_PTR CALLBACK AccOptionsDlgProc(HWND wnd, UINT msg, WPARAM wParam, LPARAM lParam)
{
	switch (msg) {
	case WM_INITDIALOG:
		SetProp(wnd, ACCOUNT_PROP_NAME, (HANDLE)lParam);
		TranslateDialogDefault(wnd);
		ReadCheckboxes(wnd, (LPCSTR)lParam);
		CheckControlsEnabled(wnd);
		break;

	case WM_CTLCOLORSTATIC:
		if (GetDlgItem(wnd, IDC_WARNBAR) == (HWND)lParam)
			return (INT_PTR)CreateSolidBrush(0x55AAFF); // orange
		break;

	case WM_COMMAND:
		switch (LOWORD(wParam)) {
		case IDC_POPUPSENABLED:
			if (HIWORD(wParam) == BN_CLICKED) CheckControlsEnabled(wnd);
			// no break

		case IDC_POPUPSINFULLSCREEN:
		case IDC_AUTHONMAILBOX:
		case IDC_ADDSNIP:
		case IDC_UNKNOWNVIEW:
		case IDC_STANDARDVIEW:
		case IDC_HTMLVIEW:
			if (HIWORD(wParam) == BN_CLICKED) PropSheet_Changed(GetParent(wnd), wnd);
		}
		break;

	case WM_NOTIFY:
		if (!((LPNMHDR)lParam)->idFrom  && ((LPNMHDR)lParam)->code == PSN_APPLY)
			SaveControls(wnd, (LPCSTR)GetProp(wnd, ACCOUNT_PROP_NAME));
		break;
	}
	return 0;
}

void ShowTestPopup(HWND wnd)
{
	POPUPDATAT data = {0};
	wsprintf(&data.lptzContactName[0], TEST_LETTER_INBOX);
	wsprintf(&data.lptzText[0], TranslateTS(FULL_NOTIFICATION_FORMAT),
		TEST_LETTER_SUBJECT, TEST_LETTER_SENDER, TEST_LETTER_SNIP);

	int len = SendMessage(GetDlgItem(wnd, IDC_TIMEOUTEDIT), WM_GETTEXTLENGTH, 0, 0) + 1;
	LPTSTR timeout = (LPTSTR)malloc(len * sizeof(TCHAR));
	__try {
		SendMessage(GetDlgItem(wnd, IDC_TIMEOUTEDIT), WM_GETTEXT, len, (LPARAM)timeout);
		data.iSeconds = _ttoi(timeout);
	}
	__finally {
		free(timeout);
	}

	extern HICON g_hPopupIcon;
	data.lchIcon = g_hPopupIcon;
	data.colorBack = (COLORREF)SendMessage(GetDlgItem(wnd, IDC_BACKCOLORPICKER), CPM_GETCOLOUR, 0, 0);
	data.colorText = (COLORREF)SendMessage(GetDlgItem(wnd, IDC_TEXTCOLORPICKER), CPM_GETCOLOUR, 0, 0);
	if (data.colorBack == data.colorText) {
		data.colorBack = 0;
		data.colorText = 0;
	}
	CallService(MS_POPUP_ADDPOPUPT, (WPARAM)&data, 0);
}

INT_PTR CALLBACK PopupsOptionsDlgProc(HWND wnd, UINT msg, WPARAM wParam, LPARAM lParam)
{
	switch (msg) {
	case WM_INITDIALOG:
		TranslateDialogDefault(wnd);
		SendMessage(GetDlgItem(wnd, IDC_BACKCOLORPICKER), CPM_SETCOLOUR, 0,
			(LPARAM)DBGetContactSettingDword(0, SHORT_PLUGIN_NAME, BACK_COLOR_SETTING, 0));
		SendMessage(GetDlgItem(wnd, IDC_TEXTCOLORPICKER), CPM_SETCOLOUR, 0,
			(LPARAM)DBGetContactSettingDword(0, SHORT_PLUGIN_NAME, TEXT_COLOR_SETTING, 0));
		{
			LPTSTR timeout = (LPTSTR)malloc(11 * sizeof(TCHAR));
			__try {
				wsprintf(timeout, _T("%d"), DBGetContactSettingDword(0, SHORT_PLUGIN_NAME, TIMEOUT_SETTING, 0));
				SendMessage(GetDlgItem(wnd, IDC_TIMEOUTEDIT), WM_SETTEXT, 0, (LPARAM)timeout);
			}
			__finally {
				free(timeout);
			}
		}

		SetProp(wnd, DIALOG_INITIALIZED_PROP_NAME, (HANDLE)TRUE);
		break;

	case WM_COMMAND:
		if (LOWORD(wParam) == IDC_TESTBUTTON && HIWORD(wParam) == BN_CLICKED)
			ShowTestPopup(wnd);

		if (GetProp(wnd, DIALOG_INITIALIZED_PROP_NAME))
			switch (LOWORD(wParam)) {
			case IDC_BACKCOLORPICKER:
			case IDC_TEXTCOLORPICKER:
				if (HIWORD(wParam) == CPN_COLOURCHANGED) PropSheet_Changed(GetParent(wnd), wnd);
				break;

			case IDC_TIMEOUTEDIT:
				if (HIWORD(wParam) == EN_CHANGE) PropSheet_Changed(GetParent(wnd), wnd);
		}
		break;

	case WM_NOTIFY:
		if (!((LPNMHDR)lParam)->idFrom  && ((LPNMHDR)lParam)->code == PSN_APPLY)
			db_set_dw(0, SHORT_PLUGIN_NAME, BACK_COLOR_SETTING,
			(DWORD)SendMessage(GetDlgItem(wnd, IDC_BACKCOLORPICKER), CPM_GETCOLOUR, 0, 0));
		db_set_dw(0, SHORT_PLUGIN_NAME, TEXT_COLOR_SETTING,
			(DWORD)SendMessage(GetDlgItem(wnd, IDC_TEXTCOLORPICKER), CPM_GETCOLOUR, 0, 0));

		int len = SendMessage(GetDlgItem(wnd, IDC_TIMEOUTEDIT), WM_GETTEXTLENGTH, 0, 0) + 1;
		LPTSTR timeout = (LPTSTR)malloc(len * sizeof(TCHAR));
		__try {
			SendMessage(GetDlgItem(wnd, IDC_TIMEOUTEDIT), WM_GETTEXT, len, (LPARAM)timeout);
			db_set_dw(0, SHORT_PLUGIN_NAME, TIMEOUT_SETTING, _ttoi(timeout));
		}
		__finally {
			free(timeout);
		}
		break;
	}
	return 0;
}

void AddPopupsPage(WPARAM wParam)
{
	OPTIONSDIALOGPAGE odp = {0};
	odp.cbSize = sizeof(odp);
	odp.ptszTitle = MAIL_NOTIFICATIONS;
	odp.pfnDlgProc = PopupsOptionsDlgProc;
	odp.pszTemplate = MAKEINTRESOURCEA(IDD_POPUPSETTINGS);
	odp.hInstance = g_hInst;
	odp.ptszGroup = POPUPS_OPTIONS_GROUP;
	odp.flags = ODPF_UNICODE | ODPF_USERINFOTAB;

	Options_AddPage(wParam, &odp);
}

void AddAccPage(LPTSTR acc, LPCSTR mod, WPARAM wParam)
{
	OPTIONSDIALOGPAGE odp = { sizeof(odp) };
	odp.ptszTitle = acc;
	odp.pfnDlgProc = AccOptionsDlgProc;
	odp.pszTemplate = MAKEINTRESOURCEA(IDD_MAILSETTINGS);
	odp.hInstance = g_hInst;
	odp.ptszGroup = NETWORK_OPTIONS_GROUP;
	odp.flags = ODPF_UNICODE | ODPF_USERINFOTAB | ODPF_DONTTRANSLATE;
	odp.ptszTab = MAIL_NOTIFICATIONS;
	odp.dwInitParam = (LPARAM)mod;

	Options_AddPage(wParam, &odp);
}

int OptionsInitialization(WPARAM wParam, LPARAM lParam)
{
	int count;
	PROTOACCOUNT **accs;
	CallService(MS_PROTO_ENUMACCOUNTS, (WPARAM)&count, (LPARAM)&accs);
	for (int i = 0; i < count; i++)
		if ( getJabberApi(accs[i]->szModuleName))
			AddAccPage(accs[i]->tszAccountName, accs[i]->szModuleName, wParam);

	if (ServiceExists(MS_POPUP_ADDPOPUPT)) AddPopupsPage(wParam);
	return FALSE;
}

void HookOptionsInitialization()
{
	HookEvent(ME_OPT_INITIALISE, OptionsInitialization);
}