Weather: folders restructurization

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

1 files changed, 485 insertions, 0 deletions

diff --git a/protocols/Weather/src/weather_contacts.cpp b/protocols/Weather/src/weather_contacts.cpp
new file mode 100644
index 0000000000..9111ea3d92
--- /dev/null
+++ b/protocols/Weather/src/weather_contacts.cpp
@@ -0,0 +1,485 @@
+/*

+Weather Protocol plugin for Miranda IM

+Copyright (C) 2005-2011 Boris Krasnovskiy All Rights Reserved

+Copyright (C) 2002-2005 Calvin Che

+

+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; version 2

+of the License.

+

+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, see <http://www.gnu.org/licenses/>.

+*/

+

+/* This file contain the source that is related to weather contacts, 

+include the links, edit settings, and loading weather information for

+the contact.

+*/

+

+#include "weather.h"

+

+static void OpenUrl( TCHAR* format, TCHAR* id )

+{

+	TCHAR loc[512];

+

+	GetID( id );

+	mir_sntprintf( loc, SIZEOF(loc), format, id );

+	

+	CallService(MS_UTILS_OPENURL, opt.NewBrowserWin | OUF_TCHAR, (LPARAM)loc );

+}

+

+//============ BASIC CONTACTS FUNCTIONS AND LINKS  ============

+

+// view weather log for the contact

+// wParam = current contact

+INT_PTR ViewLog(WPARAM wParam, LPARAM lParam) 

+{

+	// see if the log path is set

+	DBVARIANT dbv;

+	if ( !DBGetContactSettingTString((HANDLE)wParam, WEATHERPROTONAME, "Log", &dbv)) {

+		if (dbv.pszVal[0] != 0)

+			ShellExecute((HWND)lParam, _T("open"), dbv.ptszVal, _T(""), _T(""), SW_SHOW);

+		DBFreeVariant(&dbv);

+	}

+	else	// display warning dialog if no path is specified

+		MessageBox(NULL, TranslateT("Weather condition was not logged."), 

+		TranslateT("Weather Protocol"), MB_OK | MB_ICONINFORMATION);

+	return 0;

+}

+

+// read complete forecast

+// wParam = current contact

+INT_PTR LoadForecast(WPARAM wParam, LPARAM lParam) 

+{

+	TCHAR id[256], loc2[256];

+	GetStationID((HANDLE)wParam, id, SIZEOF(id));

+	if (id[0] != 0) {

+		// check if the complte forecast URL is set. If it is not, display warning and quit

+		if ( DBGetStaticString((HANDLE)wParam, WEATHERPROTONAME, "InfoURL", loc2, SIZEOF(loc2)) || loc2[0] == 0) {

+			MessageBox(NULL, TranslateT("The URL for complete forcast have not been set. You can set it from the Edit Settings dialog."), 

+				TranslateT("Weather Protocol"), MB_ICONINFORMATION);

+			return 1;

+		}

+		// set the url and open the webpage

+		OpenUrl(loc2, id );

+	}

+	return 0;

+}

+

+// load weather map

+// wParam = current contact

+INT_PTR WeatherMap(WPARAM wParam, LPARAM lParam) 

+{

+	TCHAR id[256], loc2[256];

+	GetStationID((HANDLE)wParam, id, SIZEOF(id));

+	if (id[0] != 0) {

+		// check if the weather map URL is set. If it is not, display warning and quit

+		if (DBGetStaticString((HANDLE)wParam, WEATHERPROTONAME, "MapURL", loc2, SIZEOF(loc2)) || loc2[0] == 0) {

+			MessageBox(NULL, TranslateT("The URL for weather map have not been set.  You can set it from the Edit Settings dialog."), TranslateT("Weather Protocol"), MB_ICONINFORMATION);

+			return 1;

+		}

+

+		// set the url and open the webpage

+		OpenUrl(loc2, id);

+	}

+

+	return 0;

+}

+

+//============ EDIT SETTINGS  ============

+

+// show edit settings dialog

+// wParam = current contact

+INT_PTR EditSettings(WPARAM wParam, LPARAM lParam) 

