UserInfoEx, Variables: changed folder structure

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

1 files changed, 0 insertions, 798 deletions

diff --git a/plugins/UserInfoEx/svc_contactinfo.cpp b/plugins/UserInfoEx/svc_contactinfo.cpp
deleted file mode 100644
index 6a54880e67..0000000000
--- a/plugins/UserInfoEx/svc_contactinfo.cpp
+++ /dev/null
@@ -1,798 +0,0 @@
-/*

-UserinfoEx plugin for Miranda IM

-

-Copyright:

-� 2006-2010 DeathAxe, Yasnovidyashii, Merlin, K. Romanov, Kreol

-

-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.

-

-===============================================================================

-

-File name      : $HeadURL: https://userinfoex.googlecode.com/svn/trunk/svc_contactinfo.cpp $

-Revision       : $Revision: 203 $

-Last change on : $Date: 2010-09-26 18:21:04 +0400 (Вс, 26 сен 2010) $

-Last change by : $Author: ing.u.horn $

-

-===============================================================================

-*/

-

-/**

- * System Includes:

- **/

-#include "commonheaders.h"

-#include "m_contacts.h"

-#include "svc_timezone.h"

-#include "svc_timezone_old.h"

-#include "svc_contactinfo.h"

-#include "svc_gender.h"

-#include "Flags\svc_countrylistext.h"

-

-#define	CI_TCHAR(ci)	(((ci)->dwFlag & CNF_UNICODE) ? DBVT_WCHAR : DBVT_ASCIIZ)

-

-#define NAMEORDERCOUNT 8

-static BYTE gNameOrder[NAMEORDERCOUNT];	// name order as set up for contact list

-

-/**

- * This function translates the DBVARIANT structure to an CONTACTINFO structure

- * and keeps the original data type.

- *

- * @warning	ci MUST NOT be NULL and dbv must be freed by caller on failure!

- *					

- * @param	dbv			- DBVARIANT to take the data for translation from

- * @param	ci			- CONTACTINFO structure to translate to

- *

- * @retval	0			- success

- * @retval	1			- failure

- **/

-static FORCEINLINE INT_PTR VarToVarCI(const DBVARIANT *dbv, CONTACTINFO *ci)

-{

-	switch (dbv->type) {

-	case DBVT_ASCIIZ:

-	case DBVT_WCHAR:	{

-			// string translation is to be done by caller!!!

-			ci->pszVal = dbv->ptszVal;

-			ci->type = (ci->pszVal != NULL) ? CNFT_ASCIIZ : 0;

-		} break;

-

-	case DBVT_BYTE:		{

-			ci->type = CNFT_BYTE;

-			ci->bVal = dbv->bVal;

-		} break;

-

-	case DBVT_WORD:		{

-			ci->type = CNFT_WORD;

-			ci->wVal = dbv->wVal;

-		} break;

-

-	case DBVT_DWORD:	{

-			ci->type = CNFT_DWORD;

-			ci->dVal = dbv->dVal;

-		} break;

-

-	default:			{

-			ci->type = 0;

-		}

-	}

-	return ci->type == 0;

-}

-

-/**

- * This function tries to read a setting from the contact's protocol module.

- *

- * @warning	ci MUST NOT be NULL!

- *

- * @param	ci			- pointer to a CONTACTINFO structure holding information about the contact

- * @param	pszSetting	- the desired setting to read

- *

- * @retval	0 - if setting was found and read correctly

- * @retval	1 - if any error occured or setting was not found

- **/

-static FORCEINLINE INT_PTR GCIVar(CONTACTINFO *ci, LPCSTR pszSetting)

-{

-	DBVARIANT dbv;

-	

-	if (DB::Setting::Get(ci->hContact, ci->szProto, pszSetting, &dbv, CI_TCHAR(ci)) == 0) {

-		if (VarToVarCI(&dbv, ci)) {

-			// On a error, we need to make sure, read data is cleared out!

-			DB::Variant::Free(&dbv);

-		}

-	}

-	else {

-		ci->type = 0;

-	}

-	return ci->type == 0;

-}

-

