BOOL CJabberProto::OnMessageIbb(HXML, ThreadData*, CJabberMessageInfo* pInfo)
{
BOOL bOk = FALSE;
const TCHAR *sid = xmlGetAttrValue(pInfo->GetChildNode(), _T("sid"));
const TCHAR *seq = xmlGetAttrValue(pInfo->GetChildNode(), _T("seq"));
if (sid && seq && xmlGetText(pInfo->GetChildNode()))
bOk = OnIbbRecvdData(xmlGetText(pInfo->GetChildNode()), sid, seq);
return TRUE;
}
void OnSubmit(CCtrlButton*)
{
HXML queryNode, xNode;
const TCHAR *from;
if (m_agentRegIqNode == NULL) return;
if ((from = xmlGetAttrValue(m_agentRegIqNode, _T("from"))) == NULL) return;
if ((queryNode = xmlGetChild(m_agentRegIqNode , "query")) == NULL) return;
HWND hFrame = GetDlgItem(m_hwnd, IDC_FRAME);
TCHAR *str2 = (TCHAR*)alloca(sizeof(TCHAR) * 128);
int id = 0;
XmlNodeIq iq( m_proto->AddIQ(&CJabberProto::OnIqResultSetRegister, JABBER_IQ_TYPE_SET, from));
HXML query = iq << XQUERY(JABBER_FEAT_REGISTER);
if ((xNode = xmlGetChild(queryNode , "x")) != NULL) {
// use new jabber:x:data form
HXML n = JabberFormGetData(hFrame, xNode);
xmlAddChild(query, n);
xi.destroyNode(n);
}
else {
// use old registration information form
for (int i=0; ; i++) {
HXML n = xmlGetChild(queryNode ,i);
if (!n)
break;
if (xmlGetName(n)) {
if (!lstrcmp(xmlGetName(n), _T("key"))) {
// field that must be passed along with the registration
if (xmlGetText(n))
xmlAddChild(query, xmlGetName(n), xmlGetText(n));
else
xmlAddChild(query, xmlGetName(n));
}
else if (!lstrcmp(xmlGetName(n), _T("registered")) || !lstrcmp(xmlGetName(n), _T("instructions"))) {
// do nothing, we will skip these
}
else {
GetDlgItemText(hFrame, id, str2, 128);
xmlAddChild(query, xmlGetName(n), str2);
id++;
} } } }
m_proto->m_ThreadInfo->send(iq);
CAgentRegProgressDlg(m_proto, m_hwnd).DoModal();
Close();
}
BOOL CJabberProto::OnMessageError(HXML node, ThreadData*, CJabberMessageInfo* pInfo)
{
// we check if is message delivery failure
int id = JabberGetPacketID(node);
JABBER_LIST_ITEM *item = ListGetItemPtr(LIST_ROSTER, pInfo->GetFrom());
if (item == NULL)
item = ListGetItemPtr(LIST_CHATROOM, pInfo->GetFrom());
if (item != NULL) { // yes, it is
TCHAR *szErrText = JabberErrorMsg(pInfo->GetChildNode());
if (id != -1) {
char *errText = mir_t2a(szErrText);
ProtoBroadcastAck(pInfo->GetHContact(), ACKTYPE_MESSAGE, ACKRESULT_FAILED, (HANDLE)id, (LPARAM)errText);
mir_free(errText);
}
else {
TCHAR buf[512];
HXML bodyNode = xmlGetChild(node, "body");
if (bodyNode)
mir_sntprintf(buf, SIZEOF(buf), _T("%s:\n%s\n%s"), pInfo->GetFrom(), xmlGetText(bodyNode), szErrText);
else
mir_sntprintf(buf, SIZEOF(buf), _T("%s:\n%s"), pInfo->GetFrom(), szErrText);
MsgPopup(NULL, buf, TranslateT("Jabber Error"));
}
mir_free(szErrText);
}
return TRUE;
}
bool parse_clientlogin_response(NETLIBHTTPREQUEST *nlhr, NETLIBHTTPHEADER *my_headers, CMStringA &token, CMStringA &secret, time_t &hosttime)
{
//TODO: validate response
//TODO: return false on errors
//TODO: extract token, secret, hosttime from response
int datalen = 0;
for (int i = 0; i < nlhr->headersCount; i++) {
if (!mir_strcmp(nlhr->headers[i].szName, "Set-Cookie")) {
my_headers[0].szName = "Cookie";
my_headers[0].szValue = mir_strdup(nlhr->headers[i].szValue);
}
}
ptrW buf_w(mir_utf8decodeW(nlhr->pData));
HXML root = xmlParseString(buf_w, &datalen, _T(""));
if (!root)
return false;
HXML status = xmlGetChildByPath(root, _T("response/statusCode"), 0);
if (!status)
return false;
LPCTSTR status_text = xmlGetText(status);
// TODO: check other than 200 codes and print some debug info on errors
if (wcscmp(status_text, L"200"))
return false;
HXML secret_node = xmlGetChildByPath(root, _T("response/data/sessionSecret"), 0);
HXML hosttime_node = xmlGetChildByPath(root, _T("response/data/hostTime"), 0);
if (!secret_node || !hosttime_node)
return false;
HXML token_node = xmlGetChildByPath(root, _T("response/data/token/a"), 0);
if (!token_node)
return false;
LPCTSTR secret_w = xmlGetText(secret_node), token_w = xmlGetText(token_node), hosttime_w = xmlGetText(hosttime_node);
if (!secret_w || !token_w || !hosttime_w)
return false;
secret = _T2A(secret_w);
token = _T2A(token_w);
hosttime = strtol(_T2A(hosttime_w), NULL, 10);
return true;
}
void validateStatusField(XMLNode* expectedParams,
MPI_Status *actualStatus,charList* resultBuffer)
{
XMLNode *statusNode = xmlGetChildNode(expectedParams, STATUS_ELEMENT);
int expectedSource = atoi(xmlGetText(xmlGetChildNode(statusNode, MPI_SOURCE_STR)));
int expectedTag = atoi(xmlGetText(xmlGetChildNode(statusNode, MPI_TAG_STR)));
if(actualStatus->MPI_SOURCE != expectedSource ||
actualStatus->MPI_TAG != expectedTag)
{
char* statusToStrBuff = NULL;
int allocatedSize = asprintf(&statusToStrBuff, "%d,%d,",
expectedSource, expectedTag);
AddChars(resultBuffer, statusToStrBuff, allocatedSize);
free(statusToStrBuff);
}
}
void CJabberProto::OnIqResultGetCollection(HXML iqNode, CJabberIqInfo*)
{
if ( mir_tstrcmp( xmlGetAttrValue(iqNode, _T("type")), _T("result")))
return;
HXML chatNode = xmlGetChild(iqNode, "chat");
if (!chatNode || mir_tstrcmp( xmlGetAttrValue(chatNode, _T("xmlns")), JABBER_FEAT_ARCHIVE))
return;
const TCHAR* start = xmlGetAttrValue(chatNode, _T("start"));
const TCHAR* with = xmlGetAttrValue(chatNode, _T("with"));
if (!start || !with)
return;
MCONTACT hContact = HContactFromJID(with);
time_t tmStart = str2time(start);
if (hContact == 0 || tmStart == 0)
return;
_tzset();
for (int nodeIdx = 0; ; nodeIdx++) {
HXML itemNode = xmlGetChild(chatNode, nodeIdx);
if (!itemNode)
break;
int from;
const TCHAR *itemName = xmlGetName(itemNode);
if (!mir_tstrcmp(itemName, _T("to")))
from = DBEF_SENT;
else if (!mir_tstrcmp(itemName, _T("from")))
from = 0;
else
continue;
HXML body = xmlGetChild(itemNode, "body");
if (!body)
continue;
const TCHAR *tszBody = xmlGetText(body);
const TCHAR *tszSecs = xmlGetAttrValue(itemNode, _T("secs"));
if (!tszBody || !tszSecs)
continue;
ptrA szEventText( mir_utf8encodeT(tszBody));
DBEVENTINFO dbei = { sizeof(DBEVENTINFO) };
dbei.eventType = EVENTTYPE_MESSAGE;
dbei.szModule = m_szModuleName;
dbei.cbBlob = (DWORD)strlen(szEventText);
dbei.flags = DBEF_READ + DBEF_UTF + from;
dbei.pBlob = (PBYTE)(char*)szEventText;
dbei.timestamp = tmStart + _ttol(tszSecs) - timezone;
if (!IsDuplicateEvent(hContact, dbei))
db_event_add(hContact, &dbei);
}
}
bool parse_start_socar_session_response(const char *response, CMStringA &bos_host, unsigned short &bos_port, CMStringA &cookie, CMStringA &tls_cert_name, bool encryption = true)
{
//TODO: extract bos_host, bos_port, cookie, tls_cert_name
int datalen = 0;
ptrW buf_w(mir_utf8decodeW(response));
HXML root = xmlParseString(buf_w, &datalen, _T(""));
if (!root)
return false;
HXML status = xmlGetChildByPath(root, _T("response/statusCode"), 0);
if (!status)
return false;
LPCTSTR status_text = xmlGetText(status);
//TODO: check other than 200 codes and print some debug info on errors
if (wcscmp(status_text, L"200"))
return false;
HXML host_node = xmlGetChildByPath(root, _T("response/data/host"), 0);
HXML port_node = xmlGetChildByPath(root, _T("response/data/port"), 0);
HXML cookie_node = xmlGetChildByPath(root, _T("response/data/cookie"), 0);
if (!host_node || !port_node || !cookie_node)
return false;
LPCTSTR host_w = xmlGetText(host_node), port_w = xmlGetText(port_node), cookie_w = xmlGetText(cookie_node);
if (!host_w || !port_w || !cookie_w)
return false;
bos_host = _T2A(host_w);
bos_port = atoi(_T2A(port_w));
cookie = _T2A(cookie_w);
if (encryption) {
HXML tls_node = xmlGetChildByPath(root, _T("response/data/tlsCertName"), 0); //tls is optional, so this is not fatal error
if (tls_node) {
LPCTSTR certname_w = xmlGetText(tls_node);
if (certname_w)
tls_cert_name = _T2A(certname_w);
}
}
return true;
}
void validateIntField(char* fieldName, XMLNode* expectedParams, int actualValue, charList* resultBuffer)
{
int expectedValue = atoi(xmlGetText(xmlGetChildNode(expectedParams, fieldName)));
if(actualValue != expectedValue)
{
char* intToStrBuff = NULL;
int allocatedSize = asprintf(&intToStrBuff, "%d", expectedValue);
AddChars(resultBuffer, intToStrBuff, allocatedSize);
free(intToStrBuff);
}
}
void validateDatatypeField(XMLNode* expectedParams, MPI_Datatype actualValue, charList* resultBuffer)
{
MPI_Datatype expectedValue = strToMPIType(xmlGetText(xmlGetChildNode(expectedParams, DATA_TYPE_ELEMENT)));
if(actualValue != expectedValue)
{
char* dataTypeBuff = NULL;
int allocatedSize = asprintf(&dataTypeBuff, "%s", mpiTypeToStr(expectedValue));
AddChars(resultBuffer, dataTypeBuff, allocatedSize);
free(dataTypeBuff);
}
}
BOOL CJabberProto::OnFtHandleIbbIq( HXML iqNode, CJabberIqInfo* pInfo )
{
if ( !_tcscmp( pInfo->GetChildNodeName(), _T("open")))
FtHandleIbbRequest( iqNode, TRUE );
else if ( !_tcscmp( pInfo->GetChildNodeName(), _T("close")))
FtHandleIbbRequest( iqNode, FALSE );
else if ( !_tcscmp( pInfo->GetChildNodeName(), _T("data"))) {
BOOL bOk = FALSE;
const TCHAR *sid = xmlGetAttrValue( pInfo->GetChildNode(), _T("sid"));
const TCHAR *seq = xmlGetAttrValue( pInfo->GetChildNode(), _T("seq"));
if ( sid && seq && xmlGetText( pInfo->GetChildNode()))
bOk = OnIbbRecvdData( xmlGetText( pInfo->GetChildNode()), sid, seq );
if ( bOk )
m_ThreadInfo->send( XmlNodeIq( _T("result"), pInfo ));
else
m_ThreadInfo->send(
XmlNodeIq( _T("error"), pInfo )
<< XCHILD( _T("error")) << XATTRI( _T("code"), 404 ) << XATTR( _T("type"), _T("cancel"))
<< XCHILDNS( _T("item-not-found"), _T("urn:ietf:params:xml:ns:xmpp-stanzas")));
}
return TRUE;
}
INT_PTR CSkypeProto::GetCallEventText(WPARAM, LPARAM lParam)
{
DBEVENTGETTEXT *pEvent = (DBEVENTGETTEXT *)lParam;
INT_PTR nRetVal = 0;
ptrA pszText;
switch (pEvent->dbei->eventType)
{
case SKYPE_DB_EVENT_TYPE_CALL_INFO:
{
CMStringA text;
HXML xml = xmlParseString(ptrT(mir_utf8decodeT((char*)pEvent->dbei->pBlob)), 0, _T("partlist"));
if (xml != NULL)
{
ptrA type(mir_t2a(xmlGetAttrValue(xml, _T("type"))));
bool bType = (!mir_strcmpi(type, "started")) ? 1 : 0;
for (int i = 0; i < xmlGetChildCount(xml); i++)
{
HXML xmlPart = xmlGetNthChild(xml, _T("part"), i);
if (xmlPart != NULL)
{
HXML xmlName = xmlGetChildByPath(xmlPart, _T("name"), 0);
if (xmlName != NULL)
{
text.AppendFormat(Translate("%s %s this call.\n"), _T2A(xmlGetText(xmlName)), bType ? Translate("enters") : Translate("leaves"));
xmlDestroyNode(xmlName);
}
xmlDestroyNode(xmlPart);
}
}
xmlDestroyNode(xml);
}
pszText = mir_strdup(text.GetBuffer());
break;
}
case SKYPE_DB_EVENT_TYPE_FILETRANSFER_INFO:
{
CMStringA text;
HXML xml = xmlParseString(ptrT(mir_utf8decodeT((char*)pEvent->dbei->pBlob)), 0, _T("files"));
if (xml != NULL)
{
for (int i = 0; i < xmlGetChildCount(xml); i++)
{
size_t fileSize = 0;
HXML xmlNode = xmlGetNthChild(xml, _T("file"), i);
if (xmlNode != NULL)
{
fileSize = _ttoi(ptrT((TCHAR*)xmlGetAttrValue(xmlNode, _T("size"))));
ptrA fileName(mir_utf8encodeT(ptrT((TCHAR*)xmlGetText(xmlNode))));
if (fileName != NULL)
{
CMStringA msg(FORMAT, Translate("File transfer:\n\tFile name: %s\n\tSize: %d bytes"), fileName, fileSize);
text.AppendFormat("%s\n", msg);
}
xmlDestroyNode(xmlNode);
}
}
xmlDestroyNode(xml);
}
pszText = mir_strdup(text.GetBuffer());
break;
}
case SKYPE_DB_EVENT_TYPE_URIOBJ:
{
CMStringA text;
HXML xml = xmlParseString(ptrT(mir_utf8decodeT((char*)pEvent->dbei->pBlob)), 0, _T("URIObject"));
if (xml != NULL)
{
text.Append(_T2A(xmlGetText(xml)));
xmlDestroyNode(xml);
}
pszText = mir_strdup(text.GetBuffer());
break;
}
case SKYPE_DB_EVENT_TYPE_INCOMING_CALL:
{
pszText = Translate("Incoming call.");
break;
}
default:
{
pszText = mir_strdup((char*)pEvent->dbei->pBlob);
}
}
if (pEvent->datatype == DBVT_TCHAR)
{
TCHAR *pwszText = _A2T(pszText);
nRetVal = (INT_PTR)mir_tstrdup(pwszText);
}
else if (pEvent->datatype == DBVT_ASCIIZ)
nRetVal = (INT_PTR)mir_strdup(pszText);
return nRetVal;
}
LPCTSTR __fastcall XmlGetText(HXML xml)
{
return (xml) ? xmlGetText(xml) : NULL;
}
void CJabberProto::OnIqResultAdvancedSearch( HXML iqNode )
{
const TCHAR* type;
int id;
U_TCHAR_MAP mColumnsNames(10);
LIST<void> SearchResults(2);
if ((( id = JabberGetPacketID( iqNode )) == -1 ) || (( type = xmlGetAttrValue( iqNode, _T("type"))) == NULL )) {
JSendBroadcast( NULL, ACKTYPE_SEARCH, ACKRESULT_SUCCESS, ( HANDLE ) id, 0 );
return;
}
if ( !lstrcmp( type, _T("result"))) {
HXML queryNode = xmlGetNthChild( iqNode, _T("query"), 1 );
HXML xNode = xmlGetChildByTag( queryNode, "x", "xmlns", _T(JABBER_FEAT_DATA_FORMS));
if (xNode) {
//1. Form search results info
HXML reportNode = xmlGetNthChild( xNode, _T("reported"), 1 );
if (reportNode) {
int i = 1;
while ( HXML fieldNode = xmlGetNthChild( reportNode, _T("field"), i++ )) {
TCHAR* var = ( TCHAR* )xmlGetAttrValue( fieldNode, _T( "var" ));
if ( var ) {
TCHAR* Label = ( TCHAR* )xmlGetAttrValue( fieldNode, _T( "label" ));
mColumnsNames.insert(var, (Label!=NULL) ? Label : var);
} } }
int i=1;
HXML itemNode;
while ( itemNode = xmlGetNthChild( xNode, _T("item"), i++ )) {
U_TCHAR_MAP *pUserColumn = new U_TCHAR_MAP(10);
int j = 1;
while ( HXML fieldNode = xmlGetNthChild( itemNode, _T("field"), j++ )) {
if ( TCHAR* var = (TCHAR*)xmlGetAttrValue( fieldNode, _T("var"))) {
if ( TCHAR* Text = (TCHAR*)xmlGetText( xmlGetChild( fieldNode, _T("value")))) {
if ( !mColumnsNames[var] )
mColumnsNames.insert(var,var);
pUserColumn->insert(var,Text);
} } }
SearchResults.insert((void*)pUserColumn);
}
}
else {
//2. Field list search results info
int i=1;
while ( HXML itemNode = xmlGetNthChild( queryNode, _T("item"), i++ )) {
U_TCHAR_MAP *pUserColumn=new U_TCHAR_MAP(10);
TCHAR* jid = (TCHAR*)xmlGetAttrValue( itemNode, _T("jid"));
TCHAR* keyReturned;
mColumnsNames.insertCopyKey( _T("jid"),_T("jid"),&keyReturned, CopyKey, DestroyKey );
mColumnsNames.insert( _T("jid"), keyReturned );
pUserColumn->insertCopyKey( _T("jid"), jid, NULL, CopyKey, DestroyKey );
for ( int j=0; ; j++ ) {
HXML child = xmlGetChild( itemNode, j );
if ( !child )
break;
const TCHAR* szColumnName = xmlGetName( child );
if ( szColumnName ) {
if ( xmlGetText( child ) && xmlGetText( child )[0] != _T('\0')) {
mColumnsNames.insertCopyKey(( TCHAR* )szColumnName,_T(""),&keyReturned, CopyKey, DestroyKey);
mColumnsNames.insert(( TCHAR* )szColumnName,keyReturned);
pUserColumn->insertCopyKey(( TCHAR* )szColumnName, ( TCHAR* )xmlGetText( child ),NULL, CopyKey, DestroyKey);
} } }
SearchResults.insert((void*)pUserColumn);
} }
}
else if (!lstrcmp( type, _T("error"))) {
const TCHAR* code=NULL;
const TCHAR* description=NULL;
TCHAR buff[255];
HXML errorNode = xmlGetChild( iqNode , "error" );
if (errorNode) {
code = xmlGetAttrValue( errorNode, _T("code"));
description = xmlGetText( errorNode );
}
_sntprintf(buff,SIZEOF(buff),TranslateT("Error %s %s\r\nTry to specify more detailed"),code ? code : _T(""),description?description:_T(""));
JSendBroadcast( NULL, ACKTYPE_SEARCH, ACKRESULT_SUCCESS, ( HANDLE ) id, 0 );
if (searchHandleDlg )
SetDlgItemText(searchHandleDlg,IDC_INSTRUCTIONS,buff);
else
MessageBox(NULL, buff, TranslateT("Search error"), MB_OK|MB_ICONSTOP);
return;
}
SearchReturnResults((HANDLE)id, (void*)&SearchResults, (U_TCHAR_MAP *)&mColumnsNames);
for (int i=0; i < SearchResults.getCount(); i++ )
delete ((U_TCHAR_MAP *)SearchResults[i]);
//send success to finish searching
JSendBroadcast( NULL, ACKTYPE_SEARCH, ACKRESULT_SUCCESS, ( HANDLE ) id, 0 );
}
void CJabberProto::OnIqResultGetSearchFields( HXML iqNode )
{
if ( !searchHandleDlg )
return;
LPCTSTR type = xmlGetAttrValue( iqNode, _T("type"));
if ( !type )
return;
if ( !lstrcmp( type, _T("result"))) {
HXML queryNode = xmlGetNthChild( iqNode, _T("query"), 1 );
HXML xNode = xmlGetChildByTag( queryNode, "x", "xmlns", _T(JABBER_FEAT_DATA_FORMS));
ShowWindow(searchHandleDlg,SW_HIDE);
if ( xNode ) {
//1. Form
PostMessage( searchHandleDlg, WM_USER+11, ( WPARAM )xi.copyNode( xNode ), ( LPARAM )0 );
HXML xcNode = xmlGetNthChild( xNode, _T("instructions"), 1 );
if ( xcNode )
SetDlgItemText( searchHandleDlg, IDC_INSTRUCTIONS, xmlGetText( xcNode ));
}
else {
int Order=0;
for ( int i = 0; ; i++ ) {
HXML chNode = xmlGetChild( queryNode, i );
if ( !chNode )
break;
if ( !_tcsicmp( xmlGetName( chNode ), _T("instructions")) && xmlGetText( chNode ))
SetDlgItemText(searchHandleDlg,IDC_INSTRUCTIONS,TranslateTS(xmlGetText( chNode )));
else if ( xmlGetName( chNode ) ) {
Data *MyData=(Data*)malloc(sizeof(Data));
memset(MyData,0,sizeof(Data));
MyData->Label = mir_tstrdup( xmlGetName( chNode ));
MyData->Var = mir_tstrdup( xmlGetName( chNode ));
MyData->defValue = mir_tstrdup(xmlGetText( chNode ));
MyData->Order = Order;
if (MyData->defValue) MyData->bReadOnly = TRUE;
PostMessage(searchHandleDlg,WM_USER+10,(WPARAM)FALSE,(LPARAM)MyData);
Order++;
} } }
const TCHAR* szFrom = xmlGetAttrValue( iqNode, _T("from"));
if (szFrom)
SearchAddToRecent(szFrom,searchHandleDlg);
PostMessage(searchHandleDlg,WM_USER+10,(WPARAM)0,(LPARAM)0);
ShowWindow(searchHandleDlg,SW_SHOW);
}
else if ( !lstrcmp( type, _T("error"))) {
const TCHAR* code=NULL;
const TCHAR* description=NULL;
TCHAR buff[255];
HXML errorNode = xmlGetChild( iqNode, "error");
if ( errorNode ) {
code = xmlGetAttrValue( errorNode, _T("code"));
description=xmlGetText( errorNode );
}
_sntprintf(buff,SIZEOF(buff),TranslateT("Error %s %s\r\nPlease select other server"),code ? code : _T(""),description?description:_T(""));
SetDlgItemText(searchHandleDlg,IDC_INSTRUCTIONS,buff);
}
else SetDlgItemText( searchHandleDlg, IDC_INSTRUCTIONS, TranslateT( "Error Unknown reply recieved\r\nPlease select other server" ));
}
static void sttFillJidList(HWND hwndDlg)
{
JABBER_MUC_JIDLIST_INFO *jidListInfo;
HXML iqNode, queryNode;
const TCHAR* from, *jid, *reason, *nick;
LVITEM lvi;
HWND hwndList;
int count, i;
TCHAR *filter = NULL;
if (GetWindowLongPtr(GetDlgItem(hwndDlg, IDC_FILTER), GWLP_USERDATA))
{
int filterLength = GetWindowTextLength(GetDlgItem(hwndDlg, IDC_FILTER)) + 1;
filter = (TCHAR *)_alloca(filterLength * sizeof(TCHAR));
GetDlgItemText(hwndDlg, IDC_FILTER, filter, filterLength);
}
jidListInfo = ( JABBER_MUC_JIDLIST_INFO * ) GetWindowLongPtr( hwndDlg, GWLP_USERDATA );
if ( !jidListInfo )
return;
hwndList = GetDlgItem( hwndDlg, IDC_LIST );
SendMessage(hwndList, WM_SETREDRAW, FALSE, 0);
count = ListView_GetItemCount( hwndList );
lvi.mask = LVIF_PARAM;
lvi.iSubItem = 0;
for ( i=0; i<count; i++ ) {
lvi.iItem = i;
if ( ListView_GetItem( hwndList, &lvi ) == TRUE ) {
if ( lvi.lParam!=( LPARAM )( -1 ) && lvi.lParam!=( LPARAM )( NULL )) {
mir_free(( void * ) lvi.lParam );
}
}
}
ListView_DeleteAllItems( hwndList );
// Populate displayed list from iqNode
if (( iqNode = jidListInfo->iqNode ) != NULL ) {
if (( from = xmlGetAttrValue( iqNode, _T("from"))) != NULL ) {
if (( queryNode = xmlGetChild( iqNode , "query" )) != NULL ) {
lvi.mask = LVIF_TEXT | LVIF_PARAM;
lvi.iSubItem = 0;
lvi.iItem = 0;
for ( i=0; ; i++ ) {
HXML itemNode = xmlGetChild( queryNode ,i);
if ( !itemNode )
break;
if (( jid = xmlGetAttrValue( itemNode, _T("jid"))) != NULL ) {
lvi.pszText = ( TCHAR* )jid;
if ( jidListInfo->type == MUC_BANLIST ) {
if (( reason = xmlGetText(xmlGetChild( itemNode , "reason" ))) != NULL ) {
TCHAR jidreason[ JABBER_MAX_JID_LEN + 256 ];
mir_sntprintf( jidreason, SIZEOF( jidreason ), _T("%s (%s)") , jid, reason );
lvi.pszText = jidreason;
} }
if ( jidListInfo->type == MUC_VOICELIST || jidListInfo->type == MUC_MODERATORLIST ) {
if (( nick = xmlGetAttrValue( itemNode, _T("nick"))) != NULL ) {
TCHAR nickjid[ JABBER_MAX_JID_LEN + 256 ];
mir_sntprintf( nickjid, SIZEOF( nickjid ), _T("%s (%s)") , nick, jid );
lvi.pszText = nickjid;
} }
if (filter && *filter && !JabberStrIStr(lvi.pszText, filter))
continue;
lvi.lParam = ( LPARAM )mir_tstrdup( jid );
ListView_InsertItem( hwndList, &lvi );
lvi.iItem++;
} } } } }
lvi.mask = LVIF_PARAM;
lvi.lParam = ( LPARAM )( -1 );
ListView_InsertItem( hwndList, &lvi );
SendMessage(hwndList, WM_SETREDRAW, TRUE, 0);
RedrawWindow(hwndList, NULL, NULL, RDW_INVALIDATE);
}
BOOL CJabberProto::OnIqRequestOOB(HXML, CJabberIqInfo *pInfo)
{
if (!pInfo->GetFrom() || !pInfo->GetHContact())
return TRUE;
HXML n = xmlGetChild(pInfo->GetChildNode(), "url");
if (!n || !xmlGetText(n))
return TRUE;
if (m_options.BsOnlyIBB) {
// reject
XmlNodeIq iq(_T("error"), pInfo);
HXML e = xmlAddChild(iq, _T("error"), _T("File transfer refused")); xmlAddAttr(e, _T("code"), 406);
m_ThreadInfo->send(iq);
return TRUE;
}
filetransfer *ft = new filetransfer(this);
ft->std.totalFiles = 1;
ft->jid = mir_tstrdup(pInfo->GetFrom());
ft->std.hContact = pInfo->GetHContact();
ft->type = FT_OOB;
ft->httpHostName = NULL;
ft->httpPort = 80;
ft->httpPath = NULL;
// Parse the URL
TCHAR *str = (TCHAR*)xmlGetText(n); // URL of the file to get
if (!_tcsnicmp(str, _T("http://"), 7)) {
TCHAR *p = str + 7, *q;
if ((q = _tcschr(p, '/')) != NULL) {
TCHAR text[1024];
if (q-p < SIZEOF(text)) {
_tcsncpy(text, p, q-p);
text[q-p] = '\0';
if ((p = _tcschr(text, ':')) != NULL) {
ft->httpPort = (WORD)_ttoi(p+1);
*p = '\0';
}
ft->httpHostName = mir_t2a(text);
}
}
}
if (pInfo->GetIdStr())
ft->iqId = pInfo->GetIqId();
if (ft->httpHostName && ft->httpPath) {
TCHAR *desc = NULL;
debugLogA("Host=%s Port=%d Path=%s", ft->httpHostName, ft->httpPort, ft->httpPath);
if ((n = xmlGetChild(pInfo->GetChildNode(), "desc")) != NULL)
desc = (TCHAR*)xmlGetText(n);
TCHAR *str2;
debugLogA("description = %s", desc);
if ((str2 = _tcsrchr(ft->httpPath, '/')) != NULL)
str2++;
else
str2 = ft->httpPath;
str2 = mir_tstrdup(str2);
JabberHttpUrlDecode(str2);
PROTORECVFILET pre;
pre.flags = PREF_TCHAR;
pre.timestamp = time(NULL);
pre.tszDescription = desc;
pre.ptszFiles = &str2;
pre.fileCount = 1;
pre.lParam = (LPARAM)ft;
ProtoChainRecvFile(ft->std.hContact, &pre);
mir_free(str2);
}
else {
// reject
XmlNodeIq iq(_T("error"), pInfo);
HXML e = xmlAddChild(iq, _T("error"), _T("File transfer refused")); xmlAddAttr(e, _T("code"), 406);
m_ThreadInfo->send(iq);
delete ft;
}
return TRUE;
}
BOOL CJabberProto::OnRosterPushRequest(HXML, CJabberIqInfo *pInfo)
{
HXML queryNode = pInfo->GetChildNode();
// RFC 3921 #7.2 Business Rules
if (pInfo->GetFrom()) {
TCHAR *szFrom = JabberPrepareJid(pInfo->GetFrom());
if (!szFrom)
return TRUE;
TCHAR *szTo = JabberPrepareJid(m_ThreadInfo->fullJID);
if (!szTo) {
mir_free(szFrom);
return TRUE;
}
TCHAR *pDelimiter = _tcschr(szFrom, _T('/'));
if (pDelimiter) *pDelimiter = 0;
pDelimiter = _tcschr(szTo, _T('/'));
if (pDelimiter) *pDelimiter = 0;
BOOL bRetVal = _tcscmp(szFrom, szTo) == 0;
mir_free(szFrom);
mir_free(szTo);
// invalid JID
if (!bRetVal) {
debugLogA("<iq/> attempt to hack via roster push from %S", pInfo->GetFrom());
return TRUE;
}
}
JABBER_LIST_ITEM *item;
HANDLE hContact = NULL;
const TCHAR *jid, *str, *name;
TCHAR *nick;
debugLogA("<iq/> Got roster push, query has %d children", xmlGetChildCount(queryNode));
for (int i=0; ; i++) {
HXML itemNode = xmlGetChild(queryNode ,i);
if (!itemNode)
break;
if (_tcscmp(xmlGetName(itemNode), _T("item")) != 0)
continue;
if ((jid = xmlGetAttrValue(itemNode, _T("jid"))) == NULL)
continue;
if ((str = xmlGetAttrValue(itemNode, _T("subscription"))) == NULL)
continue;
// we will not add new account when subscription=remove
if (!_tcscmp(str, _T("to")) || !_tcscmp(str, _T("both")) || !_tcscmp(str, _T("from")) || !_tcscmp(str, _T("none"))) {
if ((name = xmlGetAttrValue(itemNode, _T("name"))) != NULL)
nick = mir_tstrdup(name);
else
nick = JabberNickFromJID(jid);
if (nick != NULL) {
if ((item=ListAdd(LIST_ROSTER, jid)) != NULL) {
replaceStrT(item->nick, nick);
HXML groupNode = xmlGetChild(itemNode , "group");
replaceStrT(item->group, xmlGetText(groupNode));
if ((hContact=HContactFromJID(jid, 0)) == NULL) {
// Received roster has a new JID.
// Add the jid (with empty resource) to Miranda contact list.
hContact = DBCreateContact(jid, nick, FALSE, FALSE);
}
else setTString(hContact, "jid", jid);
if (name != NULL) {
ptrT tszNick( getTStringA(hContact, "Nick"));
if (tszNick != NULL) {
if (_tcscmp(nick, tszNick) != 0)
db_set_ts(hContact, "CList", "MyHandle", nick);
else
db_unset(hContact, "CList", "MyHandle");
}
else db_set_ts(hContact, "CList", "MyHandle", nick);
}
else db_unset(hContact, "CList", "MyHandle");
if (!m_options.IgnoreRosterGroups) {
if (item->group != NULL) {
Clist_CreateGroup(0, item->group);
db_set_ts(hContact, "CList", "Group", item->group);
}
else db_unset(hContact, "CList", "Group");
}
}
mir_free(nick);
}
}
if ((item=ListGetItemPtr(LIST_ROSTER, jid)) != NULL) {
if (!_tcscmp(str, _T("both"))) item->subscription = SUB_BOTH;
else if (!_tcscmp(str, _T("to"))) item->subscription = SUB_TO;
else if (!_tcscmp(str, _T("from"))) item->subscription = SUB_FROM;
else item->subscription = SUB_NONE;
debugLogA("Roster push for jid=%S, set subscription to %S", jid, str);
// subscription = remove is to remove from roster list
// but we will just set the contact to offline and not actually
// remove, so that history will be retained.
if (!_tcscmp(str, _T("remove"))) {
if ((hContact=HContactFromJID(jid)) != NULL) {
SetContactOfflineStatus(hContact);
ListRemove(LIST_ROSTER, jid);
}
}
else if ( isChatRoom(hContact))
db_unset(hContact, "CList", "Hidden");
else
UpdateSubscriptionInfo(hContact, item);
}
}
UI_SAFE_NOTIFY(m_pDlgServiceDiscovery, WM_JABBER_TRANSPORT_REFRESH);
RebuildInfoFrame();
return TRUE;
}
virtual INT_PTR DlgProc(UINT msg, WPARAM wParam, LPARAM lParam)
{
switch(msg) {
case WM_CTLCOLORSTATIC:
switch(GetDlgCtrlID((HWND)lParam)) {
case IDC_WHITERECT: case IDC_INSTRUCTION: case IDC_TITLE:
return (INT_PTR)GetStockObject(WHITE_BRUSH);
default:
return NULL;
}
case WM_JABBER_REGINPUT_ACTIVATE:
if (wParam == 1) { // success
// lParam = <iq/> node from agent JID as a result of "get jabber:iq:register"
HWND hFrame = GetDlgItem(m_hwnd, IDC_FRAME);
ShowWindow(GetDlgItem(m_hwnd, IDC_FRAME_TEXT), SW_HIDE);
HXML queryNode, xNode;
if ((m_agentRegIqNode = (HXML)lParam) == NULL) return TRUE;
if ((queryNode = xmlGetChild(m_agentRegIqNode , "query")) == NULL) return TRUE;
RECT rect;
m_curPos = 0;
GetClientRect(GetDlgItem(m_hwnd, IDC_FRAME), &(m_frameRect));
GetClientRect(GetDlgItem(m_hwnd, IDC_VSCROLL), &rect);
m_frameRect.right -= (rect.right - rect.left);
GetClientRect(GetDlgItem(m_hwnd, IDC_FRAME), &rect);
m_frameHeight = rect.bottom - rect.top;
if ((xNode=xmlGetChild(queryNode , "x")) != NULL) {
// use new jabber:x:data form
if (LPCTSTR ptszInstr = xmlGetText( xmlGetChild(xNode, "instructions")))
JabberFormSetInstruction(m_hwnd, ptszInstr);
JabberFormCreateUI(hFrame, xNode, &m_formHeight /*dummy*/);
}
else {
// use old registration information form
HJFORMLAYOUT layout_info = JabberFormCreateLayout(hFrame);
for (int i=0; ; i++) {
HXML n = xmlGetChild(queryNode ,i);
if (n == NULL)
break;
if (xmlGetName(n)) {
if (!lstrcmp(xmlGetName(n), _T("instructions"))) {
JabberFormSetInstruction(m_hwnd, xmlGetText(n));
}
else if (!lstrcmp(xmlGetName(n), _T("key")) || !lstrcmp(xmlGetName(n), _T("registered"))) {
// do nothing
}
else if (!lstrcmp(xmlGetName(n), _T("password")))
JabberFormAppendControl(hFrame, layout_info, JFORM_CTYPE_TEXT_PRIVATE, xmlGetName(n), xmlGetText(n));
else // everything else is a normal text field
JabberFormAppendControl(hFrame, layout_info, JFORM_CTYPE_TEXT_SINGLE, xmlGetName(n), xmlGetText(n));
} }
JabberFormLayoutControls(hFrame, layout_info, &m_formHeight);
mir_free(layout_info);
}
if (m_formHeight > m_frameHeight) {
HWND hwndScroll;
hwndScroll = GetDlgItem(m_hwnd, IDC_VSCROLL);
EnableWindow(hwndScroll, TRUE);
SetScrollRange(hwndScroll, SB_CTL, 0, m_formHeight - m_frameHeight, FALSE);
m_curPos = 0;
}
EnableWindow(GetDlgItem(m_hwnd, IDC_SUBMIT), TRUE);
}
else if (wParam == 0) {
// lParam = error message
SetDlgItemText(m_hwnd, IDC_FRAME_TEXT, (LPCTSTR) lParam);
}
return TRUE;
case WM_VSCROLL:
int pos = m_curPos;
switch (LOWORD(wParam)) {
case SB_LINEDOWN: pos += 10; break;
case SB_LINEUP: pos -= 10; break;
case SB_PAGEDOWN: pos += (m_frameHeight - 10); break;
case SB_PAGEUP: pos -= (m_frameHeight - 10); break;
case SB_THUMBTRACK: pos = HIWORD(wParam); break;
}
if (pos > (m_formHeight - m_frameHeight))
pos = m_formHeight - m_frameHeight;
if (pos < 0)
pos = 0;
if (m_curPos != pos) {
ScrollWindow(GetDlgItem(m_hwnd, IDC_FRAME), 0, m_curPos - pos, NULL, &(m_frameRect));
SetScrollPos(GetDlgItem(m_hwnd, IDC_VSCROLL), SB_CTL, pos, TRUE);
m_curPos = pos;
} }
return CJabberDlgBase::DlgProc(msg, wParam, lParam);
}
INT_PTR CSkypeProto::GetEventText(WPARAM, LPARAM lParam)
{
DBEVENTGETTEXT *pEvent = (DBEVENTGETTEXT *)lParam;
CMStringA szText;
BOOL bUseBB = db_get_b(NULL, pEvent->dbei->szModule, "UseBBCodes", 1);
switch (pEvent->dbei->eventType)
{
case SKYPE_DB_EVENT_TYPE_EDITED_MESSAGE:
{
JSONNode jMsg = JSONNode::parse((char*)pEvent->dbei->pBlob);
if (jMsg)
{
JSONNode &jOriginalMsg = jMsg["original_message"];
szText.AppendFormat(bUseBB ? Translate("[b]Original message:[/b]\n%s\n") : Translate("Original message:\n%s\n"), mir_utf8decodeA(jOriginalMsg["text"].as_string().c_str()));
JSONNode &jEdits = jMsg["edits"];
for (auto it = jEdits.begin(); it != jEdits.end(); ++it)
{
const JSONNode &jEdit = *it;
time_t time = jEdit["time"].as_int();
char szTime[MAX_PATH];
strftime(szTime, sizeof(szTime), "%X %x", localtime(&time));
szText.AppendFormat(bUseBB ? Translate("[b]Edited at %s:[/b]\n%s\n") : Translate("Edited at %s:\n%s\n"), szTime, mir_utf8decodeA(jEdit["text"].as_string().c_str()));
}
}
else
{
szText = INVALID_DATA;
}
break;
}
case SKYPE_DB_EVENT_TYPE_CALL_INFO:
{
HXML xml = xmlParseString(ptrT(mir_utf8decodeT((char*)pEvent->dbei->pBlob)), 0, _T("partlist"));
if (xml != NULL)
{
ptrA type(mir_t2a(xmlGetAttrValue(xml, _T("type"))));
bool bType = (!mir_strcmpi(type, "started")) ? 1 : 0;
time_t callDuration = 0;
for (int i = 0; i < xmlGetChildCount(xml); i++)
{
HXML xmlPart = xmlGetNthChild(xml, _T("part"), i);
if (xmlPart != NULL)
{
HXML xmlDuration = xmlGetChildByPath(xmlPart, _T("duration"), 0);
if (xmlDuration != NULL)
{
callDuration = _ttol(xmlGetText(xmlDuration));
xmlDestroyNode(xmlDuration);
xmlDestroyNode(xmlPart);
break;
}
xmlDestroyNode(xmlPart);
}
}
if (bType)
{
szText = Translate("Call");
}
else
{
if (callDuration == 0)
{
szText = Translate("Call missed");
}
else
{
char szTime[100];
strftime(szTime, sizeof(szTime), "%X", gmtime(&callDuration));
szText.Format(Translate("Call ended (%s)"), szTime);
}
}
xmlDestroyNode(xml);
}
else
{
szText = INVALID_DATA;
}
break;
}
case SKYPE_DB_EVENT_TYPE_FILETRANSFER_INFO:
{
HXML xml = xmlParseString(ptrT(mir_utf8decodeT((char*)pEvent->dbei->pBlob)), 0, _T("files"));
if (xml != NULL)
{
for (int i = 0; i < xmlGetChildCount(xml); i++)
{
LONGLONG fileSize = 0;
HXML xmlNode = xmlGetNthChild(xml, _T("file"), i);
if (xmlNode != NULL)
{
fileSize = _ttol(xmlGetAttrValue(xmlNode, _T("size")));
char *fileName = _T2A(xmlGetText(xmlNode));
if (fileName != NULL)
{
szText.AppendFormat(Translate("File transfer:\n\tFile name: %s \n\tSize: %lld bytes \n"), fileName, fileSize);
}
xmlDestroyNode(xmlNode);
}
}
xmlDestroyNode(xml);
}
else
{
szText = INVALID_DATA;
}
break;
}
case SKYPE_DB_EVENT_TYPE_MOJI:
case SKYPE_DB_EVENT_TYPE_URIOBJ:
{
HXML xml = xmlParseString(ptrT(mir_utf8decodeT((char*)pEvent->dbei->pBlob)), 0, _T("URIObject"));
if (xml != NULL)
{
szText.Append(_T2A(xmlGetText(xml)));
HXML xmlA = xmlGetChildByPath(xml, _T("a"), 0);
if (xmlA != NULL)
{
szText += _T2A(xmlGetAttrValue(xmlA, _T("href")));
xmlDestroyNode(xmlA);
}
xmlDestroyNode(xml);
}
else
{
szText = INVALID_DATA;
}
break;
}
case SKYPE_DB_EVENT_TYPE_INCOMING_CALL:
{
szText = Translate("Incoming call");
break;
}
case SKYPE_DB_EVENT_TYPE_UNKNOWN:
{
szText.Format(Translate("Unknown event, please send this text for developer: \"%s\""), mir_utf8decodeA((char*)pEvent->dbei->pBlob));
break;
}
default:
{
szText = ptrA(mir_utf8decodeA((char*)pEvent->dbei->pBlob));
}
}
switch(pEvent->datatype)
{
case DBVT_TCHAR:
{
return (INT_PTR)mir_a2t(szText);
}
case DBVT_ASCIIZ:
{
return (INT_PTR)szText.Detach();
}
case DBVT_UTF8:
{
return (INT_PTR)mir_utf8encode(szText);
}
default:
{
return NULL;
}
}
}
void CSkypeProto::OnChatEvent(const JSONNode &node)
{
//std::string clientMsgId = node["clientmessageid"].as_string();
//std::string skypeEditedId = node["skypeeditedid"].as_string();
std::string fromLink = node["from"].as_string();
CMStringA from(ContactUrlToName(fromLink.c_str()));
time_t timestamp = IsoToUnixTime(node["composetime"].as_string().c_str());
std::string content = node["content"].as_string();
int emoteOffset = node["skypeemoteoffset"].as_int();
std::string conversationLink = node["conversationLink"].as_string();
CMStringA chatname(ChatUrlToName(conversationLink.c_str()));
CMString topic(node["threadtopic"].as_mstring());
if (FindChatRoom(chatname) == NULL)
SendRequest(new GetChatInfoRequest(m_szRegToken, chatname, m_szServer), &CSkypeProto::OnGetChatInfo, topic.Detach());
std::string messageType = node["messagetype"].as_string();
if (!mir_strcmpi(messageType.c_str(), "Text") || !mir_strcmpi(messageType.c_str(), "RichText"))
{
AddMessageToChat(_A2T(chatname), _A2T(from), content.c_str(), emoteOffset != NULL, emoteOffset, timestamp);
}
else if (!mir_strcmpi(messageType.c_str(), "ThreadActivity/AddMember"))
{
ptrA xinitiator, xtarget, initiator;
//content = <addmember><eventtime>1429186229164</eventtime><initiator>8:initiator</initiator><target>8:user</target></addmember>
HXML xml = xmlParseString(ptrT(mir_a2t(content.c_str())), 0, _T("addmember"));
if (xml == NULL)
return;
for (int i = 0; i < xmlGetChildCount(xml); i++)
{
HXML xmlNode = xmlGetNthChild(xml, L"target", i);
if (xmlNode == NULL)
break;
xtarget = mir_t2a(xmlGetText(xmlNode));
CMStringA target = ParseUrl(xtarget, "8:");
AddChatContact(_A2T(chatname), target, target, L"User");
}
xmlDestroyNode(xml);
}
else if (!mir_strcmpi(messageType.c_str(), "ThreadActivity/DeleteMember"))
{
ptrA xinitiator, xtarget;
//content = <addmember><eventtime>1429186229164</eventtime><initiator>8:initiator</initiator><target>8:user</target></addmember>
HXML xml = xmlParseString(ptrT(mir_a2t(content.c_str())), 0, _T("deletemember"));
if (xml != NULL) {
HXML xmlNode = xmlGetChildByPath(xml, _T("initiator"), 0);
xinitiator = node != NULL ? mir_t2a(xmlGetText(xmlNode)) : NULL;
xmlNode = xmlGetChildByPath(xml, _T("target"), 0);
xtarget = xmlNode != NULL ? mir_t2a(xmlGetText(xmlNode)) : NULL;
xmlDestroyNode(xml);
}
if (xtarget == NULL)
return;
CMStringA target = ParseUrl(xtarget, "8:");
CMStringA initiator = ParseUrl(xinitiator, "8:");
RemoveChatContact(_A2T(chatname), target, target, true, initiator);
}
else if (!mir_strcmpi(messageType.c_str(), "ThreadActivity/TopicUpdate"))
{
//content=<topicupdate><eventtime>1429532702130</eventtime><initiator>8:user</initiator><value>test topic</value></topicupdate>
ptrA xinitiator, value;
HXML xml = xmlParseString(ptrT(mir_a2t(content.c_str())), 0, _T("topicupdate"));
if (xml != NULL) {
HXML xmlNode = xmlGetChildByPath(xml, _T("initiator"), 0);
xinitiator = xmlNode != NULL ? mir_t2a(xmlGetText(xmlNode)) : NULL;
xmlNode = xmlGetChildByPath(xml, _T("value"), 0);
value = xmlNode != NULL ? mir_t2a(xmlGetText(xmlNode)) : NULL;
xmlDestroyNode(xml);
}
CMStringA initiator = ParseUrl(xinitiator, "8:");
RenameChat(chatname, value);
ChangeChatTopic(chatname, value, initiator);
}
else if (!mir_strcmpi(messageType.c_str(), "ThreadActivity/RoleUpdate"))
{
//content=<roleupdate><eventtime>1429551258363</eventtime><initiator>8:user</initiator><target><id>8:user1</id><role>admin</role></target></roleupdate>
ptrA xinitiator, xId, xRole;
HXML xml = xmlParseString(ptrT(mir_a2t(content.c_str())), 0, _T("roleupdate"));
if (xml != NULL) {
HXML xmlNode = xmlGetChildByPath(xml, _T("initiator"), 0);
xinitiator = xmlNode != NULL ? mir_t2a(xmlGetText(xmlNode)) : NULL;
xmlNode = xmlGetChildByPath(xml, _T("target"), 0);
if (xmlNode != NULL)
{
HXML xmlId = xmlGetChildByPath(xmlNode, _T("id"), 0);
HXML xmlRole = xmlGetChildByPath(xmlNode, _T("role"), 0);
xId = xmlId != NULL ? mir_t2a(xmlGetText(xmlId)) : NULL;
xRole = xmlRole != NULL ? mir_t2a(xmlGetText(xmlRole)) : NULL;
}
xmlDestroyNode(xml);
CMStringA initiator = ParseUrl(xinitiator, "8:");
CMStringA id = ParseUrl(xId, "8:");
GCDEST gcd = { m_szModuleName, _A2T(chatname), !mir_strcmpi(xRole, "Admin") ? GC_EVENT_ADDSTATUS : GC_EVENT_REMOVESTATUS };
GCEVENT gce = { sizeof(gce), &gcd };
ptrT tszId(mir_a2t(id));
ptrT tszRole(mir_a2t(xRole));
ptrT tszInitiator(mir_a2t(initiator));
gce.pDest = &gcd;
gce.dwFlags = GCEF_ADDTOLOG;
gce.ptszNick = tszId;
gce.ptszUID = tszId;
gce.ptszText = tszInitiator;
gce.time = time(NULL);
gce.bIsMe = IsMe(id);
gce.ptszStatus = TranslateT("Admin");
CallServiceSync(MS_GC_EVENT, 0, (LPARAM)&gce);
}
}
}