files renaming

compilation fix

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

1 files changed, 0 insertions, 615 deletions

diff --git a/protocols/Tlen/src/jabber_iqid.cpp b/protocols/Tlen/src/jabber_iqid.cpp
deleted file mode 100644
index 3a6cb87ec5..0000000000
--- a/protocols/Tlen/src/jabber_iqid.cpp
+++ /dev/null
@@ -1,615 +0,0 @@
-/*

-

-Jabber Protocol Plugin for Miranda IM

-Tlen Protocol Plugin for Miranda NG

-Copyright (C) 2002-2004  Santithorn Bunchua

-Copyright (C) 2004-2007  Piotr Piastucki

-

-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 "jabber.h"

-#include "resource.h"

-#include "jabber_list.h"

-#include "jabber_iq.h"

-#include "tlen_muc.h"

-

-void JabberIqResultAuth(TlenProtocol *proto, XmlNode *iqNode)

-{

-	char *type;

-

-	// RECVED: authentication result

-	// ACTION: if successfully logged in, continue by requesting roster list and set my initial status

-	if ((type=JabberXmlGetAttrValue(iqNode, "type")) == NULL) return;

-

-	if (!strcmp(type, "result")) {

-		DBVARIANT dbv;

-

-		if (db_get(NULL, proto->m_szModuleName, "Nick", &dbv))

-			db_set_s(NULL, proto->m_szModuleName, "Nick", proto->threadData->username);

-		else

-			db_free(&dbv);

-//		iqId = JabberSerialNext();

-//		JabberIqAdd(iqId, IQ_PROC_NONE, JabberIqResultGetRoster);

-//		JabberSend(info, "<iq type='get' id='"JABBER_IQID"%d'><query xmlns='jabber:iq:roster'/></iq>", iqId);

-

-		JabberSend(proto, "<iq type='get' id='GetRoster'><query xmlns='jabber:iq:roster'/></iq>");

-		JabberSend(proto, "<iq to='tcfg' type='get' id='TcfgGetAfterLoggedIn'></iq>");

-	}

-	// What to do if password error? etc...

-	else if (!strcmp(type, "error")) {

-		char text[128];

-

-		JabberSend(proto, "</s>");

-		mir_snprintf(text, sizeof(text), "%s %s@%s.", TranslateT("Authentication failed for"), proto->threadData->username, proto->threadData->server);

-		MessageBoxA(NULL, text, Translate("Tlen Authentication"), MB_OK|MB_ICONSTOP|MB_SETFOREGROUND);

-		ProtoBroadcastAck(proto->m_szModuleName, NULL, ACKTYPE_LOGIN, ACKRESULT_FAILED, NULL, LOGINERR_WRONGPASSWORD);

-		proto->threadData = NULL;	// To disallow auto reconnect

-	}

-}

-

-void JabberResultSetRoster(TlenProtocol *proto, XmlNode *queryNode) {

-	DBVARIANT dbv;

-	XmlNode *itemNode, *groupNode;

-	JABBER_LIST_ITEM *item;

-	HANDLE hContact;

-	char *jid, *name, *nick;

-	int i;

-	char *str;

-

-	for (i=0; i<queryNode->numChild; i++) {

-		itemNode = queryNode->child[i];

-		if (!strcmp(itemNode->name, "item")) {

-			if ((jid=JabberXmlGetAttrValue(itemNode, "jid")) != NULL) {

-				str = JabberXmlGetAttrValue(itemNode, "subscription");

-				if (!strcmp(str, "remove")) {

-					if ((hContact=JabberHContactFromJID(proto, jid)) != NULL) {

-						if (db_get_w(hContact, proto->m_szModuleName, "Status", ID_STATUS_OFFLINE) != ID_STATUS_OFFLINE)

-							db_set_w(hContact, proto->m_szModuleName, "Status", ID_STATUS_OFFLINE);

-					}

-					JabberListRemove(proto, LIST_ROSTER, jid);

-				} else {

-					item = JabberListAdd(proto, LIST_ROSTER, jid);

-					if (item != NULL) {

-						if (str == NULL) item->subscription = SUB_NONE;

-						else if (!strcmp(str, "both")) item->subscription = SUB_BOTH;

-						else if (!strcmp(str, "to")) item->subscription = SUB_TO;

-						else if (!strcmp(str, "from")) item->subscription = SUB_FROM;

-						else item->subscription = SUB_NONE;

-						if ((name=JabberXmlGetAttrValue(itemNode, "name")) != NULL) {

-							nick = JabberTextDecode(name);

-						} else {

-							nick = JabberLocalNickFromJID(jid);

-						}

-						if (nick != NULL) {

-							if (item->nick) mir_free(item->nick);

-							item->nick = nick;

-

-							if ((hContact=JabberHContactFromJID(proto, jid)) == NULL) {

-								// Received roster has a new JID.

-								// Add the jid (with empty resource) to Miranda contact list.

-								hContact = JabberDBCreateContact(proto, jid, nick, FALSE);

-							}

-							db_set_s(hContact, "CList", "MyHandle", nick);

-							if (item->group) mir_free(item->group);

-							if ((groupNode=JabberXmlGetChild(itemNode, "group")) != NULL && groupNode->text != NULL) {

-								item->group = TlenGroupDecode(groupNode->text);

-								JabberContactListCreateGroup(item->group);

-								// Don't set group again if already correct, or Miranda may show wrong group count in some case

-								if (!db_get(hContact, "CList", "Group", &dbv)) {

-									if (strcmp(dbv.pszVal, item->group))

-										db_set_s(hContact, "CList", "Group", item->group);

-									db_free(&dbv);

-								} else

-									db_set_s(hContact, "CList", "Group", item->group);

-							} else {

-								item->group = NULL;

-								db_unset(hContact, "CList", "Group");

-							}

-						}

-					}

-				}

-			}

-		}

-	}

-}

-

-void JabberIqResultRoster(TlenProtocol *proto, XmlNode *iqNode)

-{

-	XmlNode *queryNode;

-	char *type;

-	char *str;

-

-	// RECVED: roster information

-	// ACTION: populate LIST_ROSTER and create contact for any new rosters

-	if ((type=JabberXmlGetAttrValue(iqNode, "type")) == NULL) return;

-	if ((queryNode=JabberXmlGetChild(iqNode, "query")) == NULL) return;

-

-	if (!strcmp(type, "result")) {

-		str = JabberXmlGetAttrValue(queryNode, "xmlns");

-		if (str != NULL && !strcmp(str, "jabber:iq:roster")) {

-			DBVARIANT dbv;

-			XmlNode *itemNode, *groupNode;

-			JABBER_SUBSCRIPTION sub;

-			JABBER_LIST_ITEM *item;

-			char *jid, *name, *nick;

-			int i, oldStatus;

-

-			for (i=0; i<queryNode->numChild; i++) {

-				itemNode = queryNode->child[i];

-				if (!strcmp(itemNode->name, "item")) {

-					str = JabberXmlGetAttrValue(itemNode, "subscription");

-					if (str == NULL) sub = SUB_NONE;

-					else if (!strcmp(str, "both")) sub = SUB_BOTH;

-					else if (!strcmp(str, "to")) sub = SUB_TO;

-					else if (!strcmp(str, "from")) sub = SUB_FROM;

-					else sub = SUB_NONE;

-					//if (str != NULL && (!strcmp(str, "to") || !strcmp(str, "both"))) {

-					if ((jid=JabberXmlGetAttrValue(itemNode, "jid")) != NULL) {

-						if ((name=JabberXmlGetAttrValue(itemNode, "name")) != NULL)

-							nick = JabberTextDecode(name);

-						else

-							nick = JabberLocalNickFromJID(jid);

-						

-						if (nick != NULL) {

-							HANDLE hContact;

-							item = JabberListAdd(proto, LIST_ROSTER, jid);

-							if (item->nick) mir_free(item->nick);

-							item->nick = nick;

-							item->subscription = sub;

-							if ((hContact=JabberHContactFromJID(proto, jid)) == NULL) {

-								// Received roster has a new JID.

-								// Add the jid (with empty resource) to Miranda contact list.

-								hContact = JabberDBCreateContact(proto, jid, nick, FALSE);

-							}

-							db_set_s(hContact, "CList", "MyHandle", nick);

-							if (item->group) mir_free(item->group);

-							if ((groupNode=JabberXmlGetChild(itemNode, "group")) != NULL && groupNode->text != NULL) {

-								item->group = TlenGroupDecode(groupNode->text);

-								JabberContactListCreateGroup(item->group);

-								// Don't set group again if already correct, or Miranda may show wrong group count in some case

-								if (!db_get(hContact, "CList", "Group", &dbv)) {

-									if (strcmp(dbv.pszVal, item->group))

-										db_set_s(hContact, "CList", "Group", item->group);

-									db_free(&dbv);

-								}

-								else db_set_s(hContact, "CList", "Group", item->group);

-							}

-							else {

-								item->group = NULL;

-								db_unset(hContact, "CList", "Group");

-							}

-							if (!db_get(hContact, proto->m_szModuleName, "AvatarHash", &dbv)) {

-								if (item->avatarHash) mir_free(item->avatarHash);

-								item->avatarHash = mir_strdup(dbv.pszVal);

-								JabberLog(proto, "Setting hash [%s] = %s", nick, item->avatarHash);

-								db_free(&dbv);

-							}

-							item->avatarFormat = db_get_dw(hContact, proto->m_szModuleName, "AvatarFormat", PA_FORMAT_UNKNOWN);

-						}

-					}

-				}

-			}

-			

-			// Delete orphaned contacts (if roster sync is enabled)

-			if (db_get_b(NULL, proto->m_szModuleName, "RosterSync", FALSE) == TRUE) {

-				for (HANDLE hContact = db_find_first(proto->m_szModuleName); hContact; ) {

-					HANDLE hNext = hContact = db_find_next(hContact, proto->m_szModuleName);

-					ptrA jid( db_get_sa(hContact, proto->m_szModuleName, "jid"));

-					if (jid != NULL) {

-						if (!JabberListExist(proto, LIST_ROSTER, jid)) {

-							JabberLog(proto, "Syncing roster: deleting 0x%x", hContact);

-							CallService(MS_DB_CONTACT_DELETE, (WPARAM)hContact, 0);

-						}

-					}

-					hContact = hNext;

-				}

-			}

-

-			CLISTMENUITEM mi = { sizeof(mi) };

-			mi.flags = CMIM_FLAGS;

-			Menu_ModifyItem(proto->hMenuMUC, &mi);

-			if (proto->hMenuChats != NULL)

-				Menu_ModifyItem(proto->hMenuChats, &mi);

-

-			proto->isOnline = TRUE;

-			JabberLog(proto, "Status changed via THREADSTART");

-			oldStatus = proto->m_iStatus;

-			JabberSendPresence(proto, proto->m_iDesiredStatus);

-			ProtoBroadcastAck(proto->m_szModuleName, NULL, ACKTYPE_STATUS, ACKRESULT_SUCCESS, (HANDLE) oldStatus, proto->m_iStatus);

-		}

-	}

-}

-

-

-// Tlen actually use jabber:iq:search for other users vCard or jabber:iq:register for own vCard

-void TlenIqResultVcard(TlenProtocol *proto, XmlNode *iqNode)

-{

-	XmlNode *queryNode, *itemNode, *n;

-	char *type, *jid;

-	char text[128];

-	HANDLE hContact;

-	char *nText;

-

-//	JabberLog("<iq/> iqIdGetVcard (tlen)");

-	if ((type=JabberXmlGetAttrValue(iqNode, "type")) == NULL) return;

-

-	if (!strcmp(type, "result")) {

-		BOOL hasFirst, hasLast, hasNick, hasEmail, hasCity, hasAge, hasGender, hasSchool, hasLookFor, hasOccupation;

-		DBVARIANT dbv;

-		int i;

-

-		if ((queryNode=JabberXmlGetChild(iqNode, "query")) == NULL) return;

-		if ((itemNode=JabberXmlGetChild(queryNode, "item")) == NULL) return;

-		if ((jid=JabberXmlGetAttrValue(itemNode, "jid")) != NULL) {

-			if (db_get(NULL, proto->m_szModuleName, "LoginServer", &dbv)) return;

-			if (strchr(jid, '@') != NULL) {

-				mir_snprintf(text, SIZEOF(text), "%s", jid);

-			} else {

-				mir_snprintf(text, SIZEOF(text),  "%s@%s", jid, dbv.pszVal);	// Add @tlen.pl

-			}

-			db_free(&dbv);

-			if ((hContact=JabberHContactFromJID(proto, text)) == NULL) {

-				if (db_get(NULL, proto->m_szModuleName, "LoginName", &dbv)) return;

-				if (strcmp(dbv.pszVal, jid)) {

-					db_free(&dbv);

-					return;

-				}

-				db_free(&dbv);

-			}

-		} else {

-			hContact = NULL;

-		}

-		hasFirst = hasLast = hasNick = hasEmail = hasCity = hasAge = hasGender = hasOccupation = hasLookFor = hasSchool = FALSE;

-		for (i=0; i<itemNode->numChild; i++) {

-			n = itemNode->child[i];

-			if (n == NULL || n->name == NULL) continue;

-			if (!strcmp(n->name, "first")) {

-				if (n->text != NULL) {

-					hasFirst = TRUE;

-					nText = JabberTextDecode(n->text);

-					db_set_s(hContact, proto->m_szModuleName, "FirstName", nText);

-					mir_free(nText);

-				}

-			}

-			else if (!strcmp(n->name, "last")) {

-				if (n->text != NULL) {

-					hasLast = TRUE;

-					nText = JabberTextDecode(n->text);

-					db_set_s(hContact, proto->m_szModuleName, "LastName", nText);

-					mir_free(nText);

-				}

-			}

-			else if (!strcmp(n->name, "nick")) {

-				if (n->text != NULL) {

-					hasNick = TRUE;

-					nText = JabberTextDecode(n->text);

-					db_set_s(hContact, proto->m_szModuleName, "Nick", nText);

-					mir_free(nText);

-				}

-			}

-			else if (!strcmp(n->name, "email")) {

-				if (n->text != NULL) {

-					hasEmail = TRUE;

-					nText = JabberTextDecode(n->text);

-					db_set_s(hContact, proto->m_szModuleName, "e-mail", nText);

-					mir_free(nText);

-				}

-			}

-			else if (!strcmp(n->name, "c")) {

-				if (n->text != NULL) {

-					hasCity = TRUE;

-					nText = JabberTextDecode(n->text);

-					db_set_s(hContact, proto->m_szModuleName, "City", nText);

-					mir_free(nText);

-				}

-			}

-			else if (!strcmp(n->name, "b")) {

-				if (n->text != NULL) {

-					WORD nAge;

-					hasAge = TRUE;

-					nAge = atoi(n->text);

-					db_set_w(hContact, proto->m_szModuleName, "Age", nAge);

-				}

-			}

-			else if (!strcmp(n->name, "s")) {

-				if (n->text != NULL && n->text[1] == '\0' && (n->text[0] == '1' || n->text[0] == '2')) {

-					hasGender = TRUE;

-					db_set_b(hContact, proto->m_szModuleName, "Gender", (BYTE) (n->text[0] == '1'?'M':'F'));

-				}

-			}

-			else if (!strcmp(n->name, "e")) {

-				if (n->text != NULL) {

-					hasSchool = TRUE;

-					nText = JabberTextDecode(n->text);

-					db_set_s(hContact, proto->m_szModuleName, "School", nText);

-					mir_free(nText);

-				}

-			}

-			else if (!strcmp(n->name, "j")) {

-				if (n->text != NULL) {

-					WORD nOccupation;

-					hasOccupation = TRUE;

-					nOccupation = atoi(n->text);

-					db_set_w(hContact, proto->m_szModuleName, "Occupation", nOccupation);

-				}

-			}

-			else if (!strcmp(n->name, "r")) {

-				if (n->text != NULL) {

-					WORD nLookFor;

-					hasLookFor = TRUE;

-					nLookFor = atoi(n->text);

-					db_set_w(hContact, proto->m_szModuleName, "LookingFor", nLookFor);

-				}

-			}

-			else if (!strcmp(n->name, "g")) { // voice chat enabled

-				if (n->text != NULL) {

-					BYTE bVoice;

-					bVoice = atoi(n->text);

-					db_set_w(hContact, proto->m_szModuleName, "VoiceChat", bVoice);

-				}

-			}

-			else if (!strcmp(n->name, "v")) { // status visibility

-				if (n->text != NULL) {

-					BYTE bPublic;

-					bPublic = atoi(n->text);

-					db_set_w(hContact, proto->m_szModuleName, "PublicStatus", bPublic);

-				}

-			}

-		}

-		if (!hasFirst)

-			db_unset(hContact, proto->m_szModuleName, "FirstName");

-		if (!hasLast)

-			db_unset(hContact, proto->m_szModuleName, "LastName");

-		// We are not removing "Nick"

-//		if (!hasNick)

-//			db_unset(hContact, m_szModuleName, "Nick");

-		if (!hasEmail)

-			db_unset(hContact, proto->m_szModuleName, "e-mail");

-		if (!hasCity)

-			db_unset(hContact, proto->m_szModuleName, "City");

-		if (!hasAge)

-			db_unset(hContact, proto->m_szModuleName, "Age");

-		if (!hasGender)

-			db_unset(hContact, proto->m_szModuleName, "Gender");

-		if (!hasSchool)

-			db_unset(hContact, proto->m_szModuleName, "School");

-		if (!hasOccupation)

-			db_unset(hContact, proto->m_szModuleName, "Occupation");

-		if (!hasLookFor)

-			db_unset(hContact, proto->m_szModuleName, "LookingFor");

-		ProtoBroadcastAck(proto->m_szModuleName, hContact, ACKTYPE_GETINFO, ACKRESULT_SUCCESS, (HANDLE) 1, 0);

-	}

-}

-

-void JabberIqResultSearch(TlenProtocol *proto, XmlNode *iqNode)

-{

-	XmlNode *queryNode, *itemNode, *n;

-	char *type, *jid, *str;

-	int id, i, found;

-	JABBER_SEARCH_RESULT jsr = {0};

-	DBVARIANT dbv = {0};

-

-	found = 0;

-//	JabberLog("<iq/> iqIdGetSearch");

-	if ((type=JabberXmlGetAttrValue(iqNode, "type")) == NULL) return;

-	if ((str=JabberXmlGetAttrValue(iqNode, "id")) == NULL) return;

-	id = atoi(str+strlen(JABBER_IQID));

-

-	if (!strcmp(type, "result")) {

-		if ((queryNode=JabberXmlGetChild(iqNode, "query")) == NULL) return;

-		if (!db_get(NULL, proto->m_szModuleName, "LoginServer", &dbv)) {

-			jsr.hdr.cbSize = sizeof(JABBER_SEARCH_RESULT);

-			jsr.hdr.flags = PSR_TCHAR;

-			for (i=0; i<queryNode->numChild; i++) {

-				itemNode = queryNode->child[i];

-				if (!strcmp(itemNode->name, "item")) {

-					if ((jid=JabberXmlGetAttrValue(itemNode, "jid")) != NULL) {

-						if (strchr(jid, '@') != NULL) {

-							mir_snprintf(jsr.jid, sizeof(jsr.jid), "%s", jid);

-						} else {

-							mir_snprintf(jsr.jid, sizeof(jsr.jid), "%s@%s", jid, dbv.pszVal);

-						}

-						jsr.jid[sizeof(jsr.jid)-1] = '\0';

-						jsr.hdr.id = mir_a2t(jid);

-						if ((n=JabberXmlGetChild(itemNode, "nick")) != NULL && n->text != NULL){

-							char* buf = JabberTextDecode(n->text);

-							jsr.hdr.nick = mir_a2t(buf);

-							mir_free(buf);

-						} else {

-							jsr.hdr.nick = mir_tstrdup(TEXT(""));

-						}

-						if ((n=JabberXmlGetChild(itemNode, "first")) != NULL && n->text != NULL){

-							char* buf = JabberTextDecode(n->text);

-							jsr.hdr.firstName = mir_a2t(buf);

-							mir_free(buf);

-						} else {

-							jsr.hdr.firstName = mir_tstrdup(TEXT(""));

-						}

-						if ((n=JabberXmlGetChild(itemNode, "last")) != NULL && n->text != NULL){

-							char* buf = JabberTextDecode(n->text);

-							jsr.hdr.lastName = mir_a2t(buf);

-							mir_free(buf);

-						} else {

-							jsr.hdr.lastName = mir_tstrdup(TEXT(""));

-						}

-						if ((n=JabberXmlGetChild(itemNode, "email"))!=NULL && n->text!=NULL){

-							char* buf = JabberTextDecode(n->text);

-							jsr.hdr.email = mir_a2t(buf);

-							mir_free(buf);

-						} else {

-							jsr.hdr.email = mir_tstrdup(TEXT(""));

-						}

-

-						ProtoBroadcastAck(proto->m_szModuleName, NULL, ACKTYPE_SEARCH, ACKRESULT_DATA, (HANDLE) id, (LPARAM) &jsr);

-						found = 1;

-						mir_free(jsr.hdr.id);

-						mir_free(jsr.hdr.nick);

-						mir_free(jsr.hdr.firstName);

-						mir_free(jsr.hdr.lastName);

-						mir_free(jsr.hdr.email);

-					}

-				}

-			}

-			if (proto->searchJID != NULL) {

-				if (!found) {

-					if (strchr(proto->searchJID, '@') != NULL) {

-						mir_snprintf(jsr.jid, sizeof(jsr.jid), "%s", proto->searchJID);

-					} else {

-						mir_snprintf(jsr.jid, sizeof(jsr.jid), "%s@%s", proto->searchJID, dbv.pszVal);

-					}

-					jsr.jid[sizeof(jsr.jid)-1] = '\0';

-					jsr.hdr.nick = mir_tstrdup(TEXT(""));

-					jsr.hdr.firstName = mir_tstrdup(TEXT(""));

-					jsr.hdr.lastName = mir_tstrdup(TEXT(""));

-					jsr.hdr.email = mir_tstrdup(TEXT(""));

-					jsr.hdr.id = mir_tstrdup(TEXT(""));

-					ProtoBroadcastAck(proto->m_szModuleName, NULL, ACKTYPE_SEARCH, ACKRESULT_DATA, (HANDLE) id, (LPARAM) &jsr);

-					mir_free(jsr.hdr.nick);

-					mir_free(jsr.hdr.firstName);

-					mir_free(jsr.hdr.lastName);

-					mir_free(jsr.hdr.email);

-				}

-				mir_free(proto->searchJID);

-				proto->searchJID = NULL;

-			}

-			db_free(&dbv);

-		}

-		found = 0;

-		if (queryNode->numChild == TLEN_MAX_SEARCH_RESULTS_PER_PAGE) {

-			found = TlenRunSearch(proto);

-		}

-		if (!found) {

-			ProtoBroadcastAck(proto->m_szModuleName, NULL, ACKTYPE_SEARCH, ACKRESULT_SUCCESS, (HANDLE) id, 0);

-		}

-	} else if (!strcmp(type, "error")) {

-		// ProtoBroadcastAck(proto->m_szModuleName, NULL, ACKTYPE_SEARCH, ACKRESULT_FAILED, (HANDLE) id, 0);

-		// There is no ACKRESULT_FAILED for ACKTYPE_SEARCH :) look at findadd.c

-		// So we will just send a SUCCESS

-		ProtoBroadcastAck(proto->m_szModuleName, NULL, ACKTYPE_SEARCH, ACKRESULT_SUCCESS, (HANDLE) id, 0);

-	}

-}

-

-

-void GetConfigItem(XmlNode *node, char *dest, BOOL bMethod, int *methodDest) {

-	strcpy(dest, node->text);

-	TlenUrlDecode(dest);

-	if (bMethod) {

-		char *method = JabberXmlGetAttrValue(node, "method");

-		if (method != NULL && !strcmpi(method, "POST")) {

-			*methodDest = REQUEST_POST;

-		} else {

-			*methodDest = REQUEST_GET;

-		}

-	}

-}

-

-void TlenIqResultTcfg(TlenProtocol *proto, XmlNode *iqNode)

-{

-	XmlNode *queryNode, *miniMailNode, *node;

-	char *type;

-

-	if ((type=JabberXmlGetAttrValue(iqNode, "type")) == NULL) return;

-	if (!strcmp(type, "result")) {

-		if ((queryNode=JabberXmlGetChild(iqNode, "query")) == NULL) return;

-		if ((miniMailNode=JabberXmlGetChild(queryNode, "mini-mail")) == NULL) return;

-		if ((node=JabberXmlGetChild(miniMailNode, "base")) != NULL) {

-			GetConfigItem(node, proto->threadData->tlenConfig.mailBase, FALSE, NULL);

-		}

-		if ((node=JabberXmlGetChild(miniMailNode, "msg")) != NULL) {

-			GetConfigItem(node, proto->threadData->tlenConfig.mailMsg, TRUE, &proto->threadData->tlenConfig.mailMsgMthd);

-		}

-		if ((node=JabberXmlGetChild(miniMailNode, "index")) != NULL) {

-			GetConfigItem(node, proto->threadData->tlenConfig.mailIndex, TRUE, &proto->threadData->tlenConfig.mailIndexMthd);

-		}

-		if ((node=JabberXmlGetChild(miniMailNode, "login")) != NULL) {

-			GetConfigItem(node, proto->threadData->tlenConfig.mailLogin, TRUE, &proto->threadData->tlenConfig.mailLoginMthd);

-		}

-		if ((node=JabberXmlGetChild(miniMailNode, "compose")) != NULL) {

-			GetConfigItem(node, proto->threadData->tlenConfig.mailCompose, TRUE, &proto->threadData->tlenConfig.mailComposeMthd);

-		}

-		if ((node=JabberXmlGetChild(miniMailNode, "avatar-get")) != NULL) {

-			GetConfigItem(node, proto->threadData->tlenConfig.avatarGet, TRUE, &proto->threadData->tlenConfig.avatarGetMthd);

-		}

-		if ((node=JabberXmlGetChild(miniMailNode, "avatar-upload")) != NULL) {

-			GetConfigItem(node, proto->threadData->tlenConfig.avatarUpload, TRUE, &proto->threadData->tlenConfig.avatarUploadMthd);

-		}

-		if ((node=JabberXmlGetChild(miniMailNode, "avatar-remove")) != NULL) {

-			GetConfigItem(node, proto->threadData->tlenConfig.avatarRemove, TRUE, &proto->threadData->tlenConfig.avatarRemoveMthd);

-		}

-	}

-}

-

-void TlenIqResultVersion(TlenProtocol *proto, XmlNode *iqNode)

-{

-	XmlNode *queryNode = JabberXmlGetChild(iqNode, "query");

-	if (queryNode != NULL) {

-		char* from;

-		if (( from=JabberXmlGetAttrValue( iqNode, "from" )) != NULL ) {

-			JABBER_LIST_ITEM *item;

-			if (( item=JabberListGetItemPtr( proto, LIST_ROSTER, from )) != NULL) {

-				HANDLE hContact;

-				XmlNode *n;

-				if ( item->software ) mir_free( item->software );

-				if ( item->version ) mir_free( item->version );

-				if ( item->system ) mir_free( item->system );

-				if (( n=JabberXmlGetChild( queryNode, "name" )) != NULL && n->text ) {

-					item->software = JabberTextDecode( n->text );

-				} else

-					item->software = NULL;

-				if (( n=JabberXmlGetChild( queryNode, "version" )) != NULL && n->text )

-					item->version = JabberTextDecode( n->text );

-				else

-					item->version = NULL;

-				if (( n=JabberXmlGetChild( queryNode, "os" )) != NULL && n->text )

-					item->system = JabberTextDecode( n->text );

-				else

-					item->system = NULL;

-				if (( hContact=JabberHContactFromJID(proto, item->jid )) != NULL ) {

-					if (item->software != NULL) {

-						db_set_s(hContact, proto->m_szModuleName, "MirVer", item->software);

-					} else {

-						db_unset(hContact, proto->m_szModuleName, "MirVer");

-					}

-				}

-			}

-		}

-	}

-}

-

-void TlenIqResultInfo(TlenProtocol *proto, XmlNode *iqNode)

-{

-	XmlNode *queryNode = JabberXmlGetChild(iqNode, "query");

-	if (queryNode != NULL) {

-		char* from;

-		if (( from=JabberXmlGetAttrValue( queryNode, "from" )) != NULL ) {

-			JABBER_LIST_ITEM *item;

-			if (( item=JabberListGetItemPtr( proto, LIST_ROSTER, from )) != NULL) {

-				HANDLE hContact;

-				XmlNode *version = JabberXmlGetChild(queryNode, "version");

-				item->protocolVersion = JabberTextDecode(version->text);

-				if (( hContact=JabberHContactFromJID(proto, item->jid )) != NULL ) {

-					if (item->software == NULL) {

-						char str[128];

-						mir_snprintf(str, sizeof(str), "Tlen Protocol %s", item->protocolVersion);

-						db_set_s(hContact, proto->m_szModuleName, "MirVer", str);

-					}

-				}

-			}

-		}

-	}

-}

-