-/**

- * This function tries to read a setting from a certain module (e.g. USERINFO) and if failed it 

- * tries once again with the baseprotocol of the contact (e.g. ICQ). If nothing was found anyway

- * and this is an metacontact it can have a look into subcontacts to retrieve the information.

- * This depends on the settings the user did.

- *

- * @warning	ci MUST NOT be NULL!

- *

- * @param	ci			- pointer to a CONTACTINFO structure holding information about the contact

- * @param	pszSetting	- the desired setting to read

- *

- * @retval	0 - if setting was found and read correctly

- * @retval	1 - if any error occured or setting was not found

- **/

-static FORCEINLINE INT_PTR GCIVarEx(CONTACTINFO *ci, LPCSTR pszSetting)

-{

-	DBVARIANT dbv;

-

-	if (DB::Setting::GetEx(ci->hContact, USERINFO, ci->szProto, pszSetting, &dbv, CI_TCHAR(ci)) == 0) {

-		if (VarToVarCI(&dbv, ci)) {

-			// On a error, we need to make sure, read data is cleared out!

-			DB::Variant::Free(&dbv);

-		}

-	}

-	else {

-		ci->type = 0;

-	}

-	return ci->type == 0;

-}

-

-/**

- * This function tries to read a Language from a certain module (e.g. USERINFO) and if failed it 

- * tries once again with the baseprotocol of the contact (e.g. ICQ). If nothing was found anyway

- * and this is an metacontact it can have a look into subcontacts to retrieve the information.

- * This depends on the settings the user did.

- *

- * @warning	ci MUST NOT be NULL!

- *

- * @param	ci			- pointer to a CONTACTINFO structure holding information about the contact

- * @param	pszSetting	- the desired setting to read

- *

- * @retval	0 - if setting was found and read correctly

- * @retval	1 - if any error occured or setting was not found

- **/

-static FORCEINLINE INT_PTR GCILangEx(CONTACTINFO *ci, LPCSTR pszSetting)

-{

-	if (0 == GCIVarEx(ci, pszSetting)) {

-		if(ci->type!= CNFT_ASCIIZ) {

-			//lang was safed in database as code

-			LPIDSTRLIST pList;

-			UINT nList, i, res = 0;

-			switch (ci->type) {

-				case CNFT_BYTE:		res = ci->bVal;	break;

-				case CNFT_WORD:		res = ci->wVal;	break;

-				case CNFT_DWORD:	res = ci->dVal;	break;

-				default:			return 1;

-			}

-			GetLanguageList(&nList, &pList);

-			for(i = 0; i<nList; i++) {

-				if(pList[i].nID == res)	{

-					//use untranslate string (pszText member)

-					ci->pszVal = (ci->dwFlag & CNF_UNICODE)

-								? (LPTSTR) mir_a2u(pList[i].pszText)

-								: (LPTSTR) mir_strdup(pList[i].pszText);

-					ci->type = (ci->pszVal != NULL) ? CNFT_ASCIIZ : 0;

-					return 0;

-				}

-			} /*end for*/

-			ci->type	= 0;

-			ci->pszVal	= NULL;

-		}

-	}

-	else {

-		ci->type = 0;

-	}

-	return ci->type == 0;

-}

-

-/**

- * This function read a setting from the baseprotocol of the contact (e.g. ICQ). 

- *

- * @warning	ci MUST NOT be NULL!

- *

- * @param	ci			- pointer to a CONTACTINFO structure holding information about the contact

- * @param	pszSetting	- the desired setting to read

- *

- * @retval	0 - if setting was found and read correctly

- * @retval	1 - if any error occured or setting was not found

- **/

-static FORCEINLINE INT_PTR GCIStr(CONTACTINFO *ci, LPCSTR pszSetting)

-{

-	const BYTE type = CI_TCHAR(ci);

-	DBVARIANT dbv;

-	

-	if (DB::Setting::Get(ci->hContact, ci->szProto, pszSetting, &dbv, type) == 0) {

-		if (DB::Variant::dbv2String(&dbv, type) == 0) {

-			ci->pszVal = dbv.ptszVal;

-		}

-		else {

-			DB::Variant::Free(&dbv);

-			ci->pszVal = NULL;

-		}

-	}

-	else {

-		ci->pszVal = NULL;

-	}

-	ci->type = (ci->pszVal) ? CNFT_ASCIIZ : 0;

-	return ci->type == 0;

-}

-

-/**

- * Format the full name for the contact.

- *

- * @params	ci			- CONTACTINFO structure

- *

- * @retval	0 - if setting was found and read correctly

- * @retval	1 - if any error occured or setting was not found

- **/