+{

+	HWND hEditDlg = WindowList_Find(hWindowList, (HANDLE)wParam);

+

+	// search the dialog list to prevent multiple instance of dialog for the same contact

+	if (hEditDlg != NULL) {

+		// if the dialog box already opened, bring it to the front

+		SetForegroundWindow(hEditDlg);

+		SetFocus(hEditDlg);

+	}

+	else {

+		// if the dialog box is not opened, open a new one

+		if (IsMyContact((HANDLE)wParam))

+			CreateDialogParam(hInst, MAKEINTRESOURCE(IDD_EDIT), NULL, DlgProcChange, (LPARAM)wParam);

+	}

+

+	return 0;

+}

+

+typedef struct

+{

+	HANDLE hContact;

+	HICON  hRename;

+	HICON  hUserDetail;

+	HICON  hFile;

+	HICON  hSrchAll;

+} CntSetWndDataType;

+

+// edit weather settings

+// lParam = current contact

+INT_PTR CALLBACK DlgProcChange(HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam) 

+{

+	DBVARIANT dbv;

+	TCHAR str[256], str2[256], city[256], filter[256], *pfilter, *chop;

+	char loc[512];

+	OPENFILENAME ofn;       // common dialog box structure

+	HANDLE hContact;

+	WIDATA *sData;

+	CntSetWndDataType *wndData = NULL;

+

+	switch (msg) {

+	case WM_INITDIALOG:

+		TranslateDialogDefault(hwndDlg);

+

+		wndData = ( CntSetWndDataType* )mir_alloc(sizeof(CntSetWndDataType));

+		wndData->hContact = hContact = (HANDLE)lParam;

+		wndData->hRename = LoadSkinnedIcon(SKINICON_OTHER_RENAME);

+		wndData->hUserDetail = LoadSkinnedIcon(SKINICON_OTHER_USERDETAILS);

+		wndData->hFile = LoadSkinnedIcon(SKINICON_EVENT_FILE);

+		wndData->hSrchAll = LoadSkinnedIcon(SKINICON_OTHER_SEARCHALL);

+

+		SetWindowLongPtr(hwndDlg, GWLP_USERDATA, (LONG_PTR)wndData);

+

+		// set button images

+		SendDlgItemMessage(hwndDlg, IDC_GETNAME, BM_SETIMAGE, IMAGE_ICON, (LPARAM)wndData->hRename);

+		SendDlgItemMessage(hwndDlg, IDC_SVCINFO, BM_SETIMAGE, IMAGE_ICON, (LPARAM)wndData->hUserDetail);

+		SendDlgItemMessage(hwndDlg, IDC_BROWSE,  BM_SETIMAGE, IMAGE_ICON, (LPARAM)wndData->hFile);

+		SendDlgItemMessage(hwndDlg, IDC_VIEW1,   BM_SETIMAGE, IMAGE_ICON, (LPARAM)wndData->hSrchAll);

+		SendDlgItemMessage(hwndDlg, IDC_RESET1,  BM_SETIMAGE, IMAGE_ICON, (LPARAM)wndData->hRename);

+		SendDlgItemMessage(hwndDlg, IDC_VIEW2,   BM_SETIMAGE, IMAGE_ICON, (LPARAM)wndData->hSrchAll);

+		SendDlgItemMessage(hwndDlg, IDC_RESET2,  BM_SETIMAGE, IMAGE_ICON, (LPARAM)wndData->hRename);

+

+		// make all buttons flat

+		SendDlgItemMessage(hwndDlg, IDC_GETNAME, BUTTONSETASFLATBTN, TRUE, 0);

+		SendDlgItemMessage(hwndDlg, IDC_SVCINFO, BUTTONSETASFLATBTN, TRUE, 0);

+		SendDlgItemMessage(hwndDlg, IDC_BROWSE, BUTTONSETASFLATBTN, TRUE, 0);

+		SendDlgItemMessage(hwndDlg, IDC_VIEW1, BUTTONSETASFLATBTN, TRUE, 0);

+		SendDlgItemMessage(hwndDlg, IDC_RESET1, BUTTONSETASFLATBTN, TRUE, 0);

+		SendDlgItemMessage(hwndDlg, IDC_VIEW2, BUTTONSETASFLATBTN, TRUE, 0);

+		SendDlgItemMessage(hwndDlg, IDC_RESET2, BUTTONSETASFLATBTN, TRUE, 0);

+

+		// set tooltip for the buttons

+		SendDlgItemMessage(hwndDlg, IDC_GETNAME, BUTTONADDTOOLTIP, (WPARAM) LPGENT("Get city name from ID"), BATF_TCHAR);

+		SendDlgItemMessage(hwndDlg, IDC_SVCINFO, BUTTONADDTOOLTIP, (WPARAM) LPGENT("Weather INI information"), BATF_TCHAR);

+		SendDlgItemMessage(hwndDlg, IDC_BROWSE, BUTTONADDTOOLTIP, (WPARAM) LPGENT("Browse"), BATF_TCHAR);

+		SendDlgItemMessage(hwndDlg, IDC_VIEW1, BUTTONADDTOOLTIP, (WPARAM) LPGENT("View webpage"), BATF_TCHAR);

+		SendDlgItemMessage(hwndDlg, IDC_RESET1, BUTTONADDTOOLTIP, (WPARAM) LPGENT("Reset to default"), BATF_TCHAR);

+		SendDlgItemMessage(hwndDlg, IDC_VIEW2, BUTTONADDTOOLTIP, (WPARAM) LPGENT("View webpage"), BATF_TCHAR);

+		SendDlgItemMessage(hwndDlg, IDC_RESET2, BUTTONADDTOOLTIP, (WPARAM) LPGENT("Reset to default"), BATF_TCHAR);

+

+		// save the handle for the contact

+		WindowList_Add(hWindowList, hwndDlg, hContact);

+

+		// start to get the settings

+		// if the setting not exist, leave the dialog box blank

+		if (!DBGetContactSettingTString(hContact, WEATHERPROTONAME, "ID", &dbv)) {

+			SetDlgItemText(hwndDlg, IDC_ID, dbv.ptszVal);

+			// check if the station is a default station

+			CheckDlgButton(hwndDlg, IDC_DEFA, _tcscmp(dbv.ptszVal, opt.Default) != 0);

+			DBFreeVariant(&dbv);

+		}

+		if (!DBGetContactSettingTString(hContact, WEATHERPROTONAME, "Nick", &dbv)) {

+			SetDlgItemText(hwndDlg, IDC_NAME, dbv.ptszVal);

+			DBFreeVariant(&dbv);

+		}

+		if (!DBGetContactSettingTString(hContact, WEATHERPROTONAME, "Log", &dbv)) {

+			SetDlgItemText(hwndDlg, IDC_LOG, dbv.ptszVal);

+			// if the log path is not empty, check the checkbox for external log

+			if (dbv.ptszVal[0]) CheckDlgButton(hwndDlg, IDC_External, TRUE);

+			DBFreeVariant(&dbv);

+		}

+		// enable/disable the browse button depending on the value of external log checkbox

+		EnableWindow(GetDlgItem(hwndDlg, IDC_BROWSE), (BYTE)IsDlgButtonChecked(hwndDlg, IDC_External));

+

+		// other checkbox options

+		CheckDlgButton(hwndDlg, IDC_DPop, DBGetContactSettingByte(hContact, WEATHERPROTONAME, "DPopUp", FALSE));

+		CheckDlgButton(hwndDlg, IDC_DAutoUpdate, DBGetContactSettingByte(hContact, WEATHERPROTONAME, "DAutoUpdate", FALSE));

+		CheckDlgButton(hwndDlg, IDC_Internal, DBGetContactSettingByte(hContact, WEATHERPROTONAME, "History", 0));

+

+		if ( !DBGetContactSettingTString(hContact, WEATHERPROTONAME, "InfoURL", &dbv)) {

+			SetDlgItemText(hwndDlg, IDC_IURL, dbv.ptszVal);

+			DBFreeVariant(&dbv);

+		}

+		if ( !DBGetContactSettingTString(hContact, WEATHERPROTONAME, "MapURL", &dbv)) {

+			SetDlgItemText(hwndDlg, IDC_MURL, dbv.ptszVal);

+			DBFreeVariant(&dbv);

+		}

+

+		// display the dialog box and free memory

+		Utils_RestoreWindowPositionNoMove(hwndDlg, NULL, WEATHERPROTONAME, "EditSetting_");

+		ShowWindow(hwndDlg, SW_SHOW);

+		break;

+

+	case WM_COMMAND:

+		wndData = (CntSetWndDataType*)GetWindowLongPtr(hwndDlg, GWLP_USERDATA);

+		hContact = wndData ? wndData->hContact : NULL;

+

+		switch(LOWORD(wParam)) {

+		case IDC_ID:

+			// check if there are 2 parts in the ID (svc/id) seperated by "/"

+			// if not, don't let user change the setting

+			GetDlgItemText(hwndDlg, IDC_ID, str, SIZEOF(str));

+			chop = _tcsstr(str, _T("/"));

+			if (chop == NULL)

+				EnableWindow(GetDlgItem(hwndDlg, IDC_CHANGE), FALSE);

+			else

+				EnableWindow(GetDlgItem(hwndDlg, IDC_CHANGE), TRUE);

+			break;

+

+		case IDC_NAME:

+			// check if station name is entered

+			// if not, don't let user change the setting

+			GetDlgItemText(hwndDlg, IDC_NAME, str, SIZEOF(str));

+			EnableWindow(GetDlgItem(hwndDlg, IDC_CHANGE), str[0] != 0);

+			break;

+

+		case IDC_GETNAME: 

+			{

+				// the button for getting station name from the internet

+				// this function uses the ID search for add/find weather station

+

+				if (!CheckSearch()) return TRUE;	// don't download if update is in progress

+				// get the weather update data using the string in the ID field

+				GetDlgItemText(hwndDlg, IDC_ID, str, SIZEOF(str));

+				GetSvc(str);

+				WIDATA *sData = GetWIData(str);

+				GetDlgItemText(hwndDlg, IDC_ID, str, SIZEOF(str));

+				GetID(str);

+				// if ID search is available, do it

+				if (sData->IDSearch.Available) {

+					TCHAR *szData = NULL;

+

+					// load the page

+					wsprintfA(loc, sData->IDSearch.SearchURL, str);

+					str[0] = 0;

+					if (InternetDownloadFile(loc, NULL, &szData) == 0) {

+						TCHAR *szInfo = szData;

+						TCHAR* search = _tcsstr(szInfo, sData->IDSearch.NotFoundStr);

+

+						// if the page is found (ie. valid ID), get the name of the city

+						if (search == NULL)

+							GetDataValue(&sData->IDSearch.Name, str, &szInfo);

+

+						// free memory

+						mir_free(szData);

+					}

+					NetlibHttpDisconnect();

+				}

+				// give no station name but only ID if the search is unavailable

+				if (str[0] != 0)	SetDlgItemText(hwndDlg, IDC_NAME, str);

+				break;

+			}

+		case IDC_External:

+			// enable/disable the borwse button depending if the external log is enabled

+			EnableWindow(GetDlgItem(hwndDlg, IDC_BROWSE), (BYTE)IsDlgButtonChecked(hwndDlg, IDC_External));

+			if (!(BYTE)IsDlgButtonChecked(hwndDlg, IDC_External)) return TRUE;

+

+		case IDC_BROWSE:	// fall through

+			// browse for the external log file

+			GetDlgItemText(hwndDlg, IDC_LOG, str, SIZEOF(str));

+			// Initialize OPENFILENAME

+			ZeroMemory(&ofn, sizeof(OPENFILENAME));

+			ofn.lStructSize = sizeof(OPENFILENAME);

+			ofn.hwndOwner = hwndDlg;

+			ofn.lpstrFile = str;

+			ofn.nMaxFile = SIZEOF(str);

+			// set filters

+			_tcscpy(filter, TranslateT("Text Files"));

+			_tcscat(filter, _T(" (*.txt)"));

+			pfilter = filter + _tcslen(filter)+1;

+			_tcscpy(pfilter, _T("*.txt"));

+			pfilter = pfilter + _tcslen(pfilter)+1;

+			_tcscpy(pfilter, TranslateT("All Files"));

+			_tcscat(pfilter, _T(" (*.*)"));

+			pfilter = pfilter + _tcslen(pfilter)+1;

+			_tcscpy(pfilter, _T("*.*"));

+			pfilter = pfilter + _tcslen(pfilter)+1;

+			*pfilter = '\0';

+			ofn.lpstrFilter = filter;

+			ofn.nFilterIndex = 1;

+			ofn.lpstrFileTitle = NULL;

+			ofn.nMaxFileTitle = 0;

+			ofn.lpstrInitialDir = NULL;

+			ofn.Flags = OFN_PATHMUSTEXIST;

+

+			// Display a Open dialog box and put the file name on the dialog

+			if (GetOpenFileName(&ofn))

+				SetDlgItemText(hwndDlg, IDC_LOG, ofn.lpstrFile);

+			// if there is no log file specified, disable external logging

+			EnableWindow(GetDlgItem(hwndDlg, IDC_CHANGE), ofn.lpstrFile[0] != 0);

+			break;

+

+		case IDC_VIEW1:

+			// view the page for more info

+			GetDlgItemText(hwndDlg, IDC_IURL, str, SIZEOF(str));

+			if (str[0] == 0) return TRUE;

+			GetDlgItemText(hwndDlg, IDC_ID, str2, SIZEOF(str2));

+			OpenUrl(str, str2);

+			break;

+

+		case IDC_VIEW2:

+			// view the page for weather map

+			GetDlgItemText(hwndDlg, IDC_MURL, str, SIZEOF(str));

+			if (str[0] == 0) return TRUE;

+			GetDlgItemText(hwndDlg, IDC_ID, str2, SIZEOF(str2));

+			OpenUrl(str, str2);

+			break;

+

+		case IDC_RESET1:

+			// reset the more info url to service default

+			GetDlgItemText(hwndDlg, IDC_ID, str, SIZEOF(str));

+			GetSvc(str);

+			sData = GetWIData(str);

+			SetDlgItemTextA(hwndDlg, IDC_IURL, sData->DefaultURL);

+			break;

+

+		case IDC_RESET2:

+			// reset the weathe map url to service default

+			GetDlgItemText(hwndDlg, IDC_ID, str, SIZEOF(str));

+			GetSvc(str);

+			sData = GetWIData(str);

+			SetDlgItemText(hwndDlg, IDC_MURL, sData->DefaultMap);

+			break;

+

+		case IDC_SVCINFO:

+			// display the information of the ini file used by the weather station

+			GetDlgItemText(hwndDlg, IDC_ID, str, SIZEOF(str));

+			GetSvc(str);

+			GetINIInfo(str);

+			break;

+

+		case IDC_CHANGE:

+			// temporary disable the protocol while applying the change

+			// start writing the new settings to database

+			GetDlgItemText(hwndDlg, IDC_ID, str, SIZEOF(str));

+			DBWriteContactSettingTString(hContact, WEATHERPROTONAME, "ID", str);

+			if ((BYTE)IsDlgButtonChecked(hwndDlg, IDC_DEFA)) {	// if default station is set

+				_tcscpy(opt.Default, str);

+				opt.DefStn = hContact;

+				DBWriteContactSettingTString(NULL, WEATHERPROTONAME, "Default", opt.Default);

+			}

+			GetDlgItemText(hwndDlg, IDC_NAME, city, SIZEOF(city));

+			DBWriteContactSettingTString(hContact, WEATHERPROTONAME, "Nick", city);

+			wsprintf(str2, TranslateT("Current weather information for %s."), city);

+			if ((BYTE)IsDlgButtonChecked(hwndDlg, IDC_External)) {

+				GetDlgItemText(hwndDlg, IDC_LOG, str, SIZEOF(str));

+				DBWriteContactSettingTString(hContact, WEATHERPROTONAME, "Log", str);

+			}

+			else DBDeleteContactSetting(hContact, WEATHERPROTONAME, "Log");

+

+			GetDlgItemText(hwndDlg, IDC_IURL, str, SIZEOF(str));

+			DBWriteContactSettingTString(hContact, WEATHERPROTONAME, "InfoURL", str);

+

+			GetDlgItemText(hwndDlg, IDC_MURL, str, SIZEOF(str));

+			DBWriteContactSettingTString(hContact, WEATHERPROTONAME, "MapURL", str);

+			DBWriteContactSettingWord(hContact, WEATHERPROTONAME, "Status", ID_STATUS_OFFLINE);

+			DBWriteContactSettingWord(hContact, WEATHERPROTONAME, "StatusIcon", ID_STATUS_OFFLINE);

+			AvatarDownloaded(hContact);

+			DBWriteContactSettingTString(hContact, WEATHERPROTONAME, "About", str2);

+			DBWriteContactSettingByte(hContact, WEATHERPROTONAME, "History", (BYTE)IsDlgButtonChecked(hwndDlg, IDC_Internal));

+			DBWriteContactSettingByte(hContact, WEATHERPROTONAME, "Overwrite", (BYTE)IsDlgButtonChecked(hwndDlg, IDC_Overwrite));

+			DBWriteContactSettingByte(hContact, WEATHERPROTONAME, "File", (BYTE)IsDlgButtonChecked(hwndDlg, IDC_External));

+			DBWriteContactSettingByte(hContact, WEATHERPROTONAME, "DPopUp", (BYTE)IsDlgButtonChecked(hwndDlg, IDC_DPop));

+			DBWriteContactSettingByte(hContact, WEATHERPROTONAME, "DAutoUpdate", (BYTE)IsDlgButtonChecked(hwndDlg, IDC_DAutoUpdate));

+

+			// re-enable the protocol and update the data for the station

+			DBWriteContactSettingString(hContact, WEATHERPROTONAME, "LastCondition", "None");

+			UpdateSingleStation((WPARAM)hContact, 0);

+

+		case IDCANCEL:		// fall through

+			// remove the dialog from window list and close it

+			DestroyWindow(hwndDlg);

+			break;

+		}

+		break;

+

+	case WM_CLOSE:

+		// remove the dialog from window list and close it

+		DestroyWindow(hwndDlg);

+		break;

+

+	case WM_DESTROY:

+		wndData = (CntSetWndDataType*)GetWindowLongPtr(hwndDlg, GWLP_USERDATA);

+		CallService(MS_SKIN2_RELEASEICON, (WPARAM)wndData->hFile, 0);

+		CallService(MS_SKIN2_RELEASEICON, (WPARAM)wndData->hRename, 0);

+		CallService(MS_SKIN2_RELEASEICON, (WPARAM)wndData->hSrchAll, 0);

+		CallService(MS_SKIN2_RELEASEICON, (WPARAM)wndData->hUserDetail, 0);

+		mir_free(wndData);

+		SetWindowLongPtr(hwndDlg, GWLP_USERDATA, 0);

+

+		WindowList_Remove(hWindowList, hwndDlg);

+		Utils_SaveWindowPosition(hwndDlg, NULL, WEATHERPROTONAME, "EditSetting_");

+		break;

+	}

+	return FALSE;

+}

