int main(int argc, const char * argv[])
{
const string_t s1 = "Created by Cator VeeVee on 10/22/13 (cator)";
const string_t s2 = "cator";
const string_t s3 = "Cator";
const string_t s4 = "Wei";
string_t str;
printf("s1 = '%s' \n", s1);
printf("s2 = '%s' \n", s2);
printf("s3 = '%s' \n", s3);
printf("s4 = '%s' \n", s4);
__("strpos"); {
printf("strpos(s1, s2): %ld \n", strpos(s1, s2));
printf("stripos(s1, s2): %ld \n", stripos(s1, s2));
printf("strrpos(s1, s3): %ld \n", strrpos(s1, s3));
printf("strripos(s1, s3): %ld \n", strripos(s1, s3));
printf("strpos(s1, s4): %ld \n", strpos(s1, s4));
printf("stripos(s1, s4): %ld \n", stripos(s1, s4));
printf("strrpos(s1, s4): %ld \n", strrpos(s1, s4));
printf("strripos(s1, s4): %ld \n", strripos(s1, s4));
}
__("copy_substr"); {
str = copy_substr(s1, 11, 5);
printf("copy_substr(s1, 11, 5): '%s'\n", str);
free(str);
str = copy_substr(s1, -6, 5);
printf("copy_substr(s1, -6, 5): '%s'\n", str);
free(str);
str = copy_substr(s1, -6, -1);
printf("copy_substr(s1, -6, -1): '%s'\n", str);
free(str);
str = copy_substr(s1, 34, 10000);
printf("copy_substr(s1, 34, 10000): '%s'\n", str);
free(str);
str = copy_substr(s1, 34, 0);
printf("copy_substr(s1, 34, 0): '%s'\n", str);
free(str);
}
__("substr_count"); {
printf("substr_count(s1, \"Vee\"): %ld\n", substr_count(s1, "Vee"));
printf("substr_count(s1, \"Cator\"): %ld\n", substr_count(s1, "Cator"));
}
__("strcase"); {
str = copy_str(s1);
printf("strtolowwer(s1): '%s'\n", strtolower(&str));
printf("strtoupper(s1): '%s'\n", strtoupper(&str));
printf("lcfirst(s1): '%s'\n", lcfirst(&str));
strtolower(&str);
printf("ucfirst(s1): '%s'\n", ucfirst(&str));
strtolower(&str);
printf("ucwords(s1): '%s'\n", ucwords(&str));
free(str);
}
__("trim"); {
str = copy_str(" \t\v cator \r\n ");
printf("ltrim(\" \\t\\v cator \\r\\n \"): '%s'\n", ltrim(&str));
free(str);
str = copy_str(" \t\v cator \r\n ");
printf("rtrim(\" \\t\\v cator \\r\\n \"): '%s'\n", rtrim(&str));
free(str);
str = copy_str(" \t\v cator \r\n ");
printf("trim(\" \\t\\v cator \\r\\n \"): '%s'\n", trim(&str));
free(str);
}
__("repeat"); {
str = copy_repeat("-=", 10);
printf("copy_repeat(\"-=\", 10): '%s'\n", str);
free(str);
str = copy_strpad(s2, 20, "-=", STR_PAD_LEFT);
printf("copy_strpad(s2, 20, \"-=\", STR_PAD_LEFT): '%s'\n", str);
free(str);
str = copy_strpad(s2, 20, "-=", STR_PAD_RIGHT);
printf("copy_strpad(s2, 20, \"-=\", STR_PAD_RIGHT): '%s'\n", str);
free(str);
str = copy_strpad(s2, 20, "-=", STR_PAD_BOTH);
printf("copy_strpad(s2, 20, \"-=\", STR_PAD_BOTH): '%s'\n", str);
free(str);
}
__("replace"); {
str = copy_str(s1);
printf("strtr(&str, \"ctr\", \"CTR\"): '%s'\n", strtr(&str, "ctr", "CTR"));
free(str);
str = copy_replace("cator", "*name*", s1);
printf("copy_replace(\"cator\", \"*name*\", s1): '%s'\n", str);
free(str);
str = copy_ireplace("cator", "*name*", s1);
printf("copy_ireplace(\"cator\", \"*name*\", s1): '%s'\n", str);
free(str);
}
__("html"); {
string_t html = "<p>Test 'paragraph'.</p><!-- Comment --> <a href=\"#fragment\">Other text</a>";
printf("html: ‘%s’\n", html);
str = copy_str(html);
printf("striptags(html): '%s'\n", striptags(&str));
free(str);
str = copy_htmlencode(html, false);
printf("copy_htmlencode(html, false): '%s'\n", str);
free(str);
str = copy_htmlencode(html, true);
printf("copy_htmlencode(html, true): '%s'\n", str);
free(str);
str = copy_htmlencode(html, false);
printf("htmldecode(encoded_html): '%s'\n", htmldecode(&str));
free(str);
}
__("url"); {
string_t url = "http://*****:*****@catorv.com/index.html?name=cator&age=100#vee~";
printf("url: '%s'\n", url);
str = copy_urlencode(url);
printf("copy_urlencode(url): '%s'\n", str);
printf("urldecode(copy_urlencode(url)): '%s'\n", urldecode(&str));
free(str);
urlcompoments_t *components = copy_urlcompoments(url);
if (components) {
printf("copy_urlcompoments - scheme: '%s'\n", components->scheme);
printf("copy_urlcompoments - user: '******'\n", components->user);
printf("copy_urlcompoments - password: '******'\n", components->password);
printf("copy_urlcompoments - host: '%s'\n", components->host);
printf("copy_urlcompoments - port: %d\n", components->port);
printf("copy_urlcompoments - path: '%s'\n", components->path);
printf("copy_urlcompoments - query: '%s'\n", components->query);
printf("copy_urlcompoments - fragment: '%s'\n", components->fragment);
free_urlcomponents(components);
}
}
__("base64"); {
str = copy_base64encode(s1);
printf("copy_base64encode(s1): '%s'\n", str);
printf("base64decode(encoded_str): '%s'\n", base64decode(&str));
free(str);
}
__("md5"); {
md5context_t md5;
unsigned char decrypt[16];
size_t len = strlen(s2);
int i;
md5init(&md5);
md5update(&md5, s2, len);
md5final(decrypt, &md5);
printf("copy_md5(s2): '");
for(i = 0; i < 16; i++) {
printf("%02x", decrypt[i]);
}
printf("'\n");
// or
str = copy_md5(s3);
printf("copy_md5(s3): '%s'\n", str);
free(str);
}
__("slashes"); {
str = copy_addslashes("ab'cd\"dd\\...");
printf("copy_addslashes: '%s'\n", str);
printf("stripslashes: '%s'\n", stripslashes(&str));
free(str);
}
return 0;
}
void ReceiveContactMessage(LPCTSTR msg_from, LPCTSTR msg_to, LPCTSTR msg_text, int msg_len)
{
if ( ! pluginInstalled )
return;
CString from( msg_from );
CString to( msg_to );
CString text( msg_text, msg_len );
from.MakeUpper();
to.MakeUpper();
// Свое собственное сообщение?
if ( IsItMe( from ) )
{
LOG ( "Ignoring my message." );
return;
}
// Нормализация разбиения сообщения на строки
Normalize( text );
// Дубликат?
if (db_get_b (NULL, modname, "Filter-dups", TRUE))
{
// Вычисление прошедшего времени с последнего сообщения
static FILETIME last_time = { 0, 0 };
FILETIME current_time;
GetSystemTimeAsFileTime (¤t_time);
ULONGLONG elapsed =
((ULONGLONG) current_time.dwLowDateTime |
(ULONGLONG) current_time.dwHighDateTime << 32) -
((ULONGLONG) last_time.dwLowDateTime |
(ULONGLONG) last_time.dwHighDateTime << 32);
// Вычисление MD5-хэшей отправителя
MD5Context ctx;
md5init (&ctx);
md5update (&ctx, (const unsigned char*)(LPCTSTR)from,
from.GetLength() * sizeof (TCHAR));
unsigned char digest_from_current [16] = {0};
static unsigned char digest_from_last [16] = {0};
md5final (digest_from_current, &ctx);
// Вычисление MD5-хэшей сообщения
md5init (&ctx);
md5update (&ctx, (const unsigned char*)(LPCTSTR)text,
text.GetLength() * sizeof (TCHAR));
unsigned char digest_text_current [16] = {0};
static unsigned char digest_text_last [16] = {0};
md5final (digest_text_current, &ctx);
// Если прошло менее 2 секунд между сообщениями
if (elapsed < 20000000)
{
// И отправители совпадают
if (memcmp (digest_from_current, digest_from_last, 16) == 0)
{
// И сообщение совпадает
if (memcmp (digest_text_current, digest_text_last, 16) == 0)
{
// то пропускаем такое сообщение
LOG ("Duplicate message detected");
return;
}
}
}
last_time = current_time;
CopyMemory (digest_from_last, digest_from_current, 16);
CopyMemory (digest_text_last, digest_text_current, 16);
}
#ifdef CHAT_ENABLED
if ( ! IsItMe( to ) && pluginChatEnabled ) // Групповой адрес?
{
// Формирование группового сообщения
if ( ChatNewSession( to ) )
{
// Добавить группу
ATLVERIFY( ChatAddGroup( to, _T("Normal") ) );
// Добавить себя
ATLVERIFY( ChatJoinMe( to, _T("Normal") ) );
// Добавить "От Кого"
ATLVERIFY( ChatJoinUser( to, from, _T("Normal") ) );
// Завершение создания чата
ATLVERIFY( ChatInitDone( to ) );
// Перевод чат-контакта в онлайн
ATLVERIFY( ChatOnline( to ) );
// Сообщение
ATLVERIFY( ChatMessage( to, from, text ) );
}
}
else
#endif // CHAT_ENABLED
{
// Формирование приватного сообщения
HANDLE hContact = AddToListByName( from, 0, NULL, false, false );
if ( hContact )
{
PROTORECVEVENT pre = { 0 };
pre.timestamp = time ();
CT2A textA( text );
pre.szMessage = (LPSTR)(LPCSTR)textA;
CCSDATA ccs = { 0 };
ccs.szProtoService = PSR_MESSAGE;
ccs.hContact = hContact;
db_unset (ccs.hContact, "CList", "Hidden");
ccs.lParam = (LPARAM) ⪯
CallServiceSync (MS_PROTO_CHAINRECV, 0, (LPARAM) &ccs);
// Переводим контакт в онлайн
SetContactStatus( hContact, contact_scanner::ScanContact( hContact ), true );
// Авто-ответчик
if ( db_get_b( NULL, modname, "Auto-answer", FALSE ) )
Autoanswer( hContact );
}
}
}