-static FORCEINLINE INT_PTR GCIFirstLast(CONTACTINFO *ci)

-{

-	DBVARIANT dbvf, dbvl;

-	size_t cbf, cbl;

-

-	BYTE type = CI_TCHAR(ci);

-

-	if (DB::Setting::GetEx(ci->hContact, USERINFO, ci->szProto, SET_CONTACT_FIRSTNAME, &dbvf, type))

-	{

-		dbvf.type = DBVT_DELETED;

-	}

-	if (DB::Setting::GetEx(ci->hContact, USERINFO, ci->szProto, SET_CONTACT_LASTNAME, &dbvl, type))

-	{

-		dbvl.type = DBVT_DELETED;

-	}

-

-	if (type == DBVT_WCHAR)

-	{

-		// both firstname and lastname are valid

-		if (dbvf.type == DBVT_WCHAR && dbvl.type == DBVT_WCHAR)

-		{

-			cbf = mir_wcslen(dbvf.pwszVal);

-			cbl = mir_wcslen(dbvl.pwszVal);

-

-			ci->pszVal = (LPTSTR) mir_alloc((cbf + cbl + 2) * sizeof(WCHAR));

-			if (ci->pszVal)

-			{

-				mir_snwprintf((LPWSTR) ci->pszVal, cbf + cbl + 2, L"%s %s", dbvf.pwszVal, dbvl.pwszVal);

-			}

-			DB::Variant::Free(&dbvf);

-			DB::Variant::Free(&dbvl);

-		}

-		// set firstname as result

-		else if (dbvf.type == DBVT_WCHAR)

-		{

-			ci->pszVal = (LPTSTR) dbvf.pwszVal;

-			DB::Variant::Free(&dbvl);

-		}

-		// set lastname as result

-		else if (dbvl.type == DBVT_WCHAR)

-		{

-			ci->pszVal = (LPTSTR) dbvl.pwszVal;

-			DB::Variant::Free(&dbvf);

-		}

-		else

-		{

-			ci->pszVal = NULL;

-			DB::Variant::Free(&dbvf);

-			DB::Variant::Free(&dbvl);

-		}

-	}

-	else

-	{

-		// both firstname and lastname are valid

-		if (dbvf.type == DBVT_ASCIIZ && dbvl.type == DBVT_ASCIIZ)

-		{

-			cbf = mir_strlen(dbvf.pszVal);

-			cbl = mir_strlen(dbvl.pszVal);

-

-			ci->pszVal = (LPTSTR) mir_alloc((cbf + cbl + 2) * sizeof(CHAR));

-			if (ci->pszVal)

-			{

-				mir_snprintf((LPSTR) ci->pszVal, cbf + cbl + 2, "%s %s", dbvf.pszVal, dbvl.pszVal);

-			}

-			DB::Variant::Free(&dbvf);

-			DB::Variant::Free(&dbvl);

-		}

-		// set firstname as result

-		else if (dbvf.type == DBVT_ASCIIZ)

-		{

-			ci->pszVal = (LPTSTR) dbvf.pszVal;

-			DB::Variant::Free(&dbvl);

-		}

-		// set lastname as result

-		else if (dbvl.type == DBVT_ASCIIZ)

-		{

-			ci->pszVal = (LPTSTR) dbvl.pszVal;

-			DB::Variant::Free(&dbvf);

-		}

-		else

-		{

-			ci->pszVal = NULL;

-			DB::Variant::Free(&dbvf);

-			DB::Variant::Free(&dbvl);

-		}

-	}

-	ci->type = (ci->pszVal != NULL) ? CNFT_ASCIIZ : 0;

-	return ci->type == 0;

-}

-

-/**

- * return the country name

- *

- * @param	ci			- pointer to a CONTACTINFO structure holding information about the contact

- * @param	pszSetting	- the desired setting to read the countrys id from

- *

- * @retval	0 - if setting was found and read correctly

- * @retval	1 - if any error occured or setting was not found

- **/

-static FORCEINLINE INT_PTR GCICountry(CONTACTINFO *ci, LPCSTR pszSetting)

