int replaceSetting(HWND hwnd, HANDLE hContact, const char *module, const char *setting, DBVARIANT *dbv, const char *find, const char *replace, int mode)
{
char *szSetting;
ptrA myreplace;
int count = 0;
DBVARIANT dbv2;
if (!dbv->type) return 0;
if (mode & RW_FULL)
szSetting = (char*)replace;
else {
myreplace = multiReplace(setting, find, replace, mode & RW_CASE);
szSetting = myreplace;
}
if (szSetting[0] == 0) {
ItemFound(hwnd, hContact, module, setting, NULL, FW_SETTINGNAME | FW_DELETED);
db_unset(hContact, module, setting);
return 1;
}
// check & write
if (GetSetting(hContact, module, myreplace, &dbv2)) {
if (!db_set(hContact, module, szSetting, &dbv2)) {
count++;
db_unset(hContact, module, setting);
ItemFound(hwnd, hContact, module, szSetting, NULL, FW_SETTINGNAME | FW_REPLACED);
}
}
else db_free(&dbv2);
return count;
}
int replaceSetting(HWND hwnd, HANDLE hContact, const char *module, const char *setting, DBVARIANT *dbv, const char *find, const char *replace, int mode)
{
DBCONTACTWRITESETTING cws;
char *myreplace = NULL;
int count = 0;
DBVARIANT dbv2;
if (!dbv->type) return 0;
if (mode & RW_FULL)
cws.szSetting = (char*)replace;
else
{
myreplace = multiReplace(setting, find, replace, mode & RW_CASE);
cws.szSetting = myreplace;
}
if (cws.szSetting[0]==0)
{
ItemFound(hwnd,hContact,module,setting,NULL,FW_SETTINGNAME|FW_DELETED);
DBDeleteContactSetting(hContact,module,setting);
mir_free(myreplace);
return 1;
}
// check & write
if (GetSetting(hContact, module, myreplace, &dbv2))
{
cws.szModule=module;
cws.value.type=dbv->type;
cws.value.pszVal=dbv->pszVal;
cws.value.bVal=dbv->bVal;
cws.value.wVal=dbv->wVal;
cws.value.dVal=dbv->dVal;
cws.value.pbVal = dbv->pbVal;
cws.value.cpbVal = dbv->cpbVal;
if (!CallService(MS_DB_CONTACT_WRITESETTING,(WPARAM)hContact,(LPARAM)&cws))
{
count++;
DBDeleteContactSetting(hContact,module,setting);
ItemFound(hwnd,hContact,module,cws.szSetting,NULL,FW_SETTINGNAME|FW_REPLACED);
}
}
else
DBFreeVariant(&dbv2);
mir_free(myreplace);
return count;
}
void __cdecl FindSettings(LPVOID param)
{
FindInfo* fi = (FindInfo*)param;
HWND hwndParent = GetParent(fi->hwnd);
ModuleSettingLL ModuleList, SettingList;
ModSetLinkLinkItem *module, *setting;
MCONTACT hContact;
DBVARIANT dbv = { 0 };
int foundCount = 0, replaceCount = 0, deleteCount = 0;
DWORD numsearch = 0, numreplace = 0;
int NULLContactDone = 0;
if (!fi->search || !EnumModules(&ModuleList)) {
fi_free(fi);
return;
}
_T2A search(fi->search);
_T2A replace(fi->replace);
// skip modules and setting names on unicode search or replace
if (IsRealUnicode(fi->search) || IsRealUnicode(fi->replace)) {
fi->options &= ~(F_SETNAME | F_MODNAME);
fi->options |= F_UNICODE;
}
if (!(fi->options & F_UNICODE) && (fi->options & F_SETVAL)) {
char val[16];
numsearch = strtoul(search, NULL, 10);
_ultoa(numsearch, val, 10);
if (!mir_strcmp(search, val)) {
fi->options |= F_NUMSRCH;
// replace numeric values only entirely
if (replace && (fi->options & F_ENTIRE)) {
numreplace = strtoul(replace, NULL, 10);
_ultoa(numreplace, val, 10);
if (!replace[0] || !mir_strcmp(replace, val))
fi->options |= F_NUMREPL;
}
}
}
SendDlgItemMessage(hwndParent, IDC_SBAR, SB_SETTEXT, 0, (LPARAM)TranslateT("Searching..."));
hContact = 0;
while (GetWindowLongPtr(GetDlgItem(hwndParent, IDC_SEARCH), GWLP_USERDATA)) {
if (!hContact) {
if (NULLContactDone)
break;
else {
NULLContactDone = 1;
hContact = db_find_first();
}
}
else
hContact = db_find_next(hContact);
for (module = ModuleList.first; module; module = module->next) {
if (IsModuleEmpty(hContact, module->name))
continue;
if (fi->options & (F_SETVAL | F_SETNAME)) {
if (!EnumSettings(hContact, module->name, &SettingList)) {
fi_free(fi);
FreeModuleSettingLL(&ModuleList);
return;
}
for (setting = SettingList.first; setting; setting = setting->next) {
dbv.type = 0;
if (db_get_s(hContact, module->name, setting->name, &dbv, 0))
continue;
// check in settings value
if (fi->options & F_SETVAL) {
TCHAR *value = NULL;
switch(dbv.type) {
case DBVT_BYTE:
case DBVT_WORD:
case DBVT_DWORD:
if ((fi->options & F_NUMSRCH) && numsearch == getNumericValue(&dbv)) {
TCHAR *val = fi->search;
int flag = F_SETVAL;
if (fi->options & F_NUMREPL) {
if (replace[0]) {
db_unset(hContact, module->name, setting->name);
flag |= F_DELETED;
deleteCount++;
}
else
if (setNumericValue(hContact, module->name, setting->name, numreplace, dbv.type)) {
val = fi->replace;
flag |= F_REPLACED;
replaceCount++;
}
}
ItemFound(fi->hwnd, hContact, module->name, setting->name, val, flag);
}
break;
case DBVT_WCHAR:
if (!value) value = mir_u2t(dbv.pwszVal);
case DBVT_UTF8:
if (!value) value = mir_utf8decodeT(dbv.pszVal);
case DBVT_ASCIIZ:
if (!value) value = mir_a2t(dbv.pszVal);
if (FindMatchT(value, fi->search, fi->options)) {
foundCount++;
ptrT ptr;
TCHAR *newValue = value;
int flag = F_SETVAL;
if (fi->replace) {
newValue = (fi->options & F_ENTIRE) ? fi->replace : ptr = multiReplaceT(value, fi->search, fi->replace, fi->options & F_CASE);
// !!!! delete or make empty ?
if (!newValue[0]) {
db_unset(hContact, module->name, setting->name);
flag |= F_DELETED;
newValue = value;
deleteCount++;
} else {
#ifdef _UNICODE
// save as unicode if needed
if (dbv.type != DBVT_ASCIIZ || IsRealUnicode(newValue))
db_set_ws(hContact, module->name, setting->name, newValue);
else
#endif
db_set_s(hContact, module->name, setting->name, _T2A(newValue));
flag |= F_REPLACED;
replaceCount++;
}
}
ItemFound(fi->hwnd, hContact, module->name, setting->name, newValue, flag);
}
mir_free(value);
break;
} // switch
}
// check in setting name
if ((fi->options & F_SETNAME) && FindMatchA(setting->name, search, fi->options)) {
foundCount++;
ptrA ptr;
char *newSetting = setting->name;
int flag = F_SETNAME;
if (replace) {
newSetting = (fi->options & F_ENTIRE) ? replace : ptr = multiReplaceA(setting->name, search, replace, fi->options & F_CASE);
if (!newSetting[0]) {
db_unset(hContact, module->name, setting->name);
flag |= F_DELETED;
newSetting = setting->name;
deleteCount++;
} else {
DBVARIANT dbv2;
// skip if exist
if (!db_get_s(hContact, module->name, newSetting, &dbv2, 0))
db_free(&dbv2);
else if (!db_set(hContact, module->name, newSetting, &dbv)) {
db_unset(hContact, module->name, setting->name);
flag |= F_REPLACED;
replaceCount++;
}
}
}
ItemFound(fi->hwnd, hContact, module->name, newSetting, NULL, flag);
}
db_free(&dbv);
} // for(setting)
FreeModuleSettingLL(&SettingList);
}
// check in module name
if ((fi->options & F_MODNAME) && FindMatchA(module->name, search, fi->options)) {
foundCount++;
char *newModule = module->name;
int flag = F_MODNAME;
ptrA ptr;
if (replace) {
newModule = (fi->options & F_ENTIRE) ? replace : ptr = multiReplaceA(module->name, search, replace, fi->options & F_CASE);
if (!newModule[0]) {
deleteModule(hContact, module->name, 0);
replaceTreeItem(hContact, module->name, NULL);
flag |= F_DELETED;
newModule = module->name;
deleteCount++;
}
else if (renameModule(hContact, module->name, newModule)) {
replaceTreeItem(hContact, module->name, NULL);
flag |= F_REPLACED;
replaceCount++;
}
}
ItemFound(fi->hwnd, hContact, newModule, 0, 0, flag);
}
} // for(module)
}
TCHAR msg[MSG_SIZE];
mir_sntprintf(msg, TranslateT("Finished. Items found: %d / replaced: %d / deleted: %d"), foundCount, replaceCount, deleteCount);
SendDlgItemMessage(hwndParent, IDC_SBAR, SB_SETTEXT, 0, (LPARAM)msg);
if (fi->replace) {
EnableWindow(GetDlgItem(hwndParent, IDC_SEARCH), 1);
SetDlgItemText(hwndParent, IDOK, TranslateT("&Replace"));
}
else {
SetDlgItemText(hwndParent, IDC_SEARCH, TranslateT("&Search"));
EnableWindow(GetDlgItem(hwndParent, IDOK), 1);
}
fi_free(fi);
FreeModuleSettingLL(&ModuleList);
SetWindowLongPtr(GetDlgItem(hwndParent, IDC_SEARCH), GWLP_USERDATA, 0);
EnableWindow(GetDlgItem(hwndParent, IDCANCEL), 1);
}
void __cdecl FindSettings(LPVOID di)
{
char* text = ((FindInfo*)di)->text;
char* replace = ((FindInfo*)di)->replace;
int mode = ((FindInfo*)di)->mode;
HWND hwnd = ((FindInfo*)di)->hwnd;
HWND prnthwnd = GetParent(hwnd);
int options = ((FindInfo*)di)->options;
ModuleSettingLL ModuleList, SettingList;
ModSetLinkLinkItem *module, *setting;
HANDLE hContact;
DBVARIANT dbv = { 0 };
int caseSensitive = options & FW_CASE;
int exactMatch = options & FW_EXACT;
int inModuleName = options & FW_MODNAME;
int inSettingName = options & FW_SETNAME;
int inSettingValue = options & FW_SETVAL;
int foundCount = 0;
int replaceCount = 0;
char szTmp[128];
int settingValue, isNumber, NULLContactDone = 0;
freeItems(hwnd);
if (!text)
return;
if (!EnumModules(&ModuleList)) {
msg(Translate("Error Loading Module List"), modFullname);
mir_free(di);
return;
}
SendMessage(GetDlgItem(GetParent(hwnd), IDC_SBAR), SB_SETTEXT, 0, (LPARAM)Translate("Searching..."));
hContact = 0;
isNumber = sscanf(text, "%d", &settingValue);
while (GetWindowLongPtr(GetDlgItem(prnthwnd, IDC_SEARCH), GWLP_USERDATA)) {
if (!hContact) {
if (NULLContactDone) break;
else {
NULLContactDone = 1;
hContact = db_find_first();
}
}
else hContact = db_find_next(hContact);
module = ModuleList.first;
while (module) {
if (IsModuleEmpty(hContact, module->name)) {
module = module->next;
continue;
}
if (!EnumSettings(hContact, module->name, &SettingList)) {
msg(Translate("Error Loading Setting List"), modFullname);
mir_free(text);
mir_free(di);
FreeModuleSettingLL(&ModuleList);
return;
}
setting = SettingList.first;
// check in settings value
while (setting) {
if (inSettingValue) {
dbv.type = 0;
// check the setting value
if (!GetSetting(hContact, module->name, setting->name, &dbv)) {
switch (dbv.type) {
case DBVT_UTF8: // no conversion atm
case DBVT_ASCIIZ:
if ((exactMatch && !(caseSensitive ? strcmp(dbv.pszVal, text) : strcmpi(dbv.pszVal, text))) || (!exactMatch && (caseSensitive ? strstr(dbv.pszVal, text) : StrStrI(dbv.pszVal, text)))) {
if ((mode & RW_FOUND) || (mode & RW_SETVAL))
replaceCount += replaceValue(hwnd, hContact, module->name, setting->name, &dbv, text, replace, mode);
else
ItemFound(hwnd, hContact, module->name, setting->name, dbv.pszVal, FW_SETTINGVALUE);
foundCount++;
}
break;
case DBVT_BYTE:
if (isNumber && settingValue == dbv.bVal) {
if ((mode & RW_FOUND) || (mode & RW_SETVAL))
replaceCount += replaceValue(hwnd, hContact, module->name, setting->name, &dbv, NULL, replace, mode);
else
ItemFound(hwnd, hContact, module->name, setting->name, text, FW_SETTINGVALUE);
foundCount++;
}
break;
case DBVT_WORD:
if (isNumber && settingValue == dbv.wVal) {
if ((mode & RW_FOUND) || (mode & RW_SETVAL))
replaceCount += replaceValue(hwnd, hContact, module->name, setting->name, &dbv, NULL, replace, mode);
else
ItemFound(hwnd, hContact, module->name, setting->name, text, FW_SETTINGVALUE);
foundCount++;
}
break;
case DBVT_DWORD:
if (isNumber && settingValue == (int)dbv.dVal) {
if ((mode & RW_FOUND) || (mode & RW_SETVAL))
replaceCount += replaceValue(hwnd, hContact, module->name, setting->name, &dbv, NULL, replace, mode);
else
ItemFound(hwnd, hContact, module->name, setting->name, text, FW_SETTINGVALUE);
foundCount++;
}
break;
}
db_free(&dbv);
}
}
// check in setting name
if (inSettingName) {
if ((exactMatch && !(caseSensitive ? strcmp(setting->name, text) : strcmpi(setting->name, text))) || (!exactMatch && (caseSensitive ? StrStrI(setting->name, text) : StrStrI(setting->name, text)))) {
if ((mode & RW_FOUND) || (mode & RW_SETNAME)) {
if (!GetSetting(hContact, module->name, setting->name, &dbv)) {
replaceCount += replaceSetting(hwnd, hContact, module->name, setting->name, &dbv, text, replace, mode);
db_free(&dbv);
}
}
else
ItemFound(hwnd, hContact, module->name, setting->name, NULL, FW_SETTINGNAME);
foundCount++;
}
}
setting = (ModSetLinkLinkItem *)setting->next;
}
// check in module name
if (inModuleName) {
if ((exactMatch && !(caseSensitive ? strcmp(module->name, text) : strcmpi(module->name, text))) || (!exactMatch && (caseSensitive ? strstr(module->name, text) : StrStrI(module->name, text)))) {
if ((mode & RW_FOUND) || (mode & RW_MODULE))
replaceCount += replaceModule(hwnd, hContact, module->name, text, replace, mode);
else
ItemFound(hwnd, hContact, module->name, 0, 0, FW_MODULE);
foundCount++;
}
}
FreeModuleSettingLL(&SettingList);
module = (ModSetLinkLinkItem *)module->next;
}
}
if (mode) {
if (!replace[0])
mir_snprintf(szTmp, SIZEOF(szTmp), Translate("Finished. %d items were found, %d items were deleted."), foundCount, replaceCount);
else
mir_snprintf(szTmp, SIZEOF(szTmp), Translate("Finished. %d items were found, %d items were replaced."), foundCount, replaceCount);
}
else mir_snprintf(szTmp, SIZEOF(szTmp), Translate("Finished. %d items were found."), foundCount);
SendMessage(GetDlgItem(prnthwnd, IDC_SBAR), SB_SETTEXT, 0, (LPARAM)szTmp);
SetWindowLongPtr(GetDlgItem(prnthwnd, IDC_SEARCH), GWLP_USERDATA, 0);
if (GetWindowLongPtr(GetDlgItem(prnthwnd, IDC_REPLACE), GWLP_USERDATA)) {
SetWindowLongPtr(GetDlgItem(prnthwnd, IDC_REPLACE), GWLP_USERDATA, 0);
EnableWindow(GetDlgItem(prnthwnd, IDC_SEARCH), 1);
SetWindowText(GetDlgItem(prnthwnd, IDOK), Translate("&Replace"));
}
else {
SetWindowText(GetDlgItem(prnthwnd, IDC_SEARCH), Translate("&Search"));
EnableWindow(GetDlgItem(prnthwnd, IDOK), 1);
}
mir_free(replace);
mir_free(text);
mir_free(di);
FreeModuleSettingLL(&ModuleList);
EnableWindow(GetDlgItem(prnthwnd, IDCANCEL), 1);
}
int replaceModule(HWND hwnd, HANDLE hContact, const char *module, const char *find, const char *replace, int mode)
{
ModuleSettingLL msll;
ModSetLinkLinkItem *setting;
char *myreplace = NULL;
char *newModule;
int count = 0;
if (mode & RW_FULL)
newModule = (char*)replace;
else {
myreplace = multiReplace(module, find, replace, mode & RW_CASE);
newModule = myreplace;
}
if (newModule[0] == 0) {
ItemFound(hwnd, hContact, module, NULL, NULL, FW_MODULE | FW_DELETED);
deleteModule((char*)module, hContact, 1);
replaceTreeItem(GetDlgItem(hwnd2mainWindow, IDC_MODULES), hContact, module, NULL);
mir_free(myreplace);
return 1;
}
if (!IsModuleEmpty(hContact, newModule))
return 0;
if (EnumSettings(hContact, (char*)module, &msll)) {
setting = msll.first;
while (setting) {
DBVARIANT dbv;
if (!GetSetting(hContact, module, setting->name, &dbv)) {
switch (dbv.type) {
case DBVT_BYTE:
db_set_b(hContact, newModule, setting->name, dbv.bVal);
break;
case DBVT_WORD:
db_set_w(hContact, newModule, setting->name, dbv.wVal);
break;
case DBVT_DWORD:
db_set_dw(hContact, newModule, setting->name, dbv.dVal);
break;
case DBVT_ASCIIZ:
db_set_s(hContact, newModule, setting->name, dbv.pszVal);
break;
case DBVT_UTF8:
db_set_utf(hContact, newModule, setting->name, dbv.pszVal);
break;
case DBVT_BLOB:
db_set_blob(hContact, newModule, setting->name, dbv.pbVal, dbv.cpbVal);
break;
}
db_free(&dbv);
db_unset(hContact, module, setting->name);
}
setting = setting->next;
}
FreeModuleSettingLL(&msll);
replaceTreeItem(GetDlgItem(hwnd2mainWindow, IDC_MODULES), hContact, module, newModule);
ItemFound(hwnd, hContact, newModule, NULL, NULL, FW_MODULE | FW_REPLACED);
count++;
}
mir_free(myreplace);
return count;
}
int replaceValue(HWND hwnd, HANDLE hContact, const char *module, const char *setting, DBVARIANT *dbv, const char *find, const char *replace, int mode)
{
int count = 0;
DWORD num = 0;
BOOL write = 0;
int isNumeric;
char *myreplace = NULL;
DBVARIANT val = { 0 };
if (!dbv->type || dbv->type == DBVT_BLOB)
return 0;
if (!replace[0])
isNumeric = 1;
else
isNumeric = sscanf(replace, "%d", &num);
val.type = dbv->type;
switch (dbv->type) {
case DBVT_UTF8:
case DBVT_ASCIIZ:
if (mode & RW_FULL)
val.pszVal = (char*)replace;
else {
myreplace = multiReplace(dbv->pszVal, find, replace, mode & RW_CASE);
val.pszVal = myreplace;
}
break;
case DBVT_BYTE:
if (isNumeric && num < 0x100)
val.bVal = (BYTE)num;
else
return 0;
break;
case DBVT_WORD:
if (isNumeric && num < 0x10000)
val.wVal = (WORD)num;
else
return 0;
break;
case DBVT_DWORD:
if (isNumeric)
val.dVal = num;
else
return 0;
break;
default:
return 0;
}
if ((!val.pszVal && !replace[0]) || (val.pszVal && !val.pszVal[0])) {
ItemFound(hwnd, hContact, module, setting, NULL, FW_SETTINGNAME | FW_DELETED);
db_unset(hContact, module, setting);
mir_free(myreplace);
return 1;
}
if (!db_set(hContact, module, setting, &val)) {
count++;
ItemFound(hwnd, hContact, module, setting, myreplace ? myreplace : (char*)replace, FW_SETTINGVALUE | FW_REPLACED);
}
mir_free(myreplace);
return count;
}
int replaceValue(HWND hwnd, HANDLE hContact, const char *module, const char *setting, DBVARIANT *dbv, const char *find, const char *replace, int mode)
{
int count = 0;
DWORD num = 0;
BOOL write = 0;
int isNumeric;
char *myreplace = NULL;
DBCONTACTWRITESETTING cws = {0};
if (!dbv->type || dbv->type == DBVT_BLOB)
return 0;
if (!replace[0])
isNumeric = 1;
else
isNumeric = sscanf(replace,"%d",&num);
cws.szModule=module;
cws.szSetting=setting;
cws.value.type=dbv->type;
switch(dbv->type)
{
case DBVT_UTF8:
case DBVT_ASCIIZ:
if (mode & RW_FULL)
cws.value.pszVal = (char*)replace;
else
{
myreplace = multiReplace(dbv->pszVal, find, replace, mode & RW_CASE);
cws.value.pszVal=myreplace;
}
break;
case DBVT_BYTE:
if (isNumeric && num < 0x100)
cws.value.bVal = (BYTE)num;
else
return 0;
break;
case DBVT_WORD:
if (isNumeric && num < 0x10000)
cws.value.wVal = (WORD)num;
else
return 0;
break;
case DBVT_DWORD:
if (isNumeric)
cws.value.dVal = num;
else
return 0;
break;
default:
return 0;
}
if ((!cws.value.pszVal && !replace[0]) || (cws.value.pszVal && !cws.value.pszVal[0]))
{
ItemFound(hwnd,hContact,module,setting,NULL,FW_SETTINGNAME|FW_DELETED);
DBDeleteContactSetting(hContact,module,setting);
mir_free(myreplace);
return 1;
}
if (!CallService(MS_DB_CONTACT_WRITESETTING,(WPARAM)hContact,(LPARAM)&cws))
{
count++;
ItemFound(hwnd,hContact,module,setting,myreplace?myreplace:(char*)replace,FW_SETTINGVALUE|FW_REPLACED);
}
mir_free(myreplace);
return count;
}
