1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
|
#include "commonheaders.h"
// разбивает сообщение szMsg на части длиной iLen, возвращает строку вида PARTzPARTzz
LPSTR splitMsg(LPSTR szMsg, int iLen) {
#if defined(_DEBUG) || defined(NETLIB_LOG)
Sent_NetLog("split: msg: -----\n%s\n-----\n",szMsg);
#endif
int len = (int)strlen(szMsg);
LPSTR out = (LPSTR) mir_alloc(len*2);
LPSTR buf = out;
WORD msg_id = DBGetContactSettingWord(0, szModuleName, "msgid", 0) + 1;
DBWriteContactSettingWord(0, szModuleName, "msgid", msg_id);
int part_all = (len+iLen-1)/iLen;
for(int part_num=0; part_num<part_all; part_num++) {
int sz = (len>iLen)?iLen:len;
mir_snprintf(buf,32,"%s%04X%02X%02X",SIG_SECP,msg_id,part_num,part_all);
memcpy(buf+LEN_SECP+8,szMsg,sz);
*(buf+LEN_SECP+8+sz) = '\0';
#if defined(_DEBUG) || defined(NETLIB_LOG)
Sent_NetLog("split: part: %s",buf);
#endif
buf += LEN_SECP+8+sz+1;
szMsg += sz;
len -= sz;
}
*buf = '\0';
return out;
}
// собираем сообщение из частей, части храним в структуре у контакта
LPSTR combineMessage(pUinKey ptr, LPSTR szMsg) {
#if defined(_DEBUG) || defined(NETLIB_LOG)
Sent_NetLog("combine: part: %s",szMsg);
#endif
int msg_id,part_num,part_all;
sscanf(szMsg,"%4X%2X%2X",&msg_id,&part_num,&part_all);
//
pPM ppm = NULL, pm = ptr->msgPart;
if( !ptr->msgPart ) {
pm = ptr->msgPart = new partitionMessage;
memset(pm,0,sizeof(partitionMessage));
pm->id = msg_id;
pm->message = new LPSTR[part_all];
memset(pm->message,0,sizeof(LPSTR)*part_all);
}
else
while(pm) {
if( pm->id == msg_id ) break;
ppm = pm; pm = pm->nextMessage;
}
if(!pm) { // nothing to found
pm = ppm->nextMessage = new partitionMessage;
memset(pm,0,sizeof(partitionMessage));
pm->id = msg_id;
pm->message = new LPSTR[part_all];
memset(pm->message,0,sizeof(LPSTR)*part_all);
}
pm->message[part_num] = new char[strlen(szMsg)];
strcpy(pm->message[part_num],szMsg+8);
#if defined(_DEBUG) || defined(NETLIB_LOG)
Sent_NetLog("combine: save part: %s",pm->message[part_num]);
#endif
int len=0,i;
for( i=0; i<part_all; i++ ){
if(pm->message[i]==NULL) break;
len+=(int)strlen(pm->message[i]);
}
if( i==part_all ) { // combine message
SAFE_FREE(ptr->tmp);
ptr->tmp = (LPSTR) mir_alloc(len+1); *(ptr->tmp)='\0';
for( i=0; i<part_all; i++ ){
strcat(ptr->tmp,pm->message[i]);
delete pm->message[i];
}
delete pm->message;
if(ppm) ppm->nextMessage = pm->nextMessage;
else ptr->msgPart = pm->nextMessage;
delete pm;
#if defined(_DEBUG) || defined(NETLIB_LOG)
Sent_NetLog("combine: all parts: -----\n%s\n-----\n", ptr->tmp);
#endif
// собрали одно сообщение
return ptr->tmp;
}
#if defined(_DEBUG) || defined(NETLIB_LOG)
Sent_NetLog("combine: not all parts");
#endif
// еще не собрали
return NULL;
}
// отправляет сообщение, если надо то разбивает на части
int splitMessageSend(pUinKey ptr, LPSTR szMsg) {
int ret;
int len = (int)strlen(szMsg);
int par = (getContactStatus(ptr->hContact)==ID_STATUS_OFFLINE)?ptr->proto->split_off:ptr->proto->split_on;
if( par && len>par ) {
LPSTR msg = splitMsg(szMsg,par);
LPSTR buf = msg;
while( *buf ) {
len = (int)strlen(buf);
LPSTR tmp = mir_strdup(buf);
ret = CallContactService(ptr->hContact,PSS_MESSAGE,(WPARAM)PREF_METANODB,(LPARAM)tmp);
mir_free(tmp);
buf += len+1;
}
SAFE_FREE(msg);
}
else {
ret = CallContactService(ptr->hContact,PSS_MESSAGE,(WPARAM)PREF_METANODB,(LPARAM)szMsg);
}
return ret;
}
// EOF
|