+

+//============ CONTACT DELETION  ============

+

+// when a contact is deleted, make sure some other contact take over the default station

+// wParam = deleted contact

+int ContactDeleted(WPARAM wParam, LPARAM lParam) 

+{

+	if (!IsMyContact((HANDLE)wParam)) 

+		return 0; 

+

+	removeWindow((HANDLE)wParam);

+

+	// exit this function if it is not default station

+	DBVARIANT dbv;

+	if ( !DBGetContactSettingTString((HANDLE)wParam, WEATHERPROTONAME, "ID", &dbv)) {

+		if ( _tcscmp(dbv.ptszVal, opt.Default)) {

+			DBFreeVariant(&dbv);

+			return 0;

+		}

+		DBFreeVariant(&dbv);

+	}

+

+	// now the default station is deleted, try to get a new one

+

+	// start looking for other weather stations

+	HANDLE hContact = db_find_first();

+	while(hContact) {

+		if (IsMyContact(hContact)) {

+			if (!DBGetContactSettingTString(hContact, WEATHERPROTONAME, "ID", &dbv)) {

+				// if the station is not a default station, set it as the new default station

+				// this is the first weather station encountered from the search

+				if ( _tcscmp(opt.Default, dbv.ptszVal)) {

+					_tcscpy(opt.Default, dbv.ptszVal);

+					opt.DefStn = hContact;

+					DBFreeVariant(&dbv);

+					if (!DBGetContactSettingTString(hContact, WEATHERPROTONAME, "Nick", &dbv)) {

+						TCHAR str[255];

+						mir_sntprintf(str, SIZEOF(str), TranslateT("%s is now the default weather station"), dbv.ptszVal);

+						DBFreeVariant(&dbv);

+						MessageBox(NULL, str, TranslateT("Weather Protocol"), MB_OK | MB_ICONINFORMATION);

+					}

+					DBWriteContactSettingTString(NULL, WEATHERPROTONAME, "Default", opt.Default);

+					return 0;		// exit this function quickly

+				}

+				DBFreeVariant(&dbv);

+			}

+		}

+		hContact = db_find_next(hContact);

+	}

+	// got here if no more weather station left

+	opt.Default[0] = 0;	// no default station

+	opt.DefStn = NULL;

+	DBWriteContactSettingTString(NULL, WEATHERPROTONAME, "Default", opt.Default);

+	return 0;

+}

+

+BOOL IsMyContact(HANDLE hContact)

+{

+	const char* szProto = (char*)CallService(MS_PROTO_GETCONTACTBASEPROTO, (WPARAM)hContact, 0);

+	return szProto != NULL && strcmp(WEATHERPROTONAME, szProto) == 0;

+}