inline bool is_rate_watched(MCONTACT hContact,
const CQuotesProviderBase::CQuote& from,
const CQuotesProviderBase::CQuote& to)
{
tstring sFrom = Quotes_DBGetStringT(hContact, QUOTES_PROTOCOL_NAME, DB_STR_FROM_ID);
tstring sTo = Quotes_DBGetStringT(hContact, QUOTES_PROTOCOL_NAME, DB_STR_TO_ID);
return ((0 == mir_tstrcmpi(from.GetID().c_str(), sFrom.c_str()))
&& (0 == mir_tstrcmpi(to.GetID().c_str(), sTo.c_str())));
}
void CQuotesProviderFinance::GetWatchedQuotes(TQuotes& raQuotes)const
{
raQuotes.clear();
BOOST_FOREACH(MCONTACT hContact, m_aContacts)
{
tstring sID = Quotes_DBGetStringT(hContact, QUOTES_MODULE_NAME, DB_STR_QUOTE_ID);
tstring sSymbol = Quotes_DBGetStringT(hContact, QUOTES_MODULE_NAME, DB_STR_QUOTE_SYMBOL, sID.c_str());
tstring sDescr = Quotes_DBGetStringT(hContact, QUOTES_MODULE_NAME, DB_STR_QUOTE_DESCRIPTION);
CQuotesProviderBase::CQuote quote(sID, sSymbol, sDescr);
raQuotes.push_back(quote);
}
void CQuotesProviderVisitorFormater::Visit(const CQuotesProviderBase& rProvider)
{
switch(m_chr)
{
// default:
// m_sResult = m_chr;
// break;
case _T('%'):
case _T('\t'):
case _T('\\'):
m_sResult = m_chr;
break;
case _T('S'):
m_sResult = Quotes_DBGetStringT(m_hContact,QUOTES_MODULE_NAME,DB_STR_QUOTE_PROVIDER);
break;
case _T('s'):
m_sResult = Quotes_DBGetStringT(m_hContact,QUOTES_MODULE_NAME,DB_STR_QUOTE_SYMBOL);
break;
case _T('X'):
//m_sResult = format_fetch_time(rProvider,m_hContact,_T("%H:%M:%S"));
m_sResult = format_fetch_time(rProvider,m_hContact,Quotes_GetTimeFormat(true));
break;
case _T('x'):
//m_sResult = format_fetch_time(rProvider,m_hContact,_T("%d.%m.%y"));
m_sResult = format_fetch_time(rProvider,m_hContact,Quotes_GetDateFormat(true));
break;
case _T('t'):
{
tstring sFrmt = Quotes_GetDateFormat(true);
sFrmt += _T(" ");
sFrmt += Quotes_GetTimeFormat(true);
m_sResult = format_fetch_time(rProvider,m_hContact,sFrmt);
//m_sResult = format_fetch_time(rProvider,m_hContact,_T("%d.%m.%y %H:%M:%S"));
}
break;
case _T('r'):
case _T('R'):
FormatDoubleHelper(DB_STR_QUOTE_CURR_VALUE);
break;
case _T('p'):
FormatDoubleHelper(DB_STR_QUOTE_PREV_VALUE);
break;
// case _T('c'):
// FormatChangeValueHelper(false);
// break;
// case _T('C'):
// FormatChangeValueHelper(true);
// break;
}
}
void CQuotesProviderVisitorFormater::Visit(const CQuotesProviderDukasCopy& rProvider)
{
if(_T('d') == m_chr || _T('D') == m_chr)
{
m_sResult = Quotes_DBGetStringT(m_hContact,QUOTES_MODULE_NAME,DB_STR_QUOTE_DESCRIPTION);
}
}
void CQuotesProviderVisitorFormater::Visit(const CQuotesProviderYahoo& rProvider)
{
switch(m_chr)
{
case _T('o'):
FormatDoubleHelper(DB_STR_YAHOO_OPEN_VALUE);
break;
case _T('h'):
FormatDoubleHelper(DB_STR_YAHOO_DAY_HIGH);
break;
case _T('P'):
FormatDoubleHelper(DB_STR_YAHOO_PREVIOUS_CLOSE);
break;
case _T('c'):
FormatDoubleHelper(DB_STR_YAHOO_CHANGE);
break;
case _T('g'):
FormatDoubleHelper(DB_STR_YAHOO_DAY_LOW);
break;
case _T('n'):
m_sResult = Quotes_DBGetStringT(m_hContact,QUOTES_MODULE_NAME,DB_STR_QUOTE_DESCRIPTION);
break;
}
}
bool CQuotesProviderGoogle::GetWatchedRateInfo(size_t nIndex, CRateInfo& rRateInfo)
{
if (nIndex < m_aContacts.size()) {
MCONTACT hContact = m_aContacts[nIndex];
tstring sSymbolFrom = Quotes_DBGetStringT(hContact, QUOTES_PROTOCOL_NAME, DB_STR_FROM_ID);
tstring sSymbolTo = Quotes_DBGetStringT(hContact, QUOTES_PROTOCOL_NAME, DB_STR_TO_ID);
tstring sDescFrom = Quotes_DBGetStringT(hContact, QUOTES_PROTOCOL_NAME, DB_STR_FROM_DESCRIPTION);
tstring sDescTo = Quotes_DBGetStringT(hContact, QUOTES_PROTOCOL_NAME, DB_STR_TO_DESCRIPTION);
rRateInfo.m_from = CQuote(sSymbolFrom, sSymbolFrom, sDescFrom);
rRateInfo.m_to = CQuote(sSymbolTo, sSymbolTo, sDescTo);
return true;
}
else {
return false;
}
}
void CQuotesProviderVisitorFormater::Visit(const CQuotesProviderGoogle&)
{
switch (m_chr) {
case _T('F'):
m_sResult = Quotes_DBGetStringT(m_hContact, QUOTES_MODULE_NAME, DB_STR_FROM_DESCRIPTION);
break;
case _T('f'):
m_sResult = Quotes_DBGetStringT(m_hContact, QUOTES_MODULE_NAME, DB_STR_FROM_ID);
break;
case _T('I'):
m_sResult = Quotes_DBGetStringT(m_hContact, QUOTES_MODULE_NAME, DB_STR_TO_DESCRIPTION);
break;
case _T('i'):
m_sResult = Quotes_DBGetStringT(m_hContact, QUOTES_MODULE_NAME, DB_STR_TO_ID);
break;
}
}
void CQuotesProviderBase::SetContactStatus(MCONTACT hContact, int nNewStatus)
{
int nStatus = db_get_w(hContact, QUOTES_PROTOCOL_NAME, DB_STR_STATUS, ID_STATUS_OFFLINE);
if (nNewStatus != nStatus) {
db_set_w(hContact, QUOTES_PROTOCOL_NAME, DB_STR_STATUS, nNewStatus);
if (ID_STATUS_ONLINE != nNewStatus) {
db_unset(hContact, LIST_MODULE_NAME, STATUS_MSG_NAME);
tstring sSymbol = Quotes_DBGetStringT(hContact, QUOTES_PROTOCOL_NAME, DB_STR_QUOTE_SYMBOL);
if (false == sSymbol.empty())
db_set_ts(hContact, LIST_MODULE_NAME, CONTACT_LIST_NAME, sSymbol.c_str());
SetContactExtraImage(hContact, eiEmpty);
}
}
}
void CQuotesProviderVisitorFormater::Visit(const CQuotesProviderGoogleFinance&/* rProvider*/)
{
switch (m_chr) {
case _T('o'):
FormatDoubleHelper(DB_STR_GOOGLE_FINANCE_OPEN_VALUE);
break;
case _T('d'):
FormatDoubleHelper(DB_STR_GOOGLE_FINANCE_DIFF, _T("0"));
break;
case _T('y'):
FormatDoubleHelper(DB_STR_GOOGLE_FINANCE_PERCENT_CHANGE_TO_YERSTERDAY_CLOSE, _T("0"));
break;
case _T('n'):
m_sResult = Quotes_DBGetStringT(m_hContact, QUOTES_MODULE_NAME, DB_STR_QUOTE_DESCRIPTION);
break;
}
}
CQuotesProviders::TQuotesProviderPtr CQuotesProviders::GetContactProviderPtr(HANDLE hContact)const
{
char* szProto = reinterpret_cast<char*>(CallService(MS_PROTO_GETCONTACTBASEPROTO,
reinterpret_cast<WPARAM>(hContact),0));
if(NULL == szProto || 0 != ::_stricmp(szProto,QUOTES_PROTOCOL_NAME))
{
return TQuotesProviderPtr();
}
tstring sProvider = Quotes_DBGetStringT(hContact,QUOTES_MODULE_NAME,DB_STR_QUOTE_PROVIDER);
if(true == sProvider.empty())
{
return TQuotesProviderPtr();
}
return FindProvider(sProvider);
}
void CQuotesProviderBase::Run()
{
CQuotesProviderVisitorDbSettings visitor;
Accept(visitor);
DWORD nTimeout = get_refresh_timeout_miliseconds(visitor);
m_sContactListFormat = Quotes_DBGetStringT(NULL, QUOTES_PROTOCOL_NAME, visitor.m_pszDbDisplayNameFormat, visitor.m_pszDefDisplayFormat);
m_sStatusMsgFormat = Quotes_DBGetStringT(NULL, QUOTES_PROTOCOL_NAME, visitor.m_pszDbStatusMsgFormat, visitor.m_pszDefStatusMsgFormat);
m_sTendencyFormat = Quotes_DBGetStringT(NULL, QUOTES_PROTOCOL_NAME, visitor.m_pszDbTendencyFormat, visitor.m_pszDefTendencyFormat);
enum
{
STOP_THREAD = 0,
SETTINGS_CHANGED = 1,
REFRESH_CONTACT = 2,
COUNT_SYNC_OBJECTS = 3
};
HANDLE anEvents[COUNT_SYNC_OBJECTS];
anEvents[STOP_THREAD] = g_hEventWorkThreadStop;
anEvents[SETTINGS_CHANGED] = m_hEventSettingsChanged;
anEvents[REFRESH_CONTACT] = m_hEventRefreshContact;
TContracts anContacts;
{
mir_cslock lck(m_cs);
anContacts = m_aContacts;
}
bool bGoToBed = false;
if (g_bAutoUpdate) {
CBoolGuard bg(m_bRefreshInProgress);
RefreshQuotes(anContacts);
}
while (false == bGoToBed) {
anContacts.clear();
DWORD dwBegin = ::GetTickCount();
DWORD dwResult = ::WaitForMultipleObjects(COUNT_SYNC_OBJECTS, anEvents, FALSE, nTimeout);
switch (dwResult) {
case WAIT_FAILED:
assert(!"WaitForMultipleObjects failed");
bGoToBed = true;
break;
case WAIT_ABANDONED_0 + STOP_THREAD:
case WAIT_ABANDONED_0 + SETTINGS_CHANGED:
case WAIT_ABANDONED_0 + REFRESH_CONTACT:
assert(!"WaitForMultipleObjects abandoned");
case WAIT_OBJECT_0 + STOP_THREAD:
bGoToBed = true;
break;
case WAIT_OBJECT_0 + SETTINGS_CHANGED:
nTimeout = get_refresh_timeout_miliseconds(visitor);
m_sContactListFormat = Quotes_DBGetStringT(NULL, QUOTES_PROTOCOL_NAME, visitor.m_pszDbDisplayNameFormat, visitor.m_pszDefDisplayFormat);
m_sStatusMsgFormat = Quotes_DBGetStringT(NULL, QUOTES_PROTOCOL_NAME, visitor.m_pszDbStatusMsgFormat, visitor.m_pszDefStatusMsgFormat);
m_sTendencyFormat = Quotes_DBGetStringT(NULL, QUOTES_PROTOCOL_NAME, visitor.m_pszDbTendencyFormat, visitor.m_pszDefTendencyFormat);
{
mir_cslock lck(m_cs);
anContacts = m_aContacts;
}
break;
case WAIT_OBJECT_0 + REFRESH_CONTACT:
{
DWORD dwTimeRest = ::GetTickCount() - dwBegin;
if (INFINITE != nTimeout && dwTimeRest < nTimeout) {
nTimeout -= dwTimeRest;
}
{
mir_cslock lck(m_cs);
anContacts = m_aRefreshingContacts;
m_aRefreshingContacts.clear();
}
{
CBoolGuard bg(m_bRefreshInProgress);
RefreshQuotes(anContacts);
}
}
break;
case WAIT_TIMEOUT:
nTimeout = get_refresh_timeout_miliseconds(visitor);
{
mir_cslock lck(m_cs);
anContacts = m_aContacts;
}
{
CBoolGuard bg(m_bRefreshInProgress);
RefreshQuotes(anContacts);
}
break;
default:
assert(!"What is the hell?");
}
}
OnEndRun();
}
void CQuotesProviderBase::WriteContactRate(MCONTACT hContact, double dRate, const tstring& rsSymbol/* = ""*/)
{
time_t nTime = ::time(NULL);
if (false == rsSymbol.empty())
db_set_ts(hContact, QUOTES_PROTOCOL_NAME, DB_STR_QUOTE_SYMBOL, rsSymbol.c_str());
double dPrev = 0.0;
bool bValidPrev = Quotes_DBReadDouble(hContact, QUOTES_PROTOCOL_NAME, DB_STR_QUOTE_CURR_VALUE, dPrev);
if (true == bValidPrev)
Quotes_DBWriteDouble(hContact, QUOTES_PROTOCOL_NAME, DB_STR_QUOTE_PREV_VALUE, dPrev);
Quotes_DBWriteDouble(hContact, QUOTES_PROTOCOL_NAME, DB_STR_QUOTE_CURR_VALUE, dRate);
db_set_dw(hContact, QUOTES_PROTOCOL_NAME, DB_STR_QUOTE_FETCH_TIME, nTime);
tstring sSymbol = rsSymbol;
tostringstream oNick;
oNick.imbue(GetSystemLocale());
if (false == m_sContactListFormat.empty()) {
tstring s = format_rate(this, hContact, m_sContactListFormat);
oNick << s;
}
else {
if (true == sSymbol.empty())
sSymbol = Quotes_DBGetStringT(hContact, QUOTES_PROTOCOL_NAME, DB_STR_QUOTE_SYMBOL);
oNick << std::setfill(_T(' ')) << std::setw(10) << std::left << sSymbol << std::setw(6) << std::right << dRate;
}
CTendency tendency;
if (true == tendency.Parse(this, m_sTendencyFormat, hContact))
do_set_contact_extra_icon(hContact, tendency);
db_set_ts(hContact, LIST_MODULE_NAME, CONTACT_LIST_NAME, oNick.str().c_str());
tstring sStatusMsg = format_rate(this, hContact, m_sStatusMsgFormat);
if (false == sStatusMsg.empty())
db_set_ts(hContact, LIST_MODULE_NAME, STATUS_MSG_NAME, sStatusMsg.c_str());
else
db_unset(hContact, LIST_MODULE_NAME, STATUS_MSG_NAME);
bool bUseContactSpecific = (db_get_b(hContact, QUOTES_PROTOCOL_NAME, DB_STR_CONTACT_SPEC_SETTINGS, 0) > 0);
CAdvProviderSettings global_settings(this);
WORD dwMode = (bUseContactSpecific)
? db_get_w(hContact, QUOTES_PROTOCOL_NAME, DB_STR_QUOTE_LOG, static_cast<WORD>(lmDisabled))
: global_settings.GetLogMode();
if (dwMode&lmExternalFile) {
bool bAdd = true;
bool bOnlyIfChanged = (bUseContactSpecific)
? (db_get_w(hContact, QUOTES_PROTOCOL_NAME, DB_STR_QUOTE_LOG_FILE_CONDITION, 1) > 0)
: global_settings.GetLogOnlyChangedFlag();
if (true == bOnlyIfChanged) {
bAdd = ((false == bValidPrev) || (false == IsWithinAccuracy(dRate, dPrev)));
}
if (true == bAdd) {
tstring sLogFileName = (bUseContactSpecific)
? Quotes_DBGetStringT(hContact, QUOTES_PROTOCOL_NAME, DB_STR_QUOTE_LOG_FILE, global_settings.GetLogFileName().c_str())
: global_settings.GetLogFileName();
if (true == sSymbol.empty()) {
sSymbol = Quotes_DBGetStringT(hContact, QUOTES_PROTOCOL_NAME, DB_STR_QUOTE_SYMBOL);
}
sLogFileName = GenerateLogFileName(sLogFileName, sSymbol);
tstring sFormat = global_settings.GetLogFormat();
if (bUseContactSpecific) {
CQuotesProviderVisitorDbSettings visitor;
Accept(visitor);
sFormat = Quotes_DBGetStringT(hContact, QUOTES_PROTOCOL_NAME, DB_STR_QUOTE_FORMAT_LOG_FILE, visitor.m_pszDefLogFileFormat);
}
log_to_file(this, hContact, sLogFileName, sFormat);
}
}
if (dwMode&lmInternalHistory) {
bool bAdd = true;
bool bOnlyIfChanged = (bUseContactSpecific)
? (db_get_w(hContact, QUOTES_PROTOCOL_NAME, DB_STR_QUOTE_HISTORY_CONDITION, 1) > 0)
: global_settings.GetHistoryOnlyChangedFlag();
if (true == bOnlyIfChanged) {
bAdd = ((false == bValidPrev) || (false == IsWithinAccuracy(dRate, dPrev)));
}
if (true == bAdd) {
tstring sFormat = (bUseContactSpecific)
? Quotes_DBGetStringT(hContact, QUOTES_PROTOCOL_NAME, DB_STR_QUOTE_FORMAT_HISTORY, global_settings.GetHistoryFormat().c_str())
: global_settings.GetHistoryFormat();
log_to_history(this, hContact, nTime, sFormat);
}
}
if (dwMode&lmPopup) {
bool bOnlyIfChanged = (bUseContactSpecific)
? (1 == db_get_b(hContact, QUOTES_PROTOCOL_NAME, DB_STR_QUOTE_POPUP_CONDITION, 1) > 0)
: global_settings.GetShowPopupIfValueChangedFlag();
if ((false == bOnlyIfChanged)
|| ((true == bOnlyIfChanged) && (true == bValidPrev) && (false == IsWithinAccuracy(dRate, dPrev)))) {
tstring sFormat = (bUseContactSpecific)
? Quotes_DBGetStringT(hContact, QUOTES_PROTOCOL_NAME, DB_STR_QUOTE_FORMAT_POPUP, global_settings.GetPopupFormat().c_str())
: global_settings.GetPopupFormat();
CPopupSettings ps = *(global_settings.GetPopupSettingsPtr());
ps.InitForContact(hContact);
show_popup(this, hContact, tendency, sFormat, ps);
}
}
SetContactStatus(hContact, ID_STATUS_ONLINE);
}
static tstring build_url(MCONTACT hContact, const tstring& rsURL, double dAmount = 1.0)
{
tstring sFrom = Quotes_DBGetStringT(hContact, QUOTES_PROTOCOL_NAME, DB_STR_FROM_ID);
tstring sTo = Quotes_DBGetStringT(hContact, QUOTES_PROTOCOL_NAME, DB_STR_TO_ID);
return build_url(rsURL, sFrom, sTo, dAmount);
}