/*
Miranda IM: the free IM client for Microsoft* Windows*
Copyright 2000-2009 Miranda ICQ/IM project,
all portions of this codebase are copyrighted to the people
listed in contributors.txt.
This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
*/
#include "..\..\core\commonheaders.h"
INT_PTR ResizeDialog(WPARAM wParam, LPARAM lParam);
int InitOpenUrl(void);
int InitWindowList(void);
void FreeWindowList(void);
int InitHyperlink(void);
int InitColourPicker(void);
int InitBitmapFilter(void);
void InitXmlApi(void);
void InitTimeZones(void);
void UninitTimeZones(void);
INT_PTR GetMD5Interface(WPARAM, LPARAM);
INT_PTR GetSHA1Interface(WPARAM, LPARAM);
static BOOL bModuleInitialized = FALSE;
static struct CountryListEntry countries[]={
{0 , "Unspecified"},
{9999, "Other"},
{0xFFFF, "Unknown"},
{93 , "Afghanistan"},
{355 , "Albania"},
{213 , "Algeria"},
{376 , "Andorra"},
{244 , "Angola"},
{1264, "Anguilla"}, /* change county code to NANP (from 101) */
{1268, "Antigua and Barbuda"}, /* change county code to NANP (from 1021) */
// {5902, "Antilles"}, /* removed: it is not a country, it's a group of islands from diffrent countries (all are included in the list)*/
{54 , "Argentina"},
{374 , "Armenia"},
{297 , "Aruba"},
{247 , "Ascension Island"},
{61 , "Australia"},
{6720 , "Australia, Antarctic Territory"}, /* added country code 672(0)*/
{614 , "Australia, Christmas Island"}, /* rename (from Christmas Island) and change to official county code 61(4) (from 672) */
{61891, "Australia, Cocos (Keeling) Islands"}, /* rename and change to official county code 61(891) (from 6102) */
{6723 , "Australia, Norfolk Island"}, /* rename (from Norfolk Island) and change to official county code 672(3) (from 6722) */
{43 , "Austria"},
{994 , "Azerbaijan"},
{1242, "Bahamas"}, /* change county code to NANP (from 103) */
{973 , "Bahrain"},
{880 , "Bangladesh"},
{1246, "Barbados"}, /* change county code to NANP (from 103) */
// {120 , "Barbuda"}, /* removed: it is not a country and no special island, see Antigua and Barbuda*/
{375 , "Belarus"},
{32 , "Belgium"},
{501 , "Belize"},
{229 , "Benin"},
{1441, "Bermuda"}, /* change county code to NANP (from 105) */
{975 , "Bhutan"},
{591 , "Bolivia"},
{387 , "Bosnia and Herzegovina"},
{267 , "Botswana"},
{55 , "Brazil"},
{673 , "Brunei"},
{359 , "Bulgaria"},
{226 , "Burkina Faso"},
{257 , "Burundi"},
{855 , "Cambodia"},
{237 , "Cameroon"},
{1002, "Canada"}, /* change county code to NANP (from 107 to virtual 1(002) -> reflect NANP*/
{238 , "Cape Verde Islands"},
{1345, "Cayman Islands"}, /* change county code to NANP (from 108) */
{236 , "Central African Republic"},
{235 , "Chad"},
{56 , "Chile, Republic of"},
{86 , "China"},
// {6101, "Cocos-Keeling Islands"}, /* removed (double): see Australia, Cocos (Keeling) Islands */
{57 , "Colombia"},
{269 , "Comoros"}, /* change county code (from 2691) */
{243 , "Congo, Democratic Republic of (Zaire)"},
{242 , "Congo, Republic of the"},
{682 , "Cook Islands"},
{506 , "Costa Rica"},
{225 , "Cote d'Ivoire (Ivory Coast)"},
{385 , "Croatia"},
{53 , "Cuba"},
{357 , "Greek, Republic of South Cyprus"}, /* rename coz Turkey, Republic of Northern Cyprus */
{420 , "Czech Republic"},
{45 , "Denmark"},
{246 , "Diego Garcia"},
{253 , "Djibouti"},
{1767, "Dominica"}, /* change county code to NANP (from 109) */
{1809, "Dominican Republic"}, /* change county code to NANP 809, 829, 849 (from 110) */
{593 , "Ecuador"},
{20 , "Egypt"},
{503 , "El Salvador"},
{240 , "Equatorial Guinea"},
{291 , "Eritrea"},
{372 , "Estonia"},
{251 , "Ethiopia"},
{3883, "Europe"}, /* add county code +388 3 official European Telephony Numbering Space*/
{298 , "Faeroe Islands"},
{500 , "Falkland Islands"},
{679 , "Fiji"},
{358 , "Finland"},
{33 , "France"},
{5901, "French Antilles"},
{594 , "French Guiana"},
{689 , "French Polynesia"},
{241 , "Gabon"},
{220 , "Gambia"},
{995 , "Georgia"},
{49 , "Germany"},
{233 , "Ghana"},
{350 , "Gibraltar"},
{30 , "Greece"},
{299 , "Greenland"},
{1473, "Grenada"}, /* change county code to NANP (from 111) */
{590 , "Guadeloupe"},
{1671, "Guam, US Territory of"}, /* change county code to NANP (from 671) */
{502 , "Guatemala"},
{224 , "Guinea"},
{245 , "Guinea-Bissau"},
{592 , "Guyana"},
{509 , "Haiti"},
{504 , "Honduras"},
{852 , "Hong Kong"},
{36 , "Hungary"},
{354 , "Iceland"},
{91 , "India"},
{62 , "Indonesia"},
{98 , "Iran (Islamic Republic of)"},
{964 , "Iraq"},
{353 , "Ireland"},
{972 , "Israel"},
{39 , "Italy"},
{1876, "Jamaica"}, /* change county code to NANP (from 112) */
{81 , "Japan"},
{962 , "Jordan"},
{705 , "Kazakhstan"},
{254 , "Kenya"},
{686 , "Kiribati"},
{850 , "Korea, North"},
{82 , "Korea, South"},
{965 , "Kuwait"},
{996 , "Kyrgyzstan"}, /* change county code (from 706) */
{856 , "Laos"},
{371 , "Latvia"},
{961 , "Lebanon"},
{266 , "Lesotho"},
{231 , "Liberia"},
{218 , "Libyan Arab Jamahiriya"},
{423 , "Liechtenstein"}, /* change county code (from 4101) */
{370 , "Lithuania"},
{352 , "Luxembourg"},
{853 , "Macau"},
{389 , "Macedonia, Republic of"}, /* rename coz war */
{261 , "Madagascar"},
{265 , "Malawi"},
{60 , "Malaysia"},
{960 , "Maldives"},
{223 , "Mali"},
{356 , "Malta"},
{692 , "Marshall Islands"},
{596 , "Martinique"},
{222 , "Mauritania"},
{230 , "Mauritius"},
{262 , "Mayotte Island"}, /* change county code coz bug (from 269) */
{52 , "Mexico"},
{691 , "Micronesia, Federated States of"},
{373 , "Moldova, Republic of"},
{377 , "Monaco"},
{976 , "Mongolia"},
{1664, "Montserrat"}, /* change county code to NANP (from 113) */
{212 , "Morocco"},
{258 , "Mozambique"},
{95 , "Myanmar"},
{264 , "Namibia"},
{674 , "Nauru"},
{977 , "Nepal"},
{31 , "Netherlands"},
{599 , "Netherlands Antilles"}, /* dissolved 2010 */
{5995 , "St. Maarten"}, /* add new country in 2010 (from Netherlands Antilles) */
{5999 , "Curacao"}, /* add new country in 2010 (from Netherlands Antilles) */
{5997 , "Netherlands (Bonaire Island)"}, /* add new Part of Netherlands in 2010 (from Netherlands Antilles) */
{59946, "Netherlands (Saba Island)"}, /* add new Part of Netherlands in 2010 (from Netherlands Antilles) */
{59938, "Netherlands (St. Eustatius Island)"}, /* add new Part of Netherlands in 2010 (from Netherlands Antilles) */
// {114 , "Nevis"}, /* removed: it is not a country, it's part of Saint Kitts and Nevis*/
{687 , "New Caledonia"},
{64 , "New Zealand"},
{505 , "Nicaragua"},
{227 , "Niger"},
{234 , "Nigeria"},
{683 , "Niue"},
{1670, "Northern Mariana Islands, US Territory of"}, /* added NANP */
{47 , "Norway"},
{968 , "Oman"},
{92 , "Pakistan"},
{680 , "Palau"},
{507 , "Panama"},
{675 , "Papua New Guinea"},
{595 , "Paraguay"},
{51 , "Peru"},
{63 , "Philippines"},
{48 , "Poland"},
{351 , "Portugal"},
{1939, "Puerto Rico"}, /* change county code to NANP 939, 787 (from 121) */
{974 , "Qatar"},
{262 , "Reunion Island"},
{40 , "Romania"},
// {6701, "Rota Island"}, /* removed: it is not a country it is part of Northern Mariana Islands, US Territory of */
{7 , "Russia"},
{250 , "Rwanda"},
{1684, "Samoa (USA)"}, /* rename (from American Samoa) change county code to NANP (from 684) */
{685 , "Samoa, Western"}, /* rename (from Western Samoa) */
{290 , "Saint Helena"},
// {115 , "Saint Kitts"}, /* removed: it is not a country it is part of Saint Kitts and Nevis*/
{1869, "Saint Kitts and Nevis"}, /* change county code to NANP (from 1141) */
{1758, "Saint Lucia"}, /* change county code to NANP (from 122) */
{508 , "Saint Pierre and Miquelon"},
{1784, "Saint Vincent and the Grenadines"}, /* change county code to NANP (from 116) */
// {670 , "Saipan Island"}, /* removed: it is not a country it is part of Northern Mariana Islands, US Territory of */
{378 , "San Marino"},
{239 , "Sao Tome and Principe"},
{966 , "Saudi Arabia"},
{442 , "Scotland"},
{221 , "Senegal"},
{248 , "Seychelles"},
{232 , "Sierra Leone"},
{65 , "Singapore"},
{421 , "Slovakia"},
{386 , "Slovenia"},
{677 , "Solomon Islands"},
{252 , "Somalia"},
{27 , "South Africa"},
{34 , "Spain"},
{3492, "Spain, Canary Islands"}, /*rename and change county code to 34(92) spain + canary code*/
{94 , "Sri Lanka"},
{249 , "Sudan"},
{597 , "Suriname"},
{268 , "Swaziland"},
{46 , "Sweden"},
{41 , "Switzerland"},
{963 , "Syrian Arab Republic"},
{886 , "Taiwan"},
{992 , "Tajikistan"}, /* change county code (from 708) */
{255 , "Tanzania"},
{66 , "Thailand"},
// {6702, "Tinian Island"}, /* removed: it is not a country it is part of Northern Mariana Islands, US Territory of */
{670 , "Timor, East"}, /* added (is part off Northern Mariana Islands but not US Territory*/
{228 , "Togo"},
{690 , "Tokelau"},
{676 , "Tonga"},
{1868, "Trinidad and Tobago"}, /* change county code to NANP (from 1141) */
{216 , "Tunisia"},
{90 , "Turkey"},
{90392, "Turkey, Republic of Northern Cyprus"}, /* added (is diffrent from Greek part)*/
{993 , "Turkmenistan"}, /* change county code (from 709) */
{1649, "Turks and Caicos Islands"}, /* change county code to NANP (from 118) */
{688 , "Tuvalu"},
{256 , "Uganda"},
{380 , "Ukraine"},
{971 , "United Arab Emirates"},
{44 , "United Kingdom"},
{598 , "Uruguay"},
{1 , "USA"},
{998 , "Uzbekistan"}, /* change county code (from 711) */
{678 , "Vanuatu"},
{379 , "Vatican City"},
{58 , "Venezuela"},
{84 , "Vietnam"},
{1284, "Virgin Islands (UK)"}, /* change county code to NANP (from 105) - rename coz Virgin Islands (USA) */
{1340, "Virgin Islands (USA)"}, /* change county code to NANP (from 123) */
{441 , "Wales"},
{681 , "Wallis and Futuna Islands"},
{967 , "Yemen"},
{38 , "Yugoslavia"}, /* added for old values like birth-country */
{381 , "Serbia, Republic of"}, /* rename need (from Yugoslavia)*/
{383 , "Kosovo, Republic of"}, /*change country code (from 3811), rename need (from Yugoslavia - Serbia) */
{382 , "Montenegro, Republic of"}, /* rename need (from Yugoslavia - Montenegro) */
{260 , "Zambia"},
{263 , "Zimbabwe"},
};
static INT_PTR GetCountryByNumber(WPARAM wParam, LPARAM)
{
int i;
for (i=0; i < SIZEOF(countries); i++ )
if ((int)wParam == countries[i].id) return (INT_PTR)countries[i].szName;
return (INT_PTR)NULL;
}
static INT_PTR GetCountryList(WPARAM wParam, LPARAM lParam)
{
*(int*)wParam = SIZEOF(countries);
*(struct CountryListEntry**)lParam=countries;
return 0;
}
/////////////////////////////////////////////////////////////////////////////////////////
static INT_PTR SaveWindowPosition(WPARAM, LPARAM lParam)
{
SAVEWINDOWPOS *swp=(SAVEWINDOWPOS*)lParam;
WINDOWPLACEMENT wp;
char szSettingName[64];
wp.length=sizeof(wp);
GetWindowPlacement(swp->hwnd, &wp);
mir_snprintf(szSettingName, SIZEOF(szSettingName), "%sx", swp->szNamePrefix);
DBWriteContactSettingDword(swp->hContact, swp->szModule, szSettingName, wp.rcNormalPosition.left);
mir_snprintf(szSettingName, SIZEOF(szSettingName), "%sy", swp->szNamePrefix);
DBWriteContactSettingDword(swp->hContact, swp->szModule, szSettingName, wp.rcNormalPosition.top);
mir_snprintf(szSettingName, SIZEOF(szSettingName), "%swidth", swp->szNamePrefix);
DBWriteContactSettingDword(swp->hContact, swp->szModule, szSettingName, wp.rcNormalPosition.right-wp.rcNormalPosition.left);
mir_snprintf(szSettingName, SIZEOF(szSettingName), "%sheight", swp->szNamePrefix);
DBWriteContactSettingDword(swp->hContact, swp->szModule, szSettingName, wp.rcNormalPosition.bottom-wp.rcNormalPosition.top);
return 0;
}
static INT_PTR AssertInsideScreen(WPARAM wParam, LPARAM lParam)
{
LPRECT rc = (LPRECT) wParam;
if (rc == NULL)
return -1;
RECT rcScreen;
SystemParametersInfo(SPI_GETWORKAREA, 0, &rcScreen, FALSE);
if (MyMonitorFromWindow)
{
if (MyMonitorFromRect(rc, MONITOR_DEFAULTTONULL))
return 0;
MONITORINFO mi = {0};
HMONITOR hMonitor = MyMonitorFromRect(rc, MONITOR_DEFAULTTONEAREST);
mi.cbSize = sizeof(mi);
if (MyGetMonitorInfo(hMonitor, &mi))
rcScreen = mi.rcWork;
}
else
{
RECT rcDest;
if (IntersectRect(&rcDest, &rcScreen, rc))
return 0;
}
if (rc->top >= rcScreen.bottom)
OffsetRect(rc, 0, rcScreen.bottom - rc->bottom);
else if (rc->bottom <= rcScreen.top)
OffsetRect(rc, 0, rcScreen.top - rc->top);
if (rc->left >= rcScreen.right)
OffsetRect(rc, rcScreen.right - rc->right, 0);
else if (rc->right <= rcScreen.left)
OffsetRect(rc, rcScreen.left - rc->left, 0);
return 1;
}
static INT_PTR RestoreWindowPosition(WPARAM wParam, LPARAM lParam)
{
SAVEWINDOWPOS *swp=(SAVEWINDOWPOS*)lParam;
WINDOWPLACEMENT wp;
char szSettingName[64];
int x, y;
wp.length=sizeof(wp);
GetWindowPlacement(swp->hwnd, &wp);
mir_snprintf(szSettingName, SIZEOF(szSettingName), "%sx", swp->szNamePrefix);
x=DBGetContactSettingDword(swp->hContact, swp->szModule, szSettingName, -1);
mir_snprintf(szSettingName, SIZEOF(szSettingName), "%sy", swp->szNamePrefix);
y=(int)DBGetContactSettingDword(swp->hContact, swp->szModule, szSettingName, -1);
if (x == -1) return 1;
if (wParam&RWPF_NOSIZE) {
OffsetRect(&wp.rcNormalPosition, x-wp.rcNormalPosition.left, y-wp.rcNormalPosition.top);
}
else {
wp.rcNormalPosition.left=x;
wp.rcNormalPosition.top=y;
mir_snprintf(szSettingName, SIZEOF(szSettingName), "%swidth", swp->szNamePrefix);
wp.rcNormalPosition.right=wp.rcNormalPosition.left+DBGetContactSettingDword(swp->hContact, swp->szModule, szSettingName, -1);
mir_snprintf(szSettingName, SIZEOF(szSettingName), "%sheight", swp->szNamePrefix);
wp.rcNormalPosition.bottom=wp.rcNormalPosition.top+DBGetContactSettingDword(swp->hContact, swp->szModule, szSettingName, -1);
}
wp.flags=0;
if (wParam & RWPF_HIDDEN)
wp.showCmd = SW_HIDE;
if (wParam & RWPF_NOACTIVATE)
wp.showCmd = SW_SHOWNOACTIVATE;
if (!(wParam & RWPF_NOMOVE))
AssertInsideScreen((WPARAM) &wp.rcNormalPosition, 0);
SetWindowPlacement(swp->hwnd, &wp);
return 0;
}
/////////////////////////////////////////////////////////////////////////////////////////
static INT_PTR RestartMiranda(WPARAM, LPARAM)
{
TCHAR mirandaPath[ MAX_PATH ], cmdLine[ 100 ];
PROCESS_INFORMATION pi;
STARTUPINFO si = { 0 };
si.cb = sizeof(si);
GetModuleFileName( NULL, mirandaPath, SIZEOF(mirandaPath));
mir_sntprintf( cmdLine, SIZEOF( cmdLine ), _T("/restart:%d"), GetCurrentProcessId());
CreateProcess( mirandaPath, cmdLine, NULL, NULL, FALSE, 0, NULL, NULL, &si, &pi );
return 0;
}
/////////////////////////////////////////////////////////////////////////////////////////
typedef BOOL (APIENTRY *PGENRANDOM)( PVOID, ULONG );
static INT_PTR GenerateRandom(WPARAM wParam, LPARAM lParam)
{
if (wParam == 0 || lParam == 0) return 0;
PGENRANDOM pfnRtlGenRandom = NULL;
HMODULE hModule = GetModuleHandleA("advapi32");
if (hModule)
{
pfnRtlGenRandom = (PGENRANDOM)GetProcAddress(hModule, "SystemFunction036");
if (pfnRtlGenRandom)
{
if (!pfnRtlGenRandom((PVOID)lParam, wParam))
pfnRtlGenRandom = NULL;
}
}
if (pfnRtlGenRandom == NULL)
{
srand(GetTickCount());
unsigned short* buf = (unsigned short*)lParam;
for (; (long)(wParam-=2) >= 0; )
*(buf++) = (unsigned short)rand();
if (lParam < 0)
*(char*)buf = (char)(rand() & 0xFF);
}
return 0;
}
/////////////////////////////////////////////////////////////////////////////////////////
char* __fastcall rtrim(char* str)
{
if (str == NULL) return NULL;
char* p = strchr(str, 0);
while (--p >= str)
{
switch (*p)
{
case ' ': case '\t': case '\n': case '\r':
*p = 0; break;
default:
return str;
}
}
return str;
}
TCHAR* __fastcall rtrim(TCHAR *str)
{
if (str == NULL) return NULL;
TCHAR* p = _tcschr(str, 0);
while (--p >= str)
{
switch (*p)
{
case ' ': case '\t': case '\n': case '\r':
*p = 0; break;
default:
return str;
}
}
return str;
}
char* __fastcall ltrim(char* str)
{
if (str == NULL) return NULL;
char* p = str;
for (;;)
{
switch (*p)
{
case ' ': case '\t': case '\n': case '\r':
++p; break;
default:
memmove(str, p, strlen(p) + 1);
return str;
}
}
}
char* __fastcall ltrimp(char* str)
{
if (str == NULL) return NULL;
char* p = str;
for (;;)
{
switch (*p)
{
case ' ': case '\t': case '\n': case '\r':
++p; break;
default:
return p;
}
}
}
bool __fastcall wildcmp(char * name, char * mask)
{
char * last='\0';
for (;; mask++, name++)
{
if (*mask != '?' && *mask != *name) break;
if (*name == '\0') return ((BOOL)!*mask);
}
if (*mask != '*') return FALSE;
for (;; mask++, name++)
{
while (*mask == '*')
{
last = mask++;
if (*mask == '\0') return ((BOOL)!*mask); /* true */
}
if (*name == '\0') return ((BOOL)!*mask); /* *mask == EOS */
if (*mask != '?' && *mask != *name) name -= (size_t)(mask - last) - 1, mask = last;
}
}
/////////////////////////////////////////////////////////////////////////////////////////
int LoadUtilsModule(void)
{
bModuleInitialized = TRUE;
CreateServiceFunction(MS_UTILS_RESIZEDIALOG, ResizeDialog);
CreateServiceFunction(MS_UTILS_SAVEWINDOWPOSITION, SaveWindowPosition);
CreateServiceFunction(MS_UTILS_RESTOREWINDOWPOSITION, RestoreWindowPosition);
CreateServiceFunction(MS_UTILS_ASSERTINSIDESCREEN, AssertInsideScreen);
CreateServiceFunction(MS_UTILS_GETCOUNTRYBYNUMBER, GetCountryByNumber);
CreateServiceFunction(MS_UTILS_GETCOUNTRYLIST, GetCountryList);
CreateServiceFunction(MS_UTILS_GETRANDOM, GenerateRandom);
CreateServiceFunction(MS_SYSTEM_RESTART, RestartMiranda);
CreateServiceFunction(MS_SYSTEM_GET_MD5I, GetMD5Interface);
CreateServiceFunction(MS_SYSTEM_GET_SHA1I, GetSHA1Interface);
InitOpenUrl();
InitWindowList();
InitHyperlink();
InitColourPicker();
InitBitmapFilter();
InitXmlApi();
InitTimeZones();
return 0;
}
void UnloadUtilsModule(void)
{
if ( !bModuleInitialized ) return;
FreeWindowList();
UninitTimeZones();
}