void CIcqProto::handleServUINSettings(int nPort, serverthread_info *info)
{
setUserInfo();
/* SNAC 3,4: Tell server who's on our list (deprecated) */
/* SNAC 3,15: Try to add unauthorised contacts to temporary list */
sendEntireListServ(ICQ_BUDDY_FAMILY, ICQ_USER_ADDTOTEMPLIST, BUL_ALLCONTACTS);
if (m_iDesiredStatus == ID_STATUS_INVISIBLE) {
/* Tell server who's on our visible list (deprecated) */
if (!m_bSsiEnabled)
sendEntireListServ(ICQ_BOS_FAMILY, ICQ_CLI_ADDVISIBLE, BUL_VISIBLE);
else
updateServVisibilityCode(3);
}
if (m_iDesiredStatus != ID_STATUS_INVISIBLE) {
/* Tell server who's on our invisible list (deprecated) */
if (!m_bSsiEnabled)
sendEntireListServ(ICQ_BOS_FAMILY, ICQ_CLI_ADDINVISIBLE, BUL_INVISIBLE);
else
updateServVisibilityCode(4);
}
// SNAC 1,1E: Set status
icq_packet packet;
{
DWORD dwDirectCookie = rand() ^ (rand() << 16);
// Get status
WORD wStatus = MirandaStatusToIcq(m_iDesiredStatus);
// Get status note & mood
char *szStatusNote = PrepareStatusNote(m_iDesiredStatus);
BYTE bXStatus = getContactXStatus(NULL);
char szMoodData[32];
// prepare mood id
if (m_bMoodsEnabled && bXStatus && moodXStatus[bXStatus - 1] != -1)
mir_snprintf(szMoodData, "icqmood%d", moodXStatus[bXStatus - 1]);
else
szMoodData[0] = '\0';
//! Tricky code, this ensures that the status note will be saved to the directory
SetStatusNote(szStatusNote, m_bGatewayMode ? 5000 : 2500, TRUE);
size_t wStatusNoteLen = mir_strlen(szStatusNote);
size_t wStatusMoodLen = mir_strlen(szMoodData);
size_t wSessionDataLen = (wStatusNoteLen ? wStatusNoteLen + 4 : 0) + 4 + wStatusMoodLen + 4;
serverPacketInit(&packet, 71 + (wSessionDataLen ? wSessionDataLen + 4 : 0));
packFNACHeader(&packet, ICQ_SERVICE_FAMILY, ICQ_CLIENT_SET_STATUS);
packDWord(&packet, 0x00060004); // TLV 6: Status mode and security flags
packWord(&packet, GetMyStatusFlags()); // Status flags
packWord(&packet, wStatus); // Status
packTLVWord(&packet, 0x0008, 0x0A06); // TLV 8: Independent Status Messages
packDWord(&packet, 0x000c0025); // TLV C: Direct connection info
packDWord(&packet, getDword("RealIP", 0));
packDWord(&packet, nPort);
packByte(&packet, DC_TYPE); // TCP/FLAG firewall settings
packWord(&packet, ICQ_VERSION);
packDWord(&packet, dwDirectCookie); // DC Cookie
packDWord(&packet, WEBFRONTPORT); // Web front port
packDWord(&packet, CLIENTFEATURES); // Client features
packDWord(&packet, 0x7fffffff); // Abused timestamp
packDWord(&packet, ICQ_PLUG_VERSION); // Abused timestamp
if (ServiceExists("SecureIM/IsContactSecured"))
packDWord(&packet, 0x5AFEC0DE); // SecureIM Abuse
else
packDWord(&packet, 0x00000000); // Timestamp
packWord(&packet, 0x0000); // Unknown
packTLVWord(&packet, 0x001F, 0x0000);
if (wSessionDataLen) { // Pack session data
packWord(&packet, 0x1D); // TLV 1D
packWord(&packet, WORD(wSessionDataLen)); // TLV length
packWord(&packet, 0x02); // Item Type
if (wStatusNoteLen) {
packWord(&packet, 0x400 | WORD(wStatusNoteLen + 4)); // Flags + Item Length
packWord(&packet, WORD(wStatusNoteLen)); // Text Length
packBuffer(&packet, (LPBYTE)szStatusNote, wStatusNoteLen);
packWord(&packet, 0); // Encoding not specified (utf-8 is default)
}
else
packWord(&packet, 0); // Flags + Item Length
packWord(&packet, 0x0E); // Item Type
packWord(&packet, WORD(wStatusMoodLen)); // Flags + Item Length
if (wStatusMoodLen)
packBuffer(&packet, (LPBYTE)szMoodData, wStatusMoodLen); // Mood
// Save current status note & mood
db_set_utf(NULL, m_szModuleName, DBSETTING_STATUS_NOTE, szStatusNote);
setString(DBSETTING_STATUS_MOOD, szMoodData);
}
// Release memory
SAFE_FREE(&szStatusNote);
sendServPacket(&packet);
}
/* SNAC 1,11 */
serverPacketInit(&packet, 14);
packFNACHeader(&packet, ICQ_SERVICE_FAMILY, ICQ_CLIENT_SET_IDLE);
packDWord(&packet, 0x00000000);
sendServPacket(&packet);
m_bIdleAllow = 0;
// Change status
SetCurrentStatus(m_iDesiredStatus);
// Finish Login sequence
serverPacketInit(&packet, 98);
packFNACHeader(&packet, ICQ_SERVICE_FAMILY, ICQ_CLIENT_READY);
packDWord(&packet, 0x00220001); // imitate ICQ 6 behaviour
packDWord(&packet, 0x0110164f);
packDWord(&packet, 0x00010004);
packDWord(&packet, 0x0110164f);
packDWord(&packet, 0x00130004);
packDWord(&packet, 0x0110164f);
packDWord(&packet, 0x00020001);
packDWord(&packet, 0x0110164f);
packDWord(&packet, 0x00030001);
packDWord(&packet, 0x0110164f);
packDWord(&packet, 0x00150001);
packDWord(&packet, 0x0110164f);
packDWord(&packet, 0x00040001);
packDWord(&packet, 0x0110164f);
packDWord(&packet, 0x00060001);
packDWord(&packet, 0x0110164f);
packDWord(&packet, 0x00090001);
packDWord(&packet, 0x0110164f);
packDWord(&packet, 0x000A0001);
packDWord(&packet, 0x0110164f);
packDWord(&packet, 0x000B0001);
packDWord(&packet, 0x0110164f);
sendServPacket(&packet);
debugLogA(" *** Yeehah, login sequence complete");
// login sequence is complete enter logged-in mode
info->bLoggedIn = true;
m_bConnectionLost = false;
// enable auto info-update routine
icq_EnableUserLookup(true);
if (!info->isMigrating) {
// Get Offline Messages Reqeust
cookie_offline_messages *ack = (cookie_offline_messages*)SAFE_MALLOC(sizeof(cookie_offline_messages));
if (ack) {
DWORD dwCookie = AllocateCookie(CKT_OFFLINEMESSAGE, ICQ_MSG_CLI_REQ_OFFLINE, 0, ack);
serverPacketInit(&packet, 10);
packFNACHeader(&packet, ICQ_MSG_FAMILY, ICQ_MSG_CLI_REQ_OFFLINE, 0, dwCookie);
sendServPacket(&packet);
}
else icq_LogMessage(LOG_WARNING, LPGEN("Failed to request offline messages. They may be received next time you log in."));
// Update our information from the server
sendOwnerInfoRequest();
// Request info updates on all contacts
icq_RescanInfoUpdate();
// Start sending Keep-Alive packets
StartKeepAlive(info);
if (m_bAvatarsEnabled) { // Send SNAC 1,4 - request avatar family 0x10 connection
icq_requestnewfamily(ICQ_AVATAR_FAMILY, &CIcqProto::StartAvatarThread);
m_avatarsConnectionPending = TRUE;
debugLogA("Requesting Avatar family entry point.");
}
// Set last xstatus
updateServerCustomStatus(TRUE);
}
info->isMigrating = false;
if (m_bAimEnabled) {
char **szAwayMsg = NULL;
mir_cslock l(m_modeMsgsMutex);
szAwayMsg = MirandaStatusToAwayMsg(m_iStatus);
if (szAwayMsg)
icq_sendSetAimAwayMsgServ(*szAwayMsg);
}
}
void __cdecl CIcqProto::ServerThread(serverthread_start_info *infoParam)
{
serverthread_info info = {0};
info.isLoginServer = 1;
info.wAuthKeyLen = infoParam->wPassLen;
null_strcpy((char*)info.szAuthKey, infoParam->szPass, info.wAuthKeyLen);
// store server port
info.wServerPort = infoParam->nloc.wPort;
srand(time(NULL));
ResetSettingsOnConnect();
// Connect to the login server
NetLog_Server("Authenticating to server");
{
NETLIBOPENCONNECTION nloc = infoParam->nloc;
nloc.timeout = 6;
if (m_bGatewayMode)
nloc.flags |= NLOCF_HTTPGATEWAY;
hServerConn = NetLib_OpenConnection(m_hServerNetlibUser, NULL, &nloc);
SAFE_FREE((void**)&nloc.szHost);
SAFE_FREE((void**)&infoParam);
if (hServerConn && m_bSecureConnection)
{
if (!CallService(MS_NETLIB_STARTSSL, (WPARAM)hServerConn, 0))
{
icq_LogMessage(LOG_ERROR, LPGEN("Unable to connect to ICQ login server, SSL could not be negotiated"));
SetCurrentStatus(ID_STATUS_OFFLINE);
NetLib_CloseConnection(&hServerConn, TRUE);
return;
}
}
}
// Login error
if (hServerConn == NULL)
{
DWORD dwError = GetLastError();
SetCurrentStatus(ID_STATUS_OFFLINE);
icq_LogUsingErrorCode(LOG_ERROR, dwError, LPGEN("Unable to connect to ICQ login server"));
return;
}
// Initialize direct connection ports
{
DWORD dwInternalIP;
BYTE bConstInternalIP = getSettingByte(NULL, "ConstRealIP", 0);
info.hDirectBoundPort = NetLib_BindPort(icq_newConnectionReceived, this, &wListenPort, &dwInternalIP);
if (!info.hDirectBoundPort)
{
icq_LogUsingErrorCode(LOG_WARNING, GetLastError(), LPGEN("Miranda was unable to allocate a port to listen for direct peer-to-peer connections between clients. You will be able to use most of the ICQ network without problems but you may be unable to send or receive files.\n\nIf you have a firewall this may be blocking Miranda, in which case you should configure your firewall to leave some ports open and tell Miranda which ports to use in M->Options->ICQ->Network."));
wListenPort = 0;
if (!bConstInternalIP) deleteSetting(NULL, "RealIP");
}
else if (!bConstInternalIP)
setSettingDword(NULL, "RealIP", dwInternalIP);
}
// Initialize rate limiting queues
{
icq_lock l(m_ratesMutex);
m_ratesQueue_Request = new rates_queue(this, "request", RML_IDLE_30, RML_IDLE_50, 1);
m_ratesQueue_Response = new rates_queue(this, "response", RML_IDLE_10, RML_IDLE_30, -1);
}
// This is the "infinite" loop that receives the packets from the ICQ server
{
int recvResult;
NETLIBPACKETRECVER packetRecv = {0};
info.hPacketRecver = (HANDLE)CallService(MS_NETLIB_CREATEPACKETRECVER, (WPARAM)hServerConn, 0x2400);
packetRecv.cbSize = sizeof(packetRecv);
packetRecv.dwTimeout = INFINITE;
while (serverThreadHandle)
{
if (info.bReinitRecver)
{ // we reconnected, reinit struct
info.bReinitRecver = 0;
ZeroMemory(&packetRecv, sizeof(packetRecv));
packetRecv.cbSize = sizeof(packetRecv);
packetRecv.dwTimeout = INFINITE;
}
recvResult = CallService(MS_NETLIB_GETMOREPACKETS, (WPARAM)info.hPacketRecver, (LPARAM)&packetRecv);
if (recvResult == 0)
{
NetLog_Server("Clean closure of server socket");
break;
}
if (recvResult == SOCKET_ERROR)
{
NetLog_Server("Abortive closure of server socket, error: %d", GetLastError());
break;
}
if (m_iDesiredStatus == ID_STATUS_OFFLINE)
{ // Disconnect requested, send disconnect packet
icq_sendCloseConnection();
// disconnected upon request
m_bConnectionLost = FALSE;
SetCurrentStatus(ID_STATUS_OFFLINE);
NetLog_Server("Logged off.");
break;
}
// Deal with the packet
packetRecv.bytesUsed = handleServerPackets(packetRecv.buffer, packetRecv.bytesAvailable, &info);
}
serverThreadHandle = NULL;
// Time to shutdown
NetLib_CloseConnection(&hServerConn, TRUE);
// Close the packet receiver (connection may still be open)
NetLib_SafeCloseHandle(&info.hPacketRecver);
// Close DC port
NetLib_SafeCloseHandle(&info.hDirectBoundPort);
}
// disable auto info-update thread
icq_EnableUserLookup(FALSE);
if (m_iStatus != ID_STATUS_OFFLINE && m_iDesiredStatus != ID_STATUS_OFFLINE)
{
if (!info.bLoggedIn)
icq_LogMessage(LOG_FATAL, LPGEN("Connection failed.\nLogin sequence failed for unknown reason.\nTry again later."));
// set flag indicating we were kicked out
m_bConnectionLost = TRUE;
SetCurrentStatus(ID_STATUS_OFFLINE);
}
// signal keep-alive thread to stop
StopKeepAlive(&info);
// Close all open DC connections
CloseContactDirectConns(NULL);
// Close avatar connection if any
StopAvatarThread();
// Offline all contacts
HANDLE hContact = FindFirstContact();
while (hContact)
{
DWORD dwUIN;
uid_str szUID;
if (!getContactUid(hContact, &dwUIN, &szUID))
{
if (getContactStatus(hContact) != ID_STATUS_OFFLINE)
{
char tmp = 0;
setSettingWord(hContact, "Status", ID_STATUS_OFFLINE);
handleXStatusCaps(dwUIN, szUID, hContact, (BYTE*)&tmp, 0, &tmp, 0);
}
}
hContact = FindNextContact(hContact);
}
setSettingDword(NULL, "LogonTS", 0); // clear logon time
servlistPendingFlushOperations(); // clear pending operations list
{ // release rates queues
icq_lock l(m_ratesMutex);
SAFE_DELETE((void_struct**)&m_ratesQueue_Request);
SAFE_DELETE((void_struct**)&m_ratesQueue_Response);
SAFE_DELETE((void_struct**)&m_rates);
}
FlushServerIDs(); // clear server IDs list
NetLog_Server("%s thread ended.", "Server");
}
