// This method clears the list and adds contacts again, according to the current filter settings.
void RebuildList()
{
LPSTR pszProto;
MTime mtNow;
MAnnivDate ad;
int i = 0;
DWORD age = 0;
WORD wDaysBefore = db_get_w(NULL, MODNAME, SET_REMIND_OFFSET, DEFVAL_REMIND_OFFSET);
WORD numMale = 0;
WORD numFemale = 0;
WORD numContacts = 0;
WORD numBirthContacts = 0;
ShowWindow(_hList, SW_HIDE);
DeleteAllItems();
mtNow.GetLocalTime();
// insert the items into the list
for (MCONTACT hContact = db_find_first(); hContact; hContact = db_find_next(hContact)) {
// ignore meta subcontacts here, as they are not interesting.
if (!db_mc_isSub(hContact)) {
// filter protocol
pszProto = Proto_GetBaseAccountName(hContact);
if (pszProto) {
numContacts++;
switch (GenderOf(hContact, pszProto)) {
case 'M':
numMale++;
break;
case 'F':
numFemale++;
}
if (!ad.DBGetBirthDate(hContact, pszProto)) {
age += ad.Age(&mtNow);
numBirthContacts++;
// add birthday
if ((_filter.bFilterIndex != FILTER_ANNIV) && (!_filter.pszProto || !_strcmpi(pszProto, _filter.pszProto)))
AddRow(hContact, pszProto, ad, mtNow, wDaysBefore);
}
// add anniversaries
if (_filter.bFilterIndex != FILTER_BIRTHDAY && (!_filter.pszProto || !_strcmpi(pszProto, _filter.pszProto)))
for (i = 0; !ad.DBGetAnniversaryDate(hContact, i); i++)
if (!_filter.pszAnniv || !mir_tstrcmpi(_filter.pszAnniv, ad.Description()))
AddRow(hContact, pszProto, ad, mtNow, wDaysBefore);
}
}
}
ListView_SortItemsEx(_hList, (CMPPROC)cmpProc, this);
ShowWindow(_hList, SW_SHOW);
// display statistics
SetDlgItemInt(_hDlg, TXT_NUMBIRTH, numBirthContacts, FALSE);
SetDlgItemInt(_hDlg, TXT_NUMCONTACT, numContacts, FALSE);
SetDlgItemInt(_hDlg, TXT_FEMALE, numFemale, FALSE);
SetDlgItemInt(_hDlg, TXT_MALE, numMale, FALSE);
SetDlgItemInt(_hDlg, TXT_AGE, numBirthContacts > 0 ? (age - (age % numBirthContacts)) / numBirthContacts : 0, FALSE);
}
CAnnivEditCtrl::CAnnivEditCtrl(HWND hDlg, WORD idCtrl, LPCSTR pszSetting)
: CBaseCtrl(hDlg, idCtrl, pszSetting)
{
_hwndDlg = hDlg;
_hBtnAdd = GetDlgItem(hDlg, BTN_ADD);
_hBtnDel = GetDlgItem(hDlg, BTN_DELETE);
_hBtnEdit = GetDlgItem(hDlg, BTN_EDIT);
_hBtnMenu = GetDlgItem(hDlg, BTN_MENU);
_hwndDate = GetDlgItem(hDlg, EDIT_ANNIVERSARY_DATE);
_ReminderEnabled = db_get_b(NULL, MODNAME, SET_REMIND_ENABLED, DEFVAL_REMIND_ENABLED);
_pDates = NULL;
_curDate = 0;
_numDates = 0;
// set button tooltips
SendMessage(_hBtnAdd, BUTTONADDTOOLTIP, (WPARAM)TranslateT("Add a new anniversary"), MBBF_TCHAR);
SendMessage(_hBtnDel, BUTTONADDTOOLTIP, (WPARAM)TranslateT("Delete an existing anniversary"), MBBF_TCHAR);
// limit textinput
SendDlgItemMessage(_hwndDlg, EDIT_REMIND, EM_LIMITTEXT, 2, 0);
SendDlgItemMessage(_hwndDlg, SPIN_REMIND, UDM_SETRANGE32, 0, 50);
// birthday is shown as an item in any case
{
MAnnivDate mdb;
mdb.Id(ANID_BIRTHDAY);
mdb.Description(TranslateT("Birthday"));
AddDate(mdb);
}
}
/**
* name: AddDate
* class: CAnnivEditCtrl
* desc: Add a new item to the array of dates
* param: mda - the date to add
* return: 0 on success, -1 on failure, 1 if the item to change was edited before and the new item was not set
**/
INT_PTR CAnnivEditCtrl::AddDate(MAnnivDate &mda)
{
MAnnivDate *pmda, **pmd;
// if a date with wID exists, replace it
if ((pmda = FindDateById(mda.Id())) != NULL) {
BYTE bChanged = pmda->IsChanged(),
bRemindChanged = pmda->IsReminderChanged();
if (!bChanged) {
pmda->Set(mda);
pmda->Module(mda.Module());
pmda->Description(mda.Description());
pmda->Flags(mda.Flags());
}
if (!bRemindChanged) {
pmda->RemindOption(mda.RemindOption());
pmda->RemindOffset(mda.RemindOffset());
}
return bChanged || bRemindChanged;
}
if (mda.Id() == ANID_NONE)
mda.Id(_numDates - 1);
if (pmd = (MAnnivDate **)mir_realloc(_pDates, (_numDates + 1) * sizeof(pmda))) {
_pDates = pmd;
if (_pDates[_numDates] = new MAnnivDate(mda)) {
_numDates++;
return 0;
}
}
return 1;
}
/**
* This method adds a row to the listview.
*
* @param hContact - contact to add the line for
* @param pszProto - contact's protocol
* @param ad - anniversary to add
* @param mtNow - current time
* @param wDaysBefore - number of days in advance to remind the user of the anniversary
*
* @retval TRUE if successful
* @retval FALSE if failed
**/
BYTE AddRow(MCONTACT hContact, LPCSTR pszProto, MAnnivDate &ad, MTime &mtNow, WORD wDaysBefore)
{
TCHAR szText[MAX_PATH];
int diff, iItem = -1;
CItemData *pdata;
// first column: ETA
diff = ad.CompareDays(mtNow);
if (diff < 0)
diff += IsLeap(mtNow.Year() + 1) ? 366 : 365;
// is filtered
if (diff <= _filter.wDaysBefore) {
// read reminder options for the contact
ad.DBGetReminderOpts(hContact);
if ((_filter.bFilterIndex != FILTER_DISABLED_REMINDER) || (ad.RemindOption() == BST_UNCHECKED)) {
// set default offset if required
if (ad.RemindOffset() == (WORD)-1) {
ad.RemindOffset(wDaysBefore);
// create data object
pdata = new CItemData(hContact, ad);
if (!pdata)
return FALSE;
// add item
iItem = AddItem(_itot(diff, szText, 10), (LPARAM)pdata);
if (iItem == -1) {
delete pdata;
return FALSE;
}
// second column: contact name
AddSubItem(iItem, COLUMN_CONTACT, DB::Contact::DisplayName(hContact));
// third column: protocol
TCHAR *ptszProto = mir_a2t(pszProto);
AddSubItem(iItem, COLUMN_PROTO, ptszProto);
mir_free(ptszProto);
// forth line: age
if (ad.Age(&mtNow))
AddSubItem(iItem, COLUMN_AGE, _itot(ad.Age(&mtNow), szText, 10));
else
AddSubItem(iItem, COLUMN_AGE, _T("???"));
// fifth line: anniversary
AddSubItem(iItem, COLUMN_DESC, (LPTSTR)ad.Description());
// sixth line: date
ad.DateFormatAlt(szText, _countof(szText));
AddSubItem(iItem, COLUMN_DATE, szText);
_numRows++;
}
}
}
return TRUE;
}
/**
* name: Set
* class: MAnnivDate
* desc: duplicates the given anniversary date class
* param: none
* return: nothing
**/
VOID MAnnivDate::SetDate(MAnnivDate &mda)
{
SetDate(mda.SystemTime());
_wID = mda.Id();
_strDesc = mda.Description();
_strModule = mda.Module();
_wFlags = mda.Flags();
_bRemind = mda.RemindOption();
_wDaysEarlier = mda.RemindOffset();
}
/**
* Dialog procedure for the anniversary add/edit dialog
*
* @param hDlg - handle to the dialog window
* @param uMsg - the message to handle
* @param wParam - parameter
* @param lParam - parameter
*
* @return different values
**/
static INT_PTR CALLBACK DlgProc_AnniversaryEditor(HWND hDlg, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
MAnnivDate *pDlgEditAnniv = (MAnnivDate *)GetUserData(hDlg);
switch (uMsg) {
case WM_INITDIALOG:
pDlgEditAnniv = (MAnnivDate *)lParam;
if (!PtrIsValid(pDlgEditAnniv))
break;
SetUserData(hDlg, lParam);
// set icons
if (db_get_b(NULL, MODNAME, SET_ICONS_BUTTONS, 1)) {
SendDlgItemMessage(hDlg, IDOK, BM_SETIMAGE, IMAGE_ICON, (LPARAM)IcoLib_GetIcon(ICO_BTN_OK));
SendDlgItemMessage(hDlg, IDCANCEL, BM_SETIMAGE, IMAGE_ICON, (LPARAM)IcoLib_GetIcon(ICO_BTN_CANCEL));
}
SendDlgItemMessage(hDlg, IDC_HEADERBAR, WM_SETICON, 0, (LPARAM)IcoLib_GetIcon(ICO_DLG_ANNIVERSARY, TRUE));
// translate controls
SendDlgItemMessage(hDlg, IDOK, BUTTONTRANSLATE, NULL, NULL);
SendDlgItemMessage(hDlg, IDCANCEL, BUTTONTRANSLATE, NULL, NULL);
TranslateDialogDefault(hDlg);
// init controls
EnableWindow(GetDlgItem(hDlg, EDIT_CATEGORY), pDlgEditAnniv->Id() != ANID_BIRTHDAY);
SetDlgItemText(hDlg, EDIT_CATEGORY, pDlgEditAnniv->Description());
return TRUE;
case WM_CTLCOLORSTATIC:
SetBkColor((HDC)wParam, RGB(255, 255, 255));
return (INT_PTR)GetStockObject(WHITE_BRUSH);
case WM_COMMAND:
switch (LOWORD(wParam)) {
case EDIT_CATEGORY:
if (HIWORD(wParam) == EN_UPDATE)
EnableWindow(GetDlgItem(hDlg, IDOK), GetWindowTextLength((HWND)lParam) > 0);
break;
case IDOK: {
// read new description
HWND hEdit = GetDlgItem(hDlg, EDIT_CATEGORY);
int len = Edit_GetTextLength(hEdit);
LPTSTR pszText;
if (len == 0
|| (pszText = (LPTSTR)_alloca((len + 1) * sizeof(TCHAR))) == NULL
|| !Edit_GetText(hEdit, pszText, len + 1))
{
MsgErr(hDlg, LPGENT("Please enter a valid description first!"));
break;
}
if (mir_tstrcmpi(pszText, pDlgEditAnniv->Description())) {
pDlgEditAnniv->Description(pszText);
pDlgEditAnniv->SetFlags(MAnnivDate::MADF_HASCUSTOM | MAnnivDate::MADF_CHANGED);
}
}
// fall through
case IDCANCEL:
return EndDialog(hDlg, LOWORD(wParam));
}
}
return FALSE;
}
INT_PTR CALLBACK PSPProcAnniversary(HWND hDlg, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
CAnnivEditCtrl *pDateCtrl = CAnnivEditCtrl::GetObj(hDlg, EDIT_ANNIVERSARY_DATE);
switch (uMsg) {
case WM_INITDIALOG:
{
CCtrlList *pCtrlList = CCtrlList::CreateObj(hDlg);
if (pCtrlList) {
HFONT hBoldFont;
PSGetBoldFont(hDlg, hBoldFont);
SendDlgItemMessage(hDlg, IDC_PAGETITLE, WM_SETFONT, (WPARAM)hBoldFont, 0);
TranslateDialogDefault(hDlg);
pCtrlList->insert(CEditCtrl::CreateObj(hDlg, EDIT_AGE, SET_CONTACT_AGE, DBVT_BYTE));
pCtrlList->insert(CAnnivEditCtrl::CreateObj(hDlg, EDIT_ANNIVERSARY_DATE, NULL));
// hContact == NULL or reminder disabled
CAnnivEditCtrl::GetObj(hDlg, EDIT_ANNIVERSARY_DATE)->EnableReminderCtrl(lParam != NULL);
SendDlgItemMessage(hDlg, EDIT_AGE, EM_LIMITTEXT, 3, 0);
SendDlgItemMessage(hDlg, SPIN_AGE, UDM_SETRANGE32, 0, 200);
}
}
break;
case WM_NOTIFY:
switch (((LPNMHDR)lParam)->idFrom) {
case 0:
switch (((LPNMHDR)lParam)->code) {
case PSN_ICONCHANGED:
{
const ICONCTRL idIcon[] = {
{ ICO_COMMON_BIRTHDAY, STM_SETIMAGE, ICO_BIRTHDAY },
{ ICO_BTN_ADD, BM_SETIMAGE, BTN_ADD },
{ ICO_BTN_DELETE, BM_SETIMAGE, BTN_DELETE }
};
IcoLib_SetCtrlIcons(hDlg, idIcon, _countof(idIcon));
}
return FALSE;
}
break; /* case 0 */
case EDIT_ANNIVERSARY_DATE:
if (!PspIsLocked(hDlg) && PtrIsValid(pDateCtrl)) {
LPNMHDR lpNmhdr = (LPNMHDR)lParam;
switch (lpNmhdr->code) {
case DTN_DATETIMECHANGE:
pDateCtrl->OnDateChanged((LPNMDATETIMECHANGE)lParam);
break;
case DTN_DROPDOWN:
HWND hMonthCal = DateTime_GetMonthCal(lpNmhdr->hwndFrom);
SetWindowLongPtr(hMonthCal, GWL_STYLE, GetWindowLongPtr(hMonthCal, GWL_STYLE) | MCS_WEEKNUMBERS);
InvalidateRect(hMonthCal, NULL, TRUE);
}
}
return FALSE;
}
break;
case WM_COMMAND:
switch (LOWORD(wParam)) {
case EDIT_REMIND:
if (!PspIsLocked(hDlg) && HIWORD(wParam) == EN_UPDATE)
if (PtrIsValid(pDateCtrl))
pDateCtrl->OnRemindEditChanged();
return FALSE;
/**
* name: BTN_MENU
* desc: the button to dropdown the list to show all items is pressed
**/
case BTN_MENU:
if (HIWORD(wParam) == BN_CLICKED) {
if (PtrIsValid(pDateCtrl))
pDateCtrl->OnMenuPopup();
}
return FALSE;
/**
* name: BTN_ADD
* desc: creates a new dialog to add a new anniversary
**/
case BTN_ADD:
if (HIWORD(wParam) == BN_CLICKED && PtrIsValid(pDateCtrl)) {
MAnnivDate Date;
if (IDOK == DialogBoxParam(ghInst, MAKEINTRESOURCE(IDD_ANNIVERSARY_EDITOR), hDlg, DlgProc_AnniversaryEditor, (LPARAM)&Date)) {
SendMessage(GetParent(hDlg), PSM_CHANGED, NULL, NULL);
if (!pDateCtrl->AddDate(Date))
pDateCtrl->SetCurSel(pDateCtrl->NumDates() - 1);
}
}
return FALSE;
/**
* name: BTN_EDIT
* desc: edit the currently selected anniversary
**/
case BTN_EDIT:
if (HIWORD(wParam) == BN_CLICKED && PtrIsValid(pDateCtrl)) {
MAnnivDate *pDate = pDateCtrl->Current();
if (!pDate)
MsgErr(hDlg, LPGENT("No valid date selected for editing!"));
else if (
IDOK == DialogBoxParam(ghInst, MAKEINTRESOURCE(IDD_ANNIVERSARY_EDITOR), hDlg, DlgProc_AnniversaryEditor, (LPARAM)pDate) &&
(pDate->Flags() & (MAnnivDate::MADF_CHANGED | MAnnivDate::MADF_REMINDER_CHANGED)))
{
SendMessage(GetParent(hDlg), PSM_CHANGED, NULL, NULL);
pDateCtrl->SetCurSel(pDateCtrl->CurrentIndex());
}
}
return FALSE;
/**
* name: BTN_DELETE
* desc: user wants to delete an anniversary
**/
case BTN_DELETE:
if (HIWORD(wParam) == BN_CLICKED && PtrIsValid(pDateCtrl)) {
MAnnivDate *pCurrent = pDateCtrl->Current();
if (pCurrent) {
int rc = MsgBox(hDlg, MB_YESNO | MB_ICON_QUESTION | MB_NOPOPUP, LPGENT("Delete"), NULL,
LPGENT("Do you really want to delete the %s?"), pCurrent->Description());
if (rc == IDYES)
pDateCtrl->DeleteDate(pDateCtrl->CurrentIndex());
}
}
return FALSE;
/**
* name: CHECK_REMIND
* desc: state of reminder checkbox is changed
**/
case RADIO_REMIND1:
case RADIO_REMIND2:
case RADIO_REMIND3:
CAnnivEditCtrl *pDateCtrl = CAnnivEditCtrl::GetObj(hDlg, EDIT_ANNIVERSARY_DATE);
if (PtrIsValid(pDateCtrl) && HIWORD(wParam) == BN_CLICKED)
pDateCtrl->OnReminderChecked();
return FALSE;
} /* switch (LOWORD(wParam)) */
break;
}
return PSPBaseProc(hDlg, uMsg, wParam, lParam);
}
/**
* This function checks, whether a contact has a birthday and it is within the period of time to remind of or not.
*
* @param hContact - the contact to check
* @param Now - current time
* @param evt - the reference to a structure, which retrieves the resulting DTB
* @param bNotify - if TRUE, a popup will be displayed for a contact having birthday within the next few days.
* @param LastAnswer - this parameter is used for the automatic backup function
*
* @retval TRUE - contact has a birthday to remind of
* @retval FALSE - contact has no birthday or it is not within the desired period of time.
**/
static BOOLEAN CheckBirthday(HANDLE hContact, MTime &Now, CEvent &evt, BOOLEAN bNotify, PWORD LastAnwer)
{
BOOLEAN result = FALSE;
if (gRemindOpts.RemindState == REMIND_BIRTH || gRemindOpts.RemindState == REMIND_ALL)
{
MAnnivDate mtb;
if (!mtb.DBGetBirthDate(hContact))
{
INT Diff;
WORD wDaysEarlier;
mtb.DBGetReminderOpts(hContact);
// make backup of each protocol based birthday
if (DB::Setting::GetByte(SET_REMIND_SECUREBIRTHDAY, TRUE))
{
mtb.BackupBirthday(hContact, NULL, 0, LastAnwer);
}
if (mtb.RemindOption() != BST_UNCHECKED)
{
wDaysEarlier = (mtb.RemindOption() == BST_CHECKED) ? mtb.RemindOffset() : -1;
if (wDaysEarlier == (WORD)-1)
{
wDaysEarlier = gRemindOpts.wDaysEarlier;
}
Diff = mtb.CompareDays(Now);
if ((Diff >= 0) && (Diff <= wDaysEarlier))
{
if (evt._wDaysLeft > Diff)
{
evt._wDaysLeft = Diff;
evt._eType = CEvent::BIRTHDAY;
}
if (bNotify)
{
TCHAR szMsg[MAXDATASIZE];
WORD cchMsg = 0;
switch (Diff)
{
case 0:
{
cchMsg = mir_sntprintf(szMsg, SIZEOF(szMsg),
TranslateT("%s has birthday today."),
DB::Contact::DisplayName(hContact));
}
break;
case 1:
{
cchMsg = mir_sntprintf(szMsg, SIZEOF(szMsg),
TranslateT("%s has birthday tomorrow."),
DB::Contact::DisplayName(hContact));
}
break;
default:
{
cchMsg = mir_sntprintf(szMsg, SIZEOF(szMsg),
TranslateT("%s has birthday in %d days."),
DB::Contact::DisplayName(hContact), Diff);
}
}
mir_sntprintf(szMsg + cchMsg, SIZEOF(szMsg) - cchMsg,
TranslateT("\n%s becomes %d years old."),
ContactGender(hContact), mtb.Age(&Now) + (Diff > 0));
NotifyWithPopup(hContact, CEvent::BIRTHDAY, Diff, mtb.Description(), szMsg);
}
result = TRUE;
}
}
}
}
return result;
}
static BOOLEAN CheckAnniversaries(HANDLE hContact, MTime &Now, CEvent &evt, BOOLEAN bNotify)
{
INT numAnniversaries = 0;
INT Diff;
MAnnivDate mta;
INT i;
TCHAR szAnniv[MAX_PATH];
TCHAR strMsg[MAX_SECONDLINE];
BOOLEAN bOverflow = FALSE;
WORD wDaysEarlier;
if ((gRemindOpts.RemindState == REMIND_ANNIV) || (gRemindOpts.RemindState == REMIND_ALL))
{
for (i = 0; i < ANID_LAST && !mta.DBGetAnniversaryDate(hContact, i); i++)
{
mta.DBGetReminderOpts(hContact);
if (mta.RemindOption() != BST_UNCHECKED)
{
wDaysEarlier = (mta.RemindOption() == BST_CHECKED) ? mta.RemindOffset() : -1;
if (wDaysEarlier == (WORD)-1)
{
wDaysEarlier = gRemindOpts.wDaysEarlier;
}
Diff = mta.CompareDays(Now);
if ((Diff >= 0) && (Diff <= wDaysEarlier))
{
if (evt._wDaysLeft > Diff)
{
evt._wDaysLeft = Diff;
evt._eType = CEvent::ANNIVERSARY;
}
numAnniversaries++;
// create displayed text for popup
if (bNotify && !bOverflow)
{
// first anniversary found
if (numAnniversaries == 1)
{
mir_sntprintf(szAnniv, MAX_PATH,
TranslateT("%s has the following anniversaries:\0"),
ContactGender(hContact));
mir_tcsncpy(strMsg, szAnniv, mir_tcslen(szAnniv));
}
switch (Diff)
{
case 0:
{
mir_sntprintf(szAnniv, MAX_PATH,
TranslateT("%d. %s today\0"),
mta.Age(), mta.Description());
}
break;
case 1:
{
mir_sntprintf(szAnniv, MAX_PATH,
TranslateT("%d. %s tomorrow\0"),
mta.Age() + 1, mta.Description());
}
break;
default:
{
mir_sntprintf(szAnniv, MAX_PATH,
TranslateT("%d. %s in %d days\0"),
mta.Age() + 1, mta.Description(), Diff);
}
}
if (mir_tcslen(szAnniv) >= MAX_SECONDLINE - mir_tcslen(strMsg))
{
if (strMsg)
mir_tcsncat(strMsg, _T("\n...\0"), SIZEOF(strMsg));
else
mir_tcsncpy(strMsg, _T("\n...\0"), mir_tcslen(_T("\n...\0")));
bOverflow = TRUE;
}
else
{
if (strMsg)
mir_tcsncat(strMsg, _T("\n- \0"), SIZEOF(strMsg));
else
mir_tcsncpy(strMsg, _T("\n- \0"), mir_tcslen(_T("\n- \0")));
mir_tcsncat(strMsg, szAnniv, SIZEOF(strMsg));
}
}
}
}
}
}
// show one popup for all anniversaries
if (numAnniversaries != 0 && bNotify)
{
NotifyWithPopup(hContact, CEvent::ANNIVERSARY, Diff, LPGENT("Anniversaries"), strMsg);
}
return numAnniversaries != 0;
}