-{

-	if (0 == GCIVarEx(ci, pszSetting)) {

-		if (ci->type != CNFT_ASCIIZ) {

-			// country id was safed in database as code

-			UINT res = 0;

-			switch (ci->type) {

-				case CNFT_WORD:		res = ci->wVal;	break;

-				case CNFT_DWORD:	res = ci->dVal;	break;

-				default:			return 1;

-			}

-

-//			LPSTR szCountry = res ? (LPSTR)CallService(MS_UTILS_GETCOUNTRYBYNUMBER, res, 0) : NULL;

-			LPSTR szCountry = res ? (LPSTR)ServiceGetCountryByNumber(res, 0) : NULL;

-			if (szCountry) {

-				ci->pszVal = (ci->dwFlag & CNF_UNICODE) 

-							 ? (LPTSTR) mir_a2u(szCountry) 

-							 : (LPTSTR) mir_strdup(szCountry);

-			}

-			else {

-				ci->pszVal = NULL;

-			}

-			ci->type = (ci->pszVal != NULL) ? CNFT_ASCIIZ : 0;

-		}

-	}

-	else {

-		ci->type = 0;

-	}

-	return ci->type == 0;

-}

-

-/**

- * This is the service procedure to retrieve contact information

- *

- * @param	wParam		- not used

- * @param	lParam		- pointer to a CONTACTINFO structure which tells what information is desired

- *

- * @retval	0 - if contact information was found and read correctly 

- * @retval	1 - if any error occured or setting was not found

- **/

-INT_PTR GetContactInfo(WPARAM wParam, LPARAM lParam) 

-{

-	CONTACTINFO *ci = (CONTACTINFO*) lParam;

-	INT_PTR result;

-

-	if (ci && ci->cbSize == sizeof(CONTACTINFO) && (ci->szProto != NULL || (ci->szProto = DB::Contact::Proto(ci->hContact)) != NULL))

-	{

-		switch (ci->dwFlag & 0x7F) {

-

-		//

-		// contact name

-		//

-		case CNF_FIRSTNAME:		{

-				result = GCIVarEx(ci, SET_CONTACT_FIRSTNAME);

-			} break;

-

-		case CNF_LASTNAME:		{

-				result = GCIVarEx(ci, SET_CONTACT_LASTNAME);

-			} break;

-

-		case CNF_FIRSTLAST:		{

-				result = GCIVarEx(ci, SET_CONTACT_FIRSTLASTNAME);	//first try to read "FullName"

-				if(result) result = GCIFirstLast(ci);				//fallback to "FirstName" + "LastName"

-			} break;

-

-		case CNF_NICK:			{

-				result = GCIVarEx(ci, SET_CONTACT_NICK);

-			} break;

-

-		case CNF_CUSTOMNICK:	{

-				LPSTR s = ci->szProto;

-				ci->szProto = MOD_CLIST;

-				result = GCIVar(ci, SET_CONTACT_MYHANDLE);

-				ci->szProto = s;

-			} break;

-

-		case CNF_LANGUAGE1:			{

-				result = GCILangEx(ci, SET_CONTACT_LANG1);

-			} break;

-

-		case CNF_LANGUAGE2:			{

-				result = GCILangEx(ci, SET_CONTACT_LANG2);

-			} break;

-

-		case CNF_LANGUAGE3:			{

-				result = GCILangEx(ci, SET_CONTACT_LANG3);

-			} break;

-

-		//

-		// private contact

-		//

-		case CNF_STREET:		{

-				result = GCIVarEx(ci, SET_CONTACT_STREET);

-			} break;

-

-		case CNF_ZIP:			{

-				result = GCIVarEx(ci, SET_CONTACT_ZIP); 

-			} break;

-

-		case CNF_CITY:			{

-				result = GCIVarEx(ci, SET_CONTACT_CITY);

-			} break;

-

-		case CNF_STATE:			{

-				result = GCIVarEx(ci, SET_CONTACT_STATE);

-			} break;

-

-		case CNF_COUNTRY:		{

-				result = GCICountry(ci, SET_CONTACT_COUNTRY);

-			} break;

-

-		case CNF_PHONE:			{

-				result = GCIVarEx(ci, SET_CONTACT_PHONE);

-			} break;

-

-		case CNF_FAX:			{

-				result = GCIVarEx(ci, SET_CONTACT_FAX);

-			} break;

-

-		case CNF_CELLULAR:		{

-				result = GCIVarEx(ci, SET_CONTACT_CELLULAR);

-			} break;

-

-		case CNF_EMAIL:			{

-				result = GCIVarEx(ci, SET_CONTACT_EMAIL);

-			} break;

-

-		case CNF_HOMEPAGE:		{

-				result = GCIVarEx(ci, SET_CONTACT_HOMEPAGE);

-			} break;

-

-		//

-		// company information

-		//

-		case CNF_CONAME:		{

-				result = GCIVarEx(ci, SET_CONTACT_COMPANY);

-			} break;

-

-		case CNF_CODEPT:		{

-				result = GCIVarEx(ci, SET_CONTACT_COMPANY_DEPARTMENT);

-			} break;

-

-		case CNF_COPOSITION:	{

-				result = GCIVarEx(ci, SET_CONTACT_COMPANY_POSITION);

-			} break;

-

-		case CNF_COSTREET:		{

-				result = GCIVarEx(ci, SET_CONTACT_COMPANY_STREET);

-			} break;

-

-		case CNF_COZIP:			{

-				result = GCIVarEx(ci, SET_CONTACT_COMPANY_ZIP);

-			} break;

-

-		case CNF_COCITY:		{

-				result = GCIVarEx(ci, SET_CONTACT_COMPANY_CITY);

-			} break;

-

-		case CNF_COSTATE:		{

-				result = GCIVarEx(ci, SET_CONTACT_COMPANY_STATE);

-			} break;

-

-		case CNF_COCOUNTRY:		{

-				result = GCICountry(ci, SET_CONTACT_COMPANY_COUNTRY);

-			} break;

-

-		case CNF_COPHONE:		{

-				result = GCIVarEx(ci, SET_CONTACT_COMPANY_PHONE);

-			} break;

-

-		case CNF_COFAX:			{

-				result = GCIVarEx(ci, SET_CONTACT_COMPANY_FAX);

-			} break;

-

-		case CNF_COCELLULAR:	{

-				result = GCIVarEx(ci, SET_CONTACT_COMPANY_CELLULAR);

-			} break;

-

-		case CNF_COEMAIL:		{

-				result = GCIVarEx(ci, SET_CONTACT_COMPANY_EMAIL);

-			} break;

-

-		case CNF_COHOMEPAGE:	{

-				result = GCIVarEx(ci, SET_CONTACT_COMPANY_HOMEPAGE);

-			} break;

-

-		//

-		// personal information

-		//

-		case CNF_ABOUT:			{

-				result = GCIVarEx(ci, SET_CONTACT_ABOUT);

-			} break;

-

-		case CNF_MYNOTES:		{

-				result = GCIVarEx(ci, SET_CONTACT_MYNOTES);

-			} break;

-

-		case CNF_AGE:			{

-				result = GCIVarEx(ci, SET_CONTACT_AGE);

-			} break;	  // returns age (byte, 0==unspecified) ??

-

-		case CNF_GENDER:		{

-				ci->bVal = GenderOf(ci->hContact, ci->szProto);

-				ci->type = (ci->bVal != 0) ? CNFT_BYTE : 0;

-				result = ci->type == 0;

-			} break;

-

-		case CNF_BIRTHDAY:		{

-				MAnnivDate mda;

-				result = mda.DBGetBirthDate(ci->hContact, ci->szProto);

-				if (result == 0) {

-					ci->bVal = (BYTE) mda.Day();

-					ci->type = CNFT_BYTE;

-				}

-			} break;

-

-		case CNF_BIRTHMONTH:	{

-				MAnnivDate mda;

-				result = mda.DBGetBirthDate(ci->hContact, ci->szProto);

-				if (result == 0) {

-					ci->bVal = (BYTE) mda.Month();

-					ci->type = CNFT_BYTE;

-				}

-			} break;

-

-		case CNF_BIRTHYEAR:		{

-				MAnnivDate mda;

-				result = mda.DBGetBirthDate(ci->hContact, ci->szProto);

-				if (result == 0) {

-					ci->wVal = (WORD) mda.Year();

-					ci->type = CNFT_WORD;

-				}

-			} break;

-

-		case CNF_BIRTHDATE:		{

-				MAnnivDate mda;

-				result = mda.DBGetBirthDate(ci->hContact, ci->szProto);

-				if (result == 0) {

-					SYSTEMTIME st = mda.SystemTime();

-					ci->pszVal = NULL;

-					if (ci->dwFlag & CNF_UNICODE) {

-						WCHAR wszDate[80];

-						if (GetDateFormatW(LOCALE_USER_DEFAULT, wParam == 1 ? DATE_LONGDATE : DATE_SHORTDATE, &st, NULL, wszDate, SIZEOF(wszDate))) {

-							ci->pszVal = (LPTSTR)mir_wcsdup(wszDate);

-						}

-					}

-					else {

-						CHAR szDate[80];

-						if (GetDateFormatA(LOCALE_USER_DEFAULT, wParam == 1 ? DATE_LONGDATE : DATE_SHORTDATE, &st, NULL, szDate, SIZEOF(szDate))) {

-							ci->pszVal = (LPTSTR)mir_strdup(szDate);

-						}

-					}

-					ci->type = (ci->pszVal != NULL) ? CNFT_ASCIIZ : 0;

-					result = ci->type == 0;

-				}

-			} break;

-

-		case CNF_TIMEZONE:		{

-				//use new core tz interface

-				if(tmi.prepareList) {

-					HANDLE hTz = tmi.createByContact(ci->hContact, TZF_KNOWNONLY);

-					if (hTz) {

-						LPTIME_ZONE_INFORMATION tzi = tmi.getTzi(hTz);

-						int offset = tzi->Bias + tzi->StandardBias;

-

-						char str[80];

-						mir_snprintf(str, SIZEOF(str), offset ? "UTC%+d:%02d" : "UTC", offset / -60, abs(offset % 60));

-						ci->pszVal =	ci->dwFlag & CNF_UNICODE

-										? (TCHAR*)mir_a2u(str) 

-										: (TCHAR*)mir_strdup(str);

-						ci->type = CNFT_ASCIIZ;

-						return 0;

-					}

-					else {

-						ci->pszVal = NULL;

-					}

-				}

-				//fallback use old UIEX method

-				else {

-					CTimeZone* ptz = GetContactTimeZone(ci->hContact, ci->szProto);

-					if (ptz) {

-						if (ci->dwFlag & CNF_UNICODE) {

-							ci->pszVal = (LPTSTR) mir_t2u(ptz->ptszDisplay);

-						}

-						else {

-							ci->pszVal = (LPTSTR) mir_t2a(ptz->ptszDisplay);

-						}

-					}

-					else {

-						/* If a timezone does not exist in CTzMgr, it is a invalid timezone,

-						because Windows and CTzMgr know all existing timezones and it

-						would not be shown anywhere anyway as UserInfoEx displays only 

-						known windows timezones in the details dialog!

-						*/

-						ci->pszVal = NULL;

-					}

-				}

-				ci->type = (ci->pszVal != NULL) ? CNFT_ASCIIZ : 0;

-				result = ci->type == 0;

-			} break;

-

-		//

-		// information about IM specific stuff

-		//

-		case CNF_UNIQUEID:		{

-				// protocol must define a PFLAG_UNIQUEIDSETTING

-				result = CallProtoService(ci->szProto, PS_GETCAPS, PFLAG_UNIQUEIDSETTING, 0);

-				if (result != CALLSERVICE_NOTFOUND && result != NULL) {

-					result = GCIVar(ci, (LPCSTR) result);

-				}

-			} break;

-

-		case CNF_DISPLAYUID:	{

-				if (!GCIVar(ci, "display_uid"))

-					result=0;

-				else {

-					result = CallProtoService(ci->szProto,PS_GETCAPS,PFLAG_UNIQUEIDSETTING,0);

-					if (result != CALLSERVICE_NOTFOUND && result != NULL) {

-						result = GCIVar(ci, (LPCSTR) result);

-					}

-				}

-			} break;

-

-		case CNF_DISPLAYNC:

-		case CNF_DISPLAY:		{

-				INT i;

-				for (i = 0; i < NAMEORDERCOUNT; i++) {

-					switch (gNameOrder[i]) {

-					case 0: // custom name

-						{

-							// make sure we aren't in CNF_DISPLAYNC mode

-							// don't get custom name for NULL contact

-							if (ci->hContact != NULL && (ci->dwFlag & 0x7F) == CNF_DISPLAY) {

-								BYTE dwFlag = ci->dwFlag;

-								ci->dwFlag = (ci->dwFlag & CNF_UNICODE) | CNF_CUSTOMNICK;

-								if (!GetContactInfo(NULL, (LPARAM)ci)) {

-									ci->dwFlag = dwFlag;

-									return 0;

-								}

-								ci->dwFlag = dwFlag;

-							}

-						} break;

-					case 1: // nick

-						{

-							if (!GCIVarEx(ci, SET_CONTACT_NICK))

-								return 0;

-						} break;

-					case 2: // First Name

-						{

-							if (!GCIVarEx(ci, SET_CONTACT_FIRSTNAME))

-								return 0;

-						} break;

-					case 3: // E-mail

-						{

-							if (!GCIVarEx(ci, SET_CONTACT_EMAIL))

-								return 0;

-						} break;

-					case 4: // Last Name

-						{

-							if (!GCIVarEx(ci, SET_CONTACT_LASTNAME))

-								return 0;

-						} break;

-					case 5: // Unique id

-						{

-							// protocol must define a PFLAG_UNIQUEIDSETTING

-							result = CallProtoService(ci->szProto, PS_GETCAPS, PFLAG_UNIQUEIDSETTING, 0);

-							if (result != CALLSERVICE_NOTFOUND && result != NULL) {

-								if (!GCIStr(ci, (LPCSTR) result))

-									return 0;

-							}

-						} break;

-					case 6: // first + last name

-						{

-							if (!GCIFirstLast(ci))

-								return 0;

-						} break;

-					default: // unknown contact

-						{

-							if (ci->dwFlag & CNF_UNICODE) {

-								ci->pszVal = (LPTSTR) mir_wcsdup(TranslateW(L"'(Unknown Contact)'"));

-							}

-							else {

-								ci->pszVal = (LPTSTR) mir_strdup(Translate("'(Unknown Contact)'"));

-							}

-							ci->type = (ci->pszVal != NULL) ? CNFT_ASCIIZ : 0;

-							return ci->type == 0;

-						}

-					}

-				}

-			}

-

-		default:				{

-				result = 1;

-			}

-		}

-	}

-	else

-	{

-		result = 1;

-	}

-	return result;

-}

-

-/**

- * This is the implementation of the MS_DB_CONTACT_GETSETTING_STR_EX service.

- *

- * @param	wParam		- handle of the contact a setting was written for (must be NULL in this case)

- * @param	lParam		- DBCONTACTGETSETTING structure holding information about the setting to read

- *

- * @retval	0 - success

- * @retval	1 - error

- **/

-static INT_PTR GetContactSettingStrExService(WPARAM wParam, LPARAM lParam)

-{

-	DBCONTACTGETSETTING *cgs = (DBCONTACTGETSETTING*)lParam;

-	return DB::Setting::GetEx((HANDLE)wParam, USERINFO, 

-		cgs->szModule, cgs->szSetting, cgs->pValue, cgs->pValue->type);

-}

-

-/**

- * If the user changes the name order update the global value.

- *

- * @param	wParam		- handle of the contact a setting was written for (must be NULL in this case)

- * @param	lParam		- DBCONTACTWRITESETTING structure holding information about the written data

- * @return	0

- **/

-static INT OnSettingChanged(WPARAM wParam, LPARAM lParam)

-{

-	if ((HANDLE)wParam == NULL) {

-		DBCONTACTWRITESETTING *pdbcws = (DBCONTACTWRITESETTING*) lParam;

-		if (!mir_strcmp(pdbcws->szModule, "Contact") &&

-			!mir_strcmp(pdbcws->szSetting, "NameOrder"))

-		{

-			memcpy(gNameOrder, pdbcws->value.pbVal,pdbcws->value.cpbVal);

-		}

-	}

-	return 0;

-}

-

-/**

- * Loads the module at startup and replaces the service.

- *

- * @param	none

- * @return	nothing

- **/

-VOID SvcContactInfoLoadModule()

-{

-	CreateServiceFunction(MS_DB_CONTACT_GETSETTING_STR_EX, GetContactSettingStrExService);

-	CreateServiceFunction(MS_CONTACT_GETCONTACTINFO, GetContactInfo);

-

-	DBVARIANT dbv;

-	if (DB::Setting::GetAString(NULL, "Contact", "NameOrder", &dbv)) {

-		BYTE i;

-		for (i = 0; i < NAMEORDERCOUNT; i++) {

-			gNameOrder[i] = i;

-		}

-	}

-	else {

-		memcpy(gNameOrder, dbv.pbVal, dbv.cpbVal);

-		DB::Variant::Free(&dbv);

-	}

-

-	HookEvent(ME_DB_CONTACT_SETTINGCHANGED, OnSettingChanged);

-}