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
|
#include "commonheaders.h"
// разбивает сообщение szMsg на части длиной iLen, возвращает строку вида PARTzPARTzz
LPSTR splitMsg(LPSTR szMsg, int iLen)
{
Sent_NetLog("split: msg: -----\n%s\n-----\n", szMsg);
size_t len = mir_strlen(szMsg);
LPSTR out = (LPSTR)mir_alloc(len * 2);
LPSTR buf = out;
WORD msg_id = db_get_w(0, MODULENAME, "msgid", 0) + 1;
db_set_w(0, MODULENAME, "msgid", msg_id);
size_t part_all = (len + iLen - 1) / iLen;
for (size_t part_num = 0; part_num<part_all; part_num++) {
size_t 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';
Sent_NetLog("split: part: %s", buf);
buf += LEN_SECP + 8 + sz + 1;
szMsg += sz;
len -= sz;
}
*buf = '\0';
return out;
}
// собираем сообщение из частей, части храним в структуре у контакта
LPSTR combineMessage(pUinKey ptr, LPSTR szMsg)
{
Sent_NetLog("combine: part: %s", szMsg);
int msg_id, part_num, part_all;
sscanf(szMsg, "%4X%2X%2X", &msg_id, &part_num, &part_all);
//
pPM ppm = nullptr, 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[mir_strlen(szMsg)];
mir_strcpy(pm->message[part_num], szMsg + 8);
Sent_NetLog("combine: save part: %s", pm->message[part_num]);
int len = 0, i;
for (i = 0; i < part_all; i++) {
if (pm->message[i] == nullptr) break;
len += (int)mir_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++) {
mir_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;
Sent_NetLog("combine: all parts: -----\n%s\n-----\n", ptr->tmp);
// combined one message
return ptr->tmp;
}
Sent_NetLog("combine: not all parts");
// not combined yet
return nullptr;
}
// отправляет сообщение, если надо то разбивает на части
int splitMessageSend(pUinKey ptr, LPSTR szMsg)
{
int len = (int)mir_strlen(szMsg);
int par = (getContactStatus(ptr->hContact) == ID_STATUS_OFFLINE) ? ptr->proto->split_off : ptr->proto->split_on;
if (par && len > par) {
int ret;
LPSTR msg = splitMsg(szMsg, par);
LPSTR buf = msg;
while (*buf) {
len = (int)mir_strlen(buf);
LPSTR tmp = mir_strdup(buf);
ret = ProtoChainSend(ptr->hContact, PSS_MESSAGE, (WPARAM)PREF_METANODB, (LPARAM)tmp);
mir_free(tmp);
buf += len + 1;
}
SAFE_FREE(msg);
return ret;
}
return (int)ProtoChainSend(ptr->hContact, PSS_MESSAGE, (WPARAM)PREF_METANODB, (LPARAM)szMsg);
}
|