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
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
|
#include "commonheaders.h"
void *operator new(size_t sz) {
return mir_alloc(sz);
}
void *operator new[](size_t size) {
return operator new(size);
}
void operator delete(void *p) {
mir_free(p);
}
void operator delete[](void * p) {
operator delete(p);
}
// ANSIzUCS2z + ANSIzUCS2z = ANSIzUCS2z
char *m_wwstrcat(LPCSTR strA, LPCSTR strB) {
int lenA = (int)strlen(strA);
int lenB = (int)strlen(strB);
LPSTR str = (LPSTR)mir_alloc((lenA+lenB+1)*(sizeof(WCHAR)+1));
memcpy(str, strA, lenA);
memcpy(str+lenA, strB, lenB+1);
memcpy(str+lenA+lenB+1, strA+lenA+1, lenA*sizeof(WCHAR));
memcpy(str+lenA+lenB+1+lenA*sizeof(WCHAR), strB+lenB+1, (lenB+1)*sizeof(WCHAR));
return str;
}
// ANSIz + ANSIzUCS2z = ANSIzUCS2z
char *m_awstrcat(LPCSTR strA, LPCSTR strB) {
int lenA = (int)strlen(strA);
LPSTR tmpA = (LPSTR)mir_alloc((lenA+1)*(sizeof(WCHAR)+1));
strcpy(tmpA, strA);
MultiByteToWideChar(CP_ACP, 0, strA, -1, (LPWSTR)(tmpA+lenA+1), (lenA+1)*sizeof(WCHAR));
LPSTR str = m_wwstrcat(tmpA, strB);
mir_free(tmpA);
return str;
}
// ANSIz + ANSIz = ANSIzUCS2z
char *m_aastrcat(LPCSTR strA, LPCSTR strB) {
int lenA = (int)strlen(strA);
int lenB = (int)strlen(strB);
LPSTR str = (LPSTR)mir_alloc((lenA+lenB+1)*(sizeof(WCHAR)+1));
strcpy(str,strA);
strcat(str,strB);
MultiByteToWideChar(CP_ACP, 0, str, -1, (LPWSTR)(str+lenA+lenB+1), (lenA+lenB+1)*sizeof(WCHAR));
return str;
}
LPSTR m_string = NULL;
// ANSIz + ANSIz = ANSIz
char *m_ustrcat(LPCSTR strA, LPCSTR strB) {
SAFE_FREE(m_string);
m_string = (LPSTR) mir_alloc(strlen(strA)+strlen(strB)+1);
strcpy(m_string,strA); strcat(m_string,strB);
return m_string;
}
LPSTR m_hex = NULL;
LPSTR to_hex(PBYTE bin, int len) {
SAFE_FREE(m_hex);
m_hex = (LPSTR) mir_alloc(len*3+1);
LPSTR m_ptr = m_hex;
for( int i=0; i<len; i++ ) {
if( i ) {
*m_ptr = ' '; m_ptr++;
}
mir_snprintf(m_ptr,4,"%02X",bin[i]);
m_ptr += 2;
}
*m_ptr = 0;
return m_hex;
}
void __fastcall safe_free(void** p)
{
if (*p) {
mir_free(*p);
*p = NULL;
}
}
void __fastcall safe_delete(void** p)
{
if (*p) {
delete(*p);
*p = NULL;
}
}
// преобразуем текст из чистого UTF8 в формат миранды
LPSTR utf8_to_miranda(LPCSTR szUtfMsg, DWORD& flags) {
LPSTR szNewMsg;
if( iCoreVersion < 0x00060000 ) {
flags &= ~(PREF_UTF|PREF_UNICODE);
LPWSTR wszMsg = exp->utf8decode(szUtfMsg);
LPSTR szMsg = mir_u2a(wszMsg);
if( bCoreUnicode ) {
flags |= PREF_UNICODE;
int olen = (int)wcslen((LPWSTR)wszMsg)+1;
int nlen = olen*(sizeof(WCHAR)+1);
szNewMsg = (LPSTR) mir_alloc(nlen);
memcpy(szNewMsg,szMsg,olen);
memcpy(szNewMsg+olen,wszMsg,olen*sizeof(WCHAR));
mir_free(szMsg);
}
else {
szNewMsg = szMsg;
}
}
else {
flags &= ~PREF_UNICODE; flags |= PREF_UTF;
szNewMsg = (LPSTR) mir_strdup(szUtfMsg);
}
return szNewMsg;
}
// преобразуем текст из формата миранды в чистый UTF8
LPSTR miranda_to_utf8(LPCSTR szMirMsg, DWORD flags) {
LPSTR szNewMsg;
if(flags & PREF_UTF) {
szNewMsg = (LPSTR) szMirMsg;
}
else
if(flags & PREF_UNICODE) {
szNewMsg = exp->utf8encode((LPCWSTR)(szMirMsg+strlen(szMirMsg)+1));
}
else {
LPWSTR wszMirMsg = mir_a2u(szMirMsg);
szNewMsg = exp->utf8encode((LPCWSTR)wszMirMsg);
mir_free(wszMirMsg);
}
return mir_strdup(szNewMsg);
}
// EOF